Here you can learn how to make your own bot, MMOWNED EXCLUSIVE! Hand typed by me! Heres what you can learn:
-A neat exploit
-Create your own program!
Lets start!
The first thing your going to need is the program were using today, called Autoit. Download it here:
http://www.autoitscript.com/cgi-bin/...t-v3-setup.exe
Once your done downloading, it's time to create a .au3 file. To do this, open up Your Documents or any folder and click file at the top left corner of the window.(this goes for Windows XP users) Click new and click AutoIt V3 Script. Now right click the file you just created and click edit. It should open up a default editor. (If it doesn't, right click it again and click open with. now click open with a program and click notepad and click ok) It's time to start scripting. Make sure each command is on a new line! The first command were gonna put it is this:
Code:
$Msg = MsgBox(1, "AFK Bot", "Make Sure That Your First Four Channels Are Set And There Is No Channel 5. Press Cancel To Exit.")
This puts a message box on the screen. The message box is a variable and users can do a lot with message box's but now, were only going to use 1 variable. Use this to varify the variable:
Code:
If $Msg = 2 Then
UserEnd()
EndIf
This will see if the user pushed cancel. If it did, it will call the function 'UserEnd' wich will then exit the script. Next we will add:
Code:
HotKeySet("{Pause}", "UserEnd")
This will make it so if you press the Pause button (located 2 buttons to the right of Print Screen) it will call the function 'userend'.
Here we will create the function 'userend' wich will end the script:
Code:
Func UserEnd()
Exit
EndFunc
That simply creates the function.
Next were going to type in:
Code:
WinSetState("World of Warcraft", "", @SW_MAXIMIZE)
This will simply maximize world of Warcraft.
Next we want this code:
Code:
ControlSend("World of Warcraft", "", "", "/join theafkchannel")
ControlSend("World of Warcraft", "", "", "{ENTER}")
This will send '/join theafkchannel to the window World of Warcraft and then press Enter.
Now we want it to type in the channel 'theafkchannel', that noone else is in, to prevent going afk.
Code:
While 1
ControlSend("World of Warcraft", "", "", "I'm Not AFK!")
ControlSend("World of Warcraft", "", "", "{ENTER}")
Sleep(30000)
WEnd
Now these are a little tricky. lets go over these lines. The While 1 means to start a loop. Of course, the controlsend command means to send 'I'm Not AFK!' to World of Warcraft and then press Enter. Sleep(30000) means to pause the script for 30000 miliseconds (30 seconds). And WEnd means to stop the loop. Now this will continue to run untill you press Pause.
So the full script should look like:
Code:
$Msg = MsgBox(1, "AFK Bot", "Make Sure That Your First Four Channels Are Set And There Is No Channel 5. Press Cancel To Exit.")
If $Msg = 2 Then
UserEnd()
EndIf
HotKeySet("{Pause}", "UserEnd")
Func UserEnd()
Exit
EndFunc
WinSetState("World of Warcraft", "", @SW_MAXIMIZE)
Sleep(1000)
ControlSend("World of Warcraft", "", "", "/join theafkchannel")
ControlSend("World of Warcraft", "", "", "{ENTER}")
While 1
ControlSend("World of Warcraft", "", "", "/5 I'm Not AFK!")
ControlSend("World of Warcraft", "", "", "{ENTER}")
Sleep(30000)
WEnd
And the cool part is, you don't have to have WoW Maximized!!