AutoIT Scripts (Queen and Blood Lord)

AutoIT Scripts (Weeping Queen and Blood Lord Farm)

So I got bored and decided to hand out my AutoIT scripts for Weeping Queen and Blood Lord, enjoy!
(if you run into any issues (mainly because I haven't had anyone else test these for me) PM me so I can see what's wrong)
My reason for making these scripts was to farm gold and AP (Especially from Blood Lord)

My resolution: 1600x900 (fullscreen)
Different Resolution Note: If you are using a different resolution and the mouse coordinates I used DON'T work for you (again to lazy/didn't have anyone else test run these), then either manually adjust them or use AU3Recorder in SciTE (SciTE can be found: here).

1. Open/Create a blank script,
2. Click Tools>AU3Recorder,
3. Start recording, click where the START and REPLAY (Where it shows Money/EXP/AP) would be, stop recording and replace my coords with whatever you got.

--------------------------
--Prerequisites
-You WILL require "Paper Mobs HFS Mod."
-Will need binds for HostTimescale, Skiplevel, & Spears (any).
-AutoIT (Google it) and SciTE (SciTE can be found: here) to Edit and Build the scripts.
--------------------------

Note: My scripts come with Hotkeys to Pause (z) and Start (x) the script.
In other words you have to press "x" to START the script and you can toggle pause on and off by pressing "z".
You can change these hotkeys by changing them in lines 2 and 3 of the script.

ALSO; The SLeep timings may have to be adjusted depending on how fast your computer loads maps.

--------------------------

1.) Weeping Queen Script
a.) This script uses "host_timescale 3" and "cc_set_sub_weapon (anyspears)"
b.) Change line #17 to your (hosttimescale) bind.
c.) Change line #19 to your (spears) bind.

Code:

Global $Paused
HotKeySet("{z}", "TogglePause")
HotKeySet("{x}", "Test")

; Ignore;
While 1
	WinWaitActive("Vindictus","")
WEnd
;;

; Will infinitly spam Weeping Queen (Until you stop it or some other unexpected error occurs such as lag D:) ;
Func Test()
	While 1
		Sleep(1000)
		MouseClick("left",89,756,1) ; Clicks START to launch mission
		Sleep(500)
		Send("{NUMPADDIV}") ; Set this to whatever you bound "host_timescale 3" to. Must be 3 unless you readjust the sleep times.
		Sleep(18000)
		Send("{NUMPAD7}") ; Set this to whatever you bound any sort of Spears to.
		Sleep(500)
		Send("{f}") ; Activates the aimmer
		Sleep(500)
		Send("{e}") ; Autolocks to Weeping Queen
		Sleep(70000)
		MouseClick("left",205,709,1) ; Will click REPLAY on the box showing Earnings/EXP/AP.
		Sleep(10000)
    WEnd
EndFunc
;;

Func TogglePause()
    $Paused = NOT $Paused
    While $Paused
        sleep(100)
        ToolTip('Script is PAUSED, press "z" to UNPAUSE',0,0)
    WEnd
    ToolTip("")
EndFunc

--------------------------

2.) Blood Lord Script
a.) This script uses "host_timescale 3" and "changelevel 2"
b.) Change line #17 and #20 to your (hosttimescale) bind.
c.) Change line #19 to your (skiplevel) bind.

Note: Some issues I run into is either lag causing the timings to become unsynched and staying stuck in mission until I manually reset it or with my character missing the Blood Lord while Kicking and the same issue occurring.

This script also (usually) works going in without weapons since it spams kick long enough to reach the Blood Lord (again, usually)

Code:

Global $Paused
HotKeySet("{z}", "TogglePause")
HotKeySet("{x}", "Blood")

; Ignore;
While 1
	WinWaitActive("Vindictus","")
WEnd
;;

