Blue Eye Logo

Blue Eye Macro

Automation is freedom
It is currently Thu Nov 21, 2024 7:38 pm

All times are UTC




Post new topic Reply to topic  [ 10 posts ] 
Author Message
 Post subject: Aura Kingdom Fishing Bot
Thanked: 1 time(s)  Unread post Posted: Tue Jul 28, 2015 11:07 pm 
New User
New User



Joined: Wed Jul 01, 2015 12:48 am
Posts: 7
Been thanked: 1 time(s)
Has thanked: 1 time(s)
Contribution Points: 117
Hello,
Recently I started playing AK and found fishing to be extremely easy and a tad fun, which turned extremely boring. I began using bots which continually caught every fish available and wanted to make my own which would look as human as possible.
Others have much more complex bots, but I've worked to create a bot which works like a human in as simple as possible script.

This is my first forum post and it will be updated with full descriptions of variables etc at a later time.
These are the most stable and bug free builds I currently have.
These are designed for the english aeria games servers


MAIN bot
Standalone fishing bot
Standalone semi-active fishing bot which will catch cubes, orange, and king fish.
Will fish and auto-find the green fishing icon and begin to fish, or will continue fishing so long as the mini-game is up. Make sure it is clickable and not obscured or un-clickable.
Image
Works off a universal text trigger which has worked on all tested resolutions.
Variables
Variable Big fish catch rate {BigCatchRate} expressed as the percentage of what you want. Default .5
Variable Small fish catch rate {SmallCatchRate} expressed as the percentage of what you want. Default .25

(working on fail percentages)
(also working on auto declining friend invites)

Utility Bots
Bag clears
Cube clear and fishing bait switcher (needs 1-3 full stacks of earthworm bait to work properly).
Image
Designed to close fishing game and then clear out cubes and any unstackable items by patterns.
Trigger Lctrl+L
Variables
{X_X}, {X_Y} location coordinates of the of the x on fishing minigame
{FishBot} Name of current fishing bot (leave blank if you don't want to re-execute fishing bot}


Countdown timer
Triggers bag clear based off timer.
Timer will display in minutes and seconds to countdown.

Unmarked timer
Runs a timer based on a predetermined variable in minutes. {Wait Time Mins}
Variables
{x} {y} are the location where you want the countdown timer

Countdown Timer 2.01
Runs off a variable timer based on a min and max times in predetermined variables
Variables
{x} {y} are the location where you want the countdown timer
{Wait Time min Mins} lower random time limit to run bag clear
{Wait Time max Mins} Upper limit

Auto R
Auto right clicker (LCtrl+u trigger)
Automatically will click the right click.
killing the clicker has a 50% to have the right click down and will drag the screen. just right click to fix this.


Resolution Builds
Non-resolution versions will have a default resolution of 1080p
Resolution marked versions are as follows:
900p (1600x900p)
768p (1366x768) In development
Macros will only work with utilizes with the same resolution tag!


How to use
1. Import the bot to BEM.
2. Open your AK game.
3. Make sure your game resolution is set to the correct resolution (dependent on version).
4. Make sure your UI is 100% scaled (could be found in SFX & UI settings) and brightness is set to 100%.
(Optional) Set graphics to lowest settings and 30-60 fps (energy conservation).
5. Reset UI in main menu (please move combat action bars to chat area for best effects).
(Optional) Remove name tags and hp bar from screen)
6. Find a fishing spot with orange fish available.
(Optional Utility) Open inventory and place inventory on left or right portion of screen with bait and organize button fully visible.
7. Make sure all fishing icons on the screen are clickable (mainly the highest one up) and are not obscured (causes issues if it is unclickable).
8. Press hotkey to start fishing bot.currently ",".
(Optional) run utilities with "/" (countdown timer) or Lctrl+L (bag clear)
9. Enjoy catching fish
10. All Current end triggers are".".

Feel free to change triggers, as admittedly they are quite annoying to type with.

Warning: THIS POST IS INCOMPLETE
feel free to message me with questions/suggestions


Thanks to:
Bananaboot (Ideas for humanality)
Luatron (initial bot ideas and script base)
Pietris (learned how to do functions)


BOTS
Let me know how well these work for you

1080p -
Attachment:
File comment: Standalone/use with utilities 1080p
Still working on
Trigger ","

aurakingdom;ak fishing bot 2.0.3 v2.bem [81.26 KiB]
Downloaded 2332 times

