Hilfe bei einer Schleife

04/18/2011 20:28 emil#1
brauche Bitte etwas hilfe bei meiner Schleife,

und zwar geht sie bis hier her einwandfrei:

Code:
If $Goldold < $Gold Then
$Output2 = 100
_GUICtrlEdit_AppendText($EDIT1, "[" & @HOUR & ":" & @MIN & "] " & "Jippi ey jaeh Du hast gewonnen" & @CRLF)
Sleep(100)
EndIf
If $Goldold = $Gold Then
MsgBox(0, $Goldold, "Bot pausier, Du hast zu wenig Gold zum setzten", 1)
IniWrite(@ScriptDir & "\log.ini", "Spiele verloren hintereinander", "Spiel " & $I, " " & $Output2 / 100 & " Du hast nicht genügend Gold mehr zum Spielen")
TogglePause()
Sleep(100)
EndIf
If $Goldold > $Gold Then
$Output2 = $Output2 * $WERT1
_GUICtrlEdit_AppendText($EDIT1, "[" & @HOUR & ":" & @MIN & "] " & "Mist Du hast verloren" & @CRLF) 
_relog()
Sleep(100)   ; <------- bis hier her ok
			            
       <----------- er soll wenn 15 mal die Schleife " If $Goldold > $Gold Then" vorher aufgerufen wurde mir meine MsgBox anzeigen und Pause machen.
For $ii=1 to 15
MsgBox(0, $ii, "Du hast schon 15 Runden hintereinander verlorem, möchtest Du weiterspielen ? dann drücke F9 ", 1)  
TogglePause()
next
EndIf
Next
hat wer ne Idee wie man das machen könnt er macht es immer nach kurzen Versuche und nicht wie gewünscht nur wenn er 15 mal verloren hat.
Danke

ich habs auch schon mit If $ii = 15 Then probiert will er auch nicht :-(

mfg
04/18/2011 21:07 omer36#2
so?

PHP Code:
Global $checker = 0

If $Goldold < $Gold Then
$Output2 = 100
_GUICtrlEdit_AppendText($EDIT1, "[" & @HOUR & ":" & @MIN & "] " & "Jippi ey jaeh Du hast gewonnen" & @CRLF)
Sleep(100)
EndIf

If $Goldold = $Gold Then
MsgBox(0, $Goldold, "Bot pausier, Du hast zu wenig Gold zum setzten", 1)
IniWrite(@ScriptDir & "\log.ini", "Spiele verloren hintereinander", "Spiel " & $I, " " & $Output2 / 100 & " Du hast nicht genügend Gold mehr zum Spielen")
TogglePause()
Sleep(100)
EndIf

If $Goldold > $Gold Then
    if $checker = 15 Then
        MsgBox("","","insgesammt 15 mal verloren")
        TogglePause()
    EndIf
$Output2 = $Output2 * $WERT1
_GUICtrlEdit_AppendText($EDIT1, "[" & @HOUR & ":" & @MIN & "] " & "Mist Du hast verloren" & @CRLF)
$checker += 1
Sleep(100)
_relog()
EndIf
Next 
04/18/2011 21:11 BlackHybrid#3
Wie wäre es wenn du noch eine Variable setzt, der immer +1 addiert wird und unten dann If $Verloren = 15.
Edit: Arrg zu spät :P
04/18/2011 22:16 emil#4
Hiho und Danke für die Hilfe aber er nacht da nix, nach der verlorenen anzahl.

Er entscheidet oben mit If $Goldold > $Gold Then ob er im Spiel gewonnen hat oder verloren oder ob der Betrag von sein Gold noch gleich ist. bei = ist der Serverdown und er Pausiert auch. Wenn er verliert dann Multipliziert er den Startwert und soll nun noch eine Warnung ausgeben zb. nach 15 mal das man schon so viel hinternander verloren hat weil die Goldbeträge in 100.000 - ner Million dann gehen und man somit entscheiden kann weiter zu Spielen und Pleite zu gehen oder abzubrechen. ^^

also oben das muss so weiter Funktionieren :

If $Goldold > $Gold Then
$Output2 = $Output2 * $WERT1
_GUICtrlEdit_AppendText($EDIT1, "[" & @HOUR & ":" & @MIN & "] " & "Mist Du hast verloren" & @CRLF)
_relog()
Sleep(100)

damit er richtig entscheidet ob er gewonnen hat oder nicht, danach bräuchte ich halt die meldung das er schon 15 oder x mal verloren hat.

Vielleicht sollte ich noch dazu schreiben das er nicht alle verlorenen Spiele zählen soll sondern nur die hintereinander an einen Stück verloren werden, der rest ist ja egal wenn er gewinnt fängt er mit ausgangswert wieder an.

vielleicht sollte ich mal die komplette Schleife posten:

PHP Code:
While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
        Case $Button1
            _start()
            Global $Output2 = 100
            For $I = 1 To 999999
                IniWrite(@ScriptDir & "\SFGold.ini", "Vermögen", "Goldold ", $Gold)
                Sleep(100)
                _schalter()
                _Spiel()
                Sleep(100)
                _relog()
                $Goldold = IniRead(@ScriptDir & "\SFGold.ini", "Vermögen", "Goldold ", "")
                Sleep(100)
                ToolTip("Gold vorher hattes Du: " & $Goldold / 100 & @CRLF & "aktuelles Gold hast Du: " & $Gold / 100 & @CRLF & "gesetzt in dieser Runde: " & $Output2 / 100, 25, 25)
                If $Goldold < $Gold Then
$Output2 = 100
_GUICtrlEdit_AppendText($EDIT1, "[" & @HOUR & ":" & @MIN & "] " & "Jippi ey jaeh Du hast gewonnen" & @CRLF)
Sleep(100)
EndIf

If $Goldold = $Gold Then
MsgBox(0, $Goldold, "Bot pausier, Du hast zu wenig Gold zum setzten", 1)
IniWrite(@ScriptDir & "\log.ini", "Spiele verloren hintereinander", "Spiel " & $I, " " & $Output2 / 100 & " Du hast nicht genügend Gold mehr zum Spielen")
TogglePause()
Sleep(100)
EndIf

If $Goldold > $Gold Then
    if $checker = 3 Then
        MsgBox("","","insgesammt 15 mal verloren")
        TogglePause()
    EndIf
$Output2 = $Output2 * $WERT1
_GUICtrlEdit_AppendText($EDIT1, "[" & @HOUR & ":" & @MIN & "] " & "Mist Du hast verloren" & @CRLF)
$checker += 1
Sleep(100)
_relog()
EndIf
Next

        Case $Button2
            TERMINATE()
            Exit
        Case $Button3
            Speichern()
            MsgBox(0, "", "Speichern war erfolgreich, Bot neu starten Bitte", 1)
            Sleep(200)
            Exit
    EndSwitch
WEnd 
mfg
04/19/2011 13:47 omer36#5
nja dann musst du einfach in dem bereich wo er gewinnt sprich: $Goldold < $Gold am ende den wert in $checker auf 0 setzen...

dann noch unter $Goldold > $Gold eine msgbox in der steht wie oft du schon hintereinander verloren hast als kleine info...


was soll er bei $Goldold = $Gold machen? wenn das auch als "win" zählt, setz den wert $checker da auch noch auf 0....


zb so:

PHP Code:


Global $checker = 0

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
        Case $Button1
            _start()
            Global $Output2 = 100
            For $I = 1 To 999999
                IniWrite(@ScriptDir & "\SFGold.ini", "Vermögen", "Goldold ", $Gold)
                Sleep(100)
                _schalter()
                _Spiel()
                Sleep(100)
                _relog()
                $Goldold = IniRead(@ScriptDir & "\SFGold.ini", "Vermögen", "Goldold ", "")
                Sleep(100)
                ToolTip("Gold vorher hattes Du: " & $Goldold / 100 & @CRLF & "aktuelles Gold hast Du: " & $Gold / 100 & @CRLF & "gesetzt in dieser Runde: " & $Output2 / 100, 25, 25)
                If $Goldold < $Gold Then
                    $Output2 = 100
                    _GUICtrlEdit_AppendText($EDIT1, "[" & @HOUR & ":" & @MIN & "] " & "Jippi ey jaeh Du hast gewonnen" & @CRLF)
                    Sleep(100)
                    $checker = 0
                EndIf

                If $Goldold = $Gold Then
                    MsgBox(0, $Goldold, "Bot pausier, Du hast zu wenig Gold zum setzten", 1)
                    IniWrite(@ScriptDir & "\log.ini", "Spiele verloren hintereinander", "Spiel " & $I, " " & $Output2 / 100 & " Du hast nicht genügend Gold mehr zum Spielen")
                    TogglePause()
                    Sleep(100)
                EndIf

                If $Goldold > $Gold Then
                    $Output2 = $Output2 * $WERT1
                    _GUICtrlEdit_AppendText($EDIT1, "[" & @HOUR & ":" & @MIN & "] " & "Mist Du hast verloren" & @CRLF)
                    $checker += 1
                    If $checker > 1 Then MsgBox("","","Du hast schon " & $checker & " mal hintereinander verloren")
                    Sleep(100)
                        If $checker = 3 Then
                            MsgBox("", "", "insgesammt 15 mal verloren")
                            TogglePause()
                        EndIf
                    _relog()
                EndIf
            Next

        Case $Button2
            TERMINATE()
            Exit
        Case $Button3
            Speichern()
            MsgBox(0, "", "Speichern war erfolgreich, Bot neu starten Bitte", 1)
            Sleep(200)
            Exit
    EndSwitch
WEnd 
04/19/2011 14:41 xShizoidx#6
omer36 kannst du mir vielt auch kurz helfen?

Ich brauche eine Schleife, damit mein Bot etwas ca.200 mal ausführt. Ich verstehe es bei den Tutorials nicht, da ich nicht weiß, wie ich die Anzahl änder, wie oft er es ausführen soll und wo ich den Code von mir eintragen soll.

Danke im voraus. ;)
04/19/2011 15:44 Imaginär#7
Quote:
Originally Posted by netterwurm8 View Post
omer36 kannst du mir vielt auch kurz helfen?

