|
You last visited: Today at 12:19
Advertisement
[Frage] Spammer
Discussion on [Frage] Spammer within the AutoIt forum part of the Coders Den category.
03/21/2011, 16:35
|
#1
|
elite*gold: 0
Join Date: Aug 2010
Posts: 880
Received Thanks: 113
|
[Frage] Spammer
Hallo,
ich will mir einen spammer bauen. So sieht die Form ungefähr aus:
PHP Code:
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=d:\neuer ordner\koda_1.7.3.0\forms\spammer.kxf
$Form1_1 = GUICreate("Spammer", 212, 346, 191, 121)
$Label1 = GUICtrlCreateLabel("Text to Spam:", 8, 8, 86, 20)
GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif")
$Input1tospam = GUICtrlCreateInput("Here the Text", 8, 32, 193, 21)
$Label2 = GUICtrlCreateLabel("How often to Spam:", 8, 64, 119, 20)
GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif")
$Checkbox8 = GUICtrlCreateCheckbox("Checkbox8", 24, 136, 1, 9)
$Button1 = GUICtrlCreateButton("Activate", 56, 272, 97, 25)
GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif")
$Label3 = GUICtrlCreateLabel("Press F1 to start spamming", 8, 304, 130, 17)
$Label4 = GUICtrlCreateLabel("Press F3 to show the Menü", 8, 320, 133, 17)
$Label5 = GUICtrlCreateLabel("Wait between the last spam:", 8, 168, 170, 20)
GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif")
$Radio1 = GUICtrlCreateRadio("1 sec", 8, 192, 49, 25)
$Radio2 = GUICtrlCreateRadio("2 sec", 56, 192, 49, 25)
$Radio3 = GUICtrlCreateRadio("3 sec", 112, 192, 49, 25)
$Radio4 = GUICtrlCreateRadio("5 sec", 8, 216, 49, 25)
$Radio5 = GUICtrlCreateRadio("10 sec", 56, 216, 49, 25)
$Radio6 = GUICtrlCreateRadio("15 sec", 112, 216, 49, 25)
$Radio7 = GUICtrlCreateRadio("20 sec", 8, 240, 49, 25)
$Radio8 = GUICtrlCreateRadio("25 sec", 64, 240, 49, 25)
$Radio9 = GUICtrlCreateRadio("30 sec", 120, 240, 49, 25)
$Radio10 = GUICtrlCreateRadio("1x", 8, 88, 41, 25)
$Radio11 = GUICtrlCreateRadio("2x", 48, 88, 41, 25)
$Radio12 = GUICtrlCreateRadio("3x", 80, 88, 49, 25)
$Radio13 = GUICtrlCreateRadio("5x", 8, 112, 33, 25)
$Radio14 = GUICtrlCreateRadio("10x", 48, 112, 41, 25)
$Radio15 = GUICtrlCreateRadio("15x", 88, 112, 49, 25)
$Radio16 = GUICtrlCreateRadio("20x", 8, 136, 33, 25)
$Radio17 = GUICtrlCreateRadio("25x", 48, 136, 33, 25)
$Radio18 = GUICtrlCreateRadio("30x", 88, 136, 41, 25)
GUISetState(@SW_SHOW)
Und jetz will ich mit den radio button eine anzahl auswählen und wenn ich auf activate drücke dann soll es sich hiden(Das weiß ich wie es geht mit den hiden). Jetzt soll er aber erst anfangen zu spammen wenn ich auf einen hotkey drücke.?!
|
|
|
03/21/2011, 17:06
|
#2
|
elite*gold: 0
Join Date: Jul 2010
Posts: 475
Received Thanks: 130
|
Sorry ich verstehe nicht ganz dein Problem. Einfach mit
PHP Code:
HotKeySet("{DeinKnopf}","DeineStartFunktion") ;Deine GUI
Func DeineStartFunktion() ;Hier mit GuiCtrlRead die Radioboxen und Inputbox auslesen ;Gui Mit GuiSetState(@SW_HIDE) verstecken ;vielleicht hier noch ein hotkeyset mit funktion zum wieder sichtbarmachen der GUI? For $i=1 to $AusgeleseneAnzahlWieOftErSpammenSoll ;Text senden Next ;GuiSetState(@SW_SHOW) EndFunc
Lg
|
|
|
03/21/2011, 17:20
|
#3
|
elite*gold: 0
Join Date: Aug 2010
Posts: 880
Received Thanks: 113
|
Quote:
Originally Posted by V8II
Sorry ich verstehe nicht ganz dein Problem.
|
Und wie lese ich einen Radio button aus?
|
|
|
03/21/2011, 17:24
|
#4
|
elite*gold: 0
Join Date: Jun 2009
Posts: 4
Received Thanks: 0
|
V811
hat es doch schon geschrieben:
;Hier mit GuiCtrlRead die Radioboxen und Inputbox auslesen
dann brauchst noch einen Überprüfung via If schleife.
Also
If Guictrlread($Radion1) = '1' Then
Msgbox(64,"","Radion 1 ist Aktiv")
Else
Msgbox(64,"","Radion 1 ist Nichtaktiv")
|
|
|
03/21/2011, 17:29
|
#5
|
elite*gold: 0
Join Date: Aug 2010
Posts: 880
Received Thanks: 113
|
Quote:
Originally Posted by fireman-hh
V811
hat es doch schon geschrieben:
;Hier mit GuiCtrlRead die Radioboxen und Inputbox auslesen
dann brauchst noch einen Überprüfung via If schleife.
Also
If Guictrlread($Radion1) = '1' Then
Msgbox(64,"","Radion 1 ist Aktiv")
Else
Msgbox(64,"","Radion 1 ist Nichtaktiv")

