|
You last visited: Today at 16:41
Advertisement
script problem mit for - next schleifen
Discussion on script problem mit for - next schleifen within the AutoIt forum part of the Coders Den category.
09/30/2011, 20:45
|
#1
|
elite*gold: 0
Join Date: Nov 2008
Posts: 291
Received Thanks: 41
|
script problem mit for - next schleifen
hi,
wie schon im titel beschrieben wollte ich dich um hilfe bitten
ich will die loop neustarten wenn die bestimmte farbe an der stelle eintritt wär nett wenn ihr mir helfen könntet
die Fehlermeldung lautet
func missi()
Error:"For" statement has no matching "Next" statement
Code:
For $i=1 to $wieoft
func Missi ()
sleep (5000)
mouseclick ("left",840,600,1,50) ;--------klick station
sleep (300)
mouseclick ("left",844,664,1,70) ;-------missi klick
sleep (70)
mouseclick ("left",895,458,1,50) ;--------21er missi wahl
sleep (70)
mouseclick ("left",1038,443,1,70) ;--------Flotte aussuchen
sleep (90) ;-------------------------Tanken Beginn
mouseclick ("left",928,783,1,70) ;----Gruene kanne
sleep (90)
mouseclick ("left",686,398,1,40) ;----alle tanken
sleep (70)
mouseclick ("left",1044,400,1,70) ;----Bestaetigen
sleep (70) ;--------------------------Tanken ende
mouseclick ("left",1038,443,1,70) ;--------Flotte aussuchen
sleep (70)
mouseclick ("left",660,481,1,40) ;--------kapi 1
sleep (30)
mouseclick ("left",863,488,1,40) ;--------kapi 2
sleep (30)
mouseclick ("left",1030,486,1,40) ;--------kapi 3
sleep (30)
mouseclick ("left",672,598,1,40) ;--------kapi 4
sleep (30)
mouseclick ("left",858,598,1,40) ;--------kapi 5
sleep (30)
mouseclick ("left",1042,601,1,40) ;--------kapi 6
sleep (30)
mouseclick ("left",690,704,1,40) ;--------kapi 7
sleep (30)
mouseclick ("left",841,697,1,40) ;--------kapi 8
sleep (30)
mouseclick ("left",1047,699,1,40) ;--------kapi 9
sleep (30)
mouseclick ("left",932,838,1,40) ;--------seite wechseln
sleep (30)
mouseclick ("left",675,490,1,40) ;--------kapi 10
sleep (30)
mouseclick ("left",674,593,1,40) ;--------kapi 11
sleep (30)
mouseclick ("left",854,492,1,40) ;--------kapi 12
sleep (30)
mouseclick ("left",1044,500,1,40) ;--------kapi 13
sleep (70)
mouseclick ("left",1090,782,1,70) ;--------flotte bestaetigen
sleep (90)
mouseclick ("left",1043,398,1,70) ;--------auf gehts ab gehts
while 1
if PixelGetColor(628,438) = 0x562602 Then
Next
Else
sleep(20000)
EndIf
WEnd
EndFunc
Next
|
|
|
09/30/2011, 21:02
|
#2
|
elite*gold: 0
Join Date: Mar 2009
Posts: 2,317
Received Thanks: 1,255
|
Do
sleep(20000)
Until PixelGetColor(628,438) = 0x562602
?
€wobei, gibt pixelgetcoler nen hex-wert raus? musst mal in der hilfe nachschauen, eventuell musst du die 0x weg machen
|
|
|
09/30/2011, 21:11
|
#3
|
elite*gold: 0
Join Date: Nov 2008
Posts: 291
Received Thanks: 41
|
kommt immernoch die selbe meldung irgentwie erkennt der das next nich an
ok habs gelöst das for und next hab ich in die func gepackt jetzt is aber irgwie das fenster mit den inputboxen etc. schließt sich sofort
|
|
|
09/30/2011, 21:13
|
#4
|
elite*gold: 0
Join Date: Mar 2009
Posts: 2,317
Received Thanks: 1,255
|
aus:
while 1
if PixelGetColor(628,438) = 0x562602 Then
Next
Else
sleep(20000)
EndIf
WEnd
wird:
Do
sleep(20000)
Until PixelGetColor(628,438) = 0x562602
wenn ich das richtig verstanden habe
bzw nimm einen kleineren sleep wert..
|
|
|
09/30/2011, 21:18
|
#5
|
elite*gold: 0
Join Date: Nov 2008
Posts: 291
Received Thanks: 41
|
ja mein problem is die gui schließt sich immer
|
|
|
10/02/2011, 16:08
|
#6
|
elite*gold: 0
Join Date: Oct 2010
Posts: 51
Received Thanks: 12
|
evtl hilft dir ja ExitLoop weiter, aber wird denn die Funktion in der For schleife überhaupt aufgerufen?
Ich denke eine Funktion muss man erst aufrufen, was du ja garnicht tust? In deinem Code steht jetzendlich doch:
Code:
For $i = 1 to $wieoft
Funktionsdeklarierung (was wie ich dachte garnicht in einer Schleife geht)
Next
bedeutet doch dass er $wieoft-mal nichts macht, oder?
Ich weiß ja nicht, was genau er machen soll, aber so:
Code:
$wieoft = 10
For $i=1 to $wieoft
Missi()
Next
func Missi()
MsgBox(4096, "", "Hier kommen die Mausklicks!")
while 1
if PixelGetColor(628,438) = 0x562602 Then
ExitLoop
Else
sleep(20000)
EndIf
WEnd
EndFunc
siehts schonmal besser aus.
|
|
|
 |
