|
You last visited: Today at 23:32
Advertisement
Skript Starten
Discussion on Skript Starten within the AutoIt forum part of the Coders Den category.
02/26/2010, 15:35
|
#1
|
elite*gold: 0
Join Date: Apr 2009
Posts: 133
Received Thanks: 12
|
Skript Starten
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
|
#2
|
elite*gold: 240
Join Date: Dec 2006
Posts: 1,579
Received Thanks: 1,609
|
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
|
#3
|
elite*gold: 0
Join Date: Apr 2009
Posts: 133
Received Thanks: 12
|
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
|
#4
|
elite*gold: 20
Join Date: Dec 2009
Posts: 1,850
Received Thanks: 484
|
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
|
#5
|
elite*gold: 0
Join Date: Apr 2009
Posts: 133
Received Thanks: 12
|
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
|
#6
|
elite*gold: 50
Join Date: Feb 2009
Posts: 2,173
Received Thanks: 1,766
|
Quote:
Originally Posted by kajaman
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
|
#7
|
elite*gold: 0
Join Date: Apr 2009
Posts: 133
Received Thanks: 12
|
Und wie geht das ? kannstem ir nen code reinschreiben der das macht ?
|
|
|
02/28/2010, 17:20
|
#8
|
elite*gold: 0
Join Date: Mar 2009
Posts: 7,260
Received Thanks: 33,149
|
GUICtrlRead($Text) und GUICtrlRead($Zeit)
|
|
|
03/01/2010, 14:30
|
#9
|
elite*gold: 0
Join Date: Apr 2009
Posts: 133
Received Thanks: 12
|
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
|
#10
|
elite*gold: 0
Join Date: Mar 2009
Posts: 7,260
Received Thanks: 33,149
|
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
|
#11
|
elite*gold: 0
Join Date: Apr 2009
Posts: 133
Received Thanks: 12
|
Danke KillerDeluxe aber der funktioniert trdm nicht...
Also es passiert auf dem start button nix
|
|
|
03/01/2010, 17:33
|
#12
|
elite*gold: 0
Join Date: Mar 2009
Posts: 7,260
Received Thanks: 33,149
|
Hättest mir einfach eine richtige Vorlage geben sollen
Ersetz das $Mee (das Bild) durch $Button1
|
|
|
03/01/2010, 17:46
|
#13
|
elite*gold: 0
Join Date: Apr 2009
Posts: 133
Received Thanks: 12
|
Danke bist ein held aber bin cih fast selbst drauf gekommen weil aufs bild klicken is iwie dumm
|
|
|
 |
Similar Threads
|
HP Skript+Regi Skript+Geiles Design
09/04/2010 - Metin2 Private Server - 18 Replies
Hey,Leutz!
Wollte ein neues HP Skript Publik machen das über Xampp läuft.
Es hat ein cooles Design und es ist ein Regi-Skript beigefügt!
Screen:
http://s10.directupload.net/images/100425/temp/zr m5nykf.png
Natürlich kann alles geändert werden,auch Hintergrund und Logo!
Ihr benötigt Xampp! Xampp Download:http://www.chip.de/downloads/c1_downloads _hs_getfile_v1_22023282.html?t=1272220567&v=36 00&
So wenn ihr das installiert habt,ladet ihr euch meine Website runter!Ist im Anhang.
|
Skript Für Hp
04/26/2010 - Metin2 Private Server - 10 Replies
Hey leute ich suche einen skript für die hp wo man sieht wv online sind. So was wie auf newworld udn metin2united
MFG
Destii
|
Skript mit Windows starten
10/20/2009 - AutoIt - 11 Replies
Ist es möglich ein Skript zu starten, wenn Windows gestartet ist?
Also wenn der PC hochfährt, das das Skript sofort startet?
Und das das Skript nicht beendet werden kann oder das es sich selbst startet wenn man es beendet?
|
php skript
05/27/2006 - Off Topic - 4 Replies
suche ein php skript was folgendes ausführt
server 1 = .htaccess geschützt, da liegt die php file
server 2 = liegen diverse files für den user
user geht auf server 1 sucht sich seine file aus die er haben will, gibt .htaccess login daten ein, so nun greift er auf das php skript zu das ihn auf server 2 verlinkt wo er seine datei downloaden kann!
versteht ihr was ich meine??
|
All times are GMT +1. The time now is 23:33.
|
|