How do you pause a script?

[Garanator]

I need to know how to make the mine funcution stop without quitting the script

HotKeySet("{esc}", "Quit")

HotKeySet("{f1}", "Click")

While 1

Sleep(1000)

WEnd

Func Click()

While 1

MouseClick("left")

Sleep(6000)

WEnd

EndFunc

Func Quit()

Exit

EndFunc

Edited August 9, 2006 by Garanator

[Vicks]

I need to know how to make the mine funcution stop without quitting the script

HotKeySet("{esc}", "Quit")

HotKeySet("{f1}", "Click")

While 1

Sleep(1000)

WEnd

Func Click()

While 1

MouseClick("left")

Sleep(6000)

WEnd

EndFunc

Func Quit()

Exit

EndFunc

<!--QuoteEnd--></div><!--QuoteEEnd-->

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

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

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

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

Func Terminate()
    Exit 0
EndFunc

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

right out of the help

Edited August 9, 2006 by Vicks