home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 7 / 07.iso / c / c072 / 1.ddi / PRG7_3.C < prev    next >
Encoding:
C/C++ Source or Header  |  1987-09-19  |  3.1 KB  |  124 lines
  1. /*Prg7_3 - Save the screen area to disk and recall it
  2.    by Stephen R. Davis, 1987
  3.  
  4.   The user screen can be saved off to disk to be recalled
  5.   at a later time.  The effect is almost instantaneous as the
  6.   example program demonstrates.  This program must be compiled
  7.   under the compact or large memory models.
  8. */
  9.  
  10. #include <stdio.h>
  11. #include <io.h>
  12. #include <process.h>
  13. #include <dos.h>
  14. #include <fcntl.h>
  15. #include <stat.h>
  16. extern char *sys_errlist [];
  17. extern int errno;
  18.  
  19. /*define screen related constants*/
  20. #define cga  (unsigned far *)0xb8000000
  21. #define mono (unsigned far *)0xb0000000
  22. #define screenheight 25
  23.  
  24. /*prototyping definitions*/
  25. void main (void);
  26. void init (void);
  27. void errexit (void);
  28. void pattern (char, unsigned);
  29. char gtcr (char *);
  30.  
  31. /*define global variables*/
  32. unsigned far *screen, size, screenwidth;
  33. union REGS regs;
  34. char *fname = {"screen.sav"};
  35. unsigned waccess = {O_RDWR | O_CREAT | O_TRUNC | O_BINARY};
  36. unsigned raccess = {O_RDONLY | O_BINARY};
  37. unsigned normfile = S_IWRITE | S_IREAD;
  38.  
  39. /*make sure that we are in the compact or large memory model*/
  40. #if (sizeof (int far *) - sizeof (int *))
  41.      #error Compile with compact or large memory model!
  42. #endif
  43.  
  44.  
  45. /*Main - save the screen directly to disk and recall it*/
  46. void main ()
  47. {
  48.      int handle;
  49.  
  50.      init ();
  51.      pattern ('0', 10);
  52.      if ((handle = open (fname, waccess, normfile)) == -1) {
  53.           printf ("error opening 'screen'\n");
  54.           errexit ();
  55.      }
  56.      gtcr ("Press any key to save number screen to disk\n"
  57.            "and copy over with a character screen\n");
  58.  
  59.      if (size != write (handle, (void *)screen, size)) {
  60.           printf ("error writing 'screen'\n");
  61.           errexit ();
  62.      }
  63.      close (handle);
  64.      pattern ('a', 26);
  65.  
  66.      gtcr ("Press any key to read character number "
  67.            "screen back from disk");
  68.      if ((handle = open (fname, raccess)) == -1) {
  69.           printf ("error reopening 'screen'\n");
  70.           errexit ();
  71.      }
  72.      read (handle, (void *)screen, size);
  73.      exit (0);
  74. }
  75.  
  76. /*Init - initialize screen pointer and width*/
  77. void init ()
  78. {
  79.      regs.h.ah = 0x0f;                 /*get mode*/
  80.      int86 (0x10, ®s, ®s);
  81.      screenwidth = regs.h.ah;
  82.      size = screenwidth * screenheight * sizeof (*screen);
  83.  
  84.      if (regs.h.al == 7)
  85.           screen = mono;
  86.      else
  87.           screen = cga;
  88. }
  89.  
  90. /*Gtcr - display a prompt and fetch character response*/
  91. char gtcr (prompt)
  92.      char *prompt;
  93. {
  94.      printf (prompt);
  95.      return (char)getchar ();
  96. }
  97.  
  98. /*Errexit - display disk error*/
  99. void errexit ()
  100. {
  101.      printf ("DOS error: %s\n", sys_errlist [errno]);
  102.      exit (1);
  103. }
  104.  
  105. /*Pattern - fill screen with an incrementing pattern*/
  106. void pattern (c, modulo)
  107.      char c;
  108.      unsigned modulo;
  109. {
  110.      unsigned i, j;
  111.      char tchar;
  112.  
  113.      for (j = 0; j < (screenheight - 1); j++) {
  114.           tchar = c + (char)(j % modulo);
  115.           for (i = 1; i < screenwidth; i++) {
  116.                printf ("%c", tchar);
  117.                if ((++tchar - c) >= modulo)
  118.                     tchar = c;
  119.           }
  120.           printf ("\n");
  121.      }
  122. }
  123.  
  124.