AutoIt Do/Until Schleife bis Farbe da ist

[xFreshness]

 Spoiler

PHP Code:

; Press Esc to terminate script, Pause/Break to "pause"
Global $farbe=0
Global $Paused, $counter = 0
Global $zahler=0
HotKeySet("{PAUSE}", "TogglePause")
HotKeySet("+d", "Terminate")
HotKeySet("+!e", "ShowMessage") ;Shift-Alt-d

;;;; Body of program would go here;;;;
While 1
$farbe=0
$zahler=0
Sleep(2000)
Send("{Enter down}")
Sleep(50)
Send("{Enter up}")
Sleep(1500)
Send("{Enter down}")
Sleep(50)
Send("{Enter up}")
Sleep(1500)
Send("{Up down}")
Sleep(50)
Send("{Up up}")
Sleep(1200)
Send("{Enter down}")
Sleep(50)
Send("{Enter up}")
Sleep(1800)
Send("{Left down}")
Sleep(50)
Send("{Left up}")
Sleep(800)
Send("{Enter down}")
Sleep(50)
Send("{Enter up}")
Sleep(800)
Send("{Up down}")
Sleep(50)
Send("{Up up}")
Sleep(800)
Send("{Enter down}")
Sleep(50)
Send("{Enter up}")
Sleep(2000)
;Spielplan
Send("{Enter down}")
Sleep(50)
Send("{Enter up}")
Sleep(2000)
Send("{Enter down}")
Sleep(50)
Send("{Enter up}")
Sleep(1800)
Send("{Enter down}")
Sleep(50)
Send("{Enter up}")
Sleep(1500)
Send("{Enter down}")
Sleep(50)
Send("{Enter up}")
Sleep(1200)
Send("{Enter down}")
Sleep(50)
Send("{Enter up}")
Sleep(1200)
Send("{Enter down}")
Sleep(50)
Send("{Enter up}")
Sleep(1200)
Send("{Enter down}")
Sleep(50)
Send("{Enter up}")
Sleep(5000)
Send("{ESC down}")
Sleep(50)
Send("{ESC up}")
Sleep(100)
;SPIEL

For $i = 0 to 10 Step 1
Send("{d down}")
Sleep(5)
Send("{d up}")
send("{space down}")
sleep(5)
send("{space up}")
Next
ToolTip('vorbei"',0,0, $counter, 1)
Do
   Sleep(10)
   Send("{d down}")
   Sleep(1000)
   Send("{d up}")
   Sleep(10)
   send("{space down}")
   sleep(1000)
   send("{space up}")
   Sleep(1000)
   $farbe=PixelGetColor(976,684)
   If $farbe == 0x001E1F1E Then
   Sleep(10)
   send("{enter down}")
   Sleep(20)
   send("{enter up}")
   Sleep(120)
   ExitLoop 2
   Else
   Sleep(10)
   send("{enter down}")
   Sleep(20)
   send("{enter up}")
   Sleep(500)
   EndIf

Until $farbe==0x001E1F1E

   ToolTip('vorbei2"',0,0, $counter, 1)
   
   Sleep(1000)
   Send("{Up down}")
   Sleep(50)
   Send("{Up up}")
   Sleep(500)
   Send("{Enter down}")
   Sleep(50)
   Send("{Enter up}")
   Sleep(1500)
   Send("{Esc down}")
   Sleep(50)
   Send("{Esc up}")
   Sleep(2000)
   Send("{Esc down}")
   Sleep(50)
   Send("{Esc up}")
   Sleep(2000)
   Send("{Esc down}")
   Sleep(50)
   Send("{Esc up}")
   Sleep(1500)
   Send("{Esc down}")
   Sleep(50)
   Send("{Esc up}")
   Sleep(1500)
   Send("{Esc down}")
   Sleep(50)
   Send("{Esc up}")
   Sleep(1500)
   Send("{Esc down}")
   Sleep(50)
   Send("{Esc up}")
   Sleep(1500)
   Send("{Enter down}")
   Sleep(50)
   Send("{Enter up}")
    $counter +=1
    ToolTip('Script is "Running"',0,0, $counter, 1)
    Sleep(700)
WEnd
;;;;;;;;

Func TogglePause()
    $Paused = NOT $Paused
    While $Paused
        sleep(100)
        ToolTip('Script is "Paused"',0,0, $counter, 1)
    WEnd
    ToolTip("")
EndFunc

Func Terminate()
    Exit 0
EndFunc

Func ShowMessage()
    MsgBox(4096,"","This is a message.")
EndFunc 


Ist ein Bot, das ganze Enter Leertaste gedrücke muss so sein.

[lolkop]

um es mal sehr stark zu vereinfachen sehen deine schleifen etwa so aus:

While 1
    ...
    Do
        ...
        $farbe = PixelGetColor(976, 684)
        If $farbe = 0x1E1F1E Then ExitLoop 2 <--- Beendet dein script, da die While schleife beendet wird!
        ...
    Until $farbe = 0x1E1F1E  <-- beendet deine Do Schleife
    ...
Wend

hierrin ist ein wiederspruch in sich enthalten. das ende der Do-Schleife kann nie erreicht werden, da das script immer vorher beendet wird.

wenn das so geplant war, verwende beim nächsten mal bitte auch hier eine endlos Do-Schleife:

Do
Until 0

oder endlos while schleife

While 1
WEnd

um das ganze übersichtlicher zu halten. nicht erfüllbare abfragen sind für unbeteiligte sehr verwirrend =)

[xFreshness]

Oh stimmt, da hab ich mich wohl versehen und die If-Abfrage als Schleife gezählt. Hab es jetzt geändert und es klappt. Allerdings nicht immer! Nachdem er die gesamte Schleife einige Male durchgegangen ist, funktioniert die Farberkennung auf einmal nicht mehr.
Edit: hab einfach eine 2. Farberkennung eingebaut, wenn die erste kein Pixel der erforderlichen Farbe bringt. Dadurch hat es bis jetzt immer geklappt

Edit2: letztes Mal hatte ich wohl Glück, jetzt kommt es immer wieder vor das er die Farbe doch nicht erkennt. Keine Ahnung warum.