' +JJJJ ?\>m0M='+l> /+l  H d@hLҦ L~ L  ﵪ*i BB䵊嵰`72µ- i ư&( Rp s P  LLʬLoō 鷎귭෍ᷩ췩緈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)*++`NG8`0($ p,&" ۿ ۿڿL흍ٿ vLQ  !"#$%&'()*+,-./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(#*!!.<,$94>94="4; +,E!r ; $ Hh Լ ռ ռ ռ`HJ>݌h Hh݌`DF DF /L\HIHHHHhHH݌hHhHh݌H6 VDP (FD Z $0x8x D- ܸDD#LHH`?F Vk *f???0xF Hh D#-FFF8` D ܸx D - ܸx8`-0ݩ?ʥD FFF`   LDcpq` [` ~  LӜsqu`".Q`pNФbptťܥm2<(-Py0\|e<6e< ~ vL~ JJJJj귍hI  aUL@ kU8  L  ^R(jQ0l^l\ IOÌȌ`W ԧ H h@ [_ /QSIRb_L`LLLL`ª`LQL߼YLeLXLeLee ўQ0 L&RE;BY; Ꝥ$`( 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 We)n `@-eff L f`L . tQLѤ LҦL` OPu d L Ne)noon 8ɍ` ^f\õL ^NR  RΩLҦ\L \ şL_ NLjHv 3h`0h8` [L NС õ`A@` ŵL]Lõ`  \ 濭0 ş  Q ^\lZl^\8  ş Lȟ`fhjõĵ@OAP`u@`@&`QR`F Ls  @DAF@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@ ,\Z[PRN,XɄOɊRQF(0Bhhhw4h/ ^0(p ߩRP1Q ɿ, P\L˵B̵C8pB߮Z\  յյ\BIR Z-^ Jp\IZLL- (   Ϡ@跻~!Wo*9~~~~ɬƬ~_ j ʪHɪH`Lc (L ܫ㵮赎 ɱ^_ J LsL Q(`贩紎 DǴҵԵƴѵӵµȴ 7 ַ :ŵƴѵǴҵȴµ納贍﵎ٵ്ᵭⳍڵL^ѵ-I `  4 ò-յ!  8صٵ紭ﵝ 7L (0+BC  7L HH`LgL{0 HH` õL H hBL BH [ h`Lo õ ڬL B ڬ LH hB@ յյ [L (ȴ) ȴ 7L L ( L (ȴL{ƴѵ洩ƴǴҵ 7 ^* B0 HȱBh ӵԵ 8 L8 ݲ` ܫ  / / şFD B ߼ / ]ƴS0Jȴ ȴ)  紅D贅F B ƴ  / 0L Ν `ND8HFFhDh N ş`, ŵBѵ`, ѵB8` ܫ 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˵̵ֵ׵`LzĪLR E( 8` R` ELRŪƪ`췌 յյI뷭鷭귭ⵍ㵍跬ª 뷰` Lf ݵܵߵ޵ ^`8ܵ i B8` 4L ֵȱB׵ ܯ䵍൭嵍 ` DȑB׵Bֵ  ַ յյ`` Bl şL/Ơĵµ`ڿ8.ڿ.ۿ`êL`õĵ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 x(` d£àĠz# u` END OF LABEL IF YOU":22:5:"WISH TO EXPLODE THAT SLICE.";mXn9:30:16368,0:K$:AK(K$):AK27İ107:3Xo(AK13AK10)115XpNN(K$):NN1NN6110Xq:K$::NNNSāK1NSNN:VV(NN1K1):10:25):XrNS$(NN):MXNN:NSMX:MX$NS$^Ys:J19:VV(J)VVJ:HH(J)H1::107:V3:G1:H23:A$" TYPE SLICE LABELS ":98:32,0:9:5:"NUMBER OF SLICES (1-6): "NS$:1008:MX(NS$)RS18:DN2Ė4:A$(7):20:4:A$(8)RT16368,0:16384,128:18:4:35):20:4:35):22:4:35):18:4:"PLEASE WAIT.":PO0AS4İ134RU89RVA$"6591":R$(NAM$,5):R$" DATA"NAM$(NAM$,(NAM$)5)/SWAS3ĺ:(4);" "L1NAM$(NAM$,L):LL1:73'QJ5QKVV7:H2TQLK$:AK(K$):AK27İ99:2aQMAK858tQNAK11İ73:58QOAK13İ73:82QPK$"1"K$"2"76QQ:K$;::DN$K$:DN(DN$)RR18:4:35):20:4:35):22:4:35):18:DN1Ė4:A$(5):20AM$:L(X$):100:BK1Č1008:PXH1Č1008PEBK1K$" "(P1PL)X$(X$,P1)(X$,LP):NAM$X$:VV5:H1:X$".";:VV5:XMP1PFBK1(X$,1)" "L1X$(X$,L):LL1:1036:".";:1008:1008:70PGNAM$X$:BK1BK0PH59!QI(NAM$,1)73:99:2(O<AK97AKAK32:K$(AK)HO=AK95PXXM20Č1008:59pO>AK95PXH1AK32:BK1:K$" ":68O?AK8PXH1Č1008:59O@AK21PXH120Č1036:59OA(AK10AK13)75OBAK21BK1BK0:59OCPXXM2059,PDK$;:XMH1:X$N)N7AS3A$(6)"DATA DISK IN DRIVE ONE."YN8AS3A$(7)"PLACE DATA DISK IN DRIVE TWO."N9H14(A$(3)):H23(A$(4)):VV:HT:A$(1):VV2:HT:A$(2):VV5:HT:A$(3)G$:VV5:H1:NAM$:VV7:HT:A$(4)N:VV5:H1 O;PX(36)1:K$:AK(K$):AK27 (1/2): "DN$:A$(5)"REMOVE ALPHACHART! AND PLACE ":A$(6)"FORMATTED DISK IN DRIVE ONE":A$(7)"PLACE A FORMATTED DISK IN DRIVE TWO":A$(8)"PRESS WHEN READY"M6AS3A$(1)"TYPE NAME OF DATA.":A$(7)"PLACE DISK WITH DATA IN DRIVE "DN$:A$(2)""DL3A$" STORE DATA ON DISK ":ASAK:AS3A$" GET DATA FROM DISK "L499:G1:V3:H23:98:16368,0:VV8:HT4:A$(1)"TYPE A NAME FOR YOUR DATA. BEGIN":A$(2)"NAME WITH A LETTER.":A$(3)"NAME: ":G$"":K120:G$G$".":M5A$(4)"SELECT DRIVE NUMBER(X$,1)" "L1X$(X$,L):LL1:1036:".";:1008:1008:47K0K$" "(PLP1)X$(X$,P1)(X$,LP):V$(M,II)X$:VV(M):HH(II1):X$".";:VV(M):XMP1K1V$(M,II)X$:23L21::J138:"*";::J1H:"*";::39::"*"::J139:"*";:::107:18J*AK9AK13:28+J+AK2123OJ,(AK48AK57)AK46AK3223J-(PXHH(2)7PXHH(3))(PXHH(3)7PXHH(4))(PXHH(4)7)23J.K$;:II1(PXHH(3))(PXHH(4)):X$V$(M,II):L(X$):XMHH(II1):100:BK1BK0:1008:PXXMČ1008@K/AK13(MMMMMMX)(37)120MM1:922:HH(II1):23gI$AK10MMX(37)120İ3850:HY:HX:23I%AK11M1(37)1VV(1)İ3900:HY:HX:23I&AK127PXHH(2)AK32:K$" ":BK1I'AK70AK102DA1:99:2I(AK27NY191J)AK27NY1,0:M1:16368,0KTjPX(36)1:PY(37)1:K$:AK(K$):N4AK27İ212:45]TkN4AK2788{TlAK97AKAK32:K$(AK)TmAK21AK95118TnAK8PXHH(M)Č1008:106ToAK8M1MM1:VV(M):HH(M):106TpAK21PXHH(M)LN1Č1036:1060UqM$(J)):(L$" "L$".")L1NAM$(J)(NAM$(J),L1):105xShL$(NAM$(J),1):L(NAM$(J)):(L$" "L$".")L1NAM$(J)""Ti:TB$(1)": ":TB$(3)TB$(1):TB$(2)": ":J1NY:VV32J:H:N$(J)TB$(J)A$:VV32J:HH(J):NAM$(J);::VV(1):HH(1):16368N)". PLEASE":VV2:4:"TYPE NAMES FOR THESE BARS BELOW:":H10:HHH9RfN$(1)"FIRST":N$(2)"SECOND":N$(3)"THIRD":VV(1)VV5:VV(2)VV7:VV(3)VV9:HH(1)HH:HH(3)HH:HH(2)HH:LN16:NY3LN97SgA$"":J1LN:A$A$"."::J1NY:L$(NAM$(J),1):L(NAN1āJ1MX:SL$(J)(JSJ1):`QbN2N3AA$AA$AA$AA$AA$AA$:(AA$)150AA$(AA$,150)QcN2N3āJ1MX:SL$(J)(AA$,(JSJ2)31,3):Qd223:NY1126GReV3:G1:H23:A$" BAR NAMES ":211:VV8:VV:4:"DRAW ";::NY$;::" BARS PER "Y$(3)aP\N2AA$"JANFEBMARAPRMAYJUNJULAUGSEPOCTNOVDEC":J1343:E$(AA$,J,3)CH1:JS(J1)31uP]N2Ă:CH078P^N2CH1CH0P_N3AA$"MONTUEWEDTHUFRISATSUN":E$(E$,3):CH0:J1193:E$(AA$,J,3)CH1:JS(J1)31P`N3Ă:CH078 QaXM:N1XXXM2?OSJ1(SY$):D$(J)(SY$,J,1)::7:AK870SOTAK27İ223:24^OUSY$E$OVL(SY$):L1L$(SY$,1):L$" "SY$(SY$,L1)" ":86OWAK1170OXN4İ224:100OYN1E$(E$,4):(E$)178OZN1JS(E$)P[N2E$(E$,:HH(2):238HAK13NY1MMMMM1:VV(M):HH(2):23iHAK13II1MMMNY2ĢVV(M):HH(II2):23H AK13II1MMMNY2ĢVV(MM):HH(II2):23H!AK11M1(37)1VV(1)MM1:998:23H"AK10(MMMMMMX)(37)120MM1:922:23:I#16368,0.GPX(36)1:K$:AK(K$):AK2138LGAK8PXHH(2)Č1008:23uGAK8M1MM1:VV(M):HH(NY1):23GAK21PXHH(NY1)7Č1036:23GAK1333GAK13II1(PXHH(3))(PXHH(4)) HAK13MMX(37)120IINY:3850:VV(12)(4)HH(4)10#FMMMX:MX12MM12GA$"........":J1MX:VV(J):HH(2)(SL$(J))2:SL$(J);:HH(2):A$;:VV(J):HH(2):V$(J,1);::AA$"PRESS WHEN FINISHED":22:21(AA$)2:"PRESS THE ";::"F";::" KEY WHEN FINISHED":VV(1):HH(2):M1:Y LABELS ?"::J13000::18:5:30):VV(MX):HH(MX):MMX:116 F107:A$" ENTER DATA ":98:VV7:H13:H210:H320:H430:H430:J110:VV(J)VVJ1::A$"........":HH(1)H1:HH(2)H2:HH(3)H3:HH(4)H4:NY1HH(1)HH(1)10:HH(2)HH(2)10:HH(3)HH(3)10:HHK6ĺ:(4);"RUN MENU,D1"D216,0:99:11:A$"PUT ALPHACHART! IN DRIVE ONE":B$"PRESS RETURN WHEN READY":20(A$)2:A$:13:20(B$)2:B$:16368,0:16384,128:99:3D108:NV0:J1NY:(SL$(J))0NVNV1@E:NVNYĢ18:5::"ARE THESE REALL5):LC$::C$(AK):AK5AK6āJ1500:|C AK1āJ1MX:SL$(J)"":K1NY:V$(J,K)"":::K1NY:NAM$(K)""::107:18C AK2İ107:20C AK3AK451C AK58000CAKAS:17C38399,222:AK5Ĺ38399,222::(4);"RUN SLOW PIE,D1"DAOB:CK(C$):VV(CK):HT5:LC$::VV(6)3:HT5:"SELECTION: "C$;:1008B16368,0:K$:AK(K$):AKAK48:AK35AK(C$)BASAK:AK1AK66B:K$;::AK(C$)CK(C$):VV(CK):HT5::LC$+C VV(AK):HT5::L(Q$(AK)):LC$(Q$(AK),LD DATA":Q$(4)"(4) SAVE PRESENT DATA":Q$(5)"(5) DRAW PIE CHART":Q$(6)"(6) RETURN TO DISK MENU":HT10:VV6:J16:VV(J)VV2J:BJ16:VV(J):HT:Q$(J)::(AK70AK102)DA1DA0:AK5:C$"5":VV(5):HT5::"DRAW PIE CHART":LC$"DRAW PIE CHART":!u@34,0:32,0:33,40::38380:C$"1":LC$"ENTER NEW DATA":DN$"2":DN2:MX$"3":MX3:N$"1":N1:NS$"3":NS3:NY1:@V3:G1:H23:A$"":50AA$" PIE CHART MAIN MENU ":98:Q$(1)"(1) ENTER NEW DATA":Q$(2)"(2) SEE PRESENT DATA":Q$(3)"(3) GET OL               1BK0d172Ad(NAM$,1)" "L1NAM$(NAM$,L):LL1:186GdUdVV7:H2vdK$:AK(K$):AK27İ212:23dAK8171dAK11İ186:171dAK13İ186:195dK$"1"K$"2"189d:K$;::DN$K$:DN(DN$)@e18:4:35):20:4:XM20172IcK$;:XMH1:X$NAM$:L(X$):216:BK1Č1008:PXH1Č1008cBK1K$" "(P1PL)X$(X$,P1)(X$,LP):NAM$X$:VV5:H1:X$".";:VV5:XMP1cBK1(X$,1)" "L1X$(X$,L):LL1:1036:".";:1008:1008:183dNAM$X$:BKK$:AK(K$):AK27İ186:212:23>bAK97AKAK32:K$(AK)_bAK95PXXM20Č1008:172bAK95PXH1AK32:BK1:K$" ":181bAK8PXH1Č1008:172bAK21PXH120Č1036:172b(AK10AK13)188bAK21BK1BK0:172 cPXIVE "DN$:A$(2)"" WHEN READY"aAS3A$(1)"TYPE NAME OF DATA.":A$(7)"PLACE DISK WITH DATA IN DR139:"*";:::U_A$" STORE DATA ON DISK ":ASAK:AS3A$" GET DATA FROM DISK "_212:G1:V3:H23:211:16368,0:VV8:HT4:A$(1)"TYPE A NAME FOR YOUR DATA. BEGIN":A$(2)"NAME WITH A LETTER.":A$(3)"NAME: ":G$"":K120:G$G$".":`A$(4)"XMČ1008P^(X$,1)" "L1X$(X$,L):LL1:1036:".";:1008:1008:160^K$" "(PLP1)X$(X$,P1)(X$,LP):V$(M,II)X$:VV(M):HH(II1):X$".";:VV(M):XMP1^V$(M,II)X$:133_1::J138:"*";::J1H:"*";::39::"*"::JAK27NY1İ223:45(]AK9AK13:1388]AK21133]](AK48AK57)AK46AK32133](PXHH(2)7PXHH(3))(PXHH(3)7PXHH(4))(PXHH(4)7)133 ^K$;:II1(PXHH(3))(PXHH(4)):X$V$(M,II):L(X$):XMHH(II1):216:BK1BK0:1008:PX133B\AK13(MMMMMMX)(37)120MM1:922:HH(II1):133o\AK10MMX(37)120İ242:HY:HX:133\AK11M1(37)1VV(1)İ244:HY:HX:133\AK127PXHH(2)AK32:K$" ":BK1\AK70AK102DA1:212:23\AK27NY1100]2):133:[AK13II1MMMNY2ĢVV(M):HH(II2):133m[AK13II2NY2MMMMM1:VV(M):HH(2):133[AK13II1MMMNY2ĢVV(MM):HH(II2):133[AK11M1(37)1VV(1)MM1:998:133\AK10(MMMMMMX)(37)120MM1:922:H(NY1)7Č1036:133%ZAK13146MZAK13II1(PXHH(3))(PXHH(4))ZAK13MMX(37)120IINY:242:VV(12):HH(2):133ZAK13NY1MMMMM1:VV(M):HH(2):133ZAK13II3MMMMM1:VV(M):HH(2):133[AK13II2NY3ĖHH(IILL"OY22:21(AA$)2:MX12ĺ"PRESS THE ";::"F";::" KEY WHEN FINISHED"`YMX12ĺAA$;YVV(1):HH(2):M1:16368,0YPX(36)1:K$:AK(K$):AK21151YAK8PXHH(2)Č1008:133YAK8M1MM1:VV(M):HH(NY1):133ZAK21PXH:HH(4)HH(4)10LXJ1NY:VV:HH(J1):(NAM$(J),8);::MMMX:MX12MM12YA$"........":J1MM:VV(J):HH(1):SL$(J);:K1NY:HH(K1):A$;:VV(J):HH(K1):V$(J,K);:::AA$"PRESS THE F KEY WHEN FINISHED":MX12AA$" FINISH... SCRO0 W}106W~223:A$" ENTER DATA ":211:VV7:H13:H210:H320:H430:J112:VV(J)VVJ1::A$"........":HH(1)H1:HH(2)H2:HH(3)H3:HH(4)H4:NY2HH(1)HH(1)2:HH(2)HH(2)2:HH(3)HH(3)2:HH(4)38XNY1HH(1)HH(1)10:HH(2)HH(2)10:HH(3)HH(3)10M$(M):L(X$):XMHH(M):216:BK1Č1008:PXHH(1)Č1008VzBK1(X$,1)" "L1X$(X$,L):LL1:1036:".";:1008:1008:122V{BK1K$" "(P1PL)X$(X$,P1)(X$,LP):NAM$(M)X$:VV(M):HH(M):X$".";:VV(M):XMP1W|NAM$(M)X$:BK1BK(AK10AK13)MNY1MM1:VV(M):HH(M):106XUrAK11M1MM1:VV(M):HH(M):106lUsAK13MNY126UtAK95PXHH(M)LNČ1008:106UuAK95PXHH(1)AK32:K$" ":BK1:120UvAK95106UwAK21106UxPXHH(M)LN11069VyK$;:X$NASC) KEY WHEN-"::HT:"EVER YOU WISH TO RETURN TO THE"t:HT:"PREVIOUS MENU OR SCREEN DISPLAY.":14:2:AA$;:::HT:"WHEN SETTING CHART PARAMETERS, YOU"::HT)u"MAY PRESS THE ";::"RETURN";::" KEY IF YOU"::HT:"WISH TO ACCESS THE DEFAULT CH):AK(F(J1)40(K1)12M):D$(AK):V$(J,K)V$(J,K)D$:[sK:J:NY$(NY):MX$(MX):6tAA$"":J137:AA$AA$".":::V3:G1:H23:A$" NOTICE ":163:211:VV7:HT4:VV:HT:"THROUGHOUT THIS PROGRAM YOU MAY"::HT:"USE THE ";::"ESCAPE";::" (EL$(J)D$:rJ:CB300:J1NY:L(J)(CJ)::DC5:J1NY:NAM$(J)"":L(J)0āK1L(J):AK(D(J1)25K):D$(AK):NAM$(J)NAM$(J)D$:;s:ED100:J1MX:K1NY:LL(J,K)(E(J1)3K):::FE100:J1MX:K1NY:LL(J,K)0V$(J,K)"":M1LL(J,K)40(K1)12M,AK:.qK:J:PO1:35999,1:Mq(38398)123Ĺ38398,222:|q216,0:A6591:N(A2):(A)24(A1)3ı rMX(A):NY(A1):XX1:J1MX:L(J)(A2J)::BA30:J1MX:SL$(J)"":L(J)0āK1L(J):AK(B(J1)12K):D$(AK):SL$(J)S)):CJ,L:L(J)L::DC5:J1NY:L(J)0āK1L(J):D$(NAM$(J),K,1):AK(D$):D(J1)25K,AK:qJ:ED100:J1MX:K1NY:LL(J,K)(V$(J,K)):E(J1)3K,LL(J,K):::FE100:J1MX:K1NY:LL(J,K)0āM1LL(J,K):D$(V$(J,K),M,1):AK(D$):F(J1(J):HH(1):SL$(MJ1);:K1NY:HH(1K):A$;:HH(1K):V$(MJ1,K);:::oA6591:A,MX:A1,NY:J1MX:L(J)(SL$(J)):A2J,L(J)::A2,N:BA30:J1MX:L(J)0āK1L(J):D$(SL$(J),K,1):AK(D$):B(J1)12K,AK:apJ:CB300:J1NY:L(NAM$(JSL$(M)X$:BK1BK0n226QnHX(36)1:HY(37)1:NNNN1:NN5NN0:A(0)nMM1:J1MM:VV(MMJ1):HH(1):SL$(MJ1);:K1NY:HH(1K):A$;:HH(1K):V$(MJ1,K);:::nHX(36)1:HY(37)1:NNNN1:NN5NN0:A(0)JoMM1:J1MM:VVK$;:X$SL$(M):L(X$):XMHH(M):216:SL$(M)X$:BK1Č1008:PXHH(M)Č1008mBK1(X$,1)" "L1X$(X$,L):LL1:1036:".";:1008:1008:238mBK1K$" "(P1PL)X$(X$,P1)(X$,LP):SL$(M)X$:VV(M):HH(M):X$".";:VV(M):XMP1n$" "$lAK8PXHH(M)Č1008:226KlAK8M1MM1:VV(M):HH(M):226mlAK21PXHH(M)9Č1036:226lAK13MMXıl(AK10AK13)MMXMM1:VV(M):HH(M):226lAK11M1MM1:VV(M):HH(M):226lAK21226lPXHH(M)9226Mm"("(J)") ":HH(J)(S$):S$A$:VV(J):HH(J):SL$(J)::21:3:"WARNING: USE SHORT NAMES TO AVOID":22:3:"POSSIBLE OVERLAP ON CHART.":VV(1):HH(1):M1kPX(36)1:K$:AK(K$):AK27İ212:45kAK97AKAK32:K$(AK)lAK95BK1:AK32:K$:jPLL1X$K$:3jPLX$(X$,L1)K$:NjP1X$K$(X$,L1):ajX$""X$K$:jPLāI1PL:X$X$" "::X$X$K$:jX$(X$,P1)K$(X$,LP):j32,1:34,1:33,36:35,23::32,0:34,0:33,40:j7000kJ1MX:VV(J):S$5,24:]iG$Y$(N)"S (1-24): "MX$" ":VV(6):HN:"NUMBER OF "G$:N3ĢVV(7):36:" "iVV(7):HN4:"NUMBER OF BARS PER "Y$(N)" (1-3): "NY$" ":N4ıiVV(8):HN:"ENTER STARTING "Y$(N)": "SY$" ":jP(36)XM1:PL1X$X$KP8Ģ20:4:B$Ah16368,0:16384,128:(16384)155İ212:23dh18:4:35):20:4:35):171hVG1:LA(A$)::((40LA)2)1:LA):VG:((40LA)2)1:A$:VG1:((40LA)2)1:LA)::i32,1:34,1:33,36:35,23::32,0:34,0:33,40:3 ERROR CONDITION.":P4A$"REMOVE WRITE PROTECT TAB."gP8A$"INSERT DATA DISK & CLOSE DOOR.":B$"HIT RETURN WHEN READY."gP9A$"DISK IS FULL."gP6P11A$"FILE NOT ON DISK."gP10ĺD$gP8A$A$" HIT RETURN."h18:4:A$::NAM$(NAM$,(NAM$)5)ZfAS3ĺ:(4);"BLOAD "NAM$" DATA"",D"DN$:XX1:250:212:126fPO0::(4);"BSAVE "NAM$" DATA"",A"A$",L1600,D"(DN):216,0:212:DA2:AK70:236g:P(222):216,0:18:4:35):20:4:35):22:4:35):A$"UNDEFINED35):22:4:35):18:DN1Ė4:A$(5):20:4:A$(6):22:4:A$(8)fe18:DN2Ė4:A$(7):20:4:A$(8)e16368,0:16384,128:18:4:35):20:4:35):22:4:35):18:4:"PLEASE WAIT.":PO0AS4İ246e202fA$"6591":R$(NAM$,5):R$" DATA"47'p(AK48AK57)AK46AK32236{pK$;:X$VN$:XMH2:L(X$):191:VN$X$:VN(VN$):BK1BK0:1008:PXH2Č1008p236pVN(VN$):VNMI235pHERE1$qD(VXVN)10:J010:L(J)VNJD::J010:S$(L(J)):L1(S$):T$((L(J))):L2(T248oVV(4):H2PoPX(36)1:K$:AK(K$):AK27İ198:270:COL$"COLOR"83coAK27NB174o(AK8AK11)ĢVV(3):H2:224oAK2725oAK8PXH2Č1008:236oAK127PXH2BK1:K$" ":AK32oAK21PXH27Č1036:236pAK132nAK21PXH27Č1036:2209nAK8PXH2Č1008:220JnPXH27220on(AK48AK57)AK46AK32220nK$;:X$VX$:XMH2:L(X$):191:VX$X$:VX(VX$):BK1BK0:1008:PXH2Č1008n220nVX(VX$):VXMAXĢVV(3):H2oSTACK1NB116368,0:VV(3):H2SmPX(36)1:K$:AK(K$):AK27İ198:270:COL$"COLOR"83fmAK27NB174m(AK10AK13)VXMAX219mAK2725m(AK10AK13)(STACK0NB1)ĢVV(4):H2:233mAK10AK13233mAK127PXH2BK1:K$" ":AK32 ":A$(3)"SET SCALE MAX: ":A$(4)"SET SCALE MIN: ":VV(1)VV:VV(2)VV2:VV(3)VV4:VV(4)VV6:VV(1):H2(A$(1)):A$(1)MAX$:STACK0NB1ĢVV(2):H2(A$(2)):A$(2)MIN$lVV(3):H2(A$(3)):A$(3)VX$:STACK0NB1ĢVV(4):H2(A$(4)):A$(4)VN$mۭMAXLOMAXHIVXHI:M9:J10:214;k::VN0:9999:249k198:A$"SET VERTICAL SCALE LIMITS":271::VXMAX:VNMIN:STACK1VN0kMAX$(MAX):MIN$(MIN):HERE0VX$MAX$:VN$MIN$lVV11:HT10:H228:A$(1)"DATA MAXIMUM: ":A$(2)"DATA MINIMUM: )D$:&jK:J:NY$(NY):MX$(MX):j:A$"PLEASE WAIT":11:20(A$)2:A$: 0,1,1.2,1.4,1.5,1.6,1 .8,2,3,4,5,6,8,10:JO13:L(J):::SS1215jVX1:M19:J013:LOL(J)10(M1):HIL(J1)10(M1):MAXLOVXLO:M9:J10:214#k:J1NY:NAM$(J)"":L(J)0āK1L(J):AK(D(J1)25K):D$(AK):NAM$(J)NAM$(J)D$:j:ED100:J1MX:K1NY:LL(J,K)(E(J1)3K):::FE100:J1MX:K1NY:LL(J,K)0V$(J,K)"":M1LL(J,K):AK(F(J1)40(K1)12M):D$(AK):V$(J,K)V$(J,KK$"W"C$"WHITE"h>h216,0:A6591:(A)24(A1)3ıhMX(A):NY(A1):N(A2):XX1:J1MX:L(J)(A2J)::BA30:J1MX:BL$(J)"":L(J)0āK1L(J):AK(B(J1)12K):D$(AK):BL$(J)BL$(J)D$:WiJ:CB300:J1NY:L(J)(CJ)::DC5$X$K$:)gX$(X$,P1)K$(X$,LP):eg32,1:34,1:33,36:35,23::32,0:34,0:33,40:35,24:g32,1:33,35:34,6:35,23::32,0:33,40:34,0:35,24:gK$"R"C$"RED"gK$"B"C$"BLUE"gK$"G"C$"GREEN"gK$"V"C$"VIOLET"hLA0ı_fVG1:((40LA)2)1:LA):VG:((40LA)2)1:A$:VG1:((40LA)2)1:LA):fP(36)XM1:PL1X$X$K$:fPLL1X$K$:fPLX$(X$,L1)K$:fP1X$K$(X$,L1):fX$""X$K$: gPLāN1PL:X$X$" "::XER9A$"DISK IS FULL"ge199:11:20(A$)2:A$:13:20(B$)2:B$:16368,0:16384,128:199:156e16304,0:16297,0:16300,0:16368,0:16384,128:::142fG::J138:"*";::J1H:"*";::39::"*"::J139:"*";::VG:2:LA(A$):$2000,L$2000,D"DR$:43624,1:212,0:CH2:141QdA$"ERROR":216,0:199:ER(222)dA$"UNDEFINED ERROR. CHECK SYSTEM":B$"PRESS WHEN READY":ER11A$"BAD FILE NAME"dER4A$"REMOVE WRITE-PROTECT TAB"dER8A$"CLOSE DRIVE DOOR"eK$"2"K$"1"172cDR$K$9c(NAM$)0ER11:183Bc198cL$(NAM$,1):LL(NAM$):L$" "L$"."NAM$(NAM$,LL1):179cA$"SAVING "NAM$:B$"PLEASE WAIT":11:20(A$)2:A$:13:20(B$)2:B$:182,d16383,246:(4);"BSAVE "NAM$",ADRIVE ONE OR TWO"::HT:"A DISK FORMATTED IN DOS 3.3."qv:HT:"YOU MAY ";::"NOT";::" USE A PRODOS DISK."v::HT:"IF YOU DON'T NOW HAVE A DOS 3.3"::HT:"FORMATTED DISK, YOU MAY READ" w:HT:"THE LAST PARAGRAPH ON PAGE 12 OF"::HT:"THEOICE"::HT:"ALREADY SHOWN ON THE MENU."au16368,0:WT2000:L1WT:PK(16384):PK128LWTguu34,1:32,1:33,37:35,23:u 5:HT3uHT:"BEFORE YOU CAN SAVE EITHER YOUR"::HT:"DATA OR YOUR CHART, YOU MUST"7v:HT:"FIRST PLACE IN bAK13AK10172$bAK11160@bAK8PXXMČ1008:160]bAK21PXXXČ1036:160vbAK8AK21ĖXM:160bK$;:X$NAM$:L(X$):191:BK1İ272bNAM$X$:160bVV9:34:K$:AK(K$):AK27İ199:142bAK11158bAK13177cE ON DISK IN DRIVE (1/2): "DR$QaVV6:10:M1:VV(M)VV6:H(M)10:XM10:XX33_a16368,0aK$:AK(K$):AK27İ199:142aAK97AKAK32:K$(AK)aPX(36):AK95AK32:K$" ":BK1aPXXXAK21170bPXXX(AK10AK8AK13)159199:A$" SAVE CHART ":LA(A$):V3:G1::190::VV9:HT7:A$"TYPE A NAME FOR YOUR CHART":B$"YOU MUST BEGIN NAME WITH A LETTER":VV:20(A$)2:A$:VV2:20(B$)2:B$:VV6:3:A$"":J125:A$A$"."::"NAME: "A$:VV6:10:NAM$ aVV9:3:"STOR%_AK27AK49İ198:270:CC1:25L_AKAK48:AK1AK7Ĺ16368,0:145r_CHAK:AK7ĺ:(4);"RUN MENU,D1"_AK5188_AK2ĺ:(4);"RUN PRINTER,D1"_AK3Ĺ38398,123::(4);"RUN ENTER,D1"_AK4Ĺ38397,123::(4);"RUN ENTER,D1"`AKAK(CH48AK)(AK13):(K$)0AKCH48145O^AK49AK55Ģ21:7:30)^AKCHĢVV2(CH1):12::Q$Q$(CH):L(Q$):Q$(Q$,L5):Q$_VV14:HT21::K$;::AK49AK55ĢVV2(AK49):12::Q$Q$(AK48):L(Q$):Q$(Q$,L5):Q$:J11000: SEE PRESENT CHART":Q$(6)"(6) SAVE PRESENT CHART":Q$(7)"(7) RETURN TO DISK MENU":276]M17:VV2(M1):HT:Q$(M)::VV2(CH1):12::Q$Q$(CH):L(Q$):Q$(Q$,L5):Q$::VV14:HT5:"SELECT NUMBER: ";:CH;:1008:16368,0/^K$:AK(K$)::142<\198:A$" BAR CHART ":V3:G1:LA(A$)::190:143c\A$" BAR CHART ":G1:V3:H23:189Z]VV8:HT7::Q$(1)"(1) CHANGE CHART STYLE":Q$(2)"(2) PRINT CHART ON PRINTER":Q$(3)"(3) ENTER NEW DATA":Q$(4)"(4) CHANGE PRESENT DATA":Q$(5)"(5) $(J),K,1):AK(D$):ADJ10K,AK:2[:NB1140{[ADD1701722401101:J1NB:L(NAM$(J)):AD(J1)20,L:L0139[K1L:D$(NAM$(J),K,1):AK(D$):AD(J1)20K,AK:[\:(4);"BLOAD RUNTIME,D1"(13)(4)"BRUN FAST BAR.OBJ,D1"::01324ZK1L:D$(T$(J),K,1):AK(D$):ADK,AK:tZ:ADD170172:J1NY:L(BL$(J)):AD(J1)10,L:L0134ZK1L:D$(BL$(J),K,1):AK(D$):AD(J1)10K,AK:Z:ADD170172240:J010:L(SC$(J)):ADJ10,L:L0136"[K1L:D$(SCB:D16,00:D17,XL:D18,SX:D19,SY:D20,CF:D21,C(1):D22,C(2):D23,C(3):D24,W:D25,YT:D26,YSYCC0:COL$"COLOR"CC1ZD27,CC:D28,FR:D29,GD:J1NY:K1NB:D30(J1)3K,V(J,K)::J:J14:L(T$(J)):ADD3072(J1)35:AD,L:L(V(J,K).1)::K:XXL2TWD2T2:YYBWW:GGXW:IN(GG2)2:INGGCF3XX1vXSX(X):SY(Y):DHM:WW0T2iYD,NY:D1,NB:D2,T:D3,FT:D4,FR:D5,STACK:D6,SIDE:D7,3:D8,WW:D9,TS:D10,HB:D11,LB:D12,HC:D13,LC:D14,LU:D15,Y(2NY1)):(W2(W2))WW18WzDDDW(2NY1):126aW{FF(NY1)NY:NB1FF2(NY1)NYNBW|W(DDFF):W2(W2)WW1:COL$"COLOR"WW0WW1W}DDDWFF:W49000RX~SPYBYT:256:K1NB:J1NY:V(J,K)SP(VSAV(J,K)VN)(VXVN):V(J,K)J)" "J3T$(J)""Vv:YB191(2TS2HC)(T$(3)"")HCWW5(T$(3)""):YBYB10(NB1):YBYT((YBYT)10)10:YBYB4:YTYT4:T$(3)""NB1YBYB4:YTYT4VwYS((YBYT)10):DDXRXL2TW2TWWW:SIDE1DDDDNY(NB1)VxSIDE1123WyW(DDJ)"VIOLET"C(J)2.UoCOL$(J)"WHITE"C(J)34UpnUqXL(LU1)LC:XR279:YTHB2TS10:T$(2)""YTYT15UrYTYT6(T$(4)""FR1):J14UsT$(J)""T$(J)" "117UtLT(T$(J)):M$(T$(J),LT,1):M$" "M$"."T$(J)(T$(J),LT1):115VuT$(1ThK$"R"K$"G"K$"B"K$"V"K$"W"100Ti200:COL$(3)C$:VT4:18::" "::VT4:18:COL$(3);:VT4:18:100Tj211:COL$"COLOR"113TkJ1NB:COL$(J)"RED"C(J)5TlCOL$(J)"GREEN"C(J)1TmCOL$(J)"BLUE"C(J)6UnCOL$(COL$(2)C$:VT2:18::" ":VT2:18::COL$(2):NB2ĢVT2:18:93XScNB3106Sd:VT4:4:"THIRD COLOR: ";::COL$(3);:VT4:18:16368,0:K$:AK(K$):AK27İ199:75SeAK97AKAK32:K$(K)$)SfAK13AK10106Tg(AK11AK8)93COL$(1):NB1āM1300::106}R]:VT2:4:"SECOND COLOR: ";::COL$(2);:VT2:18:16368,0:K$:AK(K$):AK27İ199:75R^AK97AKAK32:K$(AK)R_:(AK11AK8)85R`AK13AK1099RaK$"R"K$"G"K$"B"K$"V"K$"W"93ISb200:L$(1);:VT:18:16368,0:K$:AK(K$):AK27İ198:270:NB175NQWAK2725lQXAK97AKAK32:K$(AK)QY(AK13AK10)NB193QZAK13AK10106Q[K$"R"K$"G"K$"B"K$"V"K$"W"85R\200:COL$(1)C$:VT:18::" ";::VT:18:PER "DD$:NB1G$" COLOR BAR PER "DD$PT6:2:37):VV:4:"YOU HAVE ";:NB;:G$:VV2:W$"CHOOSE FROM COLORS BELOW:":4:W$:Q$"RED BLUE GREEN VIOLET WHITE"::4:Q$PU:VT16:VT:4:G$"FIRST COLOR: ":NB1G$" COLOR: "@QVG$;::COI$ONK$"1"K$"2"76OOSI$K$:VV10:H25:" ":K$"1"STACK1:SIDE0:VV5:H25::"STACKED VERTICALLY":OPK$"2"STACK0:SIDE1:VV7:H25::"SIDE-BY-SIDE":OQ18:COL$"B&W"106OR199(PSVV9:H8:G$" COLOR BARS HAVE ";:NB;:" BARS PER "DD$".":VV2:H1:"HOW DO YOU WANT THEM DRAWN ?":VV5:H2:"(1) STACKED VERTICALLY":VV7:H2:"(2) SIDE-BY-SIDE"NLVV10:H25:"SELECT NUMBER: "SI$;:16368,0:1008:16368,0:K$:AK(K$):AK27İ199:25OMAK13K$S:27:GD$:VV(9):27:GD0:29bMFK$"1"K$"B"GD$"BROKEN ":VV(9):27:GD$:VV(9):27:GD1:29MGK$"2"K$"S"GD$"SOLID ":VV(9):27:GD$:VV(9):27:GD2:29MHK$;:29MI12000:NB181MJ199:6:3:35)NKH18:H28:VV9:VV:H1::"YOU$"AUTO SCALE":SS0:M8:VV(8):H(8):AS$:VV(9):H(9):M9:29LBM8K$"S"AS$"SELF SCALE":SS1:M8:VV(8):H(8):AS$:VV(9):H(9):M9:29LCM9K$"0"K$"1"K$"2"K$"N"K$"S"K$"B"29LDM972MEK$"0"K$"N"GD$"NO GRID":VV(9)H(7):29-K=M7K$"N"K$"Y"K$"F"29IK>M8K$"A"K$"S"29K?M7K$"Y"K$"F"FR$"FRAME":VV(7):H(7):FR$" ":FR1:VV(8):M8:H(8):29K@M7K$"N"FR$"NO FRAME":FR0:M7:VV(7):H(7):FR$:VV(8):H(8):M8:29>LAM8K$"A"AS0T0:J6K$;:AK13:WW$(WW):AK13:WW5WW:WW15WW16IJ7WW5WW6QJ836mJ9M6K$"B"K$"C"29zJ:M661J;K$"B"COL$"B&W":VV(6):H(6)::"B&W "::M7:VV(7):H(7):29 K<K$"C"COL$"COLOR":VV(6):H(6)::"COLOR"::M7:VV(7):1129I*AK2129!I+M449/I,PX3529LI-AK95AK32:K$" ":BK1I.K$;:X$T$(M):XMH(M):XXXM21:L(X$):191:BK1İ272I/T$(M)X$:BK1BK0I029I1M5WW(K$):K$"0"WW029I2M557I3M5WW429I4WW0TFTJ5WW43!H!AK8PXH(M)Č1008:29BH"AK21PXH(M)19Č1036:29WH#AK21ĖH(M):29H$(AK10AK13)M9MM1:VV(M):H(M):29H%AK8M1MM1:VV(M):H(M):29H&AK13M973H'AK10AK1328H(AK11M1MM1:VV(M):H(M):29I)AKL$:VV15:3:"FRAME TITLE (Y/N)......."FR$:VV17:3:"AUTO/SELF SCALE (A/S)..."AS$:VV19:3:"GRID DENSITY (0-2)......"GD$:16368,0GVV3:16:16368,0:M1GK$:AK(K$):AK27141GAK97AKAK32:K$(K$)GPX(36):M436H AK215:W$E$:HT(W$):W$:VV5:HT21:T$(2):VV7:W$"SIDE: "E$:HT(W$):W$:VV7:HT21:T$(3):VV9:W$"BOTTOM: "E$:HT(W$):W$:VV9:HT21:T$(4)GVV11:W$"3D BAR DEPTH (0-4)......":3:W$WW$:VV13:3:W$"COLOR OR B&W (C/B)......":W$CO3)12:VV(4)14:VV(5)16:VV(6)18:VV(7)20:VV(8)22:J18:VV(J)VV(J)2::VV(9)22:H(1)16:H(2)16:H(3)16:H(4)16:H(5)27:H(6)27:H(7)27:H(8)27:H(9)27:E$"":J121:E$E$"."::HT37FVV3:W$"TOP TITLES: "E$:HT(W$):W$:VV3:HT21:T$(1):VVK)MAXMAXV(J,K)+DV(J,K)MIMINV(J,K)NDVSAV(J,K)V(J,K):::SIDE1ıDMAX0:J1NY:SUM0:K1NB:SUMSUMV(J,K)::SUMMAXMAXSUMD:D(38399)123142D38399,222:::A$"":G1:V3:H23:189::270E:VV3:VV(1)8:VV(2)10:VV(D$"BROKEN"!C GD2GD$"SOLID"MC::VA10:TW5:T2:WW00:FT2:WW0T0CWW$"0":(HM8)20WW(HM8):WW$((WW5))CWW0T0CTS5:HB20:LB13:HC10:LC7:DD$"MONTH":SI$"1":23DMAX0:MIN1E9:K1NB:J1NY:V(J,K)(V$(J,K)):V(J,LL v t q  lq w t c v i q (z LL q 9t {t lq u z  /x n iq r x r s x n s LL u y r w lq q cq {t o u y r w lq q cq -t u o u y u y # o u y u y # o LM q 9t {t lq q   u &z lq v u &z iq c v i q u Gz v  "v r as v t u y q [s {t o u y u y # o u y q [s -t u o u y u y # o r v $ lq u Gz v $z LM v t q ( lq w t c v i q z  t t ct lt lq !t v iq u q v LJ wu w L9J w tu !t r r lq `w nu iq c x s v LnJ s t t ct lt lq !t v iq u v u r s v (LJ r s r v u r t ~t v 0t r v LJ r *t 0t (v t c r lq t v  Hw fq Bt v M| $LI wu Zw w u kr tu  x T bx > x T q v $ w t vLGLG q v $ w kx lq 'w z G  w fq lq xw z G  w fq 4s v M| q   u Iz v o LG* u s  eu t s  s _u t s  s u Vu s  s v Vu  s v v 3z v z  n o v 3z v z  n o v { v  LF Ar z F LXG Ar 1z %s c v i r Cv v (LF v Cv v M| Ar 1z   Ar z u  v 4 n `t ct w $LE w r r v Zt %s r r v (L8E v r w tLBE v z AE L[E x t q v $ lq ct x z LMF v s r r t ct v r t t t t t Su s v bu u eu t u v t  eu t  u Vu  v t  u t  eu tu iy  _z u iy w (L)D ]z 'w  _z u iy w LID ]z xw  _z u }zLWD% ]z 5 UD  o 1 x > v T 'w  v  v  Yx r x > x T bx > x T r (sLD v z D L]G v z  n `t v z  n ]t LE v z  q 1 u v lq v _ oq z u v lq v _ oq z  o 1 v Os v M| q   v _ u z Ls Os 1 v M| q   u (z v _ u z c Rs i v w lq v u &z iq o u ky v _ u z c Rs i ;x o 1 v M| q   q v | q   v u w &r mv q G n @s  z u z u z z  o  q 1 1 s Px )r v M| q   u w &r q G n q v $L:C v | q   w u &r mv G n @s  z u v lq v _ oq z u v lq v _ oq z z  o s v $LA v q v u w r `w r 1y  X v M| xw   s w lq v u w iq )r G n q q v $LA v | q   ,r mv q G n @s  z u z u z z  o  q 1 1 s >x )r v M| q   v u w &r G n q v $LUB  1SIDE0:STACK1*BNB1SIDE1:STACK0@B (38399)12314B FR(HM28):GD(HM29):J14:ADHM3072(J1)35:L(AD):L20L0T$(J)"":K1L:AK(ADK):D$(AK):T$(J)T$(J)D$:B :FR$"NO FRAME":FR1FR$"FRAME" C GD$"NO GRID":GD1G233,8:232,0:DR$"2":DR2:V(24,3),VSAV(24,3):V$(24,3),L(24),LL(24,3):BL$(24),B$(24):206:NBNY:NB$(NB):NYMX:NY12GD$"NO GRID":GD0ACOL$"B&W":(HM27)1COL$"COLOR"BCOL$(1)"WHITE":COL$(2)"GREEN":COL$(3)"VIOLET":STACK0:SIDE1:(HM5)o86@35,24::37600:HM37601:CH1:(38393)124CH6@0:1:SS0:AS$"AUTO SCALE":GD$"BROKEN":GD1:(HM29)0GD0:GD$"NO GRID"@FR$"FRAME":FR1:(HM29)2GD2:GD$"SOLID"@(HM28)0FR0:FR$"NO FRAME"AAA$"":J130:AA$AA$"."::                         s r Vr Ar Rz r \ 1 { q v $ lq t v $z L\ y > v T  z  x $L\ z  r v ( lq r q z LF\ *e y A Ly T y  x > v T Gx > v T v > v T y A Cy T xw  L\RUN SLOW PIE,D1 \  L\ qz 5  lq q cq @v Vr u gLFLI Bl h  Ie f ii $al L.J f i & e Ag h $al L;H ph >gLF Yg i Hf &LF Wl  if Vg Bl 0l  n f Oc Ag h $LH k 8 Nf cf LH k 8LH Ag h $ e Wl 5 H al  e ,g h  e ,g e (fl al LMI h #g .l  l ,g e o 1 ` v { q   Ar ^y  v 8r Zw @v  s 1 `LAg. ?g  n s v M| q   v u &z lq v t `q  lq u &z ~q v t xq (z Lgh u y ~t u y u v >r `w r 4v Ar v >r 1v Lgh s  t  u ;r x D v $w $ Hw @v lq Cs w $ Hw fq Cv Cs w $ Hw r lq Cs w $ Hw iq r Fv v (LTf v Cv Fv x Lhf x Cv s v (L|f v r s x Lf x r r z Fv o r >z s o gLe gz  n q v { q   gz Ar  v 4 z  n @s Ar `y Cs 1 'w  Cs  v 8r Zw @v  Ju 1 ` q v $LGe r z izLe t v $Lae r {z iz t v $Le v _ r z iz f r z Cv r  v T  z  n @s Cs w $` z  >r v  lq Ar q &z Le Ar rL*e g Cs n @s Cs  v 8r Zw @v  Ju 1 u z Fv o u >z Ju o ` t Cv z  n q v { q   z Ar  v 4 z  n @s u z  /x n @v c x Ov v L e Rv =v Cv v  v I{ 2x   Fv  r Au u z  /x n @v  r Au z z t v $ lq q v z ` v v s w s t t s ( lq t t z LAd z  n q q Zw t Cv v (Lc q Zw t c Fv v Cv v  v { 2x   Fv  Ar Au `w q @v  Ar Au 1 'w  v { q   z Ar  v 4 z u &z iq c v i t ps q lq t cq {t t s q lq t cq u Gu u z t o u >z Ju o r v  lq t v &z Lb r w Du Gu u >z Ju o v t s w s t t v $Lb u {z z t v $Lb v _ u z z q v $Lc u v r Yr u c v  v r Yr u c v  u r v Yr v  u r v Yr v  v r 'w  Yr w Cv u z  n q v La v { q   u z Ar  v 4 z  n @s  v 8r Zw @v  s 1 1 M|` w q u &z lq v 'w   v z 'w   Yr v lq v 5r iq  v r lq v q fq 1 1 'w  u iw Lka Yr v  s Yr u  u r v Yr  ow r Yr 9w  u r Yr  v r Yr u c v  u r Yr lw  s Yr u  WHEN READY":VT:17(A$)2:100::A$:3qT SCREEN PRINTING PROGRAM,(C) COPYRIGHT 1984,BY MARK SIMONSEN & ROB RENSTROM,BEAGLE BROS MICRO SOFTWARE INCT HIGH-SPEED DOS,(C) COPYRIGHT 1982,BY BILL BASHAM,DSR INCTJ18:T$(J)::TVV3:J18:L(J)(T$(J)):TVV5U3:16:"***WANT SENT TO YOU."S8800AS959:32,0:33,40:34,0:35,24:22S:::"PRESS ";::"";::" TO CONTINUE"::"OR PRESS ";::"ESC";::" TO GO BACK":S;32,1:33,36:34,1:35,23::33,35:32,3:T<::V3:G1:H23:A$" ALPHACHART! ":41:2 THAT SAME DAY"::"AND TRAVEL BY UPS AIR, 2ND DAY"::"DELIVERY.":16368,0:16384,128:PK(16384)128:PK27ė:32,0:51S732,0:59:32,3:VT::"REMINDER:";::" WHEN PLACING YOUR ORDER,"::"BE SURE TO TELL US THE NUMBER OF"::"THE FREE DISK YOU 9Q532,2:33,35:35,22:34,1::32,3:VT:1::"TO ORDER BY TELEPHONE:"::::"VISA/MASTERCARD AND COD ORDERS"::"PLEASE CALL OUR TOLL-FREE NUMBER:":::3:"1-800-826-2989 (NATIONWIDE)"::3:"1-800-231-7316 (CALIFORNIA)":|R6:"ORDERS ARE SHIPPED:"AND PUT IT IN THE POSTAGE-PAID"::"ENVELOPE THAT CAME WITH THIS"::"DISK. MAKE SURE YOUR MAILING"Q4:"ADDRESS IS ON THE OUTSIDE OF THE"::"ENVELOPE. NO OTHER INFORMATION"::"IS NEEDED.":16368,0:16384,128:PK(16384)128:PK27ė:32,0:4BUY EITHER OR BOTH"::"OF THESE PROGRAMS FOR $10.00 EACH.":58:16368,0:16384,128:PK(16384)128:PK27ė:32,0:47hP359:32,4:VT4:32,3:VT:1::"TO ORDER BY MAIL:"::::"WRITE THE NAMES OF THE DISKS YOU"::"WANT ON THE BACK OF YOUR CHECK,":i $LG .l DlL>A f nj L,G )j f f  Yl f wj $ e Yg i Hf &al L[G k 8LF f wj $ e Nf cf al LG )j f h >gLG G YlLLH f Qi $ e Nf cf al LG k 8LF f i $ e if i Hf al LG Xk 8LF f 6i $  n g g  Ch  w g h  g h  Ch L/F L4F -F 5 l  2F   g h  Ch  g h  s g i  h LF TYPE NAME: }F  `i D h n Vg Bl 0l  n f g i  Yg  Bl  Yg  k > dh T Yg ff `i D h n Kf  Yl  n f > dh TLK xf h $LJK xf h $L[ xf !i $L?E yh > dh T xf !i $LXE h h 7-b xf !i $LE Hi  LE RUN MENU,D1 uE  ` k > dh TLE GET CHART FROM DISK E l Zf i $LELE STORE CHART ON DISK E l i g h @h l h  e xf !i $al LoD h h h g  f h  s h Ll  h rf h g  f h  w xf Ll  s xf  :l xf h k > dh T xf h $ e xf i $al LD xf Wf XLE xf h $L E vk > dh T k > dh T k > dh T Ok L C h uf h rf h Ti  f h  w xf Ll  s k  f h LYCSELECT NUMBER: HC  w 8l  k 8 s k > dh T xf h  Yl  uf h ( e xf !i al  e Wl  jk al LC w Wl  s Wi g Wl  jk $LC 8l  ufL~D xf NlLBSEE TYPING INSTRUCTIONS B o Hi NlL dh T 7a i g [ i h i f h  h  X vk > dh T X Ya i f   e h  =k  w k  Hi  =k LA TEXT TYPER MENU zA  i  =k  k  s h NlLAGET CHART ON DISK A o h NlLASTART WITH BLANK SCREEN A o h @a, m???`lZmm s k A h T k  X ph f h g ?i g h ufLL@4 J@ :l h f i h h  i T j > j T 7-b h @h j Jg a l l Hi  L@BLOAD CHARACTERS,A34214 @  Hi  L@BLOAD BLOCK,A35238 @           q > o T 4o s j   Co #n ao j pl qk tk # qk k =o  xj l =o $Xr L|N go hk xj go hk # lj L|N tk @o qk 4o vr k   yo Xl "o D q $L7d j =o  l xj 4o _ )n q j j ^o  j rj xj Uo _ )n q j j po $ j rj n o (LM go k o s tq  k  )n 8r  n j yo l xj Dk j rj m (l vo xj n n rj k 4o s j   )n 8r n  4o 4 %r Co n >k m qk #r  n 4l  tk  k 1 1 o -r  n j o -r r yo qk o Yn k Dk k d n =o $LMW l k l  k m Bm  k 1 m =o $LL 4o s Pq   n n "l k l @o r m Bm c Co  o  _k  k 1 1 m o $LL 4o s Pq   n n "l k l  k l o  k m Bm  k m Bm c o  k 1 Co k )n An  n &n }n  )n n Gn  )n n n  )n j }n  )n n 1 o  n @o  Co j Co wn  Co n }n @o  go n Co An  n -m @o  m -m  Co m m  nn @o o  o  m ^o $L L 4o s Pq   n n " cm  m k  l n  j }n  n n  j }n  n Gn  n n  n -m  m n  n n  j m  8n k  l n  j m o $LK 4o s Co m   l &n  )n m -m &n  )n m )n n  n &n n l LI l n m o $L#I o n l l m Bm *m l `m -m m l m m -m m n Dn n m n zn n l n k _n m m (l m 5n m m kn n 8n n 8n n j m n j m j l l  m -m  m m  8n cm  m l  m m  nn n  n go i k n _k q k n bq L.H Co n nLH 4o s _k q   _k -r )n  4o 4 %r  n 4l Yq D o $LH p 1l 4l Co #n k n qk 7l  tk  _k ^o $ Qp o Yq D o $ xj 7l p $Xr LH o n n 1 1 r Yq > q T o  m do 5n kn -m  m cm  m m  nn m  8n -m  m -m l  m -m l  l m cm l  l m m l  l hn m  l hn o  4o q 4o -r  n o Uo q Uo -r  n o 4o r Uo  LG _k -r G LH _k q k cn l l k bq L$F Yq > q T Dk k l `p $L;F o k k go l k k k l ;k $LG j o $LG go l Wp xmLvF Uo -r uF LF p xm #k k *m l do k 'm `m cm l Dq LF Co ]m `mLF -m o (LF -m @o *mLF -m m cm m l @o m m m um $LPE 4o s j   Co #n Qp Mk n 4l G  %r )n Or )n Mr #r  o 1 1 }q > o T o  4o  o  Yq > q TLE 4o -r E LH Km l c go i k Yq > o T q > o T #k k 4o -r  n l Uo -r  n l LF Uo -r  n r #r  o 1 1 k q @o p q Pk o s tq   )n o Mk j G n j o $LD 4o s j   o n Mk n G n 4l  %r )n :r )n 8r #r  o 1 1 k =o $LUE k q @o p q p @o Pk 4o s k   Co #n Qp Mk j G n j o  k p p xj Co #n p uj Pk G n j j o $LzC 4o s j   Sk n j G n 4l  %r )n /r )n -r #r  o 1 1 k q @o p Pk 4o s j   Co #n o Mk G n j o $LD 4o s j   Co #n o Mk n j G n 4l  %r )n r ) -p G n k k ~p G n \n k p G n n k p G n k k p G n m k o $LaBLYBB&W UB Er k =o $LBLxBCOLOR rB Er yo Xl yo k 4o s j   4o s k   k p xj Co #n so uj n j n \ )n q j G n o 1 1 4o s o o G n m k -p G n k k o G n Ol k o G n Tm k o G n k k p G n lm k p G n Ak k p G n m k $p G n %l k 6p G n l k ?p G n sl k Hp G n l k Tp G n Xl 4o r k cp G n o Uo r k lp G n o o r k up G n o k@X2 w???Wrvw o  L;@BLOAD CHARACTERS,A31744 #@  o  Lh@BLOAD BLOCK,A32768 U@  q  q j j k Gq Hm k G n j k @o G n k k do G n m k vo G n k k o G n j k o G n l k o G n n yo l k                   m  l  m n \k  _k 2n 1 1 j ^o Ln^ o  Co n  n Co m  8n Co $m  m [l  j =o $L^ o  n  n m  8n -m  m m  8n m  nn Gn  n cm  m m  nn [l  1 vr k =o $L_  Co 2n n n  n @o 1 [l  j =o $Lk] o  o s k   m n  8n n n  n 1 j ^o $L] o  Uo s go k  Uo  o r m  Uo  m n \k  _k 2n 1 1 j po $L'^ o  Uo s yo k  o  o rUo r yo m  Uo  cm n  _k m c n 1 1 j po $L\ o  o s m  o  o r go m  l  cm n  _k m c n 1 1 m  8n m  nn Gn  n n  n m  8n o  o s yo k   m do n Gn  n }n  n cm  m o  j =o L|[ 4o s Co m   cm @o  go m c n Co wn  n n 1 [l  j =o $L[ 4o s Co m   cm n  n m m n  n hn 1 [l  j ^o $L7\ o  o s m  Uo  n  _k m 1 1 j =o $ xj m o Xr LXZ o  m  nn cm  m [l  j =o $ xj m o $Xr LZ o  -m @o  Co m m @o  8n @o Co m  nn @o Co ]m  Co m -m @o  Co m o  m o $L^ [l  m  nn  Co m -m n  8n @o 1 o  j =o $LpY 4o s Co k   -m n  Co m -m n  8n @o 1 j ^o $LY o s k  Uo  o r m  Uo  -m n  _k m 1 1 j po $LZ o s k  o  o r m  l  -m j \ )n q n m Co j j nk *m k `m -m m -m k m -m m n -m m k Dn zn l m m n m 5n kn n m c m n n m m nLXCOLOR Cr 5 X LX eL^ -m  m m  8n m  nn cm  m -m  m o  4o s Co k   -m n ,k /k 1 2k o $LEW go j 'm xj )n r  n c go i >k rj Fl e 1 sLj_ q > o T 4o s j   Co #n xj k @o j k =o  j oj j pl qk # qk go hk xj go hk # lj LW tk @o qk Co kk qk 4o vr k   "o D q $L7d tk @o qk L#V o  cm  m m  nn [l  j ^o LdV o  Co n  n Co m  8n Co $m  m j ^o $LV o  cm  Co m cm  m j ^o $LV o  cm @o  go m Co wn  Co n [l  1 vr o /k 4o s k   m \ )n q m n \k  _k 2n 1 1 j po $LzU o  Uo s yo k  o  o r m  l  m n \k  _k 2n 1 1 j =o $LU o  Co n  n Co m  8n Co $m  m m  nn m  8n m  nn Gn  n [l  j =o $ nn n  n Gn  n j =o $LzU o  o s o k   m do n  Co 2n n n  n @o 1 [l  j =o $LT o  o s k   m n  8n n n  n 1 j ^o $LU o  Uo s o k  Uo  o r m  Uo n hn 1 j ^o $LnS o  o s m  Uo  4o r Co m  Uo  cm n  _k m c n 1 1 j po $LS o  o s m  o  o r Co m  l  cm n  _k m c n 1 1 j k LzU n  n m  8n m n  n m  nn cm  m j po $L\R }n  n Gn  n m  nn cm  m j =o $LR o  Uo s Co m   cm @o  go m c n Co wn  n n 1 [l  j =o $L S o  o s m   cm n  n m m n 1 j po $LXQ o  o s k  o  o r m  l  -m n  _k m 1 1 L_QB&W k =o $ xj Cr 5 [Q Xr LQ o  -m  Co m m  8n cm  Co m m  nn o  m o $LV j po LR cm  m }n  n G 8n -m  m j =o $L`P o  4o s Co m   -m @o  n m Co ]m  n m 1 j =o $LP o  o s k   -m n  m -m n  8n 1 j ^o $LQ o  o s k  Uo  o r m  Uo  -m n  _k m 1 k j \ )n q m m o $LV j \ )n q n tk *m tk k `m tk m tk k m tk m n tk m k Dn tk m k zn k m k m n k 5n n k kn n k c m n n m m nLOCOLOR Cr 5 O LO eLV [l  -m  m cm  m m  nn m Qq n  LW*  W  1 l  n  w n  l  n LNW CHART EDITOR ?W  ,m  n  n  s +n  l pLWDRAW ON A CHART }W o Nl pLWDRAW A NEW SCENE W o l pLWSEE THE INSTRUCTIONS W o l pLWSAVE SCREEN TO DISK ůh h 1k Bl $ {l h h 1k Wl $ Zl h h 1k l  l h i i Dj Wi i an LTV k i` X l i s lo > k T o A l T w n Qq n  LV* V  1 k l $LV 'l j l Qq Ho  LV* V  s l  wLV* V  1 n l $LU j  Ni  i k k i l $L=U j  Ni  i k i l Ik l j 'l j i l $ h k l $/p LU  'p j  Ni  i L]CL%C i  'l j k  k TL%C 1k l $ 5m i h 1k Wl $ l i  m k m $i k ej 'l  m T On > k T l j ?o  m .k k  k i 'l i k k i l $ h hj l $/p LT j  Ni  i k j m k m $i k ej 'l  k T ]l j 'l .k l  k  k i 'l k k i k i Xn j k m $LtS j  Ni  i  'p k ej 'l  m T On > k T l j o  zm .k k  k i 'l i k j k qj Q   LRQ o 5 R  o  L/R ,R  o LBRA @R  o LVR SR  o LiRZ gR  o LR SET CURSOR TRAVEL zR  k > k ] 3i k $LR X o > k TLUV l i o > k TLY k m $LBS n > vLOR OF CURSOR o 5 P  o  P   L:QSPACEBAR o 5 1Q  o  L^Q ROTATE LhQARROWSLsQMAGNIFY TQ 5 o  aQ  o  kQ   LQBLQ LQBLQCHANGE BOX SHAPE o 5 Q  o o  o  Q  o  Q  o O  o  O  o   wL#PESC P  sL6PMENU o 5 1P   LRPELyP#ERASE PORTION OF SCREEN WITH CURSOR o 5 PP  o  UP   LPF + COLOR NUMBERLP FILLS SCREEN o 5 P  o  P   LPNUMBERL QSELECTS CO N  LO LOPLOPOINTS  O 5 o  O  o  O  LKO LPOWLYOWEAVE GO 5 o  NO  o  SO   LORLO RELOCATE CURSOR (LEAVE NO IMAGE) o 5 O  o  O   LODLODRAW PERMANENT IMAGE o 5 @: τ???zτ x L2@ v D :y $L\` v t xw  L\@BLOAD CHARACTERS,A34214 D@  xw  L@BLOAD BLOCK,A35238 s@  x s s G n q s v G n q s v G n Nt s w G n t s 9w G n s s Kw G n r v q v u                             ,$` L( L5 LD 8 XL XLR XQHPH RPhPhQ8 XL.0'L+ LfLLLLL ꥪLYԨék  o k tk  k )n ^o $Lmb [l  o s tq  Uo  o r p  Uo  tk n  _k k 1 1 )n po $Lb [l  tk  k tk o  k tk o  o k tk  o k tk  k )n po $L!c [l  o s Pq  o  o r p 4o Mr  o n >k uj o o q Uo q xj Uo Mr  o n >k uj o 2q k 4o s k  L[aCOLOR Cr 5 Ua L$c )n =o $La o  4o s tq   tk n  k tk n  o k 1 )n ^o $Lb [l  tk  k tk o  k tk o  o k tL` )q k k =o L` o k k d k =o $L"d o j 4o s k   )n Mr  n j j 1 o k j c go j l Em c go i xj j >k c go i rj c m qk j >k nk c kq j o L` go j kk c Co qk Lo >k Pn 4o q tk o Uo q 4o q xjgo j 'm Fl k ^o $L_ Co $m Fl k po $LA_ Co $m xj go j rj Fl )n r  n >k c go i @l Fl e 1 s [l Lt_Ly_ o -r s_  xj o -r w_ Xr L` o -r  n j o -r r l Em c go i xj j >k c go i rj c m qk q k m p $z#9     ԠŮʠ<" ŠӠ" Ӡ  Ϡ ԠϠԠҮʠ4ӠŠ ՠˠ Ůʠ2ϠҠ ŮԠ#Ҡ; נҠ: נŠ ԠҮʠ.SCENE f  l  L#g SAVE SCENE g  L=g SCENE SAVED 1g  Lc @!"I諂@#4 `@d0 $Pp (8XP@`p \H ;j h LIf l q h 2j  L#f o 5 !f  o 1 o 5 %p  o` 'l 2j o  %p  o ;j h o  o  o` k > l T 0l > l T l > l T fl > Zo T X k > k T 0l > k T l > =n T`Lf SAVE SCENE f  l  Lg UNLOCK Ho T X k > k T 0l > k T l > =n T fl > co T` l D n c j $l 8j h $l /j $Loe o 5 %p  o` ;j h $ h h l $/p Le %p o` ;j h $Le 'l h o  %p  o` ;j l $Le 'l h o  %p  o`Le o 5 e Le %p o`LUV 6o  l  i  ?o  l  i  o > k TL\ m j k j c 'l  o  n i w i j c ]l i # $l  i  k j  i j c ]l i # $l  o  k j $l  i j c ]l i # $l  i  s` k > l T 0l > l T l > k T fl >o ;j m $L$cLc DISK IS FULL. c o ;j l $ h ;j l $/p LacLYcFILE NOT ON DISK. Gc o 6o  l  o  ?o  l LcPLEASE PRESS RETURN c  ;j l $Lc ?o  l  o  o > k T k > k ] k D o $Lc d n 8j lo > k T m i 6o  l  i  ?o  l  i  Qo  l  i LhbUNDEFINED ERROR CONDITION. Mb o ;j xl $LbLbREMOVE WRITE PROTECT TAB. b o ;j l $LbLbINSERT DATA DISK & CLOSE DOOR. b oLbHIT RETURN WHEN READY. b  n > k T n > k T l iLY 7a i xl $La l  LMaBSAVE Laa,A$2000,L$2000,D Fa 5 o  Pa  o j  o   dLUV lo > k T j l $La ]l j j Wl $La 'l j lo > k T 7a i l $Lx` i xl $L)a o Do o \j l $L` k YjL]L` o l  `  h h l /p L\` o h  o 'l h hL` 7a lo > k T ]l j 7a i l $L` l  L`BLOAD L`, A$2000,D ` 5 o  `  o j  o   i l $L$a o > k Tj h (4p /p L{_ 'l 2j o  o ;j h o  o  o o j l  i LO_. o 5 M_   j l  j 5j c 'l L_ \j l $ h o l  ~_ /p  h h l /p L_ o h  o 'l h h n 8L_. _  -o 8 -o 8L{_ h i m oi /p L ^ n 8L] j l $ h j l $/p L\` j #m & h \j l $/p Li^ k YjL] j m oi &L] %p  i j o o  n h 6e \j l $L^ -o 8 ui i L^ -o 8L^ \j l $ h %p 5 ^ /p  h ;j l  h ; j ~l  i  l D l n ri  'p  n j Gm $L=] dLUV j m LZ] hm j j  'p j 4n $ h j m oi &/p L] -o 8L] j 4n $ h ui i /p L] hm j 'l YjL] ] 'pLz^ j l $ h ui i /p L] -o 8L] j #m $ j El k >m j 5d o > k T l j l i l pLC\TYPE CHART'S NAME 1\ o l pL\\NAME: T\ o Lh\ g\ p l oq ?o  L\. p 5 \  p 1 l p  l n i j  j  l p  j ~l  j  l p p   j ~l  i  o Y WHEN READY Z  k > k ] k D o $LUVLHZ k m $L[ j  Ni  i Zi (k Hi Ki Zi (k i i m kLPDLE i xl L[L[ GET CHART FROM DISK [ o i xl L[ 'l i i xl $L[L[ SAVE SCREEN TO DISK [ o d 'l  Ni  i 'l k i l $LHZ L 'l &j l  k T i l $LZ l  LZ RUN MENU,D1 vZ  lo > k T o > k T X n  l LZPUT ALPHACHART IN DRIVE Z  n  l L[PRESS RETURN KEh 3i k $/p L!Y ]l i 'l :kL!Y i Wl $ h 3i l $/p L@ i Wl $L^Y 'l k 'l 0iLiA i xl $L[ i Bl $L(N i l $L[ i l $ h k k $/p LY 'l kLiA i l $LZ i  k j 'l  k T i l $ y v $Ln s  u y  u z x D v LVm s  u y  u z u y v $Ln u z lq u y fq lq u y ~q u y {q ]q r r v s r v Lm r v s v r v >r u y u u y t u z ^v u s Vr v r Yr s Vr r r r Yr t Ll Yr # Cv s # q s  Fv  q Ar v >r Fv &u $ lq q u $z Ll Fv )u q u x D v $ lq Ar v z Ll s  Yr  s LlLl 1 v M| q   u &z lq w t c v i `q Ln u z v  lq v u &z ~q w t c v i xq z  lq u Gz v $z Ll u y lq u y fq lq u y ~q u y {q ]q r r v s r v Lk r v s v r v u &z t Lk r r v >r u y Su u y t u y v Vuz L!j s  t  u ;r LAjLi Ar 1v LAj u y v o 1 'w  v M| q   v u &z t  lq u ty v $ ~q u Gz v $z z Ll v u &z lq v t `q  lq v u &z ~q w t c v i xq (z Ll v u &  u ;r x D v $ lq Ar v z LCi s  t  u ;r LFiLh Ar 1v Lci u vy v o 1 v M| q   u &z lq w t c v i `q LAj u y t u y u v >r Ar v >r 1v L$j s  t  u ;r x D v $ lq Ar v  lq Ar v z L,h s  t  u ;r Lgh Ar v $ lq x D v $z Ldh s  t  u v Lg 1 v M| q   v u &z lq w t c v i `q ( lq v u &z t (z LFi u y t u y u v >r Ar v >r 1v LFi s  t{LdhL hL hLdhLdhL hL hL hL hL hL hL hL hL hL hL hL hL hL hL 8qyL 8q{L 8q}L 8qL 8qL 8qL 8qL 8qL 8dh$Ldh)Ldh.Ldh3Ldh8Ldh=L h?LdhDL hFLdhKL hMLdhRLdhWLdh\L h^L h`LdheL hgL hiL hkL hmL hoL hqL hsL huL hwL hyL hgLdgLdgLdgLdgLdgL gLdgLdgLdgLdgLdgLdgLdgLdgL gLdgLdgLdgLdgL hLdhLdh LdhLdhLdhLdhL gVL gXL gZL g\LdgaL gcLdghLdgmL goLdgtL gvLdg{LdgL gLdgLdgLdgL gL gLdgLdgLdgL qLdqLdq$Ldq)Ldq.Ldq3Ldq8Ldq=LdqBLdqGLdqLLdqQLdqVLdq[Ldq`LdqeLdqjLdqtLdgKL gML gOLdgTLLdpLdpLdpLdpLdpLdpLdpLdpLdpLdpLdpLdpLdpLdpLdpLdpLdqLdqLdq LdqLdpMLdpRLdpWLdp\LdpaLdpfLdpkLdppLdpuLdpzLdpLdpLdpLdpLdpLdpLdpLdpLdpLdpB $  .4">(4 ? ? ?  ?n.??s*h[<]ޢp/Ldp4Ldp9Ldp>LdpCLdpHLdz"@d(999)246đ:16302,0::/@e999,246R@m104,64:103,1:16384,0:35099]@n38399x@x(4);"RUN POST HELLO" ?6,h7  ?? {|zLdzLdzLdzLdzLdzLdzLdzLdzLdzLdlq q u $z LVp Fv )u q u x D v $ lq Ar v z LVp s  Yr  s LYpLo 1 `Lc@T@H@I諂  `@P p00(  (HgH `q (LYp u z lq u y fq lq u y ~q u y {q ]q r r v s r v Lio r v s v r v >r u y u u y t u z ^v u Vr av r s Pr Vr r r r u y Mr LYp Yr # Cv s # q s  Fv  q Ar v >r Fv &u $ Vr r [v r s  u  av s Pr Vr s r r u y Mr Ln Yr # Cv s # q s  Fv  q Ar v >r Fv &u $ lq q u $z Ln Fv )u q u x D v $ lq Ar v z Ln s  Yr  s LnLn 1 v M| q   u &z lq v t,0:14::H11:A$"":20:37 3N":PC$(3)"N":18b@16368,0:PX(36)1:K$:AK(K$):AK27ĝ:~@AK21PXXXČ1036:2@AK13E$"":J1PXXM:E$E$D$(J)::@AK8PXXMČ1008:2@AK32PXXXĝ:K$" ":@PXXX2@AK12ıA :16368,0)I&PK(16384)128:PK27198I'PK1338AI(37gI)44::(4);"RUN PATCH,D1":216,0sI*E222I+E3ĺ:(4);"RUN MENU,D1"I,4::A$"GETTING SCREEN PRINTER":B$" PLEASE WAIT ":20(A$)2:A$::20(B$)2:B$:J-:32RN TO DISK MENU"fH!16368,0:16384,128:PK(16384)176:34,0:32,0:35,24:33,40:EPK:E1E333sH"E142H#32,0:34,0:E142H$45 I%:32,0:4::A$" TURN DISK OVER ":B$"HIT RETURN WHEN READY":20(A$)2:A$::20(B$)2:B$ THE INTERFACE LIST. IT":"IS THE APPLE IIC SERIAL PORT.":16368,0:16384,128:PK(16384)128:PK2729uG:19H 8:1:9:32,8::(91);"1";(93);::" PRINT CHART":::(91);"2";(93);::" SEE INSTRUCTIONS"::::(91);"3";(93);::" RETUCE IS NOT ON OUR LIST, PRETEND"::"YOU HAVE AN EPSON MX80 OR FX-80 AND/OR"::"AN APPLE PARALLEL OR GRAPPLER INTERFACE.":16368,0:16384,128:PK(16384)128:PK2728kG::11:::"APPLE IIC USERS:";::" YOUR PRINTER INTERFACE":"IS AT THE TOP OF:::"THIS PROGRAM SUPPORTS 50 DIFFERENT DOT-"::"MATRIX PRINTERS, AND 60 TYPES OF"E:"PRINTER INTERFACE CARDS.":16368,0:16384,128:PK(16384)128:PK2723E:VV11:29F:11::"UNLISTED PRINTER:";::" IF YOUR PRINTER OR"::"INTERFAR THE LAST"::"PRINTING. THEN TURN IT ON AGAIN."gD16368,0:16384,128:PK(16384)128:PK2719qD34,7UE:VV2:"TO USE THIS PROGRAM TO PRINT YOUR CHARTS":"ON THE PRINTER YOU MUST HAVE A PRINTER"::"WITH GRAPHICS CAPABILITIES (MOST DO).":((40LA)2):A$:5:((40LA)2):LA):UCA$" CHART PRINTER ":H14:20:216,0:^C:12D:A$" INSTRUCTIONS ":H6:20::32,0:VV11:1:VV:"TURN PRINTER OFF BEFORE PRINTING"::"TO CLEAR IT OF ANY LINGERING CONTROL"::"PARAMETERS EXISTING AFTEBDN(E$):DN1DN2ĝ:15aB34,0:::::(4);"CATALOG,D"(DN):16368,0:16384,128:134wBD$(25)::D$(4)B::21:32*C1::J138:"*";::J1H:"*";::39::"*"::J139:"*";:::4:2:36)::LA(A$):3:((40LA)2):LA):4:D$(PXXM1)K$::K$;:27A J125:D$(J)""::E$"":A 12:1::"WANT TO SEE CHART LIST ? ";:10:XM26:XX26:2:AK2732A E$(E$,1):E$"N"E$"Y"11A E$"N"ė:134AA17:1:"WHICH DRIVE (1 OR 2) ? ";:10:XM24:XX24:2:AK27ı 1@34999:PC$(1)"D":PC$(2)"N":PC$(3)"N":18b@16368,0:PX(36)1:K$:AK(K$):AK27ĝ:~@AK21PXXXČ1036:2@AK13E$"":J1PXXM:E$E$D$(J)::@AK8PXXMČ1008:2@AK32PXXXĝ:K$" ":@PXXX2@AK12ıA      f (LQ g j (al LYP i e f k D i LyP ui h i g '_ f h $LP j f h h f h $ e k D i al LP Jj f h h Q h +k 3f (LQ h 6f g f 4h h  "k T i g ui 0f # ri h  i T ?i g i h h }g ph f i f g f # g g f i 0f # i h A f j $LN f $ fL$L f i $ e k D i $al Le Oh h $al LGM ui h ph f ph Lh h 0f # g h  dh T g  f i $ e [h mh $al LeL f  h Lh Oh h $LyL f  ph Xh yh > h ] yh D u h n f nj LL )j e f f i $L$L f i $LL i f f h $ e k D i al   l   vk > dh T k > dh T k > dh T Ok > dh TLV X Fk LqKERASE PRESENT SCREEN ? YK  ph g k > dh T yh D u h n bg mh (LK eg j  e eg j al L>A IV h g g LV X IV ?i g h A vk > dh T X Hi  LJBLOAD LJ ,A$2000,D J 5 Bl  J  l g0V$(J,K)"":M1LL(J,K):AK(F(J1)40(K1)12M):D$(AK):V$(J,K)V$(J,K)D$:u`K:J:NY$(NY):MX$(MX):`@9000:VC01`J99:11:A$"PLEASE WAIT":20(A$)2:A$:134`T14`(#VC0:J1NY:(V$(J,1))0JNY:VC1`2#3a<#VC0ė:11)15K):D$(AK):SL$(J)SL$(J)D$:_J:CB360:J1NY:L(J)(CJ)::DC5:J1NY:NAM$(J)"":L(J)0āK1L(J):AK(D(J1)25K):D$(AK):NAM$(J)NAM$(J)D$:U`:ED100:J1MX:K1NY:LL(J,K)(E(J1)3K):::FE100:J1MX:K1NY:LL(J,K)EE0Ģ11:A$"NO DATA IN MEMORY":20(A$)2:A$:J11500::99:3V^PO1:35999,1:|^216,0:A6591:(A)6(A3)31ı^(A)0(A391)30ı$_MX(A):NY(A1):XX1:J1MX:L(J)(A2J)::BA30:J1MX:SL$(J)"":L(J)0āK1L(J):AK(B(JK(D$):D(J1)25K,AK:]J:ED100:J1MX:K1NY:LL(J,K)(V$(J,K)):E(J1)3K,LL(J,K):::FE100:J1MX:K1NY:LL(J,K)0āM1LL(J,K):D$(V$(J,K),M,1):AK(D$):F(J1)40(K1)12M,AK:]K:J:EE0:J1NY:(V$(J,1))0EE1B^:116\A6591:A,MX:A1,NY:J1MX:L(J)(SL$(J)):A2J,L(J)::A2,N:BA30:J1MX:L(J)0āK1L(J):D$(SL$(J),K,1):AK(D$):B(J1)15K,AK:]J:CB360:J1NY:L(NAM$(J)):CJ,L:L(J)L::DC5:J1NY:L(J)0āK1L(J):D$(NAM$(J),K,1):AHH(M):100:SL$(M)X$:BK1Č1008:PXHH(M)Č1008~[BK1(X$,1)" "L1X$(X$,L):LL1:1036:".";:1008:1008:130[BK1K$" "(P1PL)X$(X$,P1)(X$,LP):NAM$(M)X$:VV(M):HH(M):X$".";:VV(M):XMP1[SL$(M)X$:BK1BK0\MM1:VV(M):HH(M):116AK21PXXM1Č1036:57L?AK1147L@AK10AK13ĢVV(6):XMLA(AK48AK57)AK3257LBPXXM157MCK$;:X$MX$:L(X$):216:MX$X$:MX(MX$):BKN3SY$"MON"LK7213:N$E$:N(N$):VV(5):28::E$::N4ĢVV(8):3:36)K8:VV(6):11:B$"NUMBER OF "Y$(N)"S (1-24): ":L(B$):HN:B$MX$" ";:HNL:XMHNL:XXXM1K916368,0:PX(36)1:K$:AK(K$):AK127AK32:K$" ":BK1L:AK27İ2::WJ/VV(5):12:"SELECT NUMBER: "N$;:HN7:VV(5)1:12:"-----------------":213J0VV(5):28:16368,0:E$:AK(E$):AK27İ223:24J1AK13AK1056J2(E$)0(E$)448J3N(E$)::N1N448J4N1SY$"1980"J5N2SY$"JAN" K6YEAR":Y$(2)"MONTH":Y$(3)"DAY":Y$(4)"OTHER":HT6:HS23:VV6:VV(1)VV2:VV(3)VV(1):VV(2)VV4:VV(4)VV(2):HH(1)HT:HH(2)HT:HH(3)HS:HH(4)HS:VV(5)VV(4)3:VV(6)VV(5)4:VV(7)VV(6)2:VV(8)VV(7)2J.J14::VV(J):HH(J):(91);J;(93);::" ";Y$(J)(4);"RUN SLOW BAR,D1"7H+AK6ĺ:(4);"RUN MENU,D1"H,216,0:212:11:A$"PUT ALPHACHART! IN DRIVE ONE":B$"PRESS RETURN WHEN READY":20(A$)2:A$:13:20(B$)2:B$:16368,0:16384,128:212:24I-A$" LABELS AT BOTTOM OF BARS ":211::Y$(1)"C$(AK):J1500:dG$AK1āJ1MX:SL$(J)"":K1NY:V$(J,K)"":::K1NY:NAM$(K)""::223:45xG%AK2İ223:126G&AK3AK4164G'AK5İ223:A$"PLEASE WAIT":11:20(A$)2:A$G(AK5İ246G)AKAS:44H*38399,222:AK5Ĺ38399,222::2AK4AK5)BB0G$"NO DATA IN MEMORY":VV(AK):HT5::G$:K11000:::VV(AK):HT5:L(Q$(AK))F!(AK2AK4AK5)BB0ĺ(Q$(AK),L5)" ":27F"AK(C$)CK(C$):VV(CK):HT5::LC$G#VV(AK):HT5::L(Q$(AK)):LC$(Q$(AK),L5):LC$::.EVV(6)3:HT5:"SELECTION: "C$;:1008cE16368,0:K$:AK(K$):AKAK48:AK35AK(C$){EASAK:AK1AK628E:K$;::BB0(AK2AK4AK5)āJ1MX:K1NY:(V$(J,K))0GG1:JMX:KNYEBB0(AK2AK4AK5)Ă::GG1BB1eF (AK1:Q$(1)"(1) ENTER NEW DATA":Q$(2)"(2) SEE PRESENT DATA":Q$(3)"(3) GET OLD DATA":Q$(4)"(4) SAVE PRESENT DATA":Q$(5)"(5) DRAW BAR CHART":Q$(6)"(6) RETURN TO DISK MENU":HT10:VV6:J16:VV(J)VV2J:D8000E:CK(C$):VV(CK):HT5:LC$:8AK21AK13)7HCAK13AK11E$"":J1XXXM1:E$E$D$(J)::tCAK32PXXXĝ:" ";:D$(PXXM1)" ":7CPXXX7CPXXM11127CPXXM1187CD$(PXXM1)K$:K$;:7CV3:G1:H23:A$"":163DA$" BAR CHART MAIN MENU ":2197AKAK32:K$(AK)RB AK95PXXMK$" ":D$(PXXM1)K$:K$;:1008:1008:7cB AK10AK13qB AK1117B AK21PXXXČ1036:7B AK8PXXMČ1008:7BAK8ıBNUM1(K$)0AK32AK13K$"0"7CNF1(AK46AK57)(AK32AK38394,123:16368,0:M11000:(16384)128M20009A~A(38397)123:250:V3:G1:H23:A$"":163:223:38397,222:126A(38398)123V3:G1:H23:A$"":163:AK1:38398,222:36A:23A16368,0:PX(36)1:K$:AK(K$):AK27ĝ:BAKH9@34,0:32,0:33,40::38396,123:38380:38399,222:C$"1":LC$"ENTER NEW DATA":D$(25),V$(24,3),LB$(24,3),RB$(24,3),SL$(24),SN(24,3):L(24),LL(24,3):VV(24),HH(24):DN$"2":DN2:NY$"1":NY1:MX$"6":MX6:SY$"1979":N$"1":N1:(38394)12343A256:                e f h f 9f A f D h (LV f  ?f  f yh D u h n f nj LJW )j e f f wj $ e k D i $al LW h f ph f fQ k > dh TLL f wj $ e k D k $al LW h f Jj ng R h 6f  dh TLL f \j LZX k D k $ i e  f ?f g  dh T k > dh T k > dh T Ok > dh T` ui f k D i $LV ph f k > dh T f  ?f  f ph Lh k D i LV ui h IV 5g i $LV XL>A yh h i # g h T ph f h 6f T fQ` f wj $LT h 4k c h i # g h ;.MI)>?---5???-M ->;.MI)>?---??II --???-M ->;.MI)>?---->??NI)>ۛmI 5??---??II J:7->J:7->IJ:7->J:7->woJ >-M????----5????->II---5???*--->???JIIJI7-????.----????NI-7I --???-M ->;NIIII --???-M ->;NII5?--5??wI->ۛmI 5??---??II III5?-5??- 5;-M)>7----5????wI 575I-----5????757mI???7----?5*MI)>?---??II --???-M ->;.>. --????.mI->;.MI)>?---??II -----5????wII)>-?-?-7575II --???w--?----?--m)M۷IIJ 575----5????wI575II ?7-5?.o -->?JIJ:7->IIII5555555II --???-M)->?7m m57m)M5;7mm 57-mI5?;?---??II I 5?7-575757575*-->??VII- --???-M ->;.MI)>-?-?-?----5????m)>7m)>*---->????Nm)>*---->????Nm)>7m)>߷II II5*--5???7m57---???Nm5---???N)>VI))m 5;?7mm5??- 55m?m-->m)-?;VII -??7m)>7m-?7->?- m >7mI->?;.-- ->;?VII )?7-5?.RI 575757575w w575757575IRRIm)M` d0[8HVcx;f2o +h=`Ib([ , i  ; i  N u 2 _ o ! L y &F~!3`RI575757575*>Vmm)>7m)>߷JI       h  j L&\ TEXT TYPER INSTRUCTIONS  \  h  j  k  s s j  h Lh\CHANGE POSITION X\  i Jg a l  wL\ ARROW KEYS \  s s L\ERASE \  i Jg a l  wL\ DELETE \  sL\ OR \  wL] SPAC g f f mh ( e k D k $al L+[ ph f f g ( e k D i $al LT[ g f f &j $ e k D i $al L[ ph f fQ h  f &j $ e k D k $al L[ ph f Jj ng [R h  f  ?f  f k > dh TLV X w h  j  k pLdpLdpLdpL pLdpLdpLdpLdpL pLdpLdpLdpL pLdpLdpL pLdpLdpLd 9000:&:(4);"RUN HELLO,D1"M(#NS8192:NE16383:OS16384:OE245752#NOS:LOC60:9050:NOE:LOC62:9050:NNS:LOC66:9050<#768,160:769,0:770,76:771,44:772,254:768:Z#LOC,N(N256)256:LOC1,(N256): S |\Ld|aLd|fLd|kLd|pLd|uLd|zLd|Ld|Ld|LdpbL pdL pfLdpkLdppL prL ptLdpyLdp~L pLd|Ld| Ld|Ld|Ld|Ld| Ld|%Ld|*Ld|/Ld|4Ld|9Ld|>Ld|CLd|HLd|MLd|RLd|WLdLd{Ld{Ld{Ld{Ld{Ld{Ld{Ld{Ld{Ld{Ld{Ld{Ld{Ld{Ld{Ld{Ld|Ld{XLd{]Ld{bLd{gLd{lLd{qLd{vLd{{Ld{Ld{Ld{Ld{Ld{Ld{Ld{Ld{Ld{Ld{{Ld{Ld{ Ld{Ld{Ld{Ld{!Ld{&Ld{+Ld{0Ld{5Ld{:Ld{?Ld{DLd{ILd{NLd{SLd1:A$"NO DATA IN MEMORY":B$"PLEASE PRESS "?a>#VC1ıeaA#20(A$)2:A$::20(B$)2:B$aF#16368,0:16384,128:C3:A$"":50AA$" PIE CHART MAIN MENU ":98:Q$(1)"(1) ENTER NEW DATA":Q$(2)"(2) SEE PRESENT DATA":Q$(3)"(3) GET OL#V:"WARNING: IN THE FORMAT YOU'VE CHOSEN"[v<#:"FOR THE CHART, THE BAR WIDTHS WILL BE"vF#:"QUITE SMALL. IF THE CHART IS NOT"vP#:"ACCEPTABLE, YOU WILL NEED TO REDUCE "vZ#:"THE NUMBER OF DATA POINTS, OR CHANGE"vd#:"THE CHART FORMAT."w y 8   8   8   8  { 8   8   8   8  W 8L 8L 8L 8   8L 8   8L 8  ă 8L 8  ܃ 8L q;Ldq@L qBLdqGLdqLLdqQL qSL qUL qWL qYL q[L 8  |8  | 8  | 8  } 8  S} 8  } 8  } 8  } 8  /~ 8  f~ 8  ~ 8  ~ 8   8  B 8 pLdpLdpL pL pLdpLdpL pLdpL pLdpLdqL qLdq LdqLdqL qLdqL qL qLdq$Ldq)Ldq.L q0L q2L q4L q6LdlLdlLdlLdlLdlLdlLdlLdlLdlLdlLdmLdmLdm LdmLdmLdmLdm$Ldm)Ldm.LdlpLdluLdlzLdlLdlLdlLdlLdlLdlLdlLdlLdlLdlLdlLdlLdlLdlLdlLd(0x<h(4@0B>2r*?(? ? ?.*h??laLdlfLdlkLd.l 5 c Ld Wl 0l` ,g e Lbd h m f #g  L dh T h > dh T h > k T -i > k T X` `i D n c Yg h )g f h g $Lc .l 5 Wl  0l` ,g e $ e f h $al Lc Wl 0l` ,g e $Lc h e .l  Wl  0l` ,g h $Lc h e .l  Wl  0l`Lc a l h l Mg  Lb. l 5 b  l 1 ` k > dh T c Fk LbbPUT ALPHACHART! IN DRIVE ONE Eb lLbPRESS RETURN WHEN READY mb &l l  n c h i i  l  mk  $l  n c h i i  $l  k > dh T yh > h ] c "h mh` l k  l  k  $l  k > dh T yh > h ]L>A k > dh T h g 7_L?J w ak Bm k  Lra* pa  1 h Bm k  La* a  s h  wLa* a  1 ak Bm k  La* a  1 ` h  dh T yh > h ]L>A f mh $ e f 2j  e f >j (fl al Lc_ 5j e f` f mh $ e f &j $al L_ ?f g  dh TL_UNDEFINED ERROR MENU ]  i Jg a l  wL(^ ESC KEY ^  s l  Lj^$IF YOU HAVE JUST CREATED A CHART, IT E^  L^%IS NOT NECESSARY TO GET IT FROM DISK. {^  L^&SIMPLY CHOOSE 'SEE PRESENT CHART' FROM ^  L^THE FOLLOWING MENEBAR \  s L]CHANGE ]  wL-]S +]  sL?]IZE ;]  i Jg a l  wLh] CONTROL-S \]  s L]CHANGE CURSOR |]  wL]T ]  sL]RAVEL ]  i Jg a l  wL] CONTROL-T ]  s L^RETURN TO TYPER:32,0:45N159:32,3:VT:1::"ANOTHER BONUS!";::" WE SELL TWO OTHER"::"CHART PROGRAMS FOR $29.95 EACH."::"THESE ARE DESCRIBED NEAR THE BACK"::"OF THE MANUAL. BUT IF YOU ACCEPT"yO2:"THE $29.95 OFFER ON THE PREVIOUS"::"SCREEN, YOU MAY LPHACHART!, WE"::"WILL GIVE YOU ANY ONE OF THE"::"SIXTEEN GENERAL-USE PROGRAM DISKS" N0:"WHICH ARE LISTED IN THE BACK OF"::"THE MANUAL. EACH DISK IS PACKED"::"WITH USEFUL AND UNIQUE PROGRAMS.":58:16368,0:16384,128:PK(16384)128:PK27U PLEASE SEND IT BACK AS SOON"::"AS POSSIBLE, AS YOU PROMISED?":::"THANK YOU FOR TREATING US FAIRLY.":16368,0:58:16384,128:PK(16384)128:PK27ė:32,0:G1:14XM/59::VT:1::"FREE!";::" AS A BONUS FOR PAYMENT OF"::"JUST $29.95 FOR A((40LA)2)1:LA):%K+216,0:37?K,VT8:16368,0:VT:1K-59:32,3:VT4:VT:1:32,3::"THIS IS A FULLY OPERATING DISK."::"IT IS NOT A DEMO. PLEASE FEEL"::"FREE TO TEST IT AT YOUR LEISURE."::"IF YOU DECIDE NOT TO BUY IT, WILL"L.:"YOJ$J13000:::VT19!J%600*J&43PJ'11::(4);"RUN DEMO PATCH,D1":gJ(:(4);"RUN MENU"J)G::J138:"*";::J1H:"*";::39::"*"::J139:"*";::VG:2:LA(A$)K*VG1:((40LA)2)1:LA):VG:((40LA)2)1:A$:VG1:59::35J#A$" SEE SAMPLE CHARTS "::G1:LA(A$):32,0:42:::32,3:8:"THIS SLIDE SHOW DISPLAYS SAMPLE"::"CHARTS MADE BY ALPHACHART! AND"::"OUR OTHER TWO CHART PROGRAMS:"::"CURVEPLOTTER!, AND 3DCHART!. THE"::"SHOW LASTS ABOUT 150 SECONDS."0ĺ:21(B$)2:B$8H(769)1ĢVT3:HT1::"2";:dH32,2:VT6:::HT5:"WHICH NUMBER?";H16368,0:16384,128:PK(16384)128:PK49PK50PK51PK1329HK$(PK):PK13(780)5K$"2"H700H K$"2"40H!K$"3"ī44 I""("(J)")"A$(J)::VX1:C$"1":(780)5Ĺ769,1:27cG769,CX:CX1:(769)0ĢVTVX:HT1::C$;:G(769)0ĢVV:2:A$".....................................":A$::A$"FIRST-TIME USERS SHOULD":B$"SELECT OPTION NUMBER (1)":21(A$)2:A$H(769)PK1PK35İ59::44+FHH2:H23::44cF8:38:" ":A$" ALPHACHART! "::LA(A$):G1:42:2G:A$(1)" SEE EXAMPLE CHARTS":A$(2)" RUN SAMPLE PROGRAM":A$(3)" SEE ORDERING INFO":A$(2)" GO TO MAIN PROGRAM":VT08:HT9:VT:J13::HT:VV18:(D$)2:D$NE16368,0:16384,128:PK(16384)176:PK35PK1PK216bEPK1PK3520EPK2Ĺ32,0:35,24::A$" RUNNING MAIN PROGRAM ":12:LA(A$):20LA2::A$E11:20LA2:LA):13:20LA2:LA)::PK2ĺ:(4);"RUN MENU,D1"FAM":C$"FIRST-TIME USERS SHOULD":D$"SELECT OPTION NUMBER (1)":E$"WHICH NUMBER ?":VV11:HH8 EVV:HH:"(";::"1";::") READ INTRODUCTION":VV2:HH:B$:::HH5:E$:A$".....................................":18:2:A$:20:21(C$)2:C$:22:21H8:22:H:"(PRESS ";::"RETURN";::" TO BEGIN)":16368,0gC J11200:PK(16384):PK128J1200xC :59::500]D32,0:33,40:34,0:A$" ALPHACHART! ":G3::LA(A$):A$" ALPHACHART! ":42::A$"(1) READ INTRODUCTION":B$"(2) GO TO MAIN PROGR"BY JOSEPH F. ALWARD":20(A$)2:A$:VV3:HT:A$"COPYRIGHT (C) 1983":20(A$)21:A$=C VV6:A$"SPECTRAL GRAPHICS SOFTWARE":HT9:A$:VV8:A$"6333 PACIFIC AVENUE, SUITE 256":HT11:A$:VV10:A$"STOCKTON, CALIFORNIA 95207":HT9:A$:20:2:R$:XMČ1008:3;AAK32PXXXĝ:" ";:D$(PXXM1)" "::3HAPXXX3eA D$(PXXM1)K$::K$;:3ZB :G1:H23:A$"":V3:41:3::A$" ALPHACHART! ":LA(A$):(40LA)2:4G:A$::HH(40LA)2:3G::HH:LA):5G:HH:LA)::G1:VV8:HT16:VV1:A$@(780)560y@16368,0:38399:35,24:J137:R$R$"."::1:3:0:::D$(4):TX38:TY55:D$(4):16302,0:10@16368,0:PX(36)1:K$:AK(K$):AK27ĝ:@AK21PXXXČ1036:3@AK13E$"":J1PXXM:E$E$D$(J):: AAK8PX             'v 8  ^v 8vL 8  v8vL 8  v 8  v 8vL 8  v vL 8  v8wL 8  w 8  w 8w6L 8  8w wHL 8  Jw jL jLdjLdj"L j$Ldj)Ldj.Ldj3L j5Ldj:L jLdjCLdjHL jJL jLLdjQL jSLdjXLdj]LdjbL jdL jfL jhL jjL 8  s 8  3t8 iLdiLdiLdiLdiLdiLdiLdiLdiLdiLdiLdiLdiLdiLdiLdiLdiLdiLdiLdiLdiL iLdjLdjLdj LdjLdjL LdiDL iFLdiKL iML iOL iQL iSLdiXLdi]L i_LdidLdiiL ikLdipLdiuLdizLdiLdiL iLdiLdiLdsLdsLdsLdsLdsLdsLdsLdsLdsLdsLdsLdsLdsLdsLdsLdsLdsLdsLds>LdsCLdsHLdsMLdsRLdsWLds\LdsaLdsfLdskLdspLdsuLdszLdsLdsLdsLdsLdsLdsLdrLdrLdrLdrLdrLdrLdsLdsLds LdsLdsLdsLds Lds%Lds*Lds/Lds4Lds9LdsrLdrLdrLdrLdrLdrLdrLdrLdrLdrLdrLdrLdrLdrLdrLdrLdrLdrLd (\g*p8>?h  ?? {|{rXLdr]LdrbLdrgLdrlLdrqLdrvLdr{LdrLdrLd o s o k   m o n  go 2n n @o n  n do 1 `Lc@@@@ @` 0@P`p@ (08HPXhpx m n  nn vo c n 1 j k  xj n o $Xr L@i yo 6m o |l j r o Lih o 6m o |l 9m  m  8n m  nn Gn  n n  n m  8n l  o s yo k   m do n  Co 2n n n  n @o 1 j r ` yo 6m o |l j r o L+g o 6m o |l 9m  m  nn Gn  n }n  n cm  m m  nn l  4o s Co m   cm n  go m c n m n  nn @o c n 1 j r  Uo s go m   cm n  o m c n o Lf o 6m o |l 9m  m  8n -m  m cm  m m  nn m  8n l  4o s Co k   -m n  Co m m n  8n @o 1 j r  o l go l s go k c l   -m n  go m m n  8n do 1 m o $  k 1 `Le )n r e ` j p Lje )n r  n >k c go i Cl }k  (l k  (l vo [l  )n r  n dl 4o s gl   )n r n  4o 4 %r  n 4l Co n >k Cl vo l 7l  l  (l m m p 1 ` yo 6m o |l j r nk qk )n Mr r d go >k n qk 1 o 6m q > o T ;q > +o T p > 4o T "o > o T q A q T q  q A q T o  LdRUN SLOW BAR,D1 d  Ld r 5 d ` 4o s j   r n  4o 4 %r  n 4l Co n k nk n 7l  n  Uo  tk n  _k k 1 1 Lc yo 6m )n r o LDc o 6m 9m  tk  k tk o  k tk o  o k tk  o k tk  k )n r  o s p   tk do n  go k tk do n  o k 1 o  )n Mr  n j yo >k):25H"AK13M967+H#AK10AK1324RH$AK11M1MM1:VV(M):H(M):25`H%AK1125nH&AK2125zH'M445H(PX3525H)AK95AK32:K$" ":BK1H*K$;:X$T$(M):XMH(M):XXXM21:L(X$):124:BK1İ139H+T$(M)X$:BK1BK0I,251GK$:AK(K$):AK2774:GAK97AKAK32:K$(K$)OGPX(36):M432]GAK2139{GAK8PXH(M)Č1008:25GAK21PXH(M)19Č1036:25GAK21ĖH(M):25G (AK10AK13)M9MM1:VV(M):H(M):25H!AK8M1MM1:VV(M):H(MPECTIVE (0-4).......":3:W$WW$:VV13:3:W$"COLOR OR B&W (C/B).........":W$COL$:VV15:3:"FRAME TITLE (Y/N).........."FR$:VV17:3:"SLICE/TABLE LABEL (S/T)...."AS$:VV19:3:"PERCENT/VALUE/NO (P/V/N)..."GD$:16368,0GVV3:16:16368,0:M$E$"."::HT37EVV3:W$"TOP TITLES: "E$:HT(W$):W$:VV3:HT21:T$(1):VV5:W$E$:HT(W$):W$:VV5:HT21:T$(2):VV7:W$"BOTTOM: "E$:HT(W$):W$:VV7:HT21:T$(3):VV9:W$E$:HT(W$):W$:VV9:HT21:T$(4)FVV11:W$"3D PERSD38399,222:::A$"":G1:V3:H23:122::138E:VV3:VV(1)8:VV(2)10:VV(3)12:VV(4)14:VV(5)16:VV(6)18:VV(7)20:VV(8)22:J18:VV(J)VV(J)2::VV(9)22:HB30:H(1)16:H(2)16:H(3)16:H(4)16:H(5)HB:H(6)HB:H(7)HB:H(8)HB:H(9)HB:E$"":J121:EDD$"MONTH":SI$"1":19bCK1NB:MAX0:MIN1E9:J1NY:V(J,K)(V$(J,K)):V(J,K)MAXMAXV(J,K)|CV(J,K)MIMINV(J,K)CVSAV(J,K)V(J,K):::SIDE1ıCMAX0:J1NY:SUM0:K1NB:SUMSUMV(J,K)::SUMMAXMAXSUMC:C(38399)1237509)12310nBJ14:ADHM10(J1)22:L(AD):L20L0T$(J)"":K1L:AK(ADK):D$(AK):T$(J)T$(J)D$:tB B ::VA10:TW5:T2:WW00:FT2:WW0T0B WW$"0":H30:(HM5)5H3(HM5):WW$(H3)B WW0T0C TS5:HB20:LB13:HC10:LC7:J130:AA$AA$"."::DR$"2":DR2:133:NBNY:NB$(NB):NYMX:J1MX:V(J,1)(V$(J,1))::SUM0:J1MX:SUMSUMV(J,1)::J1MX:V(J,1)V(J,1)SUM100:V$(V(J,1)):V$(V$,4):V(J,1)(V$)::COL$"B&W":CC0:(HM2)1COL$"COLOR" BSTACK0:SIDE1:(38398@37600:HM38099:CH1:(38393)124CH6:38393,222p@0:1:SS0:AS$"TABLE":SS(HM4):SS1AS$"SLICE"@GD$"NO":GD3:(HM3)1GD1:GD$"PERCENT"@FR$"FRAME":FR1:(HM3)2GD2:GD$"VALUE"@(HM1)0FR0:FR$"NO FRAME"AAA$"":!!! ! ! ! ! !!!!!!!!!"""   ?M%R#/6O?I [emu~ $+:>AE3GU\gq{ #-:BOVcp|.<o%$?N:'$$)6o%$$;6-%?6 #$, $ -56d-@j@@6e$$ -o$,- ,-5o%<#$d-5 $$$36-6o$$< $$$M-'$$4 $$$666$$$$$$$$ -6 $$$-?$$$?M5#$JMb$$4 $$36v$$$366f 4  v.$d v-' o $?766.@@2@e$ -?M ? -5e$AE3GU\gq{ #-:BOVcp|.<o%$?N:'$$)6o%$$;6-%?6 #$, $ -56    L ,-` Leh8PhHQH`hbihciHHb\ȱb]`ߚl hhHHHH`L⥠`ʆ  hdheHdHHHH08  X Xhdhe + eHdHHHeHdH`   q% 0 L0`,wyywxzzx,Hyw wȄffȪ yw fh0`h&Hwyxzwy wy h Lh` ` ` ` 憅` ` ᥠQP` L  8e`LԩLcغh8uhHvH` L L L~ 憅 L ʊ8$!  W$Li)$` LY L   hPhQP 8ePQiHHš`hh PȱPʘHH` ,խwqq膸 J즸 , hhlP,q`h8uhv] :  ڢ hgʆbcb KLf/q ߠ :۩q` S0 L,Hh*Mȱڦhwx%ȱH J hwУ8 ewwx𴰺 抦5?wtsʆwx8dedЕБt Z Z ,խvqq ", ȹ,ȹ ,W,qewix8 Z ZCBw U  yUUwyVxz`ЗПwyxz`ywzx`GH o8 UpVUVƠ UVUʆoph3]eФk ЮU 4Г U 5,wЅƩѤ wU! 5Bē唐\tsʆbc83o񁪥pTopȆbcĂbUVdf0Ѓe8oph0L8 MLh8HH`BUUȥViлh8HH`З{y SՠUEowyywxzzxwIy:e \`hH,Hops8otpf,k8UlV*U$f&łkUŁdbUȥcUUŭSVŮKsłEUŁ< UV0ЅUŕȱU喰!0UUdUV0+UiUVmVn̢͊wUV0ЦyyUUݤh.QP$  e LWHhL:5~    eȱeLaL LRwwxȆwxwHw Jhw`w5U,w`,hbhcbwȱbxcȘHH`wȄ wep`0CBe]Q=b`LicbbbE0`Ġ``MMLeڢD ! SL3LH h%LddЉ`?0 HH chh ޥ Yަ`н  eE   ࠰>Ffee0  &ߢEX$ƫv` ꥪLYDcbbwyȱbxz`ݥܦL+3UV UwȱUx`wUȥxU`Ncbbȱb`cbbȥb`cbbȱb8塅堅PEncbbȱbe HH`0S,,hdehUhVhhHHU hehHehUU HHk`UiȱUiuкe& & &eeHHqUȥqUeFdO݅܆`ycbbȱbƫ8pM䡥UȥUU +뺠ЧUV욥VHUHthhЁ HHf ㈱ۺQi e 纼 +뺊i  e HH`iiiHH`(bcbebbePE1b]  0  j=i<<=kbޙץ,,stHʈcbhH ʈpoophMm X RQtPsh`bhH      :VV(5):HT5::"DRAW BAR CHART":LC$"DRAW BAR CHART":>y^Gy.400CEW DATA":D$(25),V$(24,3),LB$(24,3),RB$(24,3),SL$(24),SN(24,3):L(24),LL(24,3):VV(24),HH(24):DN$"2":DN2:NY$"1":NY1:MX$"6":MX6:SY$"1979":N$"1":N1:(38394)12343A256:1MX:HH(J)H2:VV(J)VV(JM1)(1(MX14)):2xl8x@xJJ16:VV(J):HT:Q$(J)::(AK70AK102)DA1DA0:AK4:C$"4":VV(4):HT5::"SAVE PRESENT DATA":LC$"SAVE PRESENT DATA":8yTJ16:VV(J):HT:Q$(J)::(AK70AK102)DA2DA0:AK5:C$"5"x.T$(3)""T$(3)" "x."x2bx2J010:L(SC$(J)):L6VA(SC$(J)):VA(VA):SC$(J)(VA)hx2nx2T0GD0:GD$"NO GRID"@FR$"FRAME":FR1:(HM29)2GD2:GD$"SOLID"@(HM28)0FR0:FR$"NO FRAME"AAA$"":J130:AA$AA$"."::,D1"::"SAVING MENU"::(4);"UNLOCK MENU,D1":(4);"SAVE MENU":(4);"LOCK MENU":"MENU SAVED"() MAKE A BAR CHART,(2) MAKE A PIE CHART,(3) TYPE ON A CHART,(4) DRAW ON A CHART,(5) PRINT CHART,(6) GET A CHART,(7) SEE PRESENT CHART A (8) MAK" "::X$X$K$:0K=X$(X$,P1)K$(X$,LP):K>54:A$" MAKE SLIDE SHOW ":53:A$"TURN DISK OVER":B$"HIT WHEN READY":11:20(A$)2:A$:13:20(B$)2:B$K?16368,0:16384,128:63K@(16384)12827İ54:4`LA:(4);"RUN SLIDES2)1:A$:VG1:((40LA)2)1:LA)::fJ632,1:34,1:33,36:35,23::32,0:34,0:33,40:35,24:J7P(36)XM1:PL1X$X$K$:J8PLL1X$K$:J9PLX$(X$,L1)K$:J:P1X$K$(X$,L1):J;X$""X$K$:K<PLāI1PL:X$X$11A$"FILE NOT ON DISK."'I0P10ĺD$GI1P8A$A$" HIT RETURN."hI218:4:A$::P8Ģ20:4:B$I316368,0:16384,128:(16384)155İ54:3I418:4:35):20:4:35):16368,0:21*J5VG1:LA(A$)::((40LA)2)1:LA):VG:((40LA)0:44H+39H,:P(222):216,0:18:4:35):20:4:35):22:4:35):A$"UNDEFINED ERROR CONDITION.":P4A$"REMOVE WRITE PROTECT TAB."H-P8A$"INSERT DATA DISK & CLOSE DOOR.":B$"HIT RETURN WHEN READY."H.P9A$"DISK IS FULL."I/P6P!BK1(X$,1)" "L1X$(X$,L):LL1:1036:".";:1008:1008:33^G"NAM$X$:BK1BK0fG#22G$(NAM$,1)" "L1NAM$(NAM$,L):LL1:36G%40G&DN2G':(4);"BLOAD"NAM$",A$2000,D"(DN):18G(DN1DN2G)DN2DN1H*216,22!FAK21PXH120Č1036:227F(AK10AK13)37QFAK21BK1BK0:22cFPXXM2022FK$;:XMH1:X$NAM$:L(X$):55:BK1Č1008:PXH1Č1008F BK1K$" "(P1PL)X$(X$,P1)(X$,LP):NAM$X$:VV5:H1:X$".";:VV5:XMP1GGG$"."::H14(A$(3)):VV:HT:A$(1):VV4:HT:A$(3)G$:VV4:H1:NAM$WEVV4:H1EPX(36)1:K$:AK(K$):AK27İ54:4EAK97AKAK32:K$(AK)EAK95PXXM20Č1008:22EAK95PXH1AK32:BK1:K$" ":31FAK8PXH1Č1008:4,0:16302,0:16297,0:16300,0:16384,128:::3}D1::J138:"*";::J1H:"*";::39::"*"::J139:"*";:::IEA$" GET A CHART ":ASAK:54:G1:V3:H23:53:16368,0:VV10:HT4:A$(1)"TYPE CHART'S NAME":A$(3)"NAME: ":G$"":K120:G$(4)"BRUN TEXT TYPER.OBJ"AC AK3ĺ:(4);"RUN TEXT TYPER,D1"UC AK4Ĺ16368,0C AK4ĺ:(4);"BLOAD RUNTIME,D1"(13)(4)"BRUN SCENE.OBJ,D1"CAK5ĺ:(4);"RUN PRINTER,D1"CAK620CAK862CAK7Ĺ16368,04D16368,0:1630ASAK:AK1AK85IB:K$;::AK(C$)CK(C$):VV(CK):HT5::LC$BVV(AK):HT5::L(Q$(AK)):LC$(Q$(AK),L5):LC$::0:1::C$(AK):AK1ĺ:(4);"RUN ENTER,D1"B AK2ĺ:(4);"RUN PIE.CHART,D1"C AK3ĺ:(4);"BLOAD RUNTIME,D1"(13)E SLIDE SHOW:J18:Q$(J):7AV3:G1:H23:A$"":19AA$" ALPHACHART MAIN MENU ":53:HT10:VV6:J18:VV(J)VV2J::J18:VV(J):HT:Q$(J):::CK(C$):VV(CK):HT5:LC$::VV(6)3A16368,0:16384,128:AK(16384)176:AK35AK(C$)Ba @34,0:32,0:33,40:35,24::C$"1":LC$"MAKE A BAR CHART":38396,123:38380:38399,222: (1) MAKE A BAR CHART,(2) MAKE A PIE CHART,(3) TYPE ON A CHART,(4) DRAW ON A CHART,(5) PRINT CHART,(6) GET A CHART,(7) SEE PRESENT CHART A (8) MAK MANUAL TO SEE HOW TO MAKE ONE."@w32,0:33,40:34,0:35,24:wX16368,0:223:V3:G1:H23:A$" TYPE LABELS FOR BOTTOM OF BARS ":211:VV7:H19:H228:A$"":J110:A$A$"."::M2(MX2):M1MXM2:,xbJ1M1:VV(J)VVJ(1(MX14)):HH(J)H1::JM1 eL 8m[L 8m]L 8m_L 8maL 8mcL 8meL 8mgL 8  im 8mL eLdeL eL eL eL eLdeLdeL eL eL eL eL eL eL eL eLdeLdeL eL eL eL eL eL eL eL eL eL eLLdeLdeL eLde#L e%Lde*Lde/Lde4Lde9Lde>LdeCLdeHLdeMLdeRLdeWLde\LdeaLdefLdekLdepLdeuLdezLdeLdeLdeL eL dLddLddLddLddL dLddL dLddL dLddLddL dLddLddL dL dLddLddLdeLdeLde Lde"IF YOU CALL IN YOUR ORDER, PLEASE"IW*:"GIVE THE OPERATOR THE NUMBER"sW4:"THAT APPEARS ON THE BACK OF THIS"W>:"DISK."WC16368,0:16384,128:PK(16384)128:PK27ė:32,0:53WHJAK13E$"":J1PXXM:E$E$D$(J):: AAK8PX:255:VT2:18(B$)2:B$:16368,0:16384,128bVb(16384)12827Ĺ32,1::32,0:780,5::22hVlVK$"2"Ĺ32,0:33,40:34,0:35,24VK$"2"ė:11:A$" RUN MAIN PROGRAM ":L(A$):HT20L2:HT::L):12:HT:A$:13:HTVL)::#W ::m3Ldm8Ldm=LdmBLdmGLdmLLdmQLdmVLddL dLddL dL dL dL dLddL dLddL dLddL dL i#Jwn#:"PLEASE PRESS ";::"ESC";::" TO GO BACK, OR ";::"RETURN":jwx#:"TO CONTINUE.":16368,0w#PK(16384)128:PK13PK279090w#32,0:34,0:33,40:35,24::w#16368,0w#PK13126w#PK27142w'VX100000VX(VX)w'5;.MI5;.MI5?;w---5?IImI 57mI 5IIImmI 57mI 57-M -??--?w57575II-----5????wII)>-?-?-?->7----5????III--->?75757575757-->?I 5w5w5w5w5w5w5 --->?w 575757575-->?I J ?--???----;7->7->II----5????oII )?7-?RJ--->???-M I 5??---??II -----5????wI57575757575IImmI 57mI 57mI 57mI 57mI 57mI 5??---??II mmI 57mI 57mI 5wmI5wm)>w-5?w5IImmII)>7mII)>7m m 57m m 57m m 5wm-m5?w-M->IIIImI 57mI 5wmI;-5?m)ۿMI)>;.MI)>;.MI)>;.MI)>?---??II ----????.MI->;.MI)>;.MI-????.---;.>.>VIII --???-M ->;.MI)>;.MI)>;.MI)>?7m -->?;w---??VII----????.MI->;.MI)>;.MI-????.---?7m -?7mI)5III --???-M ->;.?---???NI->ۛm75757mI5??--?II mmI)>7m -?7m-??.-??. -?7m -?7mI)5III5575757575757---5???II mmII)>7-MI)5?;7-mI-5??7mm) 5;7m)-M5;?7m m 57mII)>۷IIIIM-MI5;7-mI5?7mm 57m)M5;7m m57mI-5?7mI)5?۷III --???-M ->;.MI)>;.---???III-----5????75757---->???75757----5????III-----5????75757---->???757575III --???-M ->;.>.MI??;.M)-57mI 5;w---->???VIImmI 57mI 57mI 57----5????7mI 57mI 57mI 5III--5?w575757575-5?I ---5???wI575I5?-?75*>VI J)5?.5?.m????---??-VI)I)?--??-M ->;.MI)>;.---->????.MI)>;.MI)>;VIII----????.MI->;.MI);.---????.MI->;.MI)>;.---???III --???-M ->;.>.>.>.MI)>?---??II ----????.MI->;.MI)>;.MI)>;.MI)>;.LN 'l j 'l  k T k vkLIN o  FN  o uo  o LnNBLwNBOXES o 5 lN  o  qN  LN LNLLNLINES N 5 o  N  o  N   LNCLNCIRCLES o 5 N  o  > k T n > k T`  o  k  h o  l (/p LdM o   k  k o ; o  h 'l  k T` o > k T k > k ]` n > k T o > k T n i j l $ h ?i l /p L2K j  Ni  i i l L%C  h k  m T On > k T ?o  l  Ni  i k m $LET %p  n j \m j j l  h j ak &/p  h k l $/p LF j jLR i l $ h j  k 3i k $LE El ~i 'l 0i k m $LEE i !l i l $LEE k WiLS k k $LkE l  n  l 'l k i l $ h i l /p L9[ k m $LF 'l $i 'l k k ej 'l  m T On > k T 'l i k i k k 'l .k l j l $ h ?i l /p L0D j  Ni  i tj l $LPD j  Ni  i k m $LvD 'l  m T On > k T k  k n 8 %p  n k 'l 0i =k l $LB k :kL[ X n LBPRESS TO BEGIN B o  n c ]l i m LB: o 5 B    'pLBBLBb %p 5 kLA o  A  o uo  o k k 'l  k T k  l  l  o m Ki m i k Pj 'l  k T l > =n T 0l > k T fl > co T X l  Lr@BLOAD SCENE BOXES,A34560 Y@  l  L@BLOAD CIRCLES,A35072 @  X k k k k n > k T X ol 9l c Fn i GjLUV X l IkL@4 @ o k                     20(A$)2:A$:13:20(B$)2:B$:16368,0:16384,128:132:89Xy16304,0:16297,0:16300,0:16368,0:16384,128:::75XzG::J138:"*";::J1H:"*";::39::"*"::J139:"*";::VG:2:LA(A$):LA0ı9Y{VG1:((40LA)2)1:LACH2:74-WsA$"ERROR":216,0:132:ER(222)WtA$"UNDEFINED ERROR. CHECK SYSTEM":B$"PRESS WHEN READY":ER11A$"BAD FILE NAME"WuER4A$"REMOVE WRITE-PROTECT TAB"WvER8A$"CLOSE DRIVE DOOR"WwER9A$"DISK IS FULL"BXx132:11:(NAM$)0ER11:116Vo131aVpL$(NAM$,1):LL(NAM$):L$" "L$"."NAM$(NAM$,LL1):112VqA$"SAVING "NAM$:B$"PLEASE WAIT":11:20(A$)2:A$:13:20(B$)2:B$:115Wr16383,246:(4);"BSAVE "NAM$",A$2000,L$2000,D"DR$:43624,1:212,0:K1193"UdAK8PXXMČ1008:93>UeAK21PXXXČ1036:93VUfAK8AK21ĖXM:93UgK$;:X$NAM$:L(X$):124:BK1İ139UhNAM$X$:93UiVV9:34:K$:AK(K$):AK27İ132:75UjAK1191UkAK13110UlK$"2"K$"1"105UmDR$K$Vn "DR$7T[VV6:10:M1:VV(M)VV6:H(M)10:XM10:XX33ET\16368,0fT]K$:AK(K$):AK27İ132:75T^AK97AKAK32:K$(AK)T_PX(36):AK95AK32:K$" ":BK1T`PXXXAK21103TaPXXX(AK10AK8AK13)92TbAK13AK10105UcA(A$):V3:G1::123::VV9:HT7:A$"TYPE A NAME FOR YOUR CHART":B$"YOU MUST BEGIN NAME WITH A LETTER":VV:20(A$)2:A$:VV2:20(B$)2:B$:VV6:3:A$"":J125:A$A$"."::"NAME: "A$:VV6:10:NAM$TZVV9:3:"STORE ON DISK IN DRIVE (1/2): :21*RSAKAK48:AK1AK7Ĺ16368,0:78PRTCHAK:AK7ĺ:(4);"RUN MENU,D1"^RUAK5121RVAK2ĺ:(4);"RUN PRINTER,D1"RWAK3Ĺ38398,123::(4);"RUN PIE.CHART,D1"RXAK4Ĺ38397,123::(4);"RUN PIE.CHART,D1"SY132:A$" SAVE CHART ":LA0AKCH4878.QOAK49AK55Ģ21:7:30)pQPAKCHĢVV2(CH1):12::Q$Q$(CH):L(Q$):Q$(Q$,L5):Q$QQVV14:HT21::K$;::AK49AK55ĢVV2(AK49):12::Q$Q$(AK48):L(Q$):Q$(Q$,L5):Q$:J11000:RRAK27AK49İ131:138:CC1SAVE PRESENT CHART":Q$(7)"(7) RETURN TO DISK MENU":143PMM17:VV2(M1):HT:Q$(M)::VV2(CH1):12::Q$Q$(CH):L(Q$):Q$(Q$,L5):Q$::VV14:HT5:"SELECT NUMBER: ";:CH;:1008:16368,0QNK$:AK(K$):AKAK(CH48AK)(AK13):(K$):V3:G1:LA(A$)::123:76COKA$" PIE CHART ":G1:V3:H23:122:PLVV8:HT7::Q$(1)"(1) CHANGE CHART STYLE":Q$(2)"(2) PRINT CHART ON PRINTER":Q$(3)"(3) ENTER NEW DATA":Q$(4)"(4) CHANGE PRESENT DATA":Q$(5)"(5) SEE PRESENT CHART":Q$(6)"(6) ADD200:J0NY:L(V$(J1,1)):ADJ10,L:L073lNHK1L:D$(V$(J1,1),K,1):AK(D$):ADJ10K,AK::NI34213::(4);"BLOAD RUNTIME,D1"(13)(4);"BRUN FAST PIE.OBJ,D1":131:11:A$"PLEASE WAIT":20(A$)2:A$:::75OJ131:A$" PIE CHART "D1,FR:D2,CC:D3,GD:D4,SS:D5,H3:J14:L(T$(J)):ADD10(J1)22:AD,L:L069MDK1L:D$(T$(J),K,1):AK(D$):ADK,AK:ME:ADD100:J1NY:L(BL$(J)):AD(J1)16,L:L071MFK1L:D$(BL$(J),K,1):AK(D$):AD(J1)16K,AK:2NG:$"NO ":VV(9):H(9):GD$:VV(9):H(9):GD3:25uL@K$"V"GD$"VALUE ":VV(9):H(9):GD$:VV(9):H(9):GD2:25LAK$"P"GD$"PERCENT":VV(9):H(9):GD$:VV(9):H(9):GD1:25LBK$;:25WMC:11:A$"PLEASE WAIT":20(A$)2:A$:14:DHM:D,NY:7:VV(7):H(7):FR$:VV(8):H(8):M8:25tK;M8K$"S"AS$"SLICE":SS1:M8:VV(8):H(8):AS$:VV(9):H(9):M9:25K<M8K$"T"AS$"TABLE":SS0:M8:VV(8):H(8):AS$:VV(9):H(9):M9:25K=M9K$"V"K$"P"K$"N"25K>M9663L?K$"N"GD"C"COL$"COLOR":CC1:VV(6):H(6)::"COLOR"::M7:VV(7):H(7):25hJ7M7K$"N"K$"Y"K$"F"25J8M8K$"S"K$"T"25J9M7K$"Y"K$"F"FR$"FRAME":VV(7):H(7):FR$" ":FR1:VV(8):M8:H(8):25(K:M7K$"N"FR$"NO FRAME":FR0:M#I-M5WW(K$):K$"0"WW0250I.M551AI/M5WW425QI0WW0TFT_I1WW0T0I2K$;:AK13:WW$(WW):H3WW:32I3M6K$"B"K$"C"25I4M655I5K$"B"COL$"B&W":CC0:VV(6):H(6)::"B&W "::M7:VV(7):H(7):25DJ6K$` ;-_" """""""""%,18AL$ 3456789LLLL`ª`LQLY8LXLeL" K1L(J):AK(B(J1)15K):D$(AK):BL$(J)BL$(J)D$:[J:CB360:J1NY:L(J)(CJ)::DC5:J1NY:NAM$(J)"":L(J)0āK1L(J):AK(D(J1)25K):D$(AK):NAM$(J)NAM$(J)D$:i\:ED100:J1MX:K1NY:LL(J,K)(E(J1)3K):::FE100:J1):?Z32,1:34,1:33,36:35,23::32,0:34,0:33,40:35,24:{Z32,1:33,35:34,6:35,23::32,0:33,40:34,0:35,24:Z216,0:A6591:(A)24(A1)3ı8[MX(A):NY(A1):N(A2):XX1:J1MX:L(J)(A2J)::BA30:J1MX:BL$(J)"":L(J)0):VG:((40LA)2)1:A$:VG1:((40LA)2)1:LA):\Y|P(36)XM1:PL1X$X$K$:qY}PLL1X$K$:Y~PLX$(X$,L1)K$:YP1X$K$(X$,L1):YX$""X$K$:YPLāN1PL:X$X$" "::X$X$K$:ZX$(X$,P1)K$(X$,LP