Ich möchte gerne für ein Metin ein Aufhebbot schreiben. Hab versucht mit Hilfe von einem GUI das Senden der Taste "y" AN/AUS zu schalten, damit man noch ganz normal chatten kann. Ist wohl schiefgegangen. Er schaltet es nicht an und aus. Bitte um Hilfe.
Habs, ausversehen in Falschen bereicht gepostet, kann geclosed werden.Quote:
#include <GUIConstantsEx.au3>
GUICreate("AufhebBot", 400, 100)
GUICtrlCreateLabel("Wilkommen im Aufhebbot", 30, 10)
$AnButton = GUICtrlCreateButton("AN", 70, 50, 60)
$PauseButton = GUICtrlCreateButton( "PAUSE", 140, 50, 60)
GUISetState(@SW_SHOW) ;ganz normales GUI erstellt
While 1
$msg = GUIGetMsg() ;stetiges Abfragen von Ereignissen
Select
case $msg = $ANbutton ;Das hier soll passieren wenn "AN" gedrückt wurde
Do
send("y")
Until $msg = $PAUSEbutton ;solange bis "PAUSE" gedrückt wurde
case $msg = $PAUSEbutton ;wenn "PAUSE" gedrückt wurde soll gewartet werden
Do
sleep(100)
Until $msg = $ANbutton ;bis "AN" gedrückt wurde, dann sollte er eig wieder dem ersten case dingen anfangen...
ExitLoop
EndSelect
WEnd