#include <GUIConstants.au3>
#include <GUIListBox.au3>
#include <Misc.au3>
#include <Array.au3>
$Form1_1 = GUICreate("BetaReqLanda002", 400, 200, 678, 199)
GUISetIcon("C:\136.ico")
$Start = GUICtrlCreateButton("Start", 190, 130, 91, 25, 0)
GUICtrlCreateLabel("Keysettings", 20, 5, 120)
GUICtrlCreateLabel("1-5 AttackSkills", 20, 30, 120)
GUICtrlCreateLabel("6 Hp Recovery", 20, 50, 120)
GUICtrlCreateLabel("BlahBlah", 20, 70, 120)
GUICtrlCreateLabel("BlahBlah", 20, 90, 120)
GUICtrlCreateLabel("BlahBlah", 20, 110, 120)
GUICtrlCreateLabel("THX to Jatacid", 20, 130, 120)
GUICtrlCreateLabel("THX to Mailman3", 20, 150, 120)
GUICtrlCreateLabel("THX to all who release stuff. ^^", 20, 170, 120)
GUICtrlCreateLabel("www.elitepvpers.com", 200, 5, 140)
GUICtrlCreateLabel("Run Requiem in WINDOWED MODE", 200, 30, 140)
GUICtrlCreateLabel("Resolution: 1680x1050", 200, 45, 140)
GUICtrlCreateLabel("ALt+STRG+X Stop Bot", 200, 70, 140)
GUICtrlCreateLabel("BlahBlah", 200, 100, 140)
GUICtrlCreateLabel("www.YOUTUBE.com/MarcLanda1981", 200, 170, 200)
GUISetState(@SW_SHOW)
Global $Paused
hotkeyset("^!x", "MeinExit")
HotKeySet("{PAUSE}", "TogglePause")
Func Load()
EndFunc
Func Start()
Do
ToolTip("Start")
WinMove("Requiem","",0,0)
sleep(1000)
WinActivate("Requiem")
$Health80 = PixelGetColor(895,953)
$greenPL = 2726951
$Mana = PixelGetColor(829,967)
$bluePL = 1189523
$VictimCircleBlue = PixelSearch(693, 0, 960, 950,253,10)
$VictimCircleRed = PixelSearch(93, 0, 960, 950,16384000,10)
If $Health80 = $greenPL Then
$VictimCircleBlue = PixelSearch(693, 0, 960, 950,253,10)
If $VictimCircleBlue = True Then
ToolTip("Let the bodies hit the floor !")
Send("{1}")
sleep(200)
Send("{2}")
sleep(200)
Send("{3}")
sleep(200)
Send("{4}")
sleep(200)
Send("{5}")
sleep(200)
$VictimCircleBlue = PixelSearch(693, 0, 960, 950,253,10)
$Health80 = PixelGetColor(895,953)
Else
ToolTip("Target out of sight!")
Send("{a 20}")
$VictimCircleBlue = PixelSearch(693, 0, 960, 950,253,10)
$Health80 = PixelGetColor(895,953)
EndIf
Else
ToolTip("Hp low! ")
Sleep(200)
Send("{6}")
$Health80 = PixelGetColor(895,953)
$VictimCircleBlue = PixelSearch(693, 0, 960, 950,253,10)
EndIf
Until _IsPressed("7A")
EndFunc
Load()
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $Start
Start()
EndSwitch
WEnd
Func MeinExit()
Exit
Endfunc
Func TogglePause()
$Paused = NOT $Paused
While $Paused
sleep(100)
WEnd
EndFunc
----------------------------
Download
----------------------------