Register for your free account! | Forgot your password?

Go Back   elitepvpers › Coders Den › AutoIt
You last visited: Today at 07:10

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

Advertisement



Frage zu GUI von meinem Bot

Discussion on Frage zu GUI von meinem Bot within the AutoIt forum part of the Coders Den category.

Reply
 
Old   #1
 
Rorc's Avatar
 
elite*gold: 113
The Black Market: 133/2/0
Join Date: Dec 2009
Posts: 16,685
Received Thanks: 4,451
Frage zu GUI von meinem Bot

Hallo erstmal,

ich, als anfänger in AutoIT brauche eure hilfe bei diesem Bot
PHP Code:
#cs
;Name: Nostale Spammbot by Oodama
;Features:Eigene Texteingabe,Eigene Zeitangabe
;
;
Bitte vor abändern der Datei mich Fragen, Danke.
;
;
;
#ce





#RequireAdmin
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>

#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Spamm-Bot by Oodama", 633, 311, 192, 124)
$Button1 = GUICtrlCreateButton("Spammen!", 416, 16, 169, 97, 0)
$Button2 = GUICtrlCreateButton("Schliessen", 416, 120, 169, 49, 0)
$Label1 = GUICtrlCreateLabel("Was soll Geschrieben werden?", 24, 8, 348, 41)
$text = GUICtrlCreateInput("Dein Text!", 24, 64, 345, 21)
$Label2 = GUICtrlCreateLabel("In welchem Abstand soll Geschrieben werden? (Millisekunden)", 24, 96, 348, 41)
$zeit = GUICtrlCreateInput("Zeitabstand", 24, 152, 345, 21)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
    $nMsg 
= GUIGetMsg()
    Switch 
$nMsg
        
Case $GUI_EVENT_CLOSE
            
Exit
        Case 
$Button1
            
While 1
            ControlSend
("NosTale", "", 0, "{enter}")
            
ControlSend("NosTale", "", 0,  $text )
            
ControlSend("NosTale", "", 0, "{space}")
            
sleep($zeit)
            
WEnd
        
Case $Button2
            
Exit
    EndSwitch
WEnd 
sowit so gut, aber der bot schreibt nie das was ich in das input eingegeben habe
wie muss ich es machen dass wenn ich in das erste input etwas eingebe dass es dann auch das schreibt ??

das war auch schon meine frage, wenn irgendetwas unklar ist melden,
und bitte anfängerfreundlich erklären
Rorc is offline  
Thanks
1 User
Old   #2
 
elite*gold: 0
Join Date: Jul 2009
Posts: 2,241
Received Thanks: 848
Das ist ein Problem der meisten Newbies^^

Bevor du die Daten aus einem Control - sei es nun ein Input, ein Edit oder eine Listbox, etc - verwenden kannst, musst du sie erst auslesen.
Dies kannst du mit
PHP Code:
GUICtrlRead(Dein Control z.B. $text) 
machen.
So würde das z.B. für Send() aussehen:
PHP Code:
$read = GUICtrlRead($text)
Send($read) 
MfG. mipez
mipez is offline  
Old   #3
 
elite*gold: 0
Join Date: Nov 2009
Posts: 927
Received Thanks: 1,317
Quote:
Originally Posted by mipez View Post
Das ist ein Problem der meisten Newbies^^

Bevor du die Daten aus einem Control - sei es nun ein Input, ein Edit oder eine Listbox, etc - verwenden kannst, musst du sie erst auslesen.
Dies kannst du mit
PHP Code:
GUICtrlRead(Dein Control z.B. $text) 
machen.
So würde das z.B. für Send() aussehen:
PHP Code:
$read = GUICtrlRead($text)
Send($read) 
MfG. mipez
Geht auch einfacher:

PHP Code:
Send(GUICtrlRead($text)) 
ohne den Umweg über eine extra Variable zu machen.

Welches Problem aber sicher noch auf dich zukommen wird, ist, daß sich der Spambot nach starten der 2. Schleife (Spam) nicht mehr über die Buttons beenden lassen wird.
Dieses wurde aber schon in einem anderen Thread hier im AutoIt-Bereich, es war auch ein Spambot, gelöst.
Das Problem liegt ganz einfach darin, daß der Bot, wenn die Spam-Funktion erstmal gestartet ist, nur noch die kurze Schleife ausführt, der Rest aber nicht mehr gelesen wird.


Gruß
huberhans is offline  
Old   #4
 
black_byte's Avatar
 
elite*gold: 0
Join Date: Jan 2010
Posts: 447
Received Thanks: 315
Wenn das nicht mehr kappen sollte mit dem schließen sollte man einfach denn "GUIOnEventMode" verwenden, denn man mit Opt("GUIOnEventMode", 1) starten kann. Dazu sollte man sich dann aber erstmal die bsp. in der hilfe anschauen.

MfG *** Daniel ***
black_byte is offline  
Old   #5
 
elite*gold: 0
Join Date: Nov 2009
Posts: 927
Received Thanks: 1,317
Quote:
Originally Posted by Xxx Daniel xxX View Post
Wenn das nicht mehr kappen sollte mit dem schließen sollte man einfach denn "GUIOnEventMode" verwenden, denn man mit Opt("GUIOnEventMode", 1) starten kann. Dazu sollte man sich dann aber erstmal die bsp. in der hilfe anschauen.

