home *** CD-ROM | disk | FTP | other *** search
/ The Datafile PD-CD 4 / DATAFILE_PDCD4.iso / utilities / utilst / virtual / !Virtual / c / output < prev    next >
Text File  |  1992-06-05  |  696b  |  40 lines
  1. #include "swis.h"
  2. #include "swiv.h"
  3. #include "wimp.h"
  4.  
  5. #include "virtual.h"
  6. #include "lib.h"
  7. #include "output.h"
  8. #include "asm.h"
  9. #include "pager.h"
  10.  
  11. void printflush(WKSP *w)
  12. { int *block=w->outblock;
  13.   if (!w->outcount)
  14.     return;
  15.   block[5]=w->outcount;
  16.   block[0]=(w->outcount|3)+25;
  17.   block[3]=0;
  18.   block[4]=0x808c1; /* 0x804c0; */
  19.   swi(Wimp_SendMessage, IN(R0|R1|R2), 17, block, w->outtask );
  20.   w->outcount=0;
  21. }
  22.  
  23. void printc( WKSP *w, int c )
  24. { 
  25.   w->outbuf[w->outcount++]=c;
  26.   if (w->outcount>=OUTMAX-2)
  27.     printflush(w);
  28. }
  29.  
  30. void outc(WKSP *w, int c )
  31. {
  32.   w->outbuf[w->outcount++]=c;
  33.   if (w->outcount>=OUTMAX-2)
  34.   { Normal(w);
  35.     printflush(w);
  36.     FindPages(w);
  37.     Virtual(w);
  38.   }
  39. }
  40.