home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 7 / 07.iso / c / c072 / 1.ddi / PRG7_2.C < prev    next >
Encoding:
C/C++ Source or Header  |  1987-09-19  |  2.0 KB  |  76 lines
  1. /*Program 7_2 - Delay Specified Number of Seconds (Direct Access)
  2.    by Stephen R. Davis, 1987
  3.  
  4.   Many programs must delay for short periods of time.  Often this
  5.   is done by executing an "empty" FOR loop.  Use the clock counter
  6.   in lower memory as a more accurate clock.
  7. */
  8.  
  9. #include <stdio.h>
  10.  
  11. /*define a clock tick -> seconds macro*/
  12. #define GETIME (unsigned)(*timer / 18 - *timer / 1638)
  13.  
  14. /*prototype definitions*/
  15. void main (void);
  16. unsigned getval (char *);
  17. void wait (unsigned);
  18.  
  19. /*global data definitions*/
  20. volatile long far *timer = {(long far *)0x0040006c};
  21.  
  22. /*Main - ask the user for length of time to delay (0 terminates)*/
  23. void main (void)
  24. {
  25.      unsigned delay;
  26.  
  27.      printf ("This program simply delays the user specified number\n"
  28.              "of seconds.  Entering a zero terminates the program.\n"
  29.              "\n"
  30.              "Seconds are counted down to provide output so that\n"
  31.              "the user can break out prematurely, if desired\n"
  32.              "\n");
  33.      for (;;) {
  34.  
  35.          /*get the specified delay and wait () that long*/
  36.          if ((delay = getval ("Enter delay time [seconds]")) == 0)
  37.               break;
  38.  
  39.          /*now call our wait procedure to perform the delay*/
  40.          printf ("Start delay:\n");
  41.          wait (delay);
  42.          printf ("Finished\n");
  43.      }
  44. }
  45.  
  46. /*Getval - output a prompt and get an integer response*/
  47. unsigned getval (prompt)
  48.      char *prompt;
  49. {
  50.      unsigned retval;
  51.  
  52.      printf ("%s - ", prompt);
  53.      scanf ("%d", &retval);
  54.      return retval;
  55. }
  56.  
  57. /*Wait - wait the specified length of time*/
  58. void wait (delay)
  59.      unsigned delay;
  60. {
  61.      unsigned previous, current;
  62.  
  63.      /*every time the time changes - decrement count*/
  64.      previous = GETIME;
  65.      for (;;) {
  66.           if (previous != (current = GETIME)) {
  67.                previous = current;
  68.                if (!--delay)
  69.                     return;
  70.  
  71.                /*remove this print statement in actual use*/
  72.                printf ("count - %d\n", delay);
  73.           }
  74.      }
  75. }
  76.