home *** CD-ROM | disk | FTP | other *** search
/ Programmer 7500 / MAX_PROGRAMMERS.iso / INFO / PRINTER / SIDER.ARC / SIDERHLP.INC < prev    next >
Encoding:
Text File  |  1988-01-12  |  853 b   |  28 lines
  1. procedure siderhlp;
  2. begin
  3.   window(3,9,54,23);
  4.   clrscr;
  5.   writeln('SIDER will print an ASCII or PRN file sideways on');
  6.   writeln('an EPSON FX/LX printer.  The following options ');
  7.   writeln('are available:');
  8.   txt(9);write('VIEW - ');txt(3);
  9.   writeln('toggles writing to screen during printing');
  10.   writeln('on or off.');
  11.   writeln;
  12.   txt(9);write('SIZE - ');txt(3);
  13.   writeln('provides menu selection of three available');
  14.   writeln('print sizes: NORMAL(9 cpi/6 lpi), SHORT');
  15.   writeln('(12 cpi/6 lpi), and SMALL(12 cpi/10 cpi)');
  16.   writeln;
  17.   txt(9);write('PRINT - ');txt(3);
  18.   writeln('enter path/drive and file to print');
  19.   writeln;
  20.   txt(9);write('HELP -');txt(3);
  21.   writeln('this HELP screen');
  22.   writeln('                      Press RETURN to continue...');
  23.   read(kbd,ch);
  24.   clrscr;
  25.   window(1,1,80,25);
  26. end;
  27.  
  28.