Fix my autoit bot for The Contract to make it compatible with Pie bind's pleaze
Opt("WinWaitDelay",100)
Opt("WinDetectHiddenText",1)
Opt("MouseCoordMode",0)
Global $boatbot
HotKeySet("{HOME}", "start")
HotKeySet("{END}", "stop")
While 1
sleep ( 1 )
WEnd
; -------- Functions -------------------
Func start()
$boatbot = Not $boatbot
While $boatbot
_WinWaitActivate("Vindictus","")
MouseClick("left",117,691,1) ; Clicks START to launch mission
MouseClick("left",117,691,1)
MouseClick("left",117,691,1)
MouseClick("left",117,691,1)
MouseClick("left",117,691,1)
Sleep(25000)
Send("{NUMPAD6}") ; skip map
Sleep(1600)
Send("{NUMPAD6}") ; skip map
Sleep(1600)
Send("{NUMPAD6}") ; skip map
Sleep(1600)
Send("{NUMPADSUB}") ; ohk
Sleep(100)
Send("{NUMPAD0}") ; god
Sleep(100)
Send("{NUMPAD7}") ; spear
Sleep(100)
Send("{NUMPAD4}") ; changefigure
Sleep(100)
Send("{LEFT up}") ; will move right for 5 seconds to trigger cutscene.
Sleep(200)
Send("{UP down}") ; will move forward for 5 seconds to trigger cutscene.
Sleep(7700)
Send("{NUMPAD9}") ; nuke
SLeep(100)
Sleep(68500) ; this is the time it takes until the Mission Successful menu shows up.
MouseClick("left",325,736,1)
Sleep(9200) ; time to zone back to boat and repeat the script
WEnd
EndFunc
Func _WinWaitActivate($title,$text,$timeout=0)
WinWait($title,$text,$timeout)
If Not WinActive($title,$text) Then WinActivate($title,$text)
WinWaitActive($title,$text,$timeout)
EndFunc
Func stop()
Exit
EndFunc ;==>stop9
This is using l2noob2's consoles but it doesn't work anymore so I need to use piebind now. Thanks if you help.
Opt("WinDetectHiddenText",1)
Opt("MouseCoordMode",0)
Global $boatbot
HotKeySet("{HOME}", "start")
HotKeySet("{END}", "stop")
While 1
sleep ( 1 )
WEnd
; -------- Functions -------------------
Func start()
$boatbot = Not $boatbot
While $boatbot
_WinWaitActivate("Vindictus","")
MouseClick("left",117,691,1) ; Clicks START to launch mission
MouseClick("left",117,691,1)
MouseClick("left",117,691,1)
MouseClick("left",117,691,1)
MouseClick("left",117,691,1)
Sleep(25000)
Send("{NUMPAD6}") ; skip map
Sleep(1600)
Send("{NUMPAD6}") ; skip map
Sleep(1600)
Send("{NUMPAD6}") ; skip map
Sleep(1600)
Send("{NUMPADSUB}") ; ohk
Sleep(100)
Send("{NUMPAD0}") ; god
Sleep(100)
Send("{NUMPAD7}") ; spear
Sleep(100)
Send("{NUMPAD4}") ; changefigure
Sleep(100)
Send("{LEFT up}") ; will move right for 5 seconds to trigger cutscene.
Sleep(200)
Send("{UP down}") ; will move forward for 5 seconds to trigger cutscene.
Sleep(7700)
Send("{NUMPAD9}") ; nuke
SLeep(100)
Sleep(68500) ; this is the time it takes until the Mission Successful menu shows up.
MouseClick("left",325,736,1)
Sleep(9200) ; time to zone back to boat and repeat the script
WEnd
EndFunc
Func _WinWaitActivate($title,$text,$timeout=0)
WinWait($title,$text,$timeout)
If Not WinActive($title,$text) Then WinActivate($title,$text)
WinWaitActive($title,$text,$timeout)
EndFunc
Func stop()
Exit
EndFunc ;==>stop9
This is using l2noob2's consoles but it doesn't work anymore so I need to use piebind now. Thanks if you help.