home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 7 / 07.iso / c / c072 / 1.ddi / PRG7_4A.C < prev    next >
Encoding:
C/C++ Source or Header  |  1987-09-19  |  3.4 KB  |  142 lines
  1. /*Prg7_4a - High Speed Screen Output
  2.     by Stephen R Davis, 1987
  3.  
  4.   Perform direct screen output by accessing screen memory directly
  5.   via the screen pointer 'screen'.  Scroll using standard C
  6.   statements.
  7. */
  8.  
  9. #include <stdio.h>
  10. #include <dos.h>
  11. #include <stdlib.h>
  12.  
  13. #define cga  (unsigned far *)0xb8000000    /*same for ega*/
  14. #define mono (unsigned far *)0xb0000000
  15. #define space 0x20
  16. #define attrib 0x07
  17. #define screenheight 25
  18.  
  19. /*add the screen BIOS functions*/
  20. #define setcursor 0x02
  21. #define getmode 0x0f
  22.  
  23. /*define global variables*/
  24. unsigned v_pos, h_pos, screenwidth;
  25. union REGS regs;
  26. unsigned far *screen;            /*screen pointer*/
  27.  
  28. /*prototype declarations*/
  29. void init (void);
  30. void scroll (unsigned);
  31. void qprintf (char *);
  32. void pcursor (unsigned, unsigned);
  33.  
  34. /*Main - test the output routines*/
  35. int main ()
  36. {
  37.     int i, j;
  38.  
  39.     init ();
  40.     for (i = 0; i < 20; i++) {
  41.          for (j = 0; j < screenheight; j++) {
  42.               qprintf ("this is BIOS output");
  43.               pcursor(v_pos, 30+j);
  44.               qprintf ("and this\n");
  45.          }
  46.          for (j = 0; j < screenheight; j++)
  47.               printf ("this is normal printf output\n");
  48.     }
  49. }
  50.  
  51. /*Init - set the screen address and clear the screen*/
  52. void init ()
  53. {
  54.     short mode;
  55.  
  56.     regs.h.ah = getmode;
  57.     int86 (0x10, ®s, ®s);
  58.     mode = regs.h.al;
  59.     screenwidth = regs.h.ah;
  60.  
  61.     if (mode == 7)
  62.          screen = mono;
  63.     else
  64.          if (mode == 3 || mode == 2)
  65.               screen = cga;
  66.          else
  67.               abort ();
  68.  
  69.     scroll (screenheight);
  70.     pcursor (0, 0);
  71. }
  72.  
  73. /*Scroll - scroll up N lines using function 6*/
  74. void scroll (nlines)
  75.     unsigned nlines;
  76. {
  77.     unsigned far *source, far *dest, number, temp;
  78.  
  79.     if (nlines >= screenheight)
  80.          nlines = screenheight;
  81.  
  82.     h_pos = 0;
  83.     if ((v_pos += nlines) >= screenheight) {
  84.          nlines = (v_pos - screenheight) + 1;
  85.  
  86.          /*scroll the screen up 'nlines' amount*/
  87.          source = screen + (nlines * screenwidth);
  88.          dest = screen;
  89.          number = (screenheight - nlines) * screenwidth;
  90.          for (temp = number; temp; temp--)
  91.               *dest++ = *source++;
  92.  
  93.      /*now blank the lines abandoned*/
  94.      dest = screen + number;
  95.      number = nlines * screenwidth;
  96.      for (; number; number--)
  97.           *dest++ = (attrib << 8) + space;
  98.  
  99.          v_pos = screenheight - 1;
  100.     }
  101. }
  102.  
  103. /*Qprintf - output a string using the BIOS screen handler.  If
  104.         an attribute is not provided, use the default.*/
  105.  
  106. #define SCREENLOC screen + ((screenwidth * v_pos) + h_pos)
  107.  
  108. void qprintf (c)
  109.     char *c;
  110. {
  111.     unsigned far *sp;
  112.  
  113.     sp = SCREENLOC;
  114.     for (; *c; c++)
  115.          if (*c == '\n') {
  116.               scroll (1);
  117.               sp = SCREENLOC;}
  118.          else
  119.               if (h_pos < screenwidth) {
  120.                    h_pos++;
  121.                *sp++ = (attrib << 8) + *c;
  122.               }
  123.     pcursor (v_pos, h_pos);
  124. }
  125.  
  126. /*PCursor - place the cursor at the current x and y location.
  127.             To place the cursor, and subsequent output, to any
  128.             arbitrary location, set 'v_pos' and 'h_pos' before
  129.             calling pcursor.*/
  130. void pcursor (y, x)
  131.     unsigned x, y;
  132. {
  133.     v_pos = y;
  134.     h_pos = x;
  135.  
  136.     regs.h.ah = setcursor;
  137.     regs.h.bh = 0;
  138.     regs.h.dh = v_pos;
  139.     regs.h.dl = h_pos;
  140.     int86 (0x10, ®s, ®s);
  141. }
  142.