upd.Поиск включился, сам разобрался.
http://autoit-script.ru/index.php?topic=19251.0
После старта скрипта не горячие клавиши не работают. Пытался воспользоваться поиском, но пишет, что сервер перегружен. С autoit только начал знакомство, заранее извиняюсь, если вопрос глупый и благодарен всем, кто потратит на меня время.
удалил из кода все похожие действия т.к. там их очень много и листать их мало кому понравится.
http://autoit-script.ru/index.php?topic=19251.0
После старта скрипта не горячие клавиши не работают. Пытался воспользоваться поиском, но пишет, что сервер перегружен. С autoit только начал знакомство, заранее извиняюсь, если вопрос глупый и благодарен всем, кто потратит на меня время.
удалил из кода все похожие действия т.к. там их очень много и листать их мало кому понравится.
Код:
;============================Кнопки================================
HotKeySet("{F4}", "Start")
HotKeySet("{F1}", "Sleep (1000000)")
Dim $herosearch[10]
;============================переход на нужное окно================================
WinActivate("[TITLE:BlueStacks App Player]", "")
;============================поиск 1================================
;=============Дальше идёт цикл, который ищет нужные пиксели и если не находит обновляет лабиринт, оставил 1 поиск для наглядности==============================
While 1
$herosearch[0] = PixelGetColor( $x, $y )
If($herosearch[0]=0xF5292C) Then
$2 = PixelGetColor($x,$y)
if $2= 0xA32B26 Then
MsgBox(4096, "", "2")
EndIf
$1 = PixelGetColor($x,$y)
if $1=0x8F201B Then
MsgBox(4096, "", "1")
EndIf
Else
MouseClick("left",170,960,1,10)
Sleep (500)
MouseClick ("left", 1200,210,1,10)
Sleep (500)
MouseClick("left",950,660,1,10)
Sleep (500)
MouseClick("left",170,960,1,10)
Sleep (500)
MouseClick ("left",1570,225,1,10)
Sleep (500)
MouseClick("left",950,660,1,10)
EndIf
WEnd