Ž
 :ŽÿPRINT.BA: Document Printer YŽ :ŽÿCopyright 1983 by Tandy Corp. All rights reserved. qŽ ·Ý2: § 500: ¡à AÑZ Ž( … TF$(1),PM$(11),PM(11) ÊŽ2 PWÝ1:PLÝ2:LMÝ3:RMÝ4:TMÝ5:BMÝ6:LSÝ7:NFÝ8:TFÝ9:PZÝ10:FFÝ11 þŽ< VWÝ40:VH$Ýú(27)Ð"p":VN$Ýú(27)Ð"q":EF$Ýú(27)Ð"J" (F TF$(0)Ý"NO": TF$(1)Ý"YES": PN$Ý"Page" EP  IÝ1 Á 11: † PM$(I):‚ I ÎZ ƒ Page width,Page length,Left margin,Right mgn.,Top margin,Bottom mgn.,Line space,Number pgs,Title pgs,Pg-pause,Skip headings 1st pg êd  IÝ1 Á 11: † PM(I):‚ I 
n ƒ 80,66,10,10,6,6,1,1,1,0,0 kx FF$Ýú(12):CR$Ýú(13):LF$Ýú(10):TB$Ýú(9):BS$Ýú(8):SP$Ý" ":HY$Ý"-": CC$ÝFF$ÐCR$ÐLF$ÐTB$ÐBS$ÐSP$ q‚ ° »„ £"[D]isk or [R]am:";:A$Ý„$(1):ŠA$ÞÜ"D"ÕA$ÞÜ"d"ÕA$ÞÜ"R"ÕA$ÞÜ"r"Í±:ˆ132 Ù‡ £:ŠA$Ý"r"ÖA$Ý"R"Í136:‘140 äˆ :ˆ150  ‘Œ ŸÁ"ptemp":™"ptemp"„AS1 ‘ Šï(1)Íš:½"ptemp.do":£:ˆ150 >‘Ž „#1,B$:Šý(B$,4)Ý"free"Í141 R‘ £ü(B$,10);:ˆ141 o‘– „"Print which file"; FI$ Ž‘› ŠA$Ý"D"ÖA$Ý"d"ÍFI$Ý":"ÐFI$ Â‘  „"Output device (press ENTER for printer)"; FO$ Ü‘ª Š FO$Ý"" Í FO$Ý"LPT:" ’´ °:  IÝ1 Á 7: £ @ VWÓ2Ò(IÑ1),VH$;I;VN$;PM$(I)" ="PM(I);:‚ I _’¾  IÝ8 Á 11: £ @VWÓ2Ò(IÑ1),VH$;I;VN$;PM$(I)" = "TF$(PM(I));:‚ I ‘’È SÝ0:£:„"Change which setting (0=no change)";S ¡’Ò Š SÝ0 Í 250 è’Ü Š SÜÝ1 Õ SÞÝ7 Í £"Enter a new value for '"PM$(S)"'";:„ PM(S):ˆ 180 a“æ Š SÜÝ8 Õ SÞÝ11 Í £ "'"PM$(S)"' (YES/NO)";:„ S1$: Š S1$Ý"YES"Ö S1$Ý"yes" Í PM(S)Ý1 :‘ Š S1$Ý"NO" Ö S1$Ý"no" Í PM(S)Ý0 k“ð ˆ 180 «“ú LWÝPM(PW)ÑPM(LM)ÑPM(RM): TLÝPM(PL)ÑPM(BM):LM$ÝÆ(PM(LM),SP$) ”°: Š PM(TF)Ý1 Í £ "Enter a one-line title maximum"LW"characters.":’ „ TI$: TI$Ýü(TI$,LW) M”Š FO$Ý"LPT:" Ö FO$Ý"lpt:" Í „ "Align paper then press ENTER";RD$ `”™ FI$  „ AS 1 v”"™ FO$  –PUT AS 2 |”,° Œ”6C$Ý"": PNÝ0 ¬”@Š ï(1) Í š: £ "Done": ˆ 140 ä”JŠ PM(PZ)Ý1 Í „"Press ENTER to print next page"; RD$ ö”TPNÝPNÐ1: LNÝ0 •^Š LNÞPM(TM) Í Œ 660: ˆ 350 1•hŠ PNÝ1 Õ PM(FF)Ý1 Í 400 Q•rŠ PM(TF)Ý1 Í BH$ÝTI$: Œ 670 w•|Š PM(NF)Ý1 Í BH$ÝPN$Ð÷(PN): Œ 670 ¤•†Š PM(TF)Ý1 Ö PM(NF)Ý1 Í Œ 660:LKÝ1:Œ 700 µ•Š ï(1) Í 530 È•šŠ LNÜÝTL Í 630 ß•¤C1$ÝC$: C$Ý„$(1,1) –®— Ç(1,CC$,C$) ˆ 530,550,570,590,620,650 -–¸B$ÝB$ÐC$: Š C$ÜÝSP$ Í CPÝCPÐ1 G–ÂŠ CPÞLW Í WFÝ0: ˆ 400 k–ÌWFÝ1: LBÝö(B$): SPÝ1: HPÝ0: SÝ1 š–ÖHQÝHP:HPÝÇ(S,B$,HY$):Š HPÜ0 Í SÝHPÐ1:ˆ 470 ­–àHPÝHQ:SÝ1:SPÝ0 Ý–êSQÝSP: SPÝÇ(S,B$,SP$):Š SPÜ0 Í SÝSPÐ1:ˆ 490 —ôSPÝSQ:BPÝÑ(SPÜHP)ÒSPÑ(HPÜÝSP)ÒHP —þŠ BPÝ0 Í Œ 680: ˆ 400 Y—B1$Ýý(B$,LBÑBP):B$Ýü(B$,BP): Œ 680:B$ÝB1$:CPÝö(B$):ˆ 400 v—AFÝ0:WFÝ0:Š B$Ü""Í Œ 680 €—ˆ 630 š—&Š WFÝ0 Í Œ 680:‘ WFÝ0 ¤—0ˆ 400 Æ—:Š C1$ÝCR$ Ö AFÝ1 Ö WFÝ1 Í 400 ×—DŒ 680: ˆ 400 ñ—NI1Ý8ÑCP Ú 8: I2ÝLWÑCP ˜XTBÝÑ(I1ÞI2)ÒI1Ñ(I2ÞÝI1)ÒI2 3˜bCPÝCPÐTB:B$ÝB$ÐÆ(TB,SP$):ˆ 450 S˜lB$ÝB$ÐC$:CPÝCPÑ1:WFÝ0:ˆ 400 r˜vŠ LNÞPM(PL) Í Œ 660: ˆ 630 |˜€ˆ 320 “˜ŠŠ CPÝ0 Í 400:‘ 440 ©˜”£ #2,"":LNÝLNÐ1: Ä˜ž£ #2,LM$BH$: LNÝLNÐ1: Û˜¨Š B$Ü"" Í £#2,LM$; ÿ˜²£#2,B$:LNÝLNÐ1: B$Ý"":CPÝ0:LKÝ1 /™¼Š LKÞPM(LS) Õ LNÞTL Í Œ 660: LKÝLKÐ1: ˆ 700 5™Æ 