elite*gold: 0
Join Date: Jul 2010
Posts: 28
Received Thanks: 11
|
Okay I think that script is for Autohotkey, so if you download Autohotkey, and when you install it, it will come up with a script, replace those words with THIS (vandbnc's script):
Quote:
Global $UnPaused
Global $MousePos
HotKeySet("{F1}", "MousePosition")
HotKeySet("{F2}", "Kamikaze")
HotKeySet("{F3}", "Repair")
HotKeySet("{F4}", "Pause")
HotKeySet("{ESC}", "Terminate")
While 1
SplashTextOn("","Step #1: Press F1 to setup your PET for Kamikaze Mode!", 450, 35, -1, 0, 1, "", 9, 900)
Sleep(10000)
SplashOff()
WEnd
Func MousePosition()
$UnPaused = NOT $UnPaused
While $UnPaused
SplashTextOn("","Step #2: Hold your mouse pointer over the repair/activate PET10 button. A countdown will start shortly!", 700, 35, -1, 0, 1, "", 9, 900)
sleep(10000)
SplashOff()
SplashTextOn("","Waiting: 5", 90, 35, -1, 20, 1, "", 9, 900)
sleep(1000)
SplashOff()
SplashTextOn("","Waiting: 4", 90, 35, -1, 20, 1, "", 9, 900)
sleep(1000)
SplashOff()
SplashTextOn("","Waiting: 3", 90, 35, -1, 20, 1, "", 9, 900)
sleep(1000)
SplashOff()
SplashTextOn("","Waiting: 2", 90, 35, -1, 20, 1, "", 9, 900)
sleep(1000)
SplashOff()
SplashTextOn("","Waiting: 1", 90, 35, -1, 20, 1, "", 9, 900)
sleep(900)
SplashOff()
$MousePos = MouseGetPos()
SplashTextOn("","Step #3: Saving PET repair/activate button coordinates.", 400, 35, -1, 0, 1, "", 9, 900)
sleep(5000)
Send("{F2}")
WEnd
$UnPaused = $UnPaused
EndFunc
Func Kamikaze()
While 1
SplashTextOn("","BANZAI !!!", 90, 35, -1, 0, 1, "", 9, 900)
$pos = MouseGetPos()
$posx = ($MousePos[0] + 180)
$posy = ($MousePos[1] + 92)
$posz = ($MousePos[1] + 3)
MouseClick("left", $MousePos[0] , $MousePos[1], 1, 0)
sleep(500)
MouseClick("left", $posx , $posz, 1, 0)
sleep(500)
MouseClick("left", $posx , $posy, 1, 0)
sleep(500)
MouseClick("left", $pos[0] , $pos[1], 1, 0)
Sleep(500 + Random(100, 300))
SplashOff()
Send("{F4}")
WEnd
EndFunc
Func Pause()
While 1
$text = '[F2] - activate PET; ' & @CR & '[F3] - repair PET; ' & @CR & '[ESC] - Exit Program.'
SplashTextOn("", $text, 150, 65, -1, 0, 1, "", 9, 400)
Sleep(100)
WEnd
EndFunc
Func Repair()
While 1
$pos = MouseGetPos()
MouseClick("left", $MousePos[0] , $MousePos[1], 1, 0)
MouseClick("left", $pos[0] , $pos[1], 1, 0)
Send("{F4}")
WEnd
EndFunc
Func Terminate()
Exit 0
EndFunc
|
Then you reload the script and just use the hotkeys.
("{F1}", "MousePosition")
("{F2}", "Kamikaze")
("{F3}", "Repair")
("{F4}", "Pause")
("{ESC}", "Terminate")
|