2moons fishbot for AutoIt v3

This is my first post here so plz be gentle. I haven't done any real programing but played a little, so here's a nasty try at a fishing script for AutoIt v3. You need AutoIt installed and a gameguard emulator, both of which you can find links to and instructions in other threads. Then just highlight the following text and paste it into a notepad document. Name the document with the .au3 extension, save it in your mydocuments(or where your autoit looks for scripts) and fish hands free.

;################################################# ########################
; FishBOT
;################################################# ########################


;###########
; Globals
;###########
$title = "FishBOT"
;################################################# ################################
; changes how long the key is pressed to allow for server lag increase if needed
;################################################# ################################
Opt("SendKeyDownDelay", 5)

;################################################# ########################
; Hot Keys Section
;
; Set up a Hot key to be used later to puase or end the script,
; the sleep(delay time) is added becuase not sure if program would recognize
; the puase key while spacebar key is held down.
;################################################# ########################

HotKeySet("{PAUSE}", "request_end")

;######################################
; Cast pole and start all over again,
; loops until you hit puase.
;######################################

Start_Bot()

while 1
cast_pole()
wend

;################################################# #############################
func cast_pole()
Send("l")
Sleep(5)
MouseClick("left")
;################################################# #################
; changed key down to 8000 to allow time for full catch sequence
;################################################# #################
Opt("SendKeyDownDelay", 8000)
send("{space}")
Opt("SendKeyDownDelay", 5)
Sleep(5)
endfunc

;################################################# #############################
func msg($text)
MsgBox(0, $title, $text)
endfunc

;################################################# #############################
func msg_array($title, $array, $num_elements)
dim $text
$text = $array[0]

for $j = 1 to $num_elements - 1
$text = $text & ", " & $array[$j]
next

MsgBox(0, $title, $text)
endfunc

;################################################# #########
func request_end()
$MB_YESNO = 4
$MB_YES = 6

if MsgBox($MB_YESNO, $title, "End script?") == $MB_YES then
Exit
endif
endfunc

;################################################# ##########
func Start_Bot()
$MB_YESNO = 4
$MB_YES = 6

if MsgBox($MB_YESNO, $title, "Do you want to start the Bot?") == $MB_Yes then

else
Exit
endif
endfunc

;#### DO NOT COPY THIS OR WHAT FOLLOWS ###
It looks like it pasted ok, I don't think any lines got wrapped. The way I use it is run 2moons in window mode so I can reach my AutoIt run script icon.
Go to where you are going to fish.
Hit "L" to check you have your pole equipped and are in a fishable spot.
Run the script.

After you start the script you may need to move your mouse back to the fishable spot just look for the fishhook. I'm low level so I don't know if it takes longer to catch higher level fish, if so just add to the 8000 number in "Opt("SendKeyDownDelay", 8000)". This code keeps the space bar held down for 8000 milleseconds, which works in level one fishing areas. I'm sure this can be improved upon but hey, it's free.

do you need to run Nebular's Bypass to get this to work? or can you open the game normal?

it uses auto-it, and third party program, I am sure you need the bypass yes, but not totally, as I have never used auto-it without skill hack lol. So you just gotta try it, use trial and error man, it goes a long way.

#bump...

Quote:

Originally Posted by WarMasterRealOne #bump...

omg wtfi get an infraction for bumping and u don't zzzzzzz:mad:

is it me or will dekaron just not accept the input from auto-it ?
script works fine under windows, but when i switch to my windowed or fullscreen dekaron it does nothing ?


edlt, must run under administrator rights in vista/7
add this to the script :
#requireadmin

and it will work if you run vista/7 ;)

He reported the bump, he did not bump it himself. I think this can still be used, and you don't need a bypass for this.

I don't think anyone should be infracted if the information can still be used, and is not outdated. Just my opinion.

Exactly, I agree, that is why nobody is infracted ;)