Что нового

Как кликнуть мышью, дождаться пока изменится пиксель и снова кликнуть в другом?

Vampire

Новичок
Сообщения
11
Репутация
0
В заданном месте автоматически должен произойти левый клик мыши.
Дождаться пока в некоторой области (или хотя-бы в конкретных координатах) изменится пиксель (или станет нужного цвета)
И кликнуть мышью по другим координатам.
 

Zaramot

I ♥ AutoIt
Сообщения
1,160
Репутация
660
Примерно так:
Код:
MouseClick('LEFT', 100, 100, 1, 0)
Do
	Sleep(10)
Until '0x' & Hex(PixelGetColor(100, 100), 6) = '0xFFFFFF'
MouseClick('LEFT', 100, 100, 1, 0)

Поменяй координаты и цвет на свои.
 

Viktor1703

AutoIT Гуру
Сообщения
1,535
Репутация
413
Или так:

Код:
Dim $PixParam[3][3] = [[400, 400, 0xFFFFFF], [400, 300, 0x7A96E0], [100, 300, 0x387EBC]]

Global $iColor = $PixParam[0][2]
Global $iX = $PixParam[0][0]
Global $iY = $PixParam[0][1]
Global $Index = 1

While 1

   If PixelGetColor($iX, $iY) = $iColor Then
	  MouseClick('LEFT', $iX, $iY, 1, 0)
	  $iColor = $PixParam[$Index][2]
      $iX = $PixParam[$Index][0]
      $iY = $PixParam[$Index][1]
      If $Index = 2 Then
         $Index = 0
      Else
	     $Index += 1
      EndIf
   EndIf
   
   Sleep(100)
	  
WEnd
 
Верх