;thanks to Nunya and Riceking for first introducing the two pixel functions and getting me motivated to play around with the scripts to make my own, improved version.
AutoItSetOption("PixelCoordMode", 0)
AutoItSetOption("MouseCoordMode", 0)
HotKeySet("{F9}", "start")
HotKeySet("{F10}", "stop")
HotKeySet("{pause}", "pause")
Global $pause
While 1
WinWaitActive("Vindictus", "")
WEnd
Func start()
While 1
Do ;this whole first part is an attempt at dock protection. sometimes when the server is laggy, you get docked after pressing 'replay', and the exp window is still stuck on your screen.
pixelsearch(1260, 749, 1262, 751, 0x727472, 6)
if @error Then
pixelsearch(1260, 749, 1262, 751, 0xC5CAC5, 6)
if not @error then
sleep(500)
Send("{numpad4}") ;big size (50)
sleep(2000)
Send("{numpadadd}") ;normal size
Send("{alt down}")
sleep(100)
MouseClick("left", 92, 603, 3, 0) ;click leave party
sleep(1500)
MouseClick("left", 614, 469, 3, 0) ;click ok
sleep(100)
Send("{alt up}")
sleep(500)
Send("{numpad6}") ;big size (10)
sleep(1500)
Send("{numpadadd}") ;normal size
sleep(500)
Send("{a down}")
sleep(500)
Send("{a up}")
Send("{w down}")
sleep(3000)
Send("{w up}")
MouseClick("left", 566, 509, 3, 0) ;click ainle
Do
PixelSearch(326, 89, 328, 91, 0xBA4D26, 6) ;wait for red part of hero mode tab
Until Not @error
MouseClick("left", 318, 674, 3, 0) ;click launch
sleep(1000)
MouseClickDrag("left", 818, 386, 818, 515, 2) ;scroll down
sleep(1000)
MouseClick("left", 584, 389, 3, 0) ;click regrets
sleep(1000)
MouseClick("left", 233, 523, 3, 0) ;click launch
exitloop
EndIf
EndIf
until not @error
Do
PixelSearch(53, 638, 55, 640, 0x911813, 6) ;wait for start button
Until Not @error
ControlClick("Vindictus", "", "", "left", 3, 54, 639) ;click start
ControlSend("Vindictus", "", "", "{NUMPAD9}") ;fast forward
Do
PixelSearch(1054, 672, 1056, 674, 0x105472, 6) ;wait for blue loading bar towards the end when loading almost finishes
Until Not @error
ControlSend("Vindictus", "", "", "{NUMPAD7}") ;normal speed
ControlSend("Vindictus", "", "", "{NUMPADENTER}") ;skip map
sleep(500)
ControlSend("Vindictus", "", "", "{NUMPADENTER}") ;skip map
sleep(500)
ControlSend("Vindictus", "", "", "{NUMPADENTER}") ;skip map
Do
PixelSearch(826, 547, 828, 549, 0xF7F7F7, 6) ;wait for white chatbox
Until Not @error
sleep(500)
Controlsend("Vindictus", "", "", "9") ;bombs
sleep(500)
Controlsend("Vindictus", "", "", "{NUMPAD4}") ;big size
sleep(500)
Controlsend("Vindictus", "", "", "{NUMPADSUB}") ;small size
sleep(500)
ControlSend("Vindictus", "", "", "f") ;pull out
sleep(500)
ControlClick("Vindictus", "", "", "left", 4) ;throw
Do
PixelSearch(359, 135, 361, 137, 0x252625, 6) ;wait for exp screen
Until Not @error
MouseMove(350, 350, 0)
sleep(1)
MouseDown("left") ;click and hold to speed up exp screen
Do
PixelSearch(206, 729, 208, 731, 0x8E765E, 6) ;wait for replay button
Until Not @error
MouseUP("left")
ControlClick("Vindictus", "", "", "left", 3, 207, 730) ;click replay
WEnd
EndFunc ;==>start
Func pause()
$pause = NOT $pause
While $pause
sleep(100)
ToolTip('Script is PAUSED, press PAUSE to UNPAUSE',0,0)
WEnd
ToolTip("")
EndFunc
Func stop()
Exit
EndFunc ;==>stop

