Code:
#include <GUIConstantsEx.au3> #include <ImageSearch.au3> $Full = WinGetTitle ("BlueStacks App Player") $HWnD = WinGetHandle ($Full) $x1=0 $y1=0 While (1) ;========================================================== ;autokick afk members If _ImageSearch("mana.png",1,$x1,$y1,20) = 1 Then Sleep(10000) If _ImageSearch("mana.png",1,$x1,$y1,10) = 1 Then MouseClick("left", $x1, $y1, 1, 3) Sleep(1000) ; MouseClick("left", 790, 525, 1) Sleep(500) ; MouseClick("left", 600, 310, 1) Sleep(200) ; MouseClick("left", 600, 310, 1) Sleep(200) ; ControlClick($HWnD, "", "", "left", 1, 1237, 520) Sleep(200) ; ;========================================================== ;invite party Sleep(200) ; ControlClick($HWnD, "", "", "left", 1, 37, 50) Sleep(200) ; ControlClick($HWnD, "", "", "left", 1, 942, 802) Sleep(200) ; ControlClick($HWnD, "", "", "left", 1, 194, 149) Sleep(200) ; ControlClick($HWnD, "", "", "left", 1, 1358, 712) Sleep(200) ; ControlClick($HWnD, "", "", "left", 1, 505, 39) EndIf EndIf ;========================================================== ;autosearch mob $result1111111 = _ImageSearch("searchnow.png",1,$x1,$y1,10) if $result1111111=0 Then ControlClick($HWnD, "", "", "left", 1, 1245, 526) Sleep(500) ControlClick($HWnD, "", "", "left", 1, 1237, 632) Sleep(500) ControlClick($HWnD, "", "", "left", 1, 1347, 755) Sleep(10000) EndIf ;========================================================== ;autocancel invites $result11111 = _ImageSearch("cancel.png",1,$x1,$y1,10) if $result11111=1 Then MouseClick("left",$x1,$y1,1,0) Sleep(100) EndIf ;========================================================== ;autoheal and buffs $result1 = _ImageSearch("bot.png",1,$x1,$y1,100) if $result1=1 Then ControlClick($HWnD, "", "", "left", 1, 1241, 515) Sleep(1000) ControlClick($HWnD, "", "", "left", 1, 1207, 738) Sleep(1000) ControlClick($HWnD, "", "", "left", 1, 1207, 738) Sleep(1000) ControlClick($HWnD, "", "", "left", 1, 1207, 738) Sleep(1000) ControlClick($HWnD, "", "", "left", 1, 1207, 738) Sleep(1000) ControlClick($HWnD, "", "", "left", 1, 1207, 738) Sleep(1000) ;========================================================== ;Devour ControlClick($HWnD, "", "", "left", 1, 43, 40) Sleep(500) ControlClick($HWnD, "", "", "left", 1, 213, 807) Sleep(500) ControlClick($HWnD, "", "", "left", 1, 1156, 712) Sleep(500) ControlClick($HWnD, "", "", "left", 1, 282, 711) Sleep(500) ControlClick($HWnD, "", "", "left", 1, 506, 34) Sleep(500) ControlClick($HWnD, "", "", "left", 1, 1371, 42) Sleep(500) ControlClick($HWnD, "", "", "left", 1, 52, 34) Sleep(1000) ;========================================================== ;Prayer/Stamina ControlClick($HWnD, "", "", "left", 1, 1228, 36) Sleep(1000) ControlClick($HWnD, "", "", "left", 1, 1007, 754) ;pray Sleep(500) ControlClick($HWnD, "", "", "left", 1, 423, 758) ;stamina Sleep(500) ControlClick($HWnD, "", "", "left", 1, 1390, 62) ;close Sleep(1000) ;talent ControlClick($HWnD, "", "", "left", 1, 1392, 331) Sleep(500) ControlClick($HWnD, "", "", "left", 1, 1302, 718) Sleep(500) ControlClick($HWnD, "", "", "left", 1, 1107, 754) Sleep(500) ControlClick($HWnD, "", "", "left", 1, 1223, 39) Sleep(500) ControlClick($HWnD, "", "", "left", 1, 1399, 326) Sleep(200) ControlClick($HWnD, "", "", "left", 1, 1237, 520) EndIf ;========================================================== WEnd Func TogglePause() $Paused = not $Paused While $Paused ToolTip("paused") sleep(100) WEnd EndFunc Func Stop() Exit EndFunc