Portability Subroutine: Delays execution of the program for a specified duration.
Module: USE IFPORT
Syntax
CALL SLEEPQQ (duration)
duration
(Input) INTEGER(4). Number of milliseconds the program is to sleep (delay program execution).
Compatibility
CONSOLE STANDARD GRAPHICS QUICKWIN GRAPHICS WINDOWS DLL LIB
Example
USE IFPORT
INTEGER(4) delay, freq, duration
delay = 2000
freq = 4000
duration = 1000
CALL SLEEPQQ(delay)
CALL BEEPQQ(freq, duration)
END