|
Ja sorry hab ich gerade auch bemerkt oO WIe dumm von mir 
Bin irgendwie durch den Wind xD
Jetzt weiß ich wie es geht bloß jetzt ist die frage, warum er es jetzt nicht nur einmal spammt 
Ich wollte ja mit dem radio button erreichen das er eine bestimmte anzahl spammt.
PHP Code:
Func _Start() GUICtrlRead(Iniread(@DesktopCommonDir&"\Spammer.ini", "", "Spam", GUICtrlRead($Input1tospam, $Radio11))) For $i=1 to $Radio11 send(Iniread(@DesktopCommonDir&"\Spammer.ini", "", "Spam", GUICtrlRead($Input1tospam))) send("{enter}") next EndFunc
|
|
|
03/21/2011, 18:30
|
#6
|
elite*gold: 0
Join Date: Aug 2010
Posts: 880
Received Thanks: 113
|
Mit einem klappts ja, aber der hat ein konflikt mit dem next undso.
Wie kann ich dass verhindern?
PHP Code:
Func _Start() For $i=1 to $Radio10 send(Iniread(@DesktopCommonDir&"\Spammer.ini", "", "Spam", GUICtrlRead($Input1, $Radio10))) send("{enter}") sleep(Iniread(@DesktopCommonDir&"\Spammer.ini", "", "Time", GUICtrlRead($Input2))) next
|
|
|
03/22/2011, 12:32
|
#7
|
elite*gold: 0
Join Date: Aug 2010
Posts: 880
Received Thanks: 113
|
So hab jetzt einiges ergänzt...
Müsste alles klappen
Hier der Code:
PHP Code:
#include <ButtonConstants.au3> #include <EditConstants.au3> #include <GUIConstantsEx.au3> #include <StaticConstants.au3> #include <WindowsConstants.au3> #Region ### START Koda GUI section ### Form=d:\neuer ordner\koda_1.7.3.0\forms\spammer.kxf $Form1_1 = GUICreate(" |:=-Spammer-=:|", 212, 294, 191, 121) $Label1 = GUICtrlCreateLabel("Text to Spam:", 8, 8, 86, 20) GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif") $Input1 = GUICtrlCreateInput("Here the Text", 8, 32, 193, 21) $Label2 = GUICtrlCreateLabel("How often to Spam:", 8, 64, 119, 20) GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif") $Checkbox8 = GUICtrlCreateCheckbox("Checkbox8", 24, 136, 1, 9) $Button1 = GUICtrlCreateButton("Activate", 56, 168, 97, 25) GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif") $Label3 = GUICtrlCreateLabel("Press F1 to start spamming", 8, 200, 130, 17) $Label4 = GUICtrlCreateLabel("Press F3 to show the Menü", 8, 216, 133, 17) $Label5 = GUICtrlCreateLabel("Wait between the last spam:", 8, 120, 170, 20) GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif") $Input2 = GUICtrlCreateInput("1000", 8, 144, 41, 21) $Label6 = GUICtrlCreateLabel("Milliseconds", 56, 144, 79, 20) GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif") $Input3 = GUICtrlCreateInput("15", 8, 88, 41, 21) $Label7 = GUICtrlCreateLabel("Press F5 for pause", 8, 232, 92, 17) $Label8 = GUICtrlCreateLabel("Made by Ludder231", 0, 272, 116, 17) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") GUICtrlSetColor(-1, 0x000080) GUISetState(@SW_SHOW) #EndRegion ### END Koda GUI section ###
HotKeySet("{F1}", "_Start") HotKeySet("{F3}", "_pause")
While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit case $Button1 GUISetState(@sw_hide) iniWrite(@DesktopCommonDir&"\Spammer.ini", "", "Spam", GUICtrlRead($Input1)) iniWrite(@DesktopCommonDir&"\Spammer.ini", "", "Time", GUICtrlRead($Input2)) iniWrite(@DesktopCommonDir&"\Spammer.ini", "", "Howmuch", GUICtrlRead($Input3)) if not FileExists(@DesktopCommonDir&"\Spammer.ini") Then msgbox(16, "Error", "Spammer.ini don't exist...") endif _tooltip() EndSwitch
WEnd
func _tooltip() ToolTip("Press F1 to Start spamming" & @CRLF & _ "Press F3 to pause the bot", 0, 0, "Help", 1) EndFunc Func _Start() for $i=1 to GUICtrlRead($Input3) send(Iniread(@DesktopCommonDir&"\Spammer.ini", "", "", GUICtrlRead($Input1))) send("{enter}") sleep(Iniread(@DesktopCommonDir&"\Spammer.ini", "", "Time", GUICtrlRead($Input2))) next GUISetState(@sw_show, " |:=-Spammer-=:|") MsgBox(0, "Ready", "Finished spamming...")
endFunc
func _pause() while 1 sleep(500) wend endfunc
P.S: Bei manchen sonderzeichen wie ! klappts nicht das er enter drückt
Bei # erscheint garnicht erst
Viele Grüße an die Leecher
|
|
|
03/22/2011, 13:59
|
#8
|
elite*gold: 0
Join Date: Jul 2010
Posts: 475
Received Thanks: 130
|
Ein bisschen aufwendig geschrieben, ansonsten herzlichen Glückwunsch, dass du es geschafft hast!
Was mir so auf die schnelle aufgefallen ist, dass du keine Variablen benutzt. Wenn du dich nicht auskennst, melde dich doch mal bei mir bei Skype (Hunternino) dann kann ich dir Sachen erklären oder bei Problemen helfen. Ich habe bemerkt, dass du des öfteren Fragen stellst, deshalb währe es vielleicht effektiver dir über Skype zu helfen.
Achja, nochwas, hier im Forum ist es nicht erwünscht, wenn das selbe Mitglied mehrere Beiträge hintereinander schreibt. Bitte versuche in Zukunft nicht mehrere Male nacheinander schreiben, es gibt auch den Edit-Knopf, mit dem kann man was in einen schon vorhandenen Beitrag schreiben.
Lg V8II
|
|
|
03/22/2011, 14:24
|
#9
|
elite*gold: 0
Join Date: Aug 2010
Posts: 880
Received Thanks: 113
|
Quote:
Originally Posted by V8II
Ein bisschen aufwendig geschrieben, ansonsten herzlichen Glückwunsch, dass du es geschafft hast!
Was mir so auf die schnelle aufgefallen ist, dass du keine Variablen benutzt. Wenn du dich nicht auskennst, melde dich doch mal bei mir bei Skype (Hunternino) dann kann ich dir Sachen erklären oder bei Problemen helfen. Ich habe bemerkt, dass du des öfteren Fragen stellst, deshalb währe es vielleicht effektiver dir über Skype zu helfen.
Achja, nochwas, hier im Forum ist es nicht erwünscht, wenn das selbe Mitglied mehrere Beiträge hintereinander schreibt. Bitte versuche in Zukunft nicht mehrere Male nacheinander schreiben, es gibt auch den Edit-Knopf, mit dem kann man was in einen schon vorhandenen Beitrag schreiben.
Lg V8II
|
Danke!
Das mit dem "auskennen" stimmt ja.  Hmm, hab mich auch schon gefragt ob das erlaubt ist mit dem mehreren beiträgen undso
Naja hab jetzt erstmal meine beiden Programme fertig und weiß noch nicht was ich als nächstes machen werde.
Das mit dem Angebot finde ich sehr Nett werd ich mir merken wenn ich mal Probleme mit iwas hab oder fragen..
MfG Ludder231
|
|
|
03/22/2011, 14:30
|
#10
|
elite*gold: 0
Join Date: Jul 2010
Posts: 475
Received Thanks: 130
|
Also wenn du eine leichte Aufgabe zum Üben suchst, ich habe mal ein Programm geschrieben mit vielen einfachen Funktionen drin. Du könntest sowas in der Art auch mal versuchen. (  )
Lg V8II
Edit: Naja nicht ich habs geschrieben, AutoitScript hat mitgeholfen, habe den armen Kerl ganz vergessen
|
|
|
 |
