home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 8 Other / 08-Other.zip / PP0705.ZIP / FIGURE3 < prev    next >
Text File  |  1988-03-15  |  457b  |  16 lines
  1.      GetKey ()
  2.           {
  3.           static struct timeb CurrentTime, LastTime ;
  4.  
  5.           while (!kbhit ())
  6.                {
  7.                ftime (&CurrentTime) ;
  8.  
  9.                if (CurrentTime.time != LastTime.time)
  10.                     {                    DisplayNewTime (&CurrentTime) ;
  11.                     LastTime = CurrentTime ;
  12.                     }
  13.                }                         
  14.           return getch () ;
  15.           }
  16.