Jump to content

Recommended Posts

Posted

Like this....

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

Global $Paused, $Runner
HotKeySet("{PAUSE}", "TogglePause")
HotKeySet("{ESC}", "Terminate")
HotKeySet("{F9}", "ShowMe")  

;;;; 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 ShowMe()
 $Runner = NOT $Runner
 While $Runner
  sleep(100)
  ToolTip('Script is "Running"',0,0)
 WEnd
 ToolTip("Script is Stopped", 0, 0)
EndFunc

8)

NEWHeader1.png

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...