afk_pet

HotKeySet("!{ESC}", "stopscript")
HotKeySet("^{PAUSE}", "stopscript")
HotKeySet("{F1}", "f1")
HotKeySet("{F8}", "f8")


WinWaitActive("World of Warcraft")
While (1)
sleep(100)
WEnd

Func f1()
; if (PixelGetColor(963, 944)=0x7B3C24) then
While (1)
    if (PixelGetColor(838, 39)<>0xFFD100) then
    ControlSend  ("World of Warcraft", "" ,"", "1")
    Sleep (Random(500, 2000))
    ; MouseClick("Left", Random(1000,1200), Random(500, 800))
    ; Sleep (Random(1000, 2000))
    endif
WEnd
EndFunc

Func f8()
    Sleep (5*60*1000)
EndFunc

Func stopscript()
msgBox(4096,"Exit", "CTRL + BREAK pressed." & @CR & @CR & "Exit.")
Exit
EndFunc