Guten Abend user's
Ich versuche für das browsergame Arenasofglory.de ehmalig gladiatoren2.de
ein Bot zu erstellen.
Er sollte kisten aufschlagen den inhalt einsammeln, falls ein feind kommt durch loch rennen.
Das wären die einzigsten sachen aber ich komme einfach nicht damit hin.
Da ich erst seit heute versuche zu coden mit autoit.
Bitte kann mir einer dabei helfen vieleicht auch sein bot hochladen falls er oder sie es schaft.
und dann noch imagesearch
Ich versuche für das browsergame Arenasofglory.de ehmalig gladiatoren2.de
ein Bot zu erstellen.
Er sollte kisten aufschlagen den inhalt einsammeln, falls ein feind kommt durch loch rennen.
Das wären die einzigsten sachen aber ich komme einfach nicht damit hin.
Da ich erst seit heute versuche zu coden mit autoit.
Bitte kann mir einer dabei helfen vieleicht auch sein bot hochladen falls er oder sie es schaft.
PHP Code:
#include <ImageSearch.au3> ; ImageSearch-UDF brauchst du
HotKeySet("!a", "_Go"); Mit Alt+a startest du
Global $timer, $x, $y ; Müssen deklariert werden
Func _Go()
While 1
_Set0() ; Timer starten
Do
$var = _ImageSearch(@ScriptDir & "/Data/Kiste_dunkel.bmp", 1, $x, $y, 15) ; Suche nach Kiste 1 (Bild ist 6 Pixel groß
$var = _ImageSearch(@ScriptDir & "/Data/Kiste_hell.bmp", 1, $x, $y, 15) ; Kiste 2 (Mach n Screenshot und schneide 6 Pixel aus und mach daraus ne kleine .bmp!)
Until $x <> 0 And $y <> 0 Or TimerDiff($timer) > 15000 ; Wenn Kiste gefunden oder 15 Sekunden verstrichen sind, beendet sich die Suche
If $x <> 0 And $y <> 0 Then ; Wenn Kiste gefunden...
MouseClick("left", $x, $y) ; ..., wird da hin geklickt, Char läuft los
Sleep(10000) ; 10 Sekunden warten(Lautzeit)
_Set0() ; Timer auf 0 setzen
Do
Send("{LCTRL}", 0) ; Immer wieder Strg klicken, bis...
Until $timer >= 10000; ... 10 Sekunden abgelaufen sind... Hatte Probleme mit {CTRLDOWN}...
EndIf
WEnd
EndFunc ;==>_Go
Func _Set0()
$timer = TimerInit()
$x = 0
$y = 0
EndFunc ;==>_Set0
While 1
Sleep(10)
WEnd
PHP Code:
#include <ImageSearch.au3>
$x1=0
$y1=0
$result = _ImageSearch("recycle.bmp",1,$x1,$y1,0)
if $result=1 Then
MouseMove($x1,$y1,3)
MsgBox(0,"Found","Found a recycle bin with stuff here...")
EndIf