' +JJJJ ?\>m0M='+l> /+l   d]@ŵLҦ]]LF L}BBL] X  ` 鷎귭෍ᷩ췩緈JJJJx Lȿ L8ᷭ緍췩 緍i 8 `巬 췌`x (`(8`I`B` ``>J>J>VU)?`8'x0|&HhHh VY)'&Y)xꪽ)' `Hh`V0^*^*>&` aI꽌ɪVɭ&Y&&Y& 꽌ɪ\8`&&꽌ɪɖ'*&%&,E'зЮ꽌ɪФ`+*xS&x'8*3Ixix&& 8  '  & x)*++`FG8`0($ p,&"ųųೳŪŪųųij  !"#$%&'()*+,-./0123456789:;<=>?   1 '" *"( (9"1 ( ,.(0# 2  /#0/#0 *?'#07#00/0/'#07#0:"4<*55/**5/*%5/)1/)1/)1/)'#0/#0*5/*75/**5/*:5//#0/#0'#07#0:::*::'#07#0"):$(%"%:$(%"%$$2%4%$$2%4%$(2()!)E(!8b $!H(+ "@H !D)"E` @ $ C ` DQ &J80^݌Hh ü ü݌ ռ ռ ռA ļD ļ? ļAEDE?HJ>h Լ ռ ռ ռ`HJ>݌h Hh݌`葠葠ȔЖȔЖȠHIHHHHhHH݌hHhHh݌H6 VDP (ED Z $0x8x D- ܸDD# H8`?E Vk *f???0xE Hh D#-EEE8` D ܸx D - ܸx8`-0ݩ?ʥD EEE`   LDcpq` [` ~  LӜu`".Q`pNФbptťܥm2<(-Py0\|e<6e<g< JJJJj귍hI  aUL@ kU8  L  Q^R(jQ0l^l\  wUuW ԧ H h@ [_ /QSIRb_L`LLLL`ª`LQLYLeLXLeLee ўQH\(h0L& Ꝥ$`( R \ZLl8 ўR HH\`\Z[YS6`LxQɿu3'RͲʎRʎ]]]ɍuL͟ɍ}RLRɍg^H8 ^hZLɍR LͲɊRR% QLܤͲ Z@ -^ ş\[Z QY\[Z8`l6Lş_Ȍb_Ͳ] )Y h( ֭ͲLɍ [LLĦ__ ^ 9 LҦ3 9 a   0LjLY u< (_9 ˭ɠuɠK_9 ?LˆʎõĵL õ ĵµ aµ`` L̦µ_bJLuLz`  ȟ QlXJ̥KlV  ȟ QlV eօ3L e3L &RL &QL d L4 Ne)n `@-eff L f`L . tQLѤ LҦL` OPu d L Ne)noon 8ɍ` ^f\õL ^NR  RΩLҦ)\Z ʽ LHv 3h`0h8` [L NС õ`A@` ŵL^Lõ`  \ 濭0 \  ȟ Q ^\lZl^?cqH şch`fhjõĵ@OAP`u@`@&`QR`E Ls  @DAE@u`8` %@ @A@`@`@A`Mµ ) LЦ`8@AWc@8@-@HAȑ@hHȑ@ȑ@hHȑ@Ȋ@ch8&ȑ@Hȑ@Ah@LHȑ@ȑ@ htphso`hMhL`9V8U897T6S67`INILOASAVRUCHAIDELETLOCUNLOCCLOSREAEXEWRITPOSITIOOPEAPPENRENAMCATALOMONOMOPRINMAXFILEFINBSAVBLOABRUVERIF!pppp p p p p`" t""#x"p0p@p@@@p@!y q q p@  LANGUAGE NOT AVAILABLRANGE ERROWRITE PROTECTEEND OF DATFILE NOT FOUNVOLUME MISMATCI/O ERRODISK FULFILE LOCKESYNTAX ERRONO BUFFERS AVAILABLFILE TYPE MISMATCPROGRAM TOO LARGNOT DIRECT COMMANč$3>L[dmx- (  Ԡ@跻~!Wo*9~~~~ɬƬ~_ j ʪHɪH`Lc (L ܫ㵮赎 ɱ^_ J QL_Ls贩紎 DǴҵԵƴѵӵµȴ 7 ַ :ŵƴѵǴҵȴµ納贍﵎ٵ്ᵭⳍڵL^ѵ-I `  4 ò-յ!  8صٵ紭ﵝ 7L (0+BC  7L HH`LgL{0 HH` õL H hBL BH [ h`Lo õ ڬL B ڬ LʬH hB@ յյ [L (ȴ) ȴ 7L L ( L (ȴL{ƴѵ洩ƴǴҵ 7 ^* B0 HȱBh ӵԵ 8 L8 ݲ` ܫ  / / ED B / / ]ƴS0Jȴ ȴ)  紅D贅E B ƴ  / 0L Ν `HD٤DEEhiHLGh ` ŵBѵ-` ѵB-` ܫ XI볩쳢8 DH E𳈈췍Ȍ X0 · JLǵBȵC`,յp` 䯩 R-յյ`յ0` K R-յյ`ɵʵӵԵ` 4 K ( ѵҵLBȱBL8` DBHBH : ַ޵BȭߵBhhӵԵ RBܵmڵ޵ȱBݵm۵ߵ` 䯩LR˵̵ֵ׵`êĪLR E( 8` R` ELRŪƪ`췌 յյI뷭鷭귭ⵍ㵍跬ª 뷰` Lf ݵܵߵ޵ ^`8ܵ i B8` 4L ֵȱB׵ ܯ䵍൭嵍 ` DȑB׵Bֵ  ַ յյ`굎뵎쵬 뵎쵌``õĵBCõĵ`µµ`L õBĵCصص Qƴ0"Bƴ 󮜳` 0۰ϬBƴ8`i#`ЗLw!0>ﵭ` m ﳐ 7i볍 8 ЉLw`H h ݲL~ `浍국䵍뵩嵠Jm赍嵊mjnnn浈ۭm浍浭m䵍䵩m嵍`"L ŵ8ŵH ~(`# d ֠z# u`'10:LM:T$(TN$,1)1'(T$)MCĺ(7):10150P'(T$)MC1TB$" ":10210p'(T$)MC2TB$" ":10210'CTR((MC(T$))2)1:TB$(TB$,CTR)'T$TB$T$'L1$(L1$,MC1)'A3ī10240'(TL1LI:M$(TL)"":TL (TL1LI:CV(37':TB$PAD$1'LM(106)256(105):LMLM24b'5:"ENTER DISK NUMBER OR PRESS RETURN ";DN$t'DN$""10150'DN$DN$"."'8:"ENTER DISK TITLE (";MC;" CHARS. MAXIMUM)"'958'L1$"_________________________________"':(L1$,MC)'CC$;:'E1$;;'DP$;#<'DN$-L'EP$;7M'T$;:AN'LD$;KO'(1)UP'EP$;_R'P2$;iU'CP$;sV'DH$;`'TA3ī10100j't'TL1LI:M$(TL):TL:y'LD$;(17)z'(16384)12827Ĺ16368,0:{'KNASġ:720~'D$;"PR#0"'450 4 COLUMNS--> DEFAULT"::"(4) 35 NAMES / 5 COLUMNS "::"(5) 42 NAMES / 6 COLUMNS":^#)NDF3#*N23:"SELECT BY NUMBER (1-4) ";DF;:(36):NN$:NN$:NN(NN$)#,NNN$(13)NNDF#/N23:958:NN1NN5ĺ"":20010#0NSD$"N"$$1N:"DESELECT FREE S1")")U# N::"(1) 14 NAMES / 2 COLUMNS"::"(2) 21 NAMES / 3 COLUMNS"::"(3) 28 NAMES /!=;A$(27)Ĭ"!B;A$"Y"152025!L;A$"N"ī15000H!V;A$"N"15150!b;22:868:1:"HOW MANY OF THIS LABEL.. ";AM;:(36):"";AM$!e;AM$""15400!g;(AM$)115202!i;AM(AM$)!j;15400!;1:I1CI:"_";::" ":"(<::D$;"PR# ;LM:M$(TL)(TN$,1)* ;M$(TL)"Q"ĬA ;M$(TL)"@"ī15000] ;(M$(TL),2)"//"15120 ;(M$(TL))CITETL:CV(TE):15300:(7):15122 $; .;AS$"Y":22:1:"(ESC) FOR MENU... CORRECT (Y/N)...";AS$;:(36):A$:A$!8;A$(13)A$AS$:15202<@> = RESTART FROM BEGINNING ":" = EDIT FROM LINE #1 USE --> PLUS (RTN) TO COPY LINES":TL1LI:M$(TL)""::8:AS$"Y"CI30:LI5:SS1:1:TL1LI:CV(TL)(37)1;1:CV(TL):DL1CI:"_";:::;TLNLI ;CV(TL)(DP$E$"G": SET DOUBLE STRIKE U(GS$E$"3": SETS LINE SPACE N/216INCH{(E1$E$"E": SET EMPHASIZED PRINT(MC16EP$E1$)::::LI7:DF$"N":CI40:N1:AM1:SS2:1010:10350k:1:" = ABORT TO MAIN MENU":" LINE SPACE TO 6/INCH D(LD$E$"A": SET LINE SPACE TO 6/INCHl(CP$E$"P": SET TO CONDENSED PRINT(DH$E$"H": CANCEL DOUBLE STRIKE (L8$E$"0": SET LINE SPACE TO 8/INCH (CC$(18): CANCEL CONDENSE PRINT *0:27:A$:A$;:A$(27)4500e(A$(13)10345Ii(MA5AMAS::15400_n(E$(27):D$(4):ms(EP$(14)x(PAD$" "}(LM(106)256(105):LMLM24(P2$E$"F"(15)(RP$E$"@": RESET PRINTER DEFAULTS(LS$E$"2": SET ON PRINTER AND POSITION FIRST LABEL"6R(A4ī10330U(15:"HOW MANY DUPLICATES ?";AA;:(36):"";AS$:AS(AS$):AS$""ASAAZ(C1:20:"PRESS (RTN) TO PRINT LABEL ":"PRESS (ESC) TO ABORT"_(TA4ĺ" PRESS NUMBER TO PRINT MULTIPLE LABELS"d(2'L1$(L1$,MC1)#'A3ī10240)'D(TL1LI:M$(TL)"":TL\ (TL1LI:CV(37)1|(DL1CI:"_";:DL::CV:1(LM:M$(TL)(TN$,1):(M$(TL))0TL6(((M$(TL))CIĢCV:958:(7);:1:102602(TL7(F(AA1:KN0%P(:11:"TURNCHARS. MAXIMUM)"'958F'L1$"_________________________________"W':(L1$,MC)o'10:LM:T$(TN$,1)'(T$)MCĺ(7):10150'(T$)MC1TB$" ":10210'(T$)MC2TB$" ":10210'CTR((MC(T$))2)1:TB$(TB$,CTR)'T$TB$T$y'LD$;(17)/z'(16384)12827Ĺ16368,0:A{'KNASġ:720P~'D$;"PR#0"Y'450h':TB$PAD$'LM(106)256(105):LMLM24'5:"ENTER DISK NUMBER OR PRESS RETURN ";DN$'DN$""10150'DN$DN$"."'8:"ENTER DISK TITLE (";MC;" /'D$;"PR#1":KNKN1 0'RP$;*3'LS$;18'1;9'CC$;E:'E1$;O;'DP$;X<'DN$bL'EP$;lM'T$;:vN'LD$;O'(1)P'EP$;Q'L1$;:R'P2$;S'E$;"A"T'E$;"0";U'CP$;V'DH$;`'TA3ī10100j't'TL1LI:M$(TL):TL: (DP$E$"G": SET DOUBLE STRIKE U(GS$E$"3": SETS LINE SPACE N/216INCH{(E1$E$"E": SET EMPHASIZED PRINT(MC16EP$E1$)::::LI7:DF$"N":CI40:N1:AM1:SS2:1010:10350k:1:" = ABORT TO MAIN MENU":" LINE SPACE TO 6/INCH D(LD$E$"A": SET LINE SPACE TO 6/INCHl(CP$E$"P": SET TO CONDENSED PRINT(DH$E$"H": CANCEL DOUBLE STRIKE (L8$E$"0": SET LINE SPACE TO 8/INCH (CC$(18): CANCEL CONDENSE PRINT *0:27:A$:A$;:A$(27)4500e(A$(13)10345Ii(MA5AMAS::15400_n(E$(27):D$(4):ms(EP$(14)x(PAD$" "}(LM(106)256(105):LMLM24(P2$E$"F"(15)(RP$E$"@": RESET PRINTER DEFAULTS(LS$E$"2": SET ON PRINTER AND POSITION FIRST LABEL"6R(A4ī10330U(15:"HOW MANY DUPLICATES ?";AA;:(36):"";AS$:AS(AS$):AS$""ASAAZ(C1:20:"PRESS (RTN) TO PRINT LABEL ":"PRESS (ESC) TO ABORT"_(TA4ĺ" PRESS NUMBER TO PRINT MULTIPLE LABELS"d(2'L1$(L1$,MC1)#'A3ī10240)'D(TL1LI:M$(TL)"":TL\ (TL1LI:CV(37)1|(DL1CI:"_";:DL::CV:1(LM:M$(TL)(TN$,1):(M$(TL))0TL6(((M$(TL))CIĢCV:958:(7);:1:102602(TL7(F(AA1:KN0%P(:11:"TURNCHARS. MAXIMUM)"'958F'L1$"_________________________________"W':(L1$,MC)o'10:LM:T$(TN$,1)'(T$)MCĺ(7):10150'(T$)MC1TB$" ":10210'(T$)MC2TB$" ":10210'CTR((MC(T$))2)1:TB$(TB$,CTR)'T$TB$T$y'LD$;(17)/z'(16384)12827Ĺ16368,0:A{'KNASġ:720P~'D$;"PR#0"Y'450h':TB$PAD$'LM(106)256(105):LMLM24'5:"ENTER DISK NUMBER OR PRESS RETURN ";DN$'DN$""10150'DN$DN$"."'8:"ENTER DISK TITLE (";MC;" /'D$;"PR#1":KNKN1 0'RP$;*3'LS$;18'1;9'CC$;E:'E1$;O;'DP$;X<'DN$bL'EP$;lM'T$;:vN'LD$;O'(1)P'EP$;Q'L1$;:R'P2$;S'E$;"A"T'E$;"0";U'CP$;V'DH$;`'TA3ī10100j't'TL1LI:M$(TL):TL: ": !)NDF3N!*N23:"SELECT BY NUMBER (1-4) ";DF;:(36):NN$:NN$:NN(NN$)c!,NNN$(13)NNDF!/N23:958:NN1NN5ĺ"":20010!0NSD$"N"!1N:"DESELECT FREE SECTORS (Y/N) ";SD$;:(36):SS$:SS$!2NSS$(13)SS$"N"!3NSS$"N"20021"4N(I): F! N::"(1) 12 NAMES / 2 COLUMNS"::"(2) 18 NAMES / 3 COLUMNS"::"(3) 24 NAMES / 4 COLUMNS--> DEFAULT"::"(4) 30 NAMES / 5 COLUMNS "::"(5) 36 NAMES / 6 COLUMNS868:1:"HOW MANY OF THIS LABEL.. ";AM;:(36):"";AM$He;AM$""15400\g;(AM$)115202ji;AM(AM$)uj;15400;1:I1CI:"_";::" ":(<::D$;"PR#1");(M$(TL))CITETL:CV(TE):15300:(7):15122D$;.;AS$"Y":22:1:"(ESC) FOR MENU... CORRECT (Y/N)...";AS$;:(36):A$:A$8;A$(13)A$AS$:15202=;A$(27)ĬB;A$"Y"15202L;A$"N"ī15000V;A$"N"151506b;22:LUS (RTN) TO COPY LINES"1:TL1LI:M$(TL)"":Q:8:AS$"Y"CI30:LI5:SS1p:1:TL1LI:CV(TL)(37)1;1:CV(TL):DL1CI:"_";:::;TLNLI;CV(TL);LM:M$(TL)(TN$,1);M$(TL)"Q"Ĭ;M$(TL)"@"ī15000 ;(M$(TL),2)(PAD$" ";}(LM(106)256(105):LMLM24A)J:::o:LI7:DF$"N":CI40:N1:AM1:SS2y:1010:10350:1:" = ABORT TO MAIN MENU":" <@> = RESTART FROM BEGINNING ":" = EDIT FROM LINE #1 USE --> PA;:(36):"";AS$:AS(AS$):AS$""ASAAlZ(C1:20:"PRESS (RTN) TO PRINT LABEL ":"PRESS (ESC) TO ABORT"_(TA4ĺ" PRESS NUMBER TO PRINT MULTIPLE LABELS"d(20:27:A$:A$;:A$(27)450e(A$(13)10345i(MA5AMAS::15400n(D$(4)x)1#(DL1CI:"_";:DL::CV:1M(LM:M$(TL)(TN$,1):(M$(TL))0TL6z(((M$(TL))CIĢCV:958:(7);:1:102602(TL7(F(AA1:KN0P(:11:"TURN ON PRINTER AND POSITION FIRST LABEL"R(A4ī10330)U(15:"HOW MANY DUPLICATES ?";AAS$;:(36):A$:A$/!8;A$(13)A$AS$:15202?!=;A$(27)ĬQ!B;A$"Y"15202d!L;A$"N"ī15000w!V;A$"N"15150!b;22:868:1:"HOW MANY OF THIS LABEL.. ";AM;:(36):"";AM$!e;AM$""15400!g;(AM$)115202!i;AM(AM$)!j;15400";1:):DL1CI:"_";:::# ;TLNLI/ ;CV(TL)G ;LM:M$(TL)(TN$,1)Y ;M$(TL)"Q"Ĭp ;M$(TL)"@"ī15000 ;(M$(TL),2)"//"15120 ;(M$(TL))CITETL:CV(TE):15300:(7):15122 $;!.;AS$"Y":22:1:"(ESC) FOR MENU... CORRECT (Y/N)...";10350:1:" = ABORT TO MAIN MENU":" <@> = RESTART FROM BEGINNING ":" = EDIT FROM LINE #1 USE --> PLUS (RTN) TO COPY LINES":TL1LI:M$(TL)""::8:AS$"Y"CI30:LI5:SS1:1:TL1LI:CV(TL)(37)1 ;1:CV(TL(CC$(18): CANCEL CONDENSE PRINT Y(DP$E$"G": SET DOUBLE STRIKE (GS$E$"3": SETS LINE SPACE N/216INCH(E1$E$"E": SET EMPHASIZED PRINT(MC16EP$E1$)::::LI7:DF$"N":CI40:N1:AM1:SS2:1010: PRINTER DEFAULTS I(LS$E$"2": SET LINE SPACE TO 6/INCH s(LD$E$"A": SET LINE SPACE TO 6/INCH(CP$E$"P": SET TO CONDENSED PRINT(DH$E$"H": CANCEL DOUBLE STRIKE (L8$E$"0": SET LINE SPACE TO 8/INCH + PRINT MULTIPLE LABELS":d(20:27:A$:A$;:A$(27)450Ne(A$(13)10345gi(MA5AMAS::15400}n(E$(27):D$(4):s(EP$(14)x(PAD$" "}(LM(106)256(105):LMLM24(P2$E$"F"(15)(RP$E$(64):RESET F(AA1:KN0CP(:11:"TURN ON PRINTER AND POSITION FIRST LABEL"TR(A4ī10330U(15:"HOW MANY DUPLICATES ?";AA;:(36):"";AS$:AS(AS$):AS$""ASAAZ(C1:20:"PRESS (RTN) TO PRINT LABEL ":"PRESS (ESC) TO ABORT"_(TA4ĺ" PRESS NUMBER TO:TB$(TB$,CTR)'T$TB$T$1'L1$(L1$,MC1)A'A3ī10240G'b(TL1LI:M$(TL)"":TLz (TL1LI:CV(37)1(DL1CI:"_";:DL::CV:1(LM:M$(TL)(TN$,1):(M$(TL))0TL6(((M$(TL))CIĢCV:958:(7);:1:102602(TL7(8:"ENTER DISK TITLE (";MC;" CHARS. MAXIMUM)"8'958d'L1$"_________________________________"u':(L1$,MC)'10:LM:T$(TN$,1)'(T$)MCĺ(7):10150'(T$)MC1TB$" ":10210'(T$)MC2TB$" ":10210'CTR((MC(T$))2)1t'TL1LI:M$(TL):TL:+y'LD$;(17)Mz'(16384)12827Ĺ16368,0:_{'KNASġ:720n~'D$;"PR#0"w'450':TB$PAD$'LM(106)256(105):LMLM24'5:"ENTER DISK NUMBER OR PRESS RETURN ";DN$'DN$""10150'DN$DN$".".'/'D$;"PR#1":KNKN1!0'RP$;+3'LS$;28'1<9'CC$;F:'E1$;P;'DP$;Y<'DN$cL'EP$;mM'T$;:wN'LD$;O'(1)P'EP$;Q'L1$;:R'P2$;S'E$;"A":T'E$;"0";U'CP$;V'DH$;X'GS$;(3)Y'E$;"0";`'TA3ī10100j' 4 COLUMNS--> DEFAULT"::"(4) 35 NAMES / 5 COLUMNS "::"(5) 42 NAMES / 6 COLUMNS":^#)NDF3#*N23:"SELECT BY NUMBER (1-4) ";DF;:(36):NN$:NN$:NN(NN$)#,NNN$(13)NNDF#/N23:958:NN1NN5ĺ"":20010#0NSD$"N"$$1N:"DESELECT FREE S1")")U# N::"(1) 14 NAMES / 2 COLUMNS"::"(2) 21 NAMES / 3 COLUMNS"::"(3) 28 NAMES /!=;A$(27)Ĭ"!B;A$"Y"152025!L;A$"N"ī15000H!V;A$"N"15150!b;22:868:1:"HOW MANY OF THIS LABEL.. ";AM;:(36):"";AM$!e;AM$""15400!g;(AM$)115202!i;AM(AM$)!j;15400!;1:I1CI:"_";::" ":"(<::D$;"PR# ;LM:M$(TL)(TN$,1)* ;M$(TL)"Q"ĬA ;M$(TL)"@"ī15000] ;(M$(TL),2)"//"15120 ;(M$(TL))CITETL:CV(TE):15300:(7):15122 $; .;AS$"Y":22:1:"(ESC) FOR MENU... CORRECT (Y/N)...";AS$;:(36):A$:A$!8;A$(13)A$AS$:15202<@> = RESTART FROM BEGINNING ":" = EDIT FROM LINE #1 USE --> PLUS (RTN) TO COPY LINES":TL1LI:M$(TL)""::8:AS$"Y"CI30:LI5:SS1:1:TL1LI:CV(TL)(37)1;1:CV(TL):DL1CI:"_";:::;TLNLI ;CV(TL) 28 NAMES / 4 COLUMNS--> DEFAULT"::"(4) 35 NAMES / 5 COLUMNS "::"(5) 42 NAMES / 6 COLUMNS":i#)NDF3#*N23:"SELECT BY NUMBER (1-4) ";DF;:(36):NN$:NN$:NN(NN$)#,NNN$(13)NNDF#/N23:958:NN1NN5ĺ"":20010#0NSD$"N"/$1N:"DESE::D$;"PR#1"4")`# N::"(1) 14 NAMES / 2 COLUMNS"::"(2) 21 NAMES / 3 COLUMNS"::"(3)AS$:15202!=;A$(27)Ĭ-!B;A$"Y"15202@!L;A$"N"ī15000S!V;A$"N"15150!b;22:868:1:"HOW MANY OF THIS LABEL.. ";AM;:(36):"";AM$!e;AM$""15400!g;(AM$)115202!i;AM(AM$)!j;15400!;1:I1CI:"_";::" ": "(< ;CV(TL)# ;LM:M$(TL)(TN$,1)5 ;M$(TL)"Q"ĬL ;M$(TL)"@"ī15000h ;(M$(TL),2)"//"15120 ;(M$(TL))CITETL:CV(TE):15300:(7):15122 $; .;AS$"Y":22:1:"(ESC) FOR MENU... CORRECT (Y/N)...";AS$;:(36):A$:A$ !8;A$(13)A$N MENU":" <@> = RESTART FROM BEGINNING ":" = EDIT FROM LINE #1 USE --> PLUS (RTN) TO COPY LINES":TL1LI:M$(TL)""::8:AS$"Y"CI30:LI5:SS1:1:TL1LI:CV(TL)(37)1;1:CV(TL):DL1CI:"_";:::;TLNLI"G": SET DOUBLE STRIKE N(GS$E$"3": SETS LINE SPACE N/216INCH(E1$E$"!": SET EM PHASIZED PRINT (MC16EP$E1$)::::LI7:DF$"N":CI40:N1:AM1:SS2:1010:10350v:1:" = ABORT TO MAI SPACE TO 6/INCH )(LD$E$"T""02"e(CP$E$"Q": SET TO CONDENSED PRINT (DH$E$"H": CANCEL DOUBLE STRIKE (L8$E$"0": SET LINE SPACE TO 8/INCH (CC$(18): CANCEL CONDENSE PRINT #(DP$E$S"%d(20:27:A$:A$;:A$(27)4509e(A$(13)10345Ri(MA5AMAS::15400hn(E$(27):D$(4):vs(EP$(14)x(PAD$" "}(LM(106)256(105):LMLM24(P2$E$(34)(15)(RP$E$(91)E$"N"(LS$E$"2": SET LINE11:"TURN ON PRINTER AND POSITION FIRST LABEL"?R(A4ī10330U(15:"HOW MANY DUPLICATES ?";AA;:(36):"";AS$:AS(AS$):AS$""ASAAZ(C1:20:"PRESS (RTN) TO PRINT LABEL ":"PRESS (ESC) TO ABORT"_(TA4ĺ" PRESS NUMBER TO PRINT MULTIPLE LABEL$TB$T$'L1$(L1$,MC1),'A3ī102402'M(TL1LI:M$(TL)"":TLe (TL1LI:CV(37)1(DL1CI:"_";:DL::CV:1(LM:M$(TL)(TN$,1):(M$(TL))0TL6(((M$(TL))CIĢCV:958:(7);:1:102602(TL7(F(AA1:KN0.P(: (";MC;" CHARS. MAXIMUM)"#'958O'L1$"_________________________________"`':(L1$,MC)x'10:LM:T$(TN$,1)'(T$)MCĺ(7):10150'(T$)MC1TB$" ":10210'(T$)MC2TB$" ":10210'CTR((MC(T$))2)1:TB$(TB$,CTR)'Ty'E$;"T27":E$;"B"8z'(16384)12827Ĺ16368,0:J{'KNASġ:720Y~'D$;"PR#0"b'450q':TB$PAD$'LM(106)256(105):LMLM24'5:"ENTER DISK NUMBER OR PRESS RETURN ";DN$'DN$""10150'DN$DN$"."'8:"ENTER DISK TITLE4,3:4/'D$;"PR#1":KNKN1'0'RP$;13'LS$;88'1B9'CC$;L:'E1$;V;'DP$;_<'DN$iL'EP$;sM'T$;:|N'LD$O'P'EP$;Q'L1$;:R'P2$;S'E$;"A"T'E$;"B";U'CP$;V'DH$;`'TA3ī10100j't'TL1LI:M$(TL):TL:"":20010$0NSD$"N"S$1N:"DESELECT FREE SECTORS (Y/N) ";SD$;:(36):SS$:SS$j$2NSS$(13)SS$"N"}$3NSS$"N"20021$4NSS$"Y"20017$5NDE$"N":12:"DESELECT SORT(Y/N) ";DE$;:(36):DE$:DE$:DE$(13)DE$"N"$6NDE$"N"20025%7NDE$":"(2) 21 NAMES / 3 COLUMNS"::"(3) 28 NAMES / 4 COLUMNS--> DEFAULT"::"(4) 35 NAMES / 5 COLUMNS "::"(5) 42 NAMES / 6 COLUMNS":#)NDF3#*N23:"SELECT BY NUMBER (1-4) ";DF;:(36):NN$:NN$:NN(NN$)#,NNN$(13)NNDF $/N23:958:NN1NN5ĺI1CI:"_";::" ":1"(<::D$;"PR#1"X")# N::"(1) 14 NAMES / 2 COLUMNS":Ԡ̠ڠŠ ԠĤңΠΠƠˠΠŠΠƠΠӠΠРϠƠΠ͠ӺРϠҠ̠ΠϠĠԍΤĭӫǮԤԠӠүȢŠԍ΍)NNDF-"/N23:958:NN1NN5ĺ"":200109"0NSD$"N"u"1N:"DESELECT FREE SECTORS (Y/N) ";SD$;:(36):SS$:SS$"2NSS$(13)SS$"N""3NSS$"N"20021"4NSS$"Y"20017#5NDE$"N":12:"DESELECT SORT(Y/N) ";DE$;:(36):DE$:DE$:DE$(13)DE$N::"(1) 14 NAMES / 2 COLUMNS"::"(2) 21 NAMES / 3 COLUMNS"::"(3) 28 NAMES / 4 COLUMNS--> DEFAULT"::"(4) 35 NAMES / 5 COLUMNS "::"(5) 42 NAMES / 6 COLUMNS":!)NDF3!*N23:"SELECT BY NUMBER (1-4) ";DF;:(36):NN$:NN$:NN(NN$)",NNN$(13400* ;1:I1CI:"_";::" ":= (<::D$;"PR#1"d )! T (Y/N)...";AS$;:(36):A$:A$;8;A$(13)A$AS$:15202K=;A$(27)Ĭ]B;A$"Y"15202pL;A$"N"ī15000V;A$"N"15150b;22:868:1:"HOW MANY OF THIS LABEL.. ";AM;:(36):"";AM$e;AM$""15400g;(AM$)115202i;AM(AM$) j;15;1:CV(TL):DL1CI:"_";:::/;TLNLI;;CV(TL)S;LM:M$(TL)(TN$,1)e;M$(TL)"Q"Ĭ|;M$(TL)"@"ī15000;(M$(TL),2)"//"15120;(M$(TL))CITETL:CV(TE):15300:(7):15122$;.;AS$"Y":22:1:"(ESC) FOR MENU... CORREC:1010:10350:1:" = ABORT TO MAIN MENU":" <@> = RESTART FROM BEGINNING ":" = EDIT FROM LINE #1 USE --> PLUS (RTN) TO COPY LINES":TL1LI:M$(TL)""::8:AS$"Y"CI30:LI5:SS1:1:TL1LI:CV(TL)(37)1"LS"&d(20:27:A$:A$;:A$(27)450:e(A$(13)10345Si(MA5AMAS::15400in(E$(27):D$(4):ws(EP$(14)x(PAD$" "}(LM(106)256(105):LMLM24(MC16EP$E1$)::::LI7:DF$"N":CI40:N1:AM1:SS311:"TURN ON PRINTER AND POSITION FIRST LABEL"@R(A4ī10330U(15:"HOW MANY DUPLICATES ?";AA;:(36):"";AS$:AS(AS$):AS$""ASAAZ(C1:20:"PRESS (RTN) TO PRINT LABEL ":"PRESS (ESC) TO ABORT"_(TA4ĺ" PRESS NUMBER TO PRINT MULTIPLE LABET$TB$T$'L1$(L1$,MC1)-'A3ī102403'N(TL1LI:M$(TL)"":TLf (TL1LI:CV(37)1(DL1CI:"_";:DL::CV:1(LM:M$(TL)(TN$,1):(M$(TL))0TL6(((M$(TL))CIĢCV:958:(7);:1:102602(TL7(F(AA1:KN0/P(:E (";MC;" CHARS. MAXIMUM)"$'958P'L1$"_________________________________"a':(L1$,MC)y'10:LM:T$(TN$,1)'(T$)MCĺ(7):10150'(T$)MC1TB$" ":10210'(T$)MC2TB$" ":10210'CTR((MC(T$))2)1:TB$(TB$,CTR) 'M$(TL):TLy':::9z'(16384)12827Ĺ16368,0:K{'KNASġ:720Z~'D$;"PR#0"c'450r':TB$PAD$'LM(106)256(105):LMLM24'5:"ENTER DISK NUMBER OR PRESS RETURN ";DN$'DN$""10150'DN$DN$"."'8:"ENTER DISK TITLNG "::::XZ1:34,3:4//'D$;"PR#1":KNKN1@0'(2);(29);G8'1^9'MC32MC2810044o:'(31);(1);x<'DN$L'(29);M'T$;(27);"B,0,$"N'L1$O'(27);"B,5,$"P'(27);"B,6,$";Q'(31);(2);`'TA3ī10100j' t'TL1LI:LECT FREE SECTORS (Y/N) ";SD$;:(36):SS$:SS$F$2NSS$(13)SS$"N"Y$3NSS$"N"20021m$4NSS$"Y"20017$5NDE$"N":12:"DESELECT SORT(Y/N) ";DE$;:(36):DE$:DE$:DE$(13)DE$"N"$6NDE$"N"20025$7NDE$"Y"20021 %9NNN20070,20030,20040,2ĠԍΤíȠԤŠԠآŠԍ΍ҤϠƠˠΠŠΠŠԠԠĤңԠФű ԠѾԠϠΠբԠԠ͠ǠԠɍ ̩̠֨ͺ̩ͤĤΤƠ̩ͤѢΠΠƠ̩ͤΠϠƠԤ̩ͤΠƠΠ̩ͤɠΠŠ̺ ֨ũ Ԡ5);Q$:: 5);K$;! P$B P$"F"ĺ(4);"BRUN FROGGER"d P$"S"ĺ(4);"BRUN SABOTAGE" P$"C"ĺ(4);"BRUN NIGHT CRAWLER" P$"W"ĺ(4);"BRUN FLIGHT SIMULATOR" P$"Q"999 150    A$"DISK MENU"/B$" FROGGER"E(C$" SABOTAGE"`2E$" NIGHT CRAWLER"~<F$" FLIGHT SIMULATOR"FQ$" QUIT THIS DISK"KK$"CHOOSE OPTION - "P5);A$::Z5);B$:d5);C$:n5);E$:x5);F$:  ĠԍΤĭӫЫŠԍ΍ ĠԍΤĭӫиԤΠظׯؠŠԍ΍ & % COPYRIGHT (C) %0& % JULY 1,1:82 %H& % J.W. FLOWERS %`& % MANTECA, CA. %x& % 95336 %& % %& %%%%%%%%%%%%%%%%% uiȩiȩiL9DE$(13)DE$"N"$%6NDE$"N"200258%7NDE$"Y"20021^%9NNN20070,20030,20040,20050,20060u%>NCL3:WD18:N221:%HNCL4:WD13:N228:%RNCL5:WD10:N235:%\NCL6:WD8:N242:%fNCL2:WD28:N214:% %%%%%%%%%%%%%%%%%& % %$,NNN$(13)NNDF;$/N23:958:NN1NN5ĺ"":20010G$0NSD$"N"$1N:"DESELECT FREE SECTORS (Y/N) ";SD$;:(36):SS$:SS$$2NSS$(13)SS$"N"$3NSS$"N"20021$4NSS$"Y"20017%5NDE$"N":12:"DESELECT SORT(Y/N) ";DE$;:(36):DE$:DE$:450 #># N::"(1) 14 NAMES / 2 COLUMNS"::"(2) 21 NAMES / 3 COLUMNS"::"(3) 28 NAMES / 4 COLUMNS--> DEFAULT"::"(4) 35 NAMES / 5 COLUMNS "::"(5) 42 NAMES / 6 COLUMNS":#)NDF3$*N23:"SELECT BY NUMBER (1-4) ";DF;:(36):NN$:NN$:NN(NN$)(AM$)115202"i;AM(AM$)'"j;15400N";1:I1CI:"_";::" ":a"(<::D$;"PR#1"") = ABORT TO MAIN MENU":" <@> = RESTART FROM BEGINNING ":" = EDIT FROM LINE #1 USE --> PLUS (RTN) TO COPY LINES":TL1LI:M$(TL)"": :10:AS$"Y"CI30:LI5:S$E$"0": SET LINE SPACE TO 8/INCH Z(CC$(18): CANCEL CONDENSE PRINT (DP$E$"G": SET DOUBLE STRIKE (GS$E$"3": SETS LINE SPACE N/216INCH(E1$E$"E": SET EMPHASIZED PRINT(MC16EP$E1$)::: :$E$"F"(15)G(RP$E$(64):RESET PRINTER DEFAULTS x(LS$E$"2": SET LINE SPACE TO 6/INCH (LD$E$"A": SET LINE SPACE TO 6/INCH(CP$E$"P": SET TO CONDENSED PRINT(DH$E$"H": CANCEL DOUBLE STRIKE +(L8SS (ESC) TO ABORT"F_(TA4ĺ" PRESS NUMBER TO PRINT MULTIPLE LABELS"id(20:27:A$:A$;:A$(27)450}e(A$(13)10345i(MA5AMAS::15400n(E$(27):D$(4):s(EP$(14)x(PAD$" "}(LM(106)256(105):LMLM24(P2))CIĢCV:958:(7);:1:10260(2(TL.7(<F(AA1:KN0rP(:11:"TURN ON PRINTER AND POSITION FIRST LABEL"R(A4ī10330U(15:"HOW MANY DUPLICATES ?";AA;:(36):"";AS$:AS(AS$):AS$""ASAAZ(C1:20:"PRESS (RTN) TO PRINT LABEL ":"PRE)MC2TB$" ":10210>'CTR((MC(T$))2)1:TB$(TB$,CTR)L'T$TB$T$`'L1$(L1$,MC1)p'A3ī10240v'(TL1LI:M$(TL)"":TL (TL1LI:CV(37)1(DL1CI:"_";:DL::CV:1(LM:M$(TL)(TN$,1):(M$(TL))0TL6 (((M$(TLRN ";DN$'DN$""10150*'DN$DN$"."]'8:"ENTER DISK TITLE (";MC;" CHARS. MAXIMUM)"g'958'L1$"_________________________________"':(L1$,MC)'10:LM:T$(TN$,1)'(T$)MCĺ(7):10150'(T$)MC1TB$" ":10210'(T$X'GS$;(3)Y'E$;"0";*`'TA3ī101000j'Kt'TL1LI:M$(TL):TL:Zy'LD$;(17)|z'(16384)12827Ĺ16368,0:{'KNASġ:720~'D$;"PR#0"'450':TB$PAD$'LM(106)256(105):LMLM24'5:"ENTER DISK NUMBER OR PRESS RETUS (ESC) TO ABORT PRINTING "::::XZ1:34,3:4F/'D$;"PR#1":KNKN1P0'RP$;Z3'LS$;a8'1k9'CC$;u:'E1$;;'DP$;<'DN$L'EP$;M'T$;:N'LD$;O'(1)P'EP$;Q'L1$;:R'P2$;S'E$;"A":T'E$;"0";U'CP$;V'DH$; 8 37891I1ī6090&I2W137894F(28)255İ6130kF$"":M130:F$F$(TN$,M,1):xF$(I)F$I1ī6060IUL$"_______________________________"650B':'10350$'10130/.'A4XZ0Ģ1::" PRES  DE$"Y"3354  N%N; ALPH(FA$,0,N%,1,14,A)M SS$"Y"3360e FA$(N2)DS$"/"KS$k |K1:J1:NN2Q(NCOL)IKNQF$(J)FA$(I)JJ1KK1KNıJNı4020p28,0I13788 N$(J)""3200X D(N$(J))3Y D1ĺ"":3135C] 37:(J):DRb DWDW1al NA$(D)UL$gv m{ w :JN : SNS1:3010  SN3270 :: :H1 K1N NA$(K)""3330 FA$(H)NA$(K):NA$(K)"" HH1ԠŠ  ԠŠ͠ˠΠŠԠԠԠӠ٠٠ϠŢԠФԠФԠҤΠŬıΠƠҠΠԠϠӠĠԍΤĭӫЫԤΠظׯثŠԍ΍   HT(36)$ AN$(13)AN$DF$> AN$"N"SS18:3240X AN$"Y"SS18:3120n# AN$(27)ĉ:450& AN$"N"ī30500 22:958:"USE NUMBER ON LEFT TO DELETE FROM LABEL ": J1N? 23D 1:" NAME # ";J;" TO DELETE ";:N$(J)N30)256:DS$"FS"(DS%):KS$"3.3", ISN? I;": ";NA$(I)Q IS18İ3045W c DF$"N"x 30:DS$;"/";KS$ 21:"-------------------------------------" 958 1:" DELETE NAMES FROM LABEL ? (Y/N) ";DF$;:(36):AN$:AN$ 34,23DF$"N":LI6A"USING SMALLER LABELS..?";DF$;:(36):AS$:AS$RAS$(13)ıtAS$"Y"MCMC3:LI2:CI49:AS$"N"1000BI1N:NA$(I)F$(I):DE$"Y"3000N%IALPH(NA$,0,N%,1,14,A) ::NI1:S1! DS%(29)(N870\LNf:$kLD$;(17)Fl(16384)12827Ĺ16368,0:VmKNASī720jpD$;"PR#0":450::MC16:DF$"N":CI60"CHANGE TITLE LENGTH..?";DF$;:(36):AS$:AS$AS$(13)MC16:AS$"Y"MC32:AS$"N"900 3:00 1035010130#10310.10030ECOLCL:WIDWD:NN2RA4770\4000lLN1NCOL N$"":CH0COL1QLNCH:QN820 NN$(F$(Q),WID)(160)(160)"NN$*N$N$NN$:CH4L1(N$)H(N$,L,1);RL::QTO ABORT":20:"PRESS(C) TO CHANGE ROWS AND COLUMNS "Hw9:28:A$:A$`xA$"C"İ20000:630ryA$(27)450xz{DF$"READING CATALOG"|12:(40(DF$))2:DF$6000NI:ZNW:F$(Z)UL$:ZNN2NN22000900:TA3İ10:12:7:"PLACE PROGRAM DISK IN DRIVE #1":::" PRESS ANY KEY TO CONTINUE";:P$:P$w e(4);"RUN CONFIGURE,D1"} f l::12:18:"BYE!!":24:5v::"INSERT DISK TO BE LABELED IN DRIVE #1 ":9:"PRESS (RETURN) TO CONTINUE"::"PRESS (ESC) ;:Z(0):868:A$:A$;:A(A$)3 V(37):H(36)I &A1A7ĺ"":530R )AS0` +A3TA3n ,A5MA5w 0610 :: D(4);"CATALOG,S6,D1" N:"PRESS ANY KEY TO RETURN TO MENU":A$:A$ X450 bA570,199,690,710,15000,612,620Z d::4:"(2) PRINT DISK LABELS "D :4:"(3) PRINT LABEL TITLE ONLY"s :4:"(4) PRINT DUPLICATE OF LAST LABEL " :4:"(5) PRINT MAILING OR SHIPPING LABEL" :4:"(6) RECONFIGURE PRINTER"::4:"(7) END PROGRAM" 5:20:"YOUR CHOICE (1-7) "::37000:630. ::1:13:" D-LABELS + "@ (4);"PR# 0"L TN$AX$ 3:"#--------------------------------------#" (37):I115:1:"!";:40:"!";: 19:"#--------------------------------------#" 5:4:"(1) CATALOG DISK " H+ 1 TN$"SAMP-INDEX "k 1013,76:1014,208:1015,144:D$(4):N228:CL4:WD13 D$;"NOMONC,I,O" (37888)76(37894)76250 D$;"BLOADALPHA,A$90D0" W60:TA0:MC16 37888 F$(W),NA$(W),FA$(W),N$(W) !I18:((NA$(1),1,I))):'A *******************[ ** D-LABELS + **u **BY J.W.FLOWERS **( ** JULY 1,1982 **2 ** ALL RIGHTS **< ** RESERVED **F *******************d:450 EPSON 80 GPĠԍΤĭӫǮԤԠӠүȢŠԍ΍IGHT (C) %"$ % JULY 1,1:82 %:$ % J.W. FLOWERS %R$ % MANTECA, CA. %j$ % 95336 %$ % %$ %%%%%%%%%%%%%%%%% uiȩiȩiL9T"N"#6NDE$"N"20025*#7NDE$"Y"20021P#9NNN20070,20030,20040,20050,20060g#>NCL3:WD18:N221:~#HNCL4:WD13:N228:#RNCL5:WD10:N235:#\NCL6:WD8:N242:#fNCL2:WD28:N214:# %%%%%%%%%%%%%%%%%# % % $ % COPYR ԠҤϠƠˠΠŠΠĠԍΤɮĮӮԤӠŠԍ΍ TECA, CA. %$& % 95336 %<& % %T& %%%%%%%%%%%%%%%%% uiȩiȩiL9iL9T0050,20060!%>NCL3:WD18:N221:8%HNCL4:WD13:N228:O%RNCL5:WD10:N235:e%\NCL6:WD8:N242:|%fNCL2:WD28:N214:% %%%%%%%%%%%%%%%%%% % %% % COPYRIGHT (C) %% % JULY 1,1:82 %% % J.W. FLOWERS % & % MAN%& % 95336 %1& % %I& %%%%%%%%%%%%%%%%% uiȩiȩiL9ȩiL9T%RNCL5:WD10:N235:,%\NCL6:WD8:N242:C%fNCL2:WD28:N214:\%0u(4);"OPEN CHANGES"u%:u(4);"WRITECHANGES"%Du450:556%Nu876:10030,10031:10106,10107:10345:15120,15130:15432%Su15400,15405:15020:15400,15410%Xu(4);"CLOSE"& %(13)SS$"N" $3NSS$"N"200214$4NSS$"Y"20017$5NDE$"N":12:"DESELECT SORT(Y/N) ";DE$;:(36):DE$:DE$:DE$(13)DE$"N"$6NDE$"N"20025$7NDE$"Y"20021$9NNN20070,20030,20040,20050,20060$>NCL3:WD18:N221:$HNCL4:WD13:N228:OLUMNS "::"(5) 42 NAMES / 6 COLUMNS":0#)NDF3s#*N23:"SELECT BY NUMBER (1-4) ";DF;:(36):NN$:NN$:NN(NN$)#,NNN$(13)NNDF#/N23:958:NN1NN5ĺ"":20010#0NSD$"N"#1N:"DESELECT FREE SECTORS (Y/N) ";SD$;:(36):SS$:SS$ $2NSS$155Ĺ16368,0:Y"K'# N::"(1) 14 NAMES / 2 COLUMNS"::"(2) 21 NAMES / 3 COLUMNS"::"(3) 28 NAMES / 4 COLUMNS--> DEFAULT"::"(4) 35 NAMES / 5 C868:1:"HOW MANY OF THIS LABEL.. ";AM;:(36):"";AM$J!e;AM$""15400^!g;(AM$)115202l!i;AM(AM$)w!j;15400!;1:I1CI:"_";::" ":!(<::D$;"PR#1"!- = ABORT TO MAIN MENU":" <@> = RESTART FROM BEGINNING ":" = EDIT FROM LINE #1 USE --> P": SET TO CONDENSED PRINTJ(DH$E$"H": CANCEL DOUBLE STRIKE |(L8$E$"0": SET LINE SPACE TO 8/INCH (CC$(18): CANCEL CONDENSE PRINT (DP$E$"G": SET DOUBLE STRIKE (GS$E$"3": SETS LINE SPACE N/216s(EP$(14)(x(PAD$" "J}(LM(106)256(105):LMLM24_(P2$E$"F"(15)(RP$E$(64):RESET PRINTER DEFAULTS (LS$E$"2": SET LINE SPACE TO 6/INCH (LD$E$"A": SET LINE SPACE TO 6/INCH(CP$E$":AS(AS$):AS$""ASAA[Z(C1:20:"PRESS (RTN) TO PRINT LABEL ":"PRESS (ESC) TO ABORT"_(TA4ĺ" PRESS NUMBER TO PRINT MULTIPLE LABELS"d(20:27:A$:A$;:A$(27)450e(A$(13)10345i(MA5AMAS::15400j(:n(E$(27):D$(4): "_";:DL::CV:1<(LM:M$(TL)(TN$,1):(M$(TL))0TL6i(((M$(TL))CIĢCV:958:(7);:1:10260q2(TLw7(F(AA1:KN0P(:11:"TURN ON PRINTER AND POSITION FIRST LABEL"R(A4ī10330U(15:"HOW MANY DUPLICATES ?";AA;:(36):"";AS$N$,1) '(T$)MCĺ(7):10150?'(T$)MC1TB$" ":10210_'(T$)MC2TB$" ":10210'CTR((MC(T$))2)1:TB$(TB$,CTR)'T$TB$T$'L1$(L1$,MC1)'A3ī10240'(TL1LI:M$(TL)"":TL (TL1LI:CV(37)1(DL1CI:ĠԍΤĭӫǮԤԠӠǠŠԍ΍650 B':'10350($'10130r.'A4XZ0Ģ1::" PRESS (ESC) TO ABORT PRINTING "::::XZ1:34,3:4/'D$;"PR#1":KNKN10'RP$;3'LS$;8'19'CC$;:'E1$;;'DP$;<'DN$L'EP$;M'T$;:N'LD$;O'(1)P'EP$;KK1KNıJNı'40201p28,09I1D37888O37891^I1ī6090iI2Wt37894(28)255İ6130F$"":M130:F$F$(TN$,M,1):F$(I)F$I1ī6060IUL$"_______________________________" K1N NA$(K)""33308 FA$(H)NA$(K):NA$(K)""B HH1H Z DE$"Y"3354c N%N~ ALPH(FA$,0,N%,1,14,A) SS$"Y"3360 FA$(N2)DS$"/"KS$ K1:J1:NN2Q(NCOL)IKNQF$(J)FA$(I)JJ1 : J1N? 23?D 1:" NAME # ";J;" TO DELETE ";:N$(J)RN N$(J)""3200aX D(N$(J))vY D1ĺ"":3135] 37:(J):Db DWDW1l NA$(D)UL$v {  :JN : SNS1:3010  SN3270 :: :H1 DELETE NAMES FROM LABEL ? (Y/N) ";DF$;:(36):AN$:AN$C 34,23P HT(36)g AN$(13)AN$DF$ AN$"N"SS18:3240 AN$"Y"SS18:3120# AN$(27)ĉ:450& AN$"N"ī30500 22:958:"USE NUMBER ON LEFT TO DELETE FROM LABEL "N%I ALPH(NA$,0,N%,1,14,A)2 ::NI1:S1d DS%(29)(30)256:DS$"FS"(DS%):KS$"3.3"o ISN I;": ";NA$(I) IS18İ3045  DF$"N" 30:DS$;"/";KS$ 21:"-------------------------------------" 9588 1:""MC32:AS$"N"900/3:DF$"N":LI6d"USING SMALLER LABELS..?";DF$;:(36):AS$:AS$uAS$(13)ıAS$"Y"MCMC4:LI2:CI49:AS$"N"1000BCV(TL):LM:M$(TL)(TN$,1)I1N:NA$(I)F$(I):DE$"Y"30001(N$)H(N$,L,1);*RL::QN8702\LN8f:GkLD$;(17)il(16384)12827Ĺ16368,0:ymKNASī720pD$;"PR#0":450::MC16:DF$"N":CI60"CHANGE TITLE LENGTH..?";DF$;:(36):AS$:AS$AS$(13)MC16: AS$"YNN2NN22000.900:TA3İ1000910350D10130O10310Z10030qCOLCL:WIDWD:NN2~A47704000LN1NCOL N$"":CH0COL1QLNCH:QN820 NN$(F$(Q),WID)(160)(160)*N$N$NN$:CH4LPRESS (RETURN) TO CONTINUE"::"PRESS (ESC) TO ABORT":20:"PRESS(C) TO CHANGE ROWS AND COLUMNS "t w9:28:A$:A$ xA$"C"İ20000:630 yA$(27)450 z {DF$"READING CATALOG" |12:(40(DF$))2:DF$ 6000NI:ZNW:F$(Z)UL$:Z )AS0 +A3TA3# ,A5MA5, 06104 ::N D(4);"CATALOG,S6,D1" N:"PRESS ANY KEY TO RETURN TO MENU":A$:A$ X450 bA570,199,690,710,15000,620 l::12:18:"BYE!!":24:a v::"INSERT DISK TO BE LABELED IN DRIVE #1 ":9:"T LABEL TITLE ONLY"B :4:"(4) PRINT DUPLICATE OF LAST LABEL "r :4:"(5) PRINT MAILING OR SHIPPING LABEL" :4:"(6) END PROGRAM":: 5:20:"YOUR CHOICE (1-6) ";:Z(0):868:A$:A$;:A(A$) V(37):H(36) &A1A6ĺ"":530(4);"PR# 0" TN$AX$N 3:"#--------------------------------------#"v (37):I113:1:"!";:40:"!";: 17:"#--------------------------------------#" 5:4:"(1) CATALOG DISK " :4:"(2) PRINT DISK LABELS " :4:"(3) PRIN3,76:1014,208:1015,144:D$(4):N228:CL4:WD13F D$;"NOMONC,I,O"g (37888)76(37894)76250 D$;"BLOADALPHA,A$90D0" W60:TA0:MC16 37888 F$(W),NA$(W),FA$(W),N$(W) ::37000:630 ,DUMB ::1:13:" D-LABELS + " ĠԍΤĭӫǮԤԠӠǠӯȢŠԍ΍z#??    ţ ȣ  ǣ Ա ǣàŠ íȠ ɮĮӮ Šà ĠǠŠī!Ī ӠԠŠĭӫǠ ĭӫǮĭӫи ĭӫЫ ƠӤ٢ΠààɠɠΠ ƠӤ٢ΠɠɠӠԠ͠ŠŠӠΩϠ٠ӢŠԠԠĤңԠФűҠΠϠ͍ĠԍΤĭӫǠԤΠظŠԍ΍ 813(16384)1283210 , 21:958E N$" D-LABELS+ GRP+"k 22:10:"LOADING MAIN PROGRAM " (4);"BLOAD ALPHA, A$90D0" N$" D-LABELS+ ORG " (4);"RUN";N$ ::12:10:" LOADING CONFIGURE " (4).FLOWERS "4 15:8:"MANTECA, CA. 95336 "I PT$"EPSON MX80" 22:" PRESS TO RECONFIGURE FOR PRINTER ":23:" PRESS TO CONTINUE ":X(PT$):10:(32X)2::"--> ";PT$;" <--": I1200:(16384)12867200 (16384)12&::(4);"MAXFILES1":"%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%":I218:"%";:39:"%":I:"%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%";5:9:" D-LABELS + ":6:14:"----------":8:14:"VERSION 2.0" 13:6:"COPYRIGHT 1982 J.W  #AS$"Y"MCMC2:LI2:CI49:C:8:AS$"Y"CI30:LI5:SS1VX(4);"MONCIO"k@(4);"OPEN EXC"J(4);"WRITEEXC"T1030,16000^(4);"CLOSE" *ԠԠ̠ڠŠŠԠĤҠԠФű ӠڠƠĠڠΠ ŠԠӠéϠԠǠԠԠ̠ڠŠŠϠƠĠڠΠ ŠԠӠéϠԠǠ N$" D-LABELS+ GRP+":2 "N$"I.D.S. 560":J ,N$"C-ITOH 8510A":b 6N$"C-ITOH 8510A":z @N$"C-ITOH 8510A": JN$"C-ITOH 8510A": TN$"D-LABELS+ REG.": i r |    I ITE CONFIGURE EXEC"- PT$(AN)(PT$(AN),27)X "LOAD BOOT":"19 N$=";(34);N$;(34)z "5 PT$=";(34);PT$(AN);(34) "SAVE BOOT" "RUN" D$;"CLOSE" D$;"EXEC CONFIGURE EXEC"  N$" D-LABELS+ ORG ": N$" D-LABELS+ GRP80": X "IDS 560","C-ITOH 8510A","PROWRITER","APPLE DOT MATRIX","NEC DOT MATRIX" "MOST OTHERS @ 10 CHAR/INCH" ," "," "," "," "," "," "," "," " D$;"DELETECONFIGURE EXEC" D$;"OPEN CONFIGURE EXEC" D$;"WRN$):AN1AN172080T %AN10:23:"TRY AGAIN PLEASE ":I12000::AN0:2080 *AN4100,4110,4120,4130,4140,4150,4160,4170,4180,4190,4200,4210,4220,4230,4240,4250,4260, "EPSON MX80","EPSON MX80 W/GRAFTRAX 80" ,"EPSON MX80-100 W/GRAFTRAX+" Z16368,0%d(4);"MAXFILES3"1IN$AS$=D$(4)g::1:"CONFIGURE FOR WHICH PRINTER"tPT$(23)I117PT$(I)I10:I3:" ";I;" - ";PT$(I):2060I3:I;;" - ";PT$(I)  23:"SELECT BY NUMBER : ";AN$:AN(A    ĠԍΤĭӫЫŠԍ΍ĠԍΤĭӫЫŠԍ΍ȭ  hh`ɺɠ @)`L L=LiTȱiȱi`ȱiȱi ``ȑ Ŕ8 Đ0ȑ Ŕ 0/# `i!LȭLL ޘи8ޥ߰ L,L L4Hȥؑȥّڥݑօوܑօ؈ڑh`Н(kٓlړPӓ`(ٓkړlӓP`PJ TuVTvP`ALPH(VARIABLE NOT FOUNDlnLۓLKkiRliSޅP߅QTU qPХQFf N`8ޥeeЅօڥхׅۦeޅ֥e߅eڥeօȱօٱڅ݈څܠc]0 ܰ Lڒܐ@ Lڒ6 А4H +hݏ%  , ۓʽۓ$LZ ܓܓ g RPޥQ g RP8ޅQ߅Y  NLޠ ʬꓖ ꓖ D0Ȍ ),л гkۓȱkܓ+kekHȱkellhkm    4(28)255İ6130;F$"":M130:F$F$(TN$,M,1):HF$(I)F$WI1ī6060^IUL$"_______________________________"650B':'10350$'10130.'A4XZ0Ģ1::" PRESS (ESC) TO ABORT PRINTING "::::XZ1:34,3:4,N%,1,14,A) SS$"Y"33605 FA$(N2)DS$"/"KS$; LK1:J1:NN2ZQ(NCOL)gIKNQxF$(J)FA$(I)JJ1KK1KNıJNı4020p28,0I13788837891I1ī6090I2W3789135] 37:(J):D"b DWDW11l NA$(D)UL$7v ={ G :JNO :b SNS1:3010h v SN3270 :: :H1 K1N NA$(K)""3330 FA$(H)NA$(K):NA$(K)"" HH1  DE$"Y"3354 N%N  ALPH(FA$,0"SS18:3240( AN$"Y"SS18:3120># AN$(27)ĉ:450R& AN$"N"ī30500 22:958:"USE NUMBER ON LEFT TO DELETE FROM LABEL ": J1N? 23D 1:" NAME # ";J;" TO DELETE ";:N$(J)N N$(J)""3200X D(N$(J))Y D1ĺ"":3 I;": ";NA$(I)! IS18İ3045' 3 DF$"N"H 30:DS$;"/";KS$y 21:"-------------------------------------" 958 1:" DELETE NAMES FROM LABEL ? (Y/N) ";DF$;:(36):AN$:AN$ 34,23 HT(36) AN$(13)AN$DF$ AN$"N:(36):AS$:AS$"AS$(13)ıDAS$"Y"MCMC2:LI2:CI49:WAS$"N"1000]BwI1N:NA$(I)F$(I):DE$"Y"3000N%IALPH(NA$,0,N%,1,14,A) ::NI1:S1 DS%(29)(30)256:DS$"FS"(DS%):KS$"3.3" ISN84)12827Ĺ16368,0:&mKNASī720:pD$;"PR#0":450V::MC16:DF$"N":CI60"CHANGE TITLE LENGTH..?";DF$;:(36):AS$:AS$AS$(13)MC16:AS$"Y"MC32:AS$"N"9003:DF$"N":LI6"USING SMALLER LABELS..?";DF$;10030COLCL:WIDWD:NN2+A477054000ELN1NCOL[ N$"":CH0COL1pQLNCH:QN820 NN$(F$(Q),WID)(160)(160)*N$N$NN$:CH4L1(N$)H(N$,L,1);RL::QN870\LNf:kLD$;(17)l(163 AND COLUMNS "!w9:28:A$:A$9xA$"C"İ20000:630KyA$(27)450Qzk{DF$"READING CATALOG"|12:(40(DF$))2:DF$6000NI:ZNW:F$(Z)UL$:ZNN2NN22000900:TA3İ10001035010130103101":::" PRESS ANY KEY TO CONTINUE";:P$:P$P e(4);"RUN CONFIGURE,D1"V fu l::12:18:"BYE!!":24:v::"INSERT DISK TO BE LABELED IN DRIVE #1 ":9:"PRESS (RETURN) TO CONTINUE"::"PRESS (ESC) TO ABORT":20:"PRESS(C) TO CHANGE ROWS(37):H(36)" &A1A7ĺ"":530+ )AS09 +A3TA3G ,A5MA5P 0610X ::r D(4);"CATALOG,S6,D1" N:"PRESS ANY KEY TO RETURN TO MENU":A$:A$ X450 bA570,199,690,710,15000,612,6203 d::12:7:"PLACE PROGRAM DISK IN DRIVE #"(3) PRINT LABEL TITLE ONLY"L :4:"(4) PRINT DUPLICATE OF LAST LABEL "| :4:"(5) PRINT MAILING OR SHIPPING LABEL" :4:"(6) RECONFIGURE PRINTER"::4:"(7) END PROGRAM" 5:20:"YOUR CHOICE (1-7) ";:Z(0):868:A$:A$;:A(A$) VELS + " (4);"PR# 0"% TN$AX$X 3:"#--------------------------------------#" (37):I115:1:"!";:40:"!";: 19:"#--------------------------------------#" 5:4:"(1) CATALOG DISK " :4:"(2) PRINT DISK LABELS " :4: "D 1013,76:1014,208:1015,144:D$(4):N228:CL4:WD13Y D$;"NOMONC,I,O"z (37888)76(37894)76250 D$;"BLOADALPHA,A$90D0" W60:TA0:MC16 37888 F$(W),NA$(W),FA$(W),N$(W) ::37000:630 ::1:13:" D-LABb *******************5 ** D-LABELS + **O **BY J.W.FLOWERS **i( ** JULY 1,1982 **2 ** ALL RIGHTS **< ** RESERVED **F *******************d:450 EPSON 80 ORG TN$"CG#4           ""M,1):F$(I)F$"I1ī6060)ISUL$"_______________________________"\650bBj':u'10350$'10130.'A4XZ0Ģ1::" PRESS (ESC) TO ABORT PRINTING "::::XZ1:34,3:4/'D$;"PR#1":KNKN10'RP$;3'LS$;8'19 K1:J1:NN2%Q(NCOL)2IKNQCF$(J)FA$(I)MJJ1S]KK1iKNıuJNı4020p28,0I13788837891I1ī6090I2W37894(28)255İ6130F$"":M130:F$F$(TN$, {  :JN :- SNS1:30103 A SN3270K ::U :H1` K1Nt NA$(K)""3330 FA$(H)NA$(K):NA$(K)"" HH1  DE$"Y"3354 N%N ALPH(FA$,0,N%,1,14,A) SS$"Y"3360 FA$(N2)DS$"/"KS$7)ĉ:450& AN$"N"ī3050X0 22:958:"USE NUMBER ON LEFT TO DELETE FROM LABEL "c: J1Nk? 23D 1:" NAME # ";J;" TO DELETE ";:N$(J)N N$(J)""3200X D(N$(J))Y D1ĺ"":3135] 37:(J):Db DWDW1l NA$(D)UL$v 30:DS$;"/";KS$D 21:"-------------------------------------"N 958 1:" DELETE NAMES FROM LABEL ? (Y/N) ";DF$;:(36):AN$:AN$ 34,23 HT(36) AN$(13)AN$DF$ AN$"N"SS18:3240 AN$"Y"SS18:3120 # AN$(22:LI2:CI49:"AS$"N"1000(BBI1N:NA$(I)F$(I):TDE$"Y"3000]N%IxALPH(NA$,0,N%,1,14,A) ::NI1:S1 DS%(29)(30)256:DS$"FS"(DS%):KS$"3.3" ISN I;": ";NA$(I) IS18İ3045  DF$"N"!l(16384)12827Ĺ16368,0:1mKNASī720EpD$;"PR#0":450m::MC32:DF$" N":CI36AS$"Y":MC32:AS$"N"9003:DF$"N":LI5"USING SMALLER LABELS..?";DF$;:(36):AS$:AS$AS$(13)ıAS$"Y"MCMC10030 COLCL:WIDWD:NN2-A477074000GLN1NCOL] N$"":CH0COL1rQLNCH:QN820 NN$(F$(Q),WID)(160)%CL5NN$NN$(160)*N$N$NN$:CH4L1(N$)H(N$,L,1);RL::QN870\LNf:kWS AND COLUMNS "#w9:28:A$:A$;xA$"C"İ20000:630MyA$(27)450Szm{DF$"READING CATALOG"|12:(40(DF$))2:DF$6000NI:ZNW:F$(Z)UL$:ZNN2NN22000900:TA3İ1000103501013010310 #1":::" PRESS ANY KEY TO CONTINUE";:P$:P$R e(4);"RUN CONFIGURE,D1"X fw l::12:18:"BYE!!":24:v::"INSERT DISK TO BE LABELED IN DRIVE #1 ":9:"PRESS (RETURN) TO CONTINUE"::"PRESS (ESC) TO ABORT":20:"PRESS(C) TO CHANGE RO(37):H(36)$ &A1A7ĺ"":530- )AS0; +A3TA3I ,A5MA5R 0610Z ::t D(4);"CATALOG,S6,D1" N:"PRESS ANY KEY TO RETURN TO MENU":A$:A$ X450 bA570,199,690,710,15000,612,6205 d::12:7:"PLACE PROGRAM DISK IN DRIVE4:"(3) PRINT LABEL TITLE ONLY"N :4:"(4) PRINT DUPLICATE OF LAST LABEL "~ :4:"(5) PRINT MAILING OR SHIPPING LABEL" :4:"(6) RECONFIGURE PRINTER"::4:"(7) END PROGRAM" 5:20:"YOUR CHOICE (1-7) ";:Z(0):868:A$:A$;:A(A$) VABELS + " (4);"PR# 0"' TN$AX$Z 3:"#--------------------------------------#" (37):I115:1:"!";:40:"!";: 19:"#--------------------------------------#" 5:4:"(1) CATALOG DISK " :4:"(2) PRINT DISK LABELS " : "F 1013,76:1014,208:1015,144:D$(4):N224:CL4:WD7[ D$;"NOMONC,I,O"| (37888)76(37894)76250 D$;"BLOADALPHA,A$90D0" W60:TA0:MC16 37888 F$(W),NA$(W),FA$(W),N$(W) ::37000:630 ::1:13:" D-L  *******************5 ** D-LABELS + **O **BY J.W.FLOWERS **i( ** JULY 1,1982 **2 ** ALL RIGHTS **< ** RESERVED **F *******************d:f D-LABELS+ REG.450 TN$"CG#4              4(28)255İ6130;F$"":M130:F$F$(TN$,M,1):HF$(I)F$WI1ī6060^IUL$"_______________________________"650B':'10350$'10130.'A4XZ0Ģ1::" PRESS (ESC) TO ABORT PRINTING "::::XZ1:34,3:4,N%,1,14,A) SS$"Y"33605 FA$(N2)DS$"/"KS$; LK1:J1:NN2ZQ(NCOL)gIKNQxF$(J)FA$(I)JJ1KK1KNıJNı4020p28,0I13788837891I1ī6090I2W3789135] 37:(J):D"b DWDW11l NA$(D)UL$7v ={ G :JNO :b SNS1:3010h v SN3270 :: :H1 K1N NA$(K)""3330 FA$(H)NA$(K):NA$(K)"" HH1  DE$"Y"3354 N%N  ALPH(FA$,0"SS18:3240( AN$"Y"SS18:3120># AN$(27)ĉ:450R& AN$"N"ī30500 22:958:"USE NUMBER ON LEFT TO DELETE FROM LABEL ": J1N? 23D 1:" NAME # ";J;" TO DELETE ";:N$(J)N N$(J)""3200X D(N$(J))Y D1ĺ"":3 I;": ";NA$(I)! IS18İ3045' 3 DF$"N"H 30:DS$;"/";KS$y 21:"-------------------------------------" 958 1:" DELETE NAMES FROM LABEL ? (Y/N) ";DF$;:(36):AN$:AN$ 34,23 HT(36) AN$(13)AN$DF$ AN$"N:(36):AS$:AS$"AS$(13)ıDAS$"Y"MCMC2:LI2:CI49:WAS$"N"1000]BwI1N:NA$(I)F$(I):DE$"Y"3000N%IALPH(NA$,0,N%,1,14,A) ::NI1:S1 DS%(29)(30)256:DS$"FS"(DS%):KS$"3.3" ISN84)12827Ĺ16368,0:&mKNASī720:pD$;"PR#0":450V::MC16:DF$"N":CI60"CHANGE TITLE LENGTH..?";DF$;:(36):AS$:AS$AS$(13)MC16:AS$"Y"MC32:AS$"N"9003:DF$"N":LI6"USING SMALLER LABELS..?";DF$;10030COLCL:WIDWD:NN2+A477054000ELN1NCOL[ N$"":CH0COL1pQLNCH:QN820 NN$(F$(Q),WID)(160)(160)*N$N$NN$:CH4L1(N$)H(N$,L,1);RL::QN870\LNf:kLD$;(17)l(163 AND COLUMNS "!w9:28:A$:A$9xA$"C"İ20000:630KyA$(27)450Qzk{DF$"READING CATALOG"|12:(40(DF$))2:DF$6000NI:ZNW:F$(Z)UL$:ZNN2NN22000900:TA3İ10001035010130103101":::" PRESS ANY KEY TO CONTINUE";:P$:P$P e(4);"RUN CONFIGURE,D1"V fu l::12:18:"BYE!!":24:v::"INSERT DISK TO BE LABELED IN DRIVE #1 ":9:"PRESS (RETURN) TO CONTINUE"::"PRESS (ESC) TO ABORT":20:"PRESS(C) TO CHANGE ROWS(37):H(36)" &A1A7ĺ"":530+ )AS09 +A3TA3G ,A5MA5P 0610X ::r D(4);"CATALOG,S6,D1" N:"PRESS ANY KEY TO RETURN TO MENU":A$:A$ X450 bA570,199,690,710,15000,612,6203 d::12:7:"PLACE PROGRAM DISK IN DRIVE #"(3) PRINT LABEL TITLE ONLY"L :4:"(4) PRINT DUPLICATE OF LAST LABEL "| :4:"(5) PRINT MAILING OR SHIPPING LABEL" :4:"(6) RECONFIGURE PRINTER"::4:"(7) END PROGRAM" 5:20:"YOUR CHOICE (1-7) ";:Z(0):868:A$:A$;:A(A$) VELS + " (4);"PR# 0"% TN$AX$X 3:"#--------------------------------------#" (37):I115:1:"!";:40:"!";: 19:"#--------------------------------------#" 5:4:"(1) CATALOG DISK " :4:"(2) PRINT DISK LABELS " :4: "D 1013,76:1014,208:1015,144:D$(4):N228:CL4:WD13Y D$;"NOMONC,I,O"z (37888)76(37894)76250 D$;"BLOADALPHA,A$90D0" W60:TA0:MC16 37888 F$(W),NA$(W),FA$(W),N$(W) ::37000:630 ::1:13:" D-LABb *******************5 ** D-LABELS + **O **BY J.W.FLOWERS **i( ** JULY 1,1982 **2 ** ALL RIGHTS **< ** RESERVED **F *******************d:450 EPSON GPH 80 TN$"RETRIEVE TEXT         94(28)255İ6130<F$"":M130:F$F$(TN$,M,1):IF$(I)F$XI1ī6060_IUL$"_______________________________"650B':'10350$'10130.'A4XZ0Ģ1::" PRESS (ESC) TO ABORT PRINTING "::::XZ1:34,3:40,N%,1,14,A) SS$"Y"33606 FA$(N2)DS$"/"KS$< MK1:J1:NN2[Q(NCOL)hIKNQyF$(J)FA$(I)JJ1KK1KNıJNı4020p28,0I13788837891I1ī6090I2W3783135] 37:(J):D#b DWDW12l NA$(D)UL$8v >{ H :JNP :c SNS1:3010i w SN3270 :: :H1 K1N NA$(K)""3330 FA$(H)NA$(K):NA$(K)"" HH1  DE$"Y"3354 N%N  ALPH(FA$,N"SS18:3240) AN$"Y"SS18:3120?# AN$(27)ĉ:450S& AN$"N"ī30500 22:958:"USE NUMBER ON LEFT TO DELETE FROM LABEL ": J1N? 23D 1:" NAME # ";J;" TO DELETE ";:N$(J)N N$(J)""3200X D(N$(J))Y D1ĺ"": I;": ";NA$(I)" IS18İ3045( 4 DF$"N"I 30:DS$;"/";KS$z 21:"-------------------------------------" 958 1:" DELETE NAMES FROM LABEL ? (Y/N) ";DF$;:(36):AN$:AN$ 34,23 HT(36) AN$(13)AN$DF$ AN$";:(36):AS$:AS$#AS$(13)ıEAS$"Y"MCMC2:LI2:CI49:XAS$"N"1000^BxI1N:NA$(I)F$(I):DE$"Y"3000N%IALPH(NA$,0,N%,1,14,A) ::NI1:S1 DS%(29)(30)256:DS$"FS"(DS%):KS$"3.3" ISN384)12827Ĺ16368,0:'mKNASī720;pD$;"PR#0":450W::MC16:DF$"N":CI60"CHANGE TITLE LENGTH..?";DF$;:(36):AS$:AS$AS$(13)MC16:AS$"Y"MC32:AS$"N"9003:DF$"N":LI6"USING SMALLER LABELS..?";DF$10030COLCL:WIDWD:NN2,A477064000FLN1NCOL\ N$"":CH0COL1qQLNCH:QN820 NN$(F$(Q),WID)(160)(160)*N$N$NN$:CH4L1(N$)H(N$,L,1);RL::QN870\LNf:kLD$;(17)l(16S AND COLUMNS ""w9:28:A$:A$:xA$"C"İ20000:630LyA$(27)450Rzl{DF$"READING CATALOG"|12:(40(DF$))2:DF$6000NI:ZNW:F$(Z)UL$:ZNN2NN22000900:TA3İ1000103501013010310#1":::" PRESS ANY KEY TO CONTINUE";:P$:P$Q e(4);"RUN CONFIGURE,D1"W fv l::12:18:"BYE!!":24:v::"INSERT DISK TO BE LABELED IN DRIVE #1 ":9:"PRESS (RETURN) TO CONTINUE"::"PRESS (ESC) TO ABORT":20:"PRESS(C) TO CHANGE ROW(37):H(36)# &A1A7ĺ"":530, )AS0: +A3TA3H ,A5MA5Q 0610Y ::s D(4);"CATALOG,S6,D1" N:"PRESS ANY KEY TO RETURN TO MENU":A$:A$ X450 bA570,199,690,710,15000,612,6204 d::12:7:"PLACE PROGRAM DISK IN DRIVE :"(3) PRINT LABEL TITLE ONLY"M :4:"(4) PRINT DUPLICATE OF LAST LABEL "} :4:"(5) PRINT MAILING OR SHIPPING LABEL" :4:"(6) RECONFIGURE PRINTER"::4:"(7) END PROGRAM" 5:20:"YOUR CHOICE (1-7) ";:Z(0):868:A$:A$;:A(A$) VBELS + " (4);"PR# 0"& TN$AX$Y 3:"#--------------------------------------#" (37):I115:1:"!";:40:"!";: 19:"#--------------------------------------#" 5:4:"(1) CATALOG DISK " :4:"(2) PRINT DISK LABELS " :4 "E 1013,76:1014,208:1015,144:D$(4):N228:CL4:WD13Z D$;"NOMONC,I,O"{ (37888)76(37894)76250 D$;"BLOADALPHA,A$90D0" W60:TA0:MC16 37888 F$(W),NA$(W),FA$(W),N$(W) ::37000:630 ::1:13:" D-LA *******************5 ** D-LABELS + **O **BY J.W.FLOWERS **i( ** JULY 1,1982 **2 ** ALL RIGHTS **< ** RESERVED **F *******************d:450 EPSON 80 GPH+ TN$"CG#4         37894(28)255İ6130BF$"":M130:F$F$(TN$,M,1):OF$(I)F$^I1ī6060eIUL$"_______________________________"650B':'10350$'10130.'A4XZ0Ģ1::" PRESS (ESC) TO ABORT PRINTING "::::XZ1:3H(FA$,0,N%,1,14,A)$ SS$"Y"3360< FA$(N2)DS$"/"KS$B SK1:J1:NN2aQ(NCOL)nIKNQF$(J)FA$(I)JJ1KK1KNıJNı4020p28,0I13788837891I1ī6090I2W"":3135] 37:(J):D)b DWDW18l NA$(D)UL$>v D{ N :JNV :i SNS1:3010o } SN3270 :: :H1 K1N NA$(K)""3330 FA$(H)NA$(K):NA$(K)"" HH1  DE$"Y"3354 N%N ALPAN$"N"SS18:3240/ AN$"Y"SS18:3120E# AN$(27)ĉ:450Y& AN$"N"ī30500 22:958:"USE NUMBER ON LEFT TO DELETE FROM LABEL ": J1N? 23D 1:" NAME # ";J;" TO DELETE ";:N$(J)N N$(J)""3200X D(N$(J)) Y D1ĺSN I;": ";NA$(I)( IS18İ3045. : DF$"N"O 30:DS$;"/";KS$ 21:"-------------------------------------" 958 1:" DELETE NAMES FROM LABEL ? (Y/N) ";DF$;:(36):AN$:AN$ 34,23 HT(36) AN$(13)AN$DF$ ?";DF$;:(36):AS$:AS$)AS$(13)ıKAS$"Y"MCMC2:LI2:CI49:^AS$"N"1000dB~I1N:NA$(I)F$(I):DE$"Y"3000N%IALPH(NA$,0,N%,1,14,A) ::NI1:S1 DS%(29)(30)256:DS$"FS"(DS%):KS$"3.3" IЭ(16384)12827Ĺ16368,0:-mKNASī720ApD$;"PR#0":450]::MC16:DF$"N":CI60"CHANGE TITLE LENGTH..?";DF$;:(36):AS$:AS$AS$(13)MC16:AS$"Y"MC32:AS$"N"9003:DF$"N":LI6"USING SMALLER LABELS..10030COLCL:WIDWD:NN2+A477054000ELN1NCOL[ N$"":CH0COL1pQLNCH:QN820 NN$(F$(Q),WID)(160)(160)*N$N$NN$:CH4L1(N$)H(N$,L,1);RL::QN870\LNf:kE$;"T27":E$;"B"l AND COLUMNS "!w9:28:A$:A$9xA$"C"İ20000:630KyA$(27)450Qzk{DF$"READING CATALOG"|12:(40(DF$))2:DF$6000NI:ZNW:F$(Z)UL$:ZNN2NN22000900:TA3İ10001035010130103101":::" PRESS ANY KEY TO CONTINUE";:P$:P$P e(4);"RUN CONFIGURE,D1"V fu l::12:18:"BYE!!":24:v::"INSERT DISK TO BE LABELED IN DRIVE #1 ":9:"PRESS (RETURN) TO CONTINUE"::"PRESS (ESC) TO ABORT":20:"PRESS(C) TO CHANGE ROWS(37):H(36)" &A1A7ĺ"":530+ )AS09 +A3TA3G ,A5MA5P 0610X ::r D(4);"CATALOG,S6,D1" N:"PRESS ANY KEY TO RETURN TO MENU":A$:A$ X450 bA570,199,690,710,15000,612,6203 d::12:7:"PLACE PROGRAM DISK IN DRIVE #"(3) PRINT LABEL TITLE ONLY"L :4:"(4) PRINT DUPLICATE OF LAST LABEL "| :4:"(5) PRINT MAILING OR SHIPPING LABEL" :4:"(6) RECONFIGURE PRINTER"::4:"(7) END PROGRAM" 5:20:"YOUR CHOICE (1-7) ";:Z(0):868:A$:A$;:A(A$) VELS + " (4);"PR# 0"% TN$AX$X 3:"#--------------------------------------#" (37):I115:1:"!";:40:"!";: 19:"#--------------------------------------#" 5:4:"(1) CATALOG DISK " :4:"(2) PRINT DISK LABELS " :4: "D 1013,76:1014,208:1015,144:D$(4):N228:CL4:WD13Y D$;"NOMONC,I,O"z (37888)76(37894)76250 D$;"BLOADALPHA,A$90D0" W60:TA0:MC16 37888 F$(W),NA$(W),FA$(W),N$(W) ::37000:630 ::1:13:" D-LABm *******************5 ** D-LABELS + **O **BY J.W.FLOWERS **i( ** JULY 1,1982 **2 ** ALL RIGHTS **< ** RESERVED **F *******************d:450 C-ITOH 8510A TN$"CG#4          6090I2W37894/(28)255İ6130TF$"":M130:F$F$(TN$,M,1):aF$(I)F$pI1ī6060wIUL$"_______________________________"650B':'10350$'10130.'A4XZ0Ģ1::" PRESS (ESC) TO ABORT PRINTI  N%N$ ALPH(FA$,0,N%,1,14,A)6 SS$"Y"3360N FA$(N2)DS$"/"KS$T eK1:J1:NN2sQ(NCOL)IKNQF$(J)FA$(I)JJ1KK1KNıJNı4020p28,0I13788837891I1ī(N$(J))Y D1ĺ"":3135,] 37:(J):D;b DWDW1Jl NA$(D)UL$Pv V{ ` :JNh :{ SNS1:3010  SN3270 :: :H1 K1N NA$(K)""3330 FA$(H)NA$(K):NA$(K)"" HH1  DE$"Y"3354(13)AN$DF$' AN$"N"SS18:3240A AN$"Y"SS18:3120W# AN$(27)ĉ:450k& AN$"N"ī30500 22:958:"USE NUMBER ON LEFT TO DELETE FROM LABEL ": J1N? 23D 1:" NAME # ";J;" TO DELETE ";:N$(J)N N$(J)""3200X D:KS$"3.3" ISN( I;": ";NA$(I): IS18İ3045@ L DF$"N"a 30:DS$;"/";KS$ 21:"-------------------------------------" 958 1:" DELETE NAMES FROM LABEL ? (Y/N) ";DF$;:(36):AN$:AN$ 34,23 HT(36)  AN$G SMALLER LABELS..?";DF$;:(36):AS$:AS$;AS$(13)ı]AS$"Y"MCMC2:LI2:CI49:pAS$"N"1000vBI1N:NA$(I)F$(I):DE$"Y"3000N%IALPH(NA$,0,N%,1,14,A) ::NI1:S1  DS%(29)(30)256:DS$"FS"(DS%)(27);"B"::/l(16384)12827Ĺ16368,0:?mKNASī720SpD$;"PR#0":450o::MC16:DF$"N":CI60"CHANGE TITLE LENGTH..?";DF$;:(36):AS$:AS$AS$(13)MC16:AS$"Y"MC32:AS$"N"9003:DF$"N":LI6*"USIN1013010310100303COLCL:WIDWD:NN2@A4770J4000ZLN1NCOLp N$"":CH0COL1QLNCH:QN820 NN$(F$(Q),WID)(160)(160)*N$N$NN$:CH4L1(N$)H(N$,L,1);RL::QN870\LNf: kESS(C) TO CHANGE ROWS AND COLUMNS "6w9:28:A$:A$NxA$"C"İ20000:630`yA$(27)450fz{DF$"READING CATALOG"|12:(40(DF$))2:DF$6000NI:ZNW:F$(Z)UL$:ZNN2NN22000900:TA3İ100010350OGRAM DISK IN DRIVE #1":::" PRESS ANY KEY TO CONTINUE";:P$:P$e e(4);"RUN CONFIGURE,D1"k f l::12:18:"BYE!!":24:#v::"INSERT DISK TO BE LABELED IN DRIVE #1 ":9:"PRESS (RETURN) TO CONTINUE"::"PRESS (ESC) TO ABORT":20:"PR:A$;:A(A$)! V(37):H(36)7 &A1A7ĺ"":530@ )AS0N +A3TA3\ ,A5MA5e 0610m :: D(4);"CATALOG,S6,D1" N:"PRESS ANY KEY TO RETURN TO MENU":A$:A$ X450 bA570,199,690,710,15000,612,620H d::12:7:"PLACE PRSK LABELS "2 :4:"(3) PRINT LABEL TITLE ONLY"a :4:"(4) PRINT DUPLICATE OF LAST LABEL " :4:"(5) PRINT MAILING OR SHIPPING LABEL" :4:"(6) RECONFIGURE PRINTER"::4:"(7) END PROGRAM" 5:20:"YOUR CHOICE (1-7) ";:Z(0):868:A$::1:13:" D-LABELS + ". (4);"PR# 0": TN$AX$m 3:"#--------------------------------------#" (37):I115:1:"!";:40:"!";: 19:"#--------------------------------------#" 5:4:"(1) CATALOG DISK " :4:"(2) PRINT DID-IDS 560 "Y 1013,76:1014,208:1015,144:D$(4):N228:CL4:WD13n D$;"NOMONC,I,O" (37888)76(37894)76250 D$;"BLOADALPHA,A$90D0" W60:TA0:MC16 37888 F$(W),NA$(W),FA$(W),N$(W) ::37000:630  *******************5 ** D-LABELS + **O **BY J.W.FLOWERS **i( ** JULY 1,1982 **2 ** ALL RIGHTS **< ** RESERVED **F *******************d:x ONERR GOTO 100 450 IDS 560 TN$"            ĠԍΤĭӫǮŠԍ΍ĠԍΤĭӫЫŠԍ΍ & % J.W. FLOWERS %0& % MANTECA, CA. %H& % 95336 %`& % %x& %%%%%%%%%%%%%%%%% uiȩiȩiL9TTY"20021.%9NNN20070,20030,20040,20050,20060E%>NCL3:WD18:N221:\%HNCL4:WD13:N228:s%RNCL5:WD10:N235:%\NCL6:WD8:N242:%fNCL2:WD28:N214:% %%%%%%%%%%%%%%%%%% % %% % COPYRIGHT (C) %& % JULY 1,1:82 %0:F$F$(TN$,M,1):!F$(I)F$0I1ī60607IaUL$"_______________________________"j650pBx':'10350$'10130.'D$;"PR#1":KNKN10'RP$;3'LS$;8'19'CC$;:'E1$;;'DP$;<'DN$L'EP$;M'T$;:N'2)DS$"/"KS$ %K1:J1:NN23Q(NCOL)@IKNQQF$(J)FA$(I)[JJ1akKK1wKNıJNı4020p28,0I13788837891I1ī6090I2W37894(28)255İ6130F$"":M13NA$(D)UL$v {  :JN( :; SNS1:3010A O SN3270Y ::c :H1n K1N NA$(K)""3330 FA$(H)NA$(K):NA$(K)"" HH1  DE$"Y"3354 N%N ALPH(FA$,0,N%,1,14,A) SS$"Y"3360 FA$(N0# AN$(27)ĉ:450+& AN$"N"ī3050f0 22:958:"USE NUMBER ON LEFT TO DELETE FROM LABEL "q: J1Ny? 23D 1:" NAME # ";J;" TO DELETE ";:N$(J)N N$(J)""3200X D(N$(J))Y D1ĺ"":3135] 37:(J):Db DWDW1 l  DF$"N"! 30:DS$;"/";KS$R 21:"-------------------------------------"\ 958 1:" DELETE NAMES FROM LABEL ? (Y/N) ";DF$;:(36):AN$:AN$ 34,23 HT(36) AN$(13)AN$DF$ AN$"N"SS18:3240 AN$"Y"SS18:312AS$"Y"MCMC4:LI2:CI49:0AS$"N"10006BPI1N:NA$(I)F$(I):bDE$"Y"3000kN%IALPH(NA$,0,N%,1,14,A) ::NI1:S1 DS%(29)(30)256:DS$"FS"(DS%):KS$"3.3" ISN I;": ";NA$(I) IS18İ3045 pD$;"PR#0":450/::MC16:DF$"N":CI60c"CHANGE TITLE LENGTH..?";DF$;:(36):AS$:AS$zAS$(13)MC16:AS$"Y"MC32:AS$"N"9003:DF$"N":LI6"USING SMALLER LABELS..?";DF$;:(36):AS$:AS$AS$(13)ı30COLCL:WIDWD:NN2&A477004000@LN1NCOLV N$"":CH0COL1kQLNCH:QN820 NN$(F$(Q),WID)(160)(160)*N$N$NN$:CH4L1(N$)H(N$,L,1);RL::QN870\LNf:kLD$;(17)mKNASī720COLUMNS "w9:28:A$:A$4xA$"C"İ20000:630FyA$(27)450Lzf{DF$"READING CATALOG"|12:(40(DF$))2:DF$6000NI:ZNW:F$(Z)UL$:ZNN2NN22000900:TA3İ1000103501013010310100:" PRESS ANY KEY TO CONTINUE";:P$:P$K e(4);"RUN CONFIGURE,D1"Q fp l::12:18:"BYE!!":24: v::"INSERT DISK TO BE LABELED IN DRIVE #1 ":9:"PRESS (RETURN) TO CONTINUE"::"PRESS (ESC) TO ABORT":20:"PRESS(C) TO CHANGE ROWS AND ) V(37):H(36)+ &A1A7ĺ"":5304 )AS0B +A3TA3K 0610S ::m D(4);"CATALOG,S6,D1" N:"PRESS ANY KEY TO RETURN TO MENU":A$:A$ X450 bA570,199,690,710,15000,612,620. d::12:7:"PLACE PROGRAM DISK IN DRIVE #1"::& :4:"(3) PRINT LABEL TITLE ONLY"U :4:"(4) PRINT DUPLICATE OF LAST LABEL " :4:"(5) PRINT MAILING OR SHIPPING LABEL" :4:"(6) RECONFIGURE PRINTER"::4:"(7) END PROGRAM" 5:20:"YOUR CHOICE (1-6) ";:Z(0):868:A$:A$;:A(A$:" D-LABELS + "" (4);"PR# 0". TN$AX$a 3:"#--------------------------------------#" (37):I115:1:"!";:40:"!";: 19:"#--------------------------------------#" 5:4:"(1) CATALOG DISK " :4:"(2) PRINT DISK LABELS " "F 1013,76:1014,208:1015,144:D$(4):N228:CL4:WD13[ D$;"NOMONC,I,O"| (37888)76(37894)76250 D$;"BLOADALPHA,A$90D0" W60:TA0:MC16 37888 F$(W),NA$(W),FA$(W),N$(W) ::37000:630 ,DUMB :1:13ĠԍΤĭӫЫŠԍ΍%>NCL3:WD18:N221:-%HNCL4:WD13:N228:D%RNCL5:WD10:N235:Z%\NCL6:WD8:N242:q%fNCL2:WD28:N214:% %%%%%%%%%%%%%%%%%% % %% % COPYRIGHT (C) %% % JULY 1,1:82 %% % J.W. FLOWERS %& % MANTECA, CA. ECTORS (Y/N) ";SD$;:(36):SS$:SS$;$2NSS$(13)SS$"N"N$3NSS$"N"20021b$4NSS$"Y"20017$5NDE$"N":12:"DESELECT SORT(Y/N) ";DE$;:(36):DE$:DE$:DE$(13)DE$"N"$6NDE$"N"20025$7NDE$"Y"20021$9NNN20070,20030,20040,20050,20060%%%%%%%%%%%#$ % %;$ % COPYRIGHT (C) %S$ % JULY 1,1:82 %k$ % J.W. FLOWERS %$ % MANTECA, CA. %$ % 95336 %$ % %$ %%%%%%%%%%%%%%%%% uiȩiȩiL9TSORT(Y/N) ";DE$;:(36):DE$:DE$:DE$(13)DE$"N"G#6NDE$"N"20025[#7NDE$"Y"20021#9NNN20070,20030,20040,20050,20060#>NCL3:WD18:N221:#HNCL4:WD13:N228:#RNCL5:WD10:N235:#\NCL6:WD8:N242:#fNCL2:WD28:N214: $ %%%%%%4) ";DF;:(36):NN$:NN$:NN(NN$)8",NNN$(13)NNDF^"/N23:958:NN1NN5ĺ"":20010j"0NSD$"N""1N:"DESELECT FREE SECTORS (Y/N) ";SD$;:(36):SS$:SS$"2NSS$(13)SS$"N""3NSS$"N"20021"4NSS$"Y"200174#5NDE$"N":12:"DESELECT ! N::"(1) 14 NAMES / 2 COLUMNS"::"(2) 21 NAMES / 3 COLUMNS"::"(3) 28 NAMES / 4 COLUMNS--> DEFAULT"::"(4) 35 NAMES / 5 COLUMNS "::"(5) 42 NAMES / 6 COLUMNS":!)NDF3#"*N23:"SELECT BY NUMBER (1-5000 V;A$"N"15150X b;22:868:1:"HOW MANY OF THIS LABEL.. ";AM;:(36):"";AM$j e;AM$""15400~ g;(AM$)115202 i;AM(AM$) j;15400 ;1:I1CI:"_";::" ": (NCL3:WD10:N218:"HNCL4:WD7:N224:"RNCL5:WD6:N230:#\NCL6:WD5:N21 3788837891'I1ī60902I2W=37894R(28)255İ6130wF$"":M130:F$F$(TN$,M,1):F$(I)F$I1ī6060IUL$"_______________________________"650B':'10350$'10130:.'A4XZ0"  HH1 # DE$"Y"3354, N%NG ALPH(FA$,0,N%,1,14,A)Y SS$"Y"3360q FA$(N2)DS$"/"KS$w K1:J1:NN2Q(NCOL)IKNQF$(J)FA$(I)JJ1KK1KNıJNı4020p28,0I;:N$(J)N N$(J)""3200*X D(N$(J))?Y D1ĺ"":3135O] 37:(J):D^b DWDW1ml NA$(D)UL$sv y{  :JN : SNS1:3010  SN3270 :: :H1 K1N NA$(K)""3330 FA$(H)NA$(K):NA$(K)"$  34,23 HT(36)0 AN$(13)AN$DF$J AN$"N"SS18:3240d AN$"Y"SS18:3120z# AN$(27)ĉ:450& AN$"N"ī30500 22:958:"USE NUMBER ON LEFT TO DELETE FROM LABEL ": J1N? 23D 1:" NAME # ";J;" TO DELETE "DS%(29)(30)256:DS$"FS"(DS%):KS$"3.3"8 ISNK I;": ";NA$(I)] IS18İ3045c o DF$"N" 30:DS$;"/";KS$ 21:"-------------------------------------" 958 1:" DELETE NAMES FROM LABEL ? (Y/N) ";DF$;:(36):AN$:AN9003:DF$"N":LI6M"USING SMALLER LABELS..?";DF$;:(36):AS$:AS$^AS$(13)ıAS$"Y"MCMC4:LI2:CI49:AS$"N"1000BI1N:NA$(I)F$(I):DE$"Y"3000N%IALPH(NA$,0,N%,1,14,A) ::NI1:S1- QN870\LNfQS1-k(27);"B"::Rl(16384)12827Ĺ16368,0:450bmKNASī720vpD$;"PR#0":450::MC16:DF$"N":CI60"CHANGE TITLE LENGTH..?";DF$;:(36):AS$:AS$AS$(13)MC16:AS$"Y"MC32:AS$"N"0:TA3İ100010350#10130.10310910030PCOLCL:WIDWD:NN2]A4770g4000wLN1NCOL N$"":CH0COL1QLNCH:QN820 NN$(F$(Q),WID)(160)(160)*N$N$NN$:CH4L1(N$)H(N$,L,1); RL::RESS (ESC) TO ABORT":20:"PRESS(C) TO CHANGE ROWS AND COLUMNS "Sw9:28:A$:A$kxA$"C"İ20000:630}yA$(27)450z{DF$"READING CATALOG"|12:(40(DF$))2:DF$6000NI:ZNW:F$(Z)UL$:ZNN2NN22000 90620e d::12:7:"PLACE PROGRAM DISK IN DRIVE #1":::" PRESS ANY KEY TO CONTINUE";:P$:P$ e(4);"RUN CONFIGURE,D1" f l::12:18:"BYE!!":24:@v::"INSERT DISK TO BE LABELED IN DRIVE #1 ":9:"PRESS (RETURN) TO CONTINUE"::"P:A(A$) V(37):H(36)2 &A1A7ĺ"":530E (A4QS1530S )AS0:XZ0f +A3TA3:QS1y ,A5MA5:QS1 0610 :: D(4);"CATALOG,S6,D1" N:"PRESS ANY KEY TO RETURN TO MENU":A$:A$ X450 bA570,199,690,710,15000,612,BELS "- :4:"(3) PRINT LABEL TITLE ONLY"\ :4:"(4) PRINT DUPLICATE OF LAST LABEL " :4:"(5) PRINT MAILING OR SHIPPING LABEL" :4:"(6) RECONFIGURE PRINTER"::4:"(7) END PROGRAM" 5:20:"YOUR CHOICE (1-7) ";:Z(0):868:A$:A$;:1:13:" D-LABELS + ") (4);"PR# 0"5 TN$AX$h 3:"#--------------------------------------#" (37):I115:1:"!";:40:"!";: 19:"#--------------------------------------#" 5:4:"(1) CATALOG DISK " :4:"(2) PRINT DISK LA "K 1013,76:1014,208:1015,144:D$(4):N228:CL4:WD13` D$;"NOMONC,I,O" (37888)76(37894)76250 D$;"BLOADALPHA,A$90D0" W60:TA0:MC16 37888 F$(W),NA$(W),FA$(W),N$(W) ::37000:630 ,DUMB :ĠԍΤĭӫЫԤŠԍ΍!%>NCL3:WD18:N221:-%HNCL4:WD13:N228:D%RNCL5:WD10:N235:Z%\NCL6:WD8:N242:q%fNCL2:WD28:N214:% %%%%%%%%%%%%%%%%%% % %% % COPYRIGHT (C) %% % JULY 1,1:82 %% % J.W. FLOWERS %& % MANTECA, CA. ECTORS (Y/N) ";SD$;:(36):SS$:SS$;$2NSS$(13)SS$"N"N$3NSS$"N"20021b$4NSS$"Y"20017$5NDE$"N":12:"DESELECT SORT(Y/N) ";DE$;:(36):DE$:DE$:DE$(13)DE$"N"$6NDE$"N"20025$7NDE$"Y"20021$9NNN20070,20030,20040,20050,20060WD8:N242:#$fNCL2:WD28:N214:9$0u(4);"OPEN CG#4"O$:u(4);"WRITECG#4"x$Du10030:15500:15400,15405:710:553$Xu(4);"CLOSE"$ %%%%%%%%%%%%%%%%%$ % %$ % COPYRIGHT (C) %$ % JULY 1,1:82 %% % J.W. FLOWERS #4NSS$"Y"20017d#5NDE$"N":12:"DESELECT SORT(Y/N) ";DE$;:(36):DE$:DE$:DE$(13)DE$"N"w#6NDE$"N"20025#7NDE$"Y"20021#9NNN20070,20030,20040,20050,20060#>NCL3:WD18:N221:#HNCL4:WD13:N228:#RNCL5:WD10:N235: $\NCL6:LUMNS":")NDF3S"*N23:"SELECT BY NUMBER (1-4) ";DF;:(36):NN$:NN$:NN(NN$)h",NNN$(13)NNDF"/N23:958:NN1NN5ĺ"":20010"0NSD$"N""1N:"DESELECT FREE SECTORS (Y/N) ";SD$;:(36):SS$:SS$"2NSS$(13)SS$"N"#3NSS$"N"20021(I):!F" N::"(1) 14 NAMES / 2 COLUMNS"::"(2) 21 NAMES / 3 COLUMNS"::"(3) 28 NAMES / 4 COLUMNS--> DEFAULT"::"(4) 35 NAMES / 5 COLUMNS "::"(5) 42 NAMES / 6 CO g;(AM$)115202 i;AM(AM$)+ j;15400R ;1:I1CI:"_";::" ": ( = ABORT TO MAIN MENU":" <@> = RESTART FROM BEGINNING ":" = EDIT FROM LINE #1 USE --> PLUS (RTN) TO COPY LINES":TL1LI:M$(TL)""::10:AS$"Y"CI30:LIĺ" PRESS NUMBER TO PRINT MULTIPLE LABELS"Md(20:27:A$:A$;:A$(27)450ae(A$(13)10345zi(MA5AMAS::15400n(E$(27):D$(4):s(EP$(14)x(PAD$" "}(LM(106)256(105):LMLM24(MC16EP$E1$):::0260 2(TL7( F(AA1:KN0VP(:11:"TURN ON PRINTER AND POSITION FIRST LABEL"gR(A4ī10330U(15:"HOW MANY DUPLICATES ?";AA;:(36):"";AS$:AS(AS$):AS$""ASAAZ(C1:20:"PRESS (RTN) TO PRINT LABEL ":"PRESS (ESC) TO ABORT"*_(TA4TR((MC(T$))2)1:TB$(TB$,CTR)0'T$TB$T$D'L1$(L1$,MC1)T'A3ī10240Z'u(TL1LI:M$(TL)"":TL (TL1LI:CV(37)1(DL1CI:"_";:DL::CV:1(LM:M$(TL)(TN$,1):(M$(TL))0TL6(((M$(TL))CIĢCV:958:(7);:1:1'DN$DN$"."A'8:"ENTER DISK TITLE (";MC;" CHARS. MAXIMUM)"K'958w'L1$"_________________________________"':(L1$,MC)'10:LM:T$(TN$,1)'(T$)MCĺ(7):10150'(T$)MC1TB$" ":10210'(T$)MC2TB$" ":10210"'CĠԍΤĭӫЫԤΠظׯثŠԍ΍"