Register for your free account! | Forgot your password?

Go Back   elitepvpers > Coders Den > AutoIt
You last visited: Today at 12:19

  • Please register to post and access all features, it's quick, easy and FREE!

Advertisement



[Frage] Spammer

Discussion on [Frage] Spammer within the AutoIt forum part of the Coders Den category.

Reply
 
Old   #1
 
Ludder231's Avatar
 
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"212346191121)
$Label1 GUICtrlCreateLabel("Text to Spam:"888620)
GUICtrlSetFont(-1104000"MS Sans Serif")
$Input1tospam GUICtrlCreateInput("Here the Text"83219321)
$Label2 GUICtrlCreateLabel("How often to Spam:"86411920)
GUICtrlSetFont(-1104000"MS Sans Serif")
$Checkbox8 GUICtrlCreateCheckbox("Checkbox8"2413619)
$Button1 GUICtrlCreateButton("Activate"562729725)
GUICtrlSetFont(-1104000"MS Sans Serif")
$Label3 GUICtrlCreateLabel("Press F1 to start spamming"830413017)
$Label4 GUICtrlCreateLabel("Press F3 to show the Menü"832013317)
$Label5 GUICtrlCreateLabel("Wait between the last spam:"816817020)
GUICtrlSetFont(-1104000"MS Sans Serif")
$Radio1 GUICtrlCreateRadio("1 sec"81924925)
$Radio2 GUICtrlCreateRadio("2 sec"561924925)
$Radio3 GUICtrlCreateRadio("3 sec"1121924925)
$Radio4 GUICtrlCreateRadio("5 sec"82164925)
$Radio5 GUICtrlCreateRadio("10 sec"562164925)
$Radio6 GUICtrlCreateRadio("15 sec"1122164925)
$Radio7 GUICtrlCreateRadio("20 sec"82404925)
$Radio8 GUICtrlCreateRadio("25 sec"642404925)
$Radio9 GUICtrlCreateRadio("30 sec"1202404925)
$Radio10 GUICtrlCreateRadio("1x"8884125)
$Radio11 GUICtrlCreateRadio("2x"48884125)
$Radio12 GUICtrlCreateRadio("3x"80884925)
$Radio13 GUICtrlCreateRadio("5x"81123325)
$Radio14 GUICtrlCreateRadio("10x"481124125)
$Radio15 GUICtrlCreateRadio("15x"881124925)
$Radio16 GUICtrlCreateRadio("20x"81363325)
$Radio17 GUICtrlCreateRadio("25x"481363325)
$Radio18 GUICtrlCreateRadio("30x"881364125)
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.?!
Ludder231 is offline  
Old 03/21/2011, 17:06   #2
 
V8II's Avatar
 
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_HIDEverstecken
;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
V8II is offline  
Old 03/21/2011, 17:20   #3
 
Ludder231's Avatar
 
elite*gold: 0
Join Date: Aug 2010
Posts: 880
Received Thanks: 113
Quote:
Originally Posted by V8II View Post
Sorry ich verstehe nicht ganz dein Problem.
Und wie lese ich einen Radio button aus?
Ludder231 is offline  
Old 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")
fireman-hh is offline  
Old 03/21/2011, 17:29   #5
 
Ludder231's Avatar
 
elite*gold: 0
Join Date: Aug 2010
Posts: 880
Received Thanks: 113
Quote:
Originally Posted by fireman-hh View Post
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 
Ludder231 is offline  
Old 03/21/2011, 18:30   #6
 
Ludder231's Avatar
 
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 
Ludder231 is offline  
Old 03/22/2011, 12:32   #7
 
Ludder231's Avatar
 
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-=:|"212294191121)
$Label1 GUICtrlCreateLabel("Text to Spam:"888620)
GUICtrlSetFont(-1104000"MS Sans Serif")
$Input1 GUICtrlCreateInput("Here the Text"83219321)
$Label2 GUICtrlCreateLabel("How often to Spam:"86411920)
GUICtrlSetFont(-1104000"MS Sans Serif")
$Checkbox8 GUICtrlCreateCheckbox("Checkbox8"2413619)
$Button1 GUICtrlCreateButton("Activate"561689725)
GUICtrlSetFont(-1104000"MS Sans Serif")
$Label3 GUICtrlCreateLabel("Press F1 to start spamming"820013017)
$Label4 GUICtrlCreateLabel("Press F3 to show the Menü"821613317)
$Label5 GUICtrlCreateLabel("Wait between the last spam:"812017020)
GUICtrlSetFont(-1104000"MS Sans Serif")
$Input2 GUICtrlCreateInput("1000"81444121)
$Label6 GUICtrlCreateLabel("Milliseconds"561447920)
GUICtrlSetFont(-1104000"MS Sans Serif")
$Input3 GUICtrlCreateInput("15"8884121)
$Label7 GUICtrlCreateLabel("Press F5 for pause"82329217)
$Label8 GUICtrlCreateLabel("Made by Ludder231"027211617)
GUICtrlSetFont(-188000"MS Sans Serif")
GUICtrlSetColor(-10x000080)
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"00"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
Ludder231 is offline  
Old 03/22/2011, 13:59   #8
 
V8II's Avatar
 
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
V8II is offline  
Old 03/22/2011, 14:24   #9
 
Ludder231's Avatar
 
elite*gold: 0
Join Date: Aug 2010
Posts: 880
Received Thanks: 113
Quote:
Originally Posted by V8II View Post
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
Ludder231 is offline  
Old 03/22/2011, 14:30   #10
 
V8II's Avatar
 
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
V8II is offline  
Reply


Similar Threads 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.


Powered by vBulletin®
Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
SEO by vBSEO ©2011, Crawlability, Inc.
This site is protected by reCAPTCHA and the Google Privacy Policy and Terms of Service apply.

Support | Contact Us | FAQ | Advertising | Privacy Policy | Terms of Service | Abuse
Copyright ©2025 elitepvpers All Rights Reserved.