Im sure you must be thinking "OMFG not another antiafk script!"
Well if you are, just select the back button on you browser and be on your way.
Anyways, as of late i have been trying to work on my AutoIt skills a bit more and today i was a little bored so i whipped this up. It is a very simple, super easy to use AntiAFK bot for those pesky times you need to do something, but do not want to log out.
What this bot does is randomly every 5-60 seconds it moves you ever so slighty to the left, then to the right using "q" and "e" as the strafe buttons. This may require some code changing, or hotkey switching if those are changed around for you.
To use this bot simply double click the exe and window back into WoW. To start it just hit Alt+F1 and you are all set. After starting it for the first time hit Alt+F1 to pause/unpause it at any time. To close this script without windowing out of the game simply hit Alt+F2. Thats it. Pretty simple eh?
Here is a pic of the virus scan: http://img337.imageshack.us/img337/3...russcanjm8.png
Just the basic AutoIt v3 falsehoods.
If anyone has any suggestions on how to improve this, they would be greatly appreciated. All for the sake of learning new things. Yay. Anyways If you have any questions just PM me or ask em here and ill gladly answer.
SOURCE:
Code:
;Newbs_r_us's Simple AntiAFK Bot!
;Made for the simple reason of working on my AutoIt Skills
;Enjoy =)
$AntiAFK= "Simple AntiAFK v1.0"
$WoW= "World of Warcraft"
$Pause = 1
AutoItSetOption("SendKeyDownDelay", Random(100-150))
HotKeySet("!{F1}", "ToggleOnOff")
HotKeySet("!{F2}", "ToggleExit")
$AnswerStart = MsgBox(4, $AntiAFK , "This bot will make you jump randomly every 5-60 seconds."& chr(13) &""& chr(13) &"To start the bot press Alt+F1 and afterwards press this at any time to pause or unpause the script."& chr(13) &"Also, press Alt+F2 at any time to exit this script."& chr(13) &""& chr(13) &"Would you Like to continue?")
If $AnswerStart = 7 Then
Exit
EndIf
While (1)
If (WinExists($WoW) AND $Pause = -1 AND $AnswerStart= 6) Then
Sleep(Random(5, 60) * 1000)
ControlSend($WoW, "", "", "q")
Sleep(Random(5, 60) * 1000)
ControlSend($WoW, "", "", "e")
EndIf
WEnd
Exit
Func ForceWindow($Window)
WinSetState($Window, "", @SW_MAXIMIZE)
WinWaitActive($Window, "", 5000)
Sleep(2000)
EndFunc
Func ToggleOnOff()
HotKeySet("+{F1}")
If ($Pause = 1) Then
ToolTip("AntiAFK active!", 0, 0)
Beep(1500, 200)
Else
ToolTip("AntiAFK disabled!", 0, 0)
Beep(500, 200)
EndIf
$Pause = $Pause * (-1)
Sleep(1000)
ToolTip("")
HotKeySet("+{F1}", "ToggleOnOff")
EndFunc
Func ToggleExit()
HotKeySet("!{F1}")
$AnswerExit= MsgBox(4, $AntiAFK, "Are you sure you would like to exit AntiAFK?")
If $AnswerExit= 6 Then
Exit
EndIf
HotKeySet("!{F2}", "ToggleExit")
EndFunc
Feel free to bend this code to your will.
-----)(Please leave the copyright text intact)(-----
This post is copyright by the user posting it and MMOwned.com - World of Warcraft Exploits,Hacks, Bots and Guides, where it was posted. You may not copy or reproduce this information on any other site without written permission from both the poster and MMOwned.com