fill in and 100% working with anti AFK uber took 20 min to encode
working at all resoltion
$gameloc = "LOCATION OF WoW.exe"
$username = "ACCOUNT"
$password = "PASS"
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;.. Credits ..;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;.. made by XAGE ..;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;=================> Log-in button <=================;
Sleep(10000);about a min after computer boot wow starts
$gameloc = "LOCATION OF WoW.exe"
$username = "ACCOUNT"
$password = "PASS"
Run($game, "")
blockinput(1)
WinWait("World of Warcraft")
WinActivate("World of Warcraft")
WinSetState ("World of Warcraft", "", @SW_MAXIMIZE)
dim $xy[4]
$xy = WinGetPos("World of Warcraft")
sleep(1000)
MouseClick("left", $xy[0]+$xy[2]/2, $xy[1]+$xy[3]*.55833333333333,1,0)
sleep(100)
send($username & "{TAB}")
Sleep(100)
send($password & "{ENTER}")
blockinput(0)
sleep(4500)
send("{ENTER}")
;==================> anti afk <================;
Send("{SPACE}")
Sleep(Random(120000,240000)); about every 2-3 min a jump
;=================> Close <=================;
Func CLOSEClicked()
If $mainwindow Then
Exit
EndIf
Exit
EndFunc
Exit