; Will infinitly spam Blood Lord (Until you stop it or some other unexpected error occurs such as lag D:) ;
Func Blood()
	While 1
		Sleep(1000)
		MouseClick("left",89,756,1) ; Clicks START to launch mission
		Sleep(500)
		Send("{NUMPADDIV}") ; Set this to whatever you bound "host_timescale 3" to. Must be 3 unless you readjust the sleep times.
		Sleep(10000)
		Send("{NUMPAD9}") ;Set this to whatever you have you Skip Level command bound to.
		Send("{NUMPADDIV}") ; Set this to whatever you bound "host_timescale 3" to. Must be 3 unless you readjust the sleep times.
		Sleep(5000)
		Send("{w down}") ; Will move forward for two (2) seconds to trigger cutscene. YOU MUST BE @ TIMES 3 SPEED (If not adjust the SLeep times)
		Sleep(2000)
		Send("{w up}")
		Sleep(6700)
		Send("{w down}{d}{d}{d}{d}{d}") ; Will move forward and start kicking slightly before arriving to the Blood Lord.
		Sleep(1300)
		Send("{r}")
		Sleep(500)
		Send("{r}")
		Sleep(500)
		Send("{r}")
		Sleep(500)
		Send("{r}")
		Sleep(500)
		Send("{r}")
		Sleep(500)
		Send("{r}")
		Sleep(500)
		Send("{r}")
		Sleep(500)
		Send("{r}")
		Sleep(500)
		Send("{r}")
		Sleep(500)
		Send("{r}")
		Sleep(500)
		Send("{r}")
		Sleep(500)
		Send("{r}")
		Sleep(500)
		Send("{w up}")
		Sleep(62100) ; This is the time it takes until the Mission Successful menu shows up.
		MouseClick("left",205,709,1) ; Will click REPLAY on the box showing Earnings/EXP/AP.
		Sleep(10000)
    WEnd
EndFunc
;;

Func TogglePause()
    $Paused = NOT $Paused
    While $Paused
        sleep(100)
        ToolTip('Script is PAUSED, press "z" to UNPAUSE',0,0)
    WEnd
    ToolTip("")
EndFunc

QQNote: I had to retype all of this 2 times since MPGH was having 408 errors. Dx

Opinions/better alternatives for codes that I'm using would be greatly appreciated. Made these 2 in about 20-30 minutes (each) and I have basic knowledge with this program.

Improved the Blood Lord script for abit.

Code:

Global $Pause
HotKeySet("{F5}", "Pause")
HotKeySet("{F6}", "bloodLord")

While 1
	WinWaitActive("Vindictus","")
WEnd

Func bloodLord()
	While 1
		Send("{esc}") ;// Enables mouse mode
		Sleep(1000)
		MouseClick("left",106,631,1) ; Clicks START to launch mission
		Sleep(500)
		Send("{F1}") ; Set this to whatever you bound "host_timescale 3" to. Must be 3 unless you readjust the sleep times.
		Sleep(10000)
		Send("{F2}") ; Set this to whatever you have you Skip Level command bound to.
		Sleep(7000)
		Send("{F3}") ;// Set this to whatever Spawns Spears command is bound to.
		Send("{F1}") ; Set this to whatever you bound "host_timescale 3" to. Must be 3 unless you readjust the sleep times.
		Send("{w down}") ; Will move forward for two (2) seconds to trigger cutscene. YOU MUST BE @ TIMES 3 SPEED (If not adjust the SLeep times)
		Sleep(2000)
		Send("{w up}")
		Sleep(7000)

		$i = 0
		While $i < 5
			Send("{f}") ;// Throws spears for approx. 5 (about Blood Lord's spawn stuck time.)
			$i = $i + 1
			Sleep(400)
		WEnd

		Sleep(63000) ; This is the time it takes until the Mission Successful menu shows up.
		MouseClick("left",197,708,1) ; Will click REPLAY on the box showing Earnings/EXP/AP.
		Sleep(15000)
	WEnd
EndFunc

Func Pause()
	$Pause = NOT $Pause
	While $Pause
		sleep(100)
		ToolTip('Script is PAUSED, press F5 to UNPAUSE',0,0)
	WEnd
	ToolTip("")
EndFunc

AutoIT Scripts (Queen and Blood Lord)

Post a Reply

Tags for this Thread