home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 7 / 07.iso / c / c072 / 1.ddi / PRG8_3C.C < prev    next >
Encoding:
C/C++ Source or Header  |  1987-09-19  |  4.1 KB  |  156 lines
  1. /*Program 8_3c - 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 this encased in seperate assembler subroutines
  7.   linked in as .OBJ files.  The assembler name is Prog9d1.asm and
  8.   the project file name is Prog9d.prj.  This must be compiled under
  9.   the Small or Tiny memory models (otherwise, the stack offsets in
  10.   the assembler routine must be changed).
  11. */
  12.  
  13. #include <stdio.h>
  14. #include <dos.h>
  15. #include <stdlib.h>
  16.  
  17. #define cga  (unsigned far *)0xb8000000 /*same for ega*/
  18. #define mono (unsigned far *)0xb0000000
  19. #define space 0x20
  20. #define attrib 0x07
  21. #define screenheight 25
  22.  
  23. /*add the screen BIOS functions*/
  24. #define scrollup 0x06
  25. #define setcursor 0x02
  26. #define writetele 0x0e
  27. #define getmode 0x0f
  28.  
  29. /*define global variables*/
  30. unsigned v_pos, h_pos, screenwidth;
  31. union REGS regs;
  32. unsigned far *screen;                   /*screen pointer*/
  33.  
  34. /*prototype declarations*/
  35. void init (void);
  36. void scroll (unsigned);
  37. void qprintf (char *);
  38. void pcursor (unsigned, unsigned);
  39.  
  40. /*prototype declarations for external assembler routines*/
  41. /*(remember that MASM generates uppercase symbols)*/
  42. void MOVS (unsigned far *, unsigned far *, unsigned);
  43.      /*move from first pointer to second, third arg words*/
  44. void STOS (unsigned far *, unsigned);
  45.      /*clear at pointer, unsigned words*/
  46.  
  47. /*be sure compile model is correct*/
  48. #if sizeof(MOVS)-2
  49. #error Must compile under Small or Tiny models
  50. #endif
  51.  
  52. /*Main - test the output routines*/
  53. int main ()
  54. {
  55.     int i, j;
  56.  
  57.     init ();
  58.     for (i = 0; i < 20; i++) {
  59.          for (j = 0; j < screenheight; j++) {
  60.               qprintf ("this is BIOS output");
  61.               pcursor(v_pos, 30+j);
  62.               qprintf ("and this\n");
  63.          }
  64.          for (j = 0; j < screenheight; j++)
  65.               printf ("this is normal printf output\n");
  66.     }
  67. }
  68.  
  69. /*Init - set the screen address and clear the screen*/
  70. void init ()
  71. {
  72.     short mode;
  73.  
  74.     regs.h.ah = getmode;
  75.     int86 (0x10, ®s, ®s);
  76.     mode = regs.h.al;
  77.     screenwidth = regs.h.ah;
  78.  
  79.     if (mode == 7)
  80.          screen = mono;
  81.     else
  82.          if (mode == 3 || mode == 2)
  83.               screen = cga;
  84.          else
  85.               abort ();
  86.  
  87.     scroll (screenheight);
  88.     pcursor (0, 0);
  89. }
  90.  
  91. /*Scroll - scroll up N lines using function 6*/
  92. void scroll (nlines)
  93.     unsigned nlines;
  94. {
  95.     unsigned far *source, far *dest, number;
  96.  
  97.     if (nlines >= screenheight)
  98.          nlines = screenheight;
  99.  
  100.     h_pos = 0;
  101.     if ((v_pos += nlines) >= screenheight) {
  102.          nlines = (v_pos - screenheight) + 1;
  103.  
  104.          /*scroll the screen up 'nlines' amount*/
  105.          source = screen + (nlines * screenwidth);
  106.          dest = screen;
  107.          number = (screenheight - nlines) * screenwidth;
  108.          MOVS (source, dest, number);
  109.  
  110.          /*now blank the lines abandoned*/
  111.          dest = screen + number;
  112.          number = nlines * screenwidth;
  113.          STOS (dest, number);
  114.  
  115.          v_pos = screenheight - 1;
  116.     }
  117. }
  118.  
  119. /*Qprintf - output a string using the BIOS screen handler.  If
  120.             an attribute is not provided, use the default.*/
  121. #define SCREENLOC screen + ((screenwidth * v_pos) + h_pos)
  122. void qprintf (c)
  123.     char *c;
  124. {
  125.     unsigned far *sp;
  126.  
  127.     sp = SCREENLOC;
  128.     for (; *c; c++)
  129.          if (*c == '\n') {
  130.               scroll (1);
  131.               sp = SCREENLOC;
  132.          }
  133.          else {
  134.               if (h_pos++ < screenwidth)
  135.                    *sp++ = (attrib << 8) + *c;
  136.          }
  137.     pcursor (v_pos, h_pos);
  138. }
  139.  
  140. /*PCursor - place the cursor at the current x and y location.
  141.             To place the cursor, and subsequent output, to any
  142.             arbitrary location, set 'v_pos' and 'h_pos' before
  143.             calling pcursor.*/
  144. void pcursor (y, x)
  145.     unsigned x, y;
  146. {
  147.     v_pos = y;
  148.     h_pos = x;
  149.  
  150.     regs.h.ah = setcursor;
  151.     regs.h.bh = 0;
  152.     regs.h.dh = v_pos;
  153.     regs.h.dl = h_pos;
  154.     int86 (0x10, ®s, ®s);
  155. }
  156.