Скрипт должен нажимать рандомно на определенные пикселы в заданном пространстве.
Когда запускаю его, нажатий не происходит, и, курсор стоит на месте.
Подскажите, что не так, буду признателен.
Когда запускаю его, нажатий не происходит, и, курсор стоит на месте.
Код:
#include <Array.au3>
HotKeySet("{ESC}","ExitApp")
Func ExitApp()
Exit
EndFunc
Dim $aResult[1001][2] = [[1000]]
$iCount = 0
WinActivate("[TITLE:blabla]")
While WinActive("[TITLE:blabla]")
WEnd
While 1
PixelClick(148, 700, 245, 1310, 0x000000, 100)
WEnd
Func PixelClick($X, $Y, $Right, $Bottom, $Color, $Dip_Col)
Local $Left = Random($X, $Bottom)
Local $Top = Random($Y, $Right)
$Pos = PixelSearch($Left, $Top, $Right, $Bottom, $Color, $Dip_Col)
If IsArray($Pos) Then
If ($Pos[0] > $X) And ($Pos[1] > $Y) And ($Pos[0] < $Right) And ($Pos[1] < $Bottom) Then
MouseClick("left", $Pos[0], $Pos[1], 2, 1)
EndIf
EndIf
EndFunc
Подскажите, что не так, буду признателен.