' +JJJJ ?\>m0M='+l> /+l   d']6@5L&]655]6LF%5 & "L}"BB5L&]6 X  `6 77777777777JJJJx 77L? L7877777777 776i 7 7867 7`77 777777`x =(`(8`5775I7`B` 76`77`>J><;VU<)?<`8'x0|<&HhHh 8 8 8 8V&` aI꽌ɪVɭ&Y:&<&Y:&;: 꽌ɪ\8`&&꽌ɪɖ'*&%&,E'зЮ꽌ɪФ`+*xS&x'8*3Ixix&& 8 9: :' 9: :& :x)*++`FG8`0($ p,&"ųųೳŪŪųųij  !"#$%&'()*+,-./0123456789:;<=>?8  1 '" *"( (9"1 ( ,.(0# 2  /#0/#0 *?'#07#000'#07#0:"4<*55**5*%5)1)1)1)'#0/#0*5*75**5*:5/#0/#0'#07#0:::*::'#07#0"):$(%"%:$(%"%$$2%4%$$2%4%$(2()!)E(!8b $!H(+ "@H !D)"E` @ $ C ` DQ &J80^݌Hh < <݌ < < h < < < <`HJ>݌h Hh݌`葠葠ȔЖȔЖȠHIHHHHhHH݌hHhHh݌H6 (G FG HZXj 80x D9$xxH` >( Z>h Z>L=.xxH >hh@(LH>9L>HH/Hh/ H?-З( 8(& 8$8 H` *8HNx`* >x$50x*$50xL9JJJJ`HHjf5 >h $50x`HA>VD;;P >(ED Z> ?$0x8x D9- 8DD# H8`?E Vˆʎ55L $ 5 55555 &a*5`*5` "L&5_*b*JL%u**Lz%`** $  Q(lXJ̥KlV $  Q(lV eօ3L e3L &%R*L &%Q*L d' "L4% N'e*)n*5 5 &`@-e*f*f* 5 "L# "5f*`L %.* *t*Q*L$ %L&*L` "O**P**u** d' "L% N'e*)n*o*o*n* &8ɍ` ^&f\*555L& ^&NR* & "R*ΩL&)\*Z* ʽ LH*v 3h`0h8` " ['L & N'С55 &5`*A*@` +5L^6L65`  \* ?*0 '\* '  Q( ^&\*lZl^?*c*q)H c*h`f*5h*5j*555@O*AP*`u*@`@5&`Q*R*`E 'Ls' ' ' @DAE@u*`8` %@ @A@`@`**@*A`M5 ) "L&`8@AW*c*@8@-@HAȑ@hHȑ@ȑ@hHȑ@Ȋ@c*h8&ȑ@Hȑ@Ah@L'Hȑ@ȑ@* htphso`hMhL`9V*8U*897T*6S*67`INILOASAVRUCHAIDELETLOCUNLOCCLOSREAEXEWRITPOSITIOOPEAPPENRENAMCATALOMONOMOPRINMAXFILEFINBSAVBLOABRUVERIF!pppp p p p p`" t""#x"p0p@p@@@p@!y q q p@  LANGUAGE NOT AVAILABLRANGE ERROWRITE PROTECTEEND OF DATFILE NOT FOUNVOLUME MISMATCI/O ERRODISK FULFILE LOCKESYNTAX ERRONO BUFFERS AVAILABLFILE TYPE MISMATCPROGRAM TOO LARGNOT DIRECT COMMANč$3>L[dmx- (   Ϡ734@~3!+,W,o,*--,,9,-.-~3~3,,,,~3~3,,,,~3_*3 j.5 *H*H`Lc3 (+L3 +55555 1^3_* )3J Q*L_3Ls3443 D23455545554 70 / 7 :/354545455454555535L^/5-5I5555 55` / 4/ 2-5! / 08555454 70L3 (+50+5B5C3 2 70L35 *H*H`Lg3L{3505 *H*H` 3 ,5L3 3 1 ,H 1hBL, 0 BH [1 1h`Lo3 35 ,L3 3 1B , 1L,H 0hB@ 55 [1L133 (+34) 34 70L3 3L3 (+ 055L- (+34L{33454445 70 ^/* / 3B0 HȱBh -355 -8 /L38 25` +5 /3 /. /. 3 E7D B. /. /. 0]34S0J4 4) 3 4D4E B. 4  /. 02L3 Ν3 3`HD٤33DEEhiHLG.h ` /5B5-` /5B-` + X05I33383 33DH /4 E03744Ȍ7 X040 7 J7L35B5C`,5p` / R0-55`50` K/ R0-55`575755` 4/ K/ /( 55L/BȱBL/58` D2BH5BH :/ 75Bȭ5Bhh55 R0B5m55ȱB5m55` /LR0557755`*7*75LR0 E0(33 48`433 R0` E033LR0*7*7`777 555I7575757577** 7757`7 L35555f /55555555 ^/`855 i /B58` 41L 15ȱB5 /5555 /5`3 D23ȑB55B5 / 7 55`5555555555 5555`555`55BC55`5555`L3 /5B5C355 0Q340"B4 3` 02۰Ϭ33B438`3i#`3ЗLw35!50>5555`53 /3m3 3 3733i35 3583 /35ЉLw35`H /5h 25L/~43 533`55555555J5m55m5jn5n5n5ۭ55m5555m55m55`"L? 585H ~.(3` # d ֠z# u*`:LJ10:S$(II)". "CH$(II):712:II:LJ5:LI2:900$DuJJ1:II35:V10:T$CH$(JJ):990:LL:H:10:JJJJ1:850:S$D1$(II):LJ5:13:712:V19:900:II$Nu1aD$"":D$;"OPEN GRADES,L50":D$;"READ GRADES,R0":A:D$:A4925110T#aL$"INT2"#aAA1:D$;"WRITE GRADES,R0":A:D$:D$;"WRITE GRADES,R";A:NL$:NA$:L$:N:K:P#bD$;"CLOSE":#0u:4$:uLJ5::V10:LI1:II12:S$D1$(II):712:VV4:II:II13d help you if you make mistakes."Z"^"The third option is to work problems by yourself.""h"You will decide how many problems to do. If you let the computer do the work, you may only have 5 problems; otherwise you may have from 2 to 20 problems."F#ial. This program will make it simple!","You may use it in any of these three ways:"!"T"If you want o see examples done, I will show you how to do them, explaining each step as I go.","To do examples with help, I will give you a hint for each step, an39:22:1:958:S$"Do you want to play again?":LJ0:712:440:X89X1214760:4750^ :t (4);"RUN HELLO" 480:2030 @"See examples done.","Do examples with help.","Do problems yourself."U!J"Multiplying and dividing integers is essent12::LI0:900:V10sDuJJ1:II35:10:T$ZZ$(JJ)CH$(JJ):990:11:JJJJ1:S$D1$(II):LJ5:13:712:V19:900:IIyNu25110aAA1)aD$;"WRITE GRADES,R0"0aAOaD$:D$;"WRITE GRADES,R";Aj bNL$:NA$:L$:N:G:P|bD$;"CLOSE":0u::uTC34::480:V10:LI1:LJ5:F0:II12:S$D1$(II):712:VV4:940:DE200:II:II13:LJ10:S$(II)". "CH$(II):LI1:7J5::V10:LI1:II12:S$D1$(II):712:940:VV4:II:II13:LJ10:S$(II)". "CH$(II):V:712:940:VV1:II:LJ5:LI2:900DuJJ1:II35:10:T$CH$(JJ):990:LL:H:11:JJJJ1:850:S$D1$(II):LJ5:13:712:940:V19:900:IINulems; otherwise you may have from 2 to 20 problems."~aD$"":D$;"OPEN GRADES,L50":D$;"READ GRADES,R0":A:D$:A4925110aL$"EVAL"aAA1:D$;"WRITE GRADES,R0":A:D$:D$;"WRITE GRADES,R";A:NL$:NA$:L$:N:K9:PbD$;"CLOSE":0u::uLples with help, I will give you a hint for each step, and help you if you make mistakes."^"The third option is to work problems by yourself."4h"You will decide how many problems to do. If you let the computer do the work, you may only have 5 probebraic equations simply and easily. You will learn to substitute numbers for variables.","You may use this program in three different ways."YT"If you want to see examples done, I will show you how to do them, explaining each step as I go.","To do examVpTC39:22:1:958:S$"Do you want to play again?":LJ0:712:440:X89X1214760^:t(4);"RUN HELLO"480::RU1:1@"See examples done.","Do examples with help.","Do problems yourself."J"This program will help you evaluate alg$COEF$VAR$" + "CNS$" =":X85:Y100:610= 2200C KK9d\::480:CH34720waX27K9K91fP((N(K9))100.5)::S$"You got "(N)" right out of "(K9)" numbers, "NA$". That's "(P)"%.":TC37:H3:LI0:712:25000S):Y110:X180:610:300:940:2495t S$"The correct answer is "((COEFLTV)CNS):Y160:995:S$"Let me show you this one.":Y175:995:800:G159:840y 3:PROB$COEF$VAR$" + "CNS$:S$"Evaluate "PROB$" when "VAR$" = "LTV$:X55:Y57:6103~ SLTV)" + "CNS$" = "((COEFLTV)CNS):X85:Y140:610:G169:840:940U[ ` ANS$"":0:S$"Your answer: ":X10:Y170:610:II1(((COEFLTV)CNS)):A$:S$A$:610:ANS$ANS$A$::G169:840:ANS$((COEFLTV)CNS)2420#j S$((COEFLTV)CNmes "LTV$" and add "CNS$".":Y80:995. ANS$"":0:S$"Your answer: ":X10:Y170:610:II1(((COEFLTV)CNS)):A$:S$A$:610:ANS$ANS$A$::G169:840:ANS$((COEFLTV)CNS)İ300:23708 S$"Check your computation.":Y170:995OB 3:S$(COEFS$A$:610:ANS$ANS$A$::G169:840:ANS$LTV$İ300:2330p S$"Substitute "LTV$" for "VAR$".":Y170:995 940:3:S$COEF$"("LTV$") + "CNS$" =":X85:Y120:610:940:G169:840)$ 3:RQ7991:0,RQ270,RQ::0:S$"Multiply "COEF$" ti170:995j3:S$(COEFLTV)" + "CNS$" = "((COEFLTV)CNS):X85:Y140:610:G169:840:940q0w0:S$"Substitute for "VAR$".":Y80:995:139,88165,88: ANS$"":0:S$"Your answer: ":X10:Y170:610:II1(LTV$):A$::X85:Y100:610'\CH2200,2300,2400;f910:800:3999p0:S$"Substitute "LTV$" for "VAR$:Y170:9953:S$COEF$"("LTV$") + "CNS$" =":X85:Y120:610:940:G169:840 0:S$"Multiply "COEF$" times "LTV$" and add "CNS$".":YMTLLGĢV:1:958:2075s416304,0:16302,0:16299,0:16297,0:S$"Evaluating Equations":600:K91TL:1000z53>PROB$COEF$VAR$" + "CNS$:S$"Evaluate "PROB$" when "VAR$" = "LTV$:X55:Y57:610HS$COEF$VAR$" + "CNS$" ="V:LJ8:S$(II)") "CH$(II):712:VV2:II:SM1V:S$"Your choice? (1-3) ":LJ1:LG3:712:430:V9:H91:CHX:X:SM2:LG20:CH1LG5:SM1V2:S$"How many problems? ("(SM)"-"(LG)") ":H1:TC39:LI1:712:V9:H91:"";TL$:TL(TL$):TLSuctions? (Y/N) ":712:V9:H9:440:(X);:X89X121İ30000:12:S$"What's your first name? ":LJ1:712:V9:H9:" ";NA$V92:S$"And your last name? ":712:V9:H9:" ";NL$0 N0:CN0:H1:LJ1:S$"Do you want to:":712:V11:II13:((1)9)1:CNS((1)9)1:L((1)26)1:L9L21L12L15LL1~CNS$(CNS):COEF$(COEF):LTV$(LTV):VAR$(96L):QQ$"EVALUATING EQUATIONS":ER$" ":480:TC35:LJ1:RU12008?10:S$"Do you want instrE : TO EXIT "::990::420::kS$" to continue : to exit ":X5:Y180:610:420:~DE12000::L(T$):H20(L2):H:T$;:H9(36):V9(37)1:PG1PG0::X140(((S$)6)2):610:ECOEF((1)8)2:LTVI1ĺ7160::(7);"WORD TOO LONG";:6 4:RQ5171:30,RQ249,RQ::3:RQ7991:0,RQ270,RQ::4:RQ97151:77,RQ200,RQ::G169:840:HIIG191:3:0,II279,II:II:0:RI1L:"-";::%PG1:23:T$" TO CONTINUf H:(S$)TCāI1(S$):J((S$,I,1)):(J32(J95E2));::H9(36):V9(37)1::JJ0730:: LTTC11:X$(S$,LT,1):X$SP$X$"-"728 E2ĺ(S$,LT(X$SP$)):724 I1LT:J((S$,I,1)):(J32(J95));:S$(S$,(S$)LT):L 620"::640" qDR32XX2:6502 {DR95T10C |DR42DR34 SHDRT1:SH9SH20SH12SH44SH46XX1:SH46XX1 SHX,Y:SH44SH9SH12SH46XX1 SH59İ940 XXDI:: L(S$):LTCH20(L2):L0ı LJ0HLJ:I120:"][";::I14:40:"][";::40:I120:"][";::"]" :3:T$"VISION SOFTWARE PRESENTS:":990:5:T$QQ$:990:34,8:: X0:16302,0:Y15:X100:DI7 bI1(S$):DR((S$,I,1)):DR96T196:640 lDR103T1128:DR:(S$,I,1):"LINE610:9 16368,0:16384,128:KE(16384):KE128400\ 16368,0:XKE128:X27460:x 400:X13ĺ(7);:420~  400:XX48:XSMXLGı (7);:430 400:X78X89X110X121ı (7);:440 800:::4700? ::"[";23:2000 ,CH3NN1+ 6I1(6(1))1K @I1330,340,350,360,370,380` JS$"Great!":391y TS$"Fantastic!":391 ^S$"Super!":391 hS$"You're right!":391 rS$"Yes! Yes! Yes!":391 |S$"That's great!" X140(((S$)5)2):Y170: EVAL 8/21/87&:::0:1D$"":D$:D$;"BLOAD FRAC1.SHAPES,A25600":232,0:233,100:D$;"BLOAD EVAL.PIC,A$4000"PI13:CH$(I):IZI16:D1$(I):I fX0:Y0:PD$".":SS100:NN255:CM$", ":P0:M0:G0:N0:SP$(32):E2(637)2          990:LL:H:10:JJJJ1:850:S$D1$(II):LJ5:13:712:V19:900:III$NuNu#aAA1:D$;"WRITE GRADES,R0":A:D$:D$;"WRITE GRADES,R";A:NL$:NA$:L$:N:K:Pe#bD$;"CLOSE":k#0u:#:uLJ5::V10:LI1:II12:S$D1$(II):712:VV4:II:II13:LJ10:S$(II)". "CH$(II):712:II:LJ5:LI2:900C$DuJJ1:II35:V10:T$CH$(JJ):lf.""h"You will decide how many problems to do. If you let the computer do the work, you may only have 5 problems; otherwise you may have from 2 to 20 problems.""aD$"":D$;"OPEN GRADES,L50":D$;"READ GRADES,R0":A:D$:A4925110"aL$"INT2"S!T"If you want o see examples done, I will show you how to do them, explaining each step as I go.","To do examples with help, I will give you a hint for each step, and help you if you make mistakes.""^"The third option is to work problems by yourse : (4);"RUN HELLO"- 480:2030x @"See examples done.","Do examples with help.","Do problems yourself." J"Multiplying and dividing integers is essential. This program will make it simple!","You may use it in any of these three ways:"0:K0:4720aX27K9K91fP((NK9)100.5)::S$"You got "(N)" right out of "(K9)" numbers, "NA$". That's "(P)"%.":TC37:H3:LI0:712:25000 pTC39:22:1:958:S$"Do you want to play again?":LJ0:712:440:X89X1214760:4750t AN$"":S$"Your answer? ":X10:Y150:610:II1((IN(1))):A$:S$A$:610:AN$AN$A$::AN$(IN(1))İ300:2495 REV1:S$CA$(IN(1)):Y165:995:S$"Let me show you this one.":Y175:995:840 2200 REV0:K9 \::480:CH3P0:W0:0 [ &` G140:0:MUD2410,2450j AN$"":S$"Your answer? ":X10:Y150:610:II1((IN(3))):A$:S$A$:610:AN$AN$A$::AN$(IN(3))İ300:2495t REV1:S$CA$(IN(3)):Y165:995:S$"Let me show you this one.":Y175:995:840~ 2200:2495153:X10:610:2372IB S$SD$:Y142:X10:610:S$QT$NG$:X10:Y153:610D AN$"":S$"Your answer? ":X150:Y125:610:II1((IN(1))):A$:S$A$:610:AN$AN$A$::AN$(IN(1))İ300:2380F S$CA$(IN(1)):Y165:995L 3:S$(IN(1)):Y80:X205:61 AN$"":II1(((IN(1)))):A$:S$A$:610:AN$AN$A$::AN$((IN(1)))İ300:2360v5 S$CA$((IN(1))):Y165:9958 3:II140155:190,II240,II::0:S$((IN(1))):Y145:X190:610:910:G140:840= IN(4)0S$SS$:X10:Y142:610:S$QT$PP$:Y150:Y125:610:II1((IN(3))):A$:S$A$:610:AN$AN$A$::AN$(IN(3))İ300:2340u" S$CA$(IN(3)):Y165:995$ 3:S$(IN(3)):Y85:X239:610:0:2395. 0:S$"Divide: "((IN(3)))" / "((IN(2)))" = ":Y145:995:1400:0:Y145:X190T3)):Y165:995d 3:II140155:190,II240,II::0:S$((IN(3))):Y145:X190:610:910:G140:840 IN(3)0S$SS$:X10:Y142:610:S$PT$PP$:Y153:X10:610:2336 S$SD$:Y142:X10:610:S$PT$NG$:X10:Y153:610V AN$"":S$"Your answer? ":XS$(IN(1)):Y80:X205:610:0$7MUD2310,2350 0:S$"Multiply "((IN(1)))" X "((IN(2)))" = ":Y145:995:1400:0:Y145:X190 AN$"":II1(((IN(3)))):A$:S$A$:610:AN$AN$A$::AN$((IN(3)))İ300:2320  S$CA$((IN(3)vide "((IN(3)))" by "((IN(2)))" = ":Y160:995:940:1400z0:S$((IN(1))):Y160:X190:610:910:G159:840IN(4)0S$"The signs are the same.":Y145:995:S$QT$PP$:Y160:995:2290S$SD$:Y145:995:S$QT$NG$:Y160:9953:(IN(2)))" = ":Y160:995:940:1400^0:S$((IN(3))):Y160:X190:610:910:G159:840IN(3)0S$SS$:Y145:995:S$PT$PP$:Y160:995:2240S$SD$:Y145:995:S$PT$NG$:Y160:9953:S$(IN(3)):Y85:X239:610:0:2295C0:S$"Di19K92(K92)ē198,90238,90:198,89238,89:S$")":X196:Y91:610:X196:Y92:610:S$(IN(2)):X180:Y92:610:S$(IN(3)):X205:Y92:610:MUD2\CH2200,2300,2400f910:800:3999MUD2210,2250'0:S$"Multiply "((IN(1)))" X "("-"(LG)") ":H1:TC39:LI1:712:V9:H91:"";TL$:TL(TL$):TLSMTLLGĢV:1:958:2075416304,0:16302,0:16299,0:16297,0:S$"Integers II":0:600:K91TL:1000536K92(K92)S$(IN(1))" X "(IN(2))" = ":X180:Y85:610:MUDent."t N0:CN0:H1:LJ1:S$"Do you want to:":712:V11:II13:V:LJ8:S$(II)") "CH$(II):712:VV2:II:SM1V:S$"Your choice? (1-3) ":LJ1:LG3:712:430:V9:H91:CHX:X:SM2:LG20:CH1LG5:SM1]V2:S$"How many problems? ("(SM)our first name? ":LJ1:712:V9:H9:" ";NA$PP$"positive.":NG$"negative.":CA$"The correct answer is ":V92:S$"And your last name? ":712:V9:H9:" ";NL$G0:M0:X0:Y0:H10:V10:Q0::SS$"The signs are the same.":SD$"The signs are differ0:XX5:POVQQ$"INTEGERS II":ER$" ":480TC35:10:LJ1:S$"Do you want instructions? (Y/N) ":712:V9:H9:440:(X);:X89X121İ30000:-PT$"The product is ":QT$"The quotient is ":12:S$"What's y2:IN(FR)((1)7)1:SI((1)2)1:SI1IN(FR)IN(FR)@FRhIN(3)IN(1)IN(2):IN(4)IN(3)IN(2)nxI512:NN(I5)(IN(I5)):3:Y65:X40:I1NN(1):J1NN(2):TY114X,Y:XX12:J:YY10:X40:I Y55:X40:PO1NN(2):S$(PO):61ESC> TO EXIT ":=:990::420::fS$" to continue : to exit ":X5:Y180:610:420:yQQ12000::L(T$):H20(L2):H:T$;:H9(36):V9(37)1:PG1PG0::X140(((S$)6)2):610:TY((1)6)18FR11ĺ 716.::(7);"WORD TOO LONG";:4| 4:I53133:23,I130,I::0:I74105:149,I266,I::G140:840:H3:II125G:148,II269,II:II:IIG191:0,II269,II:II:0:RI1L:"-";:: PG1:23:T$" TO CONTINUE : < H:(S$)TCāI1(S$):J((S$,I,1)):(J32(J95E2));::H9(36):V9(37)1::JJ0730:: LTTC11:X$(S$,LT,1):X$SP$X$"-"728 E2ĺ(S$,LT(X$SP$)):724 I1LT:J((S$,I,1)):(J32(J95));:S$(S$,(S$)LT):LI20"::640 qDR32XX2:6500 {DR95T10A |DR42DR34 SHDRT1:SH9SH20SH12SH44SH46XX1:SH46XX1 SHX,Y:SH44SH9SH12SH46XX1 SH59İ940 XXDI:: L(S$):LTCH20(L2):L0ı LJ0HLJd;:I120:"][";::I14:40:"][";::40:I120:"][";::"]" :3:T$"VISION SOFTWARE PRESENTS:":990:5:T$QQ$:990:34,8:: X16302,0:Y15:X120:DI7 bI1(S$):DR((S$,I,1)):DR96T196:640 lDR103T1128:DR:(S$,I,1):"LINE 6:610:: 16368,0:16384,128:KE(16384):KE128400] 16368,0:XKE128:X27460:y 400:X13ĺ(7);:420  400:XX48:XSMXLGı (7);:430 400:X78X89X110X121ı (7);:440 800:::4720@ ::"["223:2000 ,CH3NN1, 6I1(6(1))1L @I1330,340,350,360,370,380a JS$"Great!":391z TS$"Fantastic!":391 ^S$"Super!":391 hS$"You're right!":391 rS$"Yes! Yes! Yes!":391 |S$"That's great!" X140(((S$)5)2):Y165J INT2 8/17/87$:::0:1D$"":D$:D$;"BLOAD FRAC.SHAPES,A25600":232,0:233,100:D$:D$;"BLOAD INT2.PIC,A$4000"PI13:CH$(I):IZI16:D1$(I):I fX0:Y0:PD$".":SS100:NN255:CM$", ":P0:M0:G0:N0:SP$(32):E2(637)          0:S$(II)". "CH$(II):712:II:LJ5:LI2:900&DuJJ1:II35:V10:T$CH$(JJ):990:LL:H:10:JJJJ1:850:S$D1$(II):LJ5:13:712:V19:900:II&NuD":D$;"OPEN GRADES,L50":D$;"READ GRADES,R0":A:D$:A4925110O%aL$"INT2"%aAA1:D$;"WRITE GRADES,R0":A:D$:D$;"WRITE GRADES,R";A:NL$:NA$:L$:N:K:P%bD$;"CLOSE":%0u:/&:uLJ5::V10:LI1:II12:S$D1$(II):712:VV4:II:II13:LJ1p you if you make mistakes."U$^"The third option is to work problems by yourself."$h"You will decide how many problems to do. If you let the computer do the work, you may only have 5 problems; otherwise you may have from 2 to 20 problems."A%aD$" This program will make it simple!","You may use it in any of these three ways:"$T"If you want to see examples done, I will show you how to do them, explaining each step as I go.","To do examples with help, I will give you a hint for each step, and hel22:1:958:S$"Do you want to play again?":LJ0:712:440:X89X1214760:4750Y":o"(4);"RUN HELLO"~"480:2030"@"See examples done.","Do examples with help.","Do problems yourself."P#J"Multiplying and dividing integers is essential. 10:S$(IN(3)):X205:Y92:610:MUD2:22000! 8!K9X!\::CH3P0:W0:K0:4720h!aX27KK1!fP((N(TL2))100.5)::S$"You got "(N)" right out of "(TL2)" numbers, "NA$". That's "(P)"%.":TC37:H3:LI0:712:25000Q"pTC39:13:LJ10:S$(II)". "CH$(II):V:712:940:VV1:II:LJ5:LI2:900 DuJJ1:II35:10:T$CH$(JJ):990:LL:H:11:JJJJ1:850:S$D1$(II):LJ5:13:712:940:V19:900:II NuA$"":D$;"OPEN GRADES,L50":D$;"READ GRADES,R0":A:D$:A4925110RaL$"EVAL"aAA1:D$;"WRITE GRADES,R0":A:D$:D$;"WRITE GRADES,R";A:NL$:NA$:L$:N:K:PbD$;"CLOSE":0u:E :uLJ5::V10:LI1:II12:S$D1$(II):712:940:VV4:II:IIhelp you if you make mistakes."X^"The third option is to work problems by yourself."h"You will decide how many problems to do. If you let the computer do the work, you may only have 5 problems; otherwise you may have from 2 to 20 problems."DaDstitute numbers for variables.","You may use this program in three different ways."T"If you want to see examples done, I will show you how to do them, explaining each step as I go.","To do examples with help, I will give you a hint for each step, and 2:440:X89X1214760:5(4);"RUN HELLO"M480:CLEAAR:RU1:1@"See examples done.","Do examples with help.","Do problems yourself."SJ"This program will help you evaluate algebraic equations simply and easily. You will learn to sub00:610 2200 K98\::480:CH34720fP((N(K9))100.5)::S$"You got "(N)" right out of "(K9)" numbers, "NA$". That's "(P)"%.":TC37:H3:LI0:712:25000pTC39:22:1:958:S$"Do you want to play again?":LJ0:71The correct answer is "((COEFLTV)CNS):Y160:995:S$"Let me show you this one.":Y175:995:800:G159:840y 3:PROB$COEF$VAR$" + "CNS$:S$"Evaluate "PROB$" when "VAR$" = "LTV$:X55:Y57:610~ S$COEF$VAR$" + "CNS$" =":X85:Y1NS):X85:Y140:610:G169:840:940)[ ` ANS$"":0:S$"Your answer: ":X10:Y170:610:II1(((COEFLTV)CNS)):A$:S$A$:610:ANS$ANS$A$::G169:840:ANS$((COEFLTV)CNS)2420j S$((COEFLTV)CNS):Y110:X180:610:300:940:2495nt S$". ANS$"":0:S$"Your answer: ":X10:Y170:610:II1(((COEFLTV)CNS)):A$:S$A$:610:ANS$ANS$A$::G169:840:ANS$((COEFLTV)CNS)İ300:23708 S$"Check your computation.":Y170:995#B 3:S$(COEFLTV)" + "CNS$" = "((COEFLTV)CTV$İ300:2330D S$"Substitute "LTV$" for "VAR$".":Y170:995 940:3:S$COEF$"("LTV$") + "CNS$" =":X85:Y120:610:940:G169:840$ 3:RQ7991:0,RQ270,RQ::0:S$"Multiply "COEF$" times "LTV$" and add "CNS$".":Y80:995NS$" = "((COEFLTV)CNS):X85:Y140:610:G169:840:940E0K0:S$"Substitute for "VAR$".":Y80:995:139,88165,88 ANS$"":0:S$"Your answer: ":X10:Y170:610:II1(LTV$):A$:S$A$:610:ANS$ANS$A$::G169:840:ANS$L910:800:3999D0:S$"Substitute "LTV$" for "VAR$:Y170:9953:S$COEF$"("LTV$") + "CNS$" =":X85:Y120:610:940:G169:8400:S$"Multiply "COEF$" times "LTV$" and add "CNS$".":Y170:995>3:S$(COEFLTV)" + "C302,0:16299,0:16297,0:S$"Evaluating Equations":600:K91TL:1000N53>PROB$COEF$VAR$" + "CNS$:S$"Evaluate "PROB$" when "VAR$" = "LTV$:X55:Y57:610HS$COEF$VAR$" + "CNS$" =":X85:Y100:610\CH2200,2300,2400fSM1eV:S$"Your choice? (1-3) ":LJ1:LG3:712:430:V9:H91:CHX:X:SM2:LG20:CH1LG5:SM1V2:S$"How many problems? ("(SM)"-"(LG)") ":H1:TC39:LI1:712:V9:H91:"";TL$:TL(TL$):TLSMTLLGĢV:1:958:2075G416304,0:161NA$J$:2010+925:J$J1$:930:NA$J$eV92:S$"And your last name? ":712:V9:H9:" ";NL$G0:M0:X0:Y0:H10:V10:N0:H0:V0:Q0: N0:CN0:H1:LJ1:S$"Do you want to:":712:V11:II13:V:LJ8:S$(II)") "CH$(II):712:VV2:II:     .*:uS$D1$(I1):LJ5:V:610:VV93:VV1:900:*Du10:II12:S$D2$(II):LJ0:610:LL1:820:V92:LJ5:LI0:II230030:S$D3$(II):610:900:*NuTC36:LJ3:S$D3$(II):610:900:::ٍ΍̍Ս΍ԍٍ΍Աٍ΍Բ     ER$:20:1:ER$:20:2p 20:2:"Add the "UN$(JK)" column:";:V5:H5:940:((MU$(1),JJ,1))S(1,JJ)2340 22:2:"You will need to carry.":9:H52:JJ3Ģ9:H54 S(1,JJ1)10Ğ::2340! :9:H5:"1":# AN(JJ)10AN(JJ)AN(JJ)1040:20:1:ER$:22:1:ER$:9:H5:" ":MX2MX32250JJMX2Ģ20:2:H5H51:"Now enter a comma.":940:15:H51:",":H5H51:940H5H52JKJK1:JJ:910:2710DE2:V517:H521:JJMX11 AN(JJ)10AN(JJ)AN(JJ)10 22:1:H5:940:((MU$(1),JJ,1))S(1,JJ)2240f22:2:"You will need to carry.":9:H52:JJ3Ģ9:H54S(1,JJ)10Ğ:"1"::JJMXī22409:H52:JJ3Ģ9:H54:940:9:H5:"1"::940AN(JJ)10AN(JJ)AN(JJ)10815:H5:AN(JJ):9:VV3:A12:V:13(SU2):N$MU$(A):120:N1$<RVV2:AZ\V1:11(SU2):850:V1vfJK1:CH2200,2300,2400p2710zDE2:V517:H521:JK1:JJMX1122:1:ER$:20:1:ER$:20:2(20:2:"Add the "UN$(JK)" column:";:V5:MX1MX6ī207820764SU5MX:MX3SUSU1@ K1TLJ*1000U,::34S$"Add these numbers:":LJ1:610:VV9:H25:A1JX:V:H:N$MU$(A):120:N1$:VV1::V:24:8509:800::/HV(37)1:V1:S$"Add these numbers:":TC20:600$"Your choice? (1-3) ":LJ1:LG3:610:430:V9:H91:CHX:X:LG20:CH1LG5V2:S$"How many problems? (2-"(LG)")":H1:TC39:LI1:610:V9:H91:" ";TL$:TL(TL$):TL2TLLGĢV:1:958:207521:1:"How many digits? (2-5) ";X$:MX(X$):? ":LJ1:610:V9:H9:" ";J$:(J$)12010:925:J$J1$:930:NA$J$V92:S$"And your last name? ":610:V9:H9:" ";NL$:(J$)1NA$J$JX2: S$"Do you want to:":610:V11:II13:V:LJ8:S$(II)") "CH$(II):610:VV2:II:SM1NV:Ssands":UN$(5)"ten thousands":QQ$"ADDITION":ER$" ":480uTC35:LJ1:RU12030TC35:10:LJ1:S$"Do you want instructions? (Y/N) ":610:V9:H9:440:(X);:X89X121İ30000:E12:S$"What's your first name,IJ)S(2,IJ):IJ: ADD AND NEXT COLUMNt FOR I = 1 TO 2: FOR J = 1 TO MX: PRINT S(I,J);" ";: NEXT J: PRINT : NEXT I: STOP ~ FOR I = 1 TO MX: PRINT AN(I);" ";: NEXT I: STOP [UN$(1)"ones":UN$(2)"tens":UN$(3)"hundreds":UN$(4)"thou390. ::10:"UNUSUAL ERROR CODE - ";Y;"."P :10:"SEE YOUR DOS MANUAL." 0 ";G(I);SP$;P(I);"%"8 :I:B :"END OF ";F$;" FILE."IL D$;"PR#0"~V 23:"PRESS ANY KEY TO RETURN TO THE MENU.";:G$` :10:10:"ONE MOMENT PLEASE...."j D$;"RUN HELLO" Y(222):Y5Ģ16:958:18:"THERE ARE NO GRADES IN THE FILE.":2LE." 2390 D$;"PR#1"5  30:F$;" FILE"::H  I1A:SP$" "  L(N$(I))(NA$(I)):SP37L:J1SP:SP$SP$" ": $ N$(I);", ";NA$(I);SP$;L$(I) ) SP$" ":L((N(I)))16((G(I))):SP39L:J1SP:SP$SP$" ":. N(I);" CORRECT OUT OF00  Y(222)# Y52040@ "UNUSUAL ERROR CODE ";YF m *:2:T$F$" FILE":990:LL1:850x 4I1A >:N$(I);", ";NA$(I);" ";L$(I) CN(I);" CORRECT OUT OF ";G(I),P(I);"%" HJJ1:J6İ900:J0 RI \:"END OF ";F$;" FID$"": CTRL-D- `D$;"OPEN ";F$;",L50"F jD$;"READ ";F$;",R0"M tAU ~D$` I1Az D$;"READ ";F$;",R";I N$(I):NA$(I):L$(I):N(I):G(I):P(I) D$ I D$;"CLOSE ";F$ :10:"*** ";F$;" FILE CLOSED ***" Z2090,2319:10:"GRADES (Y/N) ";:Z$:Z$A Z$"Y"F$"GRADES":1105_ 17:1:958:Z$"N"1050i 1045 19:"WHAT IS THE NAME OF THE SCORES FILE?":21:F$ LF$(13)F$"GRADES": READ GRADES QN$(65),NA$(65),L$(65),N(65),G(65),P(65) V"SCREEN OR WITH A PRINTER. WHICH DO YOU":9:"WISH TO USE?" 12:15:"1) SCREEN":14:15:"2) PRINTER":17:1:"YOUR CHOICE (1 OR 2) ";:Z$:Z(Z$):1 Z$"1"1045 Z$"2"Ģ12:1:958:198:1020# 17:"IS THE NAME OF THE SCORES FILE":R d2450::10004RH:IHHL:"-";::o23::T$"PRESS ANY KEY TO CONTINUE.":990:756:::L(T$):H(40L)2:H:T$: READ GRADES= :3:"THIS PROGRAM WILL PRINT THE GRADES":5:"FROM THE SCORES FILE EITHER ON THE ":7:   10:T$CH$(JJ):990:LL:H:10:JJJJ1:850:S$D1$(II):LJ5:13:712:V19:900:IIX$NuE#aL$"INT2"b#aAA1:D$;"WRITE GRADES,R0":A:D$:D$;"WRITE GRADES,R";A:NL$:NA$:L$:N:K9:Pt#bD$;"CLOSE":z#0u:#:uLJ5::V10:LI1:II12:S$D1$(II):712:VV4:II:II13:LJ10:S$(II)". "CH$(II):712:II:LJ5:LI2:900R$DuJJ1:II35:Vlems by yourself.""h"You will decide how many problems to do. If you let the computer do the work, you may only have 5 problems; otherwise you may have from 2 to 20 problems.""aD$"":D$;"OPEN GRADES,L50":D$;"READ GRADES,R0":A:D$:A4925110 three ways:"!T"If you want o see examples done, I will show you how to do them, explaining each step as I go.","To do examples with help, I will give you a hint for each step, and help you if you make mistakes.""^"The third option is to work probX1214760 :( (4);"RUN HELLO"; 480::RU1:1 @"See examples done.","Do examples with help.","Do problems yourself." !J"Multiplying and dividing integers is essential. This program will make it simple!","You may use it in any of these9\::480:CH34720-aX27K9K91fP((NK9)100.5)::S$"You got "(N)" right out of "(K9)" numbers, "NA$". That's "(P)"%.":TC37:H3:LI0:712:25000 pTC39:22:1:958:S$"Do you want to play again?":LJ0:712:440:X89:995:840~ 2200:2495 AN$"":S$"Your answer? ":X10:Y150:610:II1((IN(1))):A$:S$A$:610:AN$AN$A$::AN$(IN(1))İ300:2495 REV1:S$CA$(IN(1)):Y165:995:S$"Let me show you this one.":Y175:995:840 2200 REV0:K:S$(IN(1)):Y80:X205:610:0%[ A` G140:0:MUD2410,2450j AN$"":S$"Your answer? ":X10:Y150:610:II1((IN(3))):A$:S$A$:610:AN$AN$A$::AN$(IN(3))İ300:2495 t REV1:S$CA$(IN(3)):Y165:995:S$"Let me show you this one.":Y17510:Y142:610:S$QT$PP$:Y153:X10:610:2372dB S$SD$:Y142:X10:610:S$QT$NG$:X10:Y153:610D AN$"":S$"Your answer? ":X150:Y125:610:II1((IN(1))):A$:S$A$:610:AN$AN$A$::AN$(IN(1))İ300:2380F S$CA$(IN(1)):Y165:995L 395:1400:0:Y145:X190o3 AN$"":II1(((IN(1)))):A$:S$A$:610:AN$AN$A$::AN$((IN(1)))İ300:23605 S$CA$((IN(1))):Y165:9958 3:II140155:190,II240,II::0:S$((IN(1))):Y145:X190:610:910:G140:840.= IN(4)0S$SS$:XAN$"":S$"Your answer? ":X150:Y125:610:II1((IN(3))):A$:S$A$:610:AN$AN$A$::AN$(IN(3))İ300:2340" S$CA$(IN(3)):Y165:995$ 3:S$(IN(3)):Y85:X239:610:0:2395. 0:S$"Divide: "((IN(3)))" / "((IN(2)))" = ":Y145:9:2320( S$CA$((IN(3))):Y165:995 3:II140155:190,II240,II::0:S$((IN(3))):Y145:X190:610:910:G140:840 IN(3)0S$SS$:X10:Y142:610:S$PT$PP$:Y153:X10:610:2336 S$SD$:Y142:X10:610:S$PT$NG$:X10:Y153:610q QT$NG$:Y160:99593:S$(IN(1)):Y80:X205:610:0?RMUD2310,2350 0:S$"Multiply "((IN(1)))" X "((IN(2)))" = ":Y145:995:1400:0:Y145:X190 AN$"":II1(((IN(3)))):A$:S$A$:610:AN$AN$A$::AN$((IN(3)))İ300610:0:2295^0:S$"Divide "((IN(3)))" by "((IN(2)))" = ":Y160:995:940:14000:S$((IN(1))):Y160:X190:610:910:G159:840IN(4)0S$"The signs are the same.":Y145:995:S$QT$PP$:Y160:995:2290S$SD$:Y145:995:S$iply "((IN(1)))" X "((IN(2)))" = ":Y160:995:940:1400y0:S$((IN(3))):Y160:X190:610:910:G159:840IN(3)0S$SS$:Y145:995:S$PT$PP$:Y160:995:2240S$SD$:Y145:995:S$PT$NG$:Y160:995 3:S$(IN(3)):Y85:X239:)" = ":X180:Y85:610:MUD19K92(K92)ē198,90238,90:198,89238,89:S$")":X196:Y91:610:X196:Y92:610:S$(IN(2)):X180:Y92:610:S$(IN(3)):X205:Y92:610:MUD2\CH2200,2300,2400f910:800:3999MUD2210,2250B0:S$"Multw many problems? ("(SM)"-"(LG)") ":H1:TC39:LI1:712:V9:H91:"";TL$:TL(TL$):TLSMTLLGĢV:1:958:2075416304,0:16302,0:16299,0:16297,0:S$"Integers II":0:600:K91TL:1000536K92(K92)S$(IN(1))" X "(IN(2)duct is ":QT$"The quotient is " N0:CN0:H1:LJ1:S$"Do you want to:":712:V11:II13:V:LJ8:S$(II)") "CH$(II):712:VV2:II:SM1V:S$"Your choice? (1-3) ":LJ1:LG3:712:430:V9:H91:CHX:X:SM2:LG20:CH1LG5:SM1xV2:S$"Ho1:712:V9:H9:" ";NA$QV92:S$"And your last name? ":712:V9:H9:" ";NL$G0:M0:X0:Y0:H10:V10:Q0::SS$"The signs are the same.":SD$"The signs are different.":PP$"positive.":NG$"negative.":CA$"The correct answer is " PT$"The pro10:XX5:POmQQ$"INTEGERS II":ER$" ":480:TC35:LJ1:RU12008TC35:10:LJ1:S$"Do you want instructions? (Y/N) ":712:V9:H9:440:(X);:X89X121İ30000:12:S$"What's your first name? ":LJ2:IN(FR)((1)7)1:SI((1)2)1:SI1IN(FR)IN(FR)AFRiIN(3)IN(1)IN(2):IN(4)IN(3)IN(2)oxI512:NN(I5)(IN(I5)):3:Y65:X40:I1NN(1):J1NN(2):TY114X,Y:XX12:J:YY10:X40:I Y55:X40:PO1NN(2):S$(PO):6 TO EXIT "::990::420::gS$" to continue : to exit ":X5:Y180:610:420:zQQ12000::L(T$):H20(L2):H:T$;:H9(36):V9(37)1:PG1PG0::X140(((S$)6)2):610:TY((1)6)19FR11ĺ716/::(7);"WORD TOO LONG";:5} 4:I53133:23,I130,I::0:I74105:149,I266,I::G140:840:H3:II125G:148,II269,II:II:IIG191:0,II269,II:II:0:RI1L:"-";::!PG1:23:T$" TO CONTINUE : e H:(S$)TCāI1(S$):J((S$,I,1)):(J32(J95E2));::H9(36):V9(37)1::JJ0730:: LTTC11:X$(S$,LT,1):X$SP$X$"-"728 E2ĺ(S$,LT(X$SP$)):724 I1LT:J((S$,I,1)):(J32(J95));:S$(S$,(S$)LT):LI620"::640! qDR32XX2:6501 {DR95T10B |DR42DR34 SHDRT1:SH9SH20SH12SH44SH46XX1:SH46XX1 SHX,Y:SH44SH9SH12SH46XX1 SH59İ940 XXDI:: L(S$):LTCH20(L2):L0ı LJ0HLJ";:I120:"][";::I14:40:"][";::40:I120:"][";::"]" :3:T$"VISION SOFTWARE PRESENTS:":990:5:T$QQ$:990:34,8:: X16302,0:Y15:X120:DI7 bI1(S$):DR((S$,I,1)):DR96T196:640 lDR103T1128:DR:(S$,I,1):"LINE 5:610:; 16368,0:16384,128:KE(16384):KE128400^ 16368,0:XKE128:X27460:z 400:X13ĺ(7);:420  400:XX48:XSMXLGı (7);:430 400:X78X89X110X121ı (7);:440 800:::4700A ::"[223:2000 ,CH3NN1- 6I1(6(1))1M @I1330,340,350,360,370,380b JS$"Great!":391{ TS$"Fantastic!":391 ^S$"Super!":391 hS$"You're right!":391 rS$"Yes! Yes! Yes!":391 |S$"That's great!" X140(((S$)5)2):Y16Y INT2 8/21/87%:::0:1D$"":D$:D$;"BLOAD FRAC.SHAPES,A25600":232,0:233,100:D$:D$;"BLOAD INT2.PIC,A$4000"PI13:CH$(I):IZI16:D1$(I):I fX0:Y0:PD$".":SS100:NN255:CM$", ":P0:M0:G0:N0:SP$(32):E2(637)                  1ĺ 716-::(7);"WORD TOO LONG";:3 3:II75110:0,II279,II::4:II118168:21,II260,II::G179:840:*0:IIY168:21,II258,II::4AN$"":II1(ST$):A$:S$A$:610:AN$AN$A$::HIIG191:3:0,II279,II:II:0:10:LI1:II12:S$D1$(II):712:940:VV4:II:II13:LJ10:S$(II)". "CH$(II):712:940:II:LJ5:LI2:900%DuJJ1:II35:10:T$CH$(JJ):990:LL:H:11:JJJJ1:850:S$D1$(II):LJ5:13:712:940:V19:900:II%Nuerwise you may have from 2 to 20 problems."u$aD$"":D$;"OPEN GRADES,L50":D$;"READ GRADES,R0":A:D$:A4925110$aL$"INT1"$aAA1:D$;"WRITE GRADES,R0":A:D$:D$;"WRITE GRADES,R";A:NL$:NA$:L$:N:K9:P$bD$;"CLOSE":$0u p%:uLJ5::Velp, I will give you a hint for each step, and help you if you make mistakes."#^ "The third option is to work problems by yourself."+$h "You will decide how many problems to do. If you let the computer do the work, you may only have 5 problems; othto learn to add and subtract integers, this program will solve your problem!","You may use this program in three different ways."N#T "If you want to see examples done, I will show you how to do them, explaining each step as I go.","To do examples with h3:LI0:712:25000i!pTC39:22:1:958:S$"Do you want to play again?":LJ0:712:440:X89X1214760q!:!(4);"RUN HELLO"!480::RU1:1!@ "See examples done.","Do examples with help.","Do problems yourself.""J "If you want K92(K92)S$(IN(1))" - "(IN(2))" = ":ADS2P Y100:995:FXX:2200V ^ K9w \::480:CH34720 aX27K9K91!fP((N(K9))100.5)::S$"You got "(N)" right out of "(K9)" numbers, "NA$". That's "(P)"%.":TC37:H610:2350~ 2480 2395 ST$(IN(4)):3:S$"Your answer: ":Y130:995:820:AN$(IN(4))İ300:0:S$(IN(4)):Y100:XFX:610:2395 S$"Let me show you this one.":Y150:995:800 K92(K92)S$(IN(1))" + "(IN(2))" = ":ADS16 )İ300:0:S$(IN(4)):Y100:XFX:610:2395^Q 3:S$"The answer is "(IN(4))".":Y160:995V 0:S$(IN(4)):XFX:Y100:610[ ` ADS2425,2476 y ST$(IN(3)):3:S$"Your answer: ":Y130:995:820:AN$(IN(3))İ300:0:S$(IN(3)):Y100:XFX:95:3:I100111:0,I279,I::0:S$(IN(1))" + "IW$" = ":Y100:995:FXXVK 940L Y130:810:S$"Move "IW$". (to the "RL$")":Y135:3:995:6:II8485:BEGX,IIENX,II::940+O ST$(IN(4)):3:S$"Your answer: ":Y148:995:820:AN$(IN(4):ENXBEGX(10(IN(2))):ENXENX10:RL$"left"ENXENX20SG IWIN(2)1:IW$(IW)H ST$(IN(4)):3:S$"Your answer: ":Y130:995:820:AN$(IN(4))İ300:0:S$(IN(4)):Y100:XFX:610:2395MJ 3:S$"Change the sign of "(IN(2))" and add.":Y140:90:S$(IN(3)):Y100:XFX:610:2350V" 3:S$"The answer is "(IN(3))".":Y160:995y$ 0:S$(IN(3)):XFX:Y100:610. 23958 3:S$"Plot the first point.":Y120:995:6:121BEGX,80:IN(2)0RL$"left":2370= RL$"right":BEGXBEGX109B 940ur answer: ":Y130:995:820:AN$(IN(3))İ300:0:S$(IN(3)):Y100:XFX:610:2350 S$"Move "(IN(2))". (to the "RL$")":Y140:3:995:6:II8485:BEGX,IIENX,II::940# ST$(IN(3)):3:S$"Your answer: ":Y150:995:820:AN$(IN(3))İ300:0:610 ADS2310,2360v 3:S$"Plot the first point.":Y120:995:6:121BEGX,80:IN(2)0RL$"left":2320 RL$"right":BEGXBEGX10 940:ENXBEGX(10(IN(2))):RL$"right"ENXENX10 RL$"left"ENXENX10T ST$(IN(3)):3:S$"Yo995:3:I100111:0,I279,I::0:S$(IN(1))" + "(IN(2))" = ":Y100:995:FXXS$"Move "IW$". (to the "RL$")":Y144:3:995:6:II8485:BEGX,IIENX,II::9403:S$"The answer is "(IN(4))".":Y154:9950:S$(IN(4)):XFX:Y10Plot the first point.":Y124:995:6:121BEGX,80:IN(2)0RL$"left":2270hRL$"right":BEGXBEGX10940:ENXBEGX(10(IN(2))):ENXENX10:RL$"left"ENXENX20IWIN(2)1:IW$(IW)U3:S$"Change the sign of "(IN(2))" and add.":Y134:):RL$"right"ENXENX104RL$"left"ENXENX10S$"Move "(IN(2))". (to the "RL$")":Y137:3:995:6:II8485:BEGX,IIENX,II::9403:S$"The answer is "(IN(3))".":Y152:9950:S$(IN(3)):XFX:Y100:6102295K3:S$"(IN(2))" = ":ADS2*RY100:995:FXXA\CH2200,2300,2400Uf910:800:3999[pnADS2210,22603:S$"Plot the first point.":Y122:995:6:121BEGX,80:IN(2)0RL$"left":2220RL$"right":BEGXBEGX10940:ENXBEGX(10(IN(2))H91:"";TL$:TL(TL$):TLSMTLLGĢV:1:958:2075416304,0:16302,0:16299,0:16297,0:S$"Integers I":600:K91TL:1000:1400:BEGX135(10IN(1))>K92(K92)S$(IN(1))" + "(IN(2))" = ":ADS1HK92(K92)S$(IN(1))" - "ant to:":712:V11:II13:V:LJ8:S$(II)") "CH$(II):712:VV2:II:SM1V:S$"Your choice? (1-3) ":LJ1:LG3:712:430:V9:H91:CHX:X:SM2:LG20:CH1LG5:SM15V2:S$"How many problems? ("(SM)"-"(LG)") ":H1:TC39:LI1:712:V9:08_10:S$"Do you want instructions? (Y/N) ":712:V9:H9:440:(X);:X89X121İ30000:12:S$"What's your first name? ":LJ1:712:V9:H9:" ";NA$V92:S$"And your last name? ":712:V9:H9:" ";NL$L CN0:H1:LJ1:S$"Do you wPL4024050:PL,50PL,70:Y40:S$"-12":X5:610:S$"-10":X35:610:S$"-5":X85:610:S$"0":X138:610:S$"5":X188:610:S$"10":X235:610:S$"12":X260:610:QQ$"INTEGERS I":ER$" ":480:TC35:LJ1:RU120:#X140(((S$)6)2):610:bI12:IN(I)((1)9)I:SI((1)2)1:SI1IN(I)IN(I)I:IN(3)IN(1)IN(2):IN(4)IN(1)IN(2):IN(3)12IN(3)12IN(4)12IN(4)121000:x0:20,60260,60:20,59260,59PL2026010:PL,55PL,65::RI1L:"-";::aPG1:23:T$" TO CONTINUE : TO EXIT "::990::420::S$" to continue : to exit ":X5:Y180:610:420:DE12000::L(T$):H20(L2):H:T$;:H9(36):V9(37)1:PG1PG0:1ĺ 716.::(7);"WORD TOO LONG";:4 3:II75110:0,II279,II::4:II118168:21,II260,II::G179:840:*0:IIY168:21,II258,II::4AN$"":II1(ST$):A$:S$A$:610:AN$AN$A$::HIIG191:3:0,II279,II:II:0: H:(S$)TCāI1(S$):J((S$,I,1)):(J32(J95E2));::H9(36):V9(37)1::JJ0730:: LTTC11:X$(S$,LT,1):X$SP$X$"-"728 E2ĺ(S$,LT(X$SP$)):724 I1LT:J((S$,I,1)):(J32(J95));:S$(S$,(S$)LT):LI20"::640 qDR32XX2:6500 {DR95T10A |DR42DR34 SHDRT1:SH9SH20SH12SH44SH46XX1:SH46XX1 SHX,Y:SH44SH9SH12SH46XX1 SH59İ940 XXDI:: L(S$):LTCH20(L2):L0ı LJ0HLJdI120:"][";::I14:40:"][";::40:I120:"][";::"]" :3:T$"VISION SOFTWARE PRESENTS:":990:5:T$QQ$:990:34,8:: X0:16302,0:Y15:X120:DI7 bI1(S$):DR((S$,I,1)):DR96T196:640 lDR103T1128:DR:(S$,I,1):"LINE 610:7 16368,0:16384,128:KE(16384):KE128400Z 16368,0:XKE128:X27460:v 400:X13ĺ(7);:420|  400:XX48:XSMXLGı (7);:430 400:X78X89X110X121ı (7);:440 800:::4700= ::"[";::2000 ,CH3NN1) 6I1(6(1))1I @I1330,340,350,360,370,380^ JS$"Great!":391w TS$"Fantastic!":391 ^S$"Super!":391 hS$"You're right!":391 rS$"Yes! Yes! Yes!":391 |S$"That's great!" X140(((S$)5)2):Y160:6 INT1 8/21/87%:::0:1D$"":D$:D$;"BLOAD FRAC.SHAPES,A25600":232,0:233,100:D$;"BLOAD INT1.PIC,A$4000"PI13:CH$(I):IZI16:D1$(I):I fX0:Y0:PD$".":SS100:NN255:CM$", ":P0:M0:G0:N0:SP$(32):E2(637)223                EVAL 8/17/87$:::0:1D$"":D$:D$;"BLOAD FRAC1.SHAPES,A25600":232,0:233,100:D$;"BLOAD EVAL.PIC,A$4000"PI13:CH$(I):IZI16:D1$(I):I fX0:Y0:PD$".":SS100:NN255:CM$", ":P0:M0:G0:N0:SP$(32):E2(637)223        NuV10:LI1:II12:S$D1$(II):712:940:VV4:II:II13:LJ10:S$(II)". "CH$(II):712:940:II:LJ5:LI2:900!DuJJ1:II35:10:T$CH$(JJ):990:LL:H:11:JJJJ1:850:S$D1$(II):LJ5:13:712:940:V19:900:II!NuD1$(II):LJ5:13:712:940:V19:900:II. Nu"WRITE GRADES,R";A:NL$:NA$:L$:N:K9:P<bD$;"CLOSE":B0u::uLJ5::V10:LI1:II12:S$D1$(II):712:940:VV4:II:II13:LJ10:S$(II)". "CH$(II):712:940:II:LJ5:LI2:900( DuJJ1:II35:10:T$CH$(JJ):990:LL:H:11:JJJJ1:850:S$s to do. If you let the computer do the work, you may only have 5 problems; otherwise you may have from 2 to 20 problems."aD$"":D$;"OPEN GRADES,L50":D$;"READ GRADES,R0":A:D$:A4925110aL$"EQUAT"*aAA1:D$;"WRITE GRADES,R0":A:D$:D$;ill show you how to do them, explaining each step as I go.","To do examples with help, I will give you a hint for each step, and help you if you make mistakes."^"The third option is to work problems by yourself."{h"You will decide how many problemU1:1Q@"See examples done.","Do examples with help.","Do problems yourself."J"This program will help you solve algebraic equations simply and easily.","You may use this program in three different ways."T"If you want to see examples done, I wN(K9))100.5)::S$"You got "(N)" right out of "(K9)" numbers, "NA$". That's "(P)"%.":TC37:H3:LI0:712:25000pTC39:22:1:958:S$"Do you want to play again?":LJ0:712:440:X89X1214760:(4);"RUN HELLO"480::R:610:II1(LTV$):A$:S$A$:610:ANS$ANS$A$::G169:840:ANS$LTV$2420j S$LTV$:Y140:XWX:3:610:0:300:940:2495t S$"The correct answer is "LTV$".":Y80:995 2200 K9\::480:CH34720aX27K9K91~fP((":Y170:995SB S$VAR$:X92:Y140:3:610:S$"= "LTV$:ANSWER10S$"= "LTV$xL X163:Y140:610:940:G160:840~[ ` 80,120193,120:80,121193,121:S$VAR$:X92:Y140:610:S$"= ":X163:610:WXXMe ANS$"":0:S$"Your answer: ":X10:Y170$ 3:RQ7991:0,RQ270,RQ::0:S$"Divide each side by .":Y80:995:188,88207,88. ANS$"":0:S$"Your answer: ":X10:Y170:610:II1(COEF$):A$:S$A$:610:ANS$ANS$A$::G169:840:ANS$COEF$İ300:2370 8 S$"Divide each side by "COEF$"." from each side.":Y170:995 940:3:S$"-"CNS$:X135:Y110:610:X180:610:80,120193,120:80,121193,121:940:G169:840 3:ANSWERLTVCOEF:S$COEF$VAR$:X85:Y125:610:S$"= "(ANSWER):ANSWER10S$"= "(ANSWER) X163:Y125:610XV$X163:Y140:6100$h0:S$"Subtract from each side.":Y80:995:105,88135,88 ANS$"":0:S$"Your answer: ":X10:Y170:610:II1(CNS$):A$:S$A$:610:ANS$ANS$A$::G169:840:ANS$CNS$İ300:2330 S$"Subtract "CNS$40i3:ANSWERLTVCOEF:S$COEF$VAR$:X85:Y125:610:S$"= "(ANSWER):ANSWER10S$"= "(ANSWER)~X163:Y125:6100:S$"Now divide by the coefficient: "COEF$".":Y165:995:S$VAR$:X92:Y140:3:610:S$"= "LTV$:ANSWER10S$"= "LT>HS$COEF$VAR$" + "CNS$" = "AN$:X85:Y100:610U\CH2200,2300,2400if910:800:39990:S$"Subtract "CNS$" from both sides:":Y170:9953:S$"-"CNS$:X135:Y110:610:X180:610:80,120193,120:80,121193,121:940:G169:8LLGĢV:1:958:2075m416304,0:16302,0:16299,0:16297,0:S$"Solving Equations":600:K91TL:1000t53>AN$((COEFLTV)CNS):(AN$)10AN$" "AN$CPROB$COEF$VAR$" + "CNS$" = "ANS$:S$"Solve this equation: "PROB$:Y57:X35:610J8:S$(II)") "CH$(II):712:VV2:II:SM1V:S$"Your choice? (1-3) ":LJ1:LG3:712:430:V9:H91:CHX:X:SM2:LG20:CH1LG5:SM1V2:S$"How many problems? ("(SM)"-"(LG)") ":H1:TC39:LI1:712:V9:H91:"";TL$:TL(TL$):TLSMTions? (Y/N) ":712:V9:H9:440:(X);:X89X121İ30000:~12:S$"What's your first name? ":LJ1:712:V9:H9:" ";NA$V92:S$"And your last name? ":712:V9:H9:" ";NL$- N0:CN0:H1:LJ1:S$"Do you want to:":712:V11:II13:V:L((1)9)1:CNS((1)9)1:L((1)26)1:L9L21L12L15LL1~CNS$(CNS):COEF$(COEF):LTV$(LTV):VAR$(96L):QQ$"SOLVING EQUATIONS":ER$" ":480:TC35:LJ1:RU12008<10:S$"Do you want instructE : TO EXIT "::990::420::kS$" to continue : to exit ":X5:Y180:610:420:~DE11500::L(T$):H20(L2):H:T$;:H9(36):V9(37)1:PG1PG0::X140(((S$)6)2):610:ECOEF((1)8)2:LTVI1ĺ7160::(7);"WORD TOO LONG";:6 4:RQ5171:30,RQ246,RQ::3:RQ7991:0,RQ270,RQ::4:RQ97151:77,RQ196,RQ::G160:840:HIIG191:3:0,II279,II:II:0:RI1L:"-";::%PG1:23:T$" TO CONTINUf H:(S$)TCāI1(S$):J((S$,I,1)):(J32(J95E2));::H9(36):V9(37)1::JJ0730:: LTTC11:X$(S$,LT,1):X$SP$X$"-"728 E2ĺ(S$,LT(X$SP$)):724 I1LT:J((S$,I,1)):(J32(J95));:S$(S$,(S$)LT):L 620"::640" qDR32XX2:6502 {DR95T10C |DR42DR34 SHDRT1:SH9SH20SH12SH44SH46XX1:SH46XX1 SHX,Y:SH44SH9SH12SH46XX1 SH59İ940 XXDI:: L(S$):LTCH20(L2):L0ı LJ0HLJ:I120:"][";::I14:40:"][";::40:I120:"][";::"]" :3:T$"VISION SOFTWARE PRESENTS:":990:5:T$QQ$:990:34,8:: X0:16302,0:Y15:X115:DI7 bI1(S$):DR((S$,I,1)):DR96T196:640 lDR103T1128:DR:(S$,I,1):"LINE610:9 16368,0:16384,128:KE(16384):KE128400\ 16368,0:XKE128:X27460:x 400:X13ĺ(7);:420~  400:XX48:XSMXLGı (7);:430 400:X78X89X110X121ı (7);:440 800:::4700? ::"[";23:2000 ,CH3NN1+ 6I1(6(1))1K @I1330,340,350,360,370,380` JS$"Great!":391y TS$"Fantastic!":391 ^S$"Super!":391 hS$"You're right!":391 rS$"Yes! Yes! Yes!":391 |S$"That's great!" X140(((S$)5)2):Y170:/ EQUAT 8/21/87&:::0:1D$"":D$:D$;"BLOAD FRAC1.SHAPES,A25600":232,0:233,100:D$;"BLOAD EVAL.PIC,A$4000"PI13:CH$(I):IZI16:D1$(I):I fX0:Y0:PD$".":SS100:NN255:CM$", ":P0:M0:G0:N0:SP$(32):E2(637)2        0:I120:"][";::"]"]:3:T$"VISION SOFTWARE PRESENTS:":990:5:T$QQ$:990:34,8::the child","misses a problem.","","Send your comments and criticisms to:"D "Micki Fitzpatrick, Programming Coor.","5400 Taylor Road,","Naples, Florida 33942"XH20((T$)2):H:T$:::"[";:I120:"][";::I14:40:"][";::4which is used in","recording his score. Children will","be able to use the disk independently","after going through the 'See Examples"I: "Done' or the 'Do Examples With Help'","option. In most of the programs the","concepts are retaught when z#    " Ϡ  Ԡ̠Ա Բ ĠӠ Π $ ñӠ  Աà! Բà! Ůà"Ӡ ! ᭭! ϠӠ ŠŠ)  ŠӠ̮à!îӠ`(,LФ$(H,0 @))(N- h`,,۩,0۩+ ,6L Y,*,00Ɂͬ,,,c0 ې II ,*Pɛ,00@L,*?ɛ&,!& 5ؠ0 >ڤ$LԤ$,0pɕ -`( }8n6N- @2ɧ @)ɧ/ɝ$LC >ڈL  2N5۩ >کEE I LE ֦CL$8f< 8N-E$<CC CE?AC8A 8L-$>I  8LӥE? ע L ֩? >?L CC >` LԘH@ɠ$@ ɢE@@EE=hEA`C ֩ LE `N/ 5؆CEEɛ@ T֝ LԠ $ T`DH UhhhN-ۦCLԹHH$`ʩ >Lԩ@ :ɠE T֦CH դ$h  $> 2 ٦EH.ۥ3ɾɪ$@.ɢE@@$@0 )ߝh` 8L֤EEՠɮ ڙt` Ԑ ԰t`n4۩ ,5iۙ`Wՠ ɢɢ J`8 հ Z۝`2 ՐEH۰ȹIɿh`2 Րh` ԰Eɠ`AɀeE*EEA ʽAIE ɺ>F=E&ۍ'۩$3pDмɍH'h`C$3P톸Eɍ$3p C 'ۢL#ED צC` ԰N5L$= ԭ Ր4 0 `հ հ3L E Ԑ $L F>'J&ۢL ɠɰɺ8``ɯɍ`tՌ#) ٩ ٩ 4H hߦ$! ٩$`tuۘۍ5ێ 0N5 +0z ԍ5 mJ AՌۘ [Z AՌ۽I]Iƍ3I2ۭu$3p ڙtۈL (ɬ ɮ ɬ ɢ Ԑ`ʨ`hh UN5 2ѢE$` )L  )ՠ ɠiPɗ*ɘɍL=Ʌ-ɖ5 I 2ѩ$`$3p.ۆE  Lԥ3ɾ` >1ۭնHED 3 3,hնN1,1pd x٭=م<>م=EM 40 4ّ<<=18<=L E Uڊ<)<L>+ m 4L,Hh)hRhذdfۈ ,ѩHHLԶ 2L L@  QѠ67'`N/۠89&`(ۍ)ۮ'۽HH)ۮ(`((ۺwn*ۮ(,3L ©éĭ&@JLLl&3jَϹB@/ u,5L 5,*``````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````I hh,`ӠˠϠŠ̠ŠéԠé̠΍$$8HIL,նh, ,`, ,`, , ,:/8`$ɝ ,L* `HHZ ,̠$ , Hȱh  ȩБ,'ȱ,H  h iЩH, MMТF¶LL       é0ӠˠϠŠ̠ŠéԠé̠΍$$8HIL,նh, ,`, ,`, , C,:/8`9LLLL`ª`LQLYLLLee0HFg09 N }_bh L HN Эh8©é0 h``8LXLeLXLe}_bh L HN Эh8©  $?($@$: @A 9~ ȁ$: n$?,0 6   n,  9~  ȁA$?0$ȱ/ȱL| \, ҁ  q~L< }0AL|$?0H ~e 9~ ȁA$h ~$?A n ,0 n nA L|$?"2)L|L| L`8f?  , ֠ȱ ,л ЯhhPQPQPQ  ڥP8$?02 6L|} 9~ ȁ@Aȱȱل>= >= $$?$ ) h(hh`h,` 6 L<,W,T,R,P,V,U,S  ((((*(((1<((EN((((|W  !{{0{|W '*{6{NONELISTCATALOG,D1H/A DUMP $CONVERT CURSORCATALOG,D2DISASM $AUTO-NUMPEEK(Ѝ 8z9L,0)$ LB>@C@=@? ,C ԧ@s@'L#@yDfBEަ߫@L@@ ԧ@,@ `BLA tB,,?څAC@@  BCC@,L,ٶ@A[@@LAL@@C@,@ `B tBAC@@  B @@ @LALC@L3A          à ŶİŶƲİ ôǠİǍӠŢ ԍŭ ҧƸ͍ ֧± קİñŰàĠĠàĠĠĠĠ¹Ġ¹àĠβİǠİ śEƛFР̧ĺŹù°ùàŹùĠİưĠĠàưčİǍ̷ ɛʛ˛ ͛ҍԽнͽϽν ѧ Ӡôø¹Ʋ³ư˨ŷ˨ ԠŧŰ˨ű˨ŷ˨ŷ˨ Рŧűű [\_Ṱ ıSIJSӴSӵSӶSҧ̭ @A›BÛCěDűű˨ ŠЧűű ŮĺƲƠĠàƠàƍŰĠŰùàİàòŹóôĠ ð İİĠðŰŸŹdzİ ԠŧŷŊ԰ܢŮàéΠΠֳ"G ˨˨6Рŧ˨+ ɛɓ 8I,I+ې婍,- -N-۝ ,LHH:LVԩHIHh( }ڬIۈI۹ۤ$`h ,LHHݶhܶhLضHuH,0`,,HHɓ4ɛ0ɐ,HɃI ɘIۍI ULڙیHhh`Ԡƌج77ۭ=ٙ7ۭ>ٙ?ې 8) x,10c EL=>٭` 40 H77۹7ۍ=ٹ?ۍ> 4h`hN6N/ɝ`=٩ۍ>`? m 4 ? 40`-ۍ1ۥ? 4H h0ED LԽɠj,LH)? >h`,5 3ɍN5ɖ HH hh`,/0ɍ3+۠ȪeȩeˠgL`gh8 Ȫ󄟠 eȩe`,   lL<``H h` &eee ΍JJJJ)Ũƨ 0ȵƩ२0 ,L苑Liiij8stijLLgh LuѠȥ ݠ8媅ȱ嫅妅姅 珊Ʃߥ ,LNJLۊtLLƩƫeEgiEh8iejegehe`eȪi ` u v EvEu vu t ȥ Ȫ!0 .ee%LѠȥ񠰶L` ghȱ I Iuv 3L `ghij L `  !0 ΍JJJJ)ŨƨLΠLLRHM MLgL Ȅ HL)RLu ‰ D ! t C 0Lu 3 j)Ȅ  `LgŪ嫰G L ;   c ,    < L Xhh 5: /8e::;i; :;LxLkBCB /8eBBCiCB:C;` $ { R穤 QP ALL<  ( ?> $ ?ۤ> .L3 gLpH h` 6L9Ɉɋ`ɕɊ` ?`<:=; c;.:*  5 % %  :; < ч` % Lk φ hh$0LL3$L6 ٭i釥hh  ,@BAC m:hh L hhh`$Lw Υ<)<)i<=i=<=  `hhh   Ɔ c   HHHHH `  Ɔ<i<=i=B>C?hhhhh < Ls8`@A`<=`ɠɛɓɠɃ` `HL LCLL L<  >?`1 >?>??C/=<$0 @L< >=?<) D < <)($ ɠ  ($04 )HH<) <8<==<)i<=i=h h`H<)hL φ$,0턹ȹ8L,8 ` ȭ`, L ` ` ҁ`8#`8`܄݄ ܄݄$݄܄ $ބLń߄H ӄh` Le FREE SECTORS d'D贅E B ӄƴ ӄ, yLL 0L, ӄΝ㩀턍L؃  _ l  L؃88LLK,Ș ȹ  _ lH _hɃhh"#L[ , h02`ҺŠϠ ܫ,phhL 턍 6  ӄED B ӄ"# L2,ҎƴL2Νn,   _L΂ ӄƴ0Gȴ ӄȴ)  ӄ ӄe< fA< =h ~$?A = ,0 = =A L` ,0ɠ<H?2h )`< H$h, ɠ Lɠ )H h`Lڱ`55`55`Ɉɋ`ɕɊ`` H h` $H L`>=`C@A,-.=/> f$?0<  =Ȅ< =)$?$$@ :@A f<: = =L€,0 - =< fA<$? < =ȱ f::  ` }0ALd$?0 H ~  nL~C => $>=ɠɛɓɃ8 L)   ; L| )  { RP=Q>`./gh.ȱ>=.ȱ/,- $@0@@(`B ~B ,BB`8Єτ ,0`ɛɓɠɃL<ɠ `,`:<: ɱɺ ::<`hh >= / .   ҁ oL\ C $20  Ҁ$?0 C$?0$LLm{HmH ) hJh`HJJJJh {`68``L Lu6 .,,8)  {  ΚL5#8H $(*)+!h80" H $(*0ޠ L"H?2hHɠ '2h` LX,LL MM,0,@,0! ' '6(7)89L L L$,{`,0L/@(LLLݚLLLLgL}LLΚLښLLL؛LTLLLL?L 󩍝`,,Hh0!,6H7H8H9H h9h8h7h6`,0 f(,P`, .{,, ̐ L5(`,L$L[,L,,{$`,%LL[,(6)7L #67Lɍ ɀɠLL'somkig*9Jaq START OF STRINGS (HIMEM) END OF STRINGS END OF ARRAYS START OF ARRAYS START OF VARS (LOMEM) END OF PROGRAM START OF PROGRAM FREE MEMORY LAST BLOADϠ Z n L2 Z n N N . NPl OkLLmOP` ) L$ L 1 5)`H)? (hNO,(,`HH(hLh(hN OH?%Oh,(,`H(hL, ꙱><ꙑ> >=i?<>#< 噥mP?Q u ~ uLPȱP` $ L @ `g:h;噩㙍 7 y㙍虭䙍陥m *5> *o8mPpnQ $ PQ @ > *rPQ u ~ u T LINE TO BE RENUMBERED (RETURN = END OF PROGRAM)FIRST LINE TO BE RENUMBERED (RETURN = START OF PROGRAM)INCREMENT BETWEEN LINES (RETURN = 10)STARTING LINE NUMBER (RETURN = 10)ϠQ , { RPQLƐNO PROGRAM IN MEMORYLINES NOT FOUNDINC TOO LARGEDUPLICATE LINE NUMBER ATOUT OF MEMORYPROGRAM HIDDENHIDE BUFFER IN USEPROGRAMS MERGING...ERROR: LINE# > 63999LINE TOO LONGINC = 0 -->WAIT...m5LASsthhLL`EȱEi棠 ȱȱ`ijEȱEi槠`+H h` $ mmȩ`Lɐ’ L< 5, , { RPhȱȘeiȑ ]Lz ' (iLsůtLLg'h(s)t*stsưƯsgůh尐giihijgZ tLu G/ ^& &^ &^e^e&e  LhhLȪ`棟膨`hhH th tLu ' (8stijLLstKgh'ȱQȱQvu 3L LKȱȘeiL;| tghLBC)>*?s??? 66666666?'$,6.$,)--56>$<6>$$ $$$$$7666666>$$ $$$$$7666666&6.-e??,--------6???????66666.-----------%$??????,-----%??????76$$7->76666-------6666666?????????$$$$$$$$$ 56.%<'a)--------666666666?????????$$$$$$$$, 36666666v$$$$$$$$5666666f67-$-------5:??????.------e'%g$$$$$$$66666666'$$$$$$$<6$7>?????$? )---->????RI 9/ e?? -- ?? -- ?? -巒;?--??--??.-?IIII >->?-->??)66> - $$<666M 666--& 666#$$666M!$$)u66?$$-u?66.)u6$$666M- ?)u3-?--66.66v- $$<66 $$666`4 $$$vd  <v 6.--.-%666%$$,-?r--666'$$?b *--=I---------666?$$M >66/)b-.-%--u?I.-#\X$--.-6? -6v- ?--6)u?$ -)u>3-5?I--??qb--6>',36v-- 66M!?--_Xdu2& -6&$ I?666\X u6&6&I66?666\X)   6666&XX&6&66\X u6& -6?$666\Xe$? u66XX$66\X u -= -?/ 666\XXX9+6ve $26  $66 `y*6BR]bjy)6>ETsu{#0=IQ]jns|$2?JT`myD z  = s T"8Q u$2\     @x@x@xĈĈĈĈĈĈĈĈ@x+@x@x*e('U|@xUJS*@xzzzz#zG"D"D"D"Dz*E)UxzU G*|z 666--& 666#$$666M!$$)u66?$$-u?66.)u6$$666M- ?)u3-?--66.66v- $$<66 $$666`4 $$$vd  <v 6.--.-%666%$$,-?r--666'$$?b *--= ---6666???$$$$ ---u6666???$$$$---566-u?I.-#\X$--.-6? -6v- ?--6)u?$ -)u>3-5?I--??qb--6>',36v-- 66M! - $$<666M ?----6 ' <rddd ve26v-e$$? 7.(--5???.--5???.--5???.--5??? 661n$166n$$$  666-a %.l M5?2d 6 6 6 666 Mv66\X; )--I)66?$$M >66/)b-.-%- I166&$ -" ->?--_Xdu2& -6&$ I?666\X u6&6&I66?666\X)   6666&XX&6&66\X u6& -6?$666\Xe$? u66XX$66\X u -= -?/ 666\XXX9+6ve $26  $66 $$^X  6ve $2ij $4?DL[any  '6UW]bq+3?LPU^fnv!,6BO[bku3s] u$2\X4666\X u6X -2- ----???7u u 5???7ue 5$=?%--u66??$$t ;?O-??-=??7---??-?-- - ???)---;??- )5?;7)- -;??? ---?666------$$$66.----%$$66----$$6.--%$6--$.%6?6vu- e d$??6v,.ee $ &'=$''7.?$7>$>675wv-.,f-$$$???766---$$??76--=$?7- g %-?--?=   ?/ =?/--5???.--??vu- e d$ ?-------6666666???????$$$$$$$.------666666??????$$$$$$-----66666?????$$$$,----6666????g$$$---566>??'$$--56>?'$-5>'-  <7 >. ? ? =7=666.------%$$$???????????????6%5%5--------------$?????????????7--------------------6666666???????$$$$$$$------666666??????$$$$$$  666.------%$$$666------$$$?6vu- e d$??6-------6666??????$$----- ??????$$$$ ---------555666677?????',.,.,.,.,.e?d ???????$$$$%---------..666? %%%%%%,???????''$$$%--------666>???????''$$%-------556>>??????''$ ??76.----------------%$<766666I---------666666?????????$$$d $$$d ---------u??????????----------->??????????7--?7-5?7--?w-%-------,$-->7->7->?=;??????7-------u????????'??----------->?w6??????$ ??666--------- $$<75->7'<6????????$$,66.$.------I--'7'7'?66666---------,$$$$'???????? >??????''$,$,,,,,,,,------------66666666??$$$$$$$ ?????????$,-----------666666>'$$$$$$ ?????????'----------5>??????$-----------5><><><><>4#7'7'7'7'7?666v-------u66???????7v--------- $$$$$????????$$766.t---------?w-5666$6>??????'?- ------66????------6666?????????$$$$ 6666v--------- $$$$??????? ----$7 7----------$$?????????g 6666666666??$$\X$\X$$$$$ $-7 >-66666 ->?<36>'%'% $ $$$$766666$7>$7>$7>$7>$7>$7>?,%?,- $-,,,,,,,,,,,------------66??????????6..-------u66666?????????$,-u------ $$???????$$$----w66>??????'?.5?--------- ?g-$$$<<<<<<IIIII66--LjĈĈĈĈĈĈĈĈLjĈĈĈĈĈĈĈĈS8Tb#q_*U*U*U*U*U*U*U*U*U*U*U*U*Uj#L*q(EĈĈĈĈĈĈĈĈĈQrTJ+eW*U*U*U*U*U*U*U*U*U*U*U*U*U*)*e)UbQ +E (1*E#~          $<6> ;?'$:7-------?66v--- $?? A?w??66v--- $??76.--%$???-----666>'$$d ????,---- 666 ---????-----?????----?????.5?v--- $?.???---%XXXX(%??.- 6v-ے6-- $$??---????6v-57-%g$ ?-6>??'$$$M 6 II66666-6???$-$$$% 66666>/ - 6-,%?d --u6--5>????', /)5 .>.>w?????----1.-- ??'----6v6???$-v-ed d-7157? ???<$II ?6.----%::10:5:"Please turn off the computer and":12:5:"put the disk away.":. XX6ĉ::990::23708 940:T$S$:10::G Integers I. . .":610-F$"INT1":2350 810:S$"INTEGERS II":X125:Y15:610:S$"Learning to multiply integers can be hard.":Y50:X10:610+%YY20:X10:940:S$"Letting the computer show you can really":610:S$"help!":YY10:X10:610:940:130:Y15:610:Y50:S$"Learning to add and subtract integers is":X10:610:YY10S$"easy!":X10:610:X10:S$"You will learn to do this by counting on a":X10:YY20:610:S$"number line the computer provides!":YY10:X10:610:YY20:X10:S$"LOADINs with the help":X10:Y50:610S$"of our graphic program.":X10:YY10:610:YY20:940:S$"You will soon have it down to a science!":X10:610:940:S$"LOADING Solving Equations. . .":YY20:X10:610F$"EQUAT":2350Q810:S$"INTEGERS I":XY10:S$"to find the actual value of an equation":X10:610:YY10:S$"by subsitution.":X10:610:S$"LOADING Evaluating Equations. . .":YY20 X10:940:610:F$"EVAL":2350 810:S$"SOLVING EQUATIONS":X110:Y15:610:S$"Learn to solve equation0% XX(XX$):XX12030:XX82030K XX2050,2060,2070,2080,2100,2110 810:S$"EVALUATING EQUATIONS":X100:Y15:610:S$"Do you know how to evaluate equations?":X10:Y50:610:940:YY20 S$"Practice with us and you will be able":X10:610:Y: :940U 0:S$"A L G E B R A I":600:S$"Choose a Program:":Y50:X10:610 Y60:II16:S$PR$(II):X60:YY10:610:II:S$"Your choice? (1-6)":X10:YY20:610 XX$:XX$(18)F$"READ GRADES":2370 XX$(4)F$"DELETE GRADES":237,Y:SH44SH9SH12SH46XX10 SH59İ940? XXDI::_ 6,Y265,Y:6,Y1265,Y1: *3:II221:60,II260,II::II49190:1,II279,II::0: DE1500:QQ1DE1 D1DE:: ::H20((T$)2):10:H:T$::10:H:"LOADING"::0:16302,0:Y15:X120:DI7L bI1(S$):DR((S$,I,1)):DR96T196:640 lDR103T1128:DR:(S$,I,1):"LINE 620"::640 qDR32XX2:650 {DR95T10 |DR42DR34 SHDRT1:SH9SH20SH12SH44SH46XX1:SH46XX1 SHX D$"" ::0dD$;"BLOAD TITLE.PIC"e16304,0:16300,0:16297,0:16302,0:3:0:1D$;"BLOAD FRAC1.SHAPES,A25600":232,0:233,100,I16:PR$(I):I:2000KEY(16384)KEY12840016368,0XKEY128 X! ! !!!!!!!!!""" " " " J! GRADES program.",""+ "When the GRADES file has more","than 50 scores, use the DELETE GRADES","program to create a new file. Press"," and D for this program."0 ,"","The title page of each program asks","for the child's name om","the menu with control keys.","","The READ GRADES program prints the"& "scores on the screen or printer, with","child's name, program, number right,","number possible and percentage.","","Press and R at the same","time for the READ A$(37)(34)A$""4603A$:(A$)40ĺO(37)20A$""Ĺ37,21c(37)21İ110l460|216,0:11070I "Each program is accessed from the main","menu and recycles back to that menu.","Scoring programs are accessed frto continue, [ESC] to abort "W 16368,0:16384,128:A(16384):A160A155390f A155360 :13:14:"Printing...":::"Press [SPACE] to pause, [ESC] to abort" 32,0:33,1:34,23:35,24: (4)"PR#"PS:16368,0: ::5204)"PR#0":360/ @(16384)160Ĺ16368,0:370R JS$" ":C%1(A$,1)" "S$""t TA$S$B$:A$"":B$"":C%0:250 ^216,0:A$""ĺA$" ";:B$""ĺB$ h:(4)"PR#0":::34,8:: r(4)"PR#0"::34,8: |14:14:"Pausing...":::" [SPACE] 0:33,1:34,23:35,24::16368,0< :(4)"PR#"PS::350Y T$:A1(T$):"-";::a A$ (A$,1)" "A$(A$,(A$)1):260 A$""ĺ:250 B$ "B$""B$(13) ,(A$,1)"-"A$(A$,(A$)1):C%1 6(16384)155Ĺ16368,0::( :(4)"RUN HELLO" :16368,0:14:1:"What slot is your printer in? (1-7)? ";:A$:A$"1"A$"7"ĭA$(13)A$(27)180 A$(13)A$(27)360 PS(A$) :13:14:"Printing...":::"Press [SPACE] to pause, [ESC] to abort"! 32,,0o x23:1::" [RETURN] TO CONTINUE [ESC] TO QUIT ":" [P] TO PRINT ";::1:23 16368,0:16384,128:A(16384):A141A155A208A240130 A141ė: A208A240180 :12:12:"One moment please..."^ " INFORMATION PLEASE 6/8/87ET$"About this disk":RP$"TOC"V(QQ$T$:1000_<450F:14:" Press [RETURN] to re-read or [ESC] to quit"P16368,0:16384,128:A(16384):A141A15580ZA141Ĭd160 n34""""""""" 3:S$"Your answer: ":Y130:995:820:AN$(IN(3))İ300:0:S$(IN(3)):Y100:XFX:610:2350 S$"Move "(IN(2))"350 S$"Move "(IN(2))".`Ѐ@`0`Ѐ@` S$"Move "(IN(2))"D00:XFX:610:2350 S$"Move "(IN(2))"D$"Move "(IN(2))"D1BEGX,80:IN(2)0RL$"left":2320 RL$"right":BEGXBEGX10 940:ENXBEGX(10(IN(2))):RL$"right"ENXENX10  RL$"left"ENXENX10y ST$(IN(3)):EGX,80:IN(2)0RL$"left":2320 RL$"right":BEGXBEGX10 940:ENXBEGX(10(IN(2))):RL$"right"ENXENX10  RL$"left"ENXENX10y ST$(IN(3)):3:S$"Your answer: ":Y130:995:820:AN$(IN(3))İ300:0:S$(IN(3)):Y100:XFX:610:2350@`0`00`Ѐ@`$"Plot the first point.":Y120:995:6:121B0`0@``0``0``0