1. WTF is AutoIT?
AutoIT is one of the best script languages for automating s.th. and lot of other stuff.
Very easily to learn.
http://www.autoitscript.com/autoit3/
2. The main part of this post: A simple spammer
You lear how to create a spammer, you can stop spamming pressing "Num8", and start spamming pressing "Num7".
You can even modify this to your own keybinder.
First you need a GUI:
Then we set some hotkeys, for start spam progress and stop it. They start the functions "Start", or "End"
A global varibale. It saves whether the programm should spam or not. Its set to 0 after starting the programm
Then we add the needed functions "Start" and "End" to modify the global variable
Finaly, a loop to spam the text in the label, but only if the global varibale is true
(I made the GUI with Koda, a GUI designer, you dont need it for scripting, but its easier using it:
http://www.autoitscript.com/forum/index.php?showtopic=32299)
3. Ok, now for short, for all who want to have a summary
1.Create a .txt file, type in the following code.
2.Then rename the file to .au3.
3.Compile it to a .exe file with the "Compile script to exe" application and then its done.
You will find all applications you need in the path where you installed AutoIT (editor, compiler, au3 to exe)!
Mirrors:
Script [Pastebin]
Compiled exe
Post comments, bug pls
On enough requests I will post a keybinder tutorial.
AutoIT is one of the best script languages for automating s.th. and lot of other stuff.
Very easily to learn.
http://www.autoitscript.com/autoit3/
2. The main part of this post: A simple spammer
You lear how to create a spammer, you can stop spamming pressing "Num8", and start spamming pressing "Num7".
You can even modify this to your own keybinder.
First you need a GUI:
Code:
#include <GUIConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Samp", 285, 98, 193, 125)
$Samp_Spammer_ = GUICtrlCreateLabel("Spammer v1", 160, 64, 103, 17)
$Samp_Text = GUICtrlCreateInput("Sampe_Text", 16, 40, 257, 21)
$ffffffffffffffffffff = GUICtrlCreateLabel("7 to activate, 8 to deativate", 16, 8, 232, 17)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###Then we set some hotkeys, for start spam progress and stop it. They start the functions "Start", or "End"
Code:
HotKeySet ( "{Numpad7}" , "Start" )
HotKeySet ( "{Numpad8}" , "End" )A global varibale. It saves whether the programm should spam or not. Its set to 0 after starting the programm
Code:
Global $modus = 0Then we add the needed functions "Start" and "End" to modify the global variable
Code:
Func Start()
$modus = 1
EndFunc
Func End()
$modus = 0
EndFuncFinaly, a loop to spam the text in the label, but only if the global varibale is true
Code:
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
if $modus = 1 Then
Send("{F6}")
Send(GUICtrlRead($samp_text))
Send("{ENTER}")
EndIf
WEnd(I made the GUI with Koda, a GUI designer, you dont need it for scripting, but its easier using it:
http://www.autoitscript.com/forum/index.php?showtopic=32299)
3. Ok, now for short, for all who want to have a summary
1.Create a .txt file, type in the following code.
2.Then rename the file to .au3.
3.Compile it to a .exe file with the "Compile script to exe" application and then its done.
You will find all applications you need in the path where you installed AutoIT (editor, compiler, au3 to exe)!
Code:
#include <GUIConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Samp", 285, 98, 193, 125)
$Samp_Spammer_ = GUICtrlCreateLabel("Spammer v1", 160, 64, 103, 17)
$Samp_Text = GUICtrlCreateInput("Sampe_Text", 16, 40, 257, 21)
$ffffffffffffffffffff = GUICtrlCreateLabel("7 to activate, 8 to deativate", 16, 8, 232, 17)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
HotKeySet ( "{Numpad7}" , "Start" )
HotKeySet ( "{Numpad8}" , "End" )
Global $modus = 0
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
if $modus = 1 Then
Send("{F6}") ; open chat box
Send(GUICtrlRead($samp_text)) ;reading the label
Send("{ENTER}") ; and send it
EndIf
WEnd
Func Start()
$modus = 1
EndFunc
Func End()
$modus = 0
EndFuncMirrors:
Script [Pastebin]
Compiled exe
Post comments, bug pls
On enough requests I will post a keybinder tutorial.
