My Ultimate Script (Regrets)

;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