Attachment:
File comment: Countdown Timer for bag clear with display with random interval
1080p
Trigger: "/"

test;display countdown 2.0.1.bem [22.49 KiB]
Downloaded 847 times

Attachment:
File comment: Countdown Timer for bag clear with display 1080p
Trigger: "/"

test;display countdown.bem [20.43 KiB]
Downloaded 820 times

Attachment:
File comment: Bag clear 1080p
Trigger: Lctrl+l

test;bag clear 1.0.3.bem [54.46 KiB]
Downloaded 805 times



900p -
Attachment:
File comment: Standalone/use with utilities 900p
Still working on

aurakingdom;ak fishing bot 2.0.2 v2 900p.bem [71.74 KiB]
Downloaded 972 times

Attachment:
File comment: Countdown Timer for bag clear with display 900p
Trigger: "/"

test;display countdown 900p.bem [20.47 KiB]
Downloaded 758 times

Attachment:
File comment: Countdown Timer for bag clear with display (rewrite to display minutes and seconds - may be buggy)
900p
Trigger: "/"

test;display countdown 2.0.1 900p.bem [24.23 KiB]
Downloaded 730 times

Attachment:
File comment: Bag clear 900p
Trigger: Lctrl+l

test;bag clear 1.0.3 900p.bem [50.48 KiB]
Downloaded 753 times


Universal -
Attachment:
File comment: Automatic Right Trigger
Trigger Lctrl+U
End trigger "."
remember to right click afterwards

aurakingdom;auto r.bem [6.74 KiB]
Downloaded 981 times


Attachments:
File comment: Like this
Earthworms.png
Earthworms.png [ 3.83 KiB | Viewed 16546 times ]


Last edited by Crackerman55 on Thu Jul 30, 2015 5:36 am, edited 12 times in total.
Top
 Profile  
Reply with quote  
 Post subject: Re: Aura Kingdom Fishing Bot
Thanked: 1 time(s)  Unread post Posted: Tue Jul 28, 2015 11:43 pm 
Partner / License admin
Partner / License admin
User avatar



Joined: Sun Oct 10, 2010 5:16 pm
Posts: 2259
Location: USA
Been thanked: 535 time(s)
Has thanked: 38 time(s)
Contribution Points: 17741
I like how you scripted the countdown; good job!

_________________
----------------------------------------Syrifina---------------------------------------------------
PM me for licenses and/or licensing information: Click Here
[Be sure to include and update your profile with your BE ID]

Forum Rules
Reminder of rules regarding Contribution points
Getting started in 1, 2, 3
Virtual Drivers; Manual Installers


Top
 Profile  
Reply with quote  
 Post subject: Re: Aura Kingdom Fishing Bot
Thanked: 0 time(s)  Unread post Posted: Wed Jul 29, 2015 12:24 am 
New User
New User



Joined: Wed Jul 01, 2015 12:48 am
Posts: 7
Been thanked: 1 time(s)
Has thanked: 1 time(s)
Contribution Points: 117
Hello again,
Here is the most updated working code for my bot and subsequent macros.


