L ------------------ PRINT DIR 803 VERSION 5 BY SVS 1994 (OPTIMIZED WITH MPS803-EXPANSION) . (USE FONT: "ELITE12GR.FNT") . N$(144),N(144) "";10);R$;"";: R1$R$ "REF.NAME";R$- R$"" "": 5s R$R1$ R1$"" SI$"A": SI$"B" 30);"SIDE: ";SI$ ""W$"":I0:J0:N0:RS0:Y$"":N$"": HI$"":LO$""(:-15,8,15,"I0": 15221,8,0,"$":#1,W$: #1,W$X7 --------------------- DISK NAMEf<#1,W$,W$uF X0 27H: #1,W$: N$N$W$IL --------------------- FILESPI0RS: II1: "READ FILES:"I1T I144 150Z: #1,W$,W$,LO$,HI$7d: LO$LO$(0): HI$HI$(0)Un: N(I)(LO$)256(HI$)es: N$(I)""vx: X0 2z: #1,W$(1),W$(2),W$(3),W$(4) ,W$(5),W$(6),W$(7),W$(8),W$(9): N$(I)N$(I)W$(1)W$(2)W$(3) W$(4)W$(5)W$(6)W$(7)W$(8)W$(9)&: 4: #1,W$\: " "N(I);N$(I);" "i: RSSTw RS64 1: "OK, PRESS ANY KEY TO START PRINT;";(13);"(S=FLIP SIDE A/B)": A$ A$"S" 180: SI$"A" SI$"B": SI$"A"@ "";30);"SIDE: ";SI$; "": 170J 4,4k -------------------- PRINT4,(14);N$;(("92"))" ";R$;(15);" (SIDE: ";SI$;")";(13)J0: X0: N0: B0: X=PRECED.PAGINA STAMP.: JJ1 : 4,N(J);N$(J);": NN1: BBN(J);: (J30)I 220W: N$(J30)"" 220: 4,(" ",5 ((N(J))))" "N(J30)N$(J30);: NN1: BBN(J): 4: "PRINTED FILES:";N; " TOTAL BLOCKS:"B JI J30X60\ (J30)I XX60: JJ30: 4: 200z "ANOTHER DISK Y";S$ S$"Y" 4: 4: 4: 1: 4: :ER304:1:ՙ"ERRORE ";DS$: 4: 1