MfG Xxx Daniel xxX
Ich persönlich mag den "GUIOnEventMode" nicht.
Im Grunde kann der TE seinen Aufbau beibehalten, wenn er die Spamfunktion ohne Zweit-Schleife abarbeiten lässt. Würde dann bei seinem Script so aussehen:

PHP Code:
#cs
;Name: Nostale Spammbot by Oodama
;Features:Eigene Texteingabe,Eigene Zeitangabe
;
;
Bitte vor abändern der Datei mich Fragen, Danke.
;
;
;
#ce





#RequireAdmin
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>

#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Spamm-Bot by Oodama", 633, 311, 192, 124)
$Button1 = GUICtrlCreateButton("Spammen!", 416, 16, 169, 97, 0)
$Button2 = GUICtrlCreateButton("Schliessen", 416, 120, 169, 49, 0)
$Label1 = GUICtrlCreateLabel("Was soll Geschrieben werden?", 24, 8, 348, 41)
$text = GUICtrlCreateInput("Dein Text!", 24, 64, 345, 21)
$Label2 = GUICtrlCreateLabel("In welchem Abstand soll Geschrieben werden? (Millisekunden)", 24, 96, 348, 41)
$zeit = GUICtrlCreateInput("Zeitabstand", 24, 152, 345, 21)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

Global $Bedingung = False
Global $Timer = TimerInit()

While 
1
    $nMsg 
= GUIGetMsg()
    Switch 
$nMsg
        
Case $GUI_EVENT_CLOSE
            
Exit
        Case 
$Button1
            
If $Bedingung = True Then
               $Bedingung 
= False
            
ElseIf $Bedingung = False Then
               $Bedingung 
= True
            
EndIf
        Case 
$Button2
            
Exit
    EndSwitch

Spamfunktion()
WEnd  

Func Spamfunktion
()
      If 
$Bedingung = True And Timerdiff($Timer)>= GUICtrlRead($zeit) Then
            ControlSend
("NosTale", "", 0, "{enter}")
            
ControlSend("NosTale", "", 0,  GUICtrlRead($text))
            
ControlSend("NosTale", "", 0, "{space}")
            
$Timer = Timerinit()
      EndIf
EndFunc 
huberhans is offline  
Old   #6
 
black_byte's Avatar
 
elite*gold: 0
Join Date: Jan 2010
Posts: 447
Received Thanks: 315
Bei extrem großen GUI's ist der GUIOnEventMode aber viel übersichtlicher. Ist halt meine Meinung

MfG *** Daniel ***
black_byte is offline  
Old   #7
 
elite*gold: 0
Join Date: Nov 2009
Posts: 927
Received Thanks: 1,317
Quote:
Originally Posted by *** Daniel *** View Post
Bei extrem großen GUI's ist der GUIOnEventMode aber viel übersichtlicher. Ist halt meine Meinung

MfG *** Daniel ***
Ansichtssache... Kannst ja das Spambot-Script mal auf OnEvent umstricken, dann kann sich der TE aussuchen, welche Variante er verwenden mag.

Man kann beide Varianten so "verwursteln" daß es unübersichtlich wird. Mit etwas Strukturierung kann auch meine Variante übersichtlich gestaltet werden.
huberhans is offline  
Reply


Similar Threads Similar Threads
[Frage] zu meinem bin/sh fehler
08/26/2010 - Metin2 Private Server - 4 Replies
ich hab schon fsck eingegeben und die ganze zeit y,bzw. z gedrückt des etz schon 15min. da kommt die ganze zeit aber nur folgendes: http://img26.imageshack.us/img26/8360/unbenanntdv .png Uploaded with ImageShack.us schonmal thx!
Frage zu meinem mf Hdin
07/07/2010 - Diablo 2 - 9 Replies
wollte einfach mal fragen was ihr zu dem mf hdin von mir sagt. Ingame hat es nur kritik gehagelt aber mfen geht wunderbar mit dem hdin. also leute sagt mir ob das so geht ich bin zufrieden aber möchte mir gerne noch andere meinungen einholen ^^ hier ma alles zusammengefasst und danke schonmal MfG BaLla
Frage zu meinem laptop
06/22/2010 - Technical Support - 5 Replies
hallo com also wen ich zb wow zogge und den laptop zuklappe bekomm ich kick und i net verbindung kackt ab bei meinem freund geht das???? kan man das umstellen? pls help €DIT:hab windows vista web das was nützt
FRAGE ZU MEINEM PRIVATSERVER
03/18/2010 - Metin2 - 3 Replies
hallo liebe gamer und admins und was weiß ich noch.. ich habe mir mal lustigerweise einen prvt. server erstelle und bislang alles eingestellt... netzwerkdingsi eingestellt, virtuel pc eingestellt und die FTERM eingestellt... soweit alles in ordnung... ich habe keine lust mit nem german norm client oder nem chn. client zu spielen... also habe ich alles kurzerhand in den nw2 ordner gepackt.. also diese bekannt sura exe und den rest... beim starten der exe kommt die fehlermeldung : LOG...
[Frage] Zu meinem Patcher...
03/07/2010 - Metin2 Private Server - 1 Replies
Wüsste jemand den AutoIt Befehl, wie man den Taskleistenname ausblenden kann, möchte ihn nähmlich so wie .de >.< Freue mich auf Antworten. MfG Profi



All times are GMT +2. The time now is 07:11.


Powered by vBulletin®
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
SEO by vBSEO ©2011, Crawlability, Inc.

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