' +JJJJ ?\>m0M='+l> /+l  H d@hLҦ L~ L  ﵪ*i BB䵊嵰`72µ- i ư&( Rp s P  LLʬLoō  H8`?F Vk *f???0xF Hh D#-FFF8` D ܸx D - ܸx8`-0ݩ?ʥD FFF`   LDcpq` [` ~  Lh@(LH9LHH/Hh/ H-З( ܸ(& ¸$8 H` *HVDP (FD Z $0x8x D- ܸDD#HIHHHHhHH݌hHhHh݌H6 h Լ ռ ռ ռ`HJ>݌h Hh݌`HH ᥠ L\  ( 9 +"  "*  (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).).*#!.*'!.8)(#/-)(#/-,,NG8`0($ p,&" ۿ ۿڿL흍ٿ vLQ  !"#$%&'()*+,-./0123456789:;<=>?&Y&&Y& 꽌ɪ\8`&&꽌ɪɖ'*&%&,E'зЮ꽌ɪФ`+*xS&x'8*3Ixix&& 8  '  & x)*++`>J>J>VU)?`8'x0|&HhHh VY)'&Y)xꪽ)' `Hh`V0^*^*>&` aI꽌ɪVɭ穎鷎귭෍ᷩ췩 緈JJJJx Lȿ L8ᷭ緍췩 緍i 8 `巬 췌`x (`(8`I`B` ``n 8ɍ` ^f\õL ^NR  RΩLҦ\L \ şL_ NLjHv 3h`0h8` [L NС õ`A@` ŵL]Lõ`  \ 濭0 ş  Q ^\lZl3L׭Lܫ &RL &QL d L4 We)n `@-eff L f`L . tQLѤ LҦL` OPu d L Ne)nooõĵ LLЦ  #-µµ( zegehtpjigh q Ql` z8L`MaEK@>ˆʎõĵL õ ĵµ aµ`` L̦µ_bJLuLz`  ȟ QlXJ̥KlV  ȟ QlV eօ@ NLi   L` -e L `sr ࣭ml ࣭srLLlۿڿLգ գ ze)rs zrsLq ] Qlr L̦ `8gh ࣥhgL `8LʨM ࣥˤLµH hLħõµ µõL&F`( 80 0 DDLDLDL^ t^`,tP ȟpMt-^^`DH hWLԧ d@` Lꢩ  c ȢL LlLգcl mllm ꢥFLȦAD@ C N cLuɠ% d: L cvc]ܢ @J0G eeʎd d F DUFX ЃDWcДJFgDfLH eeh) tt L [ _HH`]ɍ]ɬ` ɠ``DF ɤ<(LΡ DF`80!  eDeF eDDeFF8`DͲLɍ [LLĦ__ ^ 9 LҦ3 9 a   0LjLY u< (_9 ˭ɠuɠK_9 ?Lﵭ` m ﳐ 7i볍 8 ЉLw`H h ݲL~ `B8` 4L ֵȱB׵ ܯ䵍൭嵍 ` DȑB׵Bֵ  ַ յյ`` ᥠ hh`ĵµ`ڿ8.ڿ.ۿ`êL`õĵBCõĵ`µµ`L õBĵCصص Qƴ0"BƴЌĪLR E( 8` R` ELRŪƪ`췌 յյI뷭鷭귭ⵍ㵍跬ª 뷰` Lf ݵܵߵ޵ ^`8ܵ i · JLǵBȵC`,յp` 䯩 R-յյ`յ0` K R-յյ`ɵʵӵԵ` 4 K ( ѵҵLBȱBL8` DBHBH : ַ޵BȭߵBhhӵԵ RBܵmڵ޵ȱBݵm۵ߵ` 䯩LR˵̵ֵ׵`Lz紅D贅F B ƴ  / 0L Ν `ND8HFFhDh N ş`, ŵBѵ`, ѵB8`  XI볩쳢8 DH E𳈈췍Ȍ X0 ȴ) ȴ 7L L ( L (ȴL{ƴѵ洩ƴǴҵ 7 ^* B0 HȱBh ӵԵ 8 L8 ݲ` ܫ  / / şFD B / / ]ƴS0Jȴ ȴ)  `  4 ò-յ!  8صٵ紭ﵝ 7L (0+BC  7L HH`LgL{0 HH` õL H hBL BH [ h`Lo õ ڬL B ڬ LH hB@ յյ [L (_ j ʪHɪH`Lc (L ܫ㵮赎 ɱ^_ J LsL Q(`贩紎 DǴҵԵƴѵӵµȴ 7 ַ :ŵƴѵǴҵȴµ納贍﵎ٵ്ᵭⳍڵL^ѵ-I B߮Z\ @ յյ\BIR Z-^ Jp\IZLLӜv  Ϡ@跻~!Wo*9~~~~ɬƬ~UVERIF!pppp p p p p`" t""#x"p0p@p@@@p@!y q q p@ ,\Z[PRR3\ɄSɊ"RQJ(0Fw6. ^-%p 㩠RP.Q I* P\L˵B̵C8p pD"A DوED8D`HH8 J^LhhߚHH`L @8'67--66??$$)6?$) tt#????`` }qLLLJ `X@8MɭɊ=L2 `,0 (!U XT`I`I0, `<=ʱD>` <=˜?Ø )%)>? cPL; 8`  ghȱ> q ȱ 8ȱ >? c6p"˜>Ø? c!p <=`8`@A    `@ i @ ȱ Ș`,`D D`DED`  GHI <= <ȭ<ȭ<ȭG<ȭI<><ȥ?< <<= H <=HI<GFNVqyEE)P$_`1  emfg` `` ,p0p`h$q%r`@``q$$hLbc`,pSh`pq"r`,T`@0,U`* L" yLB$!$$"% %L"a`e`e`,,Lҩa`@_`bc` oLXbc`q$r%L$tb`c`e`d`Yb`c`L$e (' 8!$!$%",p0rL"$!e (' !!%##`d`" e$$ ",p0qr(!#L"L$` ,  #   `L _,ePeA[8 & & &mf)mg e$*+Mc$(Ma,bp ,apP!pA* +i+Mc$$! $%%#,dp% Lp"% $`"H *+)hi#"H !*0+i+ibH#b hb`"%$$%H hi#`$% a,b*+Mc,bPMa*!0 +i+`%J) `+je *`PPPP򠥹͠1 @5757=.>.>.>.>.>5757=.>.>.>.>.>.>.7575'---------------------------%7<<<<<<<<777>??/--------------------------07575757=.>.>.>.>.>.>57575757575/>./>.>-4%5%5%.,.,&5%5%5%5%5%5%.,&5%5%5%5%5%5%.,.,.,.,.,.4%5%5%5%5$ۻ$$<<'?$5757575757575757575757575/>.>.>.>.>.,.,.,.,.4%5%5%5%5%5%5%5%5%5%5%5%5%5%5%5%5%5%5%5%5%5%5%5%???'$$$<666>$$$<666&$$$$$$$?66666666???'$$$$$$$$$766666666>$$$$$$$$$6676666666?$$$$$$$,76666666>???'$$$$$$$$76666666>$$$$$$$$66?7666666?--$$$$$$4W$$$$$$$,u--uv6666??????$$$,$,-- - -6666666--------7=???????7666666.%/-%-%=??><>$-----,?????'------,??????'------%=??????'-------3>3333300>333>3633>03333 00003333 ++++333333333>33>003063333>333 5555>3 3333>0? ?? 8DDD  ?3??33?33??33??333????????;3?333??33?? ??3;;3??!3??333337?;33?333??3??##+.?3?;3?0??? 33333?33333 333??3!33 33333 ?? ??8p`/RNJ3ZV ʎH ʎ!L T E    $ . ,0  ׎呃 䑃  $% "  L    `$0%m$!!% " ) )  L+ $CL:3&!A [6a{.00:#  t :L 0-E.,0ʬ   : ..L  L L 䈾 L t L   hhL ` Sू0 L刱䈱`a{8 `8 `)8:HT(2)15:HT(3)21:HT(4)28:HT(5)34 L(0)20:L(1) 2:L(2)12:L(3)8:L(4)8:L(5)8:51E A(16384):A1286:77:A1558\ AA128:ZA$(A): A(16384):A1288:77:A1557:80 ZT0:ZU32:ZA$"":ZC$ESC$"YN":ZL1:12: K$;:VZY((ZZ$)2.5)1:ZZ1(ZZ$):VZZ:ZX:(ZZ$,ZZ,1);:  '67--66??$$)6?$)1:ZH(36):K$;:2049:ZA$ZA$"":(767)2780 5271ZA$:(767)2780 ZX$""18 ZZ$((767)):4608ZX$,ZZ$,ZP:ZX$"" 7: 11:ZZZE:ZE$NULL$:ZE1:2049:ZEZZ:ZA$ZA$"":7:   !!""##$%%&&''(())**++,,--..//00112223344556667788899:::;;;<<<===>>>???@@@@AAABBBBCCCCCDDDDDEEEEEFFFFFFFGGGGGGGGGGHHHHHHHHHHHHHH((K65)" - "GT$(3K);7:I0L%(K,15)1::XX3P(DK,L%(K,I))ST(M,0 Y ߢ8鴑))ȱi ߩ v d ߩ v d`ȩ8񃑃`E8 `    ɵ`) i iP W` v 8`L6)B(I,5)B(I,4):I0B )  X8!Cw d8 G @jjj) @ z d )fD8&HH$0 d( @ @hhhhHHt0%f$ I i $ %i $ iPII)if Э$pI @$ I 0Ldl `bc)cb`mn @` Z Z T16A D G0560G0280 D   `))@򊙈`l)`,1)XXB(I,2)XXXB(I,3)/#XX3X6ST(M ߠ\ ȱbȱc ᥡ !  i  !!  b fL=`Hh8 [&ee0j >L^ʈ&]&&]& Ɵ`,Y(42)BF1:TC1BF0:165:DK0:2 ߠȱȱ ߠȱȱ ߄ , g 椡̗%Hh جȢР  +`E "S$"C";,24:4:O$W$;:240:" "ZA$"R"ZZ$"=RETURN TO LINE GRAPH"O$S$;8-6:ZA$"R"ZA$"r"āI04:LL8L\ªȱ` `  !Ȋi#`Z؅ Sȱȱ R80Bj oo88 o Sȥoȥp` 3e朩*ƛƜ`  e朩*` ߠ 0i#(#ѝ ` ߠ0 Ș` L*)ZA$:TC1566V:14:K$"B - ";:ZA$GT$(4O1):ZE119,14:???? ??0? '<:9..  88888*>* ??  >>`p833333<630000?38???0>0?8<63?00??0?33??0 ?33??3>0> ??>>>>0~~0?3           f f g`L?c 7eggLtf -`,g`BOHOOUNHOOCECRDFAFPARSNOJUSJUSCNNOCNGCDVSHSSPACCEPAUSCWININk`nmngk%lHlxllllll6elllmJnnnoimimʈiiiʎi$20Lj hgg`gg Ohgg`g h Ohggg`MhNhNh8pGh.Mh(GhgNhmMhg`8pgJJJ) }hgohmgg`((((PPPPiHhii iJ` &eeiei giIi?ii 썇i gmi﬈iMi?iPjjjjjjj0jj) i0ȱjij iiiР`8pPH)8 qȥq8)h` g R  QP (`L i`L)  @ jjiijiiii gijiii gijiiiBi g&'i jQ&-iQ&&ȭii j& jQ&-iQ&&iii`i-iii g&'i jQ&-iQ&&iii`*U U*ժ 2k')JM2k)i Q&,jP 0=7k`3k`J&)` `L3f̙ekfk ߍ,0ekfk  c`Lvpkqk pk` iiii imHihʍiii LjL #l $lM%l#l g<>=M%l?'<>#l#l$l` H g Rh PQ`L     խ)?` ` @)`,` >k ެL/kz~C*UUFy9)iYYBy UU*fBEB`ExB`ABBHffTIH*JIUPj C/#( BPt}_Wu}?GU**B_Wu}}kzC **U3L3BB|N|pNH 3LX?EHUJI*W xzz{{z~J*UUCA~z{;KOoB UU*ffBBNfX`WBH*JIU\?NU**D  **UL3LBEBEB8`B3 3EB@N;n;l0@WGUJI*YQ T  yfBQw]w\p@GBNw]vX`DBxOOIUU?@ppB|DB|Ap@B@JPBGPECB@pB|DB|p@srEp|?OBpF|Bp@ NKLB@BH3L3G?KI*RB~P~C*HBG*L~N~BaAy~N~xNHffJHIUN?GB?DB?AUMB?DB?B3L3A?L?BH3L N?DI*KPDrDGJBFBEgIUB?B3L3A?L?BH3L N?DI*KPDrDGJBFBEgIUB?DB?B3L3A?L?BH3L N?BpC-E*JRDrDGJBFBEgIu     `"```L` ccԍbzq$% `@ ?aDa6 ,'gL?cLfHa bHaa,,aaɠ,ra ` a欅aah,`ɀ)?  @IH gc$ 7e Cf$%0 7e tf%%h $20 Lc $ aHaH`6eeeWeeefBfsffffg ggg(bb, 7e gc&g ig$20 hNO0 b@íH bhH ,aɈ5hH gcb% i)H fh g$20 h gc Cf,bbh` gc i g$20 Lh,(f 8ɀ   LX8e湥 {gHzgH ,L`@ @ʩ WRPT` J  *eȱȱȱ` igH) #,&g h`` g"gg gg!g&gh`g gS```emggg#g $g`em#g#g$g`) g%g#g$gggO,0 `)  7e`%g(`HHg,Pg88` g d fhLcgH%gH"gg,P d fh%g8h%gg#gg$gg%g``S`U*H?A=0?3B?**UUD pp|@p|BINHUJI*IECBGP~x`QffPA* %R$A% **D?`x~BAINH*JIUI@DOCB|A< << << .njzzF~fF~xBUu~BU~CBBAINHjJIUBM?JB}UWWyyDyUU**DffT`x~DH*JIUID?B0B`~~6f~~~ ~~~~~`````````0``0`00`~>cc>cc>>cc>0000000|~~~w~~~~f<ff<"A$0" = DELETE DATA";:22:A$1"<"A$0" = PUT DATA BACK"%&24:8:S$"PRESS "K$"RETURN"L$" WHEN FINISHED.";:34,3:35,18:P1:BST:TP1:11E'X%(TPP1)0X$SC$(P):41P(X$ST$)P3:3:I$K$X$N$;:4:3:K$X$;:ZA$"U"A11ĴP147:PP1:39*ZA$"D"A10ĴPTP1B50:PP1:39+A21ĴX%(TPP1)039:58:39,A8ĴX%(TPP1)039:53:39!-A13LNFS:34,0:35,24:).39Y/TP139:XTP1:72:TPTP1:BMXBB1:49l0BTP14BB115111SC$:SC$(1)X$:P1BTP1:51::P1:392BMX39:XB1:72:TPTP1:BB1:5150SC$:SC$(15)X$:19:M$;:51:393P3:3:E$;:X%(TPP1)0ĺSC$(P);:$421:SC$(P);:N5TPP1FSIX%(FS):X%(FS)0:FSI:57W6IFSv7RX%(I):RTPP1IR:558X%(I)X%(R):X%(R)0:RLSLSI9LLLL1:63:LL0X%(TPP1)200:FSTPP1:LSFS:LL1:63;X%(TPP1)200:X%(LS)TPP1:LSTPP1:LLLL1:LLSL63J<LLLL1:IX%(FS):X%(FS)0:(FSTP)(FSB)62w=3FSTP1:3:K$SC$(FSTP1);:21:ST$;>FSI?P3:3:X%(TPP1)0ĺSC$(P);:21:ST$;:@ST$;:21:SC$(P);:AT(CN$(X)):T0T255:BT255T0:"CX$(CN$(X),20,5):T(X$DA$)(X$LI$):XD4870,S:4864:X06:65:T255CN(S)CN(S)8:71ETCN(S)CN(S)1:ST15STST1:SC$(ST)(CN$(X),4,16)FXGHQ15ILCN(Q):L7LL8JLXQQ1:XXL:73KLX:QSSQ:4870,S:4864 LX1:I1L5MXX1:65:T077::X$(CN$(X),4,16):bNYE(222):YN(218)(219)256:YE255ĬOP$DM$:YE6ĺS$"ERROR: FILE NOT FOUND.":84PYE8ĺK$"I/O E"L$"RROR.":84QYE4ĺ"PLEASE REMOVE THE WRITE-PROTECT TAB"M$"FROM YOUR DISKETTE.":85=RYE0YE16ĺK$"DOS E"L$"RROR #"YE" IN LINE #"YN:9:S"ERROR #"YE" IN LINE #"YN" IN PROGRAM"M$"OPTIONS."DM$S$"PLEASE REPORT THIS ERROR TO "K$"MECC."L$:9:TDM$S$"PLEASE CHECK YOUR DISK DRIVE"DM$"AND DISKETTE."U9:1::864:              7# AA128:A97A122AA322 ZA$(A):\ A(16384):A1287:8:A1555:21l 16368,0: 24:6:S$"PRESS "K$"SPACE BAR"L$" TO CONTINUE";:11 4:A32A1311:10 16368,0: ZC$ESC$ZC$:ZA$"":ZT0:ZX$"":ZL1:18 160)" "(160):SP$"!#$%&()'*:=-+;,./><][{}\|~`^@ "(34)ESC$:ZA$"" ST$" ":RT$(21):UA$(11)(10):AR$UA$(8)RT$:4867CN$:X$".DATA":20:DA$Z$:X$".LINE":20:LI$Z$:232,0:233,96:0:1:7:22 A(16384):A1284:8:A155VE THIS SCREEN"M$:"PRINTED ON THE PRINTER, OR PRESS"DM$K$"RETURN"L$" TO GO TO THE MENU."w(4:A3241:A1340:25)J1(54):J2(55):54,240:55,253::::11:"ONE MOMENT PLEASE...":54,J1:55,J2::M$D$"PR#"(962)::(9)"K"(27)"N":(963)3Ĺ6,(962):7,3:3840:43#*I$"GDR"B+1:L$M$D$"PR#0":6145:25,P$:4:14:S$"PRINT "S$"OPTION":7:X$K$PO$((965))L$:Z$" NOT":(965)Z$""-(965)X$"NOW "X$".M$S$"THE PRINT OPTION IS "X$". "S$"THIS MEANS"M$"THE STUDENTS WILL"Z$" BE GIVEN THE ";:Z$""ĺ"OPTION":484/M$"OPTION ";0"TO PRINT THEIR GRAPHS AND DATA "(M$,1,Z$"")"CHARTS.":M$M$S$"DO YOU WISH TO TURN THE PRINT"M$"OPTION "K$PO$((965))"? ";:13:ZA$"N"251965,(965):252CN(S)0:84:CN(S)7MXMXCN(S)8:52"3MXMXCN(S):SS1:50=4EF0:MX0LL0:EF1:5P$:2:2:S$MS$:I1ST:3I:3:K$SC$(I)::0,147279,147:20:S$"OPTIONS:":" "A$1S$"U"A$0" = CURSOR UP";:22:A$1S$"D"A$0" = CURSOR DOWN":A$1" >"A$0" = DELETE DATA";:22:A$1"<"A$0" = PUT DATA BACK"c624:8:S$"PRESS "K$"RETURN"L$" WHEN FINISHED.";:34,3:35,18:P1:BST:TP1:117X%(TPP1)0X$SC$(P):578X$ST$9P3:3:I$K$X$N$;:4:3:K$X$;:ZA$"U"ĴP163:PP1:55:ZA$"D"ĴPTP1B66:PP1:55;A21ĴX%(TPP1)055:74:556<A8ĴX%(TPP1)055:69:55U=A13LNFS:34,0:35,24:]>55?TP155:XTP1:88:TPTP1:BMXBB1:65@BTP14BB1A5111SC$:SC$(1)X$:P1BTP1:67::P1:55BBMX55:XB1:88:TPTP1:BB1:5150SC$:SC$(15)X$:19:M$;:67:55ECP3:3:E$;:X%(TPP1)0ĺSC$(P);:XD21:SC$(P);:ETPP1FSIX%(FS):X%(FS)0:FSI:73FIFSGRX%(I):RTPP1IR:71HX%(I)X%(R):X%(R)0:RLSLSIILLLL1:79JLL0X%(TPP1)200:FSTPP1:LSFS:LL1:79MKX%(TPP1)200:X%(LS)TPP1:LSTPP1:LLLL1:LLSL79~LLLLL1:IX%(FS):X%(FS)0:(FSTP)(FSB)78M3FSTP1:3:K$SC$(FSTP1);:21:ST$;NFSIOP3:3:X%(TPP1)0ĺSC$(P);:21:ST$;:PST$;:21:SC$(P);:QT(CN$(X)):T0T255:*RT255T0:VSX$(CN$(X),20,5):T(X$DA$)(X$LI$):T4870,S:4864:X06:81:T255CN(S)CN(S)8:87UTCN(S)CN(S)1:ST15STST1:SC$(ST)(CN$(X),4,16)VXWXQ15YLCN(Q):L7LL8 ZLXQQ1:XXL:89-[LX:QSSQ:4870,S:4864=\X1:I1Li]XX1:81:T093::X$(CN$(X),4,16):^YE(222):YN(218)(219)256:YE255Ĭ_P$DM$:YE6ĺ"DISK ERROR. FILE NOT FOUND.":102A`YE9ĺS$"THERE IS NO MORE ROOM TO STORE DATA ON THIS DISKETTE."M$:D$"CLOSE "F1$:D$"DELETE "F1$:961,0:103eaYE8ĺS$"DISK I/O ERROR.":103bYE4ĺ"PLEASE REMOVE THE WRITE-PROTECT TAB"M$"FROM YOUR DISKETTE.":103cYE0YE16ĺ"DISK ERROR #"YE" IN LINE #"YN:101Zd"ERROR #"YE" IN LINE #"YN" IN PROGRAM"M$"PRINTER SUPPORT."DM$S$"PLEASE REPORT THIS ERROR TO "K$"MECC."L$ce9:fDM$S$"PLEASE CHECK YOUR DISK DRIVE"DM$"AND DISKETTE."g9:1::864:K           78A$(1):B$(2):C$(3):D$(4):E$(5):F$(6):I$(9):K$(11):L$(12):M$(13):N$(14):O$(15):P$(16):S$(19):W$(23):(968)Ĺ968,0:D$"BLOAD NIBBLES AND BITS"F 6145:DM$M$M$:CN(15),X%(105),CN$(6),SC$(15):ESC$(27):NULL$($S$"WHICH SLOT? ";:ZC$"12":12:X(ZA$):962,X:25&P$:(963)(962)0ĺM$M$S$"TO TEST THE PRINTER, BOTH A PRINTER TYPEAND AN INTERFACE CARD SLOT NUMBER MUST BE SELECTED.":9:25Y'2:14:S$"TEST "S$"PRINTER":6:S$"PRESS "K$"SPACE BAR"L$" TO HAS$"PRINTER "S$"SLOT "S$"NUMBER":M$S$"THE INTERFACE CARD FOR THE PRINTER MUST BE INSERTED INTO EITHER "S$"SLOT #1":"OR "S$"SLOT #2 OF THE COMPUTER."M$:S$"IS THE INTERFACE CARD IN ONE OF"M$"THESE SLOTS? ";:13$ZA$"N"Ĺ962,0:963,0:254%M$M FILE NOT FOUND.":458)YE8ĺK$"I/O E"L$"RROR.":45*YE4ĺ"PLEASE REMOVE THE WRITE-PROTECT TAB"M$"FROM YOUR DISKETTE.":46+YE0YE16ĺK$"DOS E"L$"RROR #"YE" IN LINE #"YN:10:-,"ERROR #"YE" IN LINE #"YN" IN"M$"PROGRAM OPTIONS."DM$S$"PLEASE REPORT THIS ERROR TO "K$"MECC."L$:10:h-DM$S$"PLEASE CHECK YOUR DISK DRIVE"DM$"AND DISKETTE."|.10:1::864:/47%0:10:"THIS IS A DATA DISKETTE CREATED FOR"::"MECC GRAPH"::"INSERT A PROGRAM DISKETTE AND PRESS"::"A KEY TO CONTINUE":16368,0:A$:1::(4)"PR#6")                 94A$(1):B$(2):C$(3):D$(4):E$(5):F$(6):I$(9):K$(11):L$(12):M$(13):N$(14):O$(15):P$(16):S$(19):W$(23):(968)Ĺ968,0:D$"BLOAD NIBBLES AND BITS":D$"BLOAD PRINT CHECK"] 6145:DM$M$M$:CN(15),X%(105),CN$(6),SC$(15):ESC$(27):NULL$(160)" "(160):SP$"!#$%&()'*:=-+;,./><][{}\|~`^@ "(34)ESC$:ZA$"" ST$" ":RT$(21):UA$(11)(10):AR$UA$(8)RT$:4867CN$:X$".DATA":21:DA$Z$:X$".LINE":21:LI$Z$:232,0:233,96:0:1:7:24 A(16384):A1284:8:A1557: AA128:A97A122AA32I ZA$(A):s A(16384):A1287:8:A1555:22 16368,0: 24:6:S$"PRESS "K$"SPACE BAR"L$" TO CONTINUE";:11 4:A32A1311:10 16368,0: ZC$ESC$ZC$:ZA$"":ZT0:ZX$"":ZL1:19@ ZT0:ZA$"":ZC$ESC$"YN":ZW1:ZL1:20:I ZU0 ZE$"[ ]"ESC$ZX$:2747,ZU:ZV(37)1:ZH(36):K$;:2049:ZA$ZA$"":(767)2722 5271ZA$:ZX$""18 ZZ$((767)):4608ZX$,ZZ$,ZP:ZX$"" 7:$ 14:ZZZE:ZE$NULL$:ZE1:2049:ZEZZ:ZA$ZA$"":7:c ZU32:15:ZZZE:ZE$NULL$:ZE1:2049:ZEZZ:ZA$ZA$"":7: Z$"":I1(X$):Z$Z$(((X$,I,1))128):I: ZM0Ĭ@ P$:12:S$"GETTING MAIN MENU...":1:M$D$"BSAVE OPTION DATA,A962,L5,D1":D$"IN#0":D$"PR#0":969,0:D$"BRUN RNH.OBJ":104,8:2048,0:38272,"MECCMENU" PR$(3),PO$(1):PR$(0)"N/A":PR$(1)"Apple DMP / Parallel Card":PR$(2)"Apple Imagewriter / Serial Card":PR$(3)"Printer / Grappler Card":PO$(0)"OFF":PO$(1)"ON"YP$:4:12:S$"PRINTER "S$"SUPPORT"DM$:ZA$C$:"YOU MAY:"M$:5:B$"1. "S$"IDENTIFY "S$"PRINTER "S$"TYPE"ZA$;"2. "S$"SELECT "S$"PRINTER "S$"SLOT "S$"NUMBER"ZA$;:"3. "S$"TEST "S$"PRINTER"ZA$;:"4. "S$"SELECT "S$"PRINT "S$"OPTION "K$"(ON/OFF)"ZA$;:"5. "S$"RETURN TO MAIN MENU"D$7:0,131279,131:Z$A$"1"S$:X$A$"0"K$:18:11:Z$"CURRENT "S$"CONFIGURATION"M$:Z$"PRINTER: "X$PR$((963))M$:22:Z$"PRINTER "S$"SLOT # "X$;:(962)0ĺ(962);:29"N/A";420:Z$"PRINT OPTION: "X$PO$((965)):14:M$S$"WHICH NUMBER? ";:ZM1:ZC$"12345":12:X(ZA$):X522LZM0:X31,35,38,44P$:4:10:S$"IDENTIFY "S$"PRINTER "S$"TYPE":M$S$"STUDENT GRAPHS CAN BE PRINTED WITH THE FOLLOWING COMBINATIONS OF PRINTERS AND INTERFACE CARDS:"M$` M$"1. "K$PR$(1)M$"2. "PR$(2)M$"3. "PR$(3):M$M$S$"DO YOU HAVE ONE OF THESE"M$"COMBINATIONS? ";:13:ZA$"Y"34!962,0:963,0:M$M$L$S$"YOU CANNOT PRINT STUDENT GRAPHS.":9:25"M$M$S$"WHICH NUMBER? ";:ZC$"123":12:X(ZA$):963,X:25#P$:4:7:S$"SELECT ""YOU MAY:"M$:5:B$"1. SELECT ONE DISK DRIVE"ZA$;:"2. SELECT TWO DISK DRIVES"ZA$;:"3. MAKE NO CHANGE"D$DM$:S$"WHICH NUMBER? ";:ZC$"123":13:X(ZA$):X325&966,X:25'YE(222):YN(218)(219)256:YE255Ĭ(P$DM$:YE6ĺS$"ERROR: DISKETTE FROM DRIVE ONE AND INSERT THE MECC G RAPH DISKETTE IN DRIVE ONE.":10:25$P$:2:8:S$"CHANGE DISK DRIVE SETUP"DM$:4:"THE CURRENT SETUP SELECTION IS:"M$:12:("ONETWO",13((966)1),3)" DISK DRIVE"("S",1,(966)1)DM$:ZA$C$%           & 39(104)847A$(1):B$(2):C$(3):D$(4):E$(5):F$(6):I$(9):K$(11):L$(12):M$(13):N$(14):O$(15):P$(16):S$(19):W$(23):(968)Ĺ968,0:D$"BLOAD NIBBLES AND BITS"W 6145:DM$M$M$:CN(15),X%(105),CN$(6),SC$(15):ESC$(27):NULL$(160)" "(160):SP$"!#$%&()'*:=-+;,./><][{}\|~`^@ "(34)ESC$:ZA$"" ST$" ":RT$(21):UA$(11)(10):AR$UA$(8)RT$:4867CN$:X$".DATA":22:DA$Z$:X$".LINE":22:LI$Z$:232,0:233,96:0:1:7:25 A(16384):A1285:9:A15584 AA128:A97A122AA32C ZA$(A):m A(16384):A1288:9:A1556:23} 16368,0: 24:6:S$"PRESS "K$"SPACE BAR"L$" TO CONTINUE";:12 5:A32A1312:11 16368,0: ZC$ESC$ZC$:ZA$"":ZT0:ZX$"":ZL1:20: ZT0:ZA$"":ZC$ESC$"YN":ZW1:ZL1:21:C ZU0 ZE$"[ ]"ESC$ZX$:2747,ZU:ZV(37)1:ZH(36):K$;:2049:ZA$ZA$"":(767)2723 5271ZA$:ZX$""19 ZZ$((767)):4608ZX$,ZZ$,ZP:ZX$"" 7: 15:ZZZE:ZE$NULL$:ZE1:2049:ZEZZ:ZA$ZA$"":7:] ZU32:16:ZZZE:ZE$NULL$:ZE1:2049:ZEZZ:ZA$ZA$"":7: Z$"":I1(X$):Z$Z$(((X$,I,1))128):I: ZM0ĬJ 34,0:35,24:P$:12:S$"GETTING MAIN MENU...":1:M$D$"BSAVE OPTION DATA,A962,L5,D1":D$"IN#0":D$"PR#0":969,0:D$"BRUN RNH.OBJ,D1":104,8:2048,0:38272,"MECCMENU" P$:2:12:S$"DISKETTE SUPPORT"DM$:4:"THE CURRENT SETUP SELECTION IS:"M$:12:("ONETWO",13((966)1),3)" DISK DRIVE"("S",1,(966)1)DM$:ZA$C$"YOU MAY:"M$:5:B$"1. CHANGE THE DISK DRIVE SETUP"ZA$;:"2. CREATE A DATA DISKETTE"ZA$;:"3. RETURN TO THE MENU"D$DM$:S$"WHICH NUMBER? ";:ZM1:ZC$"123":13:X(ZA$):X323ZM0:X36,28wP$:4:9:S$"CREATE A DATA DISKETTE":DM$DM$"CREATING A DATA DISKETTE WILL ERASE WHATEVER INFORMATION IS CURRENTLY ON THEDISKETTE."DM$:S$"DO YOU WANT TO CONTINUE? ";:14:ZA$"N"253P$:4:9:S$"CREATE A DATA DISKETTE"DM$:DM$S$"PLEASE INSERT THE DISKETTE THAT YOU WILLUSE FOR STORING DATA IN DISK DRIVE "("ONETWO",13((966)1),3)".":10:23:M$E$;:(966)233<33e15:M$D$"BLOAD OPTION DATA,D1":39 DM$S$"THIS IS THE MECC G RAPH PROGRAM"M$"DISKETTE.":10:25!39"1:M$D$"INIT DATA DISK,D"(966):(966)225V#7:M$F$"REMOVE THE DATA1IR:362.OkX%(I)X%(R):X%(R)0:RLSLSI?OlLLLL1:370rOmLL0X%(TPP1)200:FSTPP1:LSFS:LL1:370OnX%(TPP1)200:X%(LS)TPP1:LSTPP1:LLLL1:LLSL370OoLLLL1:IX%(FS):X%(FS)0:(FSTP)(FSB)369Pp3FSTP1:3:K$SC$(FSCT NAME: ";:I2:228:22:J$"TYPE THE DATE: ";:I3:228322:M$F$K$PI$(0);:40(PI$(1)):PI$(1):PI$(2);:40(PI$(3)):PI$(3);:221:22:M$F$;:3ZA$PI$(I):ZE0:ZT3:ZL36(36):ZC$SP$:ZX$"":12:PI$(I)ZA$:322:M$F$;:2214(965)0ĺ" ";:54S$A$"1P"A$"0=PRINT GRAPH";:J4EF0:(965)0ı\4ZA$"P"EF1b4422:J$"SELECT THE SIZE OF YOUR "ZZ$" PRINT-OUT: "10)A$1S$"S"A$0"= SMALL "A$1S$"L"A$0"= LARGE ";46:ZA$"S"ZA$"L"2384236 5964,12(ZA$"L"):;5DF0:YE(222):YN(218)(219)256:YE255Ĭs5P$DM$:YE6ĺ"DISK ERROR. FILE NOT FOUND.":247Y6YE9ĺ"THERE IS NO MORE ROOM TO STORE DATA ON THIS DISKETTE."DM$"TO STORE MORE DATA ON THIS DISKETTE, ASKYOUR TEACHER TO ERASE DATA YOU NO LONGERWANT, OR USE ANOTHER DISKETTE. SEE THE TEACHER'S MANUAL FOR MORE ";:250|6YE8ĺ"DISK I/O ERROR.":2476YE4ĺ"PLEASE REMOVE THE WRITE-PROTECT TAB"M$"FROM YOUR DISKETTE.":2487YE0YE16ĺ"DISK ERROR #"YE" IN LINE #"YN:246h7"ERROR #"YE" IN LINE #"YN" IN PROGRAM"M$"LINE GR."DM$"PLEASE REPORT THIS ERROR TO "K$"MECC."L$r749:7DM$"PLEASE CHECK YOUR DISK DRIVE"DM$"AND DISKETTE."749:1::864:DFĊ078"INFORMATION.";:YE(220):YN(221):DF(223):25281:M$D$"CLOSE""8254;81:M$D$"DELETE "F1$o8D$"":220,YE:221,YN:223,DF:DF1:961,0:239x8248,111SC$:SC$(1)X$:P1BTP1:358::P1:346zNeBMX346:XB1:377:TPTP1:BB1:5150SC$:SC$(15)X$:19:M$;:358:346NfP3:3:E$;:X%(TPP1)0ĺSC$(P);:Ng21:SC$(P);:NhTPP1FSIX%(FS):X%(FS)0:FSI:364NiIFS OjRX%(I):RTPP7,SX:PT3Č3840:22402I$"GR"("D",1,(SX1))J2L$M$D$"PR#0":6145:2235:22:J$"DO YOU WANT TO IDENTIFY YOUR "ZZ$"? ";:10:ZA$"N"2299322:J$"TYPE YOUR NAME: ";:I0:228:22:J$"TYPE YOUR CLASS NAME: ";:I1:228:22:J$"TYPE YOUR PROJE(ZA$)D1:1220b1768:(76868)2Ģ22:J$"YOUR PRINTER IS NOT TURNED ON AND READY.";:49:2SL(962):PT(963):SX(964):J1(54):J2(55):54,240:55,253::::11:"ONE MOMENT PLEASE...":54,J1:55,J2::M$D$"PR#"SL::(9)"K"(27)"N":6,SL:Y:XX0XX.00012#EF0:X5X(Y5Y)(X4X)XX:o#S9āI04:ST(I,0)ST(I5,0):ST(I,1)ST(I5,1)::65:57#S91:S81:KQ1:J1114:X%(J)1::ZX1:ZY10:ZX$"":L12:C32:30:ZZ$ZA$:11:1:1:E$;$J16:((SC$(JKQ8))ST(IN,KQ))1T(ST(DL,KQ))KJ1$:J25:JKP(SC$(J8KQ)):209r$:X%(31)ST(DL,KQ):X%(36)X%(31):X%(30K)X%(31):X%(60KQ)K$KX%(60KQ):M2ST(MX,KQ):LS11:J6:PST(MX5,KQ):197 %22:J$"TYPE A MAXIMUM, OR PRESS THE L OR S KEY"M$"TO MAKE THE VALUE LARGER OR SMALLER.";&%(ZA$)ZLPM2:217%V:H:ST(MX,KQ)(ZA$):M2ST(MX,KQ):YM2:199:ZC$"-.":ZX$"LS":ZE$" "(0)ESC$ZX$:ZU32:ZT2:14:218:X%(36)ST(DL,KQ):ZZ$"L"ST(MX,KQ)ST(MX,KQ)AD:173&ZZ$"S"174:ST(MX,KQ)ST(MX,KQ)AD:ST(MX,KQ)ST(MN,KQ)ST(MX,KQ)M21&LST(MX,KQ):138:170&ST(MX,KQ)(ZA$):ST(MX,KQ)ST(MN,KQ)Ģ22:J$"MAXIMUM MUST BE LARGER THAN MINIMUM.";:49:ZA$(M2):169?'YST(MX,KQ):199:PST(MX5,KQ):4:213:PST(MX,KQ):217:SC$(JKQ8)ZA$:V:H:KQ216:" ";:PST(MX5,KQ):209:M1ST(MN,KQ):LS12:J1:PST(MN5,KQ):197'22:J$"TYPE A MINIMUM, OR PRESS THE L OR S KEY"M$"TO MAKE THE VALUE LARGER OR SMALLER.";'(ZA$)ZLPM1:217(V:H:ST(MN,KQ)(ZA$):M1ST(MN,KQ):YM1:199:ZC$".-":ZX$"LS":ZE$" "(0)ESC$ZX$:ZU32:ZT2:14:218:X%(31)ST(DL,KQ):ZZ$"L"180:ST(MN,KQ)ST(MN,KQ)AD:ST(MN,KQ)ST(MX,KQ)ST(MN,KQ)M1(LST(MN,KQ):138:177(ZZ$"S"ST(MN,KQ)ST(MN,KQ)AD:1792)ST(MN,KQ)(ZA$):ST(MN,KQ)ST(MX,KQ)Ģ22:J$"MINIMUM MUST BE SMALLER THAN MAXIMUM.";:49:LM1:138:176)YST(MN,KQ):199:PST(MN5,KQ):4:213:PST(MN,KQ):217:SC$(J8KQ)ZA$:V:H:KQ216:" ";:PST(MN5,KQ):209:PST(IN5,KQ):JK:1972*ZLX%(K20):ST(DL,KQ)X%(K30):22:J$"TYPE THE INCREMENT FOR THE "S$("XY",KQ1,1)" AXIS.";:PST(IN,KQ):217*ZL5:V:H:ZC$".":ZX$"":ZE$" "(0)ESC$:ZU32:ZT2:14:218:X%(30K)ST(DL,KQ):ST(IN,KQ)(ZA$):ST(IN,KQ)0ĭ(ST(MX,KQ)ST(MN,KQ))ST(IN,KQ)7187*ZX$"LARGER"&+22:J$"TYPE A "ZX$" "S$("XY",KQ1,1)" INCREMENT VALUE.";:184^+ST(IN,KQ)(ST(MX,KQ)ST(MN,KQ))ZX$"SMALLER":186+PST(IN5,KQ):4:213:PST(IN,KQ):217:SC$(KKQ8)ZA$:V:H:ZQ216:" ";:PST(IN5,KQ):209:ST(DL,KQ)0:X31:189:X36:189:X30K:189:191,ST(DL,KQ)X%(X)ST(DL,KQ)X%(X) ,E,KQ0193:KQ0:S8S80:29:165N,168,22:M$F$A$1S$"OPTIONS: A"A$0"=ADJUST SCALE "A$1S$"G"A$0"=GRAPH";,6:ZA$"A"KQ1:168,ZA$"G"İ65:57:59,194H-209:7:213:VY81:HX72(KQ0):ZA$SC$(JKQ8):5271ZA$:AD2ST(M,KQ):1T(ST(DL,KQ))ADAD1T(ST(DL,KQ))N-z-KQ0204:X%(LS)(Y3YST(M,KQ).5)ı-7:X1X06:0:X%(LS)0ĕ4X02,X%(LS)-X9Y3YST(M,KQ).5:X9Y1X9Y0X%(LS)1:203-X%(LS)X9:4X02,X%(LS).1:%.X%(LS2)(X3YST(M,KQ).5)ıg.7:Y0Y1:48:X%(LS2)0ĕ4X%(LS2),Y01:4X%(LS2)1,Y01.X9X3YST(M,KQ).5:X9X9(X92(X92)):X9X1X9X02X%(LS2)1:208.X%(LS2)X9:4X%(LS2),Y01:4X%(LS2)1,Y01.1:0:8/KQ1XX0(SC$(JKQ8))77:Y((Y3PST(M,KQ)2.5)2)2:211p/X((X3PST(M,0)(SC$(JKQ8))3.51)2)2:YY07/(KQ0)(DD4)(J2(J2))212:4352SC$(JKQ8),X,Y//ST(DL,KQ)X%(J30):ZL5:KQ1Y((Y3PST(M,KQ))8)8:XX07ZL7:215O0X((X3PST(M,0)20)7)7:YY015:X2,Y4X40,Y4X40,Y8X2,Y8X2,Y4:0ST(DL,KQ)X%(J30):X2,Y4X06,Y4X06,Y8X2,Y8X2,Y4:0ZA$(ST$,1,ZL(ZA$))ZA$:0LP:1380X$".":4608ZA$,X$,D1:ST(DL,KQ)D1:D10ı 1ST(DL,KQ)X1,Y04:(DD4)(P2(P2))155Y"X((X(SC$(P))3.51)2)2:YY07:4352SC$(P),X,Yh"PP1:151n""(X5XX5X4)(X5XX5X4)EF1:"XXX4X:XX0XX.0001"EF0:Y5Y(X5X)(Y4Y)XX:"(Y5YY5Y4)(Y5YY5Y4)EF1:#XXY41!136:JII:I10150M!Y((Y3(SC$(P))ST(M,1)2.5)2)2:YY14147!XX0(SC$(P))77:4352SC$(P),X,Y:X03,Y3X03,Y3:PP1:147!P1:I0:KQI!136:JII:I10156!JST(MX,0)1.1155!"XX3JST(M,0):X,Y02X,Y04:X1,Y02(219)256:YE255ĬKG/P$DM$:YE6ĺ"DISK ERROR. FILE NOT FOUND.":3101H0YE9ĺ"THERE IS NO MORE ROOM TO STORE DATA ON THIS DISKETTE."DM$"TO STORE MORE DATA ON THIS DISKETTE, ASKYOUR TEACHER TO ERASE DATA YOU NO LONGERWANT, OR USE ANOTHER DISKETTE. SEE THE TEACHER'S MANUAL FOR MORE ";:313TH1YE8ĺ"DISK I/O ERROR.":310H2YE4ĺ"PLEASE REMOVE THE WRITE-PROTECT TAB"M$"FROM YOUR DISKETTE.":311H3YE0YE16ĺ"DISK ERROR #"YE" IN LINE #"YN:309@I4"ERROR #"YE" IN LINE #"YN" IN PROGRAM"M$"LINE ED."DM$"PLEASE REPORT THIS ERROR TO "K$"MECC."L$KI5131:I6DM$"PLEASE CHECK YOUR DISK DRIVE"DM$"AND DISKETTE."I7131:1::864:DFĊ0I8I9"INFORMATION.";:YE(220):YN(221):DF(223):315I:1:M$D$"CLOSE"I;317J311ZTP1);:21:ST$;PqFSIHPrP3:3:X%(TPP1)0ĺSC$(P);:21:ST$;:aPsST$;:21:SC$(P);:yPtT%X:5189T%:TT%:Pu4870,S:4864:X06:372:T255CN(S)CN(S)8:376PvTCN(S)CN(S)1:ST15STST1:SC$(ST)(CN$(X),4,16)PwXPxQyQ15QzLCN(Q):L7LL83Q{LXQQ1:XXL:378SQ|LX:QSSQ:4870,S:4864cQ}X1:I1LQ~XX1:372:T0382::X$(CN$(X),4,16):QLNTPLNB385QX$SC$(LNTP1):386QXLN:377QX$X$".DATA":LNX%(LN):!RDF0:S40:YE(222):YN(218)(219)256:YE255ĬYRP$DM$:YE6ĺ"DISK ERROR. FILE NOT FOUND.":395<][{}\|~`^@ "(34)ESC$:ZA$"":U$"DO YOU WANT TO ":V$M$F$( ST$" ":RT$(21):UA$(11)(10):AR$UA$(8)RT$:ZH$AR$"UDLR?SGTMQ"("P",1,(965)):Y$"TYPE YOUR ":4876:4867CN$:O10:O20:970,0:232,0:233,12:0:1:7 T1:I010:T(I)T:TT10::V(0)1:V(1)3:V(2)3:V(3)5:V(4)5:V(5)5:H(0)3:H(1)2:H(2)20:H(3)13:H(4)22:H(5)31:L(0)36:L(1)12:L(2)12:L(3)7:L(4)7:L(5)7:22 A(16384):A1287:152:A15510 AA128:A97A122AA32( R$(A):V A(16384):A12810:152:A1558:166 ZT0:ZU32:R$"":ZC$ESC$"YN":ZL1:14: K$;:VZY((ZZ$)2.5)1:ZZ1(ZZ$):VZZ:ZX:(ZZ$,ZZ,1);:: ZU0 ZE$"[ ]"ESC$ZX$ 2747,ZU< ZV(37)1:ZH(36):ZA$R$:K$;:2049:R$ZA$"":(767)27164S 5271R$:ZX$""19| ZZ$((767)):4608ZX$,ZZ$,ZP:ZX$"" 7: 13:ZZZE:ZE$NULL$:ZE1:ZA$R$:2049:ZEZZ:R$ZA$"":7: ZU32:14:ZZZE:ZE$NULL$:ZE1:ZA$R$:2049:ZEZZ:R$ZA$"":7:3 GT(960):GT1T$"SETS OF BARS":24J T$"SETS OF LINES"l (961)Ĺ961,0:318:DC1:169t 51 S465:19:V$"DO YOU WANT HELP ENTERING LABELS FOR YOUR GRAPH? ";:11:HELPR$"Y":HELPS40:GT28,31 S3181,103Q34:6:W(X1X0)7:XX0W2:I16:YY01Y0(Y0Y1)(1)1:X,YX8,Y::XXW::735:36:21:V$;:TC3:V24:47:37:42:R$"Y"2994634:6:W(X1X0)7:XX0W2:I16:X%(I)Y0(Y0Y1)(1)::I26:X,X%(I1)XW,X%(I):X1,X%(I1)XW1,X%(I):XXW::7:XX0W2:I16:1X2,X%(I)2:XXW:Iw 35:36:21:V$;:I02:I13I90,185::37:42:R$"Y"32!94"P$;:7:X1279:Y111:Y0131:X070:Y3Y0:XX01X01:X,Y12X,Y0::YY0Y02:X01,YX1,Y::YY0Y1(Y0Y1)5:X03,YX03,Y::}#0,163279,163:21:V$"WHAT IS THE TITLE OF YOUR GRAPH?";:R$G$(0):ZL36:ZC$SP$:ZT3:24:3:13:G$(0)R$:44:;$21:V$"TYPE LABEL FOR THE HORIZONTAL AXIS(X):":R$G$(1):ZL12:24:15:13:ZZ$R$:46:G$(1)ZZ$:46:21:V$"TYPE LABEL FOR THE VERTICAL AXIS(Y):":R$G$(2):24:15:13:G$(2)R$:45:%22:"TYPE NAMES OF UP TO THREE "T$":":TC3:V24:ZE1:38:ZE0&ZE$NULL$:ZL7:V:3:("- ",1(GT3),2);:R$G$(3O1):ZE120,16:G$(3O1)R$:TC141)'V:16:("- ",1(GT3),2);:R$G$(4O1):ZE120,16:G$(4O1)R$:TC241n(V:29:("- ",1(GT3),2);:R$G$(5O1):ZE120,16:G$(5O1)R$t)*21:V$U$"CHANGE ANY LABELS? ";:11:+44:45:46,ZX$G$(O1):L36:C32:49:1:3:K$R$;:-ZX1:ZY10:ZX$G$(2O1):L12:C32:49:ZZ$R$:12M.ZX$G$(1O1):L12:C32:49:ZX105:ZY148:4352R$,ZX,ZY:/I0TC1:5(I2)(I1):X390I:JV88V811(I2):X,JX10,J:J,I:0I0TC1:7:X390I:I1X,V87::1ZX$""ZX$(C)24871,L:4872,C:4873:R$ZA$:3T465:19:J$U$"USE DATA STORED ON THEDISKETTE? ";:11:S3(R$"Y"):S354e518:V$;:266S40:SL1:MS$"SELECT A DATA NAME:":340:EFS41:S30:18:J$"THERE IS NO DATA STORED ON THE DISKETTE.";:150:537LL0528383:D(966):319.QT$GT$(II3)QT$:DF23[/III2II21:J014:QT$DT$(I,J)QT$:DF23:J,I:D$"CLOSE"c0IIk1232FL$(II)"":18:M$F$M$" THIS NAME HAS ALREADY BEEN USED.";:8:353X$CN$(X):T(X$):T0T255T255T:4T((X$,20,5)LI$):o5X$ GRAPHING UTILITY SYSTEM2PROGRAM: HELLOPCOPYRIGHT (C) MECC, 1985o(LAST UPDATE: 85/05/13 CPE{32000D$(13)(4):P(X)(X)(X1)256D$"MAXFILES1" :::(978)157Ģ12:"THIS PRODUCT NEEDS AT LEAST 48K TO RUN.":16384,128:16368,0:32000. D$"BRUNRNH.OBJ"p 230,64:38272,"LOGO":16304,0:16297,0:16299,0:16302,0 L969,255:975,255 38272,"MECCMENU" } }:BS(P(P(999))1)16:BS1BS7BS6 }BS       5424575:A$(1):B$(2):C$(3):D$(4):E$(5):F$(6):I$(9):K$(11):L$(12):M$(13):N$(14):O$(15):P$(16):S$(19):W$(23):D$"BLOAD ICONS,A$6000":(968)Ĺ968,0:D$"BLOAD NIBBLES AND BITS":D$"BLOAD PRINT CHECK"5 6145:ESC$(27):DT$(6,14),GT$(6),L%(6,15),CN$(6):4876:4867CN$ NULL$(160)" "(160):SP$"!#$%&()'*:=-+;,./><][{}\|~`^@ "(34)ESC$:ZA$"":ST$" ":RT$(21):UA$(11)(10):AR$UA$(8)RT$:DM$M$M$:X$".LINE":LI$"":I15:LI$LI$(((X$,I,1))128):T 232,0:233,96:0:1:7:N$(1)"LINE GRAPH":N$(2)"MAIN MENU":19z A(16384):A1285:10:A1557 AA128:ZA$(A): A(16384):A1287:10:A1556:18 24:6:"PRESS "K$"SPACE BAR"L$" TO CONTINUE";:10 5:A32A1310:9 16368,0:K ZT0:ZU32:ZA$"":ZC$ESC$"YN":ZL1:13: ZE$"[ ]"ESC$ZX$:2747,ZU:ZV(37)1:ZH(36):K$;:2049:ZA$ZA$"":(767)2718 5271ZA$:ZX$""16 ZZ$((767)):4608ZX$,ZZ$,ZP:ZX$"" 7:, ZU32:13:ZZZE:ZE$NULL$:ZE1:2049:ZEZZ:ZA$ZA$"":7:9 GT2:23j P$;:28,128:62454:2118,20:10:(961)21 "THIS DATA TYPE AND GRAPH STYLE ARE"DM$"USED ONLY TO GRAPH PAIRS OF NUMBERS."DM$"CHOOSE LINE GRAPH OR RETURN TO MAIN"DM$"MENU.":22N "YOU MAY CHOOSE TO GRAPH YOUR DATA AGAIN."M$"OR YOU MAY RETURN TO THE MAIN MENU." 18:10:1". "N$(1)M$:10:"2. RETURN TO MAIN MENU"M$::10:"ENTER YOUR CHOICE: ";:ZU32:ZA$"":ZC$ESC$"12":ZT0:ZL1:17:GT(ZA$):960,4:GT225e6145:D$(4):P$:12:"GETTING "N$(GT)"...":GT224:1:M$D$"MAXFILES1":D$"BRUN RNH.OBJ,D1":38272,"LINE ED"D$"IN#0":D$"PR#0":969,0:D$"BRUN RNH.OBJ,D1":104,8:2048,0:38272,"MECCMENU"(970)((961)0)2332IO25O2:II23āJ015:L%(I,J)0:J0L8:J014:ZZ$DT$(I,J):ZZ$""31YK(I2):K2I31:DT$(K2,J)""31L%(K3,J)1:L%(K,L%(K,15))J:L%(K,15)L%(K,15)1J,I: P$:7:M$"DO YOU WANT TO STORE THIS INFORMATION"M$"FOR FUTURE USE? ";:11:ZA$"N"23A!53:27:FL$(0)"":FL$(1)"":FL$(2)"":L%(0,15)L%(1,15)L%(2,15)049]"II02:L%(II,15)042#12:M$F$"WHAT NAME DO YOU WANT TO GIVE THE "("FIRST SECONDTHIRD ",II61,6)"LINE?"M$:12:ZA$FL$(II):ZL16:ZX$"":ZC$" "ESC$:ZT1:17:5271ZA$:(ZA$)0FL$(II)"":429$(ZA$)1637:ZA$ZA$(ST$,16(ZA$))f%ZA$ZA$".LINE ":ZA$FL$(II)42z&I02:III40'FL$(I)ZA$50.(:FL$(II)ZA$:X$"":I130:X$X$(((ZA$,I,1))128)::ZA$X$:4876:5092,(966):S1511:4870,S:4864:X06:51:T25542:T041:(CN$(X),4)ZA$508)X:Sm*II:21:M$F$"ANY CHANGES? ";:11:ZA$"Y"34+II02:L%(II,15)0FL$(II)""48,1:M$:DF0:F1$FL$(II):D$"OPEN "FL$(II)",D"(966):DF23-F1$FL$(II):D$"WRITE "FL$(II):DF23 ED.";:20:68%XT%X:5189T%:TT%:ZX$"TEMP.DATA":1:M$D$"OPEN "X$",D1":D$"READ "X$:I05:GT$(I)::I03:J011:DT$(I,J):J,I:D$"CLOSE":_DF0:YE(222):YN(218)(219)256:YE255Ĭ`P$DM$:YE6ĺ"DISK ERROR. FILE NOT FOUND.":1TORE DATA ON THIS DISKETTE."DM$"TO STORE MORE DATA ON THIS DISKETTE, ASKYOUR TEACHER TO ERASE DATA YOU NO LONGERWANT, OR USE ANOTHER DISKETTE. SEE THE TEACHER'S MANUAL FOR MORE ";:659YE8ĺ"DISK I/O ERROR.":62,:YE4ĺ"PLEASE REMOVE THE WRITE-PROTECT TAB"M$"FROM YOUR DISKETTE.":63b;YE0YE16ĺ"DISK ERROR #"YE" IN LINE #"YN:61<"ERROR #"YE" IN LINE #"YN" IN PROGRAM"M$"MENU OF 1."DM$"PLEASE REPORT THIS ERROR TO "K$"MECC."L$=8: >DM$"PLEASE CHECK YOUR DISK DRIVE"DM$"AND DISKETTE."%?8:1::864:DFĊ0+@cA"INFORMATION.";:YE(220):YN(221):DF(223):67wB1:M$D$"CLOSE"C69D1:M$D$"DELETE "F1$ED$"":220,YE:221,YN:223,DF:DF1:961,0:54F63     9524575:A$(1):B$(2):C$(3):D$(4):E$(5):F$(6):I$(9):K$(11):L$(12):M$(13):N$(14):O$(15):P$(16):S$(19):W$(23):J$M$F$S$:D$"BLOAD ICONS,A$6000":(968)Ĺ968,0:D$"BLOAD NIBBLES AND BITS":D$"BLOAD PRINT CHECK" 6145:ESC$(27):NULL$(160)" "(160):SP$"!#$%&()'*:=-+;,./><][{}\|~`^@ "(34)ESC$:ZA$"":ST$" ":RT$(21):UA$(11)(10):AR$UA$(8)RT$D DM$M$M$:DT$(3,11),GT$(6),CN$(6):232,0:233,96:0:1:7:N$(1)"BAR GRAPH":N$(2)"LINE GRAPH":N$(3)"PIE GRAPH":N$(4)"MAIN MENU":4876:4867CN$:40l A(16384):A12817:22:A15519 AA128:ZA$(A): A(16384):A12819:22:A15518:39 24:6:S$"PRESS "K$"SPACE BAR"L$" TO CONTINUE";:22 17:A32A1322:21 16368,0:B ZT0:ZU32:ZA$"":ZC$ESC$"YN":ZL1:28: ZE$"[ ]"ESC$ZX$:2747,ZU:ZV(37)1:ZH(36):K$;:2049:ZA$ZA$"":(767)2739 5271ZA$:ZX$""36 "ZZ$((767)):4608ZX$,ZZ$,ZP:ZX$"" $7:# &ZU32:28:ZZZE:ZE$NULL$:ZE1:2049:ZEZZ:ZA$ZA$"":7:0 'GT4:53 (P$;:28,128:62454:324,20:1118,20:4242,36:9:" "N$(1)" "N$(2)" "N$(3):11:(961)46$ -S$"THESE THREE GRAPH STYLES ARE USED ONLY"DM$"WITH NAME AND NUMBER DATA. CHOOSE ANY"DM$"OF THEM OR RETURN TO THE MAIN MENU.":47 .S$"YOU MAY CHOOSE TO GRAPH YOUR DATA AGAIN"DM$"USING ANY OF THESE THREE GRAPH STYLES."DM$"OR YOU MAY RETURN TO THE MAIN MENU."S/18:I13:10:I". "N$(I)::10:"4. RETURN TO MAIN MENU"::10:"ENTER YOUR CHOICE: ";:ZU32:ZA$"":ZC$ESC$"1234":ZT0:ZL1:38:GT(ZA$):960,GT:GT4655P$:12:S$"GETTING "N$(GT)"...":GT460:1:M$D$"MAXFILES1":D$"BRUNRNH.OBJ,D1":GT58,58,59:38272,"BAR LINE";38272,"PIE"2<D$"IN#0":D$"PR#0":969,0:D$"BRUN RNH.OBJ,D1":104,8:2048,0:38272,"MECCMENU"LA(970)((961)0)53BP$:7:M$S$"DO YOU WANT TO STORE THIS INFORMATION"M$"FOR FUTURE USE? ";:23:ZA$"N"538D12:J$"WHAT NAME DO YOU WANT TO GIVE THE DATA"M$"ON THE DISKETTE?"M$:12:ZA$"":ZL16:ZX$"":ZC$" "ESC$:ZT1:38:5271ZA$:(ZA$)053cG(ZA$)1672:ZA$ZA$(ST$,16(ZA$))HZA$ZA$".DATA ":X$"":I130:X$X$(((ZA$,I,1))128)::ZA$X$:S1511:4870,S:4864:X06:88:T25579:T078:(CN$(X),4)ZA$86NX:SO1:M$:90:F1$ZA$:DF0:D$"OPEN "ZA$",D"(966):DF85:D$"WRITE "ZA$:DF85:I05:(34)GT$(I)(34):DF85::I03:J011:(34)DT$(I,J)(34):DF85:J,I:D$"CLOSE "ZA$U6145:D$(4):53 V18:M$F$M$" THIS NAME HAS ALREADY BEEN US"TEMP.DATA":1:M$D$"OPEN "X$",D1":D$"READ "X$:I05:GT$(I)::I05:J014:DT$(O2I,J):J,I:D$"CLOSE":6DF0:YE(222):YN(218)(219)256:YE255Ĭ7P$DM$:YE6ĺ"DISK ERROR. FILE NOT FOUND.":628YE9ĺ"THERE IS NO MORE ROOM TO S";:169"!|R$D$(DC,DR):OL$R$ı1!}R$""129n!~970,0:OL$""L%(DC,L%(DC,12))DR:L%(DC,12)L%(DC,12)1!P(DC,12)P(DC,12)OLP(DC,DR):IDC:MO0128:L%(I,12)160:133:JDC:70!"I0L%(DC,12)1:L%(DC,I)DR130::"MESSED UP LINKS":1RROR.":103YcYE4ĺ"PLEASE REMOVE THE WRITE-PROTECT TAB"M$"FROM YOUR DISKETTE.":104dYE0YE16ĺ"DISK ERROR #"YE" IN LINE #"YN:102e"ERROR #"YE" IN LINE #"YN" IN PROGRAM"M$"MENU OF 3."DM$"PLEASE REPORT THIS ERROR TO "K$"MECC."L$f20:<gDM$"PLEASE CHECK YOUR DISK DRIVE"DM$"AND DISKETTE."Uh20:1::864:DFĊ0[ij"INFORMATION.";:YE(220):YN(221):DF(223):108k1:M$D$"CLOSE"l110m1:M$D$"DELETE "F1$nD$"":220,YE:221,YN:223,DF:DF1:961,0:95o104oL%(I,J)L%(I,J1):L%(I,J1)T:SW16>J:NN1:SW61<?U@I1O23O2:60::!AS41:P$;:7:0,139271,139:0,27271,27:73,2773,139:74,2774,139:0,140271,140:I022(GT3):69::I35:V(I):H(I):LL(I):ZZ$G$(IO1):80::5:3:K$"LEGEND";:I011:6I:J03:L8(J0)RBZZ$D$(JO2,I):73:2J92(J0):ZZ$;:J,I]CMOıD19:1:F$" "K$B$"MEAN"C$"MEDIAN"C$"ST. DEV."D$;:J13:70::EZX$G$(IO1):LL(I):C3263(ZX$""):49:V(I):H(I):K$R$;:#FI1315:I6:XP(JO2,I):L8:75:2J92(J0):71:I:OG(ZZ$)LZZ$(ZZ$,L((ZZ$,L,1)"."))WH80I5271ZZ$:ZZ$""ZX$"":C95:49:ZZ$R$JK(X)1ZZ$(X):L(X)5E7ZZ$"0":MZZ$"0.":X0ZZ$"-0.":XX)NXX10:X$("0123456789",X1,1):XX(X$):ZZ$ZZ$X$:((ZZ$)9)(X0)78/OVP73:33,(36)L1:ZZ$E$;:33,40:cQS4İ65R183MO:V$;:22MO2:1:"(PRESS ? FOR HELP.)";:I0S20MO3:1:E$S$;:I184,85,86,87TY$"GRAPH TITLE.";:88UY$"X-AXIS LABEL.";:88VY$"Y-AXIS LABEL.";:88GW"TYPE NAMES OF UP TO THREE "T$".";:88SXI392YR$G$(I):ZLL(I):V(I):H(I):ZX$"?":ZE0:ZC$SP$:ZT3:20:ZZ$"?"İ139:82ZG$(I)R$:69:II1:I1GT3I3[83)\I35:R$G$(I):ZLL(I):V(I):H(I):ZX$"?":ZE0:ZC$SP$:ZT3:20:ZZ$"?"İ139:82c]G$(I)R$:LL(I):V(I):H(I):ZZ$R$:80::21:V$;:94w^HELPS4MOİ67_S4İ65`DR0:DC0:DC0197,104aMOĢ18:V$;b193MO:J$"TYPE A LEGEND NAME OR PRESS THE RIGHTARROW KEY TO MOVE TO THE NEXT COLUMN.";cDR6:2:ZT3:ZL8:R$D$(DC,DR):ZX$RT$"?"UA$:ZC$SP$:20:D$(DC,DR)R$:ZG$ZZ$:ZZ$R$:L8:73:2:ZZ$;:ZG$RT$103dZG$"?"İ139:98eZG$(11)DRDR1:DR099:81fDRDR1:DR1299gDC1:DR0+hS465:MOĢ18:V$M$13)"TYPE DATA IN THESE COLUMNS."iZZ$A$"1"S$:ZX$A$"0":22:1:F$ZZ$"OPTIONS:"15)"M"ZX$"=";:MOĺ"DISPLAY STATISTICS":107j"ERASE STATISTICS"jkZZ$"U"ZX$"=UP "ZZ$"D"ZX$"=DOWN "ZZ$"L"ZX$"=LEFT "ZZ$"R"ZX$"=RIGHT "ZZ$"T"ZX$"=TITLES":ZZ$"?"ZX$"=HELP "ZZ$"S"ZX$"=SAVE "ZZ$"G"ZX$"=GRAPH "ZZ$"Q"ZX$"=MENU ";:(965)ĺZZ$"P"ZX$"=PRINT";sl152mR$D$(DC,DR):OL$R$:OLP(DC,DR):ZX$ZH$:ZT2:ZC$".- ":ZE0:ZL7:DR6:2DC92(DC0):21:ZG$ZZ$:R$""ZZ$"":P(DC,DR)0:111nP(DC,DR)(R$):ZZ$R$SoD$(DC,DR)ZZ$:L7:DR6:29DC2(DC0):80:124:ZP0116p4608ZH$,ZG$,ZP:ZP117,118,119,120,117,118,119,121,113,154,123,81,114,163,122q139:104rMOMO:18:V$;:MOĺM$"CALCULATING...";:64:138:67:104s1044 tDRDR1:DR12109:DR0:DCDC1:DC4109:DC0:97O uDRDR1:DR0109:81q vDRDR1:DR12109:DR11:109 wDCDC1:DC0109:97 xDR0 yDCDC1:DC4109:DC0:97 z192MO:V$;:ZZ$"DATA":327:103!{183MO:V$M$"GETTING GRAPH...03aYE9ĺ"THERE IS NO MORE ROOM TO STORE DATA ON THIS DISKETTE."DM$"TO STORE MORE DATA ON THIS DISKETTE, ASKYOUR TEACHER TO ERASE DATA YOU NO LONGERWANT, OR USE ANOTHER DISKETTE. SEE THE TEACHER'S MANUAL FOR MORE ";:106 bYE8ĺ"DISK I/O E3MX:R4MN:R5IN:R6DL:R7TR:j1238:V21:47:ZE1:ZT0:38:ZE0:PWX1TR4X0:W(PW(TRTC)):W8W4w1W8W81BW5:W8BW91W12:W23:W8W16:W271W44(TC1)5:W8W4W421TC2W4W41 2SP((X1X0(W4TR))TR):SP2(SJ0L%(I,12)1:XX(MP(I,L%(I,J)))(MP(I,L%(I,J)))::L%(I,12)2P(I,15)0:m#P(I,15)(X(L%(I,12)1))s##I13:133::#P$;::O16:O24:I05:G$(IO1)::I04:J03:D$(JO2,I):J,I:ZMMO:MO0:GT3GT0:65:GT3:141#65$19:J$"THE DATA ENTERED ON THIS TABLE SHOWSRAINFALL IN INCHES DURING FIVE MONTHSOF THE YEARS 1960, 1970, AND 1980.":150:19:V$M$"THE TITLE OF THE GRAPH IS RAINFALL."I$;%I0:69:N$;:150:69:19:J$"THE HORIZONTAL AXIS IS LABELED MONTH.(THIS IS NOT NEEDED FOR A PIE GRAPH.)"I$;:I1:69:N$;:150:69:19:J$"THE VERTICAL AXIS IS LABELED INCHES.(THIS IS NOT NEEDED FOR A PIE GRAPH.)"I$;&I2:69:N$;:150:69:19:J$"THE NAMES OF THE THREE "T$DM$"ARE SHOWN AT THE TOP OF THESE COLUMNS."I$;:148:N$;:150:148&19:J$"THE LEGENDS FOR THE HORIZONTAL AXISARE SHOWN IN THE FIRST COLUMN."I$;:J0:149:N$;:150:149:J13:ZZ$("FIRST SECONDTHIRD",J65,5(J2))m'19:J$"THE VALUES FOR THE "ZZ$" SET OF DATAARE SHOWN IN THIS COLUMN."I$;:149:N$;:150:149:J:19:J$"THIS ENTRY MEANS 3.4 INCHES OF RAINFALL IN THE MONTH OF JUNE IN 1970.";(9:22:I$"3.4"N$;:150:9:22:"3.4";:19:J$U$"SEE THE GRAPHOF THIS EXAMPLE? "D$;:11:R$"Y"Ģ19:V$M$"GETTING GRAPH...";:57:167:150(MOZM:O10:O20:65:M(I35:V(I):H(I):LL(I):ZZ$G$(IO1):80::(I04:6I:2J9(J0)2:K$D$(JO2,I);::(24:6:"PRESS SPACE BAR TO CONTINUE";:152(7:(A32)(A13)152:151(16368,0:c)RAINFALL,MONTH,INCHES,1960,1970,1980,MARCH,3.5,3.6,3.6,APRIL,3.5,6.9,4.1: MAY,3.1,2.3,0.5,JUNE,1.7,3.4,4.1,JULY,1.3,0.6,0.4)18:V$M$U$"STORE THIS INFORMATIONFOR FUTURE USE? ";:11:R$"N"161:*19:J$"WHAT NAME DO YOU WANT TO GIVE THE DATAON THE DISKETTE?":23:12:R$"":ZL16:ZX$"":ZC$" "ESC$:ZT1:21:5271R$:(R$)0161b*(R$)16157:R$R$(ST$,16(R$))*R$R$".DATA ":X$"":I130:X$X$(((R$,I,1))128)::R$X$:S1511:4870,S:4864:X06:372:T255159:T0158:(CN$(X),4)R$162+X:S0+1:M$:D(966):X$R$:321:DFİ65:103;+970,1H+67:104+18:V$M$" THIS NAME HAS ALREADY BEEN USED.";:150:155+961,1:320:165+961,0+34,0:35,24:P$:12:"GETTING GRAPH MENU..."+1:M$D$"RUN MENU OF 3,D1",188:181:TC0ı$,GT208,243:7,167:TC0104,R$A$"1"S$:ZZ$A$"0":22:M$R$"OPTIONS: A"ZZ$"=ADJUST SCALE"27)R$"C"ZZ$"=CHANGE DATA"M$10)R$"Q"ZZ$"=MENU"27);:331,7:R$"C"İ65:104,R$"Q"163,R$"A"ī261-333:EFĢ22:V$;:ZZ$"GRAPH":327:170#-171[-M(Y0Y1)(MXMN):Y3Y0(MMN):P1:DD0:I0:X$"."-229:I10179:LII:235:SC$(P)R$:X(SC$(P)):PP1:XDDDDX-177-X0(DD3)7:X02(X02)X0X01--176:DL0DD8ı.DLDL(DD7):DL0DL0.181R.X$".":DL0:I0TR1:JO21O2TC:4608D$(J,I),X$,X:X0186p.L(D$(J,I))X:LDLDLL{.J,I:.SS$("-",1(X0)):X$SS$(((X)T(DL)1)T(DL)):/S90:64:X1279:Y111:Y0131:MX1E10:MN1E10:TC0:TR0:I1O23O2:LL%(I,12):L0193I/TCTC1:X%(TC)I:M0:K0L1:ML%(I,K)ML%(I,K)`/:MM1:MTRTRM/P(I,L%(I,0))MNMNP(I,L%(I,0))/P(I,L%(I,L1))MXMXP(I,L%(I,L1))/I:MN0MN0/184:MNMN:MX0MN0X3:201/MX0X0:201 0MN0X5:201,0DMX(MXMN):D.7X4:201?0D.5X3:201R0D.3X2:201Z0X1p0X0EMXX:203{0EMN50X5FMN(5X):2050FMX50GX:FEEF0XE:187:IN(X$):IN0INT(DL)1MN(G5)IN:MXMNIN5:R10:R2TR1:R50:"IL%(DC,12)1132F"IIL%(DC,12)2:L%(DC,I)L%(DC,I1):e"L%(DC,12)L%(DC,12)1:127"L%(I,12)0137:P(I,13)P(I,12)L%(I,12):XL%(I,12)2:X(X)P(I,14)(P(I,L%(I,X1))P(I,L%(I,X)))2:135"P(I,14)P(I,L%(I,X))O#X0:MP(I,13):";:LS13:P0:X%(LS)1304KA 7:R$"L"ĴR10288:R1R11:PR1:304:288yA!R$"R"ĴR1R2288:R1R11:PR1:304:288A"A13288:22:J$"PRESS THE L OR R KEY TO MOVE THE END"L$M$"OF THE GRAPH LEFT OR RIGHT.";:LS14:PR21:304!B#7:R$"L"ĴR)M:K0K1Mm3YY3KM:Y4Y:226:YY4:Y2Y3(Y3Y):Y4Y2:226:Y2Y4:Y2YĭY(Y01)YY1ĴJ224,222,2203J223,221,21935:KY2Y2(Y2Y):X,KXW1,K:3XXBW:22537:KY2Y(Y2Y):X,KXW2,K:3XXBW:22546:KY2Y(Y2Y):X,KXW1,K:4XXW;47:J:XXSP(TC2):I:N4Y4Y1Y4Y1:c4Y4Y01Y4Y01i44IIMNINI:IIMX1T(DL)I94II1:4X(L)5T(DL1):75:R$("-",1,(L)0)ZZ$:X$".":4608R$,X$,Y:Y0Y(R$):DL0R$R$".":YY1;5(R$)YDLR$(R$,YDL(DL0)):R$"."234:R$"0":b5R$R$("00000000",1,DL(R$)Y):h55231:(R$,1)"."R$"0"R$5(R$,2)"-."R$"-0"(R$,2)55P$;:7:0,171279,171:(0MN)(0MX)ēX0,Y3X1,Y3/6XX01X01:X,Y12X,Y0::YY0Y02:X01,YX1,Y::43:P1:I0G6229:JII:I102426XX0(SC$(P))77:YY3JM2.5:4352SC$(P),X,Y:X03,Y3X03,Y3:PP1:24066238:V21:48:ZE1:ZT0:38:ZE0:PWX1X0TR:W(PWTR):W2(W2)WW177W1PWTRW:W2W12:W5W:X7X0W2:W4W:XX0W2W2:X2(X2)XX18X6X:IR1R2:L(W41)8:R$(D$(O2,I),L):5271R$:X4X((R$)8)22.5:YY05:R$R$(" ",1,(R$)0):4352R$,X4,Y:J1TC:KP(X%(J),I):YY3MK:253:J:XXW:I:XX6:IR1R2:J1TC:KP(X%(J),I):YY3MK:YY1YY01247+87:JX2,Y2=8J:XXW:I:_8X5X:Y5Y:Y4Y01:KY1Y4Y1{8X4X((YY4)W)(YK):8X5XW:Y5K8Y4Y01:YY1Y4Y18X4XW((KY4)W)(KY):8KX%(J10):X%(J10)Y:(IR1)(IL%(J,12))ı9KY1KY01ĴYY1YY01259:248:257:9YY1YY01İ250:257i95(J3)(J2):XW,KX,Y:XW1,KX1,Y:95(J3)(J2):X4,Y4X5,Y5:X41,Y4X51,Y599KY1ĴYY1258:Y5Y1:X5X((YY5)W)(YK):251:257:YY01258:Y5Y01:X5X((YY5)W)(YK):251:257T:S9S90:MXR3:MNR4:INR5:DLR6:R10:TRR7:R2TR1:181:168:S91:J1114:X%(J)1::ZX1:ZY10:ZX$(ST$,12):12:1:3:E$;:J16:((SC$(J))IN)1T(DL)KJ::J25:JKP(SC$(J)):311;:X%(31)DL:X%(36)DL:X%(30K)DL%; M2MX:LS11:J6:PR3:297; 22:J$"TYPE A MAXIMUM VALUE OR PRESS L OR S KEYTO MAKE THE VALUE LARGER OR SMALLER.";; (R$)ZLPM2:314 < V:H:MX(R$):M2MX:YMX:299:ZC$"-.":ZX$"LS":ZE$" "(0)ESC$ZX$:ZU32:ZT2:15:ZZ$"L"MXMXAD:2706< ZZ$"S"271:MXMXAD:MXMNMXM2I<LMX:231:267<315:X%(36)DL:MX(R$):MXMNĢ22:J$"MAXIMUM MUST BE LARGER THAN MINIMUM.";:150:R$(M2):266=YMX:299:4:PR3:312:PMX:314:SC$(J)R$:313:H:V:(ST$,ZL);:PR3:311:M1MN:LS12:J1:PR4:297w=22:J$"TYPE A MINIMUM VALUE OR PRESS L OR S KEYTO MAKE THE VALUE LARGER OR SMALLER.";=(R$)ZLPM1:314>V:H:MN(R$):M1MN:YMN:299:ZC$".-":ZX$"LS":ZE$" "(0)ESC$ZX$:ZU32:ZT2:15:ZZ$"L"277:MNMNAD:MNMXMNM1">LMN:231:274=>ZZ$"S"MNMNAD:276>MN(R$):MNMXĢ22:J$"MINIMUM MUST BE SMALLER THAN MAXIMUM.";:150:LM1:231:273C?315:X%(31)DL:YMN:299:4:PR4:312:PMN:314:SC$(J)R$:313:H:V:(ST$,ZL);:PR4:311:PR5:JK:297:ZLDD:DLX%(K30):22:J$"TYPE THE INCREMENT VALUE.";:PIN:314?V:H:ZC$".":ZX$"":ZE$" "(0)ESC$:ZU32:ZT2:15:315:X%(30K)DL:IN(R$):IN0ĭ(MXMN)IN7283?ZX$"LARGER"?22:J$"TYPE A "ZX$" INCREMENT VALUE.";:280@IN(MXMN)ZX$"SMALLER":282@PR5:4:312:PIN:314:SC$(K)R$:313:V:H:(ST$,ZL);:PR5:311:DL0:X31:285:X36:285:X30K:285:287@DLX%(X)DLX%(X)@A22:J$"PRESS THE L OR R KEY TO MOVE THE"M$K$"BEGINNING OF THE GRAPH LEFT OR RIGHT.P2)SPSP1E2XX0((X1X0W4TRSP(TR1))2):X2(X2)XX13W5WBW(TC1)SP:X7XSP22:IR1R2:L(W4SP1)8:R$(D$(O2,I),L):5271R$:X4XW42((R$)8)2.5:YY05:R$R$(" ",1,(R$)0):4352R$,X4,Y:J1TC:KP(X%(J),I):(K)1MK(KH(X7.5)1:R$SC$(J):5271R$:AD2M:1T(DL)ADAD1T(DL)CC*^C+X%(LS)(Y3YM.5)ıC,7:X1X06:0:X%(LS)0ĕ4X02,X%(LS)C-X9Y3YM.5:X9Y1X9Y0X%(LS)1:303C.X%(LS)X9:4X02,X%(LS)C/1:C0X%(LS)X7W5Pı0D17:Y0Y1:48:X%(LS)0ĕ4X%(LS),Y01:4X%(LS)1,Y01ID2PTRX%(LS)1:310cD3P0X%(LS)X02:309D4X%(LS)X7W5P:X%(LS)X%(LS)(X%(LS)2(X%(LS)2))D54X%(LS),Y01:4X%(LS)1,Y01D61:0:E7XX0(SC$(J))77:YY3PM2.5:4352SC$(J),X,Y:jE8Y((Y3PM)8)8:DLX%(J30):ZLDD:X((X07ZL7)7)7:X2,Y4X06,Y4X06,Y8X2,Y8X2,Y4:E9R$(ST$,1,ZL(R$))R$:E:LP:231E;X$".":4608R$,X$,DL:DL0ıE<DL(R$)DL:E=317E>X$"TEMP.DATA":D1NF?1:M$D$"OPEN "X$",D"D:D$"READ "X$:I05:G$(I)::I03:J011:D$(I,J):J,I:D$"CLOSE":57:eF@X$"TEMP.DATA":D1FADF0:F1$X$:1:M$D$"OPEN "X$",D"D:DF322:D$"WRITE "X$:DF322:I05:QT$G$(I)QT$:DF322::I03:J011:QT$D$(I,J)QT$:DF322:J,I:D$"CLOSE"GBD$(4):6145:bGC768:(76868)2Ģ22:J$"YOUR PRINTER IS NOT TURNED ON AND READY.";:150:HDSL(962):PT(963):SX(964):J1(54):J2(55):54,240:55,253::::11:"ONE MOMENT PLEASE...":54,J1:55,J2::6,SL:7,SX:M$D$"PR#"SL::(9)"K"(27)"N":PT3Č3840:3260HEI$"GR"("D",1,(SX1))JHFL$M$D$"PR#0":6145:HG336:22:J$U$"IDENTIFY YOUR "ZZ$"? ";:11:R$"N"330jIH22:J$Y$"NAME: ";:I0:329:22:J$Y$"CLASS NAME: ";:I1:329:22:J$Y$"PROJECT NAME: ";:I2:329:22:J$"TYPE THE DATE: ";:I3:329:22:V$K$PI$(0);:40(PI$(1)):PI$(1):PI$(2);:40(PI$(3)):PI$(3);:323:22:V$;:IIR$PI$(I):ZE0:ZT3:ZL36(36):ZC$SP$:ZX$"":13:PI$(I)R$:IJ22:V$;:323IK(965)0ĺ" ";:JLS$A$"1P"A$"0=PRINT GRAPH";:JMEF0:(965)0ı)JNR$"P"EF1/JOJP22:J$"SELECT THE SIZE OF YOUR "ZZ$" PRINT-OUT: "10)A$1"S"A$0"= SMALL "A$1"L"A$0"= LARGE ";JQ7:R$"S"R$"L"339JR337JS964,12(R$"L"):-KT4876:5092,(966):LL0:FS0:LS0:MX0:ST2R1291:R2R21:PR21:304:291SB$R$"R"ĴR2TR1291:R2R21:PR21:304:291B%A13291:22:V$A$1"OPTIONS: A"A$0"=ADJUST SCALE "A$1"G"A$0"=GRAPH";B&7:R$"A"265B'R$"G"TRR2R11:181:168:170B(294=C)311:7:312:VY81:HANGE DATA"13)ZA$"Q"ZZ$"=MENU"28);:230:O$S$;C<6:ZA$"C"48S=ZA$"Q"52e>ZA$"A"ī163?232:EFĢ22:M$F$;:ZZ$"GRAPH":225:59@60AK101BMM(ST(MX,K)ST(MN,K)):K0ST(M,K)(X1X0)MM:X3X0ST(M,K)ST(MN,K):68$CST(M,$1"D"A$0" = CURSOR DOWN":A$1" >"A$0" = SELECT DATA";:22:A$1"<"A$0" = PUT DATA BACK"LY24:8:"PRESS RETURN WHEN FINISHED";:34,3:35,18:P1:BST:TP1:152LZX%(TPP1)0X$SC$(P):348L[X$ST$M\P3:3:I$K$X$N$;:7:3:K$X$;:R$"U"A11ĴP1354:PP1:346@M]R$"D"A10ĴPTP1B357:PP1:346fM^A21ĴX%(TPP1)0346:365:346M_A8ĴX%(TPP1)0346:360:346M`A13LNFS:34,0:35,24:Ma346MbTP1346:XTP1:377:TPTP1:BMXBB1:356McBTP14BB1,Nd5                y0 2396145:A$(1):B$(2):C$(3):D$(4):E$(5):F$(6):I$(9):K$(11):L$(12):M$(13):N$(14):O$(15):P$(16):S$(19):W$(23)G DM$M$M$:QT$(34):ESC$(27):TYPE$(4)"LINES":J$M$F$S$:DT$(11,14),PI$(3),GT$(11),CN$(6),SC$(16),CN(15),X%(105),P(11,14),L%(11,15),T(10),HT(5),ST(9,1),X(3),Y(3),B(15,7)) NULL$(160)" "(160):SP$"!#$%&()'*:=-+;,./><][{}\|~`^@ "(34)ESC$:ZA$"":ST$" ":RT$(21):UA$(11)(10):AR$UA$(8)RT$:4876:4867CN$:O10:O20:232,0:233,12:0:1:7:T1:I010:T(I)T:TT10: V(0)1:V(1)3:V(2)3:V(3)5:V(4)5:V(5)5:H(0)3:H(1)4:H(2)27:H(3)4:H(4)17:H(5)30:HT(0)2:HT(1)8:HT(2)15:HT(3)21:HT(4)28:HT(5)34:L(0)36:L(1)12:L(2)12:L(3)8:L(4)8:L(5)8:20 A(16384):A1286:51:A15590 AA128:A97A122AA32? ZA$(A):j A(16384):A1289:51:A1557:55 ZT0:ZU32:ZA$"":ZC$ESC$"YN":ZL1:13: K$;:VZY((ZZ$)2.5)1:ZZ1(ZZ$):VZZ:ZX:(ZZ$,ZZ,1);:: ZU0 ZE$"[ ]"ESC$ZX$ 2747,ZUJ ZV(37)1:ZH(36):K$;:2049:ZA$ZA$"":(767)2753b 5271ZA$:ZX$""18 ZZ$((767)):4608ZX$,ZZ$,ZP:ZX$"" 7: 12:ZZZE:ZE$NULL$:ZE1:2049:ZEZZ:ZA$ZA$"":7:k GT(960):X$"TEMP.DATA":F1$X$:1:M$D$"OPEN "X$",D1":D$"READ "X$:I05:GT$(I)::I05:J014:DT$(O2I,J):J,I:I03:PI$(I)::D$"CLOSE":32:58 ZE$NULL$:ZL8:V:1:K$"A - ";:ZA$GT$(3O1):ZE119,15:GT$(3O1)ZA$:TC125V:14:K$"B - ";:ZA$GT$(4O1):ZE119,15:GT$(4O1)ZA$:TC225EV:27:K$"C - ";:ZA$GT$(5O1):ZE119,15:GT$(5O1)ZA$K[27:28:29ZX$GT$(O1):L36:C32:30:1:3:K$ZA$;:ZX1:ZY10:ZX$GT$(2O1):L12:C32:30:ZZ$ZA$:11ZX$GT$(1O1)(" ",1,(GT$(1O1))0):ZX(X0X1)2(ZX$)3.5:ZY148:4352ZX$,ZX,ZY:/ZX$""ZX$(C)K4871,L:4872,C:4873:w IO25O2:II23āJ015:L%(I,J)0:J!L8:J014:ZZ$DT$(I,J):P(I,J)(ZZ$):5271ZZ$:ZZ$""36"K(I2):K2I36:DT$(K2,J)""36#L%(K3,J)1:L%(K,L%(K,15))J:L%(K,15)L%(K,15)1$J,I:6%NL%(I,15)1:KI2i&SW0:J0N1:P(K,L%(I,J))P(K,L%(I,J1))40'TL%(I,J):L%(I,J)L%(I,J1):L%(I,J1)T:SW1(J:NN1:SW38)*IO22O2:37::+(X)1ZZ$(X):,(X)5E7ZZ$"0":-ZZ$"0.":X0ZZ$"-0.":XXk.XX10:X$("0123456789",X1,1):XX(X$):ZZ$ZZ$X$:((ZZ$)9)(X0)46q/022:M$F$M$S$"GETTING DATA...";:961,1:1:M$D$"BRUN RNH.OBJ,D1":38272,"LINE ED"124:6:S$"PRESS "K$"SPACE BAR"L$" TO CONTINUE";:5126:A3250:$316368,0:34961,1:54>5961,0g6P$:12:S$"GETTING GRAPH MENU..."71:M$D$"RUN MENU OF 1"879:659102::560;ZA$A$"1"S$:ZZ$A$"0":22:O$W$M$ZA$"OPTIONS: A"ZZ$"=ADJUST SCALE"28)ZA$"C"ZZ$"=C0:I014:CN(I)100::I0105:X%(I)0::S15ZKUCN(S)0:373:CN(S)7MXMXCN(S)8:343uKVMXMXCN(S):SS1:341KWEF0:MX0EF1:XLXP$:2:2:S$MS$:I1ST:3I:3:K$SC$(I)::0,147279,147:20:A$1"OPTIONS:":" U"A$0" = CURSOR UP";:22:A4,2774,139:0,140271,140:I022(GT3):61::I35:V(I):H(I):LL(I):ZZ$GT$(IO1):72::5:3:K$"LEGEND";:I011:6I:J03:L8(J0):ZZ$DT$(JO2,I):65:2J92(J0):ZZ$;:J,I;MOı<19:1:F$" "K$B$"MEAN"C$"MEDIAN"C$"ST. DEV.")69 HK0DD(SC$(P2)):74AIX087:X02(X02)X0X01IJ:KX$".":ST(DL,K)0:JO2KO2K42:LIJ2:I0L%(LI,15)1:4608DT$(J,L%(LI,I)),X$,X:X077LL(DT$(J,L%(KI,I)))X:LST(DL,K)ST(DL,K)LMI,J:-NSS$("-",1(X0)):                   ~= 3036145:X00:Y00:II0:I0:X%0:Y%0:A$(1):B$(2):C$(3):D$(4):E$(5):F$(6):I$(9):K$(11):L$(12):M$(13):N$(14):P$(16):S$(19):DM$M$M$:QT$(34):ESC$(27):TYPE$(3)"PIE CHARTS":J$M$F$S$ DT$(7,11),GT$(11),CN$(6),SC$(15),CN(15),X%(105),P(7,15),L%(7,12),T(10):NULL$(160)" "(160):SP$"!#$%&()'*:=-+;,./><][{}\|~`^@ "(34)ESC$:ZA$"":ST$" ":RT$(21):UA$(11)(10):AR$UA$(8)RT$:4876:4867CN$ O10:O20:970,0:232,0:233,12:0:1:7:T1:I010:T(I)T:TT10::V(0)1:V(1)3:V(2)3:V(3)5:V(4)5:V(5)5:H(0)3:H(1)2:H(2)20:H(3)13:H(4)22:H(5)31:L(0)36:L(1)12:L(2)12:L(3)7:L(4)7:L(5)7:19 IIAADA1:I%II:3584I%,X%,Y%:X0,Y0X0X%,Y0Y%:: A(16384):A1285:141:A1558$ AA128:A97A122AA323 ZA$(A):` A(16384):A1288:141:A1556:153 ZT0:ZU32:ZA$"":ZC$ESC$"YN":ZL1:12: K$;:VZY((ZZ$)2.5)1:ZZ1(ZZ$):VZZ:ZX:(ZZ$,ZZ,1);:: ZU0 ZE$"[ ]"ESC$ZX$:2747,ZU= ZV(37)1:ZH(36):K$;:2049:ZA$ZA$"":(767)27153U 5271ZA$:ZX$""16~ ZZ$((767)):4608ZX$,ZZ$,ZP:ZX$"" 7: 11:ZZZE:ZE$NULL$:ZE1:2049:ZEZZ:ZA$ZA$"":7: ZU32:12:ZZZE:ZE$NULL$:ZE1:2049:ZEZZ:ZA$ZA$"":7:+ GT(960):(961)Ĺ961,0:226:DC1:1593 43 S457:19:M$F$"DO YOU WANT HELP ENTERING LABELS FOR YOUR GRAPH? ";:9:HELPZA$"Y":HELPS40:23 S3173,91 221:T0:I14:X%(I)(1)1001:TTX%(I):$S0:I14:X%(I)X%(I1)JX%(I):X%(I)X%(I1):X%(I1)J:S10:S24A1260:I14:DA720(X%(I)T):2I2:1:K$(64I)" -":I1Ē5(I2)(I3):4CN(I1)A:AADA:I:7:N4:222:3764,X01:3718:3764,X0:371830:21:M$F$;:31:36:ZA$"Y"2882q0,163279,163:21:M$F$"WHAT IS THE TITLE OF YOUR GRAPH?";:ZA$GT$(0):ZL36:ZC$SP$:ZT3:24:3:11:GT$(0)ZA$:37:22:"TYPE NAMES OF UP TO THREE "TYPE$(GT)":":TC3:V24:ZE1:32:ZE0 ZE$NULL$:ZL7:V:3:("- ",1(GT3),2);:ZA$GT$(3O1):ZE117,13:GT$(3O1)ZA$:TC135n!V:16:("- ",1(GT3),2);:ZA$GT$(4O1):ZE117,13:GT$(4O1)ZA$:TC235"V:29:("- ",1(GT3),2);:ZA$GT$(5O1):ZE117,13:GT$(5O1)ZA$#$21:M$F$;"DO YOU WANT TO CHANGE ANY LABELS? ";:9:&%ZX$GT$(O1):L36:C32:41:1:3:K$ZA$;:;)ZX$""ZX$(C)W*4871,L:4872,C:4873:]+,57:19:M$F$"DO YOU WANT TO USE DATA STORED ON THE"M$"DISKETTE? ";:9:S3(ZA$"Y"):S346-18:M$F$;:21H.S40:SL1:MS$"SELECT A DATA NAME:":256:EFS41:S30:18:J$"THERE IS NO DATA STORED ON THE DISKETTE.";:139:45U/LL044p0299:D(966):227:211I1O23O2:J012:L%(I,J)0:J:P(I,12)0:J011:ZZ$DT$(I,J):P(I,J)(ZZ$):P(I,12)P(I,12)P(I,J):5271ZZ$:ZZ$""512L%(I,L%(I,12))J:L%(I,12)L%(I,12)1"3J,I:34NL%(I,12)15SW0:J0N1:P(I,L%(I,J))P(I,L%(I,J1))TL%(I,J):L%(I,J)L%(I,J1):L%(I,J1)T:SW16J:NN1:SW5378I1O23O2:52::9S41:P$;:7:0,139271,139:0,27271,27:73,2773,139:7K)(Y0Y1)MM:Y3Y0ST(M,K)ST(MN,K)?DP1:D0:JST(MN,K):LJEKQK:142:SC$(PK8)ZA$:X(SC$(PK8)):PP1:JJST(IN,K):LJ:XDDXF(D6)(ST(DL,K)0)71:D5ST(DL,K)ST(DL,K)(D5):ST(DL,K)066:ST(DL,K)0:66GJST(MX,K)1T(ST(DL,K)E FIRST COLUMN."ZI$;:J0:138:ZN$;:139:138$J13:ZZ$("FIRST SECONDTHIRD",J65,5(J2)):19:J$"THE VALUES FOR THE "ZZ$" PIE"DM$"ARE SHOWN IN THIS COLUMN."ZI$;:138:ZN$;:139:138a%J:19:J$"THIS ENTRY MEANS 3.4 "K$"INCHES"L$" OF "K$"RAINFAL(X)1ZZ$(X):,D(X)5E7ZZ$"0":MEZZ$"0.":X0ZZ$"-0.":XXFXX10:X$("0123456789",X1,1):XX(X$):ZZ$ZZ$X$:((ZZ$)9)(X0)70GH65:33,(36)L1:ZZ$E$;:33,40:IS4İ57J183MO:M$F$;:22MO2:1:"(PRESS ? FOR HELP.)";:I04K20MO3:1:E$S$;:I176,77WL"TYPE YOUR GRAPH TITLE.";:78M"TYPE NAMES OF UP TO THREE "TYPE$(GT)".";:78NI80:ZA$GT$(I):ZLL(I):V(I):H(I):ZX$"?":ZE0:ZC$SP$:ZT3:17:ZZ$"?"İ127:74OGT$(I)ZA$:61:II1:75ZPI35:ZA$GT$(I):ZLL(I):V(I):H(I):ZX$"?":ZE0:ZC$SP$:ZT3:17:ZZ$"?"İ127:74QGT$(I)ZA$:LL(I):V(I):H(I):ZZ$ZA$:72::21:M$F$;:82RHELPS4MOİ59SS4İ57TDR0:DC0:DC0185,92UMOĢ18:M$F$;PV193MO:J$"TYPE A LEGEND NAME, OR PRESS THE RIGHT"M$"ARROW KEY TO MOVE TO THE NEXT COLUMN.";WDR6:2:ZT3:ZL8:ZA$DT$(DC,DR):ZX$RT$"?"UA$:ZC$SP$:17:DT$(DC,DR)ZA$:ZG$ZZ$:ZZ$ZA$:L8:65:2:ZZ$;:ZG$RT$91XZG$"?"İ127:86 YZG$(11)DRDR1:DR087:73ZDRDR1:DR1287-[DC1:DR0m\S457:MOĢ18:M$F$M$13)S$"TYPE DATA IN THESE COLUMNS."]ZZ$A$"1"S$:ZX$A$"0":22:1:F$ZZ$"OPTIONS:"15)S$"M"ZX$"=";:MOĺ"DISPLAY STATISTICS":95^"ERASE STATISTICS"_ZZ$"U"ZX$"=UP "ZZ$"D"ZX$"=DOWN "ZZ$"L"ZX$"=LEFT "ZZ$"R"ZX$"=RIGHT "ZZ$"T"ZX$"=TITLES":ZZ$"?"ZX$"=HELP "ZZ$"S"ZX$"=SAVE "ZZ$"G"ZX$"=GRAPH "ZZ$"Q"ZX$"=MENU ";:(965)ĺZZ$"P"ZX$"=PRINT";`141caZA$DT$(DC,DR):OL$ZA$:OLP(DC,DR):ZX$AR$"UDLR?SGTMQ"("P",1,(965)):ZH$ZX$:ZT2:ZC$".- ":ZE0:ZL7:DR6:2DC92(DC0):18:ZG$ZZ$:ZA$""ZZ$"":P(DC,DR)0:99bP(DC,DR)(ZA$):ZZ$ZA$cDT$(DC,DR)ZZ$:L7:DR6:29DC2(DC0):72:112:ZP0104d4608ZH$,ZG$,ZP:ZP105,106,107,108,105,106,107,109,101,143,111,73,102,152,110 e127:92bfMOMO:18:M$F$;:MOĺM$S$"CALCULATING...";:56:126:59:92jg92hDRDR1:DR1297:DR0:DCDC1:DC497:DC0:85iDRDR1:DR097:73jDRDR1:DR1297:DR11:97kDCDC1:DC097:85lDR0mDCDC1:DC497:DC0:85An192MO:M$F$;:ZZ$"DATA":242:91xo18MO3:M$F$;:22:M$S$"GETTING GRAPH...";:159pZA$DT$(DC,DR):OL$ZA$ıq970,0:ZA$""117rOL$""L%(DC,L%(DC,12))DR:L%(DC,12)L%(DC,12)11sP(DC,12)P(DC,12)OLP(DC,DR):IDC:MO0116:L%(I,12)152:121:JDC:627tyuI0L%(DC,12)1:L%(DC,I)DR118::"MESSED UP LINKS":139:vIL%(DC,12)1120wIIL%(DC,12)2:L%(DC,I)L%(DC,I1):xL%(DC,12)L%(DC,12)1:115I yL%(I,12)0125:P(I,13)P(I,12)L%(I,12):XL%(I,12)2:X(X)P(I,14)(P(I,L%(I,X1))P(I,L%(I,X)))2:123b zP(I,14)P(I,L%(I,X)) {X0:MP(I,13):J0L%(I,12)1:XX(MP(I,L%(I,J)))(MP(I,L%(I,J)))::L%(I,12)2P(I,15)0: |P(I,15)(X(L%(I,12)1)) } ~I13:121::i!P$;::O16:O24:I05:GT$(IO1)::I04:J03:DT$(JO2,I):J,I:ZMMO:MO0:GT3GT0:57:GT3:129q!57@"19:J$"THE DATA ENTERED ON THIS TABLE SHOWS"M$"RAINFALL IN INCHES DURING FIVE MONTHS"M$"OF THE YEARS 1960, 1970, AND 1980.":139:ZI$I$:ZN$N$:19:M$F$M$S$"THE TITLE OF THE GRAPH IS "K$"RAINFALL."ZI$;"I0:61:ZN$;:139:61:19:J$"THE HORIZONTAL AXIS IS LABELED "K$"MONTH."DM$"(THIS IS NOT NEEDED FOR A PIE GRAPH.)"ZI$;#I1:61:ZN$;:139:61:19:J$"THE VERTICAL AXIS IS LABELED "K$"INCHES."DM$"(THIS IS NOT NEEDED ON A PIE GRAPH.)"ZI$;:I2:61:ZN$;:139:61:19:J$"THE NAMES OF THE THREE "TYPE$(GT)" ARE"DM$"SHOWN AT THE TOP OF THESE COLUMNS."ZI$;-$137:ZN$;:139:137:19:J$"THE LEGENDS FOR THE PIE SECTIONS ARE"DM$"SHOWN IN THD$;:J13:62::V=ZX$GT$(IO1):LL(I):C3263(ZX$""):41:V(I):H(I):K$ZA$;:>I1315:I6:XP(JO2,I):L8:67:2J92(J0):63:I:?(ZZ$)LZZ$(ZZ$,L((ZZ$,L,1)"."))@72A5271ZZ$:ZZ$""ZX$"":C95:41:ZZ$ZA$BC$"0"PP$.415(PP$):I0PP$"1000"ĺ" ";Y4(PP$,(PP$)1)"."(PP$,1);:I0ĺ"%"_457:P$;:28,128:62454:R72:X0183:Y084:PI3.14:0,171279,171:ZLL:37:ZX$GT$(O12JO2):L8:C32:41:LZL:ZY161:ZX112:4352ZA$,ZX,ZY:3774,Y0:3764,X035:V(I):H(I):LL(I):ZZ$GT$(IO1):72::_&I04:6I:2J9(J0)2:K$DT$(JO2,I);::&24:6:S$"PRESS "K$"SPACE BAR"L$" TO CONTINUE";:141&5:A32A13141:140&16368,0:P' RAINFALL,MONTH,INCHES,1960,1970,1980: MARCH,3.5,2.6,1.7,APRIL,3.5,6.9,2.1: MAY,3.1,2.3,1.6, JUNE,1.7,3.4,2.1: JULY,1.3,2.1,0.7'18:M$F$M$"DO YOU WANT TO STORE THIS INFORMATION"DM$"FOR FUTURE USE? ";:9:ZA$"N"150@(19:J$"WHAT NAME DO YOU WANT TO GIVE THE DATA"M$"ON THE DISKETTE?":23:12:ZA$"":ZL16:ZX$"":ZC$" "ESC$:ZT1:18:5271ZA$:(ZA$)0150l((ZA$)16146:ZA$ZA$(ST$,16(ZA$)))ZA$ZA$".DATA ":X$"":I130:X$X$(((ZA$,I,1))128)::ZA$X$:4876:5092,(966):S1511:4870,S:4864:X06:288:T255148:T0147:(CN$(X),4)ZA$151&)X:SR)1:M$:X$ZA$:D(966):229:DFİ57:91])970,1i)59:92)18:M$F$M$" THIS NAME HAS ALREADY BEEN USED.";:139:144)961,1:228:154)961,0*34,0:35,24:P$:12:S$"GETTING GRAPH MENU...":1:M$D$"RUN MENU OF 3,D1"-*178:TC0ı5*P1U*198:PP1:PTCİ139:157[*m*178:TC092u*P1~*198*ZA$A$"1"S$:ZZ$A$"0":22:M$ZA$"OPTIONS: C"ZZ$"=CHANGE DATA"27)ZA$"Q"ZZ$"=MENU":TC1164+10)ZA$"N"ZZ$"=NEXT PIE GRAPH";+27);:247/+5:ZA$"C"İ57:92@+ZA$"Q"152k+(TC1)ĭZA$"N"PP1:PTC161:160+249:EFĢ22:M$F$;:ZZ$"GRAPH":242:162+165+8465:SC$(P)ZA$:X(SC$(P)):PP1:JJIN:LLINT(DL):XDDX+JMX170 ,X0(D3(D8))7:X02(X02)X0X01&,l,X$".":DL0:I0TR1:JO21O2TC1:4608DT$(J,I),X$,X:X0176,L(DT$(J,I))X:LDLDLL,J,I:,SS$("-",1(X0)):X$SS$(((X)T(DL)1)T(DL)):--S90:56:X1279:Y111:Y0131:MX1E10:MN1E10:TC0:TR0:I1O23O2:LL%(I,12):L0183d-TCTC1:X%(TC)I:M0:K0L1:ML%(I,K)ML%(I,K){-:MM1:MTRTRM-P(I,L%(I,0))MNMNP(I,L%(I,0))-P(I,L%(I,L1))MXMXP(I,L%(I,L1))-I:MN0MN0-174:MNMN:MX0MN0X3:191.MX0X0:191'.MN0X5:191G.DMX(MXMN):D.7X4:191Z.D.5X3:191m.D.3X2:191u.X1.X0EMXX:193.EMN5.X5FMN(5X):195.FMX5.GX:FEEF.XE:177:IN(X$):IN0INT(DL)9/MN(G5)IN:MXMNIN5:R10:R2TR1:R3MX:R4MN:R5IN:R6DL:R7TR:~/JX%(P):LL%(J,12):T0:I0L1:P(J,L%(J,I))0TTP(J,L%(J,I))/:T0Ģ19:J$"NO POSITIVE DATA TO GRAPH.";:139:19:J$;:2060221:A1350:NL:EF0:I0L1:DA(P(J,L%(J,I))720T.5):CN(I)A:DA30NI1:EF1:202,0AADA:I0I%630:3584I%,X%,Y%:7:X0,Y0X0X%,Y0Y%:CN(N)630:I0N1:CI4(I4)4:CC(C6)(13C)(C5):I1N(C4C5)C70C:ACN(I):DAACN(I1):EFIN12071C44:K(A(DA2)).01745332:XR.6(K)X02.5:YR.6(K)Y03:ZA$(I65):IIY1Y7:4:X1,IIX7,II::4352ZA$,X,Y:3I(1(L8)):1:K$ZA$"-"DT$(O2,L%(J,I));:216:17:3764,X01:3718:3764,X0:3718:22211MI:EF0:IML1:ZA$"O":LNZA$(65I) 2P(J,L%(J,I))0ZA$"*":EF1h23I(1(L8)):1:K$ZA$"-"DT$(O2,L%(J,I));:216::DAA630:4:A630:NLZA$(64L):2112ZA$"Other":DA902122K(A(DA2)).01745332:X1X0(R2)(K):Y1Y0(R2)(K):XX1(ZA$)3.51.5:Y12:213I3K(A(DA2)).01745332:XR.65(K)X016.5:YR.65(K)Y03:IIY1Y7:4:X1,IIX(ZA$)7,II:34352ZA$,X,Y:EFĢ17:M$"* INDICATES"M$"NEGATIVE VALUE.";3Y12ēX1,Y1X1,22:X11,Y1X11,2232053P4P(J,L%(J,I)):P40P40 4PP$((P4T1000.5)):(PP$)1PPL"L$M$"IN THE "K$"MONTH"L$" OF "K$"JUNE"L$" IN 1970."D$;:9:22:ZI$"3.4"ZN$;:139:9:22:"3.4";%19:J$"DO YOU WANT TO SEE THE GRAPH"M$"OF THIS EXAMPLE? ";:9:ZA$"Y"Ģ19:M$F$M$"GETTING GRAPH...";:49:155:139%MOZM:O10:O20:57::,&I#"YN:415kD"ERROR #"YE" IN LINE #"YN" IN PROGRAM"M$"PIE."DM$"PLEASE REPORT THIS ERROR TO "K$"MECC."L$vD139:DDM$"PLEASE CHECK YOUR DISK DRIVE"DM$"AND DISKETTE."D139:1::864:DFĊ0D E"INFORMATION.";:YE(220):YN(221):DF(2:J011:DT$(I,J):J,I:D$"CLOSE":49:?6X$"TEMP.DATA":D16DF0:F1$X$:1:M$D$"OPEN "X$",D"D:DF230:D$"WRITE "X$:DF230:I05:QT$GT$(I)QT$:DF230::I03:J011:QT$DT$(I,J)QT$:DF230:J,I:D$"CLOSE"6D$(4):6145:>7768:(76868)2Ģ22:J$"YOUR PRINTER IS NOT TURNED ON AND READY.";:139:`7SL(962):PT(963):SX(964)7J1(54):J2(55):54,240:55,253::::11:"ONE MOMENT PLEASE...":54,J1:55,J2::6,SL:7,SX:M$D$"PR#"SL::(9)"K"(27)"N":PT3Č3840:2418I$"GR"("D",1,(SX1))*8L$M$D$"PR#0":6145:s8252:22:J$"DO YOU WANT TO IDENTIFY YOUR "ZZ$"? ";:9:ZA$"N"246922:J$"TYPE YOUR NAME: ";:I0:245:22:J$"TYPE YOUR CLASS NAME: ";:I1:245:22:J$"TYPE YOUR PROJECT NAME: ";:I2:245:22:J$"TYPE THE DATE: ";:I3:245w922:M$F$K$PI$(0);:40(PI$(1)):PI$(1):PI$(2);:40(PI$(3)):PI$(3);:231:22:M$F$;:9ZA$PI$(I):ZE0:ZT3:ZL36(36):ZC$SP$:ZX$"":11:PI$(I)ZA$:922:M$F$;:2319(965)0ĺ" ";::S$A$"1P"A$"0=PRINT GRAPH";:):EF0:(965)0ı;:ZA$"P"EF1A::22:J$"SELECT THE SIZE OF YOUR "ZZ$" PRINT-OUT: "10)A$1S$"S"A$0"= SMALL "A$1S$"L"A$0"= LARGE ";:5:ZA$"S"ZA$"L"255:253:964,12(ZA$"L"):D;4876:5092,(966):LL0:FS0:LS0:MX0:ST0:I014:CN(I)100::I0105:X%(I)0::S15q;CN(S)0:289:CN(S)7MXMXCN(S)8:259;MXMXCN(S):SS1:257;EF0:MX0EF1:q<P$:2:2:S$MS$:I1ST:3I:3:K$SC$(I)::0,147279,147:20:A$1S$"OPTIONS:":" U"A$0" = CURSOR UP";:22:A$1S$"D"A$0" = CURSOR DOWN":A$1" >"A$0" = SELECT DATA";:22:A$1"<"A$0" = PUT DATA BACK"<24:8:S$"PRESS "K$"RETURN"L$" WHEN FINISHED";:34,3:35,18:P1:BST:TP1:141<X%(TPP1)0X$SC$(P):264<X$ST$7=P3:3:I$K$X$N$;:5:3:K$X$;:ZA$"U"A11ĴP1270:PP1:262b= ZA$"D"A10ĴPTP1B273:PP1:262= A21ĴX%(TPP1)0262:281:262= A8ĴX%(TPP1)0262:276:262= A13LNFS:34,0:35,24:= 262>TP1262:XTP1:293:TPTP1:BMXBB1:272>BTP14BB1N>5111SC$:SC$(1)X$:P1BTP1:274::P1:262>BMX262:XB1:293:TPTP1:BB1:5150SC$:SC$(15)X$:19:M$;:274:262>P3:3:E$;:X%(TPP1)0ĺSC$(P);:>21:SC$(P);:?TPP1FSIX%(FS):X%(FS)0:FSI:280 ?IFS-?RX%(I):RTPP1IR:278P?X%(I)X%(R):X%(R)0:RLSLSIa?LLLL1:286?LL0X%(TPP1)200:FSTPP1:LSFS:LL1:286?X%(TPP1)200:X%(LS)TPP1:LSTPP1:LLLL1:LLSL286@LLLL1:IX%(FS):X%(FS)0:(FSTP)(FSB)2852@3FSTP1:3:K$SC$(FSTP1);:21:ST$;;@FSIj@P3:3:X%(TPP1)0ĺSC$(P);:21:ST$;:@ST$;:21:SC$(P);:@ T%X:5189T%:TT%:@!4870,S:4864:X06:288:T255CN(S)CN(S)8:292A"TCN(S)CN(S)1:ST15STST1:SC$(ST)(CN$(X),4,16)A#XA$$A%Q15;A&LCN(Q):L7LL8UA'LXQQ1:XXL:294uA(LX:QSSQ:4870,S:4864A)X1:I1LA*XX1:288:T0298::X$(CN$(X),4,16):A+LNTPLNB301A,X$SC$(LNTP1):302A-XLN:293 B.X$X$".DATA":LNX%(LN):CB/DF0:S40:YE(222):YN(218)(219)256:YE255Ĭ{B0P$DM$:YE6ĺ"DISK ERROR. FILE NOT FOUND.":420aC1YE9ĺ"THERE IS NO MORE ROOM TO STORE DATA ON THIS DISKETTE."DM$"TO STORE MORE DATA ON THIS DISKETTE, ASKYOUR TEACHER TO ERASE DATA YOU NO LONGERWANT, OR USE ANOTHER DISKETTE. SEE THE TEACHER'S MANUAL FOR MORE ";:435C2YE8ĺ"DISK I/O ERROR.":420CYE4ĺ"PLEASE REMOVE THE WRITE-PROTECT TAB"M$"FROM YOUR DISKETTE.":425 DYE0YE16ĺ"DISK ERROR #"YE" IN LINE :3718:Q5II0N1:JCN(II):I%J:3584I%,X%,Y%:X1X0X%:Y1Y0Y%:X0,Y0X1,Y15JJ1:I%J:3584I%,X1%,Y1%:X%X1%Y%Y1%2235X0,Y0X0X1%,Y0Y1%::52255X$"TEMP.DATA":D1(61:M$D$"OPEN "X$",D"D:D$"READ "X$:I05:GT$(I)::I03IPI2:LN20054756:26I8IO25O2:II23āJ015:L%(I,J)0:J9L8:J014:ZZ$DT$(I,J):P(I,J)(ZZ$):5271ZZ$:ZZ$""60:K(I2):K2I60:DT$(K2,J)""60;L%(K3,J)1:L%(K,L%(K,15))J:L%(K,15)L%(K,15)1<J,I:=NL%(I,15)                !!! ! ! ! ! !!!!!!!!!""" " " " " """""""""   SB 3026145:A$(1):B$(2):C$(3):D$(4):E$(5):F$(6):I$(9):K$(11):L$(12):M$(13):N$(14):P$(16):S$(19):DM$M$M$:QT$(34):ESC$(27):TYPE$(4)"LINES":J$M$F$S$ DT$(11,14),PI$(3),GT$(11),CN$(6),SC$(16),CN(15),X%(105),P(11,14),L%(11,15),T(10),HT(5),ST(9,1),X(3),Y(3),B(14,7),FL$(2):NULL$(160)" "(160):SP$"!#$%&()'*:=-+;,./><][{}\|~`^@ "(34)ESC$:ZA$""( ST$" ":RT$(21):UA$(11)(10):AR$UA$(8)RT$:4876:4867CN$:O10:O20:970,0:X$".LINE":LI$"":I15:LI$LI$(((X$,I,1))128): 232,0:233,12:0:1:7:T1:I010:T(I)T:TT10::V(0)1:V(1)3:V(2)3:V(3)5:V(4)5:V(5)5:H(0)3:H(1)4:H(2)27:H(3)4:H(4)17:H(5)30:HT(0)2:HT(1)8:HT(2)15:HT(3)21:HT(4)28:HT(5)34:L(0)36:L(1)12:L(2)12:L(3)8:L(4)8:L(5)8:24C A(16384):A1285:133:A1558d AA128:A97A122AA32s ZA$(A): A(16384):A1288:133:A1556:153 5271ZZ$:ZZ$""ZX$"":C95:11:ZZ$ZA$ ZX$""ZX$(C) 4871,L:4872,C:4873:I I014:6I:J05:ZZ$DT$(JO2,I):L5:9:HT(J):ZZ$;:J,I:70x ZT0:ZU32:ZA$"":ZC$ESC$"YN":ZL1:17: K$;:VZY((ZZ$)2.5)1:ZZ1(ZZ$):VZZ:ZX:(ZZ$,ZZ,1);:: ZU0 ZE$"[ ]"ESC$ZX$:2747,ZU& ZV(37)1:ZH(36):K$;:2049:ZA$ZA$"":(767)27153> 5271ZA$:ZX$""21g ZZ$((767)):4608ZX$,ZZ$,ZP:ZX$""p 7: 16:ZZZE:ZE$NULL$:ZE1:2049:ZEZZ:ZA$ZA$"":7: ZU32:17:ZZZE:ZE$NULL$:ZE1:2049:ZEZZ:ZA$ZA$"":7: GT(960):(961)Ĺ961,0:24348S469:21:M$F$"DO YOU WANT HELP ENTERING LABELS FOR YOUR GRAPH? ";:14:HELPZA$"Y":HELPS40:28S3175,9034:XX015:I16:Y(Y0Y1)(1)Y1:I130X,YX2,Y2:X1,YX21,Y2X2X:Y2Y:XX25(1)10:I+35:36:21:M$F$;:37:42:ZA$"Y"317!69:89"P$;:28,128:62454:7:X1279:Y111:Y0131:X070:Y3Y0:XX01X01:X,Y12X,Y0::YY0Y02:X01,YX1,Y::YY0Y1(Y0Y1)5:X03,YX03,Y::XX0X1(X1X03)5:X,Y02X,Y04:X1,Y02X1,Y04::#0,163279,163:21:M$F$"WHAT IS THE TITLE OF YOUR GRAPH?":ZA$GT$(0):ZL36:ZC$SP$:ZT3:24:3:16:GT$(0)ZA$:44:N$21:M$F$"TYPE LABEL FOR THE HORIZONTAL AXIS (X):":ZA$GT$(1):ZL12:24:15:16:ZZ$ZA$:46:GT$(1)ZZ$:46:21:M$F$"TYPE LABEL FOR THE VERTICAL AXIS (Y):":ZA$GT$(2):24:15:16:GT$(2)ZA$:45:%22:"TYPE NAMES OF UP TO THREE LINES:":TC3:V24:ZE1:38:ZE0&ZE$NULL$:ZL8:V:1:K$"A - ";:ZA$GT$(3O1):ZE122,18:GT$(3O1)ZA$:TC141/'V:14:K$"B - ";:ZA$GT$(4O1):ZE122,18:GT$(4O1)ZA$:TC241m(V:27:K$"C - ";:ZA$GT$(5O1):ZE122,18:GT$(5O1)ZA$s)*21:M$F$;"DO YOU WANT TO CHANGE ANY LABELS? ";:14:+44:45:46,ZX$GT$(O1):L36:C32:11:1:3:K$ZA$;:$-ZX1:ZY10:ZX$GT$(2O1):L12:C32:11:ZZ$ZA$:15c.ZX$GT$(1O1):L12:C32:11:ZX105:ZY148:4352ZA$,ZX,ZY:i0169:21:M$F$"DO YOU WANT TO USE DATA STORED ON THE"M$"DISKETTE? ";:14:S3(ZA$"Y"):S351221:M$F$;:26k3S40:SL3:MS$"SELECT ONE, TWO, OR THREE DATA NAMES:":257:EFS41:S30:21:F$M$S$"THERE IS NO DATA STORED ON THE DISKETTE.";:131:50x4LL0495PI06S0:301:1:M$D$"OPEN "X$",D"(966):D$"READ "X$:GT$(PI2O13):IPIPI1:J014:DT$(IO2,J):J,I:970,1:D$"CLOSE":P23):445E1:M$D$"CLOSE"'E455@E1:M$D$"DELETE "F1$tED$"":220,YE:221,YN:223,DF:DF1:961,0:303}E425$E425E%JJJ42:I014:6I:HT(J):K$DT$(JO2,I);:I,J:r%24:6:S$"PRESS "K$"SPACE BAR"L$" TO CONTINUE";:133%5:A32A13133:132%16368,0:q& EXERCISE,MINUTES,PULSE RATE,Kim,Lynn,Marion: 0,60.1,0,70.3,0,81.4,1,70.1,1,83.2,1,98.2: 2,71:I35:71::3:1:K$"X:";:24:"Y:";:IO11O12:V(IO1):H(IO1):LL(IO1):ZZ$GT$(I):74::13F7:45,4345,160:136,43136,160:227,43227,160:0,27279,27:0,28279,28:GZX$GT$(IO1):LL(I):C3263(ZX$""):11:V(I):H(I):K$ZA$;:%J9:33,(36)L1:K$ZZ$E$;:33,40:2KS4İ69eL21:M$F$;:24:1:"(PRESS ? FOR HELP.)";:I0M22:1:E$S$;:I178,79,80,81N"TYPE YOUR GRAPH TITLE.";:82O"TYPE YOUR X-AXIS LABEL.";:82P"TYPE YOUR Y-AXIS LABEL.";:82$Q"TYPE NAMES OF UP TO THREE "TYPE$(GT)".";0RI387SZA$GT$(I):ZLL(I):V(I):H(I):ZX$"?":ZE0:ZC$SP$:ZT3:22:ZZ$"?"İ119:76TGT$(I)ZA$:I0LL(I):V(I):H(I):ZZ$ZA$:74:86U71VII1:77*WI35:ZA$GT$(I):ZLL(I):V(I):H(I):ZX$"?":ZE0:ZC$SP$:ZT3:22:ZZ$"?"İ119:76JXGT$(I)ZA$:71::21:M$F$;]YDC0:DR0:I12ZS469:22:1:F$A$1S$"OPTIONS:":ZZ$A$"1"S$:ZX$A$"0":ZZ$"U"ZX$"=UP "ZZ$"D"ZX$"=DOWN "ZZ$"L"ZX$"=LEFT "ZZ$"R"ZX$"=RIGHT "ZZ$"T"ZX$"=TITLES"_Z$"?"ZX$"=HELP "ZZ$"S"ZX$"=SAVE "ZZ$"G"ZX$"=GRAPH "ZZ$"Q"ZX$"=MENU ";:(965)ĺZZ$"P"ZX$"=PRINT";x\133:D2(DC2):114']ZA$DT$(DC,DR):OL$ZA$:OLP(DC,DR):ZX$AR$"UDLR?SGTQ"("P",1,(965)):ZH$ZX$:ZT2:ZC$".- ":ZE0:ZL5:DR6:HT(DC):23:D2(DC2):ZG$ZZ$:ZA$""ZZ$"":P(DC,DR)0:95C^P(DC,DR)(ZA$):ZZ$ZA$_DT$(DC,DR)ZZ$:L5:DR6:HT(DC):74:HT((DC2)21)1:"|";:ZA$DT$(DC,DR):ZA$OL$107:ZP098`4608ZH$,ZG$,ZP:ZP101,102,103,104,101,102,103,105,97,116,117,118,152,106a119:90&bDC2(DC2)DCDC1:114FcDRDR1:DR15DCDC1:114Od104ieDRDR1:DR093:75fDRDR1:DR1593:DR14:93gDCDC1:DC0114:DC0:114hDR0iDCDC1:DC6114:DC0:114j115:21:M$F$;:ZZ$"DATA":248:90#k970,0:KD22:KK(KDC):ZA$""110ylOL$""ĴDT$(K,DR)""109:L%(D23,DR)1:L%(D2,L%(D2,15))DR:L%(D2,15)L%(D2,15)1mnL%(D23,DR)0109:L%(D23,DR)0:I0L%(D2,15)1:L%(D2,I)DR111::"MESSED UP LINKS":131:oIL%(D2,15)1113$pIIL%(D2,15)2:L%(D2,I)L%(D2,I1):CqL%(D2,15)L%(D2,15)1:110zrII1:128:IDC(DC2)21:I1I:I$;:128:N$;:93sII1:128t115:136u115:160v115:75 wP$;::O16:O26:I05:GT$(IO1)::I014:J05:DT$(JO2,I):J,I:ZMMO:MO0 x69:20:M$F$;:X$"The numbers in these tables are the":Z$"coordinates of points for three lines.":127:131:ZI$I$:ZN$N$:20:M$F$ZI$;:X$"The title of the graph will be":Z$"EXERCISE.":127:I0:71:ZN$;:131:71!y20:M$F$ZI$;:X$"The horizontal or X-axis will be ":Z$"labeled MINUTES.":127:I1:128:ZN$;:131:128:20:M$F$ZI$;:X$"The vertical or Y-axis will be":Z$"labeled PULSE RATE.":127:I2:128:ZN$;:131:128"z20:M$F$K$ZI$;:X$"The names of the three lines":Z$"are shown at the top of these tables.":127:129:ZN$;:131:129:20:M$F$I$;:X$"The X coordinates are shown in the":Z$"first columns of each table.":127#{J0:130:ZN$;:131:J0:130:20:M$F$ZI$;:X$"The Y coordinates are shown in the":Z$"second columns of the table.":127#|J1:130:ZN$;:131:J1:130:20:M$F$;:X$"This entry means a PULSE RATE for LYNN":Z$"of 123.1 after 6.1 MINUTES.":127:13:HT(2):ZI$"6.1";:HT(3):"123.1"ZN$;:131:13:HT(2):"6.1";:HT(3):"123.1";l$}20:M$F$M$S$"DO YOU WANT TO SEE THE GRAPH"M$"OF THIS EXAMPLE? ";:14:ZA$"Y"Ģ22:M$F$M$"GETTING GRAPH...";:56:174:161:197:131$~MOZM:O10:O20:69::$ZY2183:ZX1:4352X$,ZX,ZY:ZYZY8:4352Z$,ZX,ZY:$V(I):H(I):LL(I):ZZ$GT$(IO1):74:$I35:71::81:KI2:>SW0:J0N1:P(K,L%(I,J))P(K,L%(I,J1))65?P(K,L%(I,J))P(K,L%(I,J1))ĭP(K1,L%(I,J))P(K1,L%(I,J1))65@66ATL%(I,J):L%(I,J)L%(I,J1):L%(I,J1)T:SW1BJ:NN1:SW62CDIO222O22:61::hES41:P$;:I0:1:204 5X4X02208:X5X02B5238:X4X5:Y4Y5:EF213:209X5X4X1X5X1:207p5Y4Y01211:Y5Y05240:X4X5:Y4Y5:EF213:2125Y4Y1Y5Y1:2105EF0:X,YX4,Y4:X1,YX41,Y455X4X(LI1)X(LI1)X4:Y(LI1)Y4:216#6.4,9.8,103.4,,,10.1,80.3,10.6,100.1,,,11.2,75.6,11.8,95.2,,,13.5,70.5,12.9,86.2,,,,,15.0,82.3'20:M$F$M$S$"DO YOU WANT TO STORE THIS INFORMATION"M$"FOR FUTURE USE? ";:14:ZA$"N"149(FL$(0)"":FL$(1)"":FL$(2)"":L%(0,15)L%(1,15)L%(2,15)0149(II02:L%(II,15)0145(20:M$F$M$S$"WHAT NAME DO YOU WANT TO GIVE THE "("FIRST SECONDTHIRD",II61,6):23:"LINE?":24:12:ZA$FL$(II):ZL16:ZX$"":ZC$" "ESC$:ZT1:23:5271ZA$:(ZA$)0FL$(II)"":145)(ZA$)16141:ZA$ZA$(ST$,16(ZA$))4)ZA$ZA$".LINE ":ZA$FL$(II)145U)I02:IIIZA$FL$(I)151):FL$(II)ZA$:X$"":I130:X$X$(((ZA$,I,1))128)::ZA$X$:4876:5092,(966):S1511:4870,S:4864:X06:289:T255145:T0144:(CN$(X),4)ZA$151*X:S7*II:21:J$"ANY CHANGES? ";:14:ZA$"Y"138_*II02:L%(II,15)0FL$(II)""148+1:M$:DF0:F1$FL$(II):D$"OPEN "FL$(II)",D"(966):DF150:D$"WRITE "FL$(II):DF150:QT$GT$(II3)QT$:DF150:III2II21:J014:QT$DT$(I,J)QT$:DF150:J,I:D$"CLOSE"!+II:970,1-+70:90G+D$(4):6145:69:89+FL$(II)"":20:M$F$M$" THIS NAME HAS ALREADY BEEN USED.";:131:139+961,1:157:154+961,0,34,0:35,24:P$:12:S$"GETTING GRAPH MENU...":1:M$D$"RUN MENU OF 1,D1"",I02:L%(I,15)0Ă:933,21:J$:159,DF0:X$"TEMP.DATA":F1$X$:1:M$D$"OPEN "X$",D1":DF158:D$"WRITE "X$:DF158:I05:QT$GT$(I)QT$::DF158:I05:J014:QT$DT$(I,J)QT$:DF158:J,I:I03:QT$PI$(I)QT$:DF158::D$"CLOSE "X$-6145:D$(4):P$;:a-157:12:"GETTING GRAPH..."M$D$"BRUN RNH.OBJ,D1":38272,"LINE GR"j-155-TS0:K101:MM(ST(MX,K)ST(MN,K)):K0ST(M,K)(X1X0)MM:X3X0ST(M,K)ST(MN,K):163-ST(M,K)(Y0Y1)MM:Y3Y0ST(M,K)ST(MN,K)$.P1:D0:JST(MN,K):LJT(ST(DL,K)):X$".".KQK:232:SC$(PK8)ZA$:X(SC$(PK8)):PP1:JJST(IN,K):LLST(IN,K)T(ST(DL,K)):XDDX.K0TSTSX.JST(MX,K)164.K0169.D5:X0(D3(D8))7:X02(X02)X0X01.:R/X$".":ST(DL,K)0:JO2KO2K42:LIJ2:I0L%(LI,15)1:4608DT$(J,L%(LI,I)),X$,X:X0172/L(DT$(J,L%(KI,I)))X:LST(DL,K)ST(DL,K)L/I,J:/SS$("-",1(X0)):X$SS$(((X)T(ST(DL,K))1)T(ST(DL,K))):b0MN0:MX1:IN2:DL3:M4:S90:68:X1248:Y111:Y0130:K01:ST(MX,K)1E10:ST(MN,K)1E10:IKO2KO242:LI(I2):LL%(LI,15):L01800K0178:J0L1:P(I,L%(LI,J))ST(MN,K)ST(MN,K)P(I,L%(LI,J))0P(I,L%(LI,J))ST(MX,K)ST(MX,K)P(I,L%(LI,J))0:1801P(I,L%(LI,0))ST(MN,K)ST(MN,K)P(I,L%(LI,0))O1P(I,L%(LI,L1))ST(MX,K)ST(MX,K)P(I,L%(LI,L1))m1I:ST(MN,K)0ST(MN,K)0x1170:1K:TC0:I02:L%(IO22,15)0X%(TC)IO22:TCTC11:K01:ST(MN,K)ST(MN,K):ST(MX,K)0ST(MN,K)0X3:190 2ST(MX,K)0X0:190&2ST(MN,K)0X5:190X2DST(MX,K)(ST(MX,K)ST(MN,K)):D.7X4:190k2D.5X3:190~2D.3X2:1902X12X0EST(MX,K)X:1922EST(MN,K)52X5FST(MN,K)(5X):1942FST(MX,K)52GX:FEEF23XE:173:ST(IN,K)(X$):ST(IN,K)0ST(IN,K)T(ST(DL,K))3ST(MN,K)(G5)ST(IN,K):ST(MX,K)ST(MN,K)ST(IN,K)5:I04:ST(I5,K)ST(I,K):I,K:3235:V21:ZE1:38:ZE0:LI0TC1:JX%(LI):X(LI1)0:Y(LI1)Y0:I1:II0L%(J,15)14II1:L%(J3,I)0198l47(LI1)(LI2):XX3P(J2,I)ST(M,0):YY3P(J21,I)ST(M,1):X2X:Y2Y:II0218:200:EF1214,2184XX02202:X5X024238:XX5:YY5:EF213:2034XX1X5X1:2014YY01205:Y5Y04240:XX5:YY5:EF213:2065YY1Y5Y75.3,1.5,98.6,2.1,112.4,3.5,87.6,2.6,103.7,3.3,129.6: 4.5,98.2,3.8,129.4,4.4,141.5,5.0,107.1,4.7,139.6,5.0,161.5]' 6.1,94.3,5.0,143.4,5.8,149.8,7.5,86.5,6.1,123.1,6.6,128.6: 8.3,70.3,7.3,101.6,7.8,118.1,9.5,60.6,8.4,99.1,8.9,111.6: 10.1,60.3,9.2,86T$; EFSI;EP3:3:X%(TPP1)0ĺSC$(P);:21:ST$;:TE ST$;:21:SC$(P);:E!X$CN$(X):T(X$):T0T255T255T:E"T((X$,20,5)LI$):E#4870,S:4864:X06:289:T255CN(S)CN(S)8:294 F$TCN(S)CN(S)1:ST15STST1:SC$(ST)(C)0XX(I):YY(I):ZA$(64I):22577X%(I40)12277C0:ZA$"":X0:Y0:J1TC:X%(J40)1ZA$ZA$(J64):X%(J40)1:XXX(J):YYY(J):CC17:XXC:YYC7X022774:IIX2X(ZA$)72:II,Y4II,Y5::XX3:YY3:4352ZA$,X,Y8:D8XX(I)X(J):YY(I)Y(J):(XXYY)10X%(I40)1:X%(J40)1J88ZA$((L)((L))T(ST(DL,KQ))):4608ZA$,X$,Y:Y0Y(ZA$):ST(DL,KQ)0ZA$ZA$".":YY18ZA$ZA$("00000000",1,ST(DL,KQ)(ZA$)Y):8230:(ZA$,1)"."ZA$"0"ZA$$9(ZA$,2)"-."ZA$"-0."(ZA$,3)*99P$;:28,128:62454:7:0,171279,171:(0ST(MN,1))(0ST(MX,1))ēX0,Y3X12,Y3^:XX01X01:X,Y12X,Y0::YY0Y02:X01,YX12,Y::43:P9:JST(MN,1)ST(MX,1)ST(IN,1):XX0(SC$(P))77:Y((Y3(SC$(P))ST(M,1)2.5)2)2:4352SC$(P),X,Y:X03,Y3X03,Y3:PP1:J:S1((X1X0)((TS5)7)):P1:K1:JST(MN,0)ST(MX,0)ST(IN,0):XX3JST(M,0):X,Y02X,Y04:X1,Y02X1,Y04:X((X(SC$(P))3.51)2)2:YY07:4352SC$(P),X,Y:PP1:K3K:J:$;(X5XX5X4)(X5XX5X4)EF1:I;EF0:Y5Y(X5X)(Y4Y)(X4X):o;(Y5YY5Y4)(Y5YY5Y4)EF1:;EF0:X5X(Y5Y)(X4X)(Y4Y):;2423<X$"TEMP.DATA":1:M$D$"OPEN "X$",D1":D$"READ "X$:I05:GT$(I)::I05:J014:DT$(O2I,J):J,I:I03:PI$(I)::D$"CLOSE":56:S41:69:89<768:(76868)2Ģ22:J$"YOUR PRINTER IS NOT TURNED ON AND READY.";:131:6=SL(962):PT(963):SX(964):J1(54):J2(55):54,240:55,253::::11:"ONE MOMENT PLEASE...":54,J1:55,J2::6,SL:7,SX:M$D$"PR#"SL::(9)"K"(27)"N":PT3Č3840:247Q=I$"GR"("D",1,(SX1))k=L$M$D$"PR#0":6145:=253:22:J$"DO YOU WANT TO IDENTIFY YOUR "ZZ$"? ";:14:ZA$"N"252Z>22:J$"TYPE YOUR NAME: ";:I0:251:22:J$"TYPE YOUR CLASS NAME: ";:I1:251:22:J$"TYPE YOUR PROJECT NAME: ";:I2:251:22:J$"TYPE THE DATE: ";:I3:251>22:M$F$K$PI$(0);:40(PI$(1)):PI$(1):PI$(2);:40(PI$(3)):PI$(3);:244:22:M$F$;:>ZA$PI$(I):ZE0:ZT3:ZL36(36):ZC$SP$:ZX$"":16:PI$(I)ZA$:?22:M$F$;:244{?22:J$"SELECT THE SIZE OF YOUR "ZZ$" PRINT-OUT: "10)A$1S$"S"A$0"= SMALL "A$1S$"L"A$0"= LARGE ";?5:ZA$"S"ZA$"L"256?254?964,12(ZA$"L"):@4876:5092,(966):LL0:FS0:LS0:MX0:ST0:I014:CN(I)100::I0105:X%(I)0::S15B@CN(S)0:291:CN(S)7MXMXCN(S)8:260]@MXMXCN(S):SS1:258s@EF0:MX0EF1:BAP$:2:2:S$MS$:I1ST:3I:3:K$SC$(I)::0,147279,147:20:A$1S$"OPTIONS:":" U"A$0" = CURSOR UP";:22:A$1S$"D"A$0" = CURSOR DOWN":A$1" >"A$0" = SELECT DATA";:22:A$1"<"A$0" = PUT DATA BACK"A24:6:S$"PRESS "K$"RETURN"L$" WHEN FINISHED";:34,3:35,18:P1:BST:TP1:133AX%(TPP1)0X$SC$(P):265AX$ST$B P3:3:I$K$X$N$;:5:3:K$X$;:ZA$"U"A11ĴP1271:PP1:2633B ZA$"D"A10ĴPTP1B274:PP1:263YB A21ĴX%(TPP1)0263:282:263~B A8ĴX%(TPP1)0263:277:263B A13LNFS:34,0:35,24:B263BTP1263:XTP1:295:TPTP1:BMXBB1:273BBTP14BB1C5111SC$:SC$(1)X$:P1BTP1:275::P1:263mCBMX263:XB1:295:TPTP1:BB1:5150SC$:SC$(15)X$:19:M$;:275:263CP3:3:E$;:X%(TPP1)0ĺSC$(P);:C21:SC$(P);:CTPP1FSIX%(FS):X%(FS)0:FSI:281CIFSCRX%(I):RTPP1IR:279!DX%(I)X%(R):X%(R)0:RLSLSI2DLLLL1:287eDLL0X%(TPP1)200:FSTPP1:LSFS:LL1:287DX%(TPP1)200:X%(LS)TPP1:LSTPP1:LLLL1:LLSL287DLLLL1:IX%(FS):X%(FS)0:(FSTP)(FSB)286E3FSTP1:3:K$SC$(FSTP1);:21:SX4X(LI1)ĭY4Y(LI1)Y(LI1)Y4K6XX(LI1)X(LI1)X:Y(LI1)Y:218o6XX(LI1)ĭYY(LI1)Y(LI1)Y6X4X2:Y4Y2:II:LI:I4143:X%(I)0::TC12216I1:J2:228:TC22216I1:J3:228:I2:J3:228"7X(0)0:Y(0)0:I1TC:X%(I40