Ich brauche eine Schleife, damit mein Bot etwas ca.200 mal ausführt. Ich verstehe es bei den Tutorials nicht, da ich nicht weiß, wie ich die Anzahl änder, wie oft er es ausführen soll und wo ich den Code von mir eintragen soll.

Danke im voraus. ;)
Benutz einfach eine For-Schleife.

Code:
For $i = 1 To 200 Step 1
MsgBox(0,0,0)
Next
04/19/2011 15:59 emil#8
Danke Omer 36 teste ich heut abend :-)


mfg
04/19/2011 16:20 xShizoidx#9
Quote:
Originally Posted by _DownTime View Post
Benutz einfach eine For-Schleife.

Code:
For $i = 1 To 200 Step 1
MsgBox(0,0,0)
Next
Wo soll nun mein Code rein, der 200x ausgeführt werden soll? Davor , danach oder dazwischen?

Danke im voraus.
04/19/2011 16:24 omer36#10
Quote:
Originally Posted by netterwurm8 View Post
Wo soll nun mein Code rein, der 200x ausgeführt werden soll? Davor , danach oder dazwischen?

Danke im voraus.
PHP Code:
For $i = 1 To 200 Step 1
;
;alles was hier drinne ist, wird 200mal ausgeführt
;
Next 
.....
04/21/2011 20:45 emil#11
Danke nochmal Omer 36 hat Prima hingehaun.

Thraed kann geschlossen werden