Ihr kennt euch mit autoit aus ich nicht so ganz was ist an diesem script falsch
Global $Gegner ;Muss global deklariert werden, weil wir die variable ja in mehreren verschiedenen Funktionen nutzten wollen...
While 1
Gegner_suchen()
WEnd
Func Gegner_suchen()
;Ein Roter Pixel (also der Gegner) wird auf dem gesamten Bildschirm gesucht...
$Gegner = PixelSearch(0, 0, @DesktopWidth, @DesktopHeight, 0xB29452)
;Wenn kein Fehler aufgetreten ist, d.h. was gefunden wurde soll...
EndFunc
Func Gegner_Killen()
;Die Maus wird an die im Pixelsearch gefundene Position bewegt mit der Geschwindigkeit 1 (1 = Schnellste, 100 = Langsamste)
MouseMove($Gegner[0], $Gegner[1], 1)
;Dann soll der Gegner anvisiert werden, also einen Mausklick
MouseClick( "Left" )
;Dann soll eine Taste gedrückt werden...
Send( "{1}" )
while 1
;Farbe bekommen
$Gegnerleiste = PixelGetColor( 519, 55)
;In Hex umwandeln und überpüfen
IF Hex($Gegnerleiste, 6) = "16190D" Then
;Das heißt er soll weiter angreifen, also senden wir ne taste
Send( "{1}" )
Else
;Da wir ja nicht wollen das die whileschleife unendlich lange so weiter macht... benutzen wir exitloop um sie zu unterbechen...
ExitLoop
EndIf
;Ende der whileschleife
wend
EndFunc
Oder kann mir jemand nen beispiel für so nen mini bot geben ???
wäre sehr nett
Global $Gegner ;Muss global deklariert werden, weil wir die variable ja in mehreren verschiedenen Funktionen nutzten wollen...
While 1
Gegner_suchen()
WEnd
Func Gegner_suchen()
;Ein Roter Pixel (also der Gegner) wird auf dem gesamten Bildschirm gesucht...
$Gegner = PixelSearch(0, 0, @DesktopWidth, @DesktopHeight, 0xB29452)
;Wenn kein Fehler aufgetreten ist, d.h. was gefunden wurde soll...
EndFunc
Func Gegner_Killen()
;Die Maus wird an die im Pixelsearch gefundene Position bewegt mit der Geschwindigkeit 1 (1 = Schnellste, 100 = Langsamste)
MouseMove($Gegner[0], $Gegner[1], 1)
;Dann soll der Gegner anvisiert werden, also einen Mausklick
MouseClick( "Left" )
;Dann soll eine Taste gedrückt werden...
Send( "{1}" )
while 1
;Farbe bekommen
$Gegnerleiste = PixelGetColor( 519, 55)
;In Hex umwandeln und überpüfen
IF Hex($Gegnerleiste, 6) = "16190D" Then
;Das heißt er soll weiter angreifen, also senden wir ne taste
Send( "{1}" )
Else
;Da wir ja nicht wollen das die whileschleife unendlich lange so weiter macht... benutzen wir exitloop um sie zu unterbechen...
ExitLoop
EndIf
;Ende der whileschleife
wend
EndFunc
Oder kann mir jemand nen beispiel für so nen mini bot geben ???
wäre sehr nett