Fishing Bot 2.0.3 v2
Code:
 begin
     while  Color.Pixel pattern can not be located on screen near coordinate("0,0,0,1,0,0,0,0,1,0,0,0,0,-2,2,0,0,0,1,0,0,0,0,1,0,0,0,0", "0", "{X_X}", "{X_Y}", "5")
          begin
               // will click on fishing symbol if the minigame x is not found
               if  Color.Pixel pattern can be located on screen("223,230,160,1,0,110,138,57,1,0,120,152,54,1,0,115,147,51,-3,1,223,231,160,1,0,106,136,53,1,0,120,154,54,1,0,129,161,59", "5")
                    begin
                         Humanly.Pause("750", "800")
                         Mouse.Release button("left")
                         Mouse.Click at pixel pattern("248,164,96,1,0,179,91,21,1,0,115,101,31,1,0,210,222,144,-3,1,247,162,95,1,0,198,111,43,1,0,106,91,25,1,0,198,214,131", "5", "no", "right")
                         Humanly.Pause("200", "300")
                         Mouse.Click at pixel pattern("223,230,160,1,0,110,138,57,1,0,120,152,54,1,0,115,147,51,-3,1,223,231,160,1,0,106,136,53,1,0,120,154,54,1,0,129,161,59", "5", "no", "right")
                    end
          end
     while  Color.Pixel pattern can be located on screen near coordinate("0,0,0,1,0,0,0,0,1,0,0,0,0,-2,2,0,0,0,1,0,0,0,0,1,0,0,0,0", "0", "{X_X}", "{X_Y}", "5")
          begin
               // when x is found for the minigame it will begin looking for triggers.
               while  Color.Near coordinate is not (RGB)("{1Gold_R}", "{1Gold_G}", "{1Gold_B}", "{1Gold_X}", "{1Gold_Y}", "2")
                    begin
                         // when a coordinate in the little lure man is there it will click.
                         while  Color.At coordinate is within (RGB range)("55", "48", "46", "3", "575", "643")
                              begin
                                   Mouse.Release button("left")
                                   Humanly.Pause("150", "200")
                                   Humanly.Click at coordinate("{2Mouse_X}", "{2Mouse_Y}", "left", "yes")
                                   Humanly.Pause("150", "200")
                                   Mouse.Release button("left")
                                   // double checks if it actually clicked and will restart if it has issues.
                                   if  Color.At coordinate is within (RGB range)("55", "48", "46", "3", "575", "643")
                                        begin
                                             // restart is meant to click on the green fish symbol because it caused issues before.
                                             Function.Execute("Restart")
                                        end
                              end
                         // when a coordinate in the little lure man is there it will click.
                         while  Color.Pixel pattern can be located on screen near coordinate("161,116,75,1,2,156,112,72", "5", "576", "671", "5")
                              begin
                                   Mouse.Release button("left")
                                   Humanly.Pause("150", "200")
                                   Humanly.Click at coordinate("{2Mouse_X}", "{2Mouse_Y}", "left", "yes")
                                   Humanly.Pause("150", "200")
                                   Mouse.Release button("left")
                                   if  Color.At coordinate is within (RGB range)("55", "48", "46", "3", "575", "643")
                                        begin
                                             Function.Execute("Restart")
                                        end
                              end
                         // looks for the scale on the fish and then preps for triggers
                         while  Color.Pixel pattern can be located on screen("167,165,168,1,0,150,147,151,-1,1,168,167,170,1,0,149,147,152,-1,1,169,166,170,1,0,149,146,151,-1,1,170,166,172,1,0,154,150,158,-1,1,157,153,164,1,0,157,155,166", "0")
                              begin
                                   Mouse.Release button("left")
                                   Humanly.Pause("100", "200")
                                   // Looksforhook
                                   if  Color.Pixel pattern can be located on screen("255,0,0,5,5,255,0,0,3,3,255,0,0,5,1,255,0,0,4,-3,255,0,0,5,-3,255,0,0,4,0,255,0,0", "0")
                                        begin
                                             Mouse.Release button("left")
                                             Variable.Set("ZLoopCounter", "0")
                                             Variable.Set("ZCheckBlueOnce", "0")
                                             Humanly.Click at coordinate("{2Mouse_X}", "{2Mouse_Y}", "left", "yes")
                                             Humanly.Pause("10", "25")
                                             Function.Execute("Fishing")
                                        end
                                   // Looksforstrong
                                   if  Color.Pixel pattern can be located on screen("255,0,0,5,0,255,0,0,4,0,255,0,0,2,3,255,0,0,6,1,255,0,0,5,-4,255,0,0,4,3,255,0,0", "0")
                                        begin
                                             Mouse.Release button("left")
                                             Variable.Set("ZLoopCounter", "0")
                                             Variable.Set("ZCheckBlueOnce", "0")
                                             Humanly.Click at coordinate("{2Mouse_X}", "{2Mouse_Y}", "left", "yes")
                                             Humanly.Pause("10", "25")
                                             Function.Execute("Fishing")
                                        end
                                   // LooksforGigantic
                                   if  Color.Pixel pattern can be located on screen("255,0,0,6,-3,255,0,0,5,3,241,3,5,4,-3,255,0,0,5,0,255,0,0", "0")
                                        begin
                                             Mouse.Release button("left")
                                             Variable.Set("ZLoopCounter", "0")
                                             Variable.Set("ZCheckBlueOnce", "0")
                                             Humanly.Click at coordinate("{2Mouse_X}", "{2Mouse_Y}", "left", "yes")
                                             Humanly.Pause("10", "25")
                                             Function.Execute("Fishing")
                                        end
                                   // Looks for Big
                                   if  Color.Pixel pattern can be located on screen("255,0,0,3,2,255,0,0,3,-3,255,0,0,3,2,255,0,0,4,0,255,0,0,4,3,255,0,0", "3")
                                        begin
                                             // maths for big catch rate
                                             Variable.Set random number("Big Variable", "1", "1000")
                                             Variable.Set("CatchRate", "{BigCatchRate}")
                                             Variable.Multiply (Math)("CatchRate", "10")
                                             if  Variable.Is less than (Math)("Big Variable", "{CatchRate}")
                                                  begin
                                                       Mouse.Release button("left")
                                                       Variable.Set("ZLoopCounter", "0")
                                                       Variable.Set("ZCheckBlueOnce", "0")
                                                       Humanly.Click at coordinate("{2Mouse_X}", "{2Mouse_Y}", "left", "yes")
                                                       Humanly.Pause("10", "25")
                                                       Function.Execute("Fishing")
                                                  end
                                             if  Variable.Is greater than (Math)("Big Variable", "{CatchRate}")
                                                  begin
                                                       Humanly.Pause("12000", "15000")
                                                  end
                                        end
                                   // look for small
                                   if  Color.Pixel pattern can be located on screen("255,0,0,5,-2,255,0,0,4,1,255,0,0,5,1,255,0,0,5,-2,255,0,0,4,0,255,0,0,3,0,255,0,0,5,1,255,0,0,3,3,255,0,0", "0")
                                        begin
                                             // maths for small catch rate
                                             Variable.Set random number("Small Variable", "1", "1000")
                                             Variable.Set("CatchRate2", "{SmallCatchRate}")
                                             Variable.Multiply (Math)("CatchRate2", "10")
                                             if  Variable.Is less than (Math)("Small Variable", "{CatchRate2}")
                                                  begin
                                                       Mouse.Release button("left")
                                                       Variable.Set("ZLoopCounter", "0")
                                                       Variable.Set("ZCheckBlueOnce", "0")
                                                       Humanly.Click at coordinate("{2Mouse_X}", "{2Mouse_Y}", "left", "yes")
                                                       Humanly.Pause("10", "25")
                                                       Function.Execute("Fishing")
                                                  end
                                             if  Variable.Is greater than (Math)("Small Variable", "{CatchRate2}")
                                                  begin
                                                       Humanly.Pause("12000", "15000")
                                                  end
                                        end
                              end
                    end
               while  Color.At coordinate is (RGB)("{1Gold_R}", "{1Gold_G}", "{1Gold_B}", "{1Gold_X}", "{1Gold_Y}")
                    begin
                         Function.Execute("Fishing")
                    end
          end
 end

