SLEEP

Purpose

Pause program execution for a specified number of seconds

Syntax

SLEEP <expN>

See Also

DO, DO CASE, DO WHILE, EXIT, FOR, FOREACH, IF, LOOP, SCAN

Description

The SLEEP command pauses execution of a program for the number of seconds specified in <expN>.

Example

private lRunning = .T.
do while lRunning
  if not file("C:\temp\message.txt")
    ? time()
    sleep 5
    loop
  endif
 
  fd = fopen("C:\temp\message.txt")
  cMessage = fgets(fd)
  ? cMessage
  if cMessage = "STOP"
    lRunning = .F.
  endif
  fclose(fd)
  erase C:\temp\message.txt
enddo