|
midrange.com
Oh yeah, Sleep() is cool!! 'C' for me too!
Feels like, George Costanza under his desk with his
little shelf for an alarm clock!! (Seinfeld)
the pieces;
*************************************************************************
H BndDir('QC2LE') DftActGrp(*No)
*************************************************************************
*
* Display file specs .....
*
* /\ /\
*-- Sleep --- Sleep function (delay job) ------------------------
* unsigned int sleep( unsigned int seconds );
D Sleep Pr 10U 0 ExtProc('sleep')
D 10U 0 Value
*
*
D MyInt S 10U 0
*
*
* ------
C dow (DVINKEY <> F3)
C EXFMT SCREEN1
*
* F3 = Exit........
C if (DVINKEY = F3)
C ITER
C endif
*
* ENTER -..........
*
C if SCINT <> 0
C eval MyInt = ScInt
C callp Sleep(MyInt)
C endif
*
C enddo
* ------
C eval *INLR = *ON
Neato baby!
John B.
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.
