Pause

1. offizieller Beitrag

    Hallo,


    ich habe die Suchfunktion Schon genutzt da wurde nur immer gesagt schau dir diese funtion an und jende, werde aber nicht schlau.

    Also ich Möchte auf Knopfdruck(o) das Script Pausieren lassen und bei widerholten Knopfdruck (an besten auch o sonnst egal) soll es weiter gehen

    ich habe schon folgendes versucht

    [autoit]

    Global $on = True

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

    HotKeySet("{o}","pause")
    TrayTip("Hotkeys", "o = Pause und Weiter", 5)

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

    Func pause()
    If $on = True Then
    $on = False
    ElseIf $on = False Then
    $on = True
    EndIf
    EndFunc

    [/autoit]

    aber das klappt nicht, was amch ich denn falsch?

    Guck dir doch eifnach das Beispiel in der Hilfe von Hotkeyset an:

    Spoiler anzeigen
    [autoit]

    ; Press Esc to terminate script, Pause/Break to "pause"

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

    Global $Paused
    HotKeySet("{PAUSE}", "TogglePause")
    HotKeySet("{ESC}", "Terminate")
    HotKeySet("+!d", "ShowMessage") ;Shift-Alt-d

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

    ;;;; Body of program would go here ;;;;
    While 1
    Sleep(100)
    WEnd
    ;;;;;;;;

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

    Func TogglePause()
    $Paused = NOT $Paused
    While $Paused
    sleep(100)
    ToolTip('Script is "Paused"',0,0)
    WEnd
    ToolTip("")
    EndFunc

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

    Func Terminate()
    Exit 0
    EndFunc

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

    Func ShowMessage()
    MsgBox(4096,"","This is a message.")
    EndFunc

    [/autoit]

    Danke, das hatte ich nicht gefunden,

    €: Ich bekomm ne Fehlermeldung beim Starten

    Zitat

    Line-1:

    Error: Error paring function call.

    €2: Klappt doch, jedoch kann man das script weder Schliessen noch pausieren

    Einmal editiert, zuletzt von raydok (11. Juni 2009 um 18:12)

    Spoiler anzeigen
    [autoit]

    #cs ----------------------------------------------------------------------------

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

    AutoIt Version: 3.3.0.0
    Author: Raydok

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

    Script Function:
    Autoleveling Bot/ Pot Bot für Hero Online.

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

    #ce ----------------------------------------------------------------------------

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

    ; Script Start - Add your code below here

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

    Opt("SendKeyDownDelay", 1)
    Opt("SendKeyDelay", 1)

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

    ; Press Esc to terminate script, Pause/Break to "pause"

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

    Global $Paused
    HotKeySet("{PAUSE}", "TogglePause")
    HotKeySet("{ESC}", "Terminate")
    ToolTip("Press 'o' to Pause/Run the Script!", 5)

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

    ; Settings / Constants

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

    $Health = 0xD69EA5
    $CheckHP = 1
    $GameWinTitle = "Hero OnLine"

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

    WinActivate($GameWinTitle, "")
    WinWaitActive($GameWinTitle, "", 5)

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

    While 1
    Send("{v down}")
    Sleep("100")
    Send("{v up}")
    Sleep("100")
    Send("{s down}")
    Sleep("100")
    Send("{s up}")
    Sleep("100")
    Send("{1 down}")
    Sleep("100")
    Send("{1 up}")
    Sleep("100")
    Send("{s down}")
    Sleep("100")
    Send("{s up}")
    Sleep("100")
    Send("{a down}")
    Sleep("100")
    Send("{a up}")
    Sleep("100")
    Send("{s down}")
    Sleep("100")
    Send("{s up}")
    Sleep("100")
    Send("{v down}")
    Sleep("100")
    Send("{v up}")
    Sleep("100")
    Send("{s down}")
    Sleep("100")
    Send("{s up}")
    Sleep("100")
    Send("{a down}")
    Sleep("100")
    Send("{a up}")
    Sleep("2500")
    Send("{1 down}")
    Sleep("100")
    Send("{1 up}")
    Sleep("100")
    Send("{s down}")
    Sleep("100")
    Send("{s up}")
    Sleep("100")
    Send("{a down}")
    Sleep("100")
    Send("{a up}")
    Sleep("100")
    Send("{s down}")
    Sleep("100")
    Send("{s up}")
    Sleep("100")
    Send("{v down}")
    Sleep("100")
    Send("{v up}")
    Sleep("100")
    Send("{s down}")
    Sleep("100")
    Send("{s up}")
    Sleep("100")
    Send("{a down}")
    Sleep("100")
    Send("{a up}")
    Sleep("2500")
    Send("{1 down}")
    Sleep("100")
    Send("{1 up}")
    Sleep("100")
    Send("{s down}")
    Sleep("100")
    Send("{s up}")
    Sleep("100")
    Send("{a down}")
    Sleep("100")
    Send("{a up}")
    Sleep("100")
    Send("{s down}")
    Sleep("100")
    Send("{s up}")
    Sleep("100")
    Send("{v down}")
    Sleep("100")
    Send("{v up}")
    Sleep("100")
    Send("{s down}")
    Sleep("100")
    Send("{s up}")
    Sleep("100")
    Send("{a down}")
    Sleep("100")
    Send("{a up}")
    Sleep("2500")
    Send("{1 down}")
    Sleep("100")
    Send("{1 up}")
    Sleep("100")
    Send("{s down}")
    Sleep("100")
    Send("{s up}")
    Sleep("100")
    Send("{a down}")
    Sleep("100")
    Send("{a up}")
    Sleep("100")
    Send("{s down}")
    Sleep("100")
    Send("{s up}")
    Sleep("100")
    Send("{3 down}")
    Sleep("100")
    Send("{3 up}")

    WEnd

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

    Func Heal()
    $GetHealth = PixelGetColor(486, 705)
    If Not $GetHealth = $Health Then
    Send("{2 down}")
    Sleep("100")
    Send("{2 up}")
    Sleep("3000")
    EndIf
    EndFunc

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

    Func TogglePause()
    $Paused = NOT $Paused
    While $Paused
    sleep(100)
    ToolTip('Script is "Paused"',0,0)
    WEnd
    ToolTip("88")
    EndFunc

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

    Func Terminate()
    Exit 0
    EndFunc

    [/autoit]