function("Fishing")
     // where the magic happens
     begin
          if  Variable.Is equal to("ZCheckBlueOnce", "0")
               begin
                    Mouse.Release button("left")
                    Color.Wait for and locate pixel pattern("72,0,0,0,1,72,0,0,0,1,72,0,0,0,1,72,0,0,0,1,72,0,0", "0", "FindBlue_X", "FindBlue_Y")
                    Variable.Set("ZCheckBlueOnce", "1")
               end
          Color.Find pixel pattern closest to coordinate("72,0,0,0,1,72,0,0,0,1,72,0,0,0,1,72,0,0,0,1,72,0,0", "0", "yes", "720", "746", "Golden_X", "Golden_Y")
          if  Variable.Is greater than (Math)("Golden_X", "{FindBlue_X}")
               begin
                    Mouse.Hold button("left")
               end
          if  Variable.Is less than (Math)("Golden_X", "{FindBlue_X}")
               begin
                    Mouse.Release button("left")
               end
     end
function

function("Restart")
     begin
          Humanly.Pause("120", "150")
          Mouse.Release button("left")
          Mouse.Click at pixel pattern("223,230,160,1,0,110,138,57,1,0,120,152,54,1,0,115,147,51,-3,1,223,231,160,1,0,106,136,53,1,0,120,154,54,1,0,129,161,59", "5", "no", "right")
          Mouse.Release button("left")
          Macro.Restart("no")
     end
function
 


Bag Clear 1.03

