-Havnt tested if mouse is released in hide mode, i only use it for watching vids while botting
Code:
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