Skript Starten

02/26/2010 15:35 kajaman#1
Hey Liebe Com,
Bin Ein Autoit noob... bin gerade an meinem Spamm-bot zugangen habe 3 inputfelder wo man den text... das send delay und denschließen Hotkey eingeben kann und ein Button Namens "Start" Die While hab ich schon gemacht... aber wie bekomm ich das hin das der auf dem button Das skript startet ...
Code:
Code:
#include <GUIConstants.au3>

#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Bot", 625, 443, 198, 130)
GUISetBkColor(0x000000)
$Mee = GUICtrlCreatePic("C:\Users\Hucky\Desktop\other\26-12-09_2039.jpg", 208, 64, 249, 111)
$Text = GUICtrlCreateInput("Spamtext", 0, 16, 161, 21)
GUICtrlSetBkColor(-1, 0xFFFFE1)
$Zeit = GUICtrlCreateInput("SpamDelay", 0, 64, 161, 21)
GUICtrlSetBkColor(-1, 0x3399FF)
$Hotkeys = GUICtrlCreateInput("Hotkeys", 0, 104, 161, 21)
GUICtrlSetBkColor(-1, 0x00FF00)
$Button1 = GUICtrlCreateButton("Start", 48, 160, 81, 57)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
$nMsg = GUIGetMsg()
Sleep(5000)
While 1
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit

Case $Mee
EndSwitch
WEnd

While True 
	Send($Text)
	Sleep($Zeit)
	HotKeySet($Hotkeys)
WEnd
Need Help..
02/26/2010 16:40 Bl@ze!#2
While 1
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit

... guck dir das genauer an, da musst du den button click mit einbeziehung und ne function aufrufen, wo du dann deine while true, schleife hineinpackst ;)
02/26/2010 16:48 kajaman#3
Danke aber da steht WEnd is not matching with While

Jetzt neu
Code:
#include <GUIConstants.au3>

#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Bot", 625, 443, 198, 130)
GUISetBkColor(0x000000)
$Mee = GUICtrlCreatePic("C:\Users\Hucky\Desktop\other\26-12-09_2039.jpg", 208, 64, 249, 111)
$Text = GUICtrlCreateInput("Spamtext", 0, 16, 161, 21)
GUICtrlSetBkColor(-1, 0xFFFFE1)
$Zeit = GUICtrlCreateInput("SpamDelay", 0, 64, 161, 21)
GUICtrlSetBkColor(-1, 0x3399FF)
$Hotkeys = GUICtrlCreateInput("Hotkeys", 0, 104, 161, 21)
GUICtrlSetBkColor(-1, 0x00FF00)
$Button1 = GUICtrlCreateButton("Start", 48, 160, 81, 57)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
$nMsg = GUIGetMsg()

While 1
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit

Case $Mee
EndSwitch
WEnd

While True 
	Send($Text)
	Sleep($Zeit)
	HotKeySet($Hotkeys)
WEnd
02/26/2010 18:16 Σternαl.#4
Switch $nMsg
Case $Mee
Send($Text)
Sleep($Zeit)
HotKeySet($Hotkeys)
Case $GUI_EVENT_CLOSE
Exit
GUIDelete()
EndSwitch


Und warum hast du 2 mal GUI_EVENT_CLOSE gemacht?
02/26/2010 21:37 kajaman#5
Das geht auch nicht, wenn ich die sachen eintragen will also text delay und hotys schrieibt der in jedes inoutfeld immer 4444444444444444444444444usw. rein.. das hört nimmer auf..
Mein Code jetzt
Code:
#include <GUIConstants.au3>

#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Bot", 625, 443, 198, 130)
GUISetBkColor(0x000000)
$Mee = GUICtrlCreatePic("C:\Users\Hucky\Desktop\other\26-12-09_2039.jpg", 208, 64, 249, 111)
$Text = GUICtrlCreateInput("Spamtext", 0, 16, 161, 21)
GUICtrlSetBkColor(-1, 0xFFFFE1)
$Zeit = GUICtrlCreateInput("SpamDelay", 0, 64, 161, 21)
GUICtrlSetBkColor(-1, 0x3399FF)
$Hotkeys = GUICtrlCreateInput("Hotkeys", 0, 104, 161, 21)
GUICtrlSetBkColor(-1, 0x00FF00)
$Button1 = GUICtrlCreateButton("Start", 48, 160, 81, 57)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
$nMsg = GUIGetMsg()

Switch $nMsg
Case $Mee
Send($Text)
Sleep($Zeit)
HotKeySet($Hotkeys)
Case $GUI_EVENT_CLOSE
Exit
GUIDelete()
EndSwitch



While True 
	Send($Text)
	Sleep($Zeit)
	HotKeySet($Hotkeys)
WEnd
02/27/2010 22:46 Neon™#6
Quote:
Originally Posted by kajaman View Post
Das geht auch nicht, wenn ich die sachen eintragen will also text delay und hotys schrieibt der in jedes inoutfeld immer 4444444444444444444444444usw. rein.. das hört nimmer auf..
Mein Code jetzt
Code:
#include <GUIConstants.au3>

