[Release] Waterbot [Open Source]

[Dr.Toni]

Hey Guys


This is the old Waterbot
Maybe some guys will remember....

Here is the code...

Code:

 Spoiler

Global $Bonusbox


Hotkeyset("{F1}","_start")
Hotkeyset("{F2}","_go1")
Hotkeyset("{F3}","_go2")
Hotkeyset("{F4}","_exit")
Hotkeyset("{F6}","_fly")
Hotkeyset("{F8}","_break")

Func _start()
Send("{F2}")
Sleep(150)
Send("{F3}")
Sleep(150)
Send("{F6}")
EndFunc

Func _go1()
AdlibRegister("_search", 150)
EndFunc

Func _go2()
AdlibRegister("_fly", 9000)
EndFunc

func _break()
AdlibUnRegister("_search")
AdlibUnRegister("_fly")
EndFunc

Func _search()
$Bonusbox = PixelSearch(24, 85, 1238, 916, 0xFCFFCD)
IF IsArray($Bonusbox) Then
MouseMove($Bonusbox[0], $Bonusbox[1], 1)
MouseClick("left")
Sleep(1600)
Send("{F6}")
EndIf
EndFunc

Func _fly()
Opt("MouseCoordMode", 2)
MouseMove(int(Random(1018, 1255)), int(Random(788, 927)), 1)
MouseClick("left")
EndFunc



While 1
Sleep(100)
Wend

Func _exit()
Exit
EndFunc

Maybe it don't work... If it won't work, you have to fix it

I know it's a very easy code but it was my first Pixelbot ^^

[manulaiko]

really thanks for the code :P

[Elsastylez]

#moved

[L3d1]

Thanks for sharing this with us. ^^
This helps me a lot.