home *** CD-ROM | disk | FTP | other *** search
/ Programmer 7500 / MAX_PROGRAMMERS.iso / INFO / C / JAZLIB.ARC / JZPGEPRN.C < prev    next >
Encoding:
Text File  |  1986-05-06  |  790 b   |  33 lines
  1. /*
  2. ┌────────────────────────────────────────────────────────────────────────────┐
  3. │jzpgeprn.c                                     │
  4. │Print directly to the screen and to a specific page                 │
  5. │Unfortunately, out of lazyness, I don't avoid snow on this routine.         │
  6. │                                         │
  7. │ (C) JazSoft Software by Jack A. Zucker (301) 794-5950              │
  8. └────────────────────────────────────────────────────────────────────────────┘
  9. */
  10.  
  11. jzpgeprn(fstr,frow,fcol,fattr,fpage)
  12. char *fstr;
  13. int frow,fcol,fattr,fpage;
  14. {
  15.   int far *screen;
  16.   register wcharattr,wchar;
  17.  
  18.   screen = (int far *) 0xb8000000;
  19.  
  20.   wcharattr = fattr << 8;
  21.  
  22.   screen += fpage * 2048 + (frow * 80 + fcol);
  23.  
  24.   while (*fstr) {
  25.     wcharattr &= 0xff00 ;
  26.     wcharattr |= *fstr++;
  27.     *screen++ = wcharattr;
  28.   }
  29. }
  30.  
  31.  
  32.  
  33.