Code:
 begin
     Macro.Abort macro named("Aurakingdom", "{FishBot}")
     Mouse.Release button("left")
     Humanly.Pause("100", "150")
     if  Color.Pixel pattern can not be located on screen near coordinate("0,0,0,0,1,0,0,0,0,3,0,0,0,2,-4,2,2,2,0,1,0,0,0,0,3,0,0,0", "0", "{X_X}", "{X_Y}", "20")
          begin
               Mouse.Release button("left")
               Humanly.Pause("{Cut_MIN}", "{Cut_MAX}")
               if  Color.Pixel pattern can be located on screen near coordinate("0,0,0,0,1,0,0,0,0,3,0,0,0,2,-4,2,2,2,0,1,0,0,0,0,3,0,0,0", "0", "{X_X}", "{X_Y}", "20")
                    begin
                         Function.Execute("Close")
                    end
               Function.Execute("Bag Clear")
          end
     when  Color.Pixel pattern can be located on screen near coordinate("0,0,0,0,1,0,0,0,0,3,0,0,0,2,-4,2,2,2,0,1,0,0,0,0,3,0,0,0", "0", "{X_X}", "{X_Y}", "20")
          begin loop()
               Mouse.Release button("left")
               Mouse.Click at color closest to coordinate (RGB)("0", "0", "0", "0", "{X_X}", "{X_Y}", "left")
               if  Color.Pixel pattern can not be located on screen near coordinate("0,0,0,1,2,0,0,0,1,2,0,0,0,3,3,0,0,0", "0", "656", "626", "5")
                    begin
                         if  Color.Pixel pattern can not be located on screen near coordinate("56,56,56,3,4,56,56,56,3,2,56,56,56", "0", "656", "627", "2")
                              begin
                                   Macro.Break from loop("yes")
                                   Function.Execute("Bag Clear")
                              end
                    end
          end
 end

function("Close")
     begin loop()
          Mouse.Release button("left")
          Mouse.Click at color closest to coordinate (RGB)("0", "0", "0", "0", "{X_X}", "{X_Y}", "left")
          Mouse.Release button("left")
          if  Color.Pixel pattern can not be located on screen near coordinate("0,0,0,1,2,0,0,0,1,2,0,0,0,3,3,0,0,0", "0", "656", "626", "5")
               begin
                    if  Color.Pixel pattern can not be located on screen near coordinate("56,56,56,3,4,56,56,56,3,2,56,56,56", "0", "656", "627", "2")
                         begin
                              Function.Execute("Bag Clear")
                              Macro.Break from loop("no")
                         end
               end
     end
function

