I&u MX$(5,2):30100: COMPUTER ACTIVITIES IN MATHFACTS "CAIM4/TAP" 11/16/84 COPYRIGHT (C) 1982 BY BERTAMAX INC.'"@258,"From: ESSENTIAL MATH ";:@292,"By: Beardslee,Jerman";:@329,"Johnson and Schrag";:@385," ADAPTED BY BEARDSLEE & SCHRAG";:900:@420,"_ 1982 by "CR$", Inc.";:'):'x27000:AR$"COMPUTER":AT$"ACTIVITIES ":AZ$"IN MATH ":ZG$"GRADE 4":FL0(:1:TT$"GRADE 4":T$(30):U$(31):S$(12),G9(11),P1(12):GR4:EZ0:PT(2)((TT$)2):RC$(143):R$RC$:W$"SCORE":V$"LEVEL ":C0:Y$"EXAMPLE:":X$(191)(GW1:T1$(1)"FACTOR SUBTRACT":T1$(2)"(+) NUMBER ROLL":T1$(3)"CLIMB THE STEPS":T1$(4)"(X) NUMBER ROLL":T1$(5)"BIG'T'CHALLENGE") T4$(1)"# CONCEPTS":T4$(2)"ADD(+)":T4$(3)"SUBTRACT":T4$(4)"MULTIPLY":T4$(5)"DIVIDE") 22000:20000)SL$(0)"FINDING FACTORS OF A NUMBER":SL$" 20 30 40 50 60 70 80 90100110":K110:SL$(K)(SL$,3K2,3)" OR LESS"::)SL$(0)T4$(2))SL$(0)SL$(0)" WITH ADDENDS 0-9":SZ$"ADDENDS "* SL$(1)"1-3":SL$(2)"2-4":SL$(3)"3-5":SL$(4)"0-5":SL$(5)"4-6":SL$(6)"5-7":SL$(7)"6-8":SL$(8)"7-9":SL$(9)"0-9":SL$(10)SL$(9): H9110:SL$(H9)SL$(H9):H9:*(SL$(0)T4$(3):31*2SL$(0)T4$(4):SL$(0)SL$(0)" WITH FACTORS 0 - 9 ":SZ$"FACTORS ":32+#";:XX$Q$:Q$" """:QA$(Q$),nXX$Q$:Q$" """:Q$(Q$): Q$""XX$Q$ 110:: GB(Q$):GB13 GA0 110:: GAGN (1)(252);::1::: ,sGB94GA1105:GB10GAGN 105-!x@HH2," ";:GB10GAGA1:105-:}GB94GAGA1:105-D105-yG(1)32:G(2)32:G(3)65:G(4)90:G(5)97:G(6)122-HL0:QR$(" """):QR$"".XX$Q$:282,0:Q$" """:Q$(Q$):Q$""Q$XX$205:Q$(8) GPHLGP HLHL1:@GP2HL," ";:QR$(QR$,(QR$)1):205.5҅(Q$)13HL0205.Hԅ(Q$)42315.bՅFL1 (Q$)50.sׅ(Q$)13.؀HH152:(Q$)G(HH)(Q$)G(HH1)220.ًHH:205.܇@GP2HL,Q$;:HLHL1:QR$QR$Q$:HLGL 205:/GTGS: 252: QR$WY$ 26150: : CRCR1/&EX1245/]CR126200:@481,"TRY AGAIN";:G1120:G:240/26200:@481,WY$" IS CORRECT, TYPE "WY$;/GT25:900:240/26350:@481,WY$" IS CORRECT, TYPE "WY$;:2400HL0:XX$QR$:QR$(" """):QR$"":@(GP2HL)2,(GL,32);0+@(GPHL2)2,R$;0:GG1GT20 G5GR1:XX$Q$:282,1:Q$" """:Q$(Q$): Q$"" Q$XX$ 275 : Q$ (8) GPHLGP HLHL1:@(GPHL2)2," ";:QR$(QR$,(QR$)1):2550 @(960)2,U$;0 (Q$)4231512811IGG:26400:@480,XO$(2)" PLEASE RESPOND "XO$(0);:F1:2601 HH15 2:(Q$)G(HH) (Q$)G(HH1) 2901HH:2551":@(960)2,U$;:@(GPHL2)2,Q$;:HLHL1:QR$QR$Q$: HLGL 255 : 2951'HL0250:1,GP966221Q$(" """):Q$"":@GP2,"Press to continue";2h6XX$Q$:Q$" """:Q$(Q$):Q$""Q$XX$310:3152;(Q$)42::: QN$"" : : 24200:@256,"Sorry you have to leave early.";:GT10: 900:NLLE: 201203@ (Q$)13 310 : @GP2,U$;:3-S$(1)"YES":S$(2)"NO":GN2:GA0:101:3HGB1GZ:G9(GB)GB:GB3ZGBGB1:GNGB3GG1GN:GA(GB):G8(GG)G9(GA)3 GAGZ 5253 HHGA GB:G9(HH)G9(HH1):3 GBGB1::4#&G1((RS$)GD):G9$(RS$,G1GD(GD1),GD):RS$(RS$,G1GDGD)(RS$,(RS$)G1GD):4lXEZEZ1:@480,"(GO)"(10,32);:26300:Q$(" """):Q$"":GG13004]XX$Q$:Q$" """:Q$(Q$):Q$""Q$XX$610:6204bGG4g@480,U$;:4l(Q$)423154q(Q$)13615:6105FGG042:((63GU)4GG,(GU64)12GG)(((63GU)GA)4GG,((GU64)GD)12GG),,B::5GG042:((63GU)4GG,(GU64)12GG)(((63GU)GA)4GG,((GU64)GD)12GG),,B::5ƀGG1GD2:@(GU64GG)2,(GF(4));:@(GU64GGGA1)2,(GF(5));:6 ˇ@(GU64GG)2,QA$;:69 GG0GL1:@GP2GG32,(GA2," ");:GG:6Q$(" """):Q$"":GB1GT:Q$" """:Q$(Q$):Q$""Q$XX$ 9026 (Q$)13 9036GB67 GP966:305: :1:(1)(4)(255):@0,XO$(2)RH$XO$(0);:@194,"The game is over";:@226,"you scored "PC" percent.";73(Q$)139537;GB7A7VM$"": PC100 VM$"Congratulations ----":VN$"A perfect score!":NLLE1: 956:: PC89 VM$"A super score ----":VN$"I'm proud of you!":NLLE1:9568e PC69 VM$"A good !"#$%&'(CAIM4 BAS score,":VN$"keep up the good work!":NLLE: : VM$"I'll be cheering":VN$"for you next time!":NLLE18~ NL10GR1 NLLE8 NL GR10 20120:: NL(GR1)10 @258,VM$;:@290,VN$;:@322,"You have finished";:@354,"this grade level.";:201209D@258,VM$;:@290,VN$;:@418,"Your next lesson is "NL".";:201209GL5:GP514:GA38:800:S$(0)"WHAT SPEED?":S$(1)"Slow ":S$(2)"Medium":S$(3)"Fast":S$(4)"Manual":GN3:GP595:GA0:100:GS(1)80:GS(2)50:GS(3)15:GS(4)8:GSGS(GA)::W':1:24100:F50:FC0:D7(1)0:D7(2)D7(1):@33,T1$(LL);: EX 1 @54,Y$; : @54,V$;LE;;'.@(146)2," DIRECTIONS";:@(256)2," The first player chooses any":" factor of the start number":" (except the number itself).":" That factor is subtracted from":" the start number.";'8:" The second player uses the":" resulting number to choose":" a factor. Play continues":" until a 1 results.";:GP964:305:24100:@1,T1$(LL);:EX1@(44)2,Y$;:@(44)2,V$;LE;;'= KG1 10<'BP15(LE37)(5(LE39))A'(F1P1 F10) @(960)2,"CANNOT SUBTRACT"F1"-TRY AGAIN";:F51:10130>'F2P1:10400:F1D @(960)2,F1"IS NOT A FACTOR-TRY AGAIN";:F51:10130>'F50FCFC1?;'PJ70:F50:@(P)2,": subtract"F1":"P1"-"F1"=";:PP50:P1P1F1:GPP:Y$(P1):Y$(Y$,(Y$)1):GL(Y$):WY$Y$:CR0:GS200:EX1241:240?b' Y$QR$ 10180 : 29: 10170?u'ą P11 10230?'΅P21P22:P21?'JJ128:J704 10210 : 10070?'@(192)2,T$;:@(256)2,T$;:GL6:GP320:GA64:800?'J320: 10070@s'S$(1)"ME":S$(2)"YOU":@(704)2,(32);:@(704)2,"HOOO-RAY - THE WINNER IS "S$(P2);:EX1KG10:GP964:305:10250@'@(768)2,XO$(1)(32,131)XO$(0);@'D7(P2)D7(P2)1A'@(832)2,"*** SCORE AFTER ROUND"KG" ***";:@(906)2,"ME:"D7(1)" -- YOU:"D7(2);A%(GP964:305:@352,(30);Ah( GL8:GP192:GA64:800: KG: EX1 GP964:305:GW1:21020A(PC(100FCFT.005):GP979:950A(F1F2D9F2:DF1:10405:D9F1:DF2A(D8D9((D9D))DA( D80 10420A(D9D:DD8:10405B (DMF1(F2D):B+*ZS$"+":WS$"ADD": 13005BQ. EX2 980:24100 :24100B.B(0)13:B(1)24:B(2)35:B(3)05:B(4)46:B(5)57:B(6)68:B(7)79:B(8)09:B(9)09:GLL1:B(B(GL)10):B1B(GL)(10(B(GL)10))B/::KG13:MT0:MS0:MA0C/::@33,T1$(LL)" - "T4$(LL);:12220C\/::@(4)2,T1$(LL);:EX1@(74)2,Y$;:@(74)2,V$;LE;Cy/!I1:@(128)2,U$;:P9640C/&RS$"":GD2:KB B1:RS$RS$(K):KC/+550:D(I)(G9$):II1:I612090C/0(RS$)012070:12075D?/:GU784:GA7:GD3:GW2:700:@(862)2,"+";:GU800:700:@(878)2,"=";:GU816:700DY/DW1$""D/NW1$(W1$,10):W4$W1$(2,140):@(830)2," ";:K15:XO$(2)W4$;:K:(W1$,8)XO$(0);E/X@(770)2,"START";:@(50)2,"FINISH";:@(718)2,"ACCURACY";:@(738)2,"SPEED";:@(754)2,"TOTAL";E'/bKK15E7/lGZ10:500E/vCC15:KYG8(CC)1:WY$(KY):WY$(WY$,(WY$)1):CW488:F0:GPP9(CC1)116:@(GP2)2," ";:"##";G8(CC)D(KK)1;:@(GP4)2,"-";:"#";D(KK);:"=";E/CR0:GPGP10:GL1:F0F/EX2240:GS600:241F6/CR0QR$WY$MAMA2:F0MSMS2F/MTMAMS:@(850)2," ";:"##";MA;:@(866)2," ";:"##";MS;:@(882)2," ";:"###";MT;:600F/ CC:GP964: EX1 305:21020 : 305: CC15:P1640(CC1)116:@(P1)2," ";:CC:KKG/PCMT:GP964:950G;/@(128)2,U$;:@(150)2,"SCORING"G/Ƈ@(256)2," You will score 2 points":" for each correct answer":" on the first try (ACCURACY)."::H:/Ї" You will also score 2 points":" for each correct answer within":" a given time limit (SPEED)."::" A perfect score is 100.":GP964:305:HU2ZS$"X":WS$"multiply"H2RC$R$:EZ0:NC0:GW2:GS300:24100:13020:ZL$"13243505465768790909"H2L1((ZL$,2L1,1)):L2((ZL$,2L,1))I2ЀKG13:@36,ZS$" NUMBER ROLL - "TT$;:H12:CS(H)0:CC(H)0:HIy2҇XO$(0);:@(128)2,"TURN"B7;:P9278:EX1@(640)2,"Press the SPACE BAR to stop the numbers.";I2ׁ13030:13110:13110I2Z$(1)"MY TURN":Z$(2)"YOUR TURN":B51:B71:B82:J2@(P922)2,Z$(B8);:N12:V$"":QQ$(" """)Jv2GUP96612(N1):GF(1)156:GF(2)140:GF(3)172:GF(4)149:GF(5)170:GF(6)131:GF(7)131:GF(8)131:GA6:GD3:705J2N1K(10)1:K(L2L1)L1J2@(P912(N1))2,((K),1);J3Q$(" """):Q$""13045:(Q$)3213045J3M(N)KK#3N213085:@(P912(N1)6)2,ZS$;KT3N:@(P920)2,"=";:EX1B51@(640)2,U$;Kw3 LL2MM(1)M(2):MM(1)M(2)K3"WY$(M):WY$(WY$,(WY$)1):GPP926:GL(WY$):CR0:EX2240:241K3'CR0NCNC1K3,CC(B8)CC(B8)M:CS(B8)M:L3613140:B5B51:B53B51:13180L43@B81B82:B81LM3JP9P9644:13030:L3T@(704)2,XO$(1)(32,140)XO$(0);:@(768)2,"SCORE ";:@(832)2,XO$(2)"TURN"XO$(0)B7;:@(784)2,XO$(2)"YOU ME"XO$(0);:@(846)2,CS(2);:@(856)2,CS(1);L3^B5113170Mm3h@(804)2,XO$(2)"TOTAL";:@(816)2,"YOU ME"XO$(0);:@(868)2,"SCORE";:@(878)2,CC(2);:@(888)2,CC(1);:600M3r@(960)2,T$;:M3|B7B71:EX121010:B76GP966:305:13220M3B81B82:B81M3@(128)2,T$;:CS(2)0:CS(1)0N3H12864064:@(H)2,T$;:H:13010N<3CC(2)CC(1)SS$"YOU":SS$"ME"N^3CC(2)CC(1)SS$"BOTH OF US"N3H6464064:@(H)2,T$;:H:@168,"CONGRATULATIONS,";:@195," THE WINNER IS "SS$" !!";:KG313250:B71:GP966:305:@32,U$;:KGO3PC((NC100)(2EZ)):950O6RC$R$:GW2:TZ$"":H14:TZ$TZ$(170)(26)(24):H:TZ$TZ$(170):Z$(170)(26)(4,24)(130)(2,131)(171)(3,131)(26)(4,24)TZ$O6ZD$"/":ZL$"0123401234":L1((ZL$,L,1)):L6I0:I4P 6΁24100:KG12:CT0:CS0:CA0P6؇@34,"BIG 'T' DIVISION CHALLENGE";:GU774:GF(1)156:GF(2)140:GF(3)172:GF(4)149:GF(5)170:GF(6)131:GF(7)131:GF(8)131:GA10:GD3:705:GU794:705:GU814:705:GU576:GA30:GD6:GF(6)181:GF(7)176:GF(8)186Q6P9128:GZ5:500:H15:D(H)G8(H)I:HQ26@(852)2,"+";:@(872)2,"=";Q6@(706)2,"ACCURACY";:@(730)2,"SPEED";:@(750)2,"TOTAL";:@(650)2,"S C O R E B O A R D";Q7KK15R7 GZ5:500:H15:G8(H)G8(H)L1:H:@(P92)2,XO$(2)ZD$XO$(0);:@(P96)2,XO$(1)Z$XO$(0);:@(P98)2,D(KK);:P8P964R7CC15:EG8(CC):WY$(E):WY$(WY$,(WY$)1):GS70:CR0:GPP8(CC)6410:@(GP10)2," ";:"##";D(KK)G8(CC);:GL(WY$):F0:EX1241:240R7CR0CACA2:F0CSCS2S&7CTCACS:@(840)2,((CA),2);:@(860)2,((CS),2);:@(880)2,((CT),3);Sj7(CC:GP966:305:KK3P9P920:P9128:GP64:GA56:GL8:800S7-EX121010:KKS72H6451264:@(H)2,T$;:H:@(454)2,"F I N A L S C O R E";S7).";:G165:G2122:GL15:GP587:200:QN$QR$V N1GL13:GP66:GA60:800:S$(0)"ACTIVITY-SKILL":K15:S$(K)T1$(K)"-"T4$(K):K:GA0:GN5:GP514:@65,XO$(2)RH$XO$(0);:100:LLGAVN4GL12:GP130:GA61:800:S$(0)"WHICH "V$"?": G110:S$(G)"Level "(GR10G1):G:S$(11)"Level Descriptions":@180,AR$;VN5@211,AT$;:@244,AZ$;:@276,ZG$;:@344(T1$(LL))2,T1$(LL);:@376(T4$(LL))2,T4$(LL);W4N:@51,XO$(1)RH$XO$(0);:GN11:GP131:GA0:100:LGA:LEGA1GR10WN> L11 20065 : GL13:GP66:GA60:800: LL 20,30,40,50,60:@(75)2,"DESCRIPTIONS OF LEVELS";:@(130)2,SL$(0);: G1 10:@(13664G)2,"LEVEL "GR10G1":"SL$(G);:G:GT500: 300XNRGL13:GP66:GA60:800:20020XzNaGL13:GP66:GA60:800@66,XO$(1)RH$XO$(0);:@76,TL$;:@109,T2$;:@150(S$(L))2,S$(L);Y?NfGL5:GP514:GA40:800:@182(T1$(LL))2,T1$(LL);:@214(T4$(LL))2,T4$(LL);:S$(0)"DO YOU WANT TO ":S$(1)"Do an example":S$(2)"Start":GN2:GP580:GA0:@65,XO$(2)RH$XO$(0);:100:EXGAY[NkGP514:GL5:GA38:800ZNpT2$(LL)"": G1 (T1$(LL))1:T2$(LL)T2$(LL)(T1$(LL),G,1)" ":G:T2$(LL)T2$(LL)(T1$(LL),1): H1 5 2:G(H)48:G(H1)57:H: LL 10000,11000,12000,13000,14000ZNR$" BYE!":@0,XO$(2)RH$XO$(0);:@44,"I'll see you later,";:@76,QN$;".";:X016:26030::T110:T:@105X,(R$,X);:X:X1720:26030:T110:T:26035[1N@449,"Press when you leave.";:26800:G1100:G:@497,"Thanks!";:26850:Q$(" """):Q$"":FL0:GP0:310:[R 300:21020:GU=0:GA=62:GD=14.5:CLS:PCLS1:GOSUB700:PRINT@65,XO$(1)RH$XO$(0);:GOTO20070[RGW1[RGW1:GU0:GA64:GD15:24200: 700:20070\URH$""\aUCO$" Bertamax Inc.":CR$"Bertamax":CN$"MICRO SCHOOL":CT$"PROGRAMS":PL846:\YXO$(0)(1)(2):XO$(1)XO$(0)(85):XO$(2)XO$(0)(170):XO$(0)XO$(0)(255):XO$(3)(1)(4)(0):XO$(4)(1)(4)(255):XO$(4);:] ^$::XO$(3);:]^:1:XO$(4);:]a11a?q 1AA@1IA9A!QBJqJC1II1DQJIQEFႁG1II1HI#!J9aKLM٪NťOPQqiR񡑉Sqq qT#"UqVR"WىXQ!QYq"!Z !A\#q!^!q#_yBa11a?q 1AA@1IA9A!QBJqJC1II1DQJIQEFႁG1II1HI#!J9aKLM٪NťOPQqiR񡑉Sqq qT#"UqVR"WىXQ!QYq"!Z !A\#q!^!q#_yB