;thanks to Nunya and Riceking for first introducing the two pixel functions and getting me motivated to play around with the scripts to make my own, improved version.
AutoItSetOption("PixelCoordMode", 0)
AutoItSetOption("MouseCoordMode", 0)
HotKeySet("{F9}", "start")
HotKeySet("{F10}", "stop")
HotKeySet("{pause}", "pause")
Global $pause
While 1
WinWaitActive("Vindictus", "")
WEnd
Func start()
While 1
Do ;this whole first part is an attempt at dock protection. sometimes when the server is laggy, you get docked after pressing 'replay', and the exp window is still stuck on your screen.
pixelsearch(1260, 749, 1262, 751, 0x727472, 6)
if @error Then
pixelsearch(1260, 749, 1262, 751, 0xC5CAC5, 6)
if not @error then
sleep(500)
Send("{numpad4}") ;big size (50)
sleep(2000)
Send("{numpadadd}") ;normal size
Send("{alt down}")
sleep(100)
MouseClick("left", 92, 603, 3, 0) ;click leave party
sleep(1500)
MouseClick("left", 614, 469, 3, 0) ;click ok
sleep(100)
Send("{alt up}")
sleep(500)
Send("{numpad6}") ;big size (15)
sleep(1500)
Send("{numpadadd}") ;normal size
sleep(500)
Send("{a down}")
sleep(500)
Send("{a up}")
Send("{w down}")
sleep(3000)
Send("{w up}")
MouseClick("left", 566, 509, 3, 0) ;click ainle
Do
PixelSearch(326, 89, 328, 91, 0xBA4D26, 6) ;wait for red part of hero mode tab
Until Not @error
MouseClick("left", 318, 674, 3, 0) ;click launch
sleep(1000)
MouseClickDrag("left", 818, 386, 818, 515, 2) ;scroll down
sleep(1000)
MouseClick("left", 584, 389, 3, 0) ;click regrets
sleep(1000)
MouseClick("left", 233, 523, 3, 0) ;click launch
exitloop
EndIf
EndIf
until not @error
Do
PixelSearch(53, 638, 55, 640, 0x911813, 6) ;wait for start button
Until Not @error
ControlClick("Vindictus", "", "", "left", 3, 54, 639) ;click start
ControlSend("Vindictus", "", "", "{NUMPAD9}") ;fast forward
Do
PixelSearch(1054, 672, 1056, 674, 0x105472, 6) ;wait for blue loading bar towards the end when loading almost finishes
Until Not @error
ControlSend("Vindictus", "", "", "{NUMPAD7}") ;normal speed
ControlSend("Vindictus", "", "", "{NUMPADENTER}") ;skip map
sleep(500)
ControlSend("Vindictus", "", "", "{NUMPADENTER}") ;skip map
sleep(500)
ControlSend("Vindictus", "", "", "{NUMPADENTER}") ;skip map
Do
PixelSearch(826, 547, 828, 549, 0xF7F7F7, 6) ;wait for white chatbox
Until Not @error
sleep(500)
Controlsend("Vindictus", "", "", "9") ;bombs
sleep(500)
Controlsend("Vindictus", "", "", "{NUMPAD4}") ;big size
sleep(500)
Controlsend("Vindictus", "", "", "{NUMPADSUB}") ;small size
sleep(500)
ControlSend("Vindictus", "", "", "f") ;pull out
sleep(500)
ControlClick("Vindictus", "", "", "left", 4) ;throw
Do
PixelSearch(359, 135, 361, 137, 0x252625, 6) ;wait for exp screen
Until Not @error
MouseMove(350, 350, 0)
sleep(1)
MouseDown("left") ;click and hold to speed up exp screen
Do
PixelSearch(206, 729, 208, 731, 0x8E765E, 6) ;wait for replay button
Until Not @error
MouseUP("left")
ControlClick("Vindictus", "", "", "left", 3, 207, 730) ;click replay
WEnd
EndFunc ;==>start
Func pause()
$pause = NOT $pause
While $pause
sleep(100)
ToolTip('Script is PAUSED, press PAUSE to UNPAUSE',0,0)
WEnd
ToolTip("")
EndFunc
Func stop()
Exit
EndFunc ;==>stop