Question controlsend "x" times when finde pixel

[bosk20]

Hi, i wgot problem with send key when script found pixel.

$pixel = PixelSearch(448, 250, 458, 550, 16775664, 0, 1)
                If NOT @error Then
                        ControlSend($win, "", "", "{LEFT}");30 repeat?
                EndIf
                $pixel = PixelSearch(574, 245, 583, 548, 16775664, 0, 1)
                If NOT @error Then
                        ControlSend($win, "", "", "{RIGHT}");30 repeat?
                EndIf

How to send  key for expamle 30 times then stop it?

Edited December 5, 2015 by bosk20

[JohnOne]

{LEFT 30}

[bosk20]

Does not work, I tried earlier. I put in in while but i try to set after 30 repeats this function enable break and run another  but nothing work.

 

HotKeySet("{up}", "start")

func start()
while 1 ;hot to repeat 30 times this comends?
                $pixel = PixelSearch(425, 413, 481, 463, 14655792, 0, 1)
                If NOT @error Then
                        ControlSend($win, "", "", "{LEFT}")
                EndIf
                $pixel = PixelSearch(425, 518, 481, 567, 14655792, 0, 1)
                If NOT @error Then
                        ControlSend($win, "", "", "{RIGHT}")
                     EndIf
wend
;break()
   EndFunc
   
   func break()
   while 1 
   sleep(100)
   wend
   endfunc

Its random send key but how to do that for send 30 times in one function?

any sugestion?

[Jos]

Does not work, I tried earlier. I put in in while but i try to set after 30 repeats this function enable break and run another  but nothing work.

-snip-

Its random send key but how to do that for send 30 times in one function?

any sugestion?

You got the solution, so what exactly did you do that didn't work?
Maybe also give a much better description of what you are trying to do so we can actually try and help.

 Jos

[bosk20]

When i try do it with {left 30} script dont work. I don't know how  to set the condition that after a given amount ControlSend(left and right) script will perform another action?

[Timppa]

You can also use for loop:

 

Func start()

While 1

    $pixel = PixelSearch(425, 413, 481, 463, 14655792, 0, 1)
    If NOT @error Then
        For $i = 0 To 30
            ControlSend($win, "", "", "{LEFT}")
        Next
            ;End of loop
    EndIf
    
    $pixel = PixelSearch(425, 518, 481, 567, 14655792, 0, 1)
    If NOT @error Then
        For $i = 0 To 30
            ControlSend($win, "", "", "{RIGHT}")
        Next
            ;End of loop
    EndIf
    
WEnd

EndFunc

 

[water]

Can you please tell us which program you try to automate? So maybe we can suggest a more reliable solution.

[bosk20]

 Problem solved. Thank you for answers. I do not know why it did not work before

Local $i = 0

While $i <= 30
          $pixel = PixelSearch(422, 413, 479, 463, 14655792, 0, 1)
                 If NOT @error Then
                        ControlSend($win, "", "", "{LEFT}")
                        $i += 1
                        EndIf

Now is working perfectly

Edited December 7, 2015 by bosk20
Edit