BetaReqLanda001

#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
----------------------------
[Only registered and activated users can see links. Click Here To Register...]

?

not sure why you posted this...do you need help with it? Is it a release?
anyways, have a look at some of these opt functions in the help file.

Opt(option, parameter)


There are alot of useful ones for this script :)
I will release mine soon but my searching function keeps failing :P

no..that will be a bot...this is the first script..untested and just theoretical. .. i hope i can make it full working this weekend... and i post it here, so some people can give e some ideas or some improvements..

THIS IS JUST ALPHA... NOT WORKING YET. ^^

My bot. It works, but really stupid :D
Pre-requisites:

full-screen 1024x768x32
gamma set to min (in-game settings, not monitor ;) )
camera set to vertical view from top (strategy-like)

All comments and log messages are in russian, cause I'm russian :D

[Only registered and activated users can see links. Click Here To Register...]
text-only, not *.exe

updated

How could I get either of these bots working? The script one looks like I need to put it in notepad or something but Its not ready yet. The scond one from botovod666 is in a weird format. What prog do I need to run it? Srry for the new kid questions

its autoit sourcecode..u have to compile it or use download link

Autoit is just one of many simple-macro scripting programs out there. When you make a script like landas ^ you can get it to send the keystrokes to the game..and if its good enugh, control your character :)
[Only registered and activated users can see links. Click Here To Register...]
the .au3 formt is the editing format, and when you compile it in autoit, it makes a .exe which anyone can run.
Mailman's Bypass is esential to this though otherwise hackshield detects it and crashes the game :/

BTW landa, can you please put in a description next to your 'pixel...' fuctions? it helps to see what pixels you are looking for.

Thank you for the help.

Lets say I want to have autoit spam the keys F,2,q and 3 over and over again. What would the text file need to look like for auto it to convert it to a working exe?

Quote:

Originally Posted by bartukus Lets say I want to have autoit spam the keys F,2,q and 3 over and over again. What would the text file need to look like for auto it to convert it to a working exe?

It would be something like

While 1
send("{F}")
sleep(however long you want the pause)
send("{2}")
sleep(however long you want the pause)
send("{Q}")
sleep(however long you want the pause)
send("{3}")
sleep(however long you want the pause)
EndW

Stick that into AutoIt and it should work after you stick in the pauses.
If you skill casting, you want the pause to be at least .5-1sec each. Also you need to account for Requiem lagging sometimes, which means skills won't always be cast.

#include <misc.au3>
Opt("SendKeyDelay", 150)
Opt("SendKeyDownDelay", 100)
WinWaitActive("Requiem")
Sleep(1000)
Tooltip("Press ESC to exit",0,0)
Do
Send("{Tab}")
Send("{f}")
Send("{2}")
Send("{q}")
Send("{3}")
Until _ispressed("1B") ; if Esc is pressed it will end.

Exit 0

Wow, I guess ill have to give it a try then :D

Cool, it works beutifully. I had to edit a few things that you mapped Jatacid, like the tab key and the requiem file having to be open, to test it in notepad. Sure enough I am spammin my keys like crazy... now I just have to wait until they release the next HS workaround.