Was mach ich falsch?

[Flasher2]

Also versuche grade ein PickUp Bot mit Buttons zu erstellen

Es geht auch
Nur kann ich ihn nicht Pausieren oder Beenden

Guckt euch das mal an vllt. wisst ihr was das Problem ist

#RequireAdmin

GuiCreate("Metin2 PickUpBot",275,537,341,0)
$button1=GuiCtrlCreateButton("Start",96,35,90,50)
$button2=GuiCtrlCreateButton("Pause",93,111,90,50)
$button3=GuiCtrlCreateButton("End",92,194,90,50)
$button4=GuiCtrlCreateButton("Elitepvpers",9,513,90,17)
$button5=GuiCtrlCreateButton("My Homepage",125,514,90,17)
GuiSetState()

While 1
$msg=GuiGetMsg()
If $msg=-3 Then Exit
If $msg=$button1 Then button1()
If $msg=$button2 Then button2()
If $msg=$button3 Then button3()
If $msg=$button4 Then button4()
If $msg=$button5 Then button5()
Wend


Func button1()
Sleep (5000)
while 1 
Send ("y")
sleep(100)
wend;
EndFunc

Func button2()
Sleep (99999999999999999999999999999999999999999999999999)	
EndFunc

Func button3()
Exit
EndFunc

Func button4()
EndFunc

Func button5()
EndFunc

Und?

Achja undwürde noch gerne wissen wie ich das mache das wenn ich z.b. Button elitepvpers klicke sich elitepvpers.com öffnet?

Freue mich über Antworten

[.nAno]

Originally Posted by Flasher2

Achja undwürde noch gerne wissen wie ich das mache das wenn ich z.b. Button elitepvpers klicke sich elitepvpers.com öffnet?

IENavigate (IE.au3)

[KDeluxe]

Oder

PHP Code:

ShellExecute("http://www.elitepvpers.com/forum/") 


[Flasher2]

lol soll ich dann einfach bei dem button

ShellExecute("http://www.elitepvpers.com/forum/")

machen oder was? check ich net :P

habs ma ausprobiert geht THX

Und why kann ich ihn nicht pausieren oder beenden?

[Wissom]

Das Problem ist das Dein Script innerhalb des Ablaufes gefangen ist und nicht mehr dazukommt die Buttons abzufragen. Deswegen reagiert der Bot nicht mehr wenn er einmal läuft.
Um das zu ändern habe ich nach jedem Durchlauf eine neue Abfrage eingefügt und einige Sicherheitsabfragen dazu um Bugs aus dem Weg zugehen.

Viel spaß

#RequireAdmin

GuiCreate("Metin2 PickUpBot",275,537,341,0)
$button1=GuiCtrlCreateButton("Start",96,35,90,50)
$button2=GuiCtrlCreateButton("Pause",93,111,90,50)
$button3=GuiCtrlCreateButton("End",92,194,90,50)
$button4=GuiCtrlCreateButton("Elitepvpers",9,513,90,17)
$button5=GuiCtrlCreateButton("My Homepage",125,514,90,17)
GuiSetState()

;Variablen
;Die Variable $Pause schaut ob der Bot momentan am laufen ist oder ob er pausiert
;Die Variable $OnOff schaut ob der Bot bereits läuft 
$Pause = 0
$OnOff = 0

;Starte Funktion Check in einer Schleife
while 1
Check()
Wend

;Funktion Check überprüft ob ein Button gedrückt wurde
Func Check()
$msg=GuiGetMsg()
If $msg=$button1 Then button1()
If $msg=$button2 Then button2()
If $msg=$button3 Then button3()
If $msg=$button4 Then button4()
If $msg=$button5 Then button5()
EndFunc

;Funktion button1 Prüft ob der Bot läuft und ändert darauf hin Variable $OnOff
;Führt dannach den Bot aus und checkt am ende die Buttons mit der Funktion Check
;Läuft der Bot bereits springt er direkt zum ende der Funktion
Func button1()
if $OnOff == 0	then
	$OnOff = 1		
	Sleep (5000)
	while 1
	Send ("y")
	sleep(100)
	Check()
	WEnd
else
EndIf
EndFunc

;Funktion button2 hält das Script in einer Schleife gefangen bis Button 1 oder 2 erneut gedrückt werden
;oder Button 3 das Script beendet
Func button2()
$Pause = 0
While $Pause == 0
	$msg=guiGetMsg()
	If $msg=$button1 Then $Pause = 1
	If $msg=$button2 Then $Pause = 1
	If $msg=$button3  Then Exit
Wend
	
EndFunc
;Funktion button 3 beendet das Script
Func button3()
Exit
EndFunc

;Funktion button 4 ruft die Internetseite auf
Func button4()
ShellExecute("http://www.elitepvpers.com/forum/") 	
EndFunc

;Funktion button5 hat keine Funktion
Func button5()
EndFunc

[Flasher2]

großes THx an dich klappt perfekt. =)))))))))))))))))))))))))))))