#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Bot", 625, 443, 198, 130)
GUISetBkColor(0x000000)
$Mee = GUICtrlCreatePic("C:\Users\Hucky\Desktop\other\26-12-09_2039.jpg", 208, 64, 249, 111)
$Text = GUICtrlCreateInput("Spamtext", 0, 16, 161, 21)
GUICtrlSetBkColor(-1, 0xFFFFE1)
$Zeit = GUICtrlCreateInput("SpamDelay", 0, 64, 161, 21)
GUICtrlSetBkColor(-1, 0x3399FF)
$Hotkeys = GUICtrlCreateInput("Hotkeys", 0, 104, 161, 21)
GUICtrlSetBkColor(-1, 0x00FF00)
$Button1 = GUICtrlCreateButton("Start", 48, 160, 81, 57)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
$nMsg = GUIGetMsg()

Switch $nMsg
Case $Mee
Send($Text)
Sleep($Zeit)
HotKeySet($Hotkeys)
Case $GUI_EVENT_CLOSE
Exit
GUIDelete()
EndSwitch



While True 
	Send($Text)
	Sleep($Zeit)
	HotKeySet($Hotkeys)
WEnd
Du musst die Werte erst per GuiCtrlRead auslesen...
02/28/2010 16:02 kajaman#7
Und wie geht das ? kannstem ir nen code reinschreiben der das macht ?
02/28/2010 17:20 KDeluxe#8
GUICtrlRead($Text) und GUICtrlRead($Zeit)
03/01/2010 14:30 kajaman#9
Danke Mod ;)
Aber das löst das problem nicht beim start button passiert nix das problem das er immer 44444444444444 sendet is behoben aber er startet auf dem button nicht !
Hier der Code
Code:
#include <GUIConstants.au3>

#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Bot", 625, 443, 198, 130)
GUISetBkColor(0x000000)
$Mee = GUICtrlCreatePic("C:\Users\Hucky\Desktop\other\26-12-09_2039.jpg", 208, 64, 249, 111)
$Text = GUICtrlCreateInput("Spamtext", 0, 16, 161, 21)
GUICtrlSetBkColor(-1, 0xFFFFE1)
$Zeit = GUICtrlCreateInput("SpamDelay", 0, 64, 161, 21)
GUICtrlSetBkColor(-1, 0x3399FF)
$Hotkeys = GUICtrlCreateInput("Hotkeys", 0, 104, 161, 21)
GUICtrlSetBkColor(-1, 0x00FF00)
$Button1 = GUICtrlCreateButton("Start", 48, 160, 81, 57)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
$nMsg = GUIGetMsg()

Switch $nMsg
Case $Mee
Send($Text)
Send($zeit)
HotKeySet($Hotkeys)
Case $GUI_EVENT_CLOSE
Exit
GUIDelete()
EndSwitch



While True 
GUICtrlRead($Text)
GUICtrlRead($Zeit)
	HotKeySet($Hotkeys)
WEnd
03/01/2010 14:44 KDeluxe#10
Du hast die Schleife falsch gesetzt, den Send und Sleep Befehl vergessen. Außerdem hast du vergessen das spammen in eine Schleife zu packen.

Die Methode mit den Hotkeys würde ich nicht benutzen

Hier mal ganz einfach:
Code:
#include <Misc.au3> ; wird für _IsPressed benötigt

$Form1 = GUICreate("Bot", 625, 443, 198, 130)
GUISetBkColor(0x000000)
$Mee = GUICtrlCreatePic("C:\Users\Hucky\Desktop\other\26-12-09_2039.jpg", 208, 64, 249, 111)
$Text = GUICtrlCreateInput("Spamtext", 0, 16, 161, 21)
GUICtrlSetBkColor(-1, 0xFFFFE1)
$Zeit = GUICtrlCreateInput("SpamDelay", 0, 64, 161, 21)
GUICtrlSetBkColor(-1, 0x3399FF)
$Button1 = GUICtrlCreateButton("Start", 48, 160, 81, 57)
GUISetState(@SW_SHOW)

[COLOR="Red"]While True[/COLOR]
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case -3 ; = $GUI_EVENT_CLOSE
			Exit
		Case $Mee
			_spam()
	EndSwitch
[COLOR="#ff0000"]WEnd[/COLOR]

Func _spam()
	[COLOR="Red"]Do
		Send[/COLOR](GUICtrlRead($Text))
		[COLOR="#ff0000"]Sleep[/COLOR](GUICtrlRead($Zeit))
	[COLOR="#ff0000"]Until[/COLOR] _IsPressed("1B") ; ESC
EndFunc
03/01/2010 17:27 kajaman#11
Danke KillerDeluxe aber der funktioniert trdm nicht...
Also es passiert auf dem start button nix
03/01/2010 17:33 KDeluxe#12
Hättest mir einfach eine richtige Vorlage geben sollen ;)

Ersetz das $Mee (das Bild) durch $Button1
03/01/2010 17:46 kajaman#13
Danke bist ein held aber bin cih fast selbst drauf gekommen weil aufs bild klicken is iwie dumm :D