Blub45
16.05.2010, 21:49
Hallo,
Ich suche einenen Anstups Spammer.
Nicht um einen Server zu crashen sondern einfach um einen meiner Freunde zurück zu nerven wen er mal wieder solch einen angriff auf mich startet :)
MFG
EDIT:
Hab was in autoit gecoded ^^
THX Drücken :D
#RequireAdmin
HotKeySet("{F6}","_Ende") ; Setzt den HotKey zum Ausschalten
MsgBox(0,"Poke Spammer by Freelanzer!","Poke Spammer by Freelanzer!"&@CRLF&"Opfer Muten und Auswählen(Im TS³ Fenster)!"&@CRLF&"Zum Beenden bitte F6 drücken!")
$Text = InputBox("Poke Spammer by Freelanzer!","Bitte Poke Text eingeben:")
While 1 ;Schleife beginnt
$Pixel = PixelSearch(1,0,1024,800,0xA97B99) ;Variabele um einen bestimmten Pixel zu finden der im Mute Icon ist
if IsArray($Pixel) = True Then
MouseMove($Pixel [0], $Pixel [1], 25)
MouseClick("Right")
Sleep(100)
EndIf
$Poke = PixelSearch(1,0,1024,800,0xFFD302) ;Variabele die einen Pixel aus dem Poke Icon sucht
If IsArray($Poke) Then
MouseMove($Poke [0], $Poke [1], 1)
MouseClick("Left")
Send($Text)
Sleep(100)
Send("{Enter}")
EndIf
WEnd
Func _Ende () ;Zum HotKey gehörige End Funktion
Exit
EndFunc
Ich suche einenen Anstups Spammer.
Nicht um einen Server zu crashen sondern einfach um einen meiner Freunde zurück zu nerven wen er mal wieder solch einen angriff auf mich startet :)
MFG
EDIT:
Hab was in autoit gecoded ^^
THX Drücken :D
#RequireAdmin
HotKeySet("{F6}","_Ende") ; Setzt den HotKey zum Ausschalten
MsgBox(0,"Poke Spammer by Freelanzer!","Poke Spammer by Freelanzer!"&@CRLF&"Opfer Muten und Auswählen(Im TS³ Fenster)!"&@CRLF&"Zum Beenden bitte F6 drücken!")
$Text = InputBox("Poke Spammer by Freelanzer!","Bitte Poke Text eingeben:")
While 1 ;Schleife beginnt
$Pixel = PixelSearch(1,0,1024,800,0xA97B99) ;Variabele um einen bestimmten Pixel zu finden der im Mute Icon ist
if IsArray($Pixel) = True Then
MouseMove($Pixel [0], $Pixel [1], 25)
MouseClick("Right")
Sleep(100)
EndIf
$Poke = PixelSearch(1,0,1024,800,0xFFD302) ;Variabele die einen Pixel aus dem Poke Icon sucht
If IsArray($Poke) Then
MouseMove($Poke [0], $Poke [1], 1)
MouseClick("Left")
Send($Text)
Sleep(100)
Send("{Enter}")
EndIf
WEnd
Func _Ende () ;Zum HotKey gehörige End Funktion
Exit
EndFunc