How to set script to "pause" from within the script itself

[leuce]

Hello everyone

A user can pause a running script by clicking on the tray icon. What I would like to do is to set the script to "pause" from within the script itself, so that the user is forced to click the tray icon again if he wants the script to continue executing. Is that possible?

At the moment I "pause" a script simply by using MsgBox, but I was wondering if it would be possible to pause the script for real.

Thanks

Samuel

[Nessie]

Something like this?

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

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

;;;; Body of program would go here;;;;
While 1
    $counter +=1
    ToolTip('Script is "Running"',0,0, $counter, 1)
    Sleep(700)
WEnd
;;;;;;;;

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

Func Terminate()
    Exit 0
EndFunc

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

Hi!

[JohnOne]

I remember doing that on XP but it was a few years ago, and I'm not even sure you could on 7 with that box thing that the tray items disappear into.