;While 1
While 1
$coord = PixelSearch( 180, 215, 820, 470, 0xFF6347, 6, 2)
If Not @error then
WinClose("X и Y равны:", "x ,y")
MouseMove( $coord [0], $coord [1] , 0 )
MouseClick ( "",$coord[0], $coord[1], 2, 0 )
ExitLoop
EndIf
WEnd
while
Sleep(9000)
mouseclick("left", 362, 325, 1)
sleep(7000)
mouseclick("left", 362, 325, 1)
sleep(7000)
mouseclick("left", 362, 400, 1)
sleep(7000)
$coord = PixelSearch( 180, 215, 820, 470, 0x436500, 6, 2)
if not @error then
WinClose("X и Y равны:", "x ,y")
MouseMove( 410 ,100 , 0 )
sleep(50000)
MouseClick ( "",410 ,100, 1, 0 )
ExitLoop
EndIf
WEnd
;wend