function("Bag Clear")
     begin
          while  Color.Pixel pattern can be located on screen("144,218,218,1,0,40,152,158,1,0,63,185,188,1,0,51,159,159,1,0,168,228,226,1,0,110,230,229,-5,1,20,145,157,1,0,41,193,199,1,0,70,213,215,1,0,83,204,205,1,0,61,166,168,1,0,165,226,226,-5,1,14,204,214,1,0,34,224,222,1,0,88,222,219,1,0,106,207,207,1,0,42,163,165,1,0,41,157,158", "4")
               begin
                    Mouse.Release button("left")
                    Humanly.Pause("200", "300")
                    Mouse.Click at pixel pattern("144,218,218,1,0,40,152,158,1,0,63,185,188,1,0,51,159,159,1,0,168,228,226,1,0,110,230,229,-5,1,20,145,157,1,0,41,193,199,1,0,70,213,215,1,0,83,204,205,1,0,61,166,168,1,0,165,226,226,-5,1,14,204,214,1,0,34,224,222,1,0,88,222,219,1,0,106,207,207,1,0,42,163,165,1,0,41,157,158", "4", "yes", "right")
                    Mouse.Release button("left")
                    if  Color.Pixel pattern can be located on screen near coordinate("0,0,0,0,1,0,0,0,0,3,0,0,0,2,-4,2,2,2,0,1,0,0,0,0,3,0,0,0", "0", "{X_X}", "{X_Y}", "20")
                         begin
                              Mouse.Release button("left")
                              Macro.Restart("yes")
                         end
               end
          while  Color.Pixel pattern can not be located on screen("144,218,218,1,0,40,152,158,1,0,63,185,188,1,0,51,159,159,1,0,168,228,226,1,0,110,230,229,-5,1,20,145,157,1,0,41,193,199,1,0,70,213,215,1,0,83,204,205,1,0,61,166,168,1,0,165,226,226,-5,1,14,204,214,1,0,34,224,222,1,0,88,222,219,1,0,106,207,207,1,0,42,163,165,1,0,41,157,158", "3")
               begin
                    while  Color.Pixel pattern can be located on screen("142,177,111,1,0,156,185,115,1,0,170,192,129,1,0,178,194,140,1,0,179,193,133,-4,1,59,101,111,1,0,87,120,111,1,0,121,151,108,1,0,142,169,108,1,0,167,185,123", "3")
                         begin
                              Mouse.Release button("left")
                              Humanly.Pause("100", "150")
                              Mouse.Click at pixel pattern("142,177,111,1,0,156,185,115,1,0,170,192,129,1,0,178,194,140,1,0,179,193,133,-4,1,59,101,111,1,0,87,120,111,1,0,121,151,108,1,0,142,169,108,1,0,167,185,123", "3", "yes", "right")
                              Humanly.Pause("1200", "1500")
                              Mouse.Release button("left")
                              if  Color.Pixel pattern can be located on screen near coordinate("0,0,0,0,1,0,0,0,0,3,0,0,0,2,-4,2,2,2,0,1,0,0,0,0,3,0,0,0", "0", "{X_X}", "{X_Y}", "20")
                                   begin
                                        Mouse.Release button("left")
                                        Macro.Restart("yes")
                                   end
                         end
                    if  Color.Pixel pattern can not be located on screen("142,177,111,1,0,156,185,115,1,0,170,192,129,1,0,178,194,140,1,0,179,193,133,-4,1,59,101,111,1,0,87,120,111,1,0,121,151,108,1,0,142,169,108,1,0,167,185,123", "3")
                         begin
                              Mouse.Release button("left")
                              Humanly.Pause("200", "300")
                              Mouse.Click at pixel pattern("41,35,24,1,0,83,63,40,1,0,219,175,121,-3,1,255,255,255,1,0,0,0,0,1,0,208,166,114,1,0,205,157,101,-3,-1,255,255,255", "0", "no", "right")
                              Mouse.Release button("left")
                              Humanly.Pause("1200", "1500")
                              Mouse.Click at pixel pattern("78,31,13,0,1,78,31,13,0,1,72,26,9,0,1,93,47,26,1,-3,151,100,72,0,1,135,83,58,0,1,97,47,27,0,1,101,53,33", "3", "yes", "left")
                              Humanly.Pause("1200", "1200")
                              Mouse.Release button("left")
                              Macro.Resume all paused macros()
                              Macro.Execute new("Aurakingdom", "{FishBot}", "no")
                              Macro.Pause("250")
                              Macro.Abort()
                         end
               end
     end
function
 


Countdown Timers
Without random
Code:
 begin
     Variable.Multiply (Math)("Wait Time Mins", "60")
     Variable.Set("countdown", "{Wait Time Mins}")
     Window.Display html dialog("Countdown", "63", "213", "yes", "{countdown}")
     Macro.Pause("1000")
     begin loop()
          if  Variable.Is equal to("countdown", "0")
               begin
                    Macro.Execute new("Test", "Bag Clear 1.0.3", "yes")
                    Macro.Restart("yes")
               end
          if  Color.Pixel pattern can be located on screen("255,0,0,0,9,255,0,0,5,0,255,0,0,3,-2,255,0,0,2,2,255,0,0,3,-3,255,0,0,3,-3,255,0,0,5,2,255,0,0,5,3,255,0,0", "0")
               begin
                    Macro.Execute new("Test", "Bag Clear 1.0.3", "yes")
                    Macro.Restart("yes")
               end
          Variable.Decrement (Math)("countdown")
          Window.Get location("Countdown", "no", "no", "x", "y")
          Window.Display html dialog("Countdown", "{x}", "{y}", "yes", "{countdown}")
          Macro.Pause("1000")
     end
 end
 

With random
Code:
 begin
     Variable.Set random number("Mins", "{Wait Time min Mins}", "{Wait Time max Mins}")
     Variable.Set random number("Seconds", "0", "60")
     begin loop()
          if  Variable.Is equal to("Seconds", "0")
               begin
                    if  Variable.Is equal to("Mins", "0")
                         begin
                              Macro.Execute new("Test", "Bag Clear 1.0.3", "yes")
                              Macro.Restart("yes")
                         end
                    Variable.Decrement (Math)("Mins")
                    Variable.Set("Seconds", "60")
               end
          if  Color.Pixel pattern can be located on screen("255,0,0,0,9,255,0,0,5,0,255,0,0,3,-2,255,0,0,2,2,255,0,0,3,-3,255,0,0,3,-3,255,0,0,5,2,255,0,0,5,3,255,0,0", "0")
               begin
                    Macro.Execute new("Test", "Bag Clear 1.0.3", "yes")
                    Macro.Restart("yes")
               end
          Variable.Decrement (Math)("Seconds")
          Window.Set location("CountdownMins", "Yes", "{x}", "{y}")
          Variable.Evaluate (Text)("Mins: {Mins} <br/> Seconds: {Seconds}", "Result")
          Window.Display html dialog("CountdownMins", "{x}", "{y}", "yes", "{Result}")
          Macro.Pause("1000")
     end
 end
 


