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