Similar Threads
|
FTS-Hacks Official Multi Tool [Spammer,HackSearcher,Crosshair,Music.] *Spammer Works*
03/19/2011 - WarRock Hacks, Bots, Cheats & Exploits - 9 Replies
FTS-Hacks Official Multi Tool
Hallo Elitepvpers,
Ich hatte mich Heute morgen mit ein Paar freunden An Visual Basic gesetzt und wir Hatten ein Multi Tool gemacht..
http://www.fotos-hochladen.net/uploads/mt1z7nlxdu 9q.jpg
Download:
Download via. Mediafire
Download via. Ul.to
|
[FRAGE]Wie kriegt man das Detected weg von eigenen Hacks/bot/spammer
03/18/2011 - Metin2 - 9 Replies
Frage steht oben.
Habe eigenen Spambot gemacht.
Der is aber immer nach 5 sekunden detected.
Wie kriegt man das weg?
Pls antwort :P
|
( Frage ) Warrock Spammer
09/10/2010 - WarRock - 6 Replies
Hey,
Suche Warrock Spammer.
Bitte einfach Downloadlink schieken.
Ps: wahrscheinlich habt ihr sogar nen Thread, wenn ja pls einfach Link einfügen
|
AutoIt Frage zu einen Spammer mit GUI Menü
08/22/2010 - AutoIt - 3 Replies
Hallo, ich versuche derzeit einen Spammer zu machen, ich hab mir schon AutoIt Grundlagen durchgelesen und weiterführendes auch...
Ich mache jetzt zu Übung einen Coder, einen selbst schießenden AimBot hab ich bereits mit etwas Hilfe geschafft (armes Moorhuhn^^).
Also so siehts aus:
Ich weiß nicht, warum es nicht starten will, wenn ich 1 in Interval schreibe und etwas in die erste Textbox eingebe, HotKey ist die UP also die Hochtaste...
#include <EditConstants.au3>
#include...
|
[SPAMMER]=Update? Frage)
01/10/2010 - WarRock - 8 Replies
Hallo Leute ich hätte da eine Kurze Frage,
Und Zwar es war Ja ein Update . Und Zwar wenn ein Update ist werden dann auch die Spammer Detectet ?
Kein einziger Geht bei mir Zurzeit oder mache ich da was Falsch PN Me für Hilfe Bitte,
Und Wenn Jemand ein Guten Spammer hat link per PN Danke:mofo:
|
All times are GMT +1. The time now is 12:19.
|
|