AutoIt Bot

[iJonas]

Hallo, liebe Com
Also ich habe mir einen Bot geschrieben zum automatisch einloggen und ausloggen und halt dazwischen was machen...
Doch ich wieß nicht wies mit Start/Stop Pause/Weiter
Geht wenn ich ihn starte habe ich nichtz er fängt einfach an...
Also habe ich Buttons gemacht mit denen man starten/stoppen & pausieren/weitermnachen kann
Hier das Script:

PHP Code:

#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("LP-Farm-Bot", 320, 120, 1363, 216)
$Group1 = GUICtrlCreateGroup("Start und Stop", 8, 0, 297, 49)
$Button1 = GUICtrlCreateButton("Bot starten...", 16, 16, 137, 25)
$Button3 = GUICtrlCreateButton("Bot beenden...", 168, 16, 121, 25)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Group2 = GUICtrlCreateGroup("Pause und Weiter", 8, 56, 297, 49)
$Button2 = GUICtrlCreateButton("Pause...", 16, 72, 137, 25)
$Button4 = GUICtrlCreateButton("Weiter...", 168, 72, 121, 25)
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
        Case $Button1
            Send("Beispiel)
        Case $Button3
            
        Case $Button2

        Case $Button4 


Button1= Start
Button3=Stopp(Porgramm schließen (komplett))
Button2=Pausieren bis Button4 gedrückt
Button4=Weitermachen(von der stelle an wo es pausiert wurde)

....Danke für eure ideen..

[BlackHybrid]

Versuche mal durch das drücken eines buttens eine Variabele auf true oder sonstiges zu setzen. Dann machst du einfach unten drunter unter der Switch Abfrage aber noch in der While Schleife eine If abfrage in der du abfragst ob die Variable = true ist. da hinten drann kannst du z.B ein kleinen bot schreiben

[iJonas]

...?
Mach mal ein Bsp..

[BlackHybrid]

PHP Code:

#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
Global $status = False
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("LP-Farm-Bot", 320, 120, 1363, 216)
$Group1 = GUICtrlCreateGroup("Start und Stop", 8, 0, 297, 49)
$Button1 = GUICtrlCreateButton("Bot starten...", 16, 16, 137, 25)
$Button3 = GUICtrlCreateButton("Bot beenden...", 168, 16, 121, 25)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Group2 = GUICtrlCreateGroup("Pause und Weiter", 8, 56, 297, 49)
$Button2 = GUICtrlCreateButton("Pause...", 16, 72, 137, 25)
$Button4 = GUICtrlCreateButton("Weiter...", 168, 72, 121, 25)
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
        Case $Button1
            $status = True
        Case $Button3

        Case $Button2

        Case $Button4
    EndSwitch
    If $status = True Then
        Send("Beispiel")
    EndIf
WEnd 


Geht aber auch besser hab nur grad vergessen wie

[iJonas]

Und was ist mit den anderen ?!

[BlackHybrid]

Als wäre das nicht fast schon klar^^

PHP Code:

#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
Global $status = False
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("LP-Farm-Bot", 320, 120, 1363, 216)
$Group1 = GUICtrlCreateGroup("Start und Stop", 8, 0, 297, 49)
$Button1 = GUICtrlCreateButton("Bot starten...", 16, 16, 137, 25)
$Button3 = GUICtrlCreateButton("Bot beenden...", 168, 16, 121, 25)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Group2 = GUICtrlCreateGroup("Pause und Weiter", 8, 56, 297, 49)
$Button2 = GUICtrlCreateButton("Pause...", 16, 72, 137, 25)
$Button4 = GUICtrlCreateButton("Weiter...", 168, 72, 121, 25)
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
        Case $Button1
            $status = True
        Case $Button2
            $status = False
        Case $Button3
            Exit
        Case $Button4
            $status = True
    EndSwitch
    If $status = True Then
        Send("Beispiel")
    EndIf
WEnd 


[omer36]

wozu so viele buttons?

so gehts zb auch:

PHP Code:

Dim $run = False, $button_name[2] = ['Bot starten...', 'Bot pausieren...']
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("LP-Farm-Bot", 310, 50, 1363, 216)
$Group1 = GUICtrlCreateGroup("Start und Stop", 8, 0, 297, 49)
$Button1 = GUICtrlCreateButton("Bot starten...", 16, 16, 137, 25)
$Button2 = GUICtrlCreateButton("Bot beenden...", 168, 16, 121, 25)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case -3
            Exit
        Case $Button1
            $run = Not $run
            GUICtrlSetData($Button1, $button_name[$run])
            If $run Then
            Sleep(2000)
            Send("beispiel")
            EndIf
        Case $Button2
            Exit
    EndSwitch
WEnd 


[iJonas]

Ich nehme trotzdem lieber das von Hybrid..
Gibts irgendwie sowas wie eine WIederholschleife das der das ganz oft wieder holt?

[puzzlr]

gibt es. du setzt einfach das, was du immer wiederholen willst in eine Endlosschleife. zb.

While 1
MouseClick ("left, 0,0)
Sleep (10)
WEnd

das würde sich zb. immer wiederholen .