Funktionen mit GUI's AN/AUS schalten

  • Hallo, ich hab folgendes Proplem:
    Ich möchte gerne für ein Spiel ( Metin2 ) ein Aufhebbot schreiben, dann muss man nicht ständig die "y" Taste drücken. Hab versucht mit Hilfe von einem GUI das Senden der Taste "y" AN/AUS zu schalten. Ist wohl schiefgegangen^^. Er schaltet es nicht an und aus. Bitte um Hilfe.

    Spoiler anzeigen
    [autoit]

    #include

    [/autoit] [autoit][/autoit] [autoit]

    GUICreate("AufhebBot", 400, 100)
    GUICtrlCreateLabel("Wilkommen im Aufhebbot", 30, 10)
    $AnButton = GUICtrlCreateButton("AN", 70, 50, 60)
    $PauseButton = GUICtrlCreateButton( "PAUSE", 140, 50, 60)

    [/autoit] [autoit][/autoit] [autoit]

    GUISetState(@SW_SHOW) ;ganz normales GUI erstellt

    [/autoit] [autoit][/autoit] [autoit]

    While 1
    $msg = GUIGetMsg() ;stetiges Abfragen von Ereignissen

    [/autoit] [autoit][/autoit] [autoit]

    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

    [/autoit] [autoit][/autoit] [autoit]

    WEnd

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit]

    Einmal editiert, zuletzt von Wookie (22. Juni 2009 um 22:13)