' +JJJJ ?\>m0M='+l> /+l  H d@hLҦ L~ L  ﵪ*i BB䵊嵰`72µ- i ư&( Rp s P  LLʬLoō 鷎귭෍ᷩ췩緈JJJJx Lȿ L8ᷭ緍췩 緍i 8 `巬 췌`x (`(8`I`B` ``>J>J>VU)?`8'x0|&HhHh VY)'&Y)xꪽ)' `Hh`V0^*^*>&` aI꽌ɪVɭ&Y&&Y& 꽌ɪ\8`&&꽌ɪɖ'*&%&,E'зЮ꽌ɪФ`+*xS&x'8*3Ixix&& 8  '  & x)*++`NG8`0($ p,&" ۿ ۿڿL흍ٿ vLQ  !"#$%&'()*+,-./0123456789:;<=>?  ( 9 +"  "*  (9"1 ( ,.(0# 2  /#0/#0 *?'#07#00/0/'#07#0:"4<*55/**5/*%5/)1/)1/)1/)'#0/#0*5/*75/**5/*:5//#0/#0'#07#0:::*::'#07#0).).*#!.*'!.8)(#/-)(#/-,,eb)++$ h( ,!!"@h !D)"E` @ $ C ` DQ &J80^݌Hh ü ü݌ ռ ռ ռA ļD ļ? ļAEDE?HJ>h Լ ռ ռ ռ`HJ>݌h Hh݌`HH ᥠ L\HIHHHHhHH݌hHhHh݌H6 VDP (FD Z $0x8x D- ܸDD# H8`?F Vk *f???0xF Hh D#-FFF8` D ܸx D - ܸx8`-0ݩ?ʥD FFF`   LDcpq` [` ~  L IH  /JJJJ"LL뷩 ᷩ췩 ɛ LDLSAVBPILOCUNLOCIBPIBPIB`Ӝsqu`".Q`pNФbptťܥm2<(-Py0\|e<6e< ~ vL~ JJJJj귍hI  aUL@ kU8  L  ^R(jQ0l^l\  OÌȌ`W ԧ H h@ [_ /QSIR4b_L`LLLL`ª`LQL߼YLeLXLeLee ўQ0 L&RE;BY; Ꝥ$`( R \ZLl8 ўR HH\`\Z[YS6`LxQɿu3'RͲʎRʎ]]]ɍuL͟ɍ}RLRɍg^쳪 ^LƮZLɍR LͲɊRR% QLܤͲ Z@ -^ ş\[Z QY\[Z8`l6Lş_Ȍb_Ͳ] )Y h( ֭ͲLɍ [LLĦ__ ^ 9 LҦ3 9 a   0LjLY u< (_9 ˭ɠuɠK_9 ?LˆʎõĵL õ ĵµ aµ`` L̦µ_bJLuLz`  ȟ QlXJ̥KlV  ȟ QlV eօ3L׭Lܫ &RL &QL d L4 We)n `@-eff L f`L . tQLѤ LҦL` OPu d L Ne)noon 8ɍ` ^f\õL ^NR  RΩLҦ\L \ şL_ NLjHv 3h`0h8` [L NС õ`A@` ŵL]Lõ`  \ 濭0 ş  Q ^\lZl^\8  ş Lȟ`fhjõĵ@OAP`u@`@&`QR`F Ls  @DAF@u`8` %@ @A@`@`@A`Mµ ) LЦ`8@AWc@8@-@HAȑ@hHȑ@ȑ@hHȑ@Ȋ@ch8&ȑ@Hȑ@Ah@LHȑ@ȑ@ htphso`hMhL`9V8U897T6S67`INILOASAVRUCHAIDELETLOCUNLOCCLOSREAEXEWRITPOSITIOOPEAPPENRENAMCATALOMONOMOPRINMAXFILEFINBSAVBLOABRUVERIF!pppp p p p p`" t""#x"p0p@p@@@p@!y q q p@ ,\Z[PRR3\ɄSɊ"RQJ(0Fw6. ^-%p 㩠RP.Q I* P\L˵B̵C8pB߮Z\ @ յյ\BIR Z-^ Jp\IZLLӜv  Ԡ@跻~!Wo*9~~~~ɬƬ~_ j ʪHɪH`Lc (L ܫ㵮赎 ɱ^_ J LsL Q(`贩紎 DǴҵԵƴѵӵµȴ 7 ַ :ŵƴѵǴҵȴµ納贍﵎ٵ്ᵭⳍڵL^ѵ-I `  4 ò-յ!  8صٵ紭ﵝ 7L (0+BC  7L HH`LgL{0 HH` õL H hBL BH [ h`Lo õ ڬL B ڬ LH hB@ յյ [L (ȴ) ȴ 7L L ( L (ȴL{ƴѵ洩ƴǴҵ 7 ^* B0 HȱBh ӵԵ 8 L8 ݲ` ܫ  / / şFD B / / ]ƴS0Jȴ ȴ)  紅D贅F B ƴ  / 0L Ν `ND8HFFhDh N ş`, ŵBѵ`, ѵB8`  XI볩쳢8 DH E𳈈췍Ȍ X0 · JLǵBȵC`,յp` 䯩 R-յյ`յ0` K R-յյ`ɵʵӵԵ` 4 K ( ѵҵLBȱBL8` DBHBH : ַ޵BȭߵBhhӵԵ RBܵmڵ޵ȱBݵm۵ߵ` 䯩LR˵̵ֵ׵`LzĪLR E( 8` R` ELRŪƪ`췌 յյI뷭鷭귭ⵍ㵍跬ª 뷰` Lf ݵܵߵ޵ ^`8ܵ i B8` 4L ֵȱB׵ ܯ䵍൭嵍 ` DȑB׵Bֵ  ַ յյ`` ᥠ hh`ĵµ`ڿ8.ڿ.ۿ`êL`õĵBCõĵ`µµ`L õBĵCصص Qƴ0"Bƴ 󮜳` 0۰ϬBƴ8`i#`ЗLw!0>ﵭ` m ﳐ 7i볍 8 ЉLw`H h ݲL~ `浍국䵍뵩嵠Jm赍嵊mjnnn浈ۭm浍浭m䵍䵩m嵍`"L ŵ8ŵH x(`# d£àĠz# u`hhcL'HLH < khhP 9L)l6  HL` BRUN ESI.STARTUP V~꼌* 뼌 ˽8*%IF݈א.אڐ޼L߼ɫ8`ɪ`` T* &+ ȑ&,T,R,W,P`　怀LJ́㏀怀̙Ï0L ɍ ɍ`hhߚHH`ҠΠŠӠ٠٠ϠԮ 橀 Յ W : : : : : : : : : : W :U   * &pLLL; u 9p8ou89 ogLh Lv guLѤӞbUgɃgloihLvhihqg( h` L  ` K XQD  $  ڥ $  ,   ժժժժժժժժժժժժժժժժժЀưừ柀̌氘氌氐쀙̀̌澚氌氐̀̀泟氐澍ƀ𐀐𐀐憀@L@@@@`HS KP@Q&&HP&hPPQ Ơh`ժժժժժժժժժժժժժժժժժЀto the lesson,Go to the practice,Return to the Main Menu`JJ0:95:2067JX%(N),Y%(N):X%(N)X%(N)X%(N1):Y%(N)Y%(N)Y%(N1):::!PÃ20,Good,worker,Problem,solver,Product,producer,Quotient,cracker,Answer,ace,Multiplication,master,Division,detective,Math,magician,Expert,estimator,Hooter's,heroxZÃ4,Play the game again,Go 34:XO,YOXM1X,134:luY341345:XO,YOXM59,168Y:XO,YOXM56,Y::uu STRING ART ؄vuNN6:N0NN1:X%(N)R(118)XM60:Y%(N)R(90)40:uN1NN12:X%(N)(X%(N)X%(N1))10:Y%(N)(Y%(N)Y%(N1))10:{uX%(0),Y%(0):I110:N0NN2:(XS(T3.14180).5):Y(T)(YS(T3.14180).5)DuXS60:YS50:Z2(P(0,P)65)(P(0,P)69):T035920:XXMX(T):Y84Y(T)NuIT40T40Z40:X,YXMX(I),84Y(I):::Xu MOIRES VbuXOR(100)XM50:YOR(90)44:X55605:XO,YOXM4X,BXBW4,BY12BN2BXBW4,(226)P(224),(226)10BXBW4,(226)P(224),(226)10: N100:"Please wait...",140,86,2,CS,2т*N(4)"RUN"Z$/u CIRCLE ART 0uP(0,P)50ı35uXM60,34,101,120,0:3:P(0,P)6030070:P(0,P)8030050s:uX(T))):Z17:X1200::Z$,BX412(BR0)4(BR9)4BL8(Z$),BY12BN4,8,CS,5:ǁ:"Bonus: "(P(7,P)2),BX,BY12BN4,2,CS,2:PTP(7,P)2:Z1010:X150:YMTY:557:PTPT%PT:P(7,P)P(7,P)1:ZR(4):7005"::BN$,BX,BY2,2,CS,2:6:ork is not.",,TYVS::TY164:PTPT%:"Good. You earned points.",140,TY,2,CS,2:(PT),174,,8,,5瀱:BYYG12:BX224:XG150İ800:XGBX:YG22:800:BYYG48VS:9710:(NABA).115060B:Z$(NA)(" R"(RR)" ",14(RR0),3(BR0)(BR92Z$""(B$,N,1)"0"Z$Z$(B$,N,1),:T$NA$:RR0T$T$(RR):TY155:180:T$Z$Z$" R"(RR):PT0:"The correct answer is "NA$(Z$,1,(Z$)(RR0))".",140,TY,2,CS,2:U:A$B$PT0:"The answer is correct,",50,TY,2,CS,0:"but the wV$)2NV$(NV$,2)~L,A((NV$,V,1)):FRV(NV$):3000:FR0:KYFW11360~V,VV1:V011340~[,"R",XR,YS17,,CN,5:XR0:YPYS17L%L%1:V1:11170~],KY$"":11120`,XPXPSS:VV1:V(NV$)11340:XR0h,Z$"":N1(B$):Y%(N1)YS17ĭPP11250i}+YPYS17L%L%1:V1:11170}+V(L%,1)(V(L%,1)10):11120}+UU1:DGDG1:11110}$,V(L%,1)(V(L%,1)10):FYYPVS2:NV$"":V(L%,1)011400}-, REMAINDER (~8,YPYS17:XRXP4:"R",XR,YP,,CN,5:V1:XPXPSS4R~B,NV$(V(L%,1)):(N(VU4(N1$)3):V(NV$)11180|+A0:V1(NV$):AA10((B$,C%V1,1))::XPX%(C%(NV$)):L%L%1:V(L%,0)X2:V(L%,1)A10|+XPXPSS4(U4):U211300}+V(L%,1)(V(L%,1)10)10:A((N1$,(N1$)U2,1))F}+3000:V(L%,1)V(L%,1)(OP$):KYFW,YP4X1SS2,YP4:V0{+X1V(L%,5):NV$(V(L%,4)):V(L%,4)0NV$"0"{+V0V(NV$)1{+A((NV$,(NV$)V,1)):X2XP:3000:KYFW11184{+VV1:V011180:ZVV+|+"-",X1SS,YP,,CN,5:4:X2SS2,YP13X1SS2,YP13:11140a|+VV1:XPXPSS42:11120z+VV1:X1XP:XPXPSS4(VU4(N1$)3):V(NV$)11152z+A0:V1(NV$):AA10((B$,C%V1,1))::XPX%(C%(NV$)):V(L%,3)A:V(L%,4)V(L%,1)Az+X1V(L%,0)X1V(L%,0){+ SUB V{+V(L%,5)X1:"-",X1SS,YP,,CN,5:YPYP17:7:XPSS2FRV1(NV$):3000:FR0:KYFW11146y+VV1:V011142:11120y+VV1:XPXPSS:V(NV$)11142y+A((B$,(NV$))):XPXPSS:V(L%,3)A:V(L%,4)V(L%,1)A:11160y+V0V(NV$)1+z+A((NV$,(NV$)V,1)):3000:KYFW11156Hz+VV1:V01115V(L%,1)10:YPY%(C%2):11200x+A0UP1UPUP1:A$(A$,1,(A$)1)"0":B$(UP)(B$,2):11100x+PP211400x+ MULT x+NV$(V(L%,2)):YPYS1531L%:V0V(NV$)1)y+NM111152:X1XP:(NV$)1X1X1SS:XPXPSSSSVfy+A((NV$,V1,1)):P:L%0:V(L%,0)XS:V(L%,1)((N1$,1,(N1$)U1))wf+YPYS17:XPXSSS((N1$)U)4(U4(N1$)3)wo+ DIVIDE wp+A((NA$,DG,1)):PP1RD1XPXSx|+3000:KYFW11135:UUP11062:UU1:DGDG1:11205^x+A(OP$):V(L%,2)AN2:V0:A0DG1V(L%,1)XPSS4(U3(N1$)3):U311072:11070vC+(KY74KY8)(U(N1$)U3)XPXPSS4(U3(N1$)3):UU1:11070vH+KY13U(N1$)11070:UPU:C%1:A$(VP):B$(UP):X%(0)XP:Y%(0)YP wJ+"@":180wL+ GET # .wM+RSPP2RD2:9990pw\+DG1:UF0:UUY30:800Xu$+ CURSOR u*+VP1:Z1(N1$):((N1$,Z))N211055u,+VP(N1$)Z1:Z99u/+:UPVP:PP2(PP2RD1)11085u4+XPXSSS:YPYS17:U(N1$)1:11065v6+(A$)0UPUP1:11100v9+9900:YP(YP)v>+1100hv@+(KY75KY21)U1UU1:XP"P.ROUTINES":20000tX*Z$("D.L.BASFACTD.L.DIGITS",111(PP1),11):20000t* SETUP t*100:A$"":B$"":C%0t+PY9:NM$", find the quotient.",140,PY,2,CS,2)u +YSPY3020(PP2):SS16:XX2020(PP2RD1):9100:YYYS15Iu+XGI(X1)40:YGP:MAX:N1MAX:T$::MAX:HS24:HY50:VS16:"What do you want to do?",HS,24,2,CS,0s?*V1MAX:(V),HS3,HY,2,CS,2:T$:" "T$,,,,,0:HYHYVS::385tD*AC(OP$):ACMAXĹPARM7,0:2203tI*AC1İ100:"Please wait...",140,86,2,CS,2:TtN*AC3Z$ying the game.",140,Y,2,CS,2lr^)250:10800rh)ESC1:"Game",17,158,2,CL,0:"Over",262,,,,1:X17952:PM,X,38,158,9,2,0(KK),128:PM,239X,40,158,9,2,0(KK),128: sr)P0MP1:30000:XMXM129:$s)Z5:TP07005:2505s/* END MENU s0*100: GAME OVER rq6)ESC1:100:XG137:YG110:800:Y75q@)N0MP1:N$(N)"'s score is "(P(0,N))" point"("s.",1(P(0,N)1)),139,3014N,2,CS,2:*rJ)MP2į"Thanks for playing",140,Y10,2,CS,2:"the game, "N$(0)".",,Y3:10590\rT)"Thanks for plaN,2)NA)110310::N((P$,1)):P(N,0)N1:P(N,1)N2:P(N,2)NA:P(N,3)RRp(PT0į"Press RETURN to continue.",140,160,2,CS,2:250:10505q(NM$", you did not earn any",14,160,2,CS,0:"points.",,172:2509q )P:TPTP1:TP610100:TP1:10600Kq ) o'N1P(N,0):N2P(N,1):N1$(N1):N2$(N2):NA(N1N2):RRN1NAN2:NA$(NA):ND(N1$)o ( WORK p (11000:P(0,P)P(0,P)PT:250:P(0,P)P(0,P)PT:PT0P(7,P)P(7,P)(P(7,P)1):9500:10300p(9500:550)p<(PMP1TP410505pF(9000:N13:(P(Y8X:n'"choose a problem.",34,Y6VS:"Then press RETURN.",,Y6VS2:KC,0n'6:9650n'200:KY010150:KY1310190:4:9650n'KY77KY10N1N(N3):10140o'KY73KY11NN13(N2):10140o'10140@o'P$P$(P$,N,1):N((P$,1)):P$(P$,1,N1)(P$,N1)(P$,N,1):ym~'9600:9700:N1m' CHOOSE PROB n'YYN94:NM$N$(P):NM$", use the",34,Y,2,CS,0:XPP(224)10:"keys to",XP12:"I",XP2,Y8:"M",XP3,Y10Gn'7:XP,YXP,Y8:X12:XPX,YXXPX,YX:XPX,Y8XXPX,:P(0,1)0:P(7,0)1:P(7,1)1fl'P13l$'9000:P1āN1P1:(P(N,2)NA)110020:l.'P(P,0)N1:P(P,1)N2:P(P,2)NA:P(P,3)RR:l3'9500m8'"Press RETURN to start the game.",140,160,2,CS,2:ESC1:250:ESC2$mt'P0MP1emy'P$"123":X13:NR(3)ange estimates.",18,157,2,CS,0k '"Press the "("DELETE ",16II,6)" key to erase.",18,170,2,CS,0k 'IIĒ7:120,17498,174101,171:98,174101,177!l '6:12,15313(RS0)264,(226)264,18012,18012,15313(RS0):.l' MAIN [l'TP1:P(0,0)0eys to place",20,TY,2,CS,0:"the cursor. Then press RETURN.",,TYVSj&7:95,TY3111,TY3108,TY:111,TY3108,TY6:95,TY398,TY:95,TY398,TY6:j' D "k'RSOP2į"Press the SPACE BAR to regroup.",18,157,2,CS,0^k'RSOP3į"Press D to ch224),Ni%N15:Z$(B(N,0))(" R"(B(N,1))" ",14(B(N,1)0),3(BR0)(BR9))i&NP(7,P)įZ$,BX44BL12(BR0)4(BR9)8(Z$),BY12N4,8,CS,5j &NP(7,P)įBXBW2,BY12N3,9,BWBW4,170j&j>&j&TY140:180:"Use the J K kHh%:h%XN4XL2,YN12N1XN4XL2,(226)P(224),(226)12XN4XL2,(226)P(224),(226)12:h%BX200:BYYN:BW38h%"Answers",BX,BY,2,CS,2Fi%7:NBY74:BXBW,NBXBW,BY12BXBW,BY12BXBW,NBXBW1,NP(224),BY12:BXBW1,BY12P(T$,3,1)"0"):Y(Z$,2,1)"0"(Z$,3,1)"0"Z$(Z$,1,Y)"0"(Z$,Y2):NA(Z$)g%Y13:NAP(((P$,Y,1)),2)9641::N1āY1N1:NAB(Y,0)9641:h%B(N,0)NA:((NA))BLBL((NA))@h%B(N,1)0:P(I,3)0B(N,1)R(P(I,1))1:B(N,1)BRBRB(N,1),5:NBPBN$Z$f%:BNR(P(7,P)):I((P$,BP,1)):BAP(I,2):BRP(I,3):B(BN,0)BA:B(BN,1)BR:BL((BA)):P(7,P)2ıf%N1P(7,P):NBN9649:I((P$,R(3),1)):T$(P(I,2)):X(T$)g%NAR((("899",X)))(("100",X)):Z$(NA):Y((T$,2,1)"0")2((XLXL3e%100:"Bonus points: "(2P(7,P)),140,14,2,CS,2:XN80:YN30:"Problems",XN,YN,2,CS,2e%BPR(3):N13:X((P$,N,1)):N1$(P(X,0)):(N1$)3N1$(N1$,(N1$)3)","(N1$,3)Of%Z$N1$" / "(P(X,1)):Z$,XN4XL48(Z$),YN12N4,8,CS)10ıdl%7:N10P(0,I)10:XM4129I,YM20NP(224)9,(226):dq%T$((P(0,I)10),0),XM129I,12,2,CS,2:T$((P(0,I)10),1),,24dv%d% PROBLEMS *e%XL0:N13:X((P$,N,1)):Z((P(X,0))):ZZ((Z1)3)((P(X,1)))9e%XLZXLZGe%:N%cX%N$(I)":",XM56129I,YM,2,CS,0:("00"(P(0,I)),3),XM36129I,,8,,5c]%7:XM61129I,YM3P(224),YM10P(224)120,YM10P(224),YM35db%(1),XM129I,YM20,0,CO,2:(2):P(0,I)0įXM4129I,YM20P(0,I),P(0,I),9,17043IFdg%P(0,I$,XS,YS:b#N(N1$)3:(N1$,N),XS,YS:",",XSSS((N1$)3.4):(N1$,3),XS.3SSSSN1:b#N1$" / "N2$,XX,YS,2,CN,0:XSI(P(224))20:"=",XS15,YS2,,CS:X1XS4:YSYS17:c% GAME 'c%100:YM140:XM7564(MP2)=c:%I0MP1:9560:CcN2N2(ZNA)(ZNA):9040oaZ#N2O29005:O2N2a_#N1$(N1):N2$(N2):NA$(NA):a# DISPLAY PROBLEMS a#XSXX.8SSSSNM:PP1RD19200-b#N2$,XX,YS,SS,CN,6:")",XXSSNM2,YS1:7:X1XSSS(N1$):XXSSNM5,YS3X1,YS3Ib#(N1$)4įN1RD1):RRR(N2)1l`K#PP3RD2RRR(N21)`M#PP2RR0:N2R(5):RD1N2R(4)5:RD2N2R(9)`P#N1NAN2RR:PP2(RD2ND3)N1(("999",ND))RRRR1:9040YaU#PP3RD1RD4Z((N110)(N210.5)):(NAZRD2)(NAZRD3)9015:RRR(N2)1:2NA((N$,1)):N$(N$,2)(NA):9030_9#NA0:N1ND:NNR(9(PP3RD2))(NNZ):ND19025:(RD2ND3)N1NNR((9N2))_<#(ND3RD2)N2(NNNA10)(("999",N))NNNN1:9020 `A#NANA10NN:Q`F#RRR(N2(ND1))(ND1):NM1N2N210R(9)((80020I):N$(I)N$(I)((800N20I))::r^J^'# GENERATOR ^(#(PARM2)5RDR(4)1:PP2RD3R(2)^-#NDRD:NZ9:RD3NDR(2)1:RD4PP3NZND1R(ND1)(_2#PP3ND1(RD3)(RD4):(PARM2)5NZND1R(ND1)g_7#N2R(8)1:ND1PP3122228":t]KEY$"23272825182223":DR$"2222228":]KEY$"23252723181823":DR$"3122224":]KEY$"35353030233523":DR$"2222222":]KEY$"232730272825301823":DR$"312222228": ^? GET NAME l^@MP(PARM6):N$(0)NM$:MP1āI01:N$(I)"":N1(C%):i\ A$A$(A):B$B$OP$:C%C%1:w\W MUSIC \XMUSICĹ765,32:766,DR:767,PI:3840:\Z\]Z7050,7052,7054,7056,7060\bZ1(DR$):DR((DR$,Z,1))10]lPI((KEY$,Z21,2)) ]v7000:N12DR:::J]KEY$"23232523252728":DR$"JJ5:95l[ X%(C%)XP:Y%(C%)YP:RCC%1RS[ FWFK(C%0):1000:KY683015:KYFW:KY$"":XR0Y%(C%)YS17Y%(C%1)YS17KY$(FW)[ Y%(C%1(KY$))YS17KY$KY$(FW):3012F\ KYFWC%C%1:A$(A$,1,(A$)1):B$(B$,1,(A$)):XPX%(C%):YPY%RZKY68KYFWıtZNN$(KY):OP$NN$:NN$:FRıZ"#",XP,YP,0,CN,5:FF0Z95:KY68RC0įOP$:Z$KY13KYFK(KY48KY57)1040Z.KY13įOP$:KYFK1000:1025[8NN$OP$:<[LXP5,YP,11,11,128:CC$"#":CC$,XP,YP,0,CN,5:FF0I[V(I,0):T$(I1,1),,24:T$(I,1)kY:ZJ::zY SMILEY Y JJ12:95Y*JJ9:95Y NUMBER INPUT YXP5,YP,11,11,128:(KY$)0KY(KY$):KY$(KY$,2): ZCC$"@":CC$,XP,YP,0,CN,5:FF0?ZJJ5:95:(KY68RC0)KYFW(KY48KY57)10051(PT):JZ1:I4:PT0āI1100::I4X0((Z),I,1)((J),I,1),X8I,YM,0((KK)(KK)),CS,5:II1:I1((Z),I,1)((J),I,1)560X2PT1570X57:Z082:XM4129PZ,YN:_Y7I(P(0,P)PTN)10:I(I)įT$(I1,0),XM129P,12,2,CS,2:T$ESC110550:Z$"MENUS":20000wW WAIT FOR RETURN WJJ3:95W+ INPUT CURSOR W,JJ4:95W1JJ11:95W CHOICE WJJ6:95WJJ7.5:95W% SCORE W&PT0ı9X+XXM20129P:YYM20P(0,P):Z1000P(0,P):P(0,P)P(0,P)PTgX-NVUN$("0123456789",1(PP1RD2)):P1(N$):NR((N$)):N$(N$,1,N1)(N$,N1)(N$,N,1):VZ10000V_1032048:95:1032050:Vc CLEAR SCREEN VdJJ1:95VX8:YTY2 WRC0:X,Y,184Y,271X,128:/W GET KY NMPP(PP1)UFPT%10:8000+Z1(N1$):((N1$,Z))N2ĂwH+V(N1$)Z1:Z$D$((N1$)Z)"s":Z99: xR+9900:XPXSSS:YPYS17:U(N1$)1Xx\+CC$"#":1100:(KY75KY21)U1UU1:XPXPSS4(U3(N1$)3):11100xf+(KY74KY8)U|v* SETUP v*9000:100:MIN0:MAX9:C10:C20:TI0v +PY9:NM$", find the quotient.",140,PY,2,CS,2.w+YSPY30:SS16:XX15424(PP2)SS(RR9(N1$)3)SS((N1$)4):9100:YYYS14nw +XGXX80SS(RR9(N1$)3)SS((N1$)4):YGYS:800:FY116264,YB264,YB1412,YB1412,YB:u' MAIN u'ESC2:PR0:TP1MP:PRPR1:M%(TP)1:11000:M%(TP)TA:u'ESC1:8300v)8800:OP(OP$):OP10800:OP4ĹPARM7,0:220Bv")Z$"D.L.DIGITS":OP3Z$"I.GAME"Mv,)20000nv0*8500:MP(ZA$):PARM6,MP:0:(A)" "(">=",1(AP),1)" "(P),TX,TY,2,CS,0:"Press D to change the estimate.",,TYVS:255u&200:KY09960::KY68ĩ150::255:9960 u&180#u'RSPP2RD2:RSı_u 'YB170:"Press D to change estimates.",139,YB4,2,CS,2u '6:12,YBVS:P(CS64)CS,6s&HC:TX126,TY9P(224)8(Z$),TY9:5t&C2C21:P(CS64)CS,3:"Try again.",TX,TYVS,2,CS,0:"Place the cursor over the "Z$".":P(CS64)CS,6:TYTYVS:TXTX62:9930Et& PRESS D `t&TYFY:TYYY8TYYY8t&TX20:15CS64)CS,6r&XTX8:7:X75,TY3X91,TY3X88,TY:X91,TY3X88,TY6:X75,TY3X78,TY:X75,TY3X78,TY6:r& C HINT s&C1C11:P(CS64)CS,3:TY120:"Hint:",TX,TYVS,2,CS,0:"There are enough "Z$" to divide.",,TY:"Try again.",,TY4įN1$,XS,YS:q#N(N1$)3:(N1$,N),XS,YS:",",XSSS((N1$)3.4):(N1$,3),XS.3SSSSN1:q& CURSOR yr&TY150:P(CS64)CS,3:TX2010((Z$)4):"Use the J K keys to place",TX,TY,2,CS,0:"the cursor. Then press RETURN.",,TYVS:P(10)(N210.5)):(NAZRD2)((Z9NAZ)RD3)9015pZ#N2O29005:O2N2p_#N1$(N1):N2$(N2):NA$(NA):p# DISPLAY PROBLEMS q#XSXX.8SSSSNMbq#N2$,XX,YS,SS,CN,6:")",XXSSNM2,YS1:7:XXSSNM5,YS3XSSS(N1$),YS3~q#(N1$)))o<#(ND3RD2)N2(N(N)NA10)(("999",N))N(N)N(N)1:9020oA#NANA10N(N):oF#RRR(N21):NM1N2N210R(9)(RD1):RRR(N21)pK#PP3RD2RRR(N21)QpP#N1NAN2RR:PP2(RD2ND3)N1(("999",ND))9015pU#PP3RD1RD4Z((N15RDR(5):PP2RD3R(2)n-#NMPP1:NDRD:NZ9:RD3NDR(2)1:RD4PP3NZND1R(ND1)o2#PP3ND1(RD3)(RD4):(PARM2)5NZND1R(ND1)po7#N2R(8)1:NA0:N1ND:N(N)R(9(PP3RD2))(NNZ):ND19025:(RD2ND3)N1N(N)R((9N21:JH2140,2100,2200,2300,2400,2100,2000:TYTYVS:2020:3020m W1A:W2A:2020:3020m]JP8:96m SCORE BOX mJP1:96mJP2:96 n JP3:96nl JP4:96%n4!JP5:962n!JP6:96?n!JP7:96Ln`"JP9:96^n'# GENERATOR n(#(PARM2)ϲ NUM l TITI(TR0):1000:KY68TITI(TR2):C1C1(TR1):3025l W1(OP$)W2(OP$)3030l TR0ı m TR0:"Hint:",TX,FY,2,CS,0:TYFYVS:180!m TR1İ2030:3020m TRTR1:TR1TX14:XBX1SS2:TYFY:"Hint:",TX,TY,2,CS,0:TYTYVS:P"(NV)" =",TX,TY,2,CS,0:L((NUNV)):S1I(P(224))8:S2S1:PNUNV:L21820:(P),S12L,,8,,5:k BRING DOWN l"Bring down "D$(U1)"s.",TX,TY,2,CS,0:il` L((A)):"The remainder is ",TX,TY,2,CS,0:S1I(P(224)):1820:PA:S2S1:ul :Z$""Z$"0"jz"Think "(Z),TX,TY,2,CS,0:ZP(224):7:Z3,TY2Z3,TY7Z4,TY7Z4,TY2Z8(Z$)10,TY2:Z$,Z9:A10ıMk"but the largest",P(224)10:TYTYVS:"digit you can try is 9.",TX,TY:A9:XB271:]k NU-NV=A k(NU)" - ",P(224)9,,2,,0iHPA:L((A)):S1I(P(224))8:S2S1:JH61820:(AN2),S12L,,8,,5:S2TX:i[ THINK NU/N2 j\NM1A0ĭ(NU(N210.5)10)0Z$(NU):ZN2:2170HjfZN25(NM1):Z(((Z),1(Z99)))|jpZ$(NU):NM1Z$(Z$,1,(Z$)1) h"Try again.",TX,TY,2,CS,0:TR1C1C11:hP0L((P)):S1S2:TYTYVS:(P),S22L,TY,8,CS,6:L11820:TYTYVSiC2C21:Z$(A)i ENTRY iJP10:961i3 A#*N2=A*N2 i4((A2)"#",1(JH2),1),TX3,TY,0,CS,5:" * "N2$" =4)48L,Y8P(224),Y2:g M1*M2+M0= hPM1M2M0:Z$(M1)" * "(M2):M00įZ$" = "(M1M2),TX,TY,2,CS,0:Z$(M1M2)" + "(M0):TYTYVSahL((P)):Z$" = ",TX,TY,2,CS,0:S1I(P(224)):S2S1:L21820:(P),S12L,,8,,5:oh ENTERP$NN$:NN$:FWıf"#",XP,YP,0,CN,5fFF0:95:KYFDFDıfKY13KYFK(KY48KY57)1440fKY13įOP$:KYFK1400:1430g g BOX 1gYTY:L1į"#",I(S1)3,,,,6:g&6:XI(S1):X2,Y2P(224)48L,Y2P(224),Y8P(22PXPSS:FR1:FW0:1400:FR0:KYFKXPXPSS:1010eOP$ZA$OP$:eLXP5,YP,11,11,128:CC$,XP,YP,0,CN,5:FF0eVJJ5:95fxXP5,YP,11,11,128:"@",XP,YP,0,CN,58fFF0:JJ5:95:KYFKFRıHfKYFDFDı^fKY48KY571400fNN$(KY):O95~d1JJ11:95d CHOICE dJJ6:95dJJ7.5:95d SMILEY d JJ12:95d*JJ9:95d NUMBER INPUT eFR0:NM11400:((A))1XPXPSS((A))SSLeXZXP:((A))11400:XP5,YP,11,SSSS,128heFW1:FR0:1400:ZA$OP$eXc`1032050:96:1032052:cc CLEAR SCREEN cdYB185:XB271:JJ1:95cX8:YTY2cRC0:X,Y,YBY,XBX,128:c GET KY dJJ2:95)dESC110200:Z$"MENUS":20000Ad WAIT FOR RETURN NdJJ3:95cd+ INPUT CURSOR pd,JJ4: {b63000b D.P.DIGITS b2:60000b8MP(PARM6):M%(MP)b<OP(PARM):PP(PARM1):RD(PARM2)-cFD$(0)"one":D$(1)"ten":D$(2)"hundred":D$(3)"thousand":D$(4)"ten "D$(3)AcPN08:U$(N):LcZ10000lc_1032048:95:1032052:                  1į"=",XT14,YS2,,CS,5:XPXT:YPYS:JH1:TX40:11130ap+YPYS17:XPXSSS((N1$)(NA$)):JH2:TXXX5az+ANA:3000a.8700a N100:"Please wait...",140,86,2,CS,2a*N1032050:(4)"RUN"Z$ b`JJ0:95b:2067l00:(4)"RUN"Z$fr`JJ0:9):PARM6,MP:R`* SETUP |`*9000:100:MIN0:MAX9:C10:C20:TI0`+PY10:NM$", find the quotient.",140,PY,2,CS,2a+YS658(NA4)(NA4)10(RD1):SS14:XX99:XSXX:1(RD1)9200,9100:FYYS35-a*+XGI(XS)4230(RD1):YGYS30:800laf+RDSG$" "N2$,XS,YS,2,CN,0:XTI(P(224))20:q_' MAIN _'ESC2:PR0:TP1MP:PRPR1:M%(TP)1:11000:M%(TP)TA:_'ESC1:8300_)8800:OP(OP$):OP10800:OP4ĹPARM7,0:220`")Z$"D.L.BASFACT":OP3Z$"I.GAME"#`,)20000D`0*8500:MP(ZA$ DISPLAY PROBLEMS `^#XSXX.8SSSSNM^#N2$,XX,YS,SS,CN,6:")",XXSSNM2,YS1:7:XXSSNM5,YS3XSSS(N1$),YS3^#(N1$)4įN1$,XS,YS:'_#N(N1$)3:(N1$,N),XS,YS:",",XSSS((N1$)3.4):(N1$,3),XS.3SSSSN1:d_#N1$" "2:96I] JP3:96V]l JP4:96c]4!JP5:96p]!JP6:96}]!JP7:96]`"JP9:96]'# GENERATOR ](#NM1:SG$"/":NAR(10)1:N2R(5):RD1N2R(4)5:RD2N2R(9)^2#NAO1N2O29000:O1NA:O2N21^<#N1NAN2:N1$(N1):N2$(N2):NA$(NA):J^#,XS40(RD1),Y1,3,CS,0:XP(224):Z$,X,Y2,,CO:")",P(224),Y1,,CS:7:KYP(224)8:KY,YX3,Y:KY,Y8X3,Y8\NA1ĹPM321,96:N1NA1:PM,XS40(RD1),KYX20,Y,9,0,8N,128::PM321,172]]]JP8:96"] SCORE BOX /]JP1:96<]JPTR0:"Hint:",TX,FY,2,CS,0:TYFYVS:180u[ TR1İ2030:3020[ TRTR1:TR1İ4000:TYFY:"Hint:",TX,TY,2,CS,0:TYTYVS:P1:JH2000,2100:TYTYVS:2020:3020[ 2020:3020[NA1ı,\YYS8NA16(RD1)9:Z$"":X1N2:Z$Z$(3):\"("P(224)18,,2,,0:TYTYVSjZ(A),S2,TYVS,8,CS,6~ZC2C21:Z$(A)Z ENTRY ZJP10:96Z4S2TX3:"#",S2,TY,0,CS,5:" * "N2$" = "N1$,P(224)10,,2,,0:Z NUM [ TITI(TR0):1000:KY683025%[ A(OP$)30301[ TR0ı_[ ,TY,2,CS,0:S2I(P(224))3:"#",S2,,,,5:"groups of "N2$".",P(224)18,,2,,0:Y ENTER Y"Try again.",TX,TY,2,CS,0:TR1C1C11:NZA1JH1TYTYVS:2000:"There is ",TX,TY,2,CS,0:S2I(P(224))3:"#",S2,,,,5:"group of "N2$".",[X.KY13KYFK(KY48KY57)1050X8KY13įOP$:KYFK1000:1040XBX BOX XYTY:L1į"#",I(S1)3,,,,6: Y&6:XI(S1):X2,Y2P(224)48L,Y2P(224),Y8P(224)48L,Y8P(224),Y2: Y EXPRESSION Y"There are ",TX6:95JWJJ7.5:95YW SMILEY gW JJ12:95tW*JJ9:95WXP5,YP,11,11,128:"@",XP,YP,0,CN,5WFF0:JJ5:95:KYFKFRıWKYFDFDıWKY48KY571000XNN$(KY):OP$NN$:NN$:FWıX"#",XP,YP,0,CN,55X$FF0:95:KYFDFDıY,271X,128:RV GET KY _VJJ2:95VESC110200:Z$"MENUS":20000V WAIT FOR RETURN VJJ3:95V+ INPUT CURSOR V,JJ4:95V1JJ11:95W^XP5,YP,11,11,128:"@",XP,YP,0,CN,5:FF0:FC0:KC,0WhJJ5:95.W CHOICE ;WJJ CU63000WU D.P.BASFACT dU2:60000}U8MP(PARM6):M%(MP)U<OP(PARM):PP(PARM1):RD(PARM2)UZ10000U_1032048:95:1032052:U`1032050:96:1032052:Vc CLEAR SCREEN VdJJ1:95"VX8:YTY2CVRC0:X,Y,184        "Please wait...",140,86,2,CS,2ew*N(4)"RUN"Z$wPÃ4,Try the lesson again,Go to the practice,Go to the game,Return to the Main MenuwZÃones,twos,threes,fours,fives,sixes,sevens,eights,ninesx`JJ0:95x:2067lOnder is ",TX,TY,2,CS,0:S1I(P(224)):1820:(RR),S12L,,8,,5:TYTYVSvL,ARR:NM1:1000:TYFY:180v,H$,140,PY,2,CS,2:"Find the quotient.":ARM0İ810*w:150:"The quotient is "NA$(" R"(RR),19(RR0))".",139,TY,2,CS,2:250Tw N100:XZju+ARM0ČPM,XG20,60,YG,60,0,46,128:YGYG46u$,TYFY:180:XTXTSS4(U4)::RR011500u-, REMAINDER u.,H$,140,PY,2,CS,2:H$"Enter the remainder.":H$v8,YPYS17:"R",XT4,YP,,CN,5:XPXTSS((RR))4vB,150:L((RR)):"The remai(A),TX,TY,2,CS,0:TYTYVS:PN2:9955:VS14:YYYY17:X1SSSS,YY,28,XPX1SS3,128u+TXXX6:ANVN2:(A)" is too small.",TX,TY,2,CS,0:AA1:TYTYVS:A(NUN2)į(A)" * "N2$" = "(AN2),,TY:TYTYVS:A(NUN2)!u+111329u+NUA:YYYY14:X1Rs+ANUNV:NL((A)):YPYYs+H$,140,PY,2,CS,2:H$"Subtract and compare.":AN211185:H$s+ARM0ČPM,XG20,60,YG,60,0,16,128:YGYG16s+2200:1000:11200t+H$"Change the estimate.":H$t+VS12:TX20:TYFY:150:(NU)" - "(NV)" = "r+TXXX6:AAN2:(A)" is too large.",TX,TY,2,CS,0:AA1:TYTYVS:A(NUN2)į(A)" * "N2$" = "(AN2),,TY:TYTYVS:A(NUN2)r+11132r+ SUB 5s+"-",X1SS,YY,,CN,5:YYYY17:7:XPSS2,YY4X1SS2,YY4:U(N1$)FYYY3010(YY120)M1AN2:XTXP:FYFY4:V1NM:M2((N2$,NMV1,1)):A20M2N2:VNMq+2000:M0(P10):APM010q+1000:XPXPSS4(VU4):VNMTYFY:180r+:AM0:A01000:TYFY:180:FYFY4:AA2:XPXT:ANU111654r+PNU:9950:X1SS,YY,11,XPX1SSSS,128ly.":H$op+ARM0ČPM,XG20,60,YG,60,0,30,128:YGYG30p+PP2RD1TYTYVS:"#",TX3,TY,0,CS,5:S1B1:L((A2)):1820:TYTYVS:AAN2:11148p+TYFY:180:PP32100:AAN2q+NVA:NL((A)):YPYY'q+PP3İ1000:TYFY:180:11165zq+A2A:M00:" in "(NU)"?":ARM11:810ov+PP3RD1H$"Round the divisor and estimate."ox+H$,140,PY,2,CS,2oy+XG0ARM0İ810:ARM0oz+1(PP2RD1)2140,2100o|+YPYS17:XPXT:1000p+A0UF011300:UF1p+ MULT ?p+H$,140,PY,2,CS,2:H$"Multip10mnk+FYFY10:2300:1000:TYFY:180:NUN2FYFY10|no+ DIVIDE np+NUN2U1UF011300:A(NUN2):NM1A(NU(N210.5)10)Rou+P(CS64)CS,63((H$,1)"P"):H$,140,PY,2,CS,2:P(CS64)CS,6:H$"Divide.":PP2RD1H$"How many "U$(N21)6):11070NmJ+"@":180\mL+ GET # hmM+TXXX6m\+NU0:UF0:XTXS:X1XS:U(N1$)11:FYYY34:UF0FYYS65mf+A((N1$,(N1$)U1,1)):NUNU10A:UF011120:XPXT:YPYY148nh+H$,140,PY,2,CS,2:H$"Bring down "D$(U1)"s.":H$:XG0ARM11:8YS17:U(N1$)1l>+1100:(KY75KY21)U1UU1:XPXPSS4(U3(N1$)3):11070lC+(KY74KY8)U(N1$)XPXPSS4(U3(N1$)3):UU1:11070?mH+KY13U(N1$)11070:UVĒHC:TX126,TY9P(224)8(Z$),TY9:TX118,TY37P(224)8(Z$),(22,CS,2:250:180Zk"+PP2RD211085ik$+ CURSOR k%+H$,140,PY,2,CS,2:P(CS64)CS,3:H$"Place the first digit of the quotient.":H$:P(CS64)CS,6k*+Z1(N1$):((N1$,Z))N2Ăl/+V(N1$)Z1:Z$D$((N1$)Z)"s":Z99:Fl4+9920:XPXSSS:YP the problem.":H$,140,PY,2,CS,2j +YSPY3010(ND3NZ9)20(RD1PP2):SS16:XX10414(RD5PP2):9100:YYYS14j+XGXX50:YGYS832(RD1PP2):RD2PP2XGXX120:YGYG16j+800Ek +TYYS70:"I will help you find the quotient.",140,TY,24,2,CS,0i)MIN1:V1MAX:(V),HS3,HY,2,CS,2:T$:" "T$,,,,,0:HYHYVS::385i)AC(OP$):AC10000:AC4ĹPARM7,0:220i")Z$"P.ROUTINES":AC3Z$"I.GAME"i,)20000i* SETUP j*9000:100:MIN0:MAX9Wj+PY95(ND3NZ9):H$"Here is68ĩ150::255:9960Zh&TYFY:180gh' MAIN h'NF0:NZ0:11000:OFİ8500:PARM6,(ZA$):Z$"D.P.DIGITS":20000h'(PARM2)6ĭ(PP2RD5)(PP3RD3)NF5:11000h) END MENU >i)100::MAX:HS30:HY50:VS16:"What do you want to do?",HS,2X75,TY3X78,TY6hg&TYTYVS:P(CS64)CS,6:g&TYFY:180:H$,140,PY,2,CS,2:H$"Change the estimate.":H$h&TX20:150:(A)" "(">=",1(AP),1)" "(P),TX,TY,2,CS,0:"Press D to change the estimate.",,TYVS:255Kh&200:KY09960::KY):"There are enough "Z$" to divide.",X,TYVS,2,CS,0f&"Use the J K keys to move the",,TY:"cursor over the "Z$".",,TYVS:"Then press RETURN.",,TYVSVSIg&TXX:XX8:7:X75,TY3X91,TY3X88,TY:X91,TY3X88,TY6:X75,TY3X78,TY::(N1$,3),XS.3SSSSN1:e&TY140:"Use the J K keys to place",20,TY,2,CS,0:"the cursor. Then press RETURN.",,TYVS f&7:95,TY3111,TY3108,TY:111,TY3108,TY6:95,TY398,TY:95,TY398,TY6:mf&P(CS64)CS,3:TY140:X2010((Z$)4$(N2):NA$(NA):NM(N2$):ND(NA$):vd# DISPLAY PROBLEMS d#XSXX.8SSSSNMd#N2$,XX,YS,SS,CN,6:")",XXSSNM2,YS1:7:XXSSNM5,YS3XSSS(N1$),YS3d#(N1$)4įN1$,XS,YS:Se#N(N1$)3:(N1$,N),XS,YS:",",XSSS((N1$)3.4).5):(PARM2)5RRR((N210)1):NZ2cx#N1NAN2RR:Z((N110)(N210.5)):NAZ9070cz#RD49090c}#N1N110R(9):NA(N1N2):RRN1NAN2:RD59090c#NANA10R(9):RRR(N21)%d#RRRR(RR0):N2O29000:O2N2:N1N2NARR]d#N1$(N1):N2N210R(9):NAR(9)bi#RRR(N21):N1NAN2RR:Z((N110)(N210.5)):NAZN2N21:N2999065:9010bk#9090bn#N2R(8)1010R(4)NF:NAR(5)2:(PARM2)5RDR(2)3:N2R(8)1013R(3)]cs#RRR(N21):RD3RRR(N21(N210.5))(N210ND1)ma<#NAR(9):RD2ND3N2R(7)1:NAR((9N2))aF#N2ND:XR(8)(NNZ)aK#(ND3RD2)N2(XNA10)(("999",N))XX1:X19035:X1aP#NANA10X::RRR(N21)bU#(ND3RD2)N2NARR(("999",ND))9020bZ#9090Jbd#NZ9:RD29070:N20:1032052:V`'# GENERATOR `(#RD19010:N2R(8)1:PP2N2N210`-#NAR(9):RRR(N21):9090`2#N2R(8)1:PP29060:(PARM2)5RDR(2)3:NZ0a4#NZ1NZ4NZNZ(ND2):ND3:NZ5NZ:9020;a7#NDRD:NZ9:RD3NDR(2)1:RD4NZND1R(j_(A)" < "N2$,TX,TY,2,CS,0:TYTYVS:VS14:}_ BRING DOWN _TYFY:TXXX6` 150:"There "("are is ",14(A1),4)(A)" "D$(U1)("s.",1(A1)),TX,TY,2,CS,0:"#",TX8314(A1),,,,5:TYTYVS:"`3! # PROBLEMS D`4!1032050:850^"but the largest",P(224)10:"digit you can try is 9.",TX,TY:TYTYVS:A9:^ NU-NV=A ^TYFY:TXXX6:VS11_150:(NU)" - "(NV)" =",TX,TY,2,CS,0:L((A)):S1I(P(224))8:1820:(A),S12L,,8,,5:TYTYVS7_AN2TYTY3:VS14:(NU):ZN2:2170m]kZN25(NM1):Z(((Z),1(Z99)))]pZ$(NU):NM1Z$(Z$,1,(Z$)1):Z$""Z$"0"]zA9TX304^|150:"Think "(Z),TX,TY,2,CS,0:ZP(224):7:Z3,TY2Z3,TY7Z4,TY7Z4,TY2Z8(Z$)10,TY2:Z$,Z9:TYTYVS:A10ı50:((A)"#",1(RD1PP2)),TX3,TY,0,CS,5:" * "N2$" =",P(224)9,,2,,0\HA2AN2:L((A2)):B1I(P(224))8:S1B1:RD1PP2İ1820\R(A2),B12L,,8,,5:TYTYVS:\[ THINK NU/N2 ]\TYFY:TXXX6E]fNM1(NUN2)0A0A(NUN2):Z$)):150:Z$" = ",TX,TY,2,CS,0:S1I(P(224)):1820:(P),S12L,,8,,5:TYTYVS:[ ENTER \TX,TY2,11,250TX,128:150:L((A)):"Enter ",TX,TY,2,CS,0:S1I(P(224)):1820:(A),S12L,,8,,5:255:\3 A#*N2=A*N2 /\4TYFY:TXXX6\>1,I(S1)3,,,,6:Z&6:XI(S1):X2,Y2P(224)48L,Y2P(224),Y8P(224)48L,Y8P(224),Y2:Z M1*M2+M0= *[TXXX6:TYFY:PM1M2M0:Z$(M1)" * "(M2):M00įZ$" = "(M1M2),TX,TY,2,CS,0:Z$(M1M2)" + "(M0):TYTYVS[L((PYP,11,11,128:CC$"@":CC$,XP,YP,0,CN,5:FF0YJJ5:95:KY(((A),DD,1))481205YNN$(KY):OP$NN$:NN$:"#":250:"#",XP,YP,0,CN,5:DD1DDDD1:XPXPSS4(U((A))DD4):1205ZXZXP:XPXPSS((A))SS:"Z BOX GZYTY:L1į"#"),DD,1))48İ2030:1005XNN$(KY):OP$NN$:NN$:DD((A))XPXPSS:DDDD1:1005X"#":250:"#",XP,YP,0,CN,5:XLXP5,YP,11,11,128:CC$"#":CC$,XP,YP,0,CN,5:FF0XVJJ5:95YDD((A))*YAAA:A(((A),DD,1)):2030:AAAbYXP5,DW CHOICE QWJJ6:95`WJJ7.5:95oW SMILEY }W JJ12:95W*JJ9:95W NUMBER INPUT WNM11200:DD1:2030:XZXP:((A))1XPXPSS((A))SS:XZXPXXP5,YP,11,11,128:CC$"@":CC$,XP,YP,0,CN,5:FF0MXJJ5:95:KY(((A1032048:95:10320502OF:kVc CLEAR SCREEN ~VdARM0:JJ1:95VX8:YTY2VRC0:X,Y,186Y,271X,128:V GET KY VJJ2:95VZ$"MENUS":20000V WAIT FOR RETURN WJJ3:95W+ INPUT CURSOR 'W,JJ4:955W1JJ11:95"CU63000VU D.L.DIGITS zU OF(768)99:768,(768)100OFU2:60000U<PP(PARM1):RD(PARM2):PARM3,1UFD$(0)"one":D$(1)"ten":D$(2)"hundred":D$(3)"thousand":D$(4)"ten "D$(3) VPN15:Z$::N08:U$(N):1VZESC1:10000VV_                      he practice,Go to the game,Return to the Main MenuZn`JJ0:95fn:2067l:o the Main Menud`JJ0:95d:2067lO:2067lOm+NN$:"#":250:"#",XP,YP,0,CN,5Um.TYFY:180:810m.H$,140,PY,2,CS,2:"Find the quotient."m.150:"The quotient is "NA$".",139,TY,2,CS,2:250m N100:"Please wait...",140,86,2,CS,2m*N(4)"RUN"Z$MnPÃ4,Try the lesson again,Go to te quotient.",140,TY,2,CS,2:250:180}lH+H$,140,PY,2,CS,2:H$"Count the groups of "N2$".":H$l\+4000:ARM11:810lf+RD1į"=",XT14,YS2,,CS,5:XPXT:YPYS:2000:11130lp+YPYS17:XPXSSS((N1$)(NA$)):2100mz+350:NN$NA$İ2030:11130A(RD1):H$"Here is the problem.":H$,140,PY,2,CS,2k+YS758(NA4)(NA4)10(RD1):SS14:XX9120(RD1):XSXX:1(RD1)9200,9100:FYYS35k*+XGI(XS)72:YGYS40:RD1800:RD1XGXT60:YGYG16:800:FYFY16?l4+TYFY:"I will help you find th6:"What do you want to do?",HS,24,2,CS,0j)MIN1:V1MAX:(V),HS3,HY,2,CS,2:T$:" "T$,,,,,0:HYHYVS::385j)AC(OP$):AC10000:AC4ĹPARM7,0:220j")Z$"P.ROUTINES":AC3Z$"I.GAME"j,)20000j* SETUP k*9000:100Nk+PY208N),XS,YS:",",XSSS((N1$)3.4):(N1$,3),XS.3SSSSN1:i#N1$" "SG$" "N2$,XS,YS,2,CN,0:XTI(P(224))20:i' MAIN i'ND1:NM1:11000:OFİ8500:PARM6,(ZA$):Z$"D.P.BASFACT":20000i) END MENU Ej)100::MAX:HS30:HY50:VS1AO1N2O29000:O1NA:O2N2ch<#N1NAN2:N1$(N1):N2$(N2):NA$(NA):|h# DISPLAY PROBLEMS h#XSXX.8SSSSNMh#N2$,XX,YS,SS,CN,6:")",XXSSNM2,YS1:7:XXSSNM5,YS3XSSS(N1$),YS3i#(N1$)4įN1$,XS,YS:Yi#N(N1$)3:(N1$,YX3,Y:KY,Y8X3,Y8gNA1ĹPM321,96:N1NA1:PM,XS40(RD1),KYX20,Y,9,0,8N,128::PM321,172gg3! # PROBLEMS g4!1032050:8500:1032052:g'# GENERATOR h(#SG$"/":NAR(10)1:N2R(5):RD1N2R(4)5:RD2N2R(9)6h2#N4tf>150:NA$"#",TX4,TY,0,CS,5:" * "N2$" = "N1$,P(224)10,,2,,0:TYTYVS:2030fNA1ıfYYS8NA16(RD1)9:Z$"":X1N2:Z$Z$(3):2g"(",XS40(RD1),Y1,3,CS,0:XP(224):Z$,X,Y2,,CO:")",P(224),Y1,,CS:7:KYP(224)8:KY,TX,TY,2,CS,0:NA$"#",I(P(224))1,,0,,5:("groups",6(NA1))" of "N2$".",P(224)18,,2,,0:TYTYVSe ENTER fTX,TY2,11,260TX,128:L((NA)):150:"Enter",TX,TY,2,CS,0:S1I(P(224))10:1820:(NA),S12L,,8,,5:255:f4TYFY:TXXX SMILEY 4d JJ12:95Ad*JJ9:95Md BOX rdYTY:L1į"#",I(S1)3,,,,6:d&6:XI(S1):X2,Y2P(224)48L,Y2P(224),Y8P(224)48L,Y8P(224),Y2:d EXPRESSION dTYFY:TX50e150:"There "("are is ",14(NA1),4),:,c GET KY 9cJJ2:95OcZ$"MENUS":20000gc WAIT FOR RETURN tcJJ3:95c+ INPUT CURSOR c,JJ4:95c1JJ11:95c^XP5,YP,11,11,128:"@",XP,YP,0,CN,5:FF0:FC0:KC,0chJJ5:95c CHOICE dJJ6:95dJJ7.5:95&dM (b63000}NuIT40T40Z40:X,YXMX(I),84Y(557:PTPT%PTf{:P(7,P)P(7,P)1:ZR(4):7005l{:{:BN$,BX,BY2,2,CS,2:6:BXBW4,BY12BN2BXBW4,(226)P(224),(226)10BXBW4,(226)P(224),(226)10: | N100:"Please wait...",140,86,2,CS,2|*N(4)"RUN"Z$.|/u CIRCLE ART ?|0uP(0:(NA$)5İ800:YG22:XG220:800:BYYG47VSz:9710:(NABA).115060z:Z$(BA):5100:Z17:X1200::Z$,BX44((BL1)3)4BL8(Z$),BY12BN4,8,CS,5:{:"Bonus: "(P(7,P)2),BX,BY12BN4,2,CS,2D{:PTP(7,P)2:Z1010:X150:YMTY:B$,NL)PT0:"The correct answer is "NA$".",140,TY,2,CS,2:y:A$B$PT0:"The answer is correct,",50,TY,2,CS,0:"but the work is not.",,TYVS:#z:TYTYVS:PTPT%:"Good. You earned points.",140,TY,2,CS,2:(PT),174,,8,,5ez:BYYS12:BX22VV1:V011280mx!,9994:4:X1,YY4X2,(226):11165x$,XPXPSS4(V3V6):VV1:V(NA$)11280y.,TY153:180:FYYY20:NL(NA$):NL3NMNM(N(1,1)0):5000:NA$(NA$,NL3)","(NA$,3):NL6NA$(NA$,NL6)","(NA$,7)ty:TY150:(A$,NL)(1Cw+11125Pw+ NEXT iw+XPXPSS4(V3V6)w+VV1:V(NU$)11125:MM1w+UU1:UNM11070w+YYYP17:M211310w+ ADD w+9994:7:X1,YY4X2,(226)w,YPYY:XPXSSS:V1x,A((NA$,(NA$)V1,1))1x,3000:KYFW11300Fx,(A$,(A$)1):B$(B$,(A$)):R(VU)R(VU)1:11200v+VV1:V011125v+UU1:N(U,1)011165:MM1:11080v+ REGROUP v+HXXSSS(VU1)4(VU2):HYYS1010R(VU)w+A((NR$,VU,1)):31008w+OP$""N(VU,R(VU)2)(OP$):R(VU)R(VU)(NU$,V,1)):FRV(NU$):3000:FR0:KYFWVV1:11100uf+VV1:XPXPSS4((NU$)V2):V(NU$)11100:11250uo+ * uu+RCRSVUVUND((A$,2),1)"-"u+A((NU$,(NU$)V1,1))v+3000:RC0:KY3211200"v+KYFW11225jv+(A$,1)"-"A$U,1))("00",1,U1):V0V(NU$)tR+PP3(RD1)11125:RC0:XPXPSS(NU$)SS4((NU$)3)tW+" ",XP,YP,SS,CN,2:16385,1:CM,8313,(NU$)256:(8313)27216uX+XC(8313)9:A1(8313)128XC:B$B$((8313A))::A$NU$-uY+YYYP17:11310lu\+A(:SS16:9140:XS34X0X1:9110qs+XGI(X2)40:YGYS:800~s)+ MULT s*+V1ND:R(V)0:s4+M0:U1:A$"":B$"":C%0s>+XPXSSS:YPYS3114MsC+N(U,1)0NM111245:V1WtH+NR$"":A0:N1ND1:A((N(U,1)N(N,0)A)10):NR$NR$(A)::NU$(N1N(1İ100:"Please wait...",140,86,2,CS,2:rN*AC3Z$"P.ROUTINES":20000rX*Z$("M.L.BASFACTM.L.DIGITS",111(PP3(RD1)),11):20000r* SETUP r*RC0:100:RSPP4(RD2):9990$s+PY10:NM$", find the product.",140,PY,2,CS,2Ts +YSPY246NM:Pq)Z5:TP07005:250aq/* END MENU q0*100::MAX:N1MAX:T$::MAX:HS24:HY50:VS16:"What do you want to do?",HS,24,2,CS,0r?*V1MAX:(V),HS3,HY,2,CS,2:T$:" "T$,,,,,0:HYHYVS::385-rD*AC(OP$):ACMAXĹPARM7,0:220_rI*AChe game, "N$(0)".",,Y3:10590pT)"Thanks for playing the game.",140,Y,2,CS,2p^)250:10800qh)ESC1:"Game",17,158,2,CL,0:"Over",262,,,,1:X17952:PM,X,38,158,9,2,0(KK),128:PM,239X,40,158,9,2,0(KK),128:8qm)P0MP1:30000:XMXM12972:250eo )P:TPTP1:TP610100:TP1:10600wo ) GAME OVER o6)ESC1:100:XG137:YG110:800:Y75p@)N0MP1:N$(N)"'s score is "(P(0,N))" point"("s.",1(P(0,N)1)),139,3014N,2,CS,2:VpJ)MP2į"Thanks for playing",140,Y10,2,CS,2:"t300Hn(9500:550_n<(PMP1TP410505nF(9005:N13:(P(N,2)NA)110310::N((P$,1)):P(N,0)N1:P(N,1)N2:P(N,2)NAn(PT0į"Press RETURN to continue.",140,160,2,CS,2:250:10505=o(NM$", you did not earn any",14,160,2,CS,0:"points.",,1P(N,0):N2P(N,1):N1$(N1):N2$(N2):NAN1N2:NA$(NA):ND(N1$):NM(N2$)m'N1NM:N(NMN1,1)((N2$,N,1))::N1ND:N(NDN1,0)((N1$,N,1)):m ( WORK 9n (11000:P(0,P)P(0,P)PT:250:P(0,P)P(0,P)PT:PT0P(7,P)P(7,P)(P(7,P)1):9500:10l'"choose a problem.",34,Y6VS:"Then press RETURN.",,Y6VS2:KC,0l'6:9650l'200:KY010150:KY1310190:4:9650l'KY77KY10N1N(N3):10140m'KY73KY11NN13(N2):10140m'10140/m'P$P$(P$,N,1):N((P$,1))m'N1$,1,N1)(P$,N1)(P$,N,1):hk~'9600:9700:N1|k' CHOOSE PROB k'YYN94:NM$N$(P):NM$", use the",34,Y,2,CS,0:XPP(224)10:"keys to",XP12:"I",XP2,Y8:"M",XP3,Y106l'7:XP,YXP,Y8:X12:XPX,YXXPX,YX:XPX,Y8XXPX,Y8X:)0:P(0,1)0:P(7,0)1:P(7,1)1_j'P13j$'9005:P1āN1P1:(P(N,2)NA)110020:j.'P(P,0)N1:P(P,1)N2:P(P,2)NA:j3'9500k8'"Press RETURN to start the game.",140,160,2,CS,2:ESC1:250:ESC2kt'P0MP1Tky'P$"123":Y13:NR(3):P$(PII,6)" key to erase.",18,170,2,CS,0i'IIĒ7:120,17498,174101,171:98,174101,177i '6:12,15313(RS0)264,(226)264,18012,18012,15313(RS0):j 'RSOP2į"Press the SPACE BAR to regroup.",18,157,2,CS,0:j ''j' MAIN Tj'TP1:P(0,0(B(N)):5100h&NP(7,P)įZ$,BX44((BL1)3)4BL8(Z$),BY12N4,8,CS,5h &NP(7,P)įBXBW2,BY12N3,9,BWBW4,170h&h>&h' D i'9994:RSOP3į"Press D to change estimates.",18,157,2,CS,0Zi'"Press the "("DELETE ",162,YN12N1XN4XL2,(226)P(224),(226)12XN4XL2,(226)P(224),(226)12:g%BX200:BYYN:BW46g%"Answers",BX,BY,2,CS,2'h%7:NBY74:BXBW,NBXBW,BY12BXBW,BY12BXBW,NBXBW1,NP(224),BY12:BXBW1,BY12P(224),NCh%N15:Z$L((BA)):P(7,P)2ıf%N1P(7,P):NBN9649:X((P$,R(3),1)):X((P(X,2)))f%NAR((("89999999",X)))(("10000000",X)):Y13:NAP(((P$,Y,1)),2)9642::N1āY1N1:NAB(Y)9642:!g%B(N)NA:((NA))BLBL((NA)))g%:g%XN4XL30:"Problems",XN,YN,2,CS,2e%BPR(3):N13:X((P$,N,1)):N1$(P(X,0)):(N1$)3N1$(N1$,(N1$)3)","(N1$,3)f%(P(X,1))" * "N1$,XN4XL4,YN12N4,8,CS,5:NBPBN$(P(X,1))" * "N1$Lf%:BNR(P(7,P)):BAP(((P$,BP,1)),2):B(BN)BA:Bq%T$((P(0,I)10),0),XM129I,12,2,CS,2:T$((P(0,I)10),1),,24~dv%d% PROBLEMS d%XL0:N13:X((P$,N,1)):Z((P(X,0))):ZZ((Z1)3)((P(X,1)))d%XLZXLZd%:XLXL3Re%100:"Bonus points: "(2P(7,P)),140,14,2,CS,2:XN80:YN29I,,8,,5c]%7:XM61129I,YM3P(224),YM10P(224)120,YM10P(224),YM3cb%(1),XM129I,YM20,0,CO,2:(2):P(0,I)0įXM4129I,YM20P(0,I),P(0,I),9,17043Icg%P(0,I)10ı3dl%7:N10P(0,I)10:XM4129I,YM20NP(224)9,(226):xd27X2,YS27:b#X0(NA$)SS4(((NA$)1)3):X1X0SS(NA$)SS((NA$)(N1$))4(((NA$)1)3):X2X0SS2:b% GAME b%100:YM140:XM7564(MP2)b:%I0MP1:9560:bN%@cX%N$(I)":",XM56129I,YM,2,CS,0:("00"(P(0,I)),3),XM361D)9005:Xa# DISPLAY PROBLEMS a#(N1$,3),XSSS((N1$,3)),YS,SS,CN,6:(N1$)3į(N1$,(N1$)3),XSSS(N1$)4:",",XS3.6SSa#"*",XSSSSS(N1$),YS14:N2$,XSSS(N2$)Cb#7:X2XSSS24:X1X212SS(NA$)SS((NA$)(N1$)):X1,YSP4(RD2(RD4NND))N2Z9ZZ1:9040`U#PP4RD3N2Z10(N1RC0R(2)1)ZZ1:9045`Z#RCRC(ZN19):N1N110Z:N(N,0)Z:`_#N1O1N2O29005:O1N1:O2N2?ad#N1$(N1):N2$(N2):NAN1N2:NA$(NA):(PP4RD4(NA$)ND)(PP4RD5(NA$)NRD4NDR(2)2[_7#PP5NDR(3)2_<#N20:NZR(2):NNM11:ZR(9):NNZPP6RD2Z0_A#N2N210Z:N(N,1)Z::PP5RD1N2N(NM,1)10:N(1,1)0_F#PP4RD2N2R(8)(RD3):N(NM,1)N2/`K#N10:RC0:NND11:Z0:NNDPP4RD1ZR(9)_`P#P1āI01:N$(I)"":N1(80020I):N$(I)N$(I)((800N20I))::^J^'# GENERATOR ^-#NMPP3:PP3NM1:ND1:N2R(10)1:N1R(104(RD1)6(RD2))16(RD2):N(NM,1)N2:N(ND,0)N1:9055F_2#NDR(2)1:RD1ND2:RD3(PP4)ND3(RD4PP5):$"23232523252728":DR$"3122228":]KEY$"23272825182223":DR$"2222228":]KEY$"23252723181823":DR$"3122224":]KEY$"35353030233523":DR$"2222222":^KEY$"232730272825301823":DR$"312222228":^? GET NAME z^@MP(PARM6):N$(0)NM$:MP,(Z$)3)","(Z$,3):(Z$)7Z$(Z$,(Z$)7)","(Z$,7)w\\W MUSIC \XMUSICĹ765,32:766,DR:767,PI:3840:\Z\]Z7050,7052,7054,7056,7060\bZ1(DR$):DR((DR$,Z,1))10]lPI((KEY$,Z21,2)).]v7000:N12DR:::X]KEY%)XP:Y%(C%)YP:MIN0:MAX9[& RC1:FWFK:400:XPX%(C%):YPY%(C%):OP$""ı[: A$A$"-"OP$:B$B$"-"OP$:C%C%1:[ COMMA [XC(NA$)4ı[YYP:X1XSSS3.6:X2X1SS3.25\",",X1,Y,0,CN,5:(NA$)6į",",X2!\q\(Z$)3Z$(Z$Y48KY57)1040jZ.KY13įOP$:KYFK1000:1025xZ8NN$OP$:Z GET# Z X%(C%)XP:Y%(C%)YPZ FWFK(C%0):1000:KY32ı [ KYFWC%C%1:A$(A$,1,(A$)1):B$(B$,1,(A$)):XPX%(C%):YPY%(C%):-[ A$A$(A):B$B$OP$:C%C%1:Q[ X%(C2:95HY*JJ9:95]Y NUMBER INPUT YXP5,YP,11,11,128:CC$"@":CC$,XP,YP,0,CN,5:FF0YJJ5:95:(KY32RC0)KYFW(KY48KY57)1000YKY32KYFWıZNN$(KY):OP$NN$:NN$:FRıZ"#",XP,YP,0,CN,5:FF0FZ95:KY13KYFK(K1),X8I,YM,0((KK)(KK)),CS,5:II1:I1((Z),I,1)((J),I,1)560X2PT1570X57:Z082:XM4129PZ,YN:Y7I(P(0,P)PTN)10:I(I)įT$(I1,0),XM129P,12,2,CS,2:T$(I,0):T$(I1,1),,24:T$(I,1)Y:ZJ::-Y SMILEY ;Y JJ15LW+ INPUT CURSOR YW,JJ4:95gW1JJ11:95vW CHOICE WJJ6:95WJJ7.5:95W% SCORE W&PT0ıW+XXM20129P:YYM20P(0,P):Z1000P(0,P):P(0,P)P(0,P)PTX-N1(PT):JZ1:I4:PT0āI1100::I4~X0((Z),I,1)((J),I,@VZ10000`V_1032048:95:1032050:uVc CLEAR SCREEN VdJJ1:95VX8:YTY2VRC0:X,Y,184Y,271X,128:V GET KY VJJ2:95V218V:217V63000WESC110550:Z$"MENUS":20000*W WAIT FOR RETURN 7WJJ3:9*CU63000VU M.G.DIGITS |UN(5,4),R(5),X%(50),Y%(50),P(7,2)U2:60000U<OP(PARM):PP(PARM1)2:RD(PARM2)UFPT%10:8000/VPT$(8,1):MAX:T$(0,0)" ":T$(0,1)" ":N18:T$(N,0),T$(N,1):N3N5ćT$(N(OP3),0),T$(N(OP3),1)5VR             SS4(V3V6):{.,(NA$)3NMNM(N(1,1)0):FYYY30:5010{:8700{ N100:"Please wait...",140,86,2,CS,2{*N1032050:(4)"RUN"Z$ |`JJ0:95|:2067J2050:(4)"RUN"Z$y`JJ0:95y:2067CJ2,CS,2v*N1032050:(4)"RUN"Z$Sz,YPYY:XPXX:S0:ZP$"":U1NM:N(U,1)0Ăz,Z$(N(U,1)N1)("00",1,U1):5100&{,ZP$ZP$" + "Z$::Z$NA$:5100:ZK$Z$:ZP$(ZP$,4):TX1344(ZP$Z$):PP5TX20:FYFYVSY{,P1:JH3:V1(NA$):A((NA$,(NA$)V1,1))c{,3020~{$,XPXP20:11210y+XPXT:YPYT:11125y+RC(RC1)(RC1):y+TYFY:180:VU1(NA$)āVVU1(NA$):N(V,M)1:y+NU0YYYY15:MM2z+RG$"":/z+FYYY26:TYFY:YB185:180:M511310;z+ ADD oz+FYYY30:7:X1,YY2X2,(226):YYYY2:XXXSS4(V3):YPYS1010R(V):R(V)R(V)1x+HXXP:HYYP:400:A(OP$)ĴTR011220:TR0:TYFY:180:VV1:4:3110:3100:VV1:11220y+TR1İ2030:11210fy+TRTR1:TR1VV1:6:3110:3100:VV1:TYFY:"Hint:",TX,TY,2,CS,0:TYTYVS:2000:11210wy+20NV10)10:NV(NV10):N(VU1,M1)NV:N(VU1,M)Aw+JH1:3020:KY3211190w+XPXPSS4(VU4VU7):RC2(NV0VND):M3M0:11225x+ REGROUP ^x+XTXP:YTYP:M2N(V1,0):AM0:M0M3:NVA:RC0:RG$(RG$,(RG$)1):3050:RG$RG$" "x+XPXSSSV0:FY116:XPXPSS:UU1:VU:H$"Multiply by "D$(U1)"s ("(N(U,1))" * "(N(1,0))").":H$,140,FYVS,2,CS,2:11075vo+ * 8wp+NV0:RG$"":V1((NU)):VND11130:RG$RG$(" "(NV),1(NV),1)bwu+M1N(U,1):M2N(V,0):M0NV:NVM1M2NVwz+ANV(1N(U,1):NM2įXSSS(ND2),YS10,7,SS(ND2),128:A1ND:R(A)0:uQ+ ZERO uR+M10:M2N1:M00:A0:UV11115:VVU1:N(V,M)0:N(V,M1)0(v\+FY112:JH2:TX40:3020:FY116:TXX17vf+XPXPSS:vk+N(U,1)1VU:N(V,M)0:N(V,M1)0:JH1:FY115:302oduct.",140,PY,2,CS,2t +YSPY304(NM1)10(NM3):SS18:9140:XS11030(NM1)X0:9110u+XGI(X1)50:YGYS8(NM1(NM2RD1)):800:9990 u)+ MULT 4u*+YYYS33:XXXSSS:V1ND:R(V)0:Pu4+M2:U1NM:XPXX:YPYYeu>+V1:FY116:TXX1uC+NUNA:s'ESC1:8300s)8800:OP(OP$):OP10800:OP4ĹPARM7,0:220s")Z$"M.L.DIGITS":OP3Z$"I.GAME"s,)20000t0*8500:MP(ZA$):PARM6,MP:t* SETUP Ft*NMPP3:9000:100:MIN0:MAX9:C10:C20:TI0t+PY168(NM1):NM$", find the pr(NA$)SS((NA$)(N1$))4(((NA$)1)3):X2X0SS2:r'YB170:PP4RD2ır'"Press the SPACE BAR to regroup.",138,YB4,2,CS,2's'6:12,YB264,YB264,YB1412,YB1412,YB:4s' MAIN qs'ESC2:PR0:TP1MP:PRPR1:M%(TP)1:11000:M%(TP)T(N1$,3)),YS,SS,CN,6:(N1$)3į(N1$,(N1$)3),XSSS(N1$)4:",",XS3.6SSq#"*",XSSSSS(N1$),YS15:N2$,XSSS(N2$)Ar#7:X2XSSS24:X1X212SS(NA$)SS((NA$)(N1$)):X1,YS29X2,YS29:r#X0(NA$)SS4(((NA$)1)3):X1X0SSz#  ĮЮӠ!ĮǮӠ3ͮȠɮР Ԡ ̮ͮŠ ͮЮԠ"ͮЮӠͮǮӠ, Į̮Ԡ Į̮Ӡ$ ĮЮԠ ЮӠǮӠ  Π ɮŠ ɮŠ ̮ͮԠ ̮ͮӠ  РӮ֠®Ԡî  ®ӠӠ ϠӱӮ͠ ӮŮҠӮ̮ҠӮʠӮ̠p#q2Jbz  ΢ L? L  , g RPQ`8` eȱe ȱ ` > HhJ  >  ``  ̛   m m8 ΁` > ʎ > )  ,  8  i 0)J , p e iJJJ e悩 ̖  (JQ&) & ୒ ᭓ ⭞ Qo o I $ ̛ ` m & }  Nn8L @ L +L 8 Π `@ ̛ ` N 8 m  ʀt ʎr K, {ݠ ȱ ȱ      Lr ) J jJJ0 8* 䭔  P0)J 8~P(=Q&]Q& ~ `  ɣ `  `LX L ɹ  PȱP`ɾL ,ɛ@`@ @ ,H @h𻩛ɽ4   ~&'&ȥ&( `ɔ t r 'ɕ r t ɍ 2ɺ "Please wait...",140,86,2,CS,2H*N780,0:N09:PARMN,0::D$"RUN"Z$U`JJ0:95a:2067V"TRUCTION" N100:"Please wait...",140,86,2,CS,2*N780,0:N09:PARMN,0::D$"RUN"Z$`JJ0:95:2067V0,86,2,CS,2e*N780,0:N09:P0:YG40:8008 "Hi! My name is Hooter.",16,20,2,CS,0 Z$"MENUS":Y110:"Do you want to see instructions?",,Y:YPYVS1.5:"Press Y for yes or N for no.",,YP:XPP(224)14:KC,0 300:NN$"Y"NN$"N"2040:NN$"Y"Z$"INSTRUCTION" N100:reserved.",140,Y28:"Developed with EduSystems.",,Y42X (780)0āD14000::2000r D$"BLOAD BS.NUM,A"CN D$"BLOAD BS.OBJ,A"CO D$"BLOAD DB.COMMA" D$"BLOAD DB.INPUT" D$"BLOAD DBFLIP" D$"BRUN MEM.SWITCH" 100:ME%1:XG14)22:X1X,YGD20:X2X,YGD20: VZ$"Multiplication and Division ":Y(Z$)2:N1Y:(Z$,YN1,N),139,26,2,CL,2:(Z$,Y1,N),141,,,,1:X040::8 `Y120:"Copyright "(1)" 1987",139,Y,2,CS,2:"Silver Burdett Company",,Y14:"All rights 0,1910,0:16302,0:16304,(16297)@ .YG50:XG140:S2:800P BD11000: LARM11:810:D10:7:YYG24YGD1:XG35,Y:X160:::X21462:X80X2XG35X:X2,YGD NX1XG35X:X1,YGD:# QYYGD1YGD201:X1,Y:X2,Y::X0(X2X1 D$"BLOAD PAC.SB"6 D$"BLOAD BS.SMALL.CHAR,A"CSh ::4:16384:"Silver Burdett",0,48,2,CS,0 16302,(16297):16304,(16300) D$"BLOAD BS.OWL,A"CI D$"BLOAD BS.LARGE.CHAR,A"CL D$"BLOAD MUS.MOV"& $4:2:0,0278,0278,191c 63000% HELLO 09/06/85 :(4)"MAXFILES1"E60000OZ1000o_1032048:95:1032050:c CLEAR SCREEN dJJ1:95 GET KY ,JJ4:95 SMILEY  JJ12:95*JJ9:95 MAIN D$(4):(780)01060        P Ү VWWWWWWV^\u?UUU3333337kcc333333333>33>003>063333>333 cck63 3333>0? ?݌8`ccc`8 ?0 ?00& >030@0`00`3@3>cwkccc0>3>333>>00>333>3?>6>33>0   30 UUUUUUU 33?3333333333333???>;33>333?33300000333?cwkccccgo{sc333333333336333303? 33333333333 ccckwc33 3333 UUUUU@@@@@@@@@UUU    3 3 ? ? ? 3333330?3003333300?003<33?0 333333>0 ,PU^gow} )2;DMV_hqz ' %-5=FOW_hpxf~cccc~``> ?ccccc  `````````c> c33c w?ccccc>cccc>?cccc?~cccc~```?c>>``> f<ccccc~f<fc66cccccc~``?`0   ~ c33c    ~~  ~s 3c ~~~  ~ f<  f<`~cc~ ?cccc?>cc> ```~cccc~>cc~ <   ?8888888    ୒ h)hh` " `a{`.. . i i LlA[ iй, .ڨױ,ј8Д. .,.00 .: L 01,/N1@  )8 i୒ iL /  @001/I/PH,/ 2 .-9    ʎ- .-0 9 ,   `Rʊȱ . .).ΐ ,Ό 8    ፒ Ll,-0Y ; /+ȍ ) H8hĝȐ&H'H&' s&'h'h& sƛЊ,&'婀&ĝȐ s0ƛ``,L , , g RPQ`8`H z{ | } ~   v 8v,08|ʊimzm{0im~m}i 􄝥&'8z{},0im~ ,0~e,ȱ&& FjJ& ȱ&*L;0`LL0`L3L9 $JF8ȹe8АL|`Lø~wwppjjdd__YYTTOPKKGFBC??;<885522//,-**'(%%##!!  M > M 8   g) )PiJJJʩQ*~Q*0ȄQQPj弄 Ƅи` , , g RPQ`8` e腁ȱe酂ȱ`e`  D~{PD*@@@%*@@D@@D@D@+@>a@^a0@_!i@@@n@{@ @:@pv;p6;P6;P@@ D 4DDPUA8~w(?88~w((?  `P"####"P0 &@@@@@@D@DD@DDDDDDtwDDAtwDDAtwDDDtwDDt7DDpD@@@U@A@<585zgggggeh @@ @     G,Z(1Fc~ '<@@DDD@D@@?@>p@%!@%@O@O@?@?@N@ľawD?awwDAwD@AwwDAwwDAwwDAvwDDAtwDDAP$)und(10440n( 1 n(ME2:1000:100n("One-Digit Factor Menu",140,16,2,CL,2n(HS20:HY50:VS15:1100n(390:RD(OP$)o(ESC3:1300:AC(OP$):ESC4:19000o) 2 3o)ME3:1000:100_o)"Two-Digit Factor Menu",140,16,2,CL,2{o)HSPP10300,10400,10500,10600,10700m<(100:"Basic Facts Menu",140,24,2,CL,2:MAX3:HS40:HY66:VS16:"Multiplying",HS,HYVS,2,CS,0jnP(V1MAX:(V),HS3,HY,2,CS,2:"Using "("0 - 56 - 90 - 9",5V4,5)" as a factor",HS23,,,,0:HYHYVS::385:RD(O:MAXl'HS30:HY40:VS16:1110l'390:OP(OP$)l'ESC1:OP10184,10200,11200,30010,61000l'Z$"INSTRUCTION":20000l' * m'ME1:1000:100,m'"Multiplication Menu",140,20,2,CL,2Hm'HS44:HY56:VS16:1100[m'390:PP(OP$)m(ESC2:16k(V1MAX:(V),HS3,HY,2,CS,2:" "("Lesson PracticeGame",8V7,8),,,,,0:HYHYVS::385k3! NAME k4!ARM11:810%l>!XPXG50:YPYG24:" ",XP,YP,,CS:16385,0:5632,780:2l' MAIN Flt'ME0:100:ESC0ml~'"Main Menu",140,20,2,CL,2:L"Multiplying",HS,HYVS,2,CS,0jVV1MAX:(V),HS3,HY,2,CS,2:T$j`(T$,1)"-"į(T$,(T$)1),HS21,HY,,,0:HYHY10:T$:1120kjT$,HS21,HY,,,0:HYHYVS::HYHYVS4:)k M4 jk100:"Activity Menu",140,24,2,CL,2:MAX3:HS46:HY50:VS KY xiJJ2:95iESC10100,10160,10240,10440,11240,11440:10100i+ GET CHAR i,JJ4:95i{ CHOICE iJJ6:95iJJ10:95j Y/N jJJ8:95j SMILEY *j JJ12:957j*JJ9:95=jdjN01:T$:N(T$)MENUS::MAX:jth63000h MENUS h2:60000h<OP(PARM):PP(PARM1):RD(PARM2):AC(PARM3):GM(PARM4)hFESC(PARM7)hZESC0220:10100i_1032048:95:1032050:-ic CLEAR SCRN :idJJ1:95\iX,Y,W,260X20(HC0)128:ki GET     8L) i i L),N@ @   #  LQ @ 8 m  i,LQ #- @HL  @0IPH,  ୒ @-h)hh``   ,   `Pʊ8, _8  zL) 8 L1,ט,0 _00 : ЫH zhȍ 1 m i     UUPUAED@AEA *(* *("݂ *(* *("""    * *(*"UTP@AEA@AE" "**(*" UTP@DDD  ] wvtwwtTUUT@UTDDDȱ奝&A 柈ͳA(&'8AͲA ̯A,Aƞзi悰Ơ0 A&'LAA,A0 ȥ8AA` , , g RPQ`8`@A(@(   ;:8 @ AAA AAA AA AA AA AAAAA*AȭAJHAhJAȱAȱAAȭAȭAȭAȭAi悭AA A&&',A00&ŝ5ƞȥi悤&      turn off the computer",,YVS:"OR",129,YVSVS:"press RETURN to restart",40,YVS3:"the program.",,YVS4}f200:KY1361030:Z$"HELLO":20000 ~:20670~0|VS16:Y30:H24:"Do you want sound?"H,Y,2,CS,0:YYVS|500:PARM5,ZA$"Y":|H100:ME%1:YG45:800=}RY14:VS16:"Thank you for using",40,Y,2,CS,0:"Multiplication and Division.",,YVS:YYVS6}\"You may remove the disk",,Y:"andnt estimates,Two-digit quotients,Three-digit quotients,Zeros in the quotient{`JJ0:95{(780)0ı{100:XG80:YG70:800D|VS16:Y30:"Please enter your first name."24,Y,2,CS,0:"Then press RETURN.",YVSN|8500h|100:ME%1:YG90:80,two-digit quotients,"Three-digit dividend,-",three-digit quotients,"Three-digit dividends, two--",or three-digit quotients,Two- or three-digit-,quotients with zeros,Mixed exercises{Ã-8,6,Dividing by a multiple of 10,One-digit quotients,Changing quotieur-, or five-digit-",number with zeros in a factoryÃ-5,3,By a one-digit factor,By a two-digit factor,By a three-digit factor1zÃ-6,3,Using basic facts,By a one-digit divisor,By a two-digit divisor{Ã-7,6,One-digit quotients,"Two-digit dividends,-"ber with-,regrouping,A three-digit number,A three- or four-digit number&yxÃ-3,4,A two- or three-digit number-,by a multiple of 10,A two-digit number,A three-digit number,A four-digit numberyÃ-4,2,"A three-, four-, or five-digit-",number,"A three-, foltiplication,Division,Enter skill activity number,QuitxdÃ-1,5,Using basic facts,By a one-digit factor,By a two-digit factor,By a three-digit factor,Using estimationxnÃ-2,5,A multiple of 10 or 100,A two-digit number without-,regrouping,A two-digit numuPP1(X18)(X33)(X45)(X51)4(X54)(X63)(X81)vuXX79(X18)15(X33)12(X45)9(X54)9(X63)18(X81):RD(X3)Pwu19000:34,140,8,100,128:(OP)" "(PP)" "(RD)" "(AC)" "(GM),34,140,2,CS,0:30080wPÃ5,Instructions,Mu$"9"30050uvuOP$OP$NN$:NN$:XPXP8uu300:NN$(FK)OP$(OP$,1):XPXP8:30050vuNN$"0"NN$"9"XPXP8:(OP$,1),XP:OP$(OP$,1):30070 vuNN$(13)30080:X(OP$)dvuACX((X1)3)3:OP2(X54):X51X55RDAC:PP5:AC1:30140vSKILL t:u100:ME%1:YG80:800tDuVS16:Y30:"Enter the skill activity number."24,Y,2,CS,0:"Then press RETURN.",YVS:YPYVS:XPP(224)21uNu300:NN$"1"NN$"9"300304uXuOP$NN$:OP$:XPXP8Wubu300:NN$(FK)XPXP8:30030ruluNN$"0"NN(AC2),10):20000s=JZ$"L.BASFACT":PP2(RD1OP2)Z$"L.DIGITS":PP4Z$"L.ESTIMATE"sBJZ$("M.D.",2OP3,2)Z$ t N100:"Please wait...",140,86,2,CS,2Nt*NPARM,OP:PARM1,PP:PARM2,RD:PARM3,AC:PARM4,GM:PARM7,ESC_tHN(4)"RUN"Z$mt0u 40,12,2,CL,2r,HS34:HY30:VS14:1110r,390:RD(OP$)r,ESC5:1300:AC(OP$):ESC6:19000r,ME8:1000:100 s,"Two-Digit Divisor Menu",140,16,2,CL,2&s-HS28:HY40:VS16:1110@s -390:RD(OP$):11440ys8JAC1Z$("P.ROUTINESI.GAME",110",140,24,2,CL,2:MAX3:HS52:HY66:VS16:"Dividing",HS,HYVS,2,CS,0'r.,V1MAX:(V),HS3,HY,2,CS,2:"Using divisors "("|1 - 56 - 9||1 - 9",6V5,6),HS23,,,,0:HYHYVS::385:RD(OP$)2r8,11440Fr,ME7:1000:100sr,"One-Digit Divisor Menu",1Y54:VS16:1100p)390:RD(OP$):AC1:ESC3:19000p+ / p+ME6:1000:100p+"Division Menu",140,20,2,CL,2q+HS50:HY56:VS16:"Dividing",HS,HYVS,2,CS,0:1110*q+390:PP(OP$)Jq+ESC2:PP11300,11400,11500q$,100:"Basic Facts Menu24:HY54:VS16:1100o")390:RD(OP$):10440og) 3 oh)ME4:1000:100or)"Three-Digit Factor Menu",140,16,2,CL,2o|)HS20:HY54:VS16:1100p)390:RD(OP$):10440!p) 4 5p)ME5:1000:100[p)"Estimation Menu",140,16,2,CL,2wp)HS46:HY3:XB,YBXBSBMP2,YBP(224),YB10XB,YB10XB,YB:N0MP:XBSBN2,YBP(224),YB10:P(224)1,YBP(224),YB10::Y2:YYB9YB98I1:XBSB(N1)21,YXBSBN22,Y:X150:::bZ XXBSB(N1)2SB:X,YB3X3,YB6X3,YB6:X,YB367,PI:3840:IXZZX]Z7050,7052~XbZ1(DR$):DR((DR$,Z,1))10XlPI((KEY$,Z21,2))Xv7000::XKEY$"20242732":DR$"1114":XKEY$"202427":DR$"112":X SCORE BOX 5YSB(126MP):XB140SBMP:YB165:XB2,YB,11,2SBMP4,08L,Y2P(224),Y8P(224)48L,Y8P(224),Y2:wW ENTER WTX,TY2,11,250TX,128:150:L(Z$):"Enter ",TX,TY,2,CS,0:S1I(P(224)):1820:Z$,S13(L1),,8,,5:255: Xj XX0((KK)(KK)(KK)):XW MUSIC CXXMUSICĹ765,32:766,DR:70200:Z$"MENUS":20000YVJJ3:95fV,JJ4:95tV1JJ11:95VJJ6:95V JJ12:95V*JJ9:95V4810:ZZ1:(Z$,Z),TX,TY,2,CS,1:N0((KK)(KK))120::810V BOX WYTY:L1į"#",I(S1)3,,,,6:iW&6:XI(S1):X2,Y2P(224)48 CU63000VU P.ROUTINES U 2050103:2052175:103175:(103)(104)2561,0:(4)"RUN I.PRACTICE"U_1032048:95:1032050:V`JP8100,8150,8200,8300,8500,8600,8700,7005,8800,2030VdJJ1:95)VX,Y,YBY,273X,128:LVESC11     0)0NM$"":N1(780):NM$NM$((780N)):mxyx:20670Ew_ VAR w`PM4096:CL4608:CS6912:CN17408:CI18176:CO19220:CM6400:CP6200weR(X)((1)X)1wfP(X)(X)256(X1)wgI(X)(X2)2xtPA768:MU(PA5):KS16384:KC16368:KK16336:MUKKKK0x~II(64802)0:FK127119IIgx(78,9,CI,2:vDARM13į(ARM1)XG1,YG,0,CI,2:(ARM)XG13,,,,0:(ARM1):vH((ARM)),XG6(ARM4)11(ARM4)9(ARM10)11(ARM15)19(ARM16),YG,0,CI,0:9wRCP,ARM,CI:CP,ARM1:(ARM)(XG)12,YG,0,CI,1:(ARM1):CP,ARM,CI:CP,ARM1:(13)520:Su SMILEY pu XGI(XG):XG0ČCP,1,CIu%(1)(XG),YG,0,CI,5:XG0ČCP,1,CIu&u*XG0850u>ARM11į(ARM)XG13,YG,0,CI,0:(ARM1):v@ARM2į(ARM)(ARM1)XG1,YG,8,CI,2:CvBARM7į(ARM)(ARM1)(ARM2)XG,YGN$(FK)400:410Wt Y/N t"Press Y for yes or N for no.",Y:YPYVS:"Then press RETURN.",YP:XPP(224)20:KC,0t300:NN$"Y"NN$"N"510:ZA$NN$:ZA$.uCC$"#":305:NN$(FK)510:NN$"Y"NN$"N"įZA$:ZA$NN$:ZA$:520DuNN$P(224)20:KC,0:ME%1(ME%0)lsXPHX:YPHY:300sRC0JJ(JJ)(NN$(13)NN$(FK))OP$"":sNN$(MIN)NN$(MAX)400sNN$,XP,YP,0,CS,5:OP$NN$sCC$"#":305:NN$(13)ıKtNN$(FK)(NN$(MIN)NN$(MAX))420:XP3,,8,8,128:NC$XP,YP,0,CS,5:FF0:FC15r6200:KY0FC(FC1)(FC5040FF):FC5040FF310:FFFF0::310r@FC0:FFįrONN$(KY):r{ CHOICE rHYHYVS1.5Ws"Enter a number (|"(MIN)"||-||"(MAX)"|).",HS,HYVS:"Then press RETURN.",,HY:HX0Oq1032050:220^q RETURN q255:"RETURN",2718(HC0),1805(HC0),2,CS,1:FC80:FF0:KC,0q200:KY13FCFC1:FC5035FFKY0260:FC0:FFFF0::260qFC0:FFįq r+ GET 2r,XPI(XP):XP3,YP,7,8128:CC$"@"Tr1C16304,(16297)epnHCR(4):HC2HCHC2ypxX(HC2)HC2pHC:Y02:XY,YX276Y,YX276Y,191YXY,191YXY,Y::p KY p16385,ME%0::16385,1:KY(KS)128qKY27ESCıqFC0:ESC1FFį$q217/q:216;q6300@ Go63000Xo ROUTINES mo(4)"BRUNDBS16"o 780,0:2048103:2050175:103175:(103)(104)2561,0:(4)"RUN HELLO"o_JJ100,200,250,300,310,385,400,500,810,390,305,800:60000 pc CLEAR JpdME%0:MIN1:XG140:VS14:4:16302,0:120,17498,174101,171:98,174101,177Qc '6:12,15313(RS0)264,(226)264,18012,18012,15313(RS0):ch)10680:"Game",8,168,2,CL,0:"Over",266,,,,1:X8922:PM,X,38,168,9,2,0(KK),128:PM,236X,40,168,9,2,0(KK),128:dr)0,0,150,279,12((800N20I))::aJb b%b' D Rb'RSOP2į"Press the SPACE BAR to regroup.",18,157,2,CS,0b'RSOP3į"Press D to change estimates.",18,157,2,CS,0b '"Press the "("DELETE ",16II,6)" key to erase.",18,170,2,CS,0 c 'IIĒ7:00::&aKEY$"20222420222425222725242220":DR$"1111111111114":VaKEY$"202732272524222420":DR$"312211114":aKEY$"2729272427293132":DR$"22242426":a? GET NAME a@MP(PARM6):N$(0)NM$:MP1āI01:N$(I)"":N1(80020I):N$(I)N$(I)(KK)(KK)),CS,5:I2II1:((Z),I,1)((J),I,1)560)`:ZJ::7` JJ18:95D`*JJ9:95R`W MUSIC }`XMUSICĹ765,32:766,DR:767,PI:3840:`Z`]Z7050,7052,7056`bZ1(DR$):DR((DR$,Z,1))10`lPI((KEY$,Z21,2))`vPI070,Y,192Y,280X,128:_JJ2:95&_1032050:Z$"MENUS":200003_JJ3:95@_,JJ4:95N_1JJ11:95]_JJ7.5:95k_% SCORE w_&PT0ı_+X89140P%:Z1000P%(P%):P%(P%)P%(P%)PT:N1PT:JZ1:I4`0((Z),I,1)((J),I,1),X8I,YN,0(d](4)"RUN I.GAME"^ G.ROUTINES [^ 2050103:2052175:103175:(103)(104)2561,0:(4)"RUN I.GAME"{^_1032048:95:1032050:^aJG550,7005,8000,8100,9500,9990:10600^dJJ1:95^X,Y,187Y,273X,128:^X0:YYN20:X sson,Go to the game,Return to the Main Menumb:2067LT$:" "T$,,,,,0:HYHYVS::385oa'1032052:10200a N100:"Please wait...",140,86,2,CS,2a*N(4)"RUN"Z$ bPÃVery good,Wonderful,Super,Great,Good,That's right,Good work,Nice work,Right,Ok,Correct,FineabZÃ4,Try the practice again,Go to the leS,2:250u`"800:XG32:YG98:800:150:Z$,138,TY,2,CS,2:255`8"NTP:I1TA2:8150:ARM6TA:810:ZTA1:7005:810:250 a`":V112:T$::100:MAX:HS24:HY50:VS16:"What do you want to do?",HS,24,2,CS,0Yaj"MIN1:V1MAX:(V),HS3,HY,2,CS,2:<_f!__!8100:PRPR(M%(PR)0):PR1ı_!XXB1:N1PR:I1M%(N)2:X,YB98I,8I1,SB22,85(I0):XXSBSB::`!8600:PRPR1:TA(C10)(C2C1TI):M%(TP)TA:NTP:7:8200::N14TAR(4):Z$::Z$Z$".">`"TY140:TA1ĩ150:Z$,138,TY,2,C"Enter 3, 6, or 9.",,YVS2.5:YPYVS3.5:"Then press RETURN.",,YP:XPP(224)21:KC,0^H!300:NN$"3"NN$"6"NN$"9"8520:ZA$NN$:ZA$,XP^R!CC$"#":305:NN$(FK)85206_\!NN$(13)ĴNN$"3"NN$"6"NN$"9"8530:ZA$:NN$:ZA$NN$:8530R(3)21,2)):YX(X16)8(X4):I15:ARMX:820:ARMY:820::250] !ARM5R(2)3:Z0:Z$"Wonderful.":TX99:TY130:I110:820::250]3! # PROBLEM ]4!100:YG100:800:Y30:H30^>!NM$", how many problems",H,Y,2,CS,0:"do you want?",,YVS:(TA)1:YPY16TA32:PX100,Y,8,20,128:(H%(TA)),PX120,Y,2,CS,1:2410\ X1200::4:8200:\ (PR),PX120,PY,2,CS,2:N02:(H%(N)),,PY3216N:] 810:H%(0).6MP250:H%(0)MP8460z]!Z0:Z$"Very good.":TX99:TY130:X(("160406",PYX3:"a lot of help:",,PYX4f[ X1999:[ TPSB:SB0:7:8200:X1500::ARM11:810:4:8200:SBTP[ PRPR(M%(PR)0):PR18430:TP1PR:7:NTP:8200[ TAM%(TP)!\ PX100,PY,8,24,128:(TP),PX120,PY,2,CS,1:2410\ TA0H%(TA)H%X3,YB6:X,YB2X,YB6:X1,YB5X1,YB5:pZk SCORE Zl 100:XG32:YG98:800:8600Zv PX80:"Score for "NM$,PX62,14,2,CS,2W[ PY32:X16:"Total problems:",PX10,PY,,,0:"Problems done with",,PYX:"no help:",PX,PYXX:"a little help:",,     TY40:VS16:"You are ready to use the",15,TY,2,CS,0:"program. Press RETURN to begin.",,TYVS:KC,0_D*N1100:200:KY13Ă:250_NZ$"MENUS"_ N100:"Please wait...",140,86,2,CS,2`HN(4)"RUN"Z$`_ VAR ``JJ0:95,`:2067V95 he ESC key to",24,TY,2,CS,0:"stop what you are doing.",,TYVS:9040:KC,0^|)ESC0:ME%1:240:ESC(780)0:ME%ESC0:KY27İ9040:150:9040:255:10620_)150:"Good. You found it.",24,150,2,CS,0:250_/* S6 1_0*100:ESC1:ME%1:YG85:800_:*0FC(FC1)(FC5040FF):FC5040FF10550:FFFF0::10550]@)FC0:FFį]E)KYFKį24,TYVS2,VS2,240,128:7:150:9020:255:10540]J)"5":810:150:"Good work.",24,150,2,CS,0:250^g) S5 ^h)100:YG83:800^r)TY30:"You can press t100:YG85:XG120:800\)7:TY20:"You can use the "("DELETE ",16II,6),24,TY,2,CS,0:9050:7:" key to",P(224):"erase.",24,TYVS:9020 ]")ARM11:810:XPXG50:YPYG24:"5",XP,YP,0,CS,5:CC$"#":KC,0)],)CC$XP,YP,0,CS,5:FF0t]6)200:KY9000:10340K[n(NN$m[x(CC$"#":305:NN$(13)10400[}(NN$(FK)10340[(NN$"1"NN$"9"İ9000:150:9000:10360[(OP$:OP$NN$:10350&\(810:9000:150:"Very good.",24,TY,2,CS,0:"You chose the number "OP$".",,TYVS:2501\) S4 L\):YG65:XG120:800ZF(TY30:"When you see a box like this,",24,TY,2,CS,0:"you need to enter something.",,TYVSZK(ARM11:810:XPXG50:YPYG24:"@",XP,YP,0,CS,5:KC,0[P(TY11500::TY135:150:9000A[d(300:OP$NN$:NN$"1"NN$"9"İ9000:150:YVS:9010:KC,0tY'240:KY13İ9010:150:9010:255:10120Y' S2 Y'100:XG190:YG120:800Z'TY40:VS16:"Good. When you see RETURN,",24,TY,2,CS,0:"press the RETURN key.",,TYVS:"Press RETURN now.",,TYVS2.5"Z'250-Z;( S3 HZ<(100XZ#IIēP(224)2,(226)4P(224)22,(226)P(224)3,(226)3:P(224)3,(226)3P(224)3,(226)3:4:P(224)21,(226)Xd#X' MAIN Xt'100:YG99:800FY~'TY40:VS16:"The RETURN key is on the right",14,TY,2,CS,0:"side of the keyboard.",,T255:|W2#"Find the RETURN key and press it.",14,TYVS2.5,2,CS,0:W<#"Press the "("DELETE ",16II,6),24,TYVS2.5,2,CS,0:9050WF#" key to erase",P(224):"this number.",24,TYVS3.5:4XP#"Press the ESC key now.",24,TYVS2.5,2,CS,0:0`V200:FCFC1:KY0FC80245:FC0:oV RETURN |VJJ3:95V+ GET CHAR V,JJ4:95V1JJ11:95V SMILEY V JJ12:95V*JJ9:95V'# MESSAGE &aH&BXBW4,BY12N2BXBW4,(226)P(224),(226)10BXBW4,(226)P(224),(226)10:a' MAIN a4:5050a:100:YG95:800Ib:Y30:H30:"Do you want instructions for",H,Y,2,CS,0:"the game4:BXBW,NBXBW,BY12BXBW,BY12BXBW,NBXBW1,NP(224),BY12:BXBW1,BY12P(224),N`%N15:Z$(B(N,0))(" R "(B(N,1))" ",14(B(N,1)0),4(BR0)(BR9)).a&NP(7,P)įZ$,BX44BL16(BR0)4(BR9)8(Z$),BY12N4,8,CS,6^a &N(NA))BLBL((NA))_%B(N,1)0:P(I,3)0B(N,1)R(P(I,1))1:B(N,1)BRBRB(N,1)_%:_%XN4XL2,YN12N1XN4XL2,(226)P(224),(226)12XN4XL2,(226)P(224),(226)12: `%BX200:BYYN:BW38(`%"Answers",BX,BY,2,CS,3`%7:NBY7,2)):X(T$)^%NAR((("899",X)))(("100",X)):Z$(NA):Y((T$,2,1)"0")2((T$,3,1)"0"):Y(Z$,2,1)"0"(Z$,3,1)"0"Z$(Z$,1,Y)"0"(Z$,Y2):NA(Z$)#_%Y13:NAP(((P$,Y,1)),2)9641::N1āY1N1:NAB(Y,0)9641:J_%B(N,0)NA:(]%Z$N1$" "("*/",OP1,1)" "(P(X,1)):Z$,XN4XL48(Z$),YN12N4,8,CS,5:NBPBN$Z$]%::BNR(P(7,P)):I((P$,BP,1)):BAP(I,2):BRP(I,3):B(BN,0)BA:B(BN,1)BR:BL((BA)):P(7,P)2ıB^%N1P(7,P):NBN9649:I((P$,R(3),1)):T$(P(I% PROBLEMS \%XL0:N13:X((P$,N,1)):Z((P(X,0))):ZZ((Z1)3)((P(X,1)))\%XLZXLZ\%:XLXL3\%100:XN80:YN30:"Problems",XN,YN,2,CS,26]%BPR(3):N13:X((P$,N,1)):N1$(P(X,0)):(N1$)3N1$(N1$,(N1$)3)","(N1$,3),YM3[b%(1),XM129I,YM20,0,CO,2:(2):P(0,I)0įXM4129I,YM20P(0,I),P(0,I),9,17043I[g%P(0,I)10ı[l%7:N10P(0,I)10:XM4129I,YM20NP(224)9,(226):-\q%T$((P(0,I)10),0),XM129I,12,2,CS,2:T$((P(0,I)10),1),,243\v%D\I will help you find the product.",140,TY,2,CS,2:250:180aH+H$,140,PY,2,CS,2:H$"Find the product.":H$a\+4000af+XPXSSS(NA$):YPYS33ap+M1N2:M2N1:ANA:2000az+ARM11:810b$,XPXP4((NA$)3):5:XBXP:L1150Mb),(NA$)3NA$(NA$$"P.ROUTINES":AC3Z$"I.GAME"a`,)20000o`* SETUP ~`*9000:100`+PY1010(PP1):H$"Here is the problem.":H$,140,PY,2,CS,2 a+YS458(N26)(N26N10PP2):SS14:XS14630(PP1):9110:FYYS80'a*+XGI(X1)50:YGYS8:800pa4+TY150:"000Y_$'PP2RD1PP3:11000:PP2j_) END MENU _)100::MAX:HS30:HY50:VS16:"What do you want to do?",HS,24,2,CS,0`)MIN1:V1MAX:(V),HS3,HY,2,CS,2:T$:" "T$,,,,,0:HYHYVS::3850`)AC(OP$):AC10000:AC4ĹPARM7,0:220V`")ZXSSSSS(N1$),YS15:N2$,XSSS(N2$)^#7:X2XSSS24:X1X212SS(NA$)SS((NA$)(N1$)):X1,YS29X2,YS29:^#X0(NA$)SS:X1X0SS(NA$)SS((NA$)(N1$)):X2X0SS2:^' MAIN 9_'11000:OFİ8500:PARM6,(ZA$):Z$"M.P.BASFACT":20R(9))("00",R(2))):PP2N1(((N1)"0",3(O199)))]2#N1O1N2O29000:O1N1:O2N2]<#N1$(N1):N2$(N2):NAN1N2:NA$(NA):]# DISPLAY PROBLEMS ]#XSXXSS(NA$)SS2+^#N1$,XSSS(N1$),YS,SS,CN,6:(N1$)3į",",XS3.5SS^^#SG$,5070:X1X1SA:X2X2SB::X1XA:X2XB:YYP\",",X1,Y,0,CN,5:(NA$)6į",",X2\\3! # PROBLEMS \4!1032050:8500:1032052:\'# GENERATOR #](#ND1:NM1:SG$"*":N1R(6)1:N2R(9):RD1N1R(4)5:RD2N1R(10)1m]-#PP1N1((Y,2,CS,2:255f[200:KY05020::KY675010~[ARM13:810:YYG20[XAXSSS3.6:XBXASS3:5040:810[H$,140,PY,2,CS,2:H$"Find the product.":H$:\X1XG42:X2X1:SY(YPY)10:SA(XAX1)10:SB(XBX2)10`\YYYPSY:5070:N170::8:XP,YX3,Y:XP,Y8X3,Y8ZN21ĹPM321,96:N1N21:PM,XS10,XPX20,Y,9,0,8N,128::PM321,172ZZ COMMA ZKC,0:XC0(NA$)4ı[H$,140,PY,2,CS,2:H$"Place the comma.":H$C[TYFY:150:"Press C to place the comma.",140,TY2,11,260TX,128:L((A)):150:"Enter ",TX,TY,2,CS,0:ZA:1920:255:YN11N19N21ıYYYS278N211(N21)7(N22)2(N23):Z$"":N1N1:Z$Z$(3):SZ"(",XS10,Y1,3,CS,0:XP(224):Z$,X,Y2,,CO:")",P(224),Y1,,CS:7:XPP(224)TY2X,TY2:VX EXPRESSION XTYFY:PM1M2M0:T$(M1)" * "(M2)XTXX1:L((P)):150:M29Z$(M1)" * "((M2),1)" = "(M1(((M2),1))):Z$,TX,TY,2,CS,0:TYTYVSYT$" = ",TX,TY,2,CS,0:ZP:1920:TYTYVS+Y ENTER YTX,TN,5:FF0:FC0:KC,0VWhJJ5:95eW CHOICE rWJJ6:95WJJ7.5:95W SMILEY W JJ12:95W*JJ9:95Wl BOX WZ$(Z):(Z$)3Z$(Z$,(Z$)3)","(Z$,3)XYI(P(224))2:Z$,Y3:XI(P(224)1)CX6:X,TY2X,TY8Y,TY8Y,(NA$)3)XB9,(226)XB9,YP2:fVX8:YTY2VRC0:X,Y,184Y,271X,128:V GET KY VJJ2:95VZ$"MENUS":20000V WAIT FOR RETURN VJJ3:95V+ INPUT CURSOR W,JJ4:95W1JJ11:95IW^XP5,YP,11,11,128:"@",XP,YP,0,CCU63000WU M.L.BASFACT {U OF(768)99:768,(768)100OFU2:60000U<PP(PARM1):RD(PARM2):PARM3,1UZESC1:10000U_1032048:95:10320502OF:Uc CLEAR SCREEN VdJJ1:95WVXB9,YP2XSSS9,YP2P(224),YP122(     .DIGITS"WlBJOP2Z$"D"(Z$,2)l N100:"Please wait...",140,86,2,CS,2lHN(4)"RUN"Z$lPÃ-2,2,3,4,5,2,4,20,12,9,3,15lÃ-3,6,2,20,5,8,4,4,1,5,8,7l`JJ0:95l:2067;VS12:"You will do five problems. Earn as",12,TY,2,CS,0:"many points as you can. If you",,TYVS:"earn fifty or more points, Hooter",,TYVS2:"will show you a piece of computer",,TYVS3*l;"art. Press RETURN to begin.",,TYVS4:250>l8JZ$"M.GNM19010:ND2:RD3NDNDR(RD3):RD4((O1))NDND7ND`)#N2R(9):RD2N2R(74(RD4))2`*#N10:NND11`-#ZR(6)3:RD2ZR((9N2)):9007`.#RD4NNDZR((7N2))a/#N1N110Z:N(N,0)Z::N(1,1)N2:90408a2#PP5NDR(3)2:90YPSY:5070:N150::5070:X1X1SA:X2X2SB::X1XA:X2XB:YYP_",",X1,Y,0,CN,5:(NA$)6į",",X2__(Z$)3Z$(Z$,(Z$)3)","(Z$,3):(Z$)7Z$(Z$,(Z$)7)","(Z$,7)_`4!1032050:8500:1032052:0`'# GENERATOR s`(#05020::KY675010^YMYPYG25:YM1ČPM,XG20,40,YG,60,0,YM,128:YGYGYM^ARM13:810:YYG20^XAXSSS3.6:XBXASS3.2:5040:810:YM1ČPM,XG20,40,YG,60,0,YM,128^-_X1XG46:X2X1:SY(YPY)10:SA(XAX1)10:SB(XBX2)10w_YY the "D$(V1)"s place.",,TYVS:"#",TX46:TYTYVSVS:2030] COMMA ]H$,140,PY,2,CS,2:H$"Place the comma"("s.",1((NA$)7)):H$:KC,0)^TYFYVS2:150:"Press C to place the comma"("s.",1((NA$)7)),140,TY,2,CS,2:255L^200:KY,0,,5:D$(V1)("s",1(L1)),B210,,2,,0:TYTYVSw\ ENTER \TX,TY2,11,70,128:150:L((A)):"Enter ",TX,TY,2,CS,0:S1I(P(224)):1820:(A),S12L,,8,,5:255:t]4TYFY:TX40:P0:"To multiply by "D$(U1)"s,",TX,TY,2,CS,0:"enter 0 inP(224)):1820:(P),S12L,,8,,5:TYTYVS:P10PP42030[(P)" "D$(V1)"s = ",TX,TY,2,,0:B1I(P(224))3:V2B1TX3:TYTYVS\L(P10):(L),B1,TY,,,2:D$(V)("s ",1(L1)),B110,,,,0i\B2I(P(224))7:LP(P10)10:(L)"#",B2, EXPRESSION ZTYFY:PM1M2M0:Z$(M1)" * "(M2):M2999Z$(Z$,(Z$)3)","(Z$,3)ZTXX1:(VNDP9)(PP4P9)TX20[M00įZ$" = "(M1M2),TX,TY,2,CS,0:Z$(M1M2)" + "(M0):TYTYVSq[L((P)):150:Z$" = ",TX,TY,2,CS,0:S1I(C$,XP,YP,0,CS,5:FF0mYVJJ5:95:KYA48İ2030:1100Y`NN$(KY):OP$NN$:NN$:"#"Yj250:"#",XP,YP,0,CS,5:Y BOX YYTY:L1į"#",I(S1)3,,,,6:/Z&6:XI(S1):X2,Y2P(224)20,Y2P(224),Y8P(224)20,Y8P(224),Y2:BZ PM,XG30,60,YG,54S,0,S,0::(2(S0)),,YG:yX NUMBER INPUT XXP5,YP,11,11,128:CC$"@":CC$,XP,YP,0,CN,5:FF0XJJ5:95:KYA48İ2030:1000XNN$(KY):OP$NN$:NN$:"#"Y250:"#",XP,YP,0,CN,5:JYLXP4,YP,8,8,128:CC$"@":C WAIT FOR RETURN WWJJ3:95lW+ INPUT CURSOR yW,JJ4:95W1JJ11:95W CHOICE WJJ6:95WJJ7.5:95W SMILEY W JJ12:95W*JJ9:95WH(YGYM)3ı"XRS2(YMYG)2(YMYG):(2(S0)),XG,YG,0,CI,2dX\YGYGYMSS:032048:95:10320502OF:hVc CLEAR SCREEN uVdJJ1:95VXSS21,Y210YRP(224)16,(226)P(224),Y12P(224)16,Y12P(224),Y210YR:VX8:YTY2WRC0:X,Y,186Y,271X,128:W GET KY WJJ2:952WZ$"MENUS":20000JWPCU63000VU M.L.DIGITS zU OF(768)99:768,(768)100OFUN(9,9),R(5):CF0:SF1U2:60000U<PP(PARM1)2:RD(PARM2):PARM3,1VFD$(0)"one":D$(1)"ten":D$(2)"hundred":D$(3)"thousand":D$(4)"ten||"D$(3).VZESC1:10000SV_1        067lO,0,CN,5WcL,TYFY:180:810:5000cV,150:"The product is "NA$".",139,TY,2,CS,2:250c N100:"Please wait...",140,86,2,CS,2c*N(4)"RUN"Z$ dPÃ4,Try the lesson again,Go to the practice,Go to the game,Return to the Main Menu-d`JJ0:959d:2,(NA$)3)","(NA$,3)bb.,XC0:I1(NA$)b8,350:(NA$,I,1)","NN$(NA$,I1,1)II1:11330b=,NN$(NA$,I,1)İ2030:11320b?,NN$","įNN$,XP9:XC1:cB,NN$:XPXPSS4((NA$)I4)::L1İ250:4:150:11340=cG,"#":250:"#",XPSS,YPto the practice,Go to the game,Return to the Main Menuyp`JJ0:95p:2067$)3NMNM(N(1,1)0):5000:Z$NA$:5100:NA$Z$o8,H$,140,PY,2,CS,2:"Find the product."o:TYFYVS2:150:"The product is "NA$".",139,TY,2,CS,2:250oNp N100:"Please wait...",140,86,2,CS,2p*N(4)"RUN"Z$lpPÃ4,Try the lesson again,Go $,4):TX1364(ZP$Z$):NM2TXTX4(Z$)6:FYFYVS4n,ZP$(" = "Z$,199(NM2)),TX,FY,2,CS,0:TYFYVS:NM2į"= "Z$,,TY:TYTYVSn,P1:JH3:V1(NA$):A((NA$,(NA$)V1,1))o,2030:1000,o$,XPXPSS4(V3V6)::TYFY:180eo.,(NA+:810Lm+M511310Xm+ ADD ~m+H$,140,PY,2,CS,2:H$"Add.":H$m+7:X1,YY2X2,(226):YYYY2:XXXSSSm,FYYY36:YPYY:XPXX:S0:ZP$"":U1NM:N(U,1)0Ă n,Z$(N(U,1)N1)("00",1,U1):5100nn,ZP$ZP$" + "Z$::Z$NA$:5100:ZP$(ZP10Hl+XPXT:YPYTdl+VND11232:TYFY:180l+XXXSSSSV4(V3):YYS:4:150:YR0l+:XXXSSSSND4(ND3):YYS:4:150:YR0l+TYFY:180:VU1(NA$)āVVU1(NA$):N(V,M)1:m+NU0YYYY15:MM22m+XXXSSSSU:YYS15:4:150=m+PP5įH$,140,PY,2,CS,2:H$"Regroup.":H$k+XPXSSSVSS4(V2):YPYS1010R(V):NM3R(V)R(V)1: IF R(V) > 1 THEN HCOLOR= 7: HPLOT XP + 4,YP + 9 TO XP - 4,YP + 17: HPLOT XP - 5,YP + 17#l+PP4į"#",B2,TYVS,0,CS,5:"#",B18l+2030:1100:8(VU4VU7):NV0VND11225: IF NV > 0 THEN & PRINT STR$ (NV),XS - SS * V - SS,YS - 10,,CS,5j+ REGROUP j+810:180:"Press the SPACE BAR to regroup.",TX,TY,2,CS,0k+200:KY3211180::KY32ĩ150::255:111802k+XTXP:YTYP:ANVbkS:6:YR(M00)(R(V1)1M00):150iz+ANV(NV10)10:NV(NV10):N(VU1,M1)NV:N(VU1,M)Ai+VNDPP5įH$,140,PY,2,CS,2:H$"Multiply "D$(V1)"s.":H$ j+VNDPP4į"#",B2,TYVS,0,CS,5:"#",B1'j+1(VND)2000,2030:1000j+XPXPSS4hf+XPXPSS:hk+N(U,1)0VU:N(V,M)0:N(V,M1)0:2000:1000:TYFY:180:XXXSSSSU:YYS15:4:150:XXSS:6:150:XPXPSS:UU1:VU:11075ho+ * ip+NV0:V1((NU)):VND11130:M1N(U,1):M2N(V,0):M0NV:NVM1M2NVYiu+XXXSSSSV4(V3):YY,1) = 0 THEN 11240gC+NUN1N(U,1):NM2įXSSS(ND2),YS10,7,SS(ND2),128gH+PP4įH$,140,PY,2,CS,2:H$"Multiply by "D$(U1)"s.":H$gQ+ ZERO hR+M10:M2N1:M00:A0:UV11115:VVU1:N(V,M)0:N(V,M1)04h\+22000,2100:1000:TYFY:180C help you find the product.",140,TY,2,CS,2:250:180zf"+ARM11:810f)+ MULT f*+YYYS33:XXXSSS:V1ND:R(V)0:f4+M2:U1NM:XPXX:YPYY:XXXSSSSU:YYS15:6:150g9+U1ČPM,XG20,60,YG,60,0,16,128:YGYG16Hg>+V1:FYYY46:TXX1: IF N(U:AC3Z$"I.GAME"Se,)20000ae* SETUP |e*9000:100:MIN0:MAX9e+PY146(NM1):H$"Here is the problem.":H$,140,PY,2,CS,2f +YSPY286(NM1)8(NM3):SS18:9140:XS11030(NM1)X0:9110f+XGI(X1)54:YGYS8:800jf +TYYS80:"I will$"M.P.DIGITS":20000\d) END MENU d)100::MAX:HS30:HY50:VS16:"What do you want to do?",HS,24,2,CS,0d)MIN1:V1MAX:(V),HS3,HY,2,CS,2:T$:" "T$,,,,,0:HYHYVS::385"e)AC(OP$):AC10000:AC4ĹPARM7,0:220He")Z$"P.ROUTINES"2$,XSSS(N2$)c#7:X2XSSS24:X1X212SS(NA$)SS((NA$)(N1$)):X1,YS29X2,YS29:c#X0(NA$)SS4(((NA$)1)3):X1X0SS(NA$)SS((NA$)(N1$))4(((NA$)1)3):X2X0SS2:d' MAIN Kd'NMPP3:11000:OFİ8500:PARM6,(ZA$):Z2O29000:O1N1:O2N2xbZ#N1$(N1):N2$(N2):NAN1N2:NA$(NA):b# DISPLAY PROBLEMS b#XSXXSS(NA$)SS2c#(N1$,3),XSSS((N1$,3)),YS,SS,CN,6:(N1$)3į(N1$,(N1$)3),XSSS(N1$)4:",",XS3.6SSEc#"*",XSSSSS(N1$),YS15:N20za9#NDR(2)1:RD1ND2:RD2ND3(RD4PP5):RD4NDR(2)2a<#N20:NZR(2):NNM11:ZR(7)2:NNZPP6RD2Z0a>#N2N210Z:N(N,1)Z::PP5RD1N2N(NM,1)10:N(1,1)0bF#N10:NND11:ZR(7)2)bK#N1N110Z:N(N,0)Z:KbP#N1O1N:5200:R1$Z$zK#z# DISPLAY PROBLEMS z#XSXXSS(NA$)SS25{#(N1$,3),XSSS((N1$,3)),YS,SS,CN,6:(N1$)3į(N1$,(N1$)3),XSSS(N1$)4:",",XS3.6SSh{#"*",XSSSSS(N1$),YS16:N2$,XSSS(N2$){#7:X2XSSS22:X1X24SS))(("100",NM)) z2#R1(N1(("10000",ND)).5):R1((R1)("0000",ND1)):R2(N2(("100",NM)).5):R2((R2)("00",1,NM1))"z7#N1R1N1N1R(4)>z<#NM1N2R2N2N2R(4)}zA#RAR1R2:N1$(N1):N2$(N2):NA$(RA):R1$(R1):R2$(R2)zF#Z$R1$50)):NN$"S"ġ:x9!XC0:ZA$"":N1(850):(850N)44ZA$ZA$((850N)):XCXC1:NN1y>!ZA$ZA$((850N)):ZN$ZN$(ZA$,1)::#y'# GENERATOR ?y(#NDR(3)1(RD2):NMRDy-#SG$"*":N1R((("84999",ND)))(("10000",ND)):N2R((("849",NM)::",",XC,YP:wP(Z$)3Z$(Z$,(Z$)3)","(Z$,3):(Z$)7Z$(Z$,(Z$)7)","(Z$,7)wZx3! LINE INPUT x4!HX4,YP,8,268HX,128:" ",HX,YP,0,CS,0:16385,1:5632,850,27,ZL84256(TR0),10ZL:ZN$"":XTP(224):(850)27216:NN$((8v810vKC,0:XC0ıv150:"Press C to place the comma.",140,TYVS,2,CS,2:255w200:KY05120::KY675110,w XCXP3.6SS:ARM13:810:5140:810wXXG42:YYG18:S1(YPY)10:S2(XCX)10:XXXCS2:",",X,Y,0,CN,5:YYS1:N199::5025uXA0XAXT:XTXT5:uXB0XBXT:XTXT5:vX1XG42:X2X1:YYG21:SY(YPY)10:S1(XAX1)10:S2(XBX2)104vYYYPSY:",",X1,Y,0,CS,0:XB0į",",X2SvN199:::XB0į",",X1vX1X1S1:X2X2S2::",",XA,YP:XB0į",",XB1.5:180:150:"Press C to place the comma"("s.",2(XC0(ZA$)6)),TX,TY,2,CS,0:255u200:KY05020:KY675010:uXA1:XB1:ARM13:810uXTHX:X1:ZA$,XT,YP,2,CS,0:Z1(ZN$):(ZN$,Z,1)(ZA$,X,1)į(ZN$,Z,1),XT:XTP(224):XX1::)3(8313)9:ZA$"":N1(CA$)spZA$ZA$((8313N))::2110s ARROW sXAP(224)13:YA(226)3QtXA23,YA7XA,YA4XA,YAXA62,YAXA62,YA14XA,YA14XA,YA18:XA23,YA7XA,YA18:_t COMMA ztKC,0:XC0(ZN$)4ıtTYYPVS6))4:((NA$,(NA$)3),3),BX:",",XS3.6SSrO(NA$)6BXXSSS(NA$)8:(NA$,(NA$)6),BX:",",XS6.9SSsRBXBX6:6:2115/s[ GET ROUND# W/OUT HELP {s\" ",XP,YP,SS,CN,2:16385,1:CM,8313,(CA$):XPP(224):(8313)27216sfXC(CA$4:2210qB BOX rCLXI(BXSS(AA$)14((AA$)3)4((AA$)6)):LX,YP2P(224),YP122((CA$)3)BX2,(226)BX2,YP2LX,YP2:$rG ANSWER hrHYPYS34:AA$NA$:BXXSSS((NA$,3)):(NA$,3),BX,YP,SS,CN,6rM(NA$)3BXXSSS((NA$,LXBX,128p XPXSSS(CA$)4XC:ZA$"":RP%02140p GET ROUNDED NUMBER p DD(CA$)11%q%350:NN$","DD3XCįNN$,XPSS5,,,,6:XC0:2085Pq*NN$(CA$,(CA$)DD1,1)İ2040:2085q4NN$:XPXPSS4(DD4)::250:TYFY:180:5100q> ENTRY oTX,TY2,11,260TX,128:150:"Enter ",TX,TY,2,CS,0:2010o ROUNDS TO pCA$(R):2:RP%RPİ2210:20558p150:"rounds to",136,YP1,2,CS,2:255:2200pXC(CA$)3:BXI(200SS210(ND5)):6:2115:XSLX6:BX1,YP1,132XC,n JJ12:95n*JJ9:95n ROUND EXPRESSION nZ$(N):5200o150:Z$,TX,TY,2,CS,0:"rounds to ",I(P(224))8o BOX #oZ$(R):5200UoYI(P(224))2:Z$,Y3:255:XI(P(224)1)o6:X,TY2X,TY8Y,TY8Y,TY2X,TY2:oJJ2:95m218m:217m63000m20000m WAIT FOR RETURN mJJ3:95m+ INPUT CURSOR n,JJ4:95nT NUMBER INPUT On^XP5,YP,11,11,128:"@",XP,YP,0,CN,5:FF0:FC0\nhJJ5:95kn CHOICE xnJJ6:95n SMILEY l63000l M.L.ESTIMATE lBY: NGUYEN HUY CUONGl2:60000l<PP(PARM1):RD(PARM2)mZESC1:10000!m_1032048:95:1032050:6mc CLEAR SCREEN CmdJJ1:95RmX8:YTY2vmRC0:X,Y,184YYY,273X,128:m GET KY m             :c GET KY cJJ2:95c218c:217c63000cESC110200:Z$"MENUS":20000c WAIT FOR RETURN cJJ3:95 d+ INPUT CURSOR d,JJ4:95%d1JJ11:95`d^XP5,YP,11,11,128:"@",XP,YP,0,CN,5:FF0:FC0:KC,0mdhJJ5:95{b63000b M.P.BASFACT b2:60000b8MP(PARM6):M%(MP)b<PP(PARM1):RD(PARM2)bZ10000b_1032048:95:1032052:c`1032050:96:1032052:3cc CLEAR SCREEN @cdJJ1:95OcX8:YTY2pcRC0:X,Y,184Y,271X,128  !!! ! ! ! ! !!!!!!!!!`JJ0:95:2067SReturn to the Main Menu|t`JJ0:95t:2067SJS"Please wait...",140,86,2,CS,2*N:(4)"RUN MENUS"ZÃVery good,Wonderful,Super,Great,Good,That's right,Good work,Nice work,Right,Ok,Correct,FineÃ4,Try the lesson again,Estimate without help,Return to the Estimation Menu,Return to the Main MenuCA$,DD,1)","XCXC1:DDDD1:11400υ~,NN$(CA$,DD,1)İ2040:11380,ZA$ZA$NN$:NN$,XT,,2,,0:XTP(224)::ZN$CA$:ZA$CA$XC1B,5000:XC0(ZN$)4İ250:TYYPVS1.5:180},2120::N18R(4):T$::T$".",140,TY,2,CS,2:250 N100:MND),YS30$,TR1:9500:SGıU, LOTS OF HELP V,YPFY:TYYPVS1.5:R2$" "SG$" "R1$" = ",TX,TY,2,CS,0:2010:TYTYVS4`,2040:HX4,YP,8,268HX,128:CA$Z$ij,XC0:RP%0:ZA$"":XTHX:DD1(CA$):XPI(XT)4t,300:NN$(CA$,DD1,1)(:(R2),XSSS,YP,,CN,5:11280+NN2:RR2:RPRP%RP:YPYS16:2050:(ZA$)(CA$)11280+NN2:RR2:TYFY:TX60:RP%0:2000:TYTYVS6,2040:YPYS16:2050:TYFY:180B , ADD ^,SG$,BXSS2,YP,0,CN,5,7:XS4,YS30BX8SSSS((NA$)2NKY011140::KY8311130:TYFY:180+ ROUND 1 +AA$N1$:NN1:RR1:XS210:RPRP%RP:YPYS:2050:(ZA$)(CA$)TYFY:5100:11250C+NN1:RR1:TYFY:TX60:RP%0:2000:TYTYVSY+2040:YPYS:2050i+ ROUND 2 +((N2))1R2N2:YPYP16est place.",140,PYVS1,2,CS,2R+FYYS100:RP211220:"Press S to show rounding.",14,176,2,CS,0:YY8[+ NO HELP \+TR0:9500:YY0:SGı:a+NN$"S"TYFY:180:11220~z+150:"Press S to show the rounding.",14,YPVS1.5,2,CS,0:255+200:T$,HS24,,,,0:HYHYVS::385̀)AC(OP$):ACMAXĹPARM7,0:220")AC10000,10120,220* SETUP *9000:100:XGXG24:YG74:800G +PY10:"Estimate the product.",140,PY,2,CS,2n+YS40:SS14:XS10010(ND5):9110H+"Round to the great own.",,TYVS:250'RP2:PR13:11000:PR) END MENU G)100::N112:T$::MAX:HS1620((PARM7)2):HY50:VS16:"What do you want to do?",HS,24,2,CS,0:MAXMAX((PARM7)2))MIN1:V1MAX:(V),HS3,HY,2,CS,2:T$:V3MAX3ćT$)0:800:VS20:TY40:"Let's try more problems.",16,TY,2,CS,0:"This time you will have less help.",,TYVS:250j'RP1:PR13:11000:PR't'100:YG90:800~'VS20:TY40:"Let's try a few more problems.",16,TY,2,CS,0:"This time you will be on yourARM10:810:Z1400::810::250}b%XPHX:((ZN$)N1N2).1TYYPVS:180:9900:9540}l%TYYPVS:YY0:180]~&150:"That is the exact product.",TX,TY,2,CS,0:"Enter the estimated product.",,TY11:255:j~' MAIN z~$'RP0:11000~`'100:YG9P |D%ZL(CA$):8500:SG(ZN$)(CA$):SG09570:YY0:TYYPVS:180:TYTYVS2:YPFY}I%Z$ZN$:5200:ZN$Z$:ZA$ZN$XC1 }N%5000:TR02120:YPFYa}X%:N14(TR0)R(4):T$::T$".",140,TY,2,CS,2:TR0250}]%N14:ARM5:810:Z1400::810:(N1$)SS:X1,YS30X2,YS30: |#X0(NA$)SS4(((NA$)1)3):X1X0SS(NA$)SS((NA$)(N1$))4(((NA$)1)3):X2X0SS2:|%RRA:CA$(R)^|&%YPFY:TX14:"Estimated product: ",TX,YP,2,CS,0:HXP(224)v|0%RP%RP:SG0:RP0ı|:% LITTLE HELNA$):1000:(ZA$)(NA$)TYFY:180:11500s+TR2:2020s+XPXSSS(NA$):1000:(ZA$)(NA$)İ2030:11150s+TYFY:180s,5000:8700(t N100:"Please wait...",140,86,2,CS,2Dt*N1032050:(4)"RUN"Z$Qt`JJ0:95]t:2067l7l32050:roduct.",140,PY,2,CS,2r+YS458(N26)(N26N10PP2):SS14:XS14630(PP1):9110:FYYS8010(PP2)r*+XGI(X1)50:YGYS10:8004s4+TI1:XPXSSS(NA$):YPYS33:1000:(ZA$)(NA$)11500>s\+4000^sp+TR1:M1N2:M2N1:ANA:2000sz+XPXSSS(%(TP)TA:q'ESC1:8300q)8800:OP(OP$):OP10800:OP4ĹPARM7,0:220q")Z$"M.L.BASFACT":OP3Z$"I.GAME"q,)20000r0*8500:MP(ZA$):PARM6,MP:r* SETUP Fr*9000:100:MIN0:MAX9:C10:C20:TI0r+PY1010(PP1):NM$", find the pSG$,XSSSSS(N1$),YS15:N2$,XSSS(N2$)p#7:X2XSSS24:X1X212SS(NA$)SS((NA$)(N1$)):X1,YS29X2,YS29:.q#X0(NA$)SS:X1X0SS(NA$)SS((NA$)(N1$)):X2X0SS2:;q' MAIN xq'ESC2:PR0:TP1MP:PRPR1:M%(TP)1:11000:M4)5:RD2N1R(10)1o-#PP1N1((R(9))("00",R(2)))o2#N1O1N2O29000:O1N1:O2N2o<#N1$(N1):N2$(N2):NAN1N2:NA$(NA):p# DISPLAY PROBLEMS ,p#XSXXSS(NA$)SS2ip#N1$,XSSS(N1$),YS,SS,CN,6:(N1$)3į",",XS3.5SSp#B:YYPn",",X1,Y,0,CN,5:(NA$)6į",",X2nn]JP8:96n SCORE BOX nJP1:96nJP2:96n JP3:96nl JP4:96o4!JP5:96o!JP6:96o!JP7:96*o`"JP9:96#N2N210Z:N(N,1)Z::PP5RD1N2N(NM,1)10:N(1,1)0oA#PP4RD2N2R(8)(RD3):N(NM,1)N2pF#N10:RC0:NND11:Z0:NNDPP4RD1ZR(9)?pH#PP4(RD2(RD4NND))N2Z9ZZ1:9032upJ#PP4RD3N2Z10(N1RC0R(2)1)ZZ96}nJP2:96n JP3:96nl JP4:96n4!JP5:96n!JP6:96n!JP7:96n`"JP9:96n'# GENERATOR &o(#NDR(2)1:RD1ND2:RD3(PP4)ND3(RD4PP5):RD4NDR(2)2;o-#PP5NDR(3)2to<#N20:NZR(2):NNM11:ZR(9):NNZPP6RD10mYYYPSY:5070:N150::5070:X1X1SA:X2X2SB::X1XA:X2XB:YYPm",",X1,Y,0,CN,5:(NA$)6į",",X2m>n(Z$)999Z$(Z$,(Z$)3)","(Z$,3):(Z$)999Z$(Z$,(Z$)7)","(Z$,7)DnQn]JP8:96cn SCORE BOX pnJP1:KY05020::KY675010lYMYPYG25:YM1ČPM,XG20,40,YG,60,0,YM,128:YGYGYMlARM13:810:YYG20/mXAXSSS3.6:XBXASS3.2:5040:810:YM1ČPM,XG20,40,YG,60,0,YM,128:YGYGYM5mqmX1XG46:X2X1:SY(YPY)10:SA(XAX1)10:SB(XBX2){k FY116ık! XV(VND)ND(VND):YRR(X)(M00):XXXSSSSX4(X3):YYS:150k& YR0:XXXSSSSU:YYS15:150k COMMA lXC0(ZN$)4ıdlTYFYVS2:150:"Press C to place the comma"("s.",1((NA$)7)),140,TY,2,CS,2:255l200:R1:TR1TYFY:"Hint:",TX,TY,2,CS,0:TYTYVS:JH2000,2100,2200:3020j 2020:3020j (RG$)0ık I2(RG$):I$(RG$,I,1):I$" "3070:RG$(RG$,I1)" "(RG$,I1)Qk XXSSSI4(I3):YYS1010R(I):R(I)R(I)1ek I$,X,Y,0,CS,5mk :ZK$,,TYVS:TYTYVSVS:2020i NUM i TITI(TR0):1000:KY32ıi H$""įH$,140,FYVS,2,CS,2:H$""i A(OP$)3030:TR0ı$j TR0:TYFY:180:UNMĒ4:3110:3100*j Oj 3050:RC0:UNMĒ6:3110:3100ej TR1İ2030:3020j TRTh ENTRY hJP10:96i4P0:"To multiply by "D$(U1)"s,",TX,TY,2,CS,0:Y2TYVS:S2TX48:"enter in the "D$(V1)"s place.",,Y2:"#",TX46:TYTYVSVS:2020OiPP6įZP$" = "ZK$,TX,TY,2,CS,0:TYTYVS:2020iZP$,TX,TY,2,CS,0:"= "gL((P)):Z$" = ",TX,TY,2,CS,0:S1I(P(224)):Y2TY:S2S1:L21820:TYTYVS:L1į(P),S12L,,8,,5 h"Try again.",TX,TY,2,CS,0:TR1C1C11:XhP0L((P)):S1S2:(P),S22L,Y2,8,CS,6:TYTYVS:L11820:TYTYVSlhC2C21:Z$(A)z,6:f&6:XI(S1):X2,Y2P(224)20,Y2P(224),Y8P(224)20,Y8P(224),Y2:f EXPRESSION gPM1M2M0:Z$(M1)" * "(M2):M2999Z$(Z$,(Z$)3)","(Z$,3)lgM00įZ$" = "(M1M2),TX,TY,2,CS,0:Z$(M1M2)" + "(M0):TYTYVS5:95:(KY32RC0)(KY48KY57)1000eKY32ıeNN$(KY):OP$NN$:NN$:FWıe"#",XP,YP,0,CN,5fFF0:95:(KY32RC0)KY13KYFK(KY48KY57)1040