[Updated] Labyrinth Leveling Bot (Auto-IT)

HotKeySet("{F1}", "Start")
HotKeySet("{F2}", "Stop")
HotKeySet("{F3}", "Pause")
HotKeySet("{F4}", "Runs")
HotKeySet("{1}", "Show")
HotKeySet("{2}", "Hide")
HotKeySet("{3}", "Inject")
Local $pause, $i, $b, $show, $concheck
$concheck = WinExists("PubConsole")
$pause = 1
$i = 0
$b = 0
$show = False
While 1
	WinWaitActive("Vindictus", "")
WEnd
Func Start()
	For $MAPSKIP = 1 To 10
		ControlSend("Vindictus", "", "", "{RIGHT}") ;next
		Sleep(1000)
	Next
	Sleep(7500)
	For $MAPSKIP = 1 To 10
		ControlSend("Vindictus", "", "", "{RIGHT}") ;next
		Sleep(1000)
	Next
	Sleep(7500)
	For $MAPSKIP = 1 To 10
		ControlSend("Vindictus", "", "", "{RIGHT}") ;next
		Sleep(1000)
	Next
	Sleep(7500)
	For $MAPSKIP = 1 To 10
		ControlSend("Vindictus", "", "", "{RIGHT}") ;next
		Sleep(1000)
	Next
	Sleep(7500)
	Call("kill")
EndFunc   ;==>Start
Func kill()
	While 1
		Sleep(1500)
		ControlSend("Vindictus", "", "", "{NUMPADDOT}") ;ohk
		Sleep(100)
		ControlSend("Vindictus", "", "", "{NUMPAD0}") ;god
		Sleep(100)
		ControlSend("Vindictus", "", "", "{NUMPAD4}") ;spear
		Sleep(100)
		ControlSend("Vindictus", "", "", "{,}") ;spam height
		Sleep(100)
		ControlSend("Vindictus", "", "", "{NUMPAD3}") ;x3 time
		Sleep(100)
		ControlSend("Vindictus", "", "", "{W DOWN}")
		Sleep(5000)
		ControlSend("Vindictus", "", "", "{W UP}")
		For $spear = 1 To 20
			ControlSend("Vindictus", "", "", "{F}")
			Sleep(100)
		Next
		For $trans = 1 To 5
			ControlSend("Vindictus", "", "", "{NUMPAD7}") ;pal 1
			Sleep(2500)
		Next
		Sleep(1000)
		Call("MAPRELOAD")
	WEnd
EndFunc   ;==>kill
Func MAPRELOAD()
	ControlSend("Vindictus", "", "", "{LEFT}") ;reload
	Sleep(10000)
	$i = $i + 1
	If $show Then ToolTip("Runs Completed: " & $i & @crlF & "Levels Grown: " & $b, 0, 0, "Progress")
	Call("level")
EndFunc   ;==>MAPRELOAD
Func level()
	ControlSend("Vindictus", "", "", "{NUMPAD1}") ;x1 time
	Sleep(1000)
	$search = PixelSearch(1060, 525, 1330, 670, 0xCE1436)
	If $search = True Then
		$b = $b + 1
		If $show Then ToolTip("Runs Completed: " & $i & @crlF & "Levels Grown: " & $b, 0, 0, "Progress")
	EndIf
	Call("kill")
EndFunc   ;==>level
Func Runs()
	$show = Not $show
	If ($show) Then
		ToolTip("Runs Completed: " & 0 + $i & @crlF & "Levels Grown: " & 0 + $b, 0, 0, "Progress")
	Else
		ToolTip("")
	EndIf
EndFunc   ;==>Runs
Func pause()
	$pause = Not $pause
	While $pause
		ToolTip('Script is PAUSED, press ""F3"" to UNPAUSE', 0, 0)
		Sleep(1000)
	WEnd
	ToolTip("")
EndFunc   ;==>pause
Func Show()
	WinSetState("Vindictus", "", @SW_SHOW)
EndFunc   ;==>Show
Func Hide()
	WinSetState("Vindictus", "", @SW_HIDE)
EndFunc   ;==>Hide
Func STOP()
	Exit
EndFunc   ;==>STOP
Func inject()
	If $concheck = True Then
		Call("binds")
	Else
		MsgBox(0, "", "Please make sure PubConsole is open.")
	EndIf
EndFunc   ;==>inject
Func binds()
	ControlSend("PubConsole", "", "", 'bind "KP_INS" "god;cc_system_message GOD"')
	ControlSend("PubConsole", "", "", "{ENTER}")
	ControlSend("PubConsole", "", "", 'bind "KP_DEL" "ohk;cc_system_message OHK"')
	ControlSend("PubConsole", "", "", "{ENTER}")
	ControlSend("PubConsole", "", "", 'bind "KP_LEFTARROW" "cc_set_sub_weapon javelin_lvl2 999;cc_system_message Fine-Javelins"')
	ControlSend("PubConsole", "", "", "{ENTER}")
	ControlSend("PubConsole", "", "", 'bind "KP_END" "host_timescale 1;cc_system_message x1-Time"')
	ControlSend("PubConsole", "", "", "{ENTER}")
	ControlSend("PubConsole", "", "", 'bind "KP_HOME" "plr_play_overlay_sequence paladin_transformation_begin_1;cc_system_message Paladin1"')
	ControlSend("PubConsole", "", "", "{ENTER}")
	ControlSend("PubConsole", "", "", 'bind "RIGHTARROW" "changemap_to_next_random_sector;cc_system_message Next-Sector-Loaded"')
	ControlSend("PubConsole", "", "", "{ENTER}")
	ControlSend("PubConsole", "", "", 'bind "LEFTARROW" "changemap_to_current_random_sector;cc_system_message Sector-Reloaded"')
	ControlSend("PubConsole", "", "", "{ENTER}")
	ControlSend("PubConsole", "", "", 'bind "," "cc_change_figure_height 0.1;cc_system_message Tiny-MODE"')
	ControlSend("PubConsole", "", "", "{ENTER}")
	ControlSend("PubConsole", "", "", 'bind "KP_PGDN" "host_timescale 3;cc_system_message x3-Time"')
	ControlSend("PubConsole", "", "", "{ENTER}")
EndFunc   ;==>binds