[<<Previous Entry]
[^^Up^^]
[Next Entry>>]
[Menu]
[About The Guide]
UNITS01.PAS
{ ---------------------------------------------------------------- }
{ TEST IDLE-ROUTINEN }
{ ---------------------------------------------------------------- }
{ Ruft in einer verz.gerten Endlosschleife so lange "DoIdle" auf, }
{ bis eine Taste gedr.ckt wird. }
{ ---------------------------------------------------------------- }
{ (c) 1992 by Aurora featuring M.J. Schwaiger }
{ ---------------------------------------------------------------- }
{ History: }
{ Datum / Bearb. / Art }
{ 15. 3.1992 MS Implementierung. }
{ ---------------------------------------------------------------- }
PROGRAM IdleTest;
USES
CRT,
Idle;
BEGIN
REPEAT
DoIdle;
DELAY (100);
UNTIL KEYPRESSED;
END. { PROGRAM IdleTest }
This page created by ng2html v1.05, the Norton guide to HTML conversion utility.
Written by Dave Pearson