Page 1 sur 1
[R] Boucle faire jusqu'a...
Posté : sam. 15 mars 2008 23:34
par Yoyo86220
Re tous le monde je suis content j'avance... je comprends de mieu en mieu... mai bon j'ai encore bcp de probleme, mon script:
Code : Tout sélectionner
Do
$color="0x5C99D2"
Sleep(5000)
$coord=PixelSearch(0,0,@DesktopWidth,@DesktopHeight,$color)
if @error=1 Then exit 1
Until ($color="0x5C99D2")
MouseClick("left", 1593, 9, 1)
donc voila, il quitte le programme si il trouve pas la couleur et moi je veux qu'il recommence de "Do" merci de votre aide...
Re: [..] Boucle faire jusqu'a...
Posté : sam. 15 mars 2008 23:46
par Yoyo86220
je pense qu'il faut changer "exit 1" dans cette phrase: "if @error=1 Then exit 1" mais je sais pas par quoi le remplacer j'ai pensé par "return"... mais sa marche pas... de l'aide svp
Re: [..] Boucle faire jusqu'a...
Posté : dim. 16 mars 2008 02:37
par Tlem
Vous avez la réponse dans votre
post précédent.
La boucle While/Wend fonctionne de la même manière que la boucle Do/Until, donc ont sort de la même façon.
Re: [..] Boucle faire jusqu'a...
Posté : dim. 16 mars 2008 07:59
par Yoyo86220
ok d'accord j'ai compri ! il faut écrire quoi si je veux: "si la variable est correct sortir de la boucle"
if .... Then ExitLoop
Re: [..] Boucle faire jusqu'a...
Posté : dim. 16 mars 2008 08:39
par Yoyo86220
j'ai un nouveau probleme ma boucle recommence meme si elle a trouvé le pixel qu'elle cherchait... comment fair
Code : Tout sélectionner
While 1
WinActivate("Roulette Européenne - Europa Casino")
$color="0x001261"
WinWaitActive("Program Manager")
MouseClick("left", 1626, 15, 2)
sleep(400)
Send ( "1" )
While 2
sleep(200)
Send("{ENTER}")
WinWaitActive("World of Warcraft")
sleep(900)
MouseClick("left", 820, 551, 1)
sleep(200)
Send("yoyo86220")
sleep(300)
MouseClick("left", 844, 649, 1)
sleep(300)
Send("*******")
sleep(300)
MouseClick("left", 859, 736, 1)
sleep(100)
MouseClick("left", 812, 957, 1)
sleep(9000)
$coord=PixelSearch(0,0, 812, 957,$color)
If Not @error Then ExitLoop
WEnd
sleep(1000)
MouseClick("left", 812, 957, 1)
sleep(15000)
Run("D:\aide.bat")
MouseClick("left", 1392, 260, 1)
sleep(2000)
MouseClick("left", 332, 1032, 1)
sleep(6000)
MouseClick("left", 0, 0, 1)
sleep(1000)
MouseClick("left", 1450, 266, 1)
sleep(100)
exit
Wend
Re: [..] Boucle faire jusqu'a...
Posté : dim. 16 mars 2008 09:31
par Vins83
Tu n'as pas d'exitloop dans ta while1 et 2 ,c pour ça..
Re: [..] Boucle faire jusqu'a...
Posté : dim. 16 mars 2008 09:36
par Yoyo86220
bah regarde :
sa devrai quitter la 2 et continuer la 1 nn?
ou
peut-on fair un truc dans ce genre ?