Click above to get retro games delivered to your door ever month!

 waitproc()          Install a function to call with the wait command
------------------------------------------------------------------------------
 Declaration
   io.hdr

 Syntax
   proc waitproc extern
   param untyped pFunc

 Arguments
   pFunc is the function to execute.

 Return
   None.

 Description
   The waitproc() function installs a function to call repeatedly while
   the wait command is executing.

 Example
   #define EXAMPLE_IO
   #include example.hdr

   proc Clock                      // clock function
   @ 0, 70 ?? time()
   endproc
   
   proc Test_waitproc
   clear
   cursor( .f. )
   waitproc( Clock )               // install the clock
   wait                            // wait for keypress
   endproc

   proc main
   Test_waitproc()
   endproc