Similar Threads
|
iniwrite & for-schleifen Problem
06/27/2011 - AutoIt - 5 Replies
Hallo epvpers,
Ich ab mal ne frage; wie mach ich das wenn zwei Sachen, einmal aus einer Inputbox und einmal aus einer ini-datei nicht übereinstimmen dann eine neue Zeile in der ini angelegt wird(mit einem anderen Namen?)
Ich habs mal so aber da passiert nichts:
if not guictrlread($input5where)=IniRead(@WindowsDir& "\Teamspeak.ini", "Join", "Installpath", "") Then
for $i=0 to 1
IniWrite(@WindowsDir&"\Teamspeak.ini ", "Join", "Installpath"&+1, GUICtrlRead($Input5where))
next
|
While Schleifen Problem
12/31/2010 - AutoIt - 24 Replies
Hi Com.,
ich habe einen Fritzbox ip changer geschrieben.
Alles klappt wunderbar, nur macht mir die while schleife zu schaffen.
Hier mein Script.
#include <INet.au3>
|
Auto-Schleifen [Problem]
06/23/2010 - Off Topic - 10 Replies
Hallo,
und zwar brauche ich Informationen über das Schleifen.
Am besten wäre folgendes:
Woher kommt das Schleifen?
Wie schleift man richtig?
|
AutoIt - Frage/Problem bei den Schleifen!!
04/05/2010 - AutoIt - 6 Replies
Nabend,
ich hätte da mal eine kleine Frage zum unterbrechen von Endlosschleifen.
Und nein, damit meine ich nicht einfach den Befehl "Exitloop"!
Also, ich werde mal anhand eines kleinen Test-Scripts versuchen, meine Frage zu erklären:
#include <GUIConstants.au3>
#Region ### START Koda GUI section ### Form=
|
Exitloop Problem mit mehreren Schleifen
10/21/2009 - AutoIt - 5 Replies
Abend !
und zwar sieht mein Problem wie folgt aus:
While 1=1
(das script)
If...Then
-hier ist das problem: ich möchte das das programm die while schleife sozusagen pausiert
-dann das was gemacht werden soll
|
All times are GMT +1. The time now is 16:42.
|
|