5(14):A$(200):Z$"":A0:Z0:I0:RS0:L0:FL0^VEC(772)256(773):VEC17165:%" UPER EQUENTIAL ILE RINTER"" BY HRIS OLLET"FF0:"(F)ANFOLD OR (S)INGLE SHEET";FF$:FF$"F"FF1F10 15,8,15 4,4,7V "ONE-, TWO- OR THREE-COLUMN (1/2/3)";X$:X$"1"X$"3"9j (X$)62,40,11 Z162:L55:FF1Z180:L60 4:4:13,4,13:13:4,4,7:4 CHANGE LINE 12 TO SEND PRINTER CODES FOR CONDENSED PRINT FF14:4:4 83L A1Z:A$(A)""::A1:F11A$(A)A$(Z1):A$(Z1)"":F10g FL(A$(A)):FL4034 #2,Z$:Z$(13)22 Z$(32)FL(A$(A)) A$(A)A$(A)Z$:(A$(A))40ST018 ST0A$(A1)(A$(A),40(FL1)):A$(A)(A$(A),FL):24 ST64A$(A):34* ST0"ERROR":34C A$(A):AA1:AZ26R FL4018h A$(Z1)""F11s I1L 4," ";A$(I);44(A$(I)));A$(IL);44(A$(IL))); 4,A$(I2L):I FF1PG16:4:PG:16 :"PLEASE SWITCH PAPER AND PRESS ANY KEY"" AN$:AN$""32* !16< "I1(A3)1p #4," ";A$(I);44(A$(I)));A$(I((A3)1)); $4,44(A$(I((A3)1))));A$(I2((A3)1)) %I &4:4:13:10,4,10:10:10:4,4,7:91! ' CHANGE LINE 38 TO TURN OFF CONDENSED MODE ON YOUR PRINTERA (Z108:L55:FF1Z120:L60T )FF14:4:4\ *83 +A1Z:A$(A)""::A1:F11A$(A)A$(Z1):A$(Z1)"":F10 ,FL(A$(A)) -#2,Z$:Z$(13)50 .Z$(32)FL(A$(A))/A$(A)A$(A)Z$:(A$(A))40ST045;0ST0A$(A1)(A$(A),40(FL1)):A$(A)(A$(A),FL)H1ST052^2ST64A$(A):60v3ST0"ERROR":604A$(A):AA1:AZ545456A$(Z1)""F117I1L:4,A$(I);41(A$(I)));A$(IL):I8FF1PG16:4:PG:43&9:"PLEASE SWITCH PAPER AND PRESS ANY KEY"::AN$:AN$""58B;43|<I1(A2)1:4,A$(I);41(A$(I)));A$(I((A2)1))=I:91>L55:FF1L60?FF14:4:4@83AA1L:A$(A)""::A1:F11A$(A)A$(L1):A$(L1)"":F10BFL(A$(A))C#2,Z$:Z$(13)726DZ$(32)FL(A$(A))^EA$(A)A$(A)Z$:(A$(A))70ST067FST0A$(A1)(A$(A),70(FL1)):A$(A)(A$(A),FL)GST074HST64A$(A):82IST0"ERROR":77JA$(A):AA1:AL76K67LA$(L1)""F11&MI1L:4," ";A$(I):ICNFF1PG16:4:PG:65rO:"PLEASE SWITCH PAPER AND PRESS ANY KEY"PAN$:AN$""80Q65RI1A:4," ";A$(I):I:91SI1200:A$(I)""T"FILENAME";F$U2,8,2,"0:"F$",S,R"V88WX15,EN,EM$,ET,ES1YEN0EN,EM$,ET,ES:7ZJ[4:4:2:15: