[R] Aide, Variable dans pixelsearch dans des boucles

[legend]

Bonjour
Je voudrais un script avec ces fonctions :
le script apuiera sur A

Code : Tout sélectionner

Send ("{a down}")

et il s'arrete d'apuier sur A quand des pixels rouges x sont détectés. jusqu'a ce qu'il n'y a plus de pixels rouges dans la zone Y (plus large et contient la zone x)
Merci pour votre aide et bonne journée.

[Jerome]

Coucou,


Je vous ai déjà tout expliquer sur ce post. Pour plus d'information, regardez l'exemple dans l'aide.


Le code Hexadecimal pour le rouge étant # FF0000


Il vous suffit pour votre zone X de faire un pixelsearch et un If@error.

Code : Tout sélectionner

While 1

     Send ("{a down}")
     PixelSearch( 0, 0, 20, 300, 0xFF0000, 10 )
     If @error Then
         Send ("{a up}")
         Do
               PixelSearch( 0, 0, 20, 300, 0xFF0000, 10 )
               sleep(50)
         Until(Not @error)    
     EndIf

Wend

Jérôme

[legend]

Merci,
Je te met en courant si sa marche ^^
parce que quand je met des boucles dans des boucles ac adlib sa bug . . .

[Jerome]

ExitLoop

[legend]

Bonjour
je te donne exemple du script que je veux faire et des bugs

Code : Tout sélectionner

Send ("{a down}{z down}{space down}")
Do
Do
Send ("{a down}{z down}")
$coords1 = PixelSearch (352 , 220, 449, 340, 0xEB1609)
$coords2 = PixelSearch (306 , 269, 509, 413, 0xEB1609)
Until $coords1 <> 0
Send ("{a up}{z up}{space down}")
Until $coords2 = 0 ; quand $coords2 = 0 sa ne s'arréte pas . . .
 

[Jerome]

Coucou,


Si tu regarde bien, la fonction pixelsearch retourne des coordonées, tu peux pas dire =0 ou =1 ou quoi que ce soit.

C'est une array qui est retourné.

Code : Tout sélectionner

Send ("{a down}{z down}{space down}")
Do
Do
Send ("{a down}{z down}")
$coords1 = PixelSearch (352 , 220, 449, 340, 0xEB1609)
$coords2 = PixelSearch (306 , 269, 509, 413, 0xEB1609)
Until IsArray($coords1) = true 
Send ("{a up}{z up}{space down}")
Until IsArray($coords2) = false

(essaye sans le =true aussi...)

Je peux pas tester la code actuellement, je suis sous MaC.

Donc à voir, dis moi ce qu'il en est.

► Afficher le texte

Edit, on peut test sa aussi :

Code : Tout sélectionner

Send ("{a down}{z down}{space down}")
While 1
    Do
        Send ("{a down}{z down}")
        $coords1 = PixelSearch (352 , 220, 449, 340, 0xEB1609)
    Until Not @error 
    If Not @error
        Do
            Send ("{a up}{z up}{space down}")
            $coords2 = PixelSearch (306 , 269, 509, 413, 0xEB1609)
        Until @error
    EndIf
Wend

Jérôme

[legend]

Le méme probléme est toujours existant . . .
le script reste toujours apuié sur a z et espace aprés que aucun pixel rouge n'existe plus dans $coords2 il ne fait pas

Code : Tout sélectionner

Send ("{a up}{z up}{space up}")

par contre pour $coords1 sa fonctionne 5/5
peut être c parce que on avait pas 1boucle dans une autre boucle.
Sinon si on fais la fonction ImageSearch dans un adlib sa fonctionnera pas?
PS : le 1er code est horrible il reste toujours apuié sur a z et espace, rien d'autre.

[legend]

Bon j'ai trouvé la solution ^^

Code : Tout sélectionner

Global $coords2, $i
Func coords2()
    $coords2 = PixelSearch (306 , 233, 512, 421, 0xEB1609)
    If @error Then $i = 1
EndFunc

Do
    Do
        Send ("{a down}{z down}")
        $coords1 = PixelSearch (352 , 220, 449, 340, 0xEB1609)
    Until Not @error

     Do
          Send ("{a up}{z up}{space down}")
          $coords1 = PixelSearch (352 , 220, 449, 340, 0xEB1609)
      Until @error
      send ("{space up}")
  Until $i = 1
AdlibUnRegister ("coords2")
 

c fait a la roche mais sa marche ^^
merci pour votre aide et bonne journée