Hello dear community of leechers, noobs that fail to read the instructions etc
(if you are not one of those, then u wont need my simple progs either)
i dont know if you guys have a fisher that works or not
so i'm releasing my fisher, its just a simple script.. and its first testing
if u feel free to add or brainstorm about possible improvements, be my guest, its open project ... any1 is free to do with it what he wants
Instructions:
-open the game
-put resolution on 1024x768x16 *1
-put rod in place *2
-press f9 to start
-press f10 to stop
-press f11 to pauze *3
*1 if your desktop is bigger then this, please ensure that dekaron is on the left top like shown in the picture below
*2 make sure the top of your screen is covered in water cause it will click there at around pixel (500 , 200 of your total screen)
*3 may need to hold a few sec, stil somewhat buggy
it is writtin in autoit,
if you feel like altering it in any way, please be my guest, but i cannot garantee it will work properly if u do.Best way to learn is through trying tho.
You are free to choose wether you compile the sourcecode or download my compiled version, there is no difference whatsoever
Autoit is a free program that anyone with a bit backbone can learn easly
source:
Code:
#comments-start
Fisher by Tomme
Birds fly high
Birds stay high
Instructions:
-open the game
-put resolution on 1024x768x16*1
-put rod in place*2
-press f9 to start
-press f10 to stop
-press f11 to pauze*3
*1 if your desktop is bigger then this, please ensure that dekaron is on the left top like shown in the picture below
*2 make sure the top of your screen is covered in water cause it will click there at around pixel (500 , 200 of your total screen)
*3 may need to hold a few sec, stil somewhat buggy
#comments-end
$switch = 0
$start = 0
#comments-start here you can set the hotkeys
#comments-end
HotKeySet ("{F9}","start")
HotKeySet ("{F10}","end")
HotKeySet ("{F11}","pauze")
Func start ()
$start =1
EndFunc
Func end ()
MsgBox (0, "Credits","Thanks to Distortion for the idea")
Exit
EndFunc
Func pauze ()
$start = 0
$switch = 0
EndFunc
func search ()
PixelSearch( 20, 20, 500, 500, "0x1BBF00",15)
If Not @error Then
$switch = 1
catchem ()
Else
PixelSearch( 20, 20, 500, 500, "0x3569B8",15)
while Not @error
$switch = 1
catchem ()
WEnd
EndIf
EndFunc
func catchem ()
PixelSearch( 50, 50, 140, 400, "0xBD0000",5)
If Not @error Then
sleep(1)
Else
opt("sendkeydowndelay",350)
send ("{SPACE}")
EndIf
EndFunc
func openfish ()
opt("sendkeydowndelay",5)
Send ("l")
MouseClick ("left" ,500,200)
sleep (500)
EndFunc
#comments-start the bot starts here
#comments-end
TrayTip("loading fisher", "Made By Tomme A.K.A. Zwartsz", 5, 1)
while 1
if $start =1 then
openfish ()
search ()
EndIf
WEnd
*NOTES*
will not automaticaly press bait, this is for future versions
if any problems, please pm me
*credits:
Distortion for his fishing bot, and the add he gave me on msn
future adds:
baiting
a gui(window like distortion his bot)
smoothier( u'll notice first 350ms space only has a duty cycle of 50ish % + faster running)
far future adds:
tetris: when yar bored of watching your bot lol
jkjk