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