Top
 Profile  
Reply with quote  
 Post subject: Re: Aura Kingdom Fishing Bot
Thanked: 0 time(s)  Unread post Posted: Tue Mar 13, 2018 4:21 pm 
New User
New User



Joined: Tue Mar 13, 2018 3:41 pm
Posts: 4
Been thanked: 0 time(s)
Has thanked: 0 time(s)
Contribution Points: 16
where is ur update for 768p bro? thank you


Top
 Profile  
Reply with quote  
 Post subject: Re: Aura Kingdom Fishing Bot
Thanked: 0 time(s)  Unread post Posted: Tue Mar 13, 2018 4:56 pm 
New User
New User



Joined: Wed Jul 01, 2015 12:48 am
Posts: 7
Been thanked: 1 time(s)
Has thanked: 1 time(s)
Contribution Points: 117
Hahaha, this is from 2015. Haven't played in over 2 years. You should be able to figure out the x location etc from the code and repurpose it for yourself. That is if the game still has the same fishing components as it did in 2015.


Top
 Profile  
Reply with quote  
 Post subject: Re: Aura Kingdom Fishing Bot
Thanked: 0 time(s)  Unread post Posted: Wed Mar 14, 2018 12:55 am 
New User
New User



Joined: Tue Mar 13, 2018 3:41 pm
Posts: 4
Been thanked: 0 time(s)
Has thanked: 0 time(s)
Contribution Points: 16
Crackerman55 wrote:
Hahaha, this is from 2015. Haven't played in over 2 years. You should be able to figure out the x location etc from the code and repurpose it for yourself. That is if the game still has the same fishing components as it did in 2015.


i have tried, but it didn't do anything would u please help me??

Image


Top
 Profile  
Reply with quote  
 Post subject: Re: Aura Kingdom Fishing Bot
Thanked: 0 time(s)  Unread post Posted: Wed Mar 14, 2018 1:03 pm 
New User
New User



Joined: Sun Mar 11, 2018 10:00 am
Posts: 9
Been thanked: 1 time(s)
Has thanked: 3 time(s)
Contribution Points: 27
thank you for the hard work =)


Top
 Profile  
Reply with quote  
 Post subject: Re: Aura Kingdom Fishing Bot
Thanked: 0 time(s)  Unread post Posted: Wed Oct 17, 2018 2:44 am 
New User
New User



Joined: Wed Oct 17, 2018 2:38 am
Posts: 3
Been thanked: 0 time(s)
Has thanked: 0 time(s)
Contribution Points: 16
This is great!! i will try this thing when i get the license xD


Top
 Profile  
Reply with quote  
 Post subject: Re: Aura Kingdom Fishing Bot
Thanked: 0 time(s)  Unread post Posted: Mon May 04, 2020 6:56 pm 
New User
New User



Joined: Sat Jun 20, 2015 7:41 pm
Posts: 2
Been thanked: 0 time(s)
Has thanked: 0 time(s)
Contribution Points: 13
Thank you so much for this bot, it's great but it's a shame that it doesn't have the feature to change baits in order to extend the duration f the afk fishing, im very bad at coding so i dont know how or where to put it :( if anyone did it or can help me with this i'd be grateful


Top
 Profile  
Reply with quote  
 Post subject: Re: Aura Kingdom Fishing Bot
Thanked: 0 time(s)  Unread post Posted: Tue Feb 21, 2023 9:56 am 


what program do you use to run this bot?


Top
  
Reply with quote  
Display posts from previous:  Sort by  
Post new topic Reply to topic  [ 10 posts ] 

All times are UTC


You cannot post new topics in this forum
You can reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot post attachments in this forum

Jump to:  


Powered by phpBB © 2000, 2002, 2005, 2007 phpBB Group