home *** CD-ROM | disk | FTP | other *** search
/ Programmer 7500 / MAX_PROGRAMMERS.iso / PASCAL / PCTV3N3.ZIP / MINICLOK.PAS < prev    next >
Encoding:
Pascal/Delphi Source File  |  1992-05-29  |  148 b   |  9 lines
  1. program miniclok;
  2.  
  3. uses CRT,CLOCKISR; 
  4. begin   
  5.   repeat until KeyPressed;   
  6.   if ReadKey = #0 then     
  7.     if ReadKey = #0 then; 
  8. end. 
  9.