1 'PIXMAP.BA by James Jackson (4/7/86); modified by Robert Benson (10/10/89) 10 CLS:CLEAR1620:ONERRORGOTO10:P=1:L=0:R=80:TM=0:BM=63:LP=63:LS=1:ST=2 11 FILES:PRINTSTRING$(40,241);:INPUT".DO File to Display";N$:N$=LEFT$(N$,6) 12 IFN$=""GOTO33ELSEOPENN$FORINPUTAS1 13 CLS:INPUT"Top Margin (0 - 63)";TM:IFTM<0ORTM>63THEN13ELSETM$=STR$(TM+1) 14 PRINT"Bottom Margin ("RIGHT$(TM$,1)" - 63)";:INPUTBM:IFBM63THEN14 15 LP=BM-TM:INPUT"Left Margin (0 - 80)";L:IFL<0ORL>80THEN15ELSEL$=STR$(L+1) 16 PRINT"Right Margin ("RIGHT$(L$,1)" - 80)";:INPUTR:IFR80THEN16 17 INPUT"Line Spacing (1 - 2)";LS:IFLS<1ORLS>2THEN17 18 CLS:PRINT@28,"File:";N$:PRINT@108,"Page: ";P:PRINT@188,"Line" 19 PRINT@228,"Spacing:";LS;:PRINT@2,"MARGINS" 20 PRINT@80,"Left: ";L:PRINT@120,"Right: ";R 21 PRINT@160,"Top: ";TM:PRINT@200,"Bottom:";BM 22 LINE(78,0)-(160,63),1,B:ST=TM+2:SP=LP 23 FORY=STTOSPSTEPLS:FORX=79+LTO79+R-1 24 IFEOF(1)GOTO32 25 A$=INPUT$(1,1):IFA$=CHR$(10)THEN28 26 IFA$>CHR$(32)ANDA$