My Ultimate Script (Regrets)

[buzzzboy]

hello guys, this is my very first release of anything in mpgh. hope you like it

YOU NEED:
-widescreen 16:10 -> 1280 X 768 resolution
-lowest graphics settings (you might still need to modify the coordinates and pixel hex codes)
-1hko secondaries
-have the hero mode tab as your default tab (just press the hero tab when you're looking for boats, that's it)
-make sure you disable ai so you don't die unexpectedly

you will need to modify the bindings because I am using my own bindings

EDIT: If you're having troubles with pixelsearch, simply increase the last parameter of every pixelsearch function (to 6 maybe). This basically expands the search to 6 shades of that color.

without further ado, here it is:

;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

[Sid]

Daum daum daum
Nice nice

[shawnstuh]

holding down left mouse button makes the ending wait time shorter?
I didn't know that.. lol

[Paladin]

Grats on your first release, and good job contributing.

[sejend]

holding down left mouse button makes the ending wait time shorter?
I didn't know that.. lol

It does ?

[buzzzboy]

only for the exp screen, just click and hold in the menu when it's showing gold, bp, exp 1 at a time. it should increase the speed it shows.

[buzzzboy]

I can't seem to edit my OP, but if you're having troubles with the dock protection, change all the controlsend to the normal send function (in that first part).

[riceking]

Is this a universal one? :O great job

[buzzzboy]

Is this a universal one? :O great job

lol yeah, it is.

man, I wish I could edit my first post since I've changed the dock protection.
1) Since camera angles change, moving isn't the most reliable way. So instead of moving, I used the big size trick to go in/out of dock.
2) Controlsend was buggy, so I switched to send.

[Pie]

lol yeah, it is.

man, I wish I could edit my first post since I've changed the dock protection.
1) Since camera angles change, moving isn't the most reliable way. So instead of moving, I used the big size trick to go in/out of dock.
2) Controlsend was buggy, so I switched to send.

@buzzzboy just post the updated version on this thread and ask Sid or Hell_Demon to edit it for you.

[buzzzboy]

Ok, I will do that.

@Sid
@Hell_Demon

please edit my code with this one, thanks:

;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

[Nico]

Wont work anymore. Closed.