DWB 2 PS.ML128 P 498 PS LABELER128 P 2507  + m  * ,;M^hj0   m iM  i m sm* * + L + Х`s" "PS.ML128",B0,P(("0C00"))l " RINT HOP RAPHICS ABEL AKER":" Y RIAN EYBOER"HIS PROGRAM PRINTS STANDARD ONE INCH""MAILING LABELS USING RINT HOP RAPHICS("AND TEXT OF YOUR CHOICE ON AN PSON OR2"COMPATABLE PRINTER.6<"HIS PROGRAM IS PUBLIC DOMAIN.fF"RINT HOP IS A TRADEMARK OF RODERBUND.P"PSON IS A TRADEMARK OF PSON MERICA.Z" RESS ANY KEY WHEN READY._X$:X$""95d X%(56,11),Y%(6,87),L$(6),F$(6),FS$(9)nE$(27)xFS$(0)E$(69)3FS$(1)FS$(0)(14)DFS$(2)(15)dFS$(3)FS$(9)E$(83)(0)FS$(4)FS$(9)E$(83)(1)FS$(5)FS$(0)E$(52)FS$(6)FS$(1)FS$(5)FS$(7)FS$(2)E$(52)FS$(8)FS$(3)FS$(5)FS$(9)FS$(4)FS$(5):EL$E$(84)E$(53)(18)E$(70)(10)(13)h" RINT HOP RAPHICS ABEL AKER":"RAPHIC ILE AME ($ FOR IRECTORY)LC0: G$: G$"$"750"NPUT ABEL EXT. OR BEST RESULTS," "SKIP ALTERNATE LINES. (SE 0,2,4,6 FOR3 "FOUR LINE LABELS AND 1,3,5 FOR THREEb ""LINES. INES WITH COMMAS OR COLONS MUSTw ,"BE IN QUOTES. 6"VAILABLE ONTS: @" 0 = ORMAL J" 1 = XPANDED T" 2 = ONDENSED ^" 3 = UPERSCRIPT!h" 4 = UBSCRIPT!r" 5 = TALIC1!|" 6 = XPANDED TALICO!" 7 = ONDENSED TALICo!" 8 = UPERSCRIPT TALIC!" 9 = UBSCRIPT TALIC! A06:L$(A)" ":"EXT FOR LINE "A;: L$(A)!"ONT FOR LINE "A;: F$(A)!(F$(A))9430!)"NL$" ":"UMBER OF LABELS";NL$:NL(NL$)8" NL0900D"LC510c"8,8,8,G$",P,R":#8,A$:8"STLC0:" ISK RROR HAS OCCURED.":850:500" (G$),B0,P(("1600"))" ("0CF2")"FO670"FO1:5,4,8#4,4,5:4,(27);(65);(8)# E1 NLR# A06:4,(27);(76);(88);(0);:C4864(A88):DC87l# BCD:4,((B));:#4," "FS$((F$(A)));:5,L$(A):4,EL$:#5,(10);(10)#:460#8,8,0,"$0":N$(0):X$N$##8,A$,A$,A$,A$,A$,A$$#8,A$: A$""790$ X$X$A$:770&$" " X$F$*#8,A$,A$: A$"" 8:850p$4#8,A$,B$:B$((A$N$)(B$N$)256)$>#8,A$: A$"" " "B$:B$"":810$HB$B$A$:830$R8:"RAPHIC ILE AME ($ FOR IRECTORY)"$p G$: G$"$"750:850$z%" NEW LABEL (/)?"1%A$:A$"Y"A$""950J% A$"N"A$""1000S%910o%"AME RAPHIC (/)?"%A$:A$"Y"A$""260% A$"N"A$""240%960% FO 4,E$;(64):4:5