[Tool]Best Autoit Spammer!

10/23/2009 04:21 Beck's Gold#1

The ultimate Spammer!!! Works 4ever!

Spam them before they Spam you!

Press F8 to Start, F9 to Pause, F10 to Close/Exit

Download:
[Only registered and activated users can see links. Click Here To Register...]
[Only registered and activated users can see links. Click Here To Register...]

Autoit Code:

Quote:

Global $Paused
HotKeySet("{F9}", "Pause")
HotKeySet("{F10}", "Close")
HotKeySet("{F8}", "Start")

$MESSAGE = InputBox("InputBox", "Type your SPAM! text hier and Press F8 - Start, F9 - Pause, F10 - Close")
$DELAY = InputBox("Delay", "Enter the delay in milliseconds -1000ms = 1sec-")

While 1
Sleep(100)
WEnd

Func Pause()
$Paused = NOT $Paused
While $Paused
sleep(100)
WEnd
EndFunc

Func Close()
Exit 0
EndFunc

Func Start()
While 1
Sleep($DELAY)
Send($MESSAGE)
Send("{Enter}")
Wend
EndFunc

Virustotal.com scan:

[Only registered and activated users can see links. Click Here To Register...]

Credits to: Me <3 :p

10/24/2009 10:06 audi0slave#2

#approved

#safety confirmed ( autoit false positives)

Thanks for your release.

11/13/2009 23:18 lukas2abc#3

Here is your code a bit rewritten...hope you learned with this code some commands and etc.!

just for information:when there�s a ";" in a line, then everything after this ";" in this line will be ignored

Code:

;Global $Paused ;there�s a simpler way...
HotKeySet("{F9}", "Pause")
HotKeySet("{F10}", "Close")
HotKeySet("{F8}", "Start")
TrayTip("Credits", "by MrCheater", 0) ; so everyone knows that it�s your program^^
$MESSAGE = 	InputBox("InputBox", "Type your SPAM! text hier and Press F8 - Start, F9 - Pause, F10 - Close")
$DELAY = 	InputBox("Delay", "Enter the delay in seconds")

While 1
	Sleep(1)
WEnd

Func Pause()
	While 1
		Sleep(1)
	WEnd
EndFunc

Func Close()
	Exit ;0  ;you don�t need the 0....
EndFunc

Func Start()
	While $DELAY*1000 ;i do that so you can write second and not the milliseconds....and it�s easier..
		ControlSend("[CLASS:CLIENT]", "", "Edit1", $MESSAGE) ;it will send the text also when sro is minimized or hidden
		ControlSend("[CLASS:CLIENT]", "", "Edit1", "{ENTER}") ;same for enter...
	Wend
EndFunc

I don�t mean that your script is nooblike....everyone starts with small and easy scripts.Thats normal. with every script you see you improve your knownledge of Autoit3. My scripts are very complicated and long(mostly about 700 lines...), but i can code in autoit for now 1 year. you WILL be as good as me in some time(depend how much you program) but you have to code and look at codes of others too.

I just made it for YOU to improve YOUR knownledge!

best greetings, lukas !

11/15/2009 03:59 Beck's Gold#4

Thanks Teacher! :)

11/20/2009 14:19 Floryn1#5

works great, thanks