' +JJJJ ?\>m0M='+l> /+l  P˵B̵CõDĵEµµBD ĵ ⵭µ ۰ µL` B H@Aﳈ  @A ਦ@A LL$ 鷎귭෍ᷩ췩緈JJJJx i L8ᷭ緍췩 i 8 `巬 췌`x (`(8`I`B` ``>J>J>VU)?`8'x0|&HhHh VY)'&Y)xꪽ)' `Hh`V0^*^*>&` aI꽌ɪVɭ&Y&&Y& 꽌ɪ\8`&&꽌ɪɖ'*&%&,E'зЮ꽌ɪФ`+*xS&x'8*3Ixix&& 8  '  & x)*++`FG8`0($ p,&" ʎ L/  !"#$%&'()*+,-./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#01)*#;?;/4>:(+02&<#)#0*Eb ;1h  !"`H !D)"E` @ $ C ` DQ &J80^݌Hh ü ü݌ ռ ռ ռA ļD ļ? ļAEDE?HJ>h Լ ռ ռ ռ`HJ>݌h Hh݌` ƥ LꢭɛL`HIHHHHhHH݌hHhHh݌H6 VDP (ED Z $0x8x D- ܸDD# H8`?E Vk *f???0xE Hh D#-EEE8` D ܸx D - ܸx8`-0ݩ?ʥD EEE`   d@ŵLҦL [` ~  LӜu`".Q`pNФbptťܥm2<(-Py0\޼e<6e<ԍ L}JJJJj귍hI  aUL@ kU8  L  Q^R(jQ0l^l\8õ浍õĵBD` L[W ԧ H h@ [_ /QSIRb_L`LLLL`ª`LQLYLeLXLeLee ўQH\(h0L& $`( R \ZLl8 ўR HH\`\Z[YS6`LxQɿu3'RͲʎRʎ]]]ɍuL͟ɍ}RLRɍg^H8 ^hZLɍR LͲɊRR% QLܤͲ Z@ -^ ş\[Z QY\[Z8`l6Lş_Ȍb_Ͳ] )Y h( ֭ͲLɍ [LLĦ__ ^ 9 LҦ3 9 a   0LjLY u< (_9 ˭ɠuɠK_9 ?LˆʎõĵL õ ĵµ aµ`` L̦µ_bJLLz L^ ۰L^  ȟ QlXJ̥KlV  ȟ QlV eօ3L׮ʊHLQ &RL &QL d L4 Ne)n `@-eff L f`L . tQLѤ LҦL` OPu d L Ne)noon 8ɍ` ^f\õL ^NR  RΩLҦ)\Z ʽ LHv 3h`0h8` [L NС õ`A@` ŵLȿõ` F`  \ 濭0 \  ȟ Q ^\lZl^?cqH şch`fhjõĵ@OAP`u@`@&`QR`E Ls  @DAE@u`8` %@ @A@`@`@A`Mµ ) LЦ`8@AWc@8@-@HAȑ@hHȑ@ȑ@hHȑ@Ȋ@ch8&ȑ@Hȑ@Ah@LHȑ@ȑ@ htphso`hMhL`9V8U897T6S67`INILOASAVRUCHAIDELETLOCUNLOCCLOSREAEXEWRITPOSITIOOPEAPPENRENAMCATALOMONOMOPRINMAXFILEFINBSAVBLOABRUTYP!pppp p p p p`" t""#x"p0p@p@@@p@!y q q t@  LANGUAGE NOT AVAILABLRANGE ERROWRITE PROTECTEEND OF DATFILE NOT FOUNVOLUME MISMATCI/O ERRODISK FULFILE LOCKESYNTAX ERRONO BUFFERS AVAILABLFILE TYPE MISMATCPROGRAM TOO LARGNOT DIRECT COMMANč$3>L[dmx-( 0Ϡ@跻~!Wo*9~~ɬƬ~~~_ j ʪHɪH`Lc (L ܫ㵮赎 ɱ^_ J QL_Ls贩紎 DǴҵԵƴѵӵµȴ 7 ַ :ŵƴѵǴҵȴµ納贍﵎ٵ്ᵭⳍڵL^ѵ-I `  4 ò-յ!  8صٵ紭ﵝ 7L (0+BC  7L HH`LgL{0 HH` õL ꝍ ŤL{ BH [ h`Lo õ ڬL ꝍ ŤL~H hB@ յյ [L (ȴ) ȴ 7L L ( L (ȴL{ƴѵ洩ƴǴҵ 7 ^* B0 HȱBh ӵԵ 8 L8 ݲ` ܫ  / / ED / / ]ƴS0Jȴ ȴ)  紅D贅E B ƴ  / 0L Ν `HD٤DEEhiHLGh ` ŵBѵ-` ѵB-` ܫ XI볩쳢8DH ؿ E𳈈췍Ȍ X0 · JLǵBȵC`,յp` 䯩 R-յյ`յ0` K R-յյ`ɵʵӵԵ` 4 K ( ѵҵLBȱBL8` DBHBH : ַ޵BȭߵBhhӵԵ RBܵmڵ޵ȱBݵm۵ߵ` 䯩LR˵̵ֵ׵`êĪLR E( 8` R` ELRŪƪ`췌 յյI뷭鷭  ˤLª 뷰` Lk ݵܵߵ޵ ^`8ܵ i B8` 9L%ֵȱB׵ ܯ䵍൭嵍 ` DȑB׵BֵO G굎뵎쵬 뵎쵌`` ַ յյ`@ +õm浍õĵL õBĵCصص Qƴ0"Bƴ 󮜳` 0۰ϬBƴ8`i#`ЗLw!0>ﵭ` m ﳐ 7i볍 8 ЉLw`H h ݲL~ `浍국䵍뵩嵠Jm赍嵊mjnnn浈m浍浭m䵍䵐`"L ŵ8ŵH ~(`  d֠ĭРz#(E$,ZZ,1)")"T1%T1%1:PAREN(T1%,0)((E$,ZZ,1)")"):PAREN(T1%,1)ZZL^QZZ^QZZ1T1%:PAREN(ZZ,0)ĭPAREN(ZZ1,0)PAREN(ZZ2,0)20960^QPAREN(ZZ,0)(PAREN(ZZ1,0)PAREN(ZZ2,0))20960._QPAREN(ZZ,1)2E$(E$,PAREN(ZZ,1)1)(((E$,PAREN(ZZ,(E$,1)"("E$E$RE$:208006]QAC%(0)E$E$SI$RE$Q]Q(E$,1)"("E$E$"0"]"QMP%DIV%CO%(0)MC%(0):CO%(1)MC%(1):VA$"":19000:E$E$")/("RE$")":20800],QMP%1MP%2MP%3E$E$")"]@QE$""E$"0"D^QT1%0:ZZ1(E$):(E$,ZZ,1)"("%(1)MC%(1):19000:E$""E$"("RE$")(":20720N\PMP%3E$E$"+("RE$")("\PCC%(0)VA$"":CO%(0)CC%(0):CO%(1)CC%(1):19000:E$""(E$,1)"("E$E$RE$:20740\PCC%(0)E$E$SI$RE$]QAC%(0)VA$"":CO%(0)AC%(0):CO%(1)AC%(1):19000:E$"":20640 [PCY%(0)E$E$SI$RE${[PAY%(0)VA$"y":CO%(0)AY%(0):CO%(1)AY%(1):19000:E$""(E$,1)"("E$E$RE$:20700[PAY%(0)E$E$SI$RE$[PMP%3DIV%E$""E$E$"+(":20720[PMP%3DIV%E$"(":20720/\PMP%3VA$"":CO%(0)MC%(0):COIV%E$""E$E$"+(":206209ZzPMP%2DIV%E$"(":20620Z}PMP%2VA$"":CO%(0)MC%(0):CO%(1)MC%(1):19000:E$""E$"("RE$")(":20620ZPMP%2E$E$"+("RE$")("[PCY%(0)VA$"y":CO%(0)CY%(0):CO%(1)CY%(1):19000:E$""(E$,1)"("E$E$RE$520GYPMP%1VA$"":CO%(0)MC%(0):CO%(1)MC%(1):19000:E$"("RE$")("Y(PCX%(0)VA$"x":CO%(0)CX%(0):CO%(1)CX%(1):19000:E$E$RE$Y2PAX%(0)VA$"x":CO%(0)AX%(0):CO%(1)AX%(1):19000:CX%(0)E$E$SI$RE$:20600YTLJCO%(0)CO%(1)(CO%(0)CO%(1))19100aTVJVA$""RE$(CO%(0)CO%(1)):T`JCO%(0)CO%(1)1RE$VA$:TjJCO%(0)CO%(1)1RE$"-"VA$:ToJCO%(0)CO%(1)0RE$"0":TtJRE$(CO%(0)CO%(1))VA$:UJT1%CO%(0)(CO%(1)):T2%10SHD$(D$,(D$)1):18510^SHT3%:T4%:"(";(1);2;G$;"/";(1);3;DE%;(1);1;")";VA$;(5);SHG1$:G1$(13)G1$(8)18610SHG1$(13)ıSHVA$"":18510S8J CONVERSION ROUTINES9JReduce fractions ifS:JRD% is non-zero.TBJSI$"":CO%("0"G1$"9")(G1$(13)DE%0)(G1$"-"G$"")G1$(8)(G1$"x"G1$"y"DE%0VA$"")18530tRlHG1$(13)ıRqH((D$G1$))3276718530RsHG1$"x"G1$"y"VA$G1$:18600RvHG1$(8)D$D$G1$:18510RHD$""18100SH(D$)1D$"":185:18100*Q,G(G$,1)"x"(G$,1)"y"VA$""FQ6GG$(G$,(G$)1):18100PQDHD$""QNHT3%:T4%:DE%(D$):DE%ĺ(1);2;G$;"/";(1);3;DE%;(1);1;(5);:18530QXH(1);2;G$;"/";(1);1;(5);cRbHG1$:G1$(8)18530:G1$((G1$)32(G1$"A"G1$"Z")):(G1$NU%((G$,(G$)(VA$""))):DE%1:7PFG1$"/"18185WPFG$"x"G$"y"NU%1:18500PFG$"-x"G$"-y"NU%1:DE%1:18500PGNU%((G$,(G$)(VA$""))):18500P GG1$"x"G1$"y"VA$G1$PGG1$(8)G$G$G1$:18100QG(G$)2G$"":VA$"""y"VA$"")(G1$"/"G$""))(VA$""G1$"/"G1$(13)G1$(8))18110kOF((G$G1$))3276718110OFG1$(13)18160OFG$"-"G$"+"18110OFG$"x"G$"y"NU%1:DE%NU%:OFG$"-x"G$"-y"NU%1:DE%1:OFG$""NU%0:DE%1:#PF$;" = ";:18000IngVA$S$(NU%DE%S%(0)S%(1)).0001NU%S%(0)26650nh30000:" Sorry, ";N$;"."::VA$S$:RD%1:CO%(0)L%(0):CO%(1)L%(1):19000:RE$;" ";:CO%(0)A%(0):CO%(1)A%(1):19000:SI$""SI$"-":RE$(RE$,2)EohSI$;" ";RE$;" = ";:CO%(0A%(1):S%(0)L%(0)A%(1)A%(0)L%(1):ZZS%(1)21:WH(S%(0)ZZ)WH(S%(1)ZZ)S%(0)S%(0)ZZ:S%(1)S%(1)ZZumgZZmgVA$S$:RD%1:CO%(0)L%(0):CO%(1)L%(1):19000:RE$;" ";:CO%(0)A%(0):CO%(1)A%(1):19000:SI$""SI$"-":RE$(RE$,2)ngSI$;" ";RE1)DE%:L%(0)LC%(0):L%(1)LC%(1):R%(0)RC%(0):R%(1)RC%(1):26550|lgS$VA$:VP%VP%2:VP%:20000:AX%(0)0:AY%(0)0:AC%(0)0lg30000:" Now you must simplify by combining"::"any like terms.":15000:30000lgA%(0)SI%NU%:A%(1)DE%mmgS%(1)L%(1)5000:30000:E1%E1%1:26100}kgVA$"x"AX%(0)SI%NU%:AX%(1)DE%:L%(0)LX%(0):L%(1)LX%(1):R%(0)RX%(0):R%(1)RX%(1):26550kgVA$"y"AY%(0)SI%NU%:AY%(1)DE%:L%(0)LY%(0):L%(1)LY%(1):R%(0)RY%(0):R%(1)RY%(1):26550@lgVA$""AC%(0)SI%NU%:AC%(ere's no constant term on the left"::"side for you to move.":15000:30000:E1%E1%1:26100kNf30000:" That's not right, ";N$;"."::"To move the constant term, you must"::(OP$,2);:CO%(0)SI%LC%(0):CO%(1)LC%(1):19000:RE$;TF$;"both sides.":1%(0):CO%(1)LSV%(1):VA$OV$CO%(0)SI%LOV%(0):CO%(1)LOV%(1)i0f19000:RE$::(TF$,2);"both sides.":15000:30000:E1%E1%1:26100i:fVA$""(LC%(0)LC%(1)SI%NU%DE%).000126500\jDfLC%(0)İ30000:" That won't do much good, ";N$;"."::"Th"y"LY%(0))İ30000:" I wouldn't do that, ";N$;"."::"There's no ";VA$;" term on the left side for"::"you to move.":15000:30000:E1%E1%1:26100>i&f30000:" That won't work, ";N$;". To move"::"the ";VA$;" term, you must";OP$;:CO%(0)SI%LSV:"the ";SV$;" term to the right side, it won't"::"be the only term on the right side.":15000:30000:E1%E1%1:26100gf((VA$SV$(LSV%(0)LSV%(1)SI%NU%DE%).0001)(VA$OV$(LOV%(0)LOV%(1)SI%NU%DE%).0001))26170hf(VA$"x"LX%(0))(VA$ ":SI%1-fePR$;:18000:G$""İ30000:26100feNU%0İ30000:" ";COP$;"ing zero";TF$;"both sides"::"will have no effect on the equation.":15000:30000:E1%E1%1:wgfVA$SV$(RX%(0)RY%(0)RC%(0))İ30000:" I disagree, ";N$;". If you move":'s not a good idea, ";N$;"."::"Now that you have the ";SV$;" term alone,"::"you should eliminate the coefficient of"::SV$;" by using multiplication or division.":15000:30000:E1%E1%1:feOP$" add ":COP$"Add":PR$"Add to both sides: ":TF$" to"dTbCH$:(CH$)0(CH$)425172Sd\bCH$;:30000:(CH$)26000,27000,28000,29000^dpb25100dc30000:" Nice going, ";N$;".":dc"You have solved the original equation"::"for ";SV$;". You're done with the first step."dceeIV%ĺ" ThatLY%(1):ROV%(0)RY%(0):ROV%(1)RY%(1)c>b30000:19:"1) Add same value to both sides":"2) Subtract same value from both sides"cHb"3) Multiply both sides by same value":"4) Divide both sides by same value"cRb17:(9);"Enter your choice:";(14)" ";4:VP%:1:200);200);:VP%:20000b*bLSV%(0)LY%(0):LSV%(1)LY%(1):RSV%(0)RY%(0):RSV%(1)RY%(1):LOV%(0)LX%(0):LOV%(1)LX%(1):ROV%(0)RX%(0):ROV%(1)RX%(1)$c4bSV$"x"LSV%(0)LX%(0):LSV%(1)LX%(1):RSV%(0)RX%(0):RSV%(1)RX%(1):LOV%(0)LY%(0):LOV%(1)LC%(0)0IV%1babSV$"y"RX%(0)0RY%(0)0RC%(0)0SV$"x"RX%(0)0RY%(0)0RC%(0)0IV%1a bSV$"y"IV%1LY%(0)LY%(1)1SV$"y"IV%1RY%(0)RY%(1)1SV$"x"IV%1LX%(0)LX%(1)1SV$"x"IV%1RX%(0)RX%(1)125500#b%bVP%12İ15000:VP%:AY%(ZZ)ZZ:AC%(ZZ)ZZ:MC%(ZZ)ZZ:ZZ:LMP%0:RMP%0B`aVP%(37)1`a15:(1);2;"________________________________________";(1);1`aVP%:20000`aIV%0`aOV$"x":SV$OV$OV$"y"a bSV$"y"LX%(0)0LY%(0)0LC%(0)0SV$"x"LX%(0)0LY%(0)01)))51PAREN(ZZ,0))(E$,PAREN(ZZ,1)1):20960d_QE$(((E$,PAREN(ZZ,1)))51PAREN(ZZ,0))(E$,2)l_QZZr_Q_aSolve an Equation._aPass variable to be_asolved for in SV$._apass equation as in_aprint routine.2`aZZ01:AX%(ZZ)ZZRX%(0):F1%(1)RX%(1):S$"x":28580O~oF1%(0)RY%(0):F1%(1)RY%(1):S$"y":28580u~oF1%(0)RC%(0):F1%(1)RC%(1):S$""~oF1%(0)(MT6RX%(0)RY%(0))28790~oNF%ĢVP%:20000~oNF%1:oS%(0)F1%(0)F2%(DIV%):S%(1)F1%(1)F2%(DIV%):ZZS%(1)21erm.":15000:30000j}^oMT16:LMP%(MT4)MT:RMP%1(MT4)(MT4):MT28520,28530,28540,28550,28560,28570}hoF1%(0)LX%(0):F1%(1)LX%(1):S$"x":28580}roF1%(0)LY%(0):F1%(1)LY%(1):S$"y":28580}|oF1%(0)LC%(0):F1%(1)LC%(1):S$"":28580!~oF1%(0):15000:30000:|ToF2%(0)NU%:F2%(1)DE%:DIV%(MD(2).5):VP%VP%2:VP%:MC%(0)F2%(0):MC%(1)F2%(1):LMP%1:RMP%1:20000:VP%VP%2:NF%0}Yo30000:" ";COP$;(1883DIV%);" the equation by ";:VA$"":CO%(0)NU%:CO%(1)DE%:19000:RE$;","::"term by t15000:30000:E1%E1%1:X{n" by ";:DE%1ĺNU%:28225{?n(1);2;G$"/";(1);3;DE%;(1);1;(5)|An:"is not incorrect, we prefer that you"::"isolate the y term first."X%(1)ZZ)WH(RY%(0)RY%(1)ZZ)WH(RC%(0)RC%(1)ZZ))28500Uz*nDE%1XX%NU%:28210uz+nNU%DE%XX%NU%DE%:28210z,nXX%DE%NU%{2n(XX%)(B%)28220:" I don't agree, ";N$;"."::"The number you have chosen will not"::"help you solve for y.":%(0):CO%(1)LSV%(1):28190By nCO%(0)RSV%(1):CO%(1)RSV%(0):28190dynCO%(0)RSV%(0):CO%(1)RSV%(1)ynRD%1:19000:RE$;".":15000:E1%E1%1:28100;z(nZZMD(NU%DE%):IV%(WH(LX%(0)LX%(1)ZZ)WH(LY%(0)LY%(1)ZZ)WH(LC%(0)LC%(1)ZZ)WH(RX%(0)RE%NU%)RSV%(0)RSV%(1)).0001))28200xm" That's not right, ";N$;".":18:1:"To eliminate the coefficient of ";SV$;", you"::"should";OP$;"by ";:VA$""xm2(IV%1)(MD(2).5)28160,28170,28180:CO%(0)LSV%(1):CO%(1)LSV%(0):28190ynCO%(0)LSV0:E1%E1%1:wm(MD(NU%DE%))1ĺ" That won't help, ";N$;"."::COP$;"ing by the number you have"::"chosen will only make the coefficients"::"bigger.":15000:30000:E1%E1%1:%xm((IV%1(MD(DE%NU%)LSV%(0)LSV%(1)).0001)(IV%1(MD(Dicated.":15000:30000:E1%E1%1:vmNU%0MD(2).5ĺ" You can't do that, ";N$;"."::"Division by zero is not allowed.":15000:30000:E1%E1%1: wmNU%DE%ĺ" ";COP$;"ing both sides by one will"::"have no effect on the equation.":15000:3000":COP$"Multiply":PR$"Multiply both sides by: "Uum30000:PR$;:18000:G$""28100num30000:G$"0"28140!vmVA$""NU%ĺ" That's a mistake, ";N$;"."::COP$;"ing by a term which has an"::VA$;" in it will only make the equation"::"more compllone,"::"you should eliminate the coefficient of"::SV$;" by using multiplication or division.":15000:30000:E1%E1%1:tiOP$" subtract ":COP$"Subtract":PR$"Subtract from both sides: ":TF$" from ":SI%1ti261000u`mMD(X)X:OP$" multiply 000:E4%E4%1:26710@shS$"x"RX%(0)S%(0):RX%(1)S%(1):26800mshS$"y"RY%(0)S%(0):RY%(1)S%(1):26800shRC%(0)S%(0):RC%(1)S%(1)shVP%VP%2:VP%:20000:{txiIV%ĺ" That's not a good idea, ";N$;"."::"Now that you have the ";SV$;" term a;N$;".":15000:30000:26770rth30000:" Good try, ";N$;"."::RD%1:CO%(0)L%(0):CO%(1)L%(1):19000:RE$;" ";:CO%(0)A%(0):CO%(1)A%(1):19000:SI$""SI$"-":RE$(RE$,2)s~hSI$;" ";RE$;" = ";:CO%(0)S%(0):CO%(1)S%(1):VA$S$:19000:RE$:15000:30 of the equation.":15000:30000qVhRD%1:CO%(0)R%(0):CO%(1)R%(1):19000:RE$;" ";:CO%(0)A%(0):CO%(1)A%(1):19000:SI$""SI$"-":RE$(RE$,2)q`hSI$;" ";RE$;" = ";:18000rjhVA$S$(NU%DE%S%(0)S%(1)).0001NU%S%(0)İ30000:" Excellent, "S%(0)A%(0):S%(1)A%(1):26770BpMhLO%1:VP%2:20000:LO%0:30000pNhS%(1)R%(1)A%(1):S%(0)R%(0)A%(1)A%(0)R%(1):ZZS%(1)21:WH(S%(0)ZZ)WH(S%(1)ZZ)S%(0)S%(0)ZZ:S%(1)S%(1)ZZpOhZZqQh" Now combine like terms on the right"::"side)S%(0):CO%(1)S%(1):VA$S$:19000:RE$:15000:30000:E4%E4%1:26600zoh30000:" That's right, ";N$;".":15000:30000o$hS$"x"LX%(0)S%(0):LX%(1)S%(1):26700o.hS$"y"LY%(0)S%(0):LY%(1)S%(1):26700o8hLC%(0)S%(0):LC%(1)S%(1)pLhR%(0));"Error Summary for Problem #";P%wR5:8:"Error";:33:"Number";:8:(15);(15);"_____";:33:"______";(15);(16)R7:"Solving for a Variable ......... ";:3((E1%)))E1%R9:"Selecting Points ............... ";:3((E2%)))E2%5S11:;:37((P%(ZZ,2))):P%(ZZ,2):ZZEQ9:32:"I":31:"J K":32:"M"Q13:24:"Press ";(9);"RETURN";(14);" when";:24:"the cursor is on":24:"the right point."Q1:0:1204,75:16:1220,58:32:1237,75:48:1220,93Q16000!R(16);615000:30000:PPkP" Now that you've found three points,"::"it's time to plot them.":15000:(16);|PMG%1:10000P175,10266,10:175,12266,12:217,0217,40:219,0219,40:1:29:"x";:36:"y"!QZZ13:ZZ2:30((P%(ZZ,1))):P%(ZZ,1)5%:P%(PP,1)C%A%:62PP:6((P%(PP,2))):P%(PP,2);:HP%:DV$;" = ";P%(PP,1);:33:(5);:36((P%(PP,1))):P%(PP,1):800O 30000:R(3)810,820,830O*" Excellent, ";N$;".":850O4" Nice work, ";N$;".":850O>" That's it, ";N$;"."PR1!ijTY%46100,46200,46300,46400jB%LY%(0)1:RX%(0)A%(B%.05):RX%(1)(B%):RC%(0)C%B%:RC%(1)1}(B%)246140ъ(ZZ(B%)21:WH(RX%(0)ZZ)WH(RX%(1)ZZ)RX%(0)RX%(0)ZZ:RX%(1)RX%(1)ZZي2ZZT.E5%E5%E1%:E6%E6%E2%:E7%E7%E3%:E8%E8%E4%ZT0E1%0:E2%0:E3%0:E4%0rT3P%N%İ15000:1100T822:5:"Press ";(9);"RETURN";(14);" for next problem. ":24:5:"Press "(9);"Q";(14);" to quit.";UBZZ(1):ZZ(16384)128:ZZ"Plotting Points ................ ";:3((E3%)))E3%uS 13:"Calculation Errors ............. ";:3((E4%)))E4%S15:"Total .......................... ";:3((E1%E2%E3%E4%)))E1%E2%E3%E4%SZZE1%E2%E3%E4%:ZZ2ZZ2 T$18:ME$(3G1$"Z")):(G1$"0"G1$"9")(G1$(13)DE%0)(G1$"-"G$"")G1$(8)(G1$"x"G1$"y"DE%0VA$"")18530rlHG1$(13)ırqH((D$G1$))3276718530rsHG1$"x"G1$"y"VA$G1$:18600rvHG1$(8)D$D$G1$:18510rHD$""18100sH()2G$"":VA$"":18100:q,G(G$,1)"x"(G$,1)"y"VA$""Vq6GG$(G$,(G$)1):18100`qDHD$""qNHT3%:T4%:DE%(D$):DE%ĺ(1);2;G$;"/";(1);3;DE%;(1);1;(5);:18530qXH(1);2;G$;"/";(1);1;(5);srbHG1$:G1$(8)18530:G1$((G1$)32(G1$"A"%0:DE%1:3pFNU%((G$,(G$)(VA$""))):DE%1:GpFG1$"/"18185gpFG$"x"G$"y"NU%1:18500pFG$"-x"G$"-y"NU%1:DE%1:18500pGNU%((G$,(G$)(VA$""))):18500p GG1$"x"G1$"y"VA$G1$pGG1$(8)G$G$G1$:18100qG(G$G1$(8)(G1$"-"G$"")(G1$"x"G1$"y"VA$"")(G1$"/"G$""))(VA$""G1$"/"G1$(13)G1$(8))18110oF((G$G1$))3276718110oFG1$(13)18160oFG$"x"G$"y"NU%1:DE%NU%:oFG$"-x"G$"-y"NU%1:DE%1: pFG$""NU2%1ĺT1%;:4nB(1);2;T1%;"/";(1);3;T2%;(1);1;:QnPFGet monomial from user.inZFG$"":G1$"":VA$""ndFT3%(37)1:T4%(36)1nFT3%:T4%:G$;(5);nFG1$:G1$(8)18110:G1$((G1$)32(G1$"A"G1$"Z"))voF((G1$"0"G1$"9")G1$(13)000m@mhBPrint a fraction.8miBPass denominator inTmjBDE%, numerator in NU%.qmkBReduce first if RD%<>0.mrBT1%(NU%)(NU%DE%):T2%(DE%)mwBRD%17040m|BZZT2%21:T1%ZZ(T1%ZZ)T2%ZZ(T2%ZZ)T1%T1%ZZ:T2%T2%ZZmBZZ nBT@ZZAS%11:(XZZXA)TC%(YZZYA)TC%ĂZZblV@HC(XZZXA),VC(YZZYA)HC(X(2)),VC(Y(2))l`@ZZ12:ZZ:Fix prematurely exited FOR loops.mt@13000:" Great, ";N$;". You have graphed:":46000:22:20000:22:1:(6);LS$;" = ";E$:15000:30X(2)):YI(YI)(X(2))(M)Uk@(Y(2))TC%YI(YI)(Y(2)):XI(XI)(Y(2))(M)k$@XX(2)AS%XI:YY(2)AS%YI:YAXI:XAYIk.@ZZAS%11:(XZZXA)TC%(YZZYA)TC%ĂZZk8@HC(XZZXA),VC(YZZYA)HC(X(2)),VC(Y(2))kB@XAXA:YAYA/lLYI5j?ZZAS%11:(XZZXA)TC%(YZZYA)TC%ĂZZhj?HC(XZZXA),VC(YZZYA)HC(X(1)),VC(Y(1))zj?XAXA:YAYAj?ZZAS%11:(XZZXA)TC%(YZZYA)TC%ĂZZj?HC(XZZXA),VC(YZZYA)HC(X(1)),VC(Y(1))k@(X(2))TC%XI(XI)((1))HC(X(2)),VC(Y(2))`i?AS%4:MA%B%:XI((M))(HC(1)HC(0)):YI((M))(VC(1)VC(0))i?(X(1))TC%XI(XI)(X(1)):YI(YI)(X(1))(M)i?(Y(1))TC%YI(YI)(Y(1)):XI(XI)(Y(1))(M)j?XX(1)AS%XI:YY(1)AS%YI:YAXI:XA:16500AhH?P1:XTC%:Y(C%A%X)B%:(Y)TC%X(P)X:Y(P)Y:P2hR?YTC%:X(C%B%Y)A%:(X)TC%X(P)X:Y(P)Y:PP1:P316250h\?YTC%:X(C%B%Y)A%:(X)TC%X(P)X:Y(P)Y:PP1:P316250hf?X(P)TC%:Y(P)(C%A%X(P))B%iz?HC(X(1)),VC(Ye points you plotted.":15000:13000g>A%0ēHC(TC%),VC(C%B%)HC(TC%),VC(C%B%):0:1HC(TC%),VC(C%B%):32:1HC(TC%),VC(C%B%):16500h?B%0ēHC(C%A%),VC(TC%)HC(C%A%),VC(TC%):48:1HC(C%A%),VC(TC%):16:1HC(C%A%),VC(TC%)s. Now it's time to draw the line.":15000:13000:14100Yf>7:24:(22);(6);(25);f>MG%0:10000:ZZ13:4HC(P%(ZZ,1)),VC(P%(ZZ,2)):ZZ#g>13000:" Okay, ";N$;". Now I'm ready to":"finish the graph by drawing a line":"through the thre15020#e:16368,0:24:7:30);:5e>Draw a line.Ne>Pass coordinates ofce>three points inue>P%(1-3,1-2).e>P13:CX%P%(P,1):CY%P%(P,2):12000:15000:P316015:14200e>13000:P;f>" Good job, ";N$;". You found all":"three point:ZZ:24:17);::dx713:24:"Press ";(9);"RETURN";(14);" when";:14:24:"the cursor is on";:15:24:"the right point.":d: WAIT FOR USER TO HIT RETURN.d:16368,0:24:9:"Press "(9)"RETURN to continue.";e:ZZ(1):ZZ(16384):ZZ141.":"There's the point you wanted.";c813HC(CX%),VC(CY%)]cB117:24:(5):19:24:(5):zc2Clear bottom of screen.c221:1:(6);:c6Write an ordered pair.c6Pass coordinates inc6DX% and DY%.c6"(";DX%;",";DY%;")";:d7ZZ1315:V%E8%:40500:V%QT%:40500R^LOC%,(N$):ZZ1(N$):ZZLOC%,((N$,ZZ,1)):ZZX4LOC%,1(V%):V%(V%):LOC%1,V%256(V%256):LOC%2,(V%256):LOC%LOC%3:Ă(Restore variables.҂2LOC%3000j<41500:A%V%:41500:B%V%:41500:C%V%:n):u16:1:(6);:+@Store variables.9JLOC%3000сTV%A%:40500:V%B%:40500:V%C%:40500:V%E1%:40500:V%E2%:40500:V%E3%:40500:V%E4%:40500:V%P%:40500:V%N%:40500:V%K%:40500:V%TY%:40500YV%E5%:40500:V%E6%:40500:V%E7%:40500)51PAREN(ZZ,0))(E$,2) QZZ&QAaCHECK FOR NON-NUMERICYaCHARACTERS IN ZZ$.aBAD0:ZZ1(ZZ$):Z1$(ZZ$,ZZ,1):(Z1$"0"Z1$"9")Z1$"+"Z1$"-"Z1$" "BAD1aZZ:ۀ0uClear bottom of screen.1u(During Choosing Points PortioZ?QZZ1T1%:PAREN(ZZ,0)ĭPAREN(ZZ1,0)PAREN(ZZ2,0)20960vQPAREN(ZZ,0)(PAREN(ZZ1,0)PAREN(ZZ2,0))20960QPAREN(ZZ,1)2E$(E$,PAREN(ZZ,1)1)(((E$,PAREN(ZZ,1)))51PAREN(ZZ,0))(E$,PAREN(ZZ,1)1):20960QE$(((E$,PAREN(ZZ,1))E$"0"X~"QMP%DIV%CO%(0)MC%(0):CO%(1)MC%(1):VA$"":19000:E$E$")/("RE$")":20800y~,QMP%1MP%2MP%3E$E$")"~@QE$""E$"0"~QT1%0:ZZ1(E$):(E$,ZZ,1)"("(E$,ZZ,1)")"T1%T1%1:PAREN(T1%,0)((E$,ZZ,1)")"):PAREN(T1%,1)ZZQZ)("\}PCC%(0)VA$"":CO%(0)CC%(0):CO%(1)CC%(1):19000:E$""(E$,1)"("E$E$RE$:20740v}PCC%(0)E$E$SI$RE$}QAC%(0)VA$"":CO%(0)AC%(0):CO%(1)AC%(1):19000:E$""(E$,1)"("E$E$RE$:20800}QAC%(0)E$E$SI$RE$~Q(E$,1)"("E$Y%(1):19000:E$""(E$,1)"("E$E$RE$:20700I|PAY%(0)E$E$SI$RE$r|PMP%3DIV%E$""E$E$"+(":20720|PMP%3DIV%E$"(":20720|PMP%3VA$"":CO%(0)MC%(0):CO%(1)MC%(1):19000:E$""E$"("RE$")(":20720}PMP%3E$E$"+("RE$":CO%(0)MC%(0):CO%(1)MC%(1):19000:E$""E$"("RE$")(":20620_{PMP%2E$E$"+("RE$")("{PCY%(0)VA$"y":CO%(0)CY%(0):CO%(1)CY%(1):19000:E$""(E$,1)"("E$E$RE$:20640{PCY%(0)E$E$SI$RE$/|PAY%(0)VA$"y":CO%(0)AY%(0):CO%(1)APCX%(0)VA$"x":CO%(0)CX%(0):CO%(1)CX%(1):19000:E$E$RE$z2PAX%(0)VA$"x":CO%(0)AX%(0):CO%(1)AX%(1):19000:CX%(0)E$E$SI$RE$:20600zw$Nin RX%(0&1),RY%(0&1),RC%(0&1).cw%NPass values added to both sidesw&Nin AX%(0&1),AY%(0&1),AC%(0&1).w'NPass constant multiplier inw(NMC%(0&1), positions in LMP%,RMP%.w)NSet DIV% to divide by MC%(0&1).cx*NCX%(0)T1%0T2%0T1%T1%:T2%(T2%)TvJRE$(1)"2"(T1%)"/"(1)"3"(T2%)(1)"1"uvJVA$""RE$"("RE$")"VA$vJRD%CO%(0)T1%:CO%(1)T2%vJv NPrint an equation.v!NPass coefficients of leftv"Nside in LX%(0&1),LY%(0&1),LC%(0&1).w#NT2%T1%X9(T1%):19110HuJT1%T2%(T1%T2%)T1%T1%T2%:T2%1:19120XuJX9(T1%2)uJZZX921:T1%ZZ(T1%ZZ)T2%ZZ(T2%ZZ)T1%T1%ZZ:T2%T2%ZZuJZZuJT2%T1%(T2%T1%)T2%T2%T1%:T1%1uJT1%0T2%0T1%(T1%):T2%(T2%)vJtBJSI$"":CO%(0)CO%(1)0SI$"+"MtLJCO%(0)CO%(1)(CO%(0)CO%(1))19100ptVJVA$""RE$(CO%(0)CO%(1)):t`JCO%(0)CO%(1)1RE$VA$:tjJCO%(0)CO%(1)1RE$"-"VA$:ttJRE$(CO%(0)CO%(1))VA$:tJT1%CO%(0)(CO%(1)):T2%(CO%(1))uJD$)1D$"":18510-sHD$(D$,(D$)1):18510nsHT3%:T4%:"(";(1);2;G$;"/";(1);3;DE%;(1);1;")";VA$;(5);sHG1$:G1$(13)G1$(8)18610sHG1$(13)ısHVA$"":18510s8JConversion Routines9JReduce fractions ifs:JRD% is non-zero."(1,1)0:P%(1,2)1:P%(2,1)1:P%(2,2)3:P%(3,1)2:P%(3,2)7:(16);]ZZ770790:X%:ZZ,X%:ZZ:173,48,192,136,208,5,206,1,3,240,9,202,208,245,174,0,3,76,2,3,96]WH(X)(X(X)).0001]R(X)(X(1)1)]SIGN(X)32R(2)^ PI3.1415926G$:G$"8"1000:G$;:230:14:13:"7";:19:1:"8 - 1 = ";\\G$:G$"7"1010:G$;:230\12:35:"7";:14:1:39):(16);"That's it, "N$"!"::"You have found three points to plot.":20A]A%1:B%4:C%1:Z1%1:MG%1:SS%154:TC%11:2999,255:P%G$"4"960:G$;:230:14:13:"3";:19:1:"4 - 1 = ";U[G$:G$"3"970:G$;:230[10:35:"3";:14:13:"2";:(16);"Enter the x coordinate: ";[G$:G$"2"990:G$;:230:12:5:"2";:14:"y = (4)(2)-1";:14:13:"8";:(16);"4 * 2 = ";<\= ";ZG$:G$"-"920:G$;RZG$:G$"1"930:G$;:230:8:34:"-1";:14:13Z"1 and press . ":(16);"Enter the x coordinate: ";ZG$:G$"1"950:G$;:230:10:5:"1";:14:"y = (4)(1)-1";:14:13:"4";:(16);"4 * 1 = ";6[G$:LYp14:8:"Type 0 and press .";:(16);"Enter the x coordinate: ";kYzG$:G$"0"890:G$;:230Y8:5:"0";:14:"y = (4)(0)-1";:14:13:"0";:(16);"4 * 0 = ";ZG$:G$"0"910:G$;:230:14:13:"-1 and press .":19:"0 - 1 _";(1);1;:34,15:" Now we must find three points on the"::"line represented by this equation. All"::"points must be integers and between"Xf:"-10 and 10.":20:(16):34,16:" To help you out, I will tell you"::"what points to choose.":20quation"::"for y. Your done with the first step.":20nWH34,3:(16):6:5:"x";:14:"y = 4x-1";:35:"y"WR14,49266,49:14,51266,51:56,4056,98:58,4058,98:210,40210,98:212,40212,98X\15:(1);2;"_______________________________________"x"G$"X"790:"x";:230fV 10:22:"4x+(2)/(-2) ":15:13:"-1";:19:1:20);:1:"(2)/(-2) = ";V*G$:G$"-"810:G$;V4G$:G$"1"820:G$;:2307W>10:22:"4x-1 ":34,12:(16);"Nice going, "N$"."::"You have solved the original eype y and press ."::"________________________________________":"(-2y)/(-2) = ";UG$:G$"y"G$"Y"760:"y";:230U10:9:" y";:15:13:"4x and press .":19:"(-8x)/(-2) = "(8);U G$:G$"4"780:G$;VG$:G$__________________________":"Divide both sides by: ";OTG$:G$"-"720:G$;nTG$:G$"2"730:G$;:230T(16):10:9:"(-2y)/(-2) = (-8x+2)/(-2)"::34,11:(16):"Now we must perform the division, term"::"by term.":20YU(16):15:8:"T(16);:16:"-2y = -8x+2"::"Now we must set the coefficient of y"::"equal to one.":15:"Let's use division. Press <4>.":210SG$:G$"4"700:G$;5T34,9:(16):"We must divide by -2.":15:8:"Type -2 and press .":17:"______________6);:11:"8x-8x-2y = -8x+2":9:"Now you must simplify the equation by"::"combining any like terms.":15:8:"Type 0 and press ."R17:"________________________________________":"8x - 8x = ";:G$""RG$:G$"0"680:G$;:230S34,7:e y term, we will"::"subtract 8x from both sides.":15:8:"Type 8x and press .":17:"________________________________________":"Subtract from both sides: ";:G$""QG$:G$"8"640:G$;:G$""QG$:G$"X"G$"x"650:"x";:230R(1_____________________"kPX10:4:"The first step in graphing this"::"equation is to solve it for y.":20Pb34,2:(16);::14:"8x-2y = 2":15:"Let's use subtraction. Press <2>.":210PlG$:G$"2"620:G$;:34,5:(16)Qv:" To isolate th)"Keep trying, "N$". You'll get it."]ME$(8)"Don't be discouraged. You'll get better."cñ41500:E1%V%:41500:E2%V%:41500:E3%V%:41500:E4%V%:41500:P%V%:41500:N%V%:41500:K%V%:41500:TY%V%A41500:E5%V%:41500:E6%V%:41500:E7%V%:41500:E8%V%:41500:QT%V%FN$"":L%(LOC%):ZZ1L%:N$N$((LOC%ZZ)):ZZPLOC%06is."N20:580kN(16):10:" Would you like to review the"::" instructions (Y or N)? ";:G$""NG$:G$"Y"G$"y"ĺ"Y";:240NG$"n"G$"N"530N&"N";N0(16):12:(30(N$))2:"Good luck, ";N$;"." O:5140:2999,128:(4);"wing the":"line through them. That line is the"::"graph of the equation."TM20M(16):5:"After each problem, I will give you a"::"summary of your errors."N10:"When you finish a set of problems, I"::"will give you a total error analysper." L20L(16):3:"If you make a mistake plotting a point,"::"I will help you. You will be able to"::"choose between sound clues and silent"::"clues."LM15:"When you have plotted all three points,"::"I will finish the problem by dra(9);"I";(14);" moves the cursor up."::5);(9);"J";(14);" moves the cursor left."::5);(9);"K";(14);" moves the cursor right."::5);(9);"M";(14);" moves the cursor down."L19:"In case you forget, there is a chart"::"next to the graph pa;(14);"."J20J(16);"To move the cursor, use the ";(9);"I";(14);", ";(9);"J";(14);", ";(9);"K";(14);","::"and ";(9);"M";(14);" keys. If you find these keys and"::"notice their positions, it will make"J:"sense that:":K5); is to plot them."I|7:"I will show you a piece of graph paper."::"At the center of the paper, you will see":"a flashing X, called the cursor." J15:"To plot a point, just move the cursor"::"to the correct location, and press"::(9);"RETURN"nd the corresponding"::"y-value."H^14:"Be sure that the x and y values are"::"integers and between -10 and 10 so that"::"the coordinate can be plotted on our"::"graph."Hh20Ir(16);"When you have chosen three points, your"::"last stepou will solve for x instead of y.")G@20GJ(16);"When the equation is in the proper form,":"you must find three pairs of coordinates":"in order to plot them on the line. For""HT7:"each pair, you will choose the x value."::"I will help you fiblem, I"::"will print the equation at the top of"::"the screen."F,9:"If the equation is not in the form"::"y=mx+b, you will have to solve for y."!G615:"In a few problems, y may not appear in"::"the equation. In these special cases,"::"ytypes of problems. The"::"easier equations are in the form y=mx+b.":"The harder equations are in other forms."E13:"You may choose either type, or you may"::"select a mixture of the two types."E20CF"(16);"When you begin working on a pro1) Add same value to both sides":"2) Subtract same value from both sides"D"3) Multiply both sides by same value":"4) Divide both sides by same value";:19:20:DG$:G$(13)230:DInstructionsD(16);"Hi, ";N$;"!"qE5:"I know two 0:E8%V%:200:QT%V%ICN$"":L%(LOC%):ZZ1L%:N$N$((LOC%ZZ)):ZZTCLOC%0ZCCV%((LOC%)1)((LOC%1)256(LOC%2)):LOC%LOC%3:ID17:1:(1);2;"________________________________________";(1);1:(9)"Enter your choice:";(14)::"56(V%256):LOC%2,(V%256):LOC%LOC%3:CBRestore variables.QBLOC%3000B200:A%V%:200:B%V%:200:C%V%:200:E1%V%:200:E2%V%:200:E3%V%:200:E4%V%:200:P%V%:200:N%V%:200:K%V%:200:TY%V%C200:E5%V%:200:E6%V%:200:E7%V%:20%E1%:120:V%E2%:120:V%E3%:120:V%E4%:120:V%P%:120:V%N%:120:V%K%:120:V%TY%:120AZV%E5%:120:V%E6%:120:V%E7%:120:V%E8%:120:V%QT%:120AdLOC%,(N$):ZZ1(N$):ZZLOC%,((N$,ZZ,1)):ZZAn+BxLOC%,1(V%):V%(V%):LOC%1,V%2렠ƭyour homework."@nME$(2)"Too bad your teacher can't see this."lxME$(3)"Well, we can't all be perfect."ME$(4)"Okay "N$", that was a good try."ȇME$(5)"You almost made it on that one."ME$(6)"These problems are not so easy."'ME$(7캍󍭠󍭠󍭠ZZ 2ZZ): ";w[G$:G$"2"990:G$;:12:5:"2";:14:"y = (4)(2)-1";:(16);"4 * 2 = ":24:13:"Press <8>: ";[G$:G$"8"1000:G$;:19:1:"8 - 1 = ":24:35);:13:"Press <7>: ";[G$:G$"7"1010:G$;a\12:35:"7";:14:1:39):G$:G$"1"950:G$;:10:5:"1";:14:"y = (4)(1)-1";:(16);"4 * 1 = ":24:13:"Press <4>: ";ZG$:G$"4"960:G$;:19:1:"4 - 1 = ":24:35);:13:"Press <3>: ";ZG$:G$"3"970:G$;[10:35:"3";:(16);"Enter the x coordinate: ":24:(16);"4 * 0 = ":24:13:"Press <0>: ";rYG$:G$"0"910:G$;:19:1:"0 - 1 = ":24:35);:13:"Type <-1>: ";YG$:G$"-"920:G$;YG$:G$"1"930:G$;:8:34:"-1";Y(16);"Enter the x coordinate: ":24:35);:13:"Press <1>: ";_Z integers between"Xf:"-10 and 10.":20:(16):34,16:" To help you out, I will tell you"::"what points to choose.":20Xp(16);"Enter the x coordinate: ":24:13:"Press <0>: ";XzG$:G$"0"890:G$;&Y8:5:"0";:14:"y = (4)(0)-1";:66,49:14,51266,51:56,4056,98:58,4058,98:210,40210,98:212,40212,98X\15:(1);2;"________________________________________";(1);1;:34,15:" Now we must find three points on the"::"line represented by this equation. All"::"points must be"810:G$;#V4G$:G$"1"820:G$;V>10:22:"4x-1 ":34,12:(16);"Nice going, "N$"."::"We have solved the original equation"::"for y. We're done with the first step.":20VH34,3:(16):6:5:"x";:14:"y = 4x-1";:35:"y"JWR14,492:" y";:17:1:"(-8x)/(-2) = "(8);:24:1:35);:13:"Type <4x>: ";hU G$:G$"4"780:G$;UG$:G$"x"G$"X"790:"x";U 10:22:"4x+(2)/(-2) ":24:35);:13:"Type <-1>: ";:17:1:20);:1:"(2)/(-2) = ";:24:22 V*G$:G$"-10:9:"(-2y)/(-2) = (-8x+2)/(-2)"::34,11:(16):"Now we must perform the division, term"::"by term.":20T(16):15:"________________________________________":"(-2y)/(-2) = ":24:13:"Press : ";TG$:G$"y"G$"Y"760:"y";NU10:9 division. Press <4>: ";2SG$:G$"4"700:G$;S34,9:(16):"We must divide by -2.":15:"________________________________________":"Divide both sides by: ":24:13:"Type <-2>: ";SG$:G$"-"720:G$;SG$:G$"2"730:G$;mT(16):ike terms."kR15:"________________________________________":"8x - 8x = ";:24:13:"Press <0>: ";:G$""RG$:G$"0"680:G$;S34,7:(16);:16:"-2y = -8x+2"::"Now we must set the coefficient of y"::"equal to one.":210:24:1:"Let's use_____________________________":"Subtract from both sides: ":13:24:"Type <8x>: ";:G$""yQG$:G$"8"640:G$;:G$""QG$:G$"X"G$"x"650:"x"; R(16);:11:"8x-8x-2y = -8x+2":9:"Now we must simplify the equation by"::"combining any luation is to solve it for y.":20yPb34,2:(16);::14:"8x-2y = 2":210:24:1:"Let's use subtraction. Press <2>: ";PlG$:G$"2"620:G$;:34,5:(16)YQv:" To isolate the y term, we will"::"subtract 8x from both sides.":15:"___________blem (Y or N)? ";:G$""7OFG$:G$"N"G$"n"ĺ"N":520UOHG$"Y"G$"y"582:"Y"ON(16);"Graph:";:14:"8x-2y = 2":1:1:(15);(15);"_____"(26):2:"________________________________________" PX10:4:"The first step in graphing this"::"eqӍɠ۫Ӣ󠰭Ӡ䮠欠䮍Ժ宍ɠӍ宠ɠɠ䮍ɧӮ堲Ӯ󮍍΍ԠԠŶՍΠύ嬠ӠԠŵĠԠōĮDz ӍĮdzҍ ΍ȱĮDZ ͺ Ҡԍ ĮƍԠӍԠōҍ սàϠƠ٠ϠֲɠңǬӶIJñãōύԠűԠŲԠųԠŴºúĺźƺôõö÷øùӠ٠٠ϠŽ˺ưưðñòóؠƠӺ٠͠ŠϠźߍàϠƠ٠ϠֲﮮĠΠԠΠ٠ŠˠԠǍӽԠ̠ӠΠ؍ӠҠ˿Ԡ˺ލԠҺĠ˺ĠҺƍԺލĠנӠō¸䠢ĴӢıӶı͠ݍӶIJݍԠˍŠԠӿٍĠΠԠΠ٠ŠˠԠǍàϠƠ٠Ϡֲɠ堢ĴӢ뮍Ӷı묠ݍùºúĺźƺóôõö÷øΠ٠ŠˠԠǍӠ٠٠ϠŽ˺ưưðñò6384,0:(16);xLǢ4:" Please enter your first name (up to"::" ten letters) and press .":::11:"Name: ";VZZ0:ZH0:N$"":G$""`ǾG$:G$(8)51040:ZH(G$):ZH13ZZ0ıэbǭZH851065dǭZZ1051040fǭZH65ZH12251040hƍԺލؠƠӺ٠͠ŠϠźߍàϠƠ٠ϠֲﮮĠΠԠΠ٠ŠˠԠǍԠ̠ӠΠ؍ӠҠ˿Ԡ˺ލԠҺĠ˺ĠҺנӠō¸䠢Ϡ͠ӢıӶı͠ݍӶIJݍԠˍŠԠӿٍɠ렰栲ĠΠԠɧ뮩Ӡ뮍ӶıݍңΠĠΠĠ󮍍ӶıӠݍӵıݍң̠¸͍ŠϠ͠Ӭ̤ӵıĴŠĴӬ̤ӵıӠ󮠨ɧ󮍍Ӎ묠ɧӠӍɧ嬠宠묠ɠ뮠嬠ɠɠ۫렰嬠ĵ렱堢Ĵ䮠ɠӠɧ宠ɧ讍젨쩠Ӡ堤Ӡ󮍍͹Ӎ¹ŬӠ嬠ЍӠ堤謠쬠堤頠̠¹ƍ¹ùŠРō¹İŠ¹¹Ѝ¹Ġàððì؍¹í ̠¹¹ŭõР¹ưàѠ¹ō¹堤Ӡ殍庍¹ààð٠ðì؍¹ ̠¹¹ĹРٍ¹ĭİŠ¹¹ƭĠàððì؍¹¤ϠƠ٠Ϡֲ뮠쮠Ӡ栮뮠ƿӠɍ䬠ɠҍºҍúҍĺҍźҍƺҍàAY%(1)1:AC%(1)1:LMP%0:RMP%0:MC%(0)0:MC%(1)1QijTY%46100,46200,46300,46400B%LY%(0)1:RX%(0)A%(B%.05):RX%(1)(B%):RC%(0)C%B%:RC%(1)1(B%)246140(ZZ(B%)21:WH(RX%(0)ZZ)WH(RX%(1)ZZ)RX%(0)RX%(0)ZZ:RX%(1)RX%(1)ҍõҍöҍ÷ҍøҍùҍҍưưðҍñҍòҍóҍôҢıӶı͠ݍӶIJݍԠԠˍ䮮ԠˍĠΠԠΠ٠ŠˠԠǍӠ٠٠ϠŽ˺ɠ欠󮍍ӶıݍңΠĠΠĠנӠō¸䠢ӠŭĠҠĠ򍹷ĠŸððŸ덹àõРõӠ褲ٍøٍİƷŠŠààÍŠƠàƍ؍Š̠䍻ԱíàР卻¶Ơ􍹷ؠ٠¹¶¶ٍĭƹĭƭĠĠ ĠŠōĠàÍĭĠƠƍĠ笠笠􍤰ƹű뮩썻썹ƸàÍĠƹԠӬ쬍¶ƱɠӠ䬠卤¶Ԡ묠堤¶렰򠰮묠à讠렰򍰠庠􍤰͍ö¶卤Ϡ󍳱ƴƶĠƱ¶¶Ʊƹà·Р·ˬ堤堤¶嬠·ӠРĩ԰Ӱ·䮍ưƲnear Functions"<â10:6:"By Mark Berman and Kevin Vessio"`â12:11:"Designed by Don Ross"â15:10:"Microcomputer Workshops"â17:16:"Courseware"â19:18:"@ 1984"ʌÁZZ12500:ZZ،ù2999,255ތñ8DzGet student's name. Bǹ1V%((LOC%)1)((LOC%1)256(LOC%2)):LOC%LOC%3:OSet up an equation.jBase on A%,B%,C%,TY%.0LX%(0)0:LY%(0)0:LC%(0)0:RX%(0)0:RY%(0)0:RC%(0)0:AX%(0)0:AY%(0)0:AC%(0)0:LX%(1)1:LY%(1)1:LC%(1)1:RX%(1)1:RY%(1)1:RC%(1)1:AX%(1)1:ō튊àōƭŠҠŸŠҠŹƠ Ҡ²ƍ ؠàưРưɍ庠젽ݍӶıݍңǠ԰Ǡ԰렰򠰍䬠ōŠŠà፭ĵĵčĴĵčĵĵčĴĵčĵĵčĴĵčŮӵıĠ󮍍۫庍䭭렠ᠱ㮍                    3070 qj3030753030/qLX%2ZZ%753070DqVX%2Y%73070fq`X%2ZZ%13Y%7Z1%4:3070pqj30302Y%7Ģ24:8:" Now press . ";zpBZZ%(16384)128:ZZ%ZZ%32(ZZ%96ZZ%123):ZZ%13ZZ%75ZZ%733030pGX%2ZZ%753030pLX%2ZZ%753070pVX%2Y%73070p`X%2ZZ%13Y%7Z1%4:3070pj3030ZZ%13Y%7Z1%4:5ZZ%733030IoX%0ZZ%75Ģ24:8:" To move up, press . ";:3070eoX%1Y%3ZZ%733070oY%3ZZ%13Z1%Z1%1:3070o3030o8X%2Ģ24:8:"To move right, press .";o=X%2Y%7Ģ24:8:" To move up, press . ";*p>X%ЭY%0ZZ%77Ģ24:8:" Now press . ";:3070WnY%1ZZ%13Z1%Z1%1:3080an3030nX%0Ģ24:8:"To move right, press .";nY%3Ģ24:8:" Now press . "; oZZ%(16384)128:ZZ%ZZ%32(ZZ%96ZZ%123):ZZ%13ZZ%7(N$):ZZ1(N$):ZZLOC%,((N$,ZZ,1)):ZZ0mFmPLOC%,1(V%):V%(V%):LOC%1,V%256(V%256):LOC%2,(V%256):LOC%LOC%3:mpY%0Ģ24:8:"To move down, press .";mzZZ%(16384)128:ZZ%ZZ%32(ZZ%96ZZ%123):ZZ%13ZZ%7730305nlStore variables.!lLOC%3000l(V%A%:5200:V%B%:5200:V%C%:5200:V%E1%:5200:V%E2%:5200:V%E3%:5200:V%E4%:5200:V%P%:5200:V%N%:5200:V%K%:5200:V%TY%:5200l2V%E5%:5200:V%E6%:5200:V%E7%:5200:V%E8%:5200:V%QT%:5200*m<LOC%,keP3:X(1)2.9:Y(1)10:X(2)2.6:Y(2)10:3720QkX(P)TC%:Y(P)(C%A%X(P))B%~kHC(X(1)),VC(Y(1))HC(X(2)),VC(Y(2))kFZZ12:ZZ:Fix prematurely exited FOR loops.kP3480:" Great, ";N$;". You have graphed:":"8x-2y = 2.":3540kZdraw theline.":3540:34807j87:24:(22);(6);(25);rjBMG%0:2850:ZZ13:4HC(P%(ZZ,1)),VC(P%(ZZ,2)):ZZjL3480:" Okay, ";N$;". Now I'm ready to":"finish the graph by drawing a line":"through the three points you plotted.":3540:3480/1413560'i 16368,0:24:7:30);:9i Draw a line.RiPass coordinates ofgithree points inyiP%(1-3,1-2).i$P13:CX%P%(P,1):CY%P%(P,2):3160:3540:3480:Pj." Good job, ";N$;". You found all":"three points. Now it's time to #xLX%(0)A%:LY%(0)B%:RC%(0)C%:IܴLX%(0)A%:LY%(0)B%::LC%(0)C%:n@LY%(0)B%:RX%(0)A%:RC%(0)C%:PòPrint a title page.ZÑ:16302,0:6ڋdÁZZ010:ZZ,ZZ279ZZ,ZZ279ZZ,191ZZZZ,191ZZZZ,ZZ:ZZnú(1);1;â7:9:"Graphing Liz #????    Ҡ Ǡ ǮIJ! ǠL ԠǠL ĠӠǮӠ3Ϡ ϮàϠǠPǮԠJɮԠҮԠҮԠ͠ˠŠ468,0:24:9:"Press "(9)"RETURN to continue.";Vi ZZ(1):ZZ(16384):ZZ1413560ti 16368,0:24:7:30);:i Draw a line.iPass coordinates ofithree points iniP%(1-3,1-2).i$P13:CX%P%(P,1):CY%P%(P,2):3160:3540:3480:Ped."h 3HC(CX%),VC(CY%)>h 17:24:(5):19:24:(5):[h Clear bottom of screen.oh 21:1:(6);:h Write an ordered pair.h Pass coordinates inh DX% and DY%.h "(";DX%;",";DY%;")";:h WAIT FOR USER TO HIT RETURN./i 163%CY%3430tgf 2HC(X%),VC(Y%):3480:R(3)3440,3450:" Good work, ";N$;".":"You found the right point.":3460gp " Brilliant job, ";N$;".":"That's the point you were looking for.":3460hz " Excellent, ";N$;".":"There's the point you want2HC(X%),VC(Y%):PL%1fN /fX Plot a point.Hfb Pass coordinates ofafl point to be plottedsfv in CX%, CY%.f 3480:17:24:"Plot:";:24:(15);(15);"____ ";(15);(16);3);:DX%CX%:DY%CY%:3500f H1%0f H2%0:771,32 g 3000:X%CX%Y10ĺ(5);!e Z1%6000,6100,6200Me 16368,0:PL%ĕ2HC(X%),VC(Y%):PL%0^e ZZ%133140e ZZ%723100,3110,3120,3030,3130e Y%Y%(Y%TC%1):3030e& X%X%(X%1TC%):3030e0 X%X%(X%TC%1):3030e: Y%Y%(Y%1TC%):3030fD PL%ĕC(TC%):HC(1),VC(4)HC(4),VC(4):HC(1),VC(6)HC(4),VC(6)Jd [d Move cursorod X%0:Y%0:PL%0vd 1d 2HC(X%),VC(Y%):PL%PL%d 768,((Y%CY%)2(X%CX%)2)7.525:769,25:770 e H1%Ģ19:32:DX%X%:DY%Y%:3500:X%10Y%Ϻ(1);1;:1:13:"&\";(3);:13:"^`";(4):6:13:5:11:1:"{0";:6:5;:17:5;:21:10:14:14:"|":13:"$}":19:13:"{0"c MG%ēHC(0),14HC(TC%),14:HC(0),0HC(TC%),0:HC(1),VC(TC%)HC(1),VC(TC%)Dd MG%ēHC(TC%),VC(TC%)HC(TC%),VZZ),VC(0)4:HC(0)4,VC(ZZ)HC(0)4,VC(ZZ):ZZ:2950b| ZZ1TC%:HC(ZZ),VC(TC%)HC(ZZ),VC(TC%):HC(ZZ),VC(TC%)HC(ZZ),VC(TC%):HC(TC%),VC(ZZ)HC(TC%),VC(ZZ):HC(TC%),VC(ZZ)HC(TC%),VC(ZZ):ZZb 9:21:"x":2:11:"y"~c C(0),VC(TC%)HC(0),VC(TC%)ah ROT= 0: DRAW 1 AT FN HC( - TC%), FN VC(0): ROT= 16: DRAW 1 AT FN HC(0), FN VC(TC%): ROT= 32: DRAW 1 AT FN HC(TC%), FN VC(0): ROT= 48: DRAW 1 AT FN HC(0), FN VC( - TC%)8br MG%āZZ1TC%TC%1:HC(ZZ),VC(0)4HC(37,75:48:1220,93`x 3580%` 520@`" SET UP AXES AND GRID``, 24:23:(23);(16);(25);j`6 3:1y`@ MG%2910`J HC(TC%)2,VC(0)1HC(TC%)2,VC(0)1`T HC(0)1,VC(TC%)2HC(0)1,VC(TC%)2a^ HC(TC%),VC(0)HC(TC%),VC(0):H7((P%(ZZ,2))):P%(ZZ,2):ZZA_Z 9:32:"I":31:"J K":32:"M"_d VTAB 13: HTAB 24: PRINT "Press "; CHR$ (9);"RETURN"; CHR$ (14);" when": HTAB 24: PRINT "the cursor is on": HTAB 24: PRINT "the right point."`n 1:0:1204,75:16:1220,58:32:12ǭZH90ZH9751040,jǭZZ0ĭZH90ZHZH32FoǭZZ0ĭZH97ZHZH32mtǺ(ZH);:N$N$(ZH):ZZZZ1:51040}yǭZZ051040~Ǻ(8)" "(8);:ZZ151030N$(N$,(N$)1):ZZZZ1:51040ŎDZ? 10:16:"LOADING":12:8:"GRAPHING LINEAR FUNCTIONS"K (1);2 115,0:116,150:103,0:104,64:16383,0:2999,0:(4);"RUNGRAPHING"DER"m";CS768:(4);"BLOAD DENOMINATOR.SET, A";CS1536 I768790:J:I,J:I:162,0,142,0,32,238,3,3,208,248,173,4,3,201,63,240,5,238,4,3,208,236,96:768 CH(CS256):CLCSCH256:ADRS7,CL:ADRS8,CH:ADRS3 16304,0:16300,0:16297,0:16302,0 8191$dLoad and init HRCG.An(4);"BLOAD RBOOT":520nxADRS(0),"HRCG":ADRS0ADRSADRS65536CSADRS2304:CS:10:16:"LOADING":12:8:"GRAPHING LINEAR FUNCTIONS"1 (4);"BLOAD ASCII.SET, A";CS:(4);"BLOAD NUMERATOR.SET, A  "A"G1$"Z"))GNFG1$"/"ĴG$""18110:(G$,1)"+"(G$,1)"-"18110aNFG1$"0"G$"-"18110NFG1$(13)ĭG$""ĭ(G$,1)"/"18110NFG$"0"G1$(8)G1$(13)18110MOF((G1$"0"G1$"9")G1$(13)G1$(8)(G1$"-"G$"")(G1$"x"G1$%ZZ(T2%ZZ)T1%T1%ZZ:T2%T2%ZZ+MBZZ>MBT2%1ĺT1%;:gMB(1);2;T1%;"/";(1);3;T2%;(1);1;:MPFGet monomial from user.MZFG$"":G1$"":VA$""MdFT3%(37)1:T4%(36)1MFT3%:T4%:G$;(5);NFG1$:G1$(8)18110:G1$((G1$)32(G1$1):ZZ(16384):ZZ14115020;L:16368,0:24:7:30);:RLhBPrint a fraction.kLiBPass denominator inLjBDE%, numerator in NU%.LkBReduce first if RD%<>0.LrBT1%(NU%)(NU%DE%):T2%(DE%)LwBRD%17040#M|BZZT2%21:T1%ZZ(T1%ZZ)T2(G$))G$:&K2Clear bottom of screen.:K221:1:(6);:VK6Write an ordered pair.oK6Pass coordinates inK6DX% and DY%.K6"(";DX%;",";DY%;")";:K: WAIT FOR USER TO HIT RETURN.K:16368,0:24:9:"Press RETURN to continue.";L:ZZ(me." J(::J2-J'LINE-UP ERROR COUNTSZJ'G$(Z):3(G$))G$;:34:ZZP%:G$(Z)yJ'Z(Z)G$G$".00":10050J'(G$,1)"."G$"0"G$J$'Z1(G$):(G$,Z,1)"."10025:J)'Z(G$)1G$G$"0":10050J.'(G$)Z2G$(G$,Z2) KB'60>I20:P%0ĺ" You did not complete any problems.":1260uI8)"You completed "P%" problem";:P%1ĺ".":1260I"s."I15000:E5%0:E6%0:E7%0:E8%0:700J(16):8:(32(N$))2:"Bye now, ";N$;"."::3:"I hope you enjoyed working with ng for a Variable .. ";:ZE5%:10000XH10:"Selecting Points ........ ";:ZE6%:10000:H12:"Plotting Points ......... ";:ZE7%:10000H14:"Calculation Errors ...... ";:ZE8%:10000I16:"Total ................... ";:ZE5%E6%E7%E8%:1000GV1000#G FINAL ERROR ANALYSIS/GP%P%1VG(16);10);"Total Error Analysis"G3:34:"Average":4:36:"per":5:8:"Error";:34:"Problem";:26:5:"Total";:8:5:(15);(15);"_____";:26:"_____";:34:"_______";(15);(16)#H8:"Solvi; but y"::"doesn't appear in this equation, so you"::"must solve for x instead.":SV$"x"FTY%1İ15000:4:1:(6);:25000F40000F15000:3:(6);:12:12:"One moment, please.":(4);"RUN GRAPHING.REST"FL41000:P%P%1:P%N%QT%1200____________";(1);1E10:TY%1B%0ĺ" The first step in graphing this"::"equation is to solve it for y.":SV$"y":1040[FB%0ĺ" Well, ";N$;", this problem is an"::"unusual one. Normally, you would solve"::"the original equation for yroblems.":::"How many would you like? ";:G$""KDG$:N%(G$):N%0905TDG$;]DP%1D(16);:10:15:"Problem #"P%:45000:46000:(16);:20000:1:1:"Graph:";:1:(15);(15);"_____";(15);(16)E2:(1);2;"____________________________) Easier (in the form y=mx+b)":11:"2) Harder (other forms)":13:"3) Mixed problems"rC!:"4) Exit the program"C*19:(6);"Your selection: ";:G$""C4G$:K%(G$):K%0K%4820CHG$;:G$"4"13000D(16):4:N$","::"you may try up to 9 pZZ(ZZ):G$"N"G$"n"G$"N":G$;:800LBG$"Y"G$"y"G$"Y":G$;:720UB705B40000:(16):12:12:"One moment, please.":(4);"RUN GRAPHING.INSTRUCTIONS"B41000UC (16):"Okay, ";N$;".":5:"What kind of problems do you want?":9:"1128730A(2999)01100&A50000NA(4);"BLOAD SHAPES":232,32:233,3YA51000A(16);"Hi, "N$".":::"I will help you practice graphing"::"linear equations."::::"Do you want instructions (Y or N)? ";:G$""(BG$:ZZ(78)(79)16:N@ GRAPHING LINEAR FUNCTIONS7@ COPYRIGHT (C) 1983T@MICROCOMPUTER WORKSHOPSi@PORTCHESTER, NY@ LAST UPDATE:10/12/84@ BY: KEVIN VESSIO@6142@dR(X)(X(1)1)@nSIGN(X)32R(2)@xWH(X)(X(X)).0001A}(2999)                           " = ";P%(PP,2)".":15000:E4%E4%1:540dN062PP:33:(5);:36((P%(PP,2))):P%(PP,2);(5):800NXP%(PP,1)T5%:P%(PP,2)C%B%:62PP:6((P%(PP,1))):P%(PP,1);:HP%:DV$;" = ";P%(PP,2);:33:(5);:36((P%(PP,2))):P%(PP,2):800|OP%(PP,2)TZ$,ZZ,1)"/"Ă:ZZ$"1000":550xM!20:1:"Sorry, "N$", the product must"::"be a whole number.":E4%E4%1:15000:540&N&P%(PP,2)(C%A%P%(PP,1))B%:(ZZ$)P%(PP,2)Ģ20:1:(6);" That is incorrect, ";N$;"."::RX%(0)P%(PP,1)RX%(1);OP$;(C%B%);RX%(0)P%(PP,1)RX%(1)Ģ18:1:" That is incorrect, ";N$;"."::RE$;" * ";P%(PP,1);" = ";RX%(0)P%(PP,1)RX%(1)".":15000:E4%E4%1:510L C%0800L18:1:(6);RX%(0)P%(PP,1)RX%(1);OP$;(C%B%);" = ";:110:25000:BAD550MZZ1(ZZ$):(Z(1)525lK30000:VA$"":CO%(0)RX%(0):CO%(1)RX%(1):19000:RE$;" * ";P%(PP,1);" = ";:110:25000:BAD520KZZ1(ZZ$):(ZZ$,ZZ,1)"/"Ă:ZZ$"1000":520K18:1:N$", the product must"::"be a whole number.":E4%E4%1:15000:510L(ZZ$)$;" will not be"::"in the range ";1TC%;" to ";TC%1;".":490GJ500J:TE$;" = ";:CO%(0)C%A%T5%:CO%(1)B%:RD%1:19000:RD%0:RE$:15000:30000:E2%E2%1:420KP%(PP,1)T5%:62PP:6((P%(PP,1))):P%(PP,1);:HP%:DV$;" = ";TE$:RX%(0)RX%((C%B%))IWH(T5%A%B%)İ30000:" That's a poor choice, ";N$;"."::"If ";IV$;" is ";T5%;", then ";DV$;" will not be"::"an integer.":490>J((C%A%T5%)B%)TC%İ30000:" We can't plot that, ";N$;"."::"If ";IV$;" is ";T5%;", then ";DV%(2,1B%))İ30000:" Choose a different value. You"::"already used that one.":15000:30000:420sHA%0600HB%0700HVA$"":TE$(T5%):RX%(0)RX%(1)CO%(0)RX%(0):CO%(1)RX%(1):19000:TE$"("RE$")("TE$")" IC%TE$TE$(OP$,2,1)integer.":15000:30000:E2%E2%1:420G(T5%)TC%İ30000:" I'm sorry, ";N$;", but the"::"graph we use only fits points with"::"coordinates between ";1TC%;:" and ";TC%1;".":15000:30000:E2%E2%1:420eH(PP1T5%P%(1,1B%))(PP3T5%P have integral"::"coordinates.":15000:30000:FPP13}F30000:"Enter the ";IV$;" coordinate: ";:110:25000:BAD420F((ZZ$))32766ZZ$"1000"F30000%GT5%(ZZ$):T5%(ZZ$)İ30000:" Try again, ";N$;"."::"That number is not an 40212,103NEr15:1:(1);2;"________________________________________";(1);1xE|IV$"x":DV$"y":B%0IV$"y":DV$"x".F16384,0:30000:" Now you must find three points on"::"the line. Don't forget to choose points":"that fit on our graph andDJE$"y = ":A%RD%1:19000:E$E$RE$:C%RD%0:E$E$(OP$,2,1)((C%B%))eDTA%E$E$(C%B%)D^6:5:"x";:HP%18((E$)2)3(WH(A%B%)):HP%:E$;:35:"y" Eh3:14,49266,49:14,51266,51:56,4056,103:58,4058,103:210,40210,103:212,X)(XSS%(2TC%)SS%2.5)BCVC(Y)(YSS%(2TC%)SS%2.5)C,3:1:(6);:TT%TY%:TY%1:46000:TY%TT%:VA$"x":CO%(0)RX%(0):CO%(1)RX%(1)C6B%0E$"x = "(C%A%):6:5:"y";:HP%17:HP%:E$;:35:"x":360C@OP$" + ":C%B%0OP$" - "M$"x"G1$"y"ĭ(ZZ$)1āX91(ZZ$):G1$(ZZ$,X9,1)115:UB~G1$"x"G1$"y"115xBZZ$ZZ$G1$:ZZZZ1:G1$;:115BZZ0115B(8)" "(8);:ZZ1110BZZ$(ZZ$,(ZZ$)1):ZZZZ1:115BZZ0(ZZ$,1)"+"(ZZ$,1)"-"110BCHC(Z$"":G1$"":ZZ0:ZH0AAsG1$:G1$(8)115:ZH(G1$):ZH13160bAt(G1$"-"G1$"+")ZZ0115AuG1$"0"ZH8ĭZZ$"+"ZZ$"-"115AxZH8150:ZZ$"0"115AyZZ6115Az(ZH43ZH45)(ZH46ZH58)135A|ZH88ZH89G1$(ZH32):B}G1eH@2999,255 @(41000:50000@2ZZ770790:X%:ZZ,X%:ZZ:173,48,192,136,208,5,206,1,3,240,9,202,208,245,174,0,3,76,2,3,96@<WH(X)(X(X)).0001@FR(X)(X(1)1)@PSIGN(X)32R(2)@ZPI3.1415926535@dTC%11:SS%154:200AnZ                             13ZZ%75ZZ%733030StX%0ZZ%75Ģ24:8:" To move up, press . ";:3070otX%1Y%3ZZ%733070tY%3ZZ%13Z1%Z1%1:3070t3030t8X%2Ģ24:8:"To move right, press .";u=X%2Y%7Ģ24:8:" To move up, press . "3030?sY%0ZZ%77Ģ24:8:" Now press . ";:3070asY%1ZZ%13Z1%Z1%1:3080ks3030sX%0Ģ24:8:"To move right, press .";sY%3Ģ24:8:" Now press . ";tZZ%(16384)128:ZZ%ZZ%32(ZZ%96ZZ%123):ZZ%r<LOC%,(N$):ZZ1(N$):ZZLOC%,((N$,ZZ,1)):ZZ:rFrPLOC%,1(V%):V%(V%):LOC%1,V%256(V%256):LOC%2,(V%256):LOC%LOC%3:rpY%0Ģ24:8:"To move down, press .";szZZ%(16384)128:ZZ%ZZ%32(ZZ%96ZZ%123):ZZ%13ZZ%77ZZ%753070 qVX%2Y%73070Bq`X%2ZZ%13Y%7Z1%4:3070Lqj3030200:V%E1%:5200:V%E2%:5200:V%E3%:5200:V%E4%:5200:V%P%:5200:V%N%:5200:V%K%:5200:V%TY%:5200q2V%E5%:5200:V%E6%:5200:V%E7%:5200:V%E8%:5200:V%QT%:52004Ģ24:8:"To move right, press .";Zp=X%2Y%7Ģ24:8:" To move up, press . ";p>X%2Y%7Ģ24:8:" Now press . ";pBZZ%(16384)128:ZZ%ZZ%32(ZZ%96ZZ%123):ZZ%13ZZ%75ZZ%733030pGX%2ZZ%753030 qLX%224:8:" Now press . ";qoZZ%(16384)128:ZZ%ZZ%32(ZZ%96ZZ%123):ZZ%13ZZ%75ZZ%733030oX%0ZZ%75Ģ24:8:" To move up, press . ";:3070oX%1Y%3ZZ%733070oY%3ZZ%13Z1%Z1%1:3070o3030$p8X%2move down, press .";^nzZZ%(16384)128:ZZ%ZZ%32(ZZ%96ZZ%123):ZZ%13ZZ%773030nY%0ZZ%77Ģ24:8:" Now press . ";:3070nY%1ZZ%13Z1%Z1%1:3080n3030nX%0Ģ24:8:"To move right, press .";!oY%3:5200:V%TY%:5200Wm2V%E5%:5200:V%E6%:5200:V%E7%:5200:V%E8%:5200:V%QT%:5200m<LOC%,(N$):ZZ1(N$):ZZLOC%,((N$,ZZ,1)):ZZmFmPLOC%,1(V%):V%(V%):LOC%1,V%256(V%256):LOC%2,(V%256):LOC%LOC%3:npY%0Ģ24:8:"To rely exited FOR loops.[lP3480:" Great, ";N$;". You have graphed:":"8x-2y = 2.":3540alZwlStore variables.lLOC%3000m(V%A%:5200:V%B%:5200:V%C%:5200:V%E1%:5200:V%E2%:5200:V%E3%:5200:V%E4%:5200:V%P%:5200:V%N%:5200:V%K%ady to":"finish the graph by drawing a line":"through the three points you plotted.":3540:3480keP3:X(1)2.9:Y(1)10:X(2)2.6:Y(2)10:3720kX(P)TC%:Y(P)(C%A%X(P))B%kHC(X(1)),VC(Y(1))HC(X(2)),VC(Y(2))lFZZ12:ZZ:Fix prematu}j." Good job, ";N$;". You found all":"three points. Now it's time to draw theline. Wait while I tidy up.":3540:3480j87:24:(22);(6);(25);jBMG%0:2850:ZZ13:4HC(P%(ZZ,1)),VC(P%(ZZ,2)):ZZakL3480:" Okay, ";N$;". Now I'm reL" <"<"""<< <"""<"><$""< """"  "" 6***""""""""""<""< :< $"""2,"""**6""">>> " >YEEY>">""""""""""""">>><2"<""">""" ""  ">"6**"""""&*2""""""""""""*,"" "" ">"""""""""""""**6"""">>>>"">000000>(~ <&20  **>> "2*&" " >> ">> """>""""""< >> "   G1$"y"VA$G1$-rG1$(8)G$G$G1$:4070M|(G$)2G$"":VA$"":4070q(G$,1)"x"(G$,1)"y"VA$""G$(G$,(G$)1):4070D$""T3%:T4%:DE%(D$):DE%ĺ(1);2;G$;"/";(1);3;DE%;(1);1;(5);:4280(1);2;G$;"/";(1);1;(5)1:DE%NU%:.~"G$"-x"G$"-y"NU%1:DE%1:G~,G$""NU%0:DE%1:p~6NU%((G$,(G$)(VA$""))):DE%1:~@G1$"/"4200~JG$"x"G$"y"NU%1:4250~TG$"-x"G$"-y"NU%1:DE%1:4250~^NU%((G$,(G$)(VA$""))):4250hG1$"x"G1$)32(G1$"A"G1$"Z"))}((G1$"0"G1$"9")G1$(13)G1$(8)(G1$"-"G$"")(G1$"x"G1$"y"VA$"")(G1$"/"G$""))(VA$""G1$"/"G1$(13)G1$(8))4080}((G$G1$))327674080}G1$(13)4160 ~G$"x"G$"y"NU%T2%21:T1%ZZ(T1%ZZ)T2%ZZ(T2%ZZ)T1%T1%ZZ:T2%T2%ZZH|ZZ[|T2%1ĺT1%;:|(1);2;T1%;"/";(1);3;T2%;(1);1;:|Get monomial from user.|G$"":G1$"":VA$""|T3%(37)1:T4%(36)1|T3%:T4%:G$;(5);}G1$:G1$((t, ";N$;". You have graphed:":5290:22:4560:22:1:(6);LS$;" = ";E$:3540:5110Y{Zp{dPrint a fraction.{nPass denominator in{xDE%, numerator in NU%.{Reduce first if RD%<>0.{T1%(NU%)(NU%DE%):T2%(DE%){RD%4020@|ZZZYA)TC%ĂZZ?zHC(XZZXA),VC(YZZYA)HC(X(2)),VC(Y(2))Qz(XAXA:YAYAz2ZZAS%11:(XZZXA)TC%(YZZYA)TC%ĂZZz<HC(XZZXA),VC(YZZYA)HC(X(2)),VC(Y(2))zFZZ12:ZZ:Fix prematurely exited FOR loops.S{P3480:" Grea%ĂZZ7yHC(XZZXA),VC(YZZYA)HC(X(1)),VC(Y(1))qy(X(2))TC%XI(XI)(X(2)):YI(YI)(X(2))(M)y(Y(2))TC%YI(YI)(Y(2)):XI(XI)(Y(2))(M)y XX(2)AS%XI:YY(2)AS%YI:YAXI:XAYI zZZAS%11:(XZZXA)TC%(YZC%YI(YI)(Y(1)):XI(XI)(Y(1))(M)WxXX(1)AS%XI:YY(1)AS%YI:YAXI:XAYIxZZAS%11:(XZZXA)TC%(YZZYA)TC%ĂZZxHC(XZZXA),VC(YZZYA)HC(X(1)),VC(Y(1))xXAXA:YAYAyZZAS%11:(XZZXA)TC%(YZZYA)TC%X(P)X:Y(P)Y:PP1:P33730@wX(P)TC%:Y(P)(C%A%X(P))B%mwHC(X(1)),VC(Y(1))HC(X(2)),VC(Y(2))wAS%4:MA%B%:XI((M))(HC(1)HC(0)):YI((M))(VC(1)VC(0))w(X(1))TC%XI(XI)(X(1)):YI(YI)(X(1))(M)*x(Y(1))TA%),VC(TC%)HC(C%A%),VC(TC%):48:1HC(C%A%),VC(TC%):16:1HC(C%A%),VC(TC%):3920vjP1:XTC%:Y(C%A%X)B%:(Y)TC%X(P)X:Y(P)Y:P2vtYTC%:X(C%B%Y)A%:(X)TC%X(P)X:Y(P)Y:PP1:P33730w~YTC%:X(C%B%Y)A%:(X)TC;4u>X%2Y%7Ģ24:8:" Now press . ";uBZZ%(16384)128:ZZ%ZZ%32(ZZ%96ZZ%123):ZZ%13ZZ%75ZZ%733030uGX%2ZZ%753030uLX%2ZZ%753070uVX%2Y%73070u`X%2ZZ%13Y%7Z1%4:3070uj30300ēHC(C%L" <"<"""<< <"""<"><$""< """"  "" 6***""""""""""<""< :< $"""2,"""**6 >>> " >YEEY>">""""""""""""">>><2"<""">""" ""  ">"6**"""""&*2""""""""""""*,"" "" ">"""""""""""""**6"""">> ""(~ <&20 *, >>  <>> "   C%(1):4400:E$""E$"("RE$")(":4910F$MP%3E$E$"+("RE$")(".CC%(0)VA$"":CO%(0)CC%(0):CO%(1)CC%(1):4400:E$""(E$,1)"("E$E$RE$:49308CC%(0)E$E$SI$RE$BAC%(0)VA$"":CO%(0)AC%(0):CO%(1)AC%(1):4400:E$""(E$,1)"(4850CY%(0)E$E$SI$RE$wAY%(0)VA$"y":CO%(0)AY%(0):CO%(1)AY%(1):4400:E$""(E$,1)"("E$E$RE$:4870AY%(0)E$E$SI$RE$MP%3DIV%E$""E$E$"+(":4910։MP%3DIV%E$"(":4910'MP%3VA$"":CO%(0)MC%(0):CO%(1)M2DIV%E$""E$E$"+(":4830;MP%2DIV%E$"(":4830MP%2VA$"":CO%(0)MC%(0):CO%(1)MC%(1):4400:E$""E$"("RE$")(":4830MP%2E$E$"+("RE$")("CY%(0)VA$"y":CO%(0)CY%(0):CO%(1)CY%(1):4400:E$""(E$,1)"("E$E$RE$:$"(":4760NMP%1VA$"":CO%(0)MC%(0):CO%(1)MC%(1):4400:E$"("RE$")("CX%(0)VA$"x":CO%(0)CX%(0):CO%(1)CX%(1):4400:E$E$RE$AX%(0)VA$"x":CO%(0)AX%(0):CO%(1)AX%(1):4400:CX%(0)E$E$SI$RE$:4790AX%(0)E$E$RE$MP%C%(0):CC%(1)RC%(1):MP%RMP%:4730HL1(LS$):ZZ1(LS$):L1L12((LS$,ZZ,1)(1)):ZZ:L2(E$):ZZ1(E$):L2L22((E$,ZZ,1)(1)):ZZR1:(5);:L219Ė19L1:4710Æ\(40L1L2)2݆fLS$;" = ";:LO%ĺE$pzE$"" MP%1DIV%En' MC%(0&1), positions in LMP%,RMP%.L*Set DIV% to divide by MC%(0&1).4CX%(0)LX%(0):CX%(1)LX%(1):CY%(0)LY%(0):CY%(1)LY%(1):CC%(0)LC%(0):CC%(1)LC%(1):MP%LMP%:4730:LS$E$!>CX%(0)RX%(0):CX%(1)RX%(1):CY%(0)RY%(0):CY%(1)RY%(1):CC%(0)Rn equation.)Pass coefficients of leftRside in LX%(0&1),LY%(0&1),LC%(0&1).rPass coefficients of rightin RX%(0&1),RY%(0&1),RC%(0&1).Pass values added to both sides߄ in AX%(0&1),AY%(0&1),AC%(0&1).Pass constant multiplier iCO%(1)):T2%(CO%(1)):RD%4520oZZT2%21:T1%ZZ(CO%(0)ZZ)T2%ZZ(CO%(1)ZZ)T1%T1%ZZ:T2%T2%ZZwZZRE$(1)"2"(T1%)"/"(1)"3"(T2%)(1)"1"̓VA$""RE$"("RE$")"VA$샼RD%CO%(0)T1%:CO%(1)T2% Print as ifDRD% is non-zero.>NSI$"":CO%(0)CO%(1)0SI$"+"hXCO%(0)CO%(1)(CO%(0)CO%(1))4490bVA$""RE$(CO%(0)CO%(1)):lCO%(0)CO%(1)1RE$VA$:΂vCO%(0)CO%(1)1RE$"-"VA$:킀RE$(CO%(0)CO%(1))VA$:T1%CO%(0)(1$:4260D$""40700(D$)1D$"":4260KD$(D$,(D$)1):4260T3%:T4%:"(";(1);2;G$;"/";(1);3;DE%;(1);1;")";VA$;(5);G1$:G1$(13)G1$(8)4370G1$(13)ıҁ&VA$"":42600Conversion Routine:Reduce fraction;G1$:G1$((G1$)32(G1$"A"G1$"Z")):(G1$"0"G1$"9")(G1$(13)DE%0)(G1$"-"G$"")G1$(8)(G1$"x"G1$"y"DE%0VA$"")4280G1$(13)ıŀ((D$G1$))327674280G1$"x"G1$"y"VA$G1$:4360G1$(8)D$D$GL" <"<"""<< <"""<"><$""< """"  "" 6***""""""""""<""< :< $"""2,"""**6""">>> " >YEEY>">""""""""""""">>><2"<""">""" ""  ">"6**"""""&*2""""""""""""*,"" "" ">"""""""""""""**6"""">> ""(~ <&20 *, >>  <>> "   :V%K%:5200:V%TY%:5200^b2V%E5%:5200:V%E6%:5200:V%E7%:5200:V%E8%:5200:V%QT%:5200b<LOC%,(N$):ZZ1(N$):ZZLOC%,((N$,ZZ,1)):ZZbFbPLOC%,1(V%):V%(V%):LOC%1,V%256(V%256):LOC%2,(V%256):LOC%LOC%3:cZRestore var"BAD1aZZ:.aClear bottom of screen.Ta(During Choosing Points Portion)ha 16:1:(6);:~aStore variables.aLOC%3000b(V%A%:5200:V%B%:5200:V%C%:5200:V%E1%:5200:V%E2%:5200:V%E3%:5200:V%E4%:5200:V%P%:5200:V%N%:5200REN(ZZ,1)))51PAREN(ZZ,0))(E$,PAREN(ZZ,1)1):5050k`E$(((E$,PAREN(ZZ,1)))51PAREN(ZZ,0))(E$,2)s`ZZy``CHECK FOR NON-NUMERIC`CHARACTERS IN ZZ$.aBAD0:ZZ1(ZZ$):Z1$(ZZ$,ZZ,1):(Z1$"0"Z1$"9")Z1$"+"Z1$"-"Z1$" ,1)"("(E$,ZZ,1)")"T1%T1%1:PAREN(T1%,0)((E$,ZZ,1)")"):PAREN(T1%,1)ZZV_ZZ_ZZ1T1%:PAREN(ZZ,0)ĭPAREN(ZZ1,0)PAREN(ZZ2,0)5050_PAREN(ZZ,0)(PAREN(ZZ1,0)PAREN(ZZ2,0))50505`PAREN(ZZ,1)2E$(E$,PAREN(ZZ,1)1)(((E$,PA4400:E$""(E$,1)"("E$E$RE$:4980B^LAC%(0)E$E$SI$RE$]^V(E$,1)"("E$E$"0"^`MP%DIV%CO%(0)MC%(0):CO%(1)MC%(1):VA$"":4400:E$E$")/("RE$")":4980^jMP%1MP%2MP%3E$E$")"^tE$""E$"0"N_~T1%0:ZZ1(E$):(E$,ZZ:CO%(0)MC%(0):CO%(1)MC%(1):4400:E$""E$"("RE$")(":4910^]$MP%3E$E$"+("RE$")("].CC%(0)VA$"":CO%(0)CC%(0):CO%(1)CC%(1):4400:E$""(E$,1)"("E$E$RE$:4930]8CC%(0)E$E$SI$RE$(^BAC%(0)VA$"":CO%(0)AC%(0):CO%(1)AC%(1):(E$,1)"("E$E$RE$:48506\CY%(0)E$E$SI$RE$\AY%(0)VA$"y":CO%(0)AY%(0):CO%(1)AY%(1):4400:E$""(E$,1)"("E$E$RE$:4870\AY%(0)E$E$SI$RE$\MP%3DIV%E$""E$E$"+(":4910\MP%3DIV%E$"(":4910?]MP%3VA$""%(0)E$E$RE$6[MP%2DIV%E$""E$E$"+(":4830S[MP%2DIV%E$"(":4830[MP%2VA$"":CO%(0)MC%(0):CO%(1)MC%(1):4400:E$""E$"("RE$")(":4830[MP%2E$E$"+("RE$")("\CY%(0)VA$"y":CO%(0)CY%(0):CO%(1)CY%(1):4400:E$""Y%(0)B%::LC%(0)C%::"LY%(0)B%:RX%(0)A%:RC%(0)C%:(0):CO%(1)MC%(1):4400:E$"("RE$")("ZCX%(0)VA$"x":CO%(0)CX%(0):CO%(1)CX%(1):4400:E$E$RE$ZAX%(0)VA$"x":CO%(0)AX%(0):CO%(1)AX%(1):4400:CX%(0)E$E$SI$RE$:4790[AX:RX%(0)A%(B%.05):RX%(1)(B%):RC%(0)C%B%:RC%(1)1I(B%)25370ZZ(B%)21:WH(RX%(0)ZZ)WH(RX%(1)ZZ)RX%(0)RX%(0)ZZ:RX%(1)RX%(1)ZZZZőB%0LX%(0)1:RC%(0)C%A%ˑLX%(0)A%:LY%(0)B%:RC%(0)C%:LX%(0)A%:L%,B%,C%,TY%.ѐLX%(0)0:LY%(0)0:LC%(0)0:RX%(0)0:RY%(0)0:RC%(0)0:AX%(0)0:AY%(0)0:AC%(0)0:LX%(1)1:LY%(1)1:LC%(1)1:RX%(1)1:RY%(1)1:RC%(1)1:AX%(1)1:AY%(1)1:AC%(1)1:LMP%0:RMP%0:MC%(0)0:MC%(1)1TY%5330,5390,5400,54107B%LY%(0)100F2V%E5%:5200:V%E6%:5200:V%E7%:5200:V%E8%:5200:V%QT%:5200}<LOC%,(N$):ZZ1(N$):ZZLOC%,((N$,ZZ,1)):ZZF׏PLOC%,1(V%):V%(V%):LOC%1,V%256(V%256):LOC%2,(V%256):LOC%LOC%3:Set up an equation. Base on AClear bottom of screen.<(During Choosing Points Portion)P 16:1:(6);:fStore variables.tLOC%3000(V%A%:5200:V%B%:5200:V%C%:5200:V%E1%:5200:V%E2%:5200:V%E3%:5200:V%E4%:5200:V%P%:5200:V%N%:5200:V%K%:5200:V%TY%:52,0))(E$,PAREN(ZZ,1)1):5050SE$(((E$,PAREN(ZZ,1)))51PAREN(ZZ,0))(E$,2)[ZZa|CHECK FOR NON-NUMERICCHARACTERS IN ZZ$.BAD0:ZZ1(ZZ$):Z1$(ZZ$,ZZ,1):(Z1$"0"Z1$"9")Z1$"+"Z1$"-"Z1$" "BAD1ZZ:T1%T1%1:PAREN(T1%,0)((E$,ZZ,1)")"):PAREN(T1%,1)ZZ>ZZ|ZZ1T1%:PAREN(ZZ,0)ĭPAREN(ZZ1,0)PAREN(ZZ2,0)5050PAREN(ZZ,0)(PAREN(ZZ1,0)PAREN(ZZ2,0))5050PAREN(ZZ,1)2E$(E$,PAREN(ZZ,1)1)(((E$,PAREN(ZZ,1)))51PAREN(ZZ"E$E$RE$:4980*LAC%(0)E$E$SI$RE$EV(E$,1)"("E$E$"0"`MP%DIV%CO%(0)MC%(0):CO%(1)MC%(1):VA$"":4400:E$E$")/("RE$")":4980jMP%1MP%2MP%3E$E$")"ɋtE$""E$"0"6~T1%0:ZZ1(E$):(E$,ZZ,1)"("(E$,ZZ,1)")")"These problems are not so easy."Uh|ME$(7)"Keep trying, "N$". You'll get it."hME$(8)"Don't be discouraged. You'll get better."hve, "N$0.KrBT1%(NU%)(NU%DE%):T2%(DE%)KwBRD%170407L|BZZT2%21:0001)10):(ZZ100.1);JB':J2Clear bottom of screen.NJ221:1:(6);:jJ6Write an ordered pair.J6Pass coordinates inJ6DX% and DY%.J6"(";DX%;",";DY%;")";:J: WAIT FOR USER TO HIT RETURN. K:16368,0:24:9:"Press RETURN to c ";N$;"."::3:"I hope you enjoyed working with me."jI(:9:"To run again, type ";(9);"PR#6";(14);"."pI2I'Display a real number to two decimal places.I'Z(Z100.5)100I$'ZZ(Z):ZZ;".";I.'ZZZZZ:(ZZ10.0001);J8'ZZZZ((ZZ10.otting Points ......... ";:ZE7%P%:10000:37:E7%rH15:"Calculation Errors ...... ";:ZE8%P%:10000:37:E8%H19:"Total ................... ";:Z(E5%E6%E7%E8%)P%:10000:37:E5%E6%E7%E8%H150004I(16):12:(32(N$))2:"Bye now,per":5:8:"Error";:26:"Problem";:35:"Total";:8:(15);(15);"_____";:26:"_______";:35:"_____";(15);(16)G9:"Solving for a Variable .. ";:ZE5%P%:10000:37:E5%G11:"Selecting Points ........ ";:ZE6%P%:10000:37:E6%2H13:"Pl0:4:1:(6);:25000F40000fF3:(6);:12:12:"One moment, please.":(4);"RUN GRAPHING.REST"FL41000:P%P%1:P%N%QT%1200FV1000FFinal Error Summary.FP%P%1F(16);10);"Total Error Summary"sG3:26:"Average":4:28:"or y.":SV$"y":1040EB%0ĺ" Well, ";N$;", this problem is an"::"unusual one. Normally, you would solve"::"the original equation for y; but y"::"doesn't appear in this equation, so you"::"must solve for x instead.":SV$"x"FTY%1İ1500G$;DP%1dD45000:46000:(16);:20000:1:1:"Graph:";:1:(15);(15);"_____";(15);(16)D2:(1);2;"________________________________________";(1);1E10:TY%1B%0ĺ" The first step in graphing this"::"equation is to solve it fr (other forms)":13:"3) Mixed problems"XC*17:(6);"Enter one of the above: ";:G$""xC4G$:K%(G$):K%0K%3820CHG$;C(16):4:N$","::"you may try up to 9 problems.":::"How many would you like? ";:G$""CG$:N%(G$):N%0905DG$"Y"G$"y"G$"Y":G$;:720(B705{B40000:(16):12:12:"One moment, please.":(4);"RUN GRAPHING.INSTRUCTIONS"B41000(C (16):"Okay, ";N$;".":5:"What kind of problems do you want?":9:"1) Easier (in the form y=mx+b)":11:"2) Harde99)01100A50000=A(4);"BLOAD SHAPES":232,32:233,3HA51000A(16);"Hi, "N$".":::"I will help you practice graphing"::"linear equations."::::"Do you want instructions (Y or N)? ";:G$""AG$:G$"N"G$"n"G$"N":G$;:800B`J@ GRAPHING LINEAR FUNCTIONS0@ VERSION 1.0H@ COPYRIGHT (C) 1983X@ BYu@MICROCOMPUTER WORKSHOPS@PORTCHESTER, NY@6142@dR(X)(X(1)1)@nSIGN(X)32R(2)@xWH(X)(X(X)).0001@}(2999)128730 A(29                    ! ! ! !!!!!!!!!""" " e.K^aZZ01:AX%(ZZ)ZZ:AY%(ZZ)ZZ:AC%(ZZ)ZZ:MC%(ZZ)ZZ:ZZ:LMP%0:RMP%0[^aVP%(37)1^a15:(1);2;"________________________________________";(1);1^aVP%:20000^aIV%0^aOV$"x":SV$OV$OV$"y"(_ bSV$"y"LX%(0)0LY%(0)0LC%(0)0S,1)1)(((E$,PAREN(ZZ,1)))51PAREN(ZZ,0))(E$,PAREN(ZZ,1)1):20960}]QE$(((E$,PAREN(ZZ,1)))51PAREN(ZZ,0))(E$,2)]QZZ]Q]aSolve an Equation.]aPass variable to be]asolved for in SV$.]apass equation as in^aprint routin1(E$):(E$,ZZ,1)"("(E$,ZZ,1)")"T1%T1%1:PAREN(T1%,0)((E$,ZZ,1)")"):PAREN(T1%,1)ZZe\QZZ\QZZ1T1%:PAREN(ZZ,0)ĭPAREN(ZZ1,0)PAREN(ZZ2,0)20960\QPAREN(ZZ,0)(PAREN(ZZ1,0)PAREN(ZZ2,0))20960G]QPAREN(ZZ,1)2E$(E$,PAREN(ZZ%(1)AC%(1):19000:E$""(E$,1)"("E$E$RE$:20800O[QAC%(0)E$E$SI$RE$j[Q(E$,1)"("E$E$"0"["QMP%DIV%CO%(0)MC%(0):CO%(1)MC%(1):VA$"":19000:E$E$")/("RE$")":20800[,QMP%1MP%2MP%3E$E$")"[@QE$""E$"0"]\QT1%0:ZZ3VA$"":CO%(0)MC%(0):CO%(1)MC%(1):19000:E$""E$"("RE$")(":20720gZPMP%3E$E$"+("RE$")("ZPCC%(0)VA$"":CO%(0)CC%(0):CO%(1)CC%(1):19000:E$""(E$,1)"("E$E$RE$:20740ZPCC%(0)E$E$SI$RE$5[QAC%(0)VA$"":CO%(0)AC%(0):CO""(E$,1)"("E$E$RE$:206409YPCY%(0)E$E$SI$RE$YPAY%(0)VA$"y":CO%(0)AY%(0):CO%(1)AY%(1):19000:E$""(E$,1)"("E$E$RE$:20700YPAY%(0)E$E$SI$RE$YPMP%3DIV%E$""E$E$"+(":20720YPMP%3DIV%E$"(":20720HZPMP%0)E$E$RE$4XxPMP%2DIV%E$""E$E$"+(":20620RXzPMP%2DIV%E$"(":20620X}PMP%2VA$"":CO%(0)MC%(0):CO%(1)MC%(1):19000:E$""E$"("RE$")(":20620XPMP%2E$E$"+("RE$")("YPCY%(0)VA$"y":CO%(0)CY%(0):CO%(1)CY%(1):19000:E$WPMP%1DIV%E$"(":20520`WPMP%1VA$"":CO%(0)MC%(0):CO%(1)MC%(1):19000:E$"("RE$")("W(PCX%(0)VA$"x":CO%(0)CX%(0):CO%(1)CX%(1):19000:E$E$RE$W2PAX%(0)VA$"x":CO%(0)AX%(0):CO%(1)AX%(1):19000:CX%(0)E$E$SI$RE$:20600 Xb30000:19:"1) Add same value to both sides":"2) Subtract same value from both sides"aHb"3) Multiply both sides by same value":"4) Divide both sides by same value"IbRb17:(9);"Ente0<`%bVP%12İ15000:VP%4:VP%:1:200);200);:VP%:20000`*bLSV%(0)LY%(0):LSV%(1)LY%(1):RSV%(0)RY%(0):RSV%(1)RY%(1):LOV%(0)LX%(0):LOV%(1)LX%(1):ROV%(0)RX%(0):ROV%(1)RX%(1)=a4bSV$"x"LSV%(0)LX%(0):LSV%(1)LX%(1):RSV%(0)RX%(0):RSV%(1)RX%(V$"x"LX%(0)0LY%(0)0LC%(0)0IV%1{_bSV$"y"RX%(0)0RY%(0)0RC%(0)0SV$"x"RX%(0)0RY%(0)0RC%(0)0IV%1` bSV$"y"IV%1LY%(0)LY%(1)1SV$"y"IV%1RY%(0)RY%(1)1SV$"x"IV%1LX%(0)LX%(1)1SV$"x"IV%1RX%(0)RX%(1)12550 ` 8Pt 8hII 8g ..???--?8 ??-." M20]M(16):5:"After each problem, I will give you a"::"summary of your errors."M10:"When you finish a set of problems, I"::"will give you a total error analysis."M20:580 N(16):10:" Would you like to review the"::" I will help you. You will be able to"::"choose between sound clues and silent"::"clues."M15:"When you have plotted all three points,"::"I will finish the problem by drawing the":"line through them. That line is the"::"graph of the equationthe cursor left."::5);(9);"K";(14);" moves the cursor right."::5);(9);"M";(14);" moves the cursor down."K19:"In case you forget, there is a chart"::"next to the graph."K20\L(16):3:"If you make a mistake plotting a point,"::";(14);", ";(9);"J";(14);", ";(9);"K";(14);","::"and ";(9);"M";(14);" keys. If you find these keys and"::"notice their positions, it will make"J:"sense that:":qK5);(9);"I";(14);" moves the cursor up."::5);(9);"J";(14);" moves t the center"::"of the graph, you will see a flashing X,":"called the cursor."I15:"To plot a point, just move the cursor"::"to the correct location, and press"::(9);"RETURN";(14);"."I20J(16);"To move the cursor, use the ";(9);"I""Be sure that x and y are integer"::"values between -10 and 10 so that"::"the coordinate can be plotted on our"::"graph."Hh20Hr(16);"When you have chosen three points, your"::"last step is to plot them."PI|7:"I will show you a graph. A6);"When the equation is in the proper form,":"you must find three pairs of coordinates":"in order to plot them on the line. For"GT7:"each pair, you will choose the value"::"of x. I will help you find the"::"corresponding value of y."~H^14:::"the screen."hF,9:"If the equation is not in the form"::"y=mx+b, you will have to solve for y."F615:"In a few problems, y may not appear in"::"the equation. In these special cases,"::"you will solve for x instead of y."F@20GJ(1n the form y=mx+b.":"The harder equations are in other forms."E13:"You may choose either type, or you may"::"select a mixture of the two types."E20F"(16);"When you begin working on a problem, I"::"will print the equation at the top of"act same value from both sides"sD"3) Multiply both sides by same value":"4) Divide both sides by same value";:DG$:G$(13)230:DInstructionsD(16);"Hi, ";N$;"!">E5:"I know two types of problems. The"::"easier equations are i200:QT%V%@CN$"":L%(LOC%):ZZ1L%:N$N$((LOC%ZZ)):ZZKCLOC%0QCCV%((LOC%)1)((LOC%1)256(LOC%2)):LOC%LOC%3:D15:1:(1);2;"________________________________________";(1);1:"1) Add same value to both sides":"2) Subtr56):LOC%2,(V%256):LOC%LOC%3::BRestore variables.HBLOC%3000B200:A%V%:200:B%V%:200:C%V%:200:E1%V%:200:E2%V%:200:E3%V%:200:E4%V%:200:P%V%:200:N%V%:200:K%V%:200:TY%V% C200:E5%V%:200:E6%V%:200:E7%V%:200:E8%V%:0:V%E2%:120:V%E3%:120:V%E4%:120:V%P%:120:V%N%:120:V%K%:120:V%TY%:120AZV%E5%:120:V%E6%:120:V%E7%:120:V%E8%:120:V%QT%:120AdLOC%,(N$):ZZ1(N$):ZZLOC%,((N$,ZZ,1)):ZZAn"BxLOC%,1(V%):V%(V%):LOC%1,V%256(V%20@ 130:2403@ WAIT FOR USER TO HIT RETURN.h@16368,0:24:9:"Press RETURN to continue.";@(ZZ(1):ZZ(16384):ZZ14140@216368,0:24:7:30);:@<Store variables.@FLOC%3000QAPV%A%:120:V%B%:120:V%C%:120:V%E1%:12              " " " """""""""      "  ??" g```c```g6 : ?`@`?p@6 6 S 2aՀ  p333s3330?`C@`?x@!`yp`p 00``@@@@@``p08 p ppp@ |  accca``cf"aՀ `p8꺎C  LLLOLLL \xp ս Հ x~~`p8~C @agfga```@@p | x8p@?`@@`??`@`?`88`8axxx켌@yYa8`8008O@ฮ꺎C @p~8p`@@@@ ꊂx ՟~||p@p@1ƚagfga``cfgfgccg`g@p|s@`p0  80`@p300p0030\xppฮ|@@`p8p`p|Օ@p`p8`p p pxฮB|p p `?``Օa@: @@8`7 7 S S S S 0p06 p@9 `88 0<710 @# Ff@@~~" 8p`@@@@@@`p0? @@@`p8@s0`@xy?``? 80p``@@@@@``00 x x x8` |  c``ag# #  ??# g``c```g7  LLOLLL  XpxC `0 @!~cffc```@x | Cx q33s3331!`?@xx윀@8yյCp@0800OꚆa`8~ 0`@``յC@@`0 ``Ꚇa F~~8`8`ccffc``agCffCaGqCf`fC`xN<8`@?`@@@ppqx@|뛇p``0 ?`?@յ|?``?px x xꚆaxx x @@յC?`xppꚆ` ! S S pp07 8`: @p9 8>30 @$ FfF@ #  0`@@@@`0? @@`0 a303a `08  0p`@q30p0031 Xp    1,(LOC256) $230,649 ((4);"BLOAD LOGO.PAC,A"LOCE 2UNPACKV <4:0,110,1 F16304,0:16297,0:16302,0:16299,0 P(4);"RUN HELLO"L12:8:"GRAPHING LINEAR FUNCTIONS" P(4);"RUN HELLO"CLLO" REVISED 3/7/84 BY J.P A. LOGO ADDED NOTE: PROBLEM W/CHANGING REL HRCG DUE TO EXCESSIVE CHAR SETS BEING SHUFFLED THRU MEMORY 230,32:62450:230,64:62450 :(4);"BLOAD UNPACKER"LOC24831:UNPACK768 #0,LOC((LOC256)256):(MT4):MT28520,28530,28540,28550,28560,28570[zhoF1%(0)LX%(0):F1%(1)LX%(1):S$"x":28580zroF1%(0)LY%(0):F1%(1)LY%(1):S$"y":28580z|oF1%(0)LC%(0):F1%(1)LC%(1):S$"":28580zoF1%(0)RX%(0):F1%(1)RX%(1):S$"x":28580{oF1%(0)RY%(0):F1%(1)RP%VP%2:VP%:MC%(0)F2%(0):MC%(1)F2%(1):LMP%1:RMP%1:20000:VP%VP%2:NF%0yYo30000:" ";COP$;(1883DIV%);" the equation by ";:VA$"":CO%(0)NU%:CO%(1)DE%:19000:RE$;","::"term by term.":15000:30000-z^oMT16:LMP%(MT4)MT:RMP%1(MT4)WH(RX%(0)RX%(1)ZZ)WH(RY%(0)RY%(1)ZZ)WH(RC%(0)RC%(1)ZZ))28500x2n" I don't agree, ";N$;"."::"The number you have chosen would give"::"you fractions in the equation.":15000:30000:E1%E1%1:MyToF2%(0)NU%:F2%(1)DE%:DIV%(MD(2).5):VwnCO%(0)LSV%(0):CO%(1)LSV%(1):28190Ow nCO%(0)RSV%(1):CO%(1)RSV%(0):28190qwnCO%(0)RSV%(0):CO%(1)RSV%(1)wnRD%1:19000:RE$;".":15000:E1%E1%1:28100Hx(nZZMD(NU%DE%):IV%(WH(LX%(0)LX%(1)ZZ)WH(LY%(0)LY%(1)ZZ)WH(LC%(0)LC%(1)ZZ)IV%1(MD(DE%NU%)RSV%(0)RSV%(1)).0001))28200vm" That's not right, ";N$;".":18:1:"To eliminate the coefficient of ";SV$;", you"::"should";OP$;"by ";:VA$""vm2(IV%1)(MD(2).5)28160,28170,28180:CO%(0)LSV%(1):CO%(1)LSV%(0):28190&:15000:30000:E1%E1%1:um(MD(NU%DE%))1ĺ" That won't help, ";N$;"."::COP$;"ing by the number you have"::"chosen will only make the coefficients"::"bigger.":15000:30000:E1%E1%1:2vm((IV%1(MD(DE%NU%)LSV%(0)LSV%(1)).0001)(::"more complicated.":15000:30000:E1%E1%1:tmNU%0MD(2).5ĺ" You can't do that, ";N$;"."::"Division by zero is undefined.":15000:30000:E1%E1%1:umNU%DE%ĺ" ";COP$;"ing both sides by one will"::"have no effect on the equation."100Qs`mMD(X)X:OP$" multiply ":COP$"Multiply":PR$"Multiply both sides by: "vsm30000:PR$;:18000:G$""281000tm30000:VA$""NU%ĺ" That's a mistake, ";N$;"."::COP$;"ing by a term which has an"::VA$;" in it will only make the equation" that you have the ";SV$;" term alone,"::"you should eliminate the coefficient of"::SV$;" by using multiplication or division.":15000:30000:E1%E1%1:riOP$" subtract ":COP$"Subtract":PR$"Subtract from both sides: ":TF$" from ":SI%1si26(1):VA$S$:19000:RE$:15000:30000:E4%E4%1:26710aqhS$"x"RX%(0)S%(0):RX%(1)S%(1):26800qhS$"y"RY%(0)S%(0):RY%(1)S%(1):26800qhRC%(0)S%(0):RC%(1)S%(1)qhVP%VP%2:VP%:20000:rxiIV%ĺ" That's not a good idea, ";N$;"."::"Now%S%(0)İ30000:" Excellent, ";N$;".":15000:30000:26770pth30000:" Good try, ";N$;"."::RD%1:CO%(0)L%(0):CO%(1)L%(1):19000:RE$;" ";:CO%(0)A%(0):CO%(1)A%(1):19000:SI$""SI$"-":RE$(RE$,2)4q~hSI$;" ";RE$;" = ";:CO%(0)S%(0):CO%(1)S%like terms on the right"::"side of the equation.":15000:30000oVhRD%1:CO%(0)R%(0):CO%(1)R%(1):19000:RE$;" ";:CO%(0)A%(0):CO%(1)A%(1):19000:SI$""SI$"-":RE$(RE$,2)o`hSI$;" ";RE$;" = ";:18000nLhR%(0)S%(0)A%(0):S%(1)A%(1):26770cnMhLO%1:VP%2:20000:LO%0:30000nNhS%(1)R%(1)A%(1):S%(0)R%(0)A%(1)A%(0)R%(1):ZZS%(1)21:WH(S%(0)ZZ)WH(S%(1)ZZ)S%(0)S%(0)ZZ:S%(1)S%(1)ZZnOhZZ@oQh" Now combine ,2)fmhSI$;" ";RE$;" = ";:CO%(0)S%(0):CO%(1)S%(1):VA$S$:19000:RE$:15000:30000:E4%E4%1:26600mh30000:" That's right, ";N$;".":15000:30000m$hS$"x"LX%(0)S%(0):LX%(1)S%(1):26700m.hS$"y"LY%(0)S%(0):LY%(1)S%(1):26700n8hLC%(0 (0 Zнй`)JJ & & f)`"*:<"">""""""""""""">>><2"<""">""" ""  ">"6**"""""&*2""""""""""""*,"" "" ">""""""""""""""**6"""""""> >>> >00000>">>< (&20 *, **>> "2*&" " >>  ">> "8""> """"""< >> "$$! $%%#,fp% "Lp"% $`"H Β*+)hi#"H Β!*0+i+idH#d hd`"%$$%H hi#`$% Βc,d*+Me,dPMc*!0 +i+`%J) b+je *`PPPP򠥹,r0tL"$!e (' !!%##`f`" e$$ ",r0st(!#L"L $b . % `L a,gPgA[8 & & &mh)mi ̒e$*+Me$(Mc,dp ,cpP!pA* +i+Mebrs"t`,Tb@0,U`* L" {LB$!$$"% %L"c`g`g`,,Lҩc`@a`de` qLXde`s$t%L$td`e`g`f`Yd`e`L$e (' 8!$!$%"{LȎ !%# "LȎ5 )5`)aW L| JHIHa`G~ҏ#+@HPXs{ɐG֐G+R$a`1  emhi` b` ,r0rbj$s%t`@b`s$$hLde`,rSjd LL LHLH C `u8967 ,R,W U ,P` Р̺((*)  b+*HN OI*P,h*,H,`0ɛ` ɍ $h`ɐ 6+` qLȎ LȎ       !!! ! X Y Z [ \ ] hhh`HH ' hh^ `HHHV  V ` Lhhh`,n àϠȥ𬠄𠠠ŠϠÊәĠ̠ m ` 18)`8`HHH n  V H$hb V W X Y m [ l \ ] S ^ T _  ' hhh`HHV ' b i-c ihh`HH$Hȱhhh` LHHHHHHV W L m m  뭒 L   m   (m , r0+p  LJ  LJ -  ȱ  LJ ȱ  LJ s tL m JJJJl ȱm n   ,L, L%" n  :, " +, S l L\DЪ m L\        s t   ަL !8 HȑnhmȑstLS g ^ m  ` ^LLg L@A8m  @0 /@   q@8 @8e@@AiAP`L2Ġ JJJJHȱH ȩȩȩȑhhȩȩȑ /"& &  "  gLS) LSȩȩȩ ȩȩȩ gȭ  1!ijTY%46100,46200,46300,46400jB%LY%(0)1:RX%(0)A%(B%.05):RX%(1)(B%):RC%(0)C%B%:RC%(1)1}(B%)246140ц(ZZ(B%)21:WH(RX%(0)ZZ)WH(RX%(1)ZZ)RX%(0)RX%(0)ZZ:RX%(1)RX%(1)ZZن2ZZBFIKMOQSUY[]_acegikmoqsuwy{} <"<"""<< <"""<"><$""< """"  "" 6***""""""""""<""< :< $"""2,"""""**6"""""< >>8  80,ttom of screen."h 21:1:(6);:>h Write an ordered pair.Wh Pass coordinates inih DX% and DY%.h "(";DX%;",";DY%;")";:h WAIT FOR USER TO HIT RETURN.h 16368,0:24:9:"Press "(9)"RETURN to continue."; i ZZ(1):ZZ(16384):ZZ;".":"You found the right point.":3460xgp " Brilliant job, ";N$;".":"That's the point you were looking for.":3460gz " Excellent, ";N$;".":"There's the point you wanted."g 3HC(CX%),VC(CY%)g 17:24:(5):19:24:(5):h Clear bo point to be plotted&fv in CX%, CY%.f 3480:17:24:"Plot:";:24:(15);(15);"____ ";(15);(16);3);:DX%CX%:DY%CY%:3500f H1%0f H2%0:771,32f 3000:X%CX%Y%CY%3430'gf 2HC(X%),VC(Y%):3480:R(3)3440,3450:" Good work, ";N$0e ZZ%1331406e ZZ%723100,3110,3120,3030,3130Re Y%Y%(Y%TC%1):3030ne& X%X%(X%1TC%):3030e0 X%X%(X%TC%1):3030e: Y%Y%(Y%1TC%):3030eD PL%ĕ2HC(X%),VC(Y%):PL%1eN eX Plot a point.eb Pass coordinates offld Move cursor"d X%0:Y%0:PL%0)d 1Id 2HC(X%),VC(Y%):PL%PL%d 768,((Y%CY%)2(X%CX%)2)7.525:769,25:770d H1%Ģ19:32:DX%X%:DY%Y%:3500:X%10Y%10ĺ(5);d Z1%6000,6100,6200e 16368,0:PL%ĕ2HC(X%),VC(Y%):PL%7:5;:21:10:14:14:"|":13:"$}":19:13:"{0"c MG%ēHC(0),14HC(TC%),14:HC(0),0HC(TC%),0:HC(1),VC(TC%)HC(1),VC(TC%)c MG%ēHC(TC%),VC(TC%)HC(TC%),VC(TC%):HC(1),VC(4)HC(4),VC(4):HC(1),VC(6)HC(4),VC(6)c ZZ),VC(TC%)HC(ZZ),VC(TC%):HC(ZZ),VC(TC%)HC(ZZ),VC(TC%):HC(TC%),VC(ZZ)HC(TC%),VC(ZZ):HC(TC%),VC(ZZ)HC(TC%),VC(ZZ):ZZb 9:21:"x":2:11:"y"1c (1);1;:1:13:"&\";(3);:13:"^`";(4):6:13:5:11:1:"{0";:6:5;:1): ROT= 16: DRAW 1 AT FN HC(0), FN VC(TC%): ROT= 32: DRAW 1 AT FN HC(TC%), FN VC(0): ROT= 48: DRAW 1 AT FN HC(0), FN VC( - TC%)ar MG%āZZ1TC%TC%1:HC(ZZ),VC(0)4HC(ZZ),VC(0)4:HC(0)4,VC(ZZ)HC(0)4,VC(ZZ):ZZ:2950b| ZZ1TC%:HC(:(23);(16);(25);`6 3:1,`@ MG%2910Z`J HC(TC%)2,VC(0)1HC(TC%)2,VC(0)1`T HC(0)1,VC(TC%)2HC(0)1,VC(TC%)2`^ HC(TC%),VC(0)HC(TC%),VC(0):HC(0),VC(TC%)HC(0),VC(TC%)ah ROT= 0: DRAW 1 AT FN HC( - TC%), FN VC(0 13: HTAB 24: PRINT "Press "; CHR$ (9);"RETURN"; CHR$ (14);" when": HTAB 24: PRINT "the cursor is on": HTAB 24: PRINT "the right point."_n 1:0:1204,75:16:1220,58:32:1237,75:48:1220,93_x 3580_ 520_" SET UP AXES AND GRID`, 24:23)(YSS%(2TC%)SS%2.5)+^< MG%1:2850^F 175,10266,10:175,12266,12:217,0217,40:219,0219,40:1:29:"x";:36:"y"^P ZZ13:ZZ2:30((P%(ZZ,1))):P%(ZZ,1);:37((P%(ZZ,2))):P%(ZZ,2):ZZ^Z 9:32:"I":31:"J K":32:"M"_d VTAB0:X%:ZZ,X%:ZZ:: 173,48,192,136,208,5,206,1,3,240,9,202,208,245,174,0,3,76,2,3,96q]WH(X)(X(X)).0001]R(X)(X(1)1)]SIGN(X)32R(2)] PI3.1415926535]TC%11:SS%154:2210]HC(X)(XSS%(2TC%)SS%2.5)^VC(Y:51040yǭZZ0510404~Ǻ(8)" "(8);:ZZ151030XN$(N$,(N$)1):ZZZZ1:51040^DZess .":::11:"Name: ";:VZZ0:ZH0:N$"":G$""Z`ǾG$:ZH(G$):ZH13ZZ0ıjbǭZH851065|dǭZZ1051040fǭZH65ZH12251040hǭZH90ZH9751040ʼnjǭZZ0ĭZH90ZHZH32߉oǭZZ0ĭZH97ZHZH32tǺ(ZH);:N$N$(ZH):ZZZZ1inear Functions"-â12:14:"By Mark Berman"Sâ14:9:"Microcomputer Workshops"iâ16:18:"@ 1983"|ÁZZ12500:ZZù2999,255ñ8DzGet student's name.BǺ(16); LǢ4:" Please enter your first name (up to"::" ten letters) and pr#xLX%(0)A%:LY%(0)B%:RC%(0)C%:IܴLX%(0)A%:LY%(0)B%::LC%(0)C%:n@LY%(0)B%:RX%(0)A%:RC%(0)C%:PòPrint a title page.ZÑ:16302,0:6ڇdÁZZ010:ZZ,ZZ279ZZ,ZZ279ZZ,191ZZZZ,191ZZZZ,ZZ:ZZnú(1);1;â10:8:"Graphing L