' +JJJJ ?\>m0M='+l> /+l   d]@ŵLҦ]]LF L}BBL] X  ` 鷎귭෍ᷩ췩緈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)*++`FG8`0($ p,&"ųųೳŪŪųųij  !"#$%&'()*+,-./0123456789:;<=>?   1 '" *"( (9"1 ( ,.(0# 2  /#0/#0 *?'#07#00/0/'#07#0:"4<*55/**5/*%5/)1/)1/)1/)'#0/#0*5/*75/**5/*:5//#0/#0'#07#0:::*::'#07#0"):$(%"%:$(%"%$$2%4%$$2%4%$(2()!)E(!8b $!H(+ "@H !D)"E` @ $ C ` DQ &J80^݌Hh ü ü݌ ռ ռ ռA ļD ļ? ļAEDE?HJ>h Լ ռ ռ ռ`HJ>݌h Hh݌`葠葠ȔЖȔЖȠHIHHHHhHH݌hHhHh݌H6 VDP (ED Z $0x8x D- ܸDD# H8`?E Vk *f???0xE Hh D#-EEE8` D ܸx D - ܸx8`-0ݩ?ʥD EEE`   LDcpq` [` ~  LӜu`".Q`pNФbptťܥm2<(-Py0\|e<6e<g< JJJJj귍hI  aUL@ kU8  L  Q^R(jQ0l^l\  wUuW ԧ H h@ [_ /QSIRb_L`LLLL`ª`LQLYLeLXLeLee ўQH\(h0L& Ꝥ$`( R \ZLl8 ўR HH\`\Z[YS6`LxQɿu3'RͲʎRʎ]]]ɍuL͟ɍ}RLRɍg^H8 ^hZLɍR LͲɊRR% QLܤͲ Z@ -^ ş\[Z QY\[Z8`l6Lş_Ȍb_Ͳ] )Y h( ֭ͲLɍ [LLĦ__ ^ 9 LҦ3 9 a   0LjLY u< (_9 ˭ɠuɠK_9 ?LˆʎõĵL õ ĵµ aµ`` L̦µ_bJLuLz`  ȟ QlXJ̥KlV  ȟ QlV eօ3L e3L &RL &QL d L4 Ne)n `@-eff L f`L . tQLѤ LҦL` OPu d L Ne)noon 8ɍ` ^f\õL ^NR  RΩLҦ)\Z ʽ LHv 3h`0h8` [L NС õ`A@` ŵL^Lõ`  \ 濭0 \  ȟ Q ^\lZl^?cqH şch`fhjõĵ@OAP`u@`@&`QR`E Ls  @DAE@u`8` %@ @A@`@`@A`Mµ ) LЦ`8@AWc@8@-@HAȑ@hHȑ@ȑ@hHȑ@Ȋ@ch8&ȑ@Hȑ@Ah@LHȑ@ȑ@ htphso`hMhL`9V8U897T6S67`NEWLOASAVRUCHAIDELETLOCUNLOCCLOSREAEXEWRITPOSITIOOPEAPPENRENAMCBSSOFMONOMOPRINMAXFILEFINSNAFBLOABRUVERIF!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- ( 0 Ҡ@跻~!Wo*9~~~~ɬƬ~_ j ʪHɪH`Lc (L ܫ㵮赎 ɱ^_ J QL_Ls贩紎 DǴҵԵƴѵӵµȴ 7 ַ :ŵƴѵǴҵȴµ納贍﵎ٵ്ᵭⳍڵL^ѵ-I `  4 ò-յ!  8صٵ紭ﵝ 7L (0+BC  7L HH`LgL{0 HH` õL H hBL BH [ h`Lo õ ڬL B ڬ LʬH hB@ յյ [L (ȴ) ȴ 7L L ( L (ȴL{ƴѵ洩ƴǴҵ 7 ^* B0 HȱBh ӵԵ 8 L8 ݲ` ܫ  / / ED B / / ]ƴS0Jȴ ȴ)  紅D贅E B ƴ  / 0L Ν `HD٤DEEhiHLGh ` ŵBѵ-` ѵB-` ܫ 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˵̵ֵ׵`êĪLR E( 8` R` ELRŪƪ`췌 յյI뷭鷭귭ⵍ㵍跬ª 뷰` Lf ݵܵߵ޵ ^`8ܵ i B8` 4L ֵȱB׵ ܯ䵍൭嵍 ` DȑB׵Bֵ  ַ յյ`굎뵎쵬 뵎쵌``õĵ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 ~(` i d ֠z# u`     "Ҡ" ՠ" Π!Π# ͮӠ!z# "@ DDЂĈĈ U*P*UU* U*P*UU*(P TU"@ DDЂĈĈ(Q"@ @D(P T( U*P*UU* U*P*UU*(P TU" (Q"U"D(E ЂЂЂЊЊЀՂĂĈԀՂĂ(Q"@ @DЂЈЂЂЂԂԂЂԈ(P TT*(U*P*UU*U*P*UT* " (Q"U"D A ЂЂЂЊЊЀՂĂĈԀՂĂ"@ QDЂЈЂЂЂԂԂЂԈ(P*UU*(U*P*UU*T*P*P*>>""@ QD (P*U*(U*P*UU*(P TU&""&"@ U(E (P*U*(P TU*(U*P TU"<<Ђ("E D(EԊЂЂĈԂ(P*UU* (U*P*UU*"U*P*U*Ђ("E DDԊЂЂĈԂ(P*UU* V((U*P*UU*           )"KEEP TRYING.":M$(10)"YOU JUST NEED SOME PRACTICE.":M$(11)"YOU'LL DO BETTER ON THE NEXT ONE.":M$(12)"I'M ROOTING FOR YOU.") Y 2640$( SUBR FOR ERROR MESSAGES( M$(1)"A GREAT JOB!":M$(2)"YOU'RE TERRIFIC!":M$(3)"A PERFECT TRY!":M$(4)"I'M IMPRESSED!"( M$(5)"ALMOST PERFECT.":M$(6)"THAT WAS CLOSE.":M$(7)"YOU'LL GET IT NEXT TIME.":M$(8)"YOU'RE GETTING THERE.") M$(9RRORS";:17:E6;:29:(E6NP.5):2640Z'F 6:1:"ERRORS";:17:E6;:29:(E6(NP1).5)'P 20:11:"PRESS ";::"M";::" FOR MAIN MENU."'Z 22:9:"PRESS ";::"P";::" FOR MORE PROBLEMS."'d G$'n :G$"M"ĺ(4);"RUN MENU"'x G$"P"700(00:G$"C"2440& 1390:"& A& SUBR TO PRINT HIT RETURNv& 23:10:"HIT ";::"RETURN";::" TO CONTINUE."|& &( :2:23:"APPROX. AVERAGE"&- 3:15:"TOTAL";:25:"PER PROBLEM"&2 4:15:"-----";:25:"-----------"''< NP1Ģ6:1:"E. 23809%8 LS(1)62X2K9,G176:LS(2)72X2K9,222Q%L K9K91:K912270%V "OK, ";N$","::"NOW CONTINUE WITH THIS PROBLEM."%` %j "WRONG, YOU MUST CHANGE THE 0 TO A 9."%t 2290%~ 23:10:"PRESS ";::"C";::" TO CONTINUE. ";& 111)12$R(XK9)R1(XK9)10:LS(1)62X2K9,32`$1390:"CORRECT. NOW TYPE THE NEW CARRY."p$1100:1390$GR1(XK9)2360$ G1K902330$ G9R1(XK9)92410$ "INCORRECT CARRY. ":2290$ LS(1)62X2K9,177%ER SHOULD BE CHANGED TO."-#zM0:1100:1390J#G$"B"R(X2K9)0M2g#G$"B"R(X2K9)0M5v#M0İ1160#M0ī2170#G$"B"R(X2K9)0K9K91#GR(X2K9)12250#2130#LS(2)32X2K9,G176:K9K91$R(XK91)R(XK92050"LS(1)62X,177:1390b" "NOW CONTINUE THE PROBLEM.":R(X)R(X)10:R(X1)R(X1)1:Q30m">S61:v"HK90"RLS(2)52X2K9,R(X1K9)176:LS(2)32X2K9,R(X2K9)48"f:"BORROWING":::"TYPE THE NUMBER THE HIGHLIGHTED":#p"NUMBG$"B"R(X1)01990*!R(X1)92110D!G$"B"R(X1)0M7Y!GR(X1)12010f!M0M4p!1160~!M0:1890!LS(2)52X,G176!"CORRECT. NOW TYPE THE NEW CARRY.":LS(1)62X,32:1100:M0!M0:G12070" M6:1160:1100:OBLEM." 20:1:M$(R6)$ 1060. 1060o D:"BORROWING":::"TYPE THE NUMBER THE HIGHLIGHTED DIGIT " X:"SHOULD BE CHANGED TO." bLS(2)52X,R(X1)48 l1100:1390 vX21970 G$"B"R(X1)0M2 G$"B"R(X1)0İ2120!$X1G0ĹLS(5)72X,160:1710;LS(5)72X,G176JM0:S0:XPsER$"ERRORS":S21ER$"ERROR"S21R6((1)49)S21R6((1)45)S20R6((1)41)(16):(1):N$"," 18:1:"YOU MADE "S2" "ER$" ON THAT PR1540 6)@XC211:LS(5)72X,32EJR(X)S(X)0X11620SOG0:1690lTM0:S60:1100:1390^G$"B"R(X)S(X)1M5hG$"B"R(X)S(X)0M3rG$"B"M0İ1860|S611620GA(X)M017001160:1100:1390:M0:1630T.":AP"YOU CAN NOT SUBTRACT FROM 0."::"TYPE'B' TO BORROW."WZS2S21:E6E61:bn34,12j23v:34,015:1:1720DC211R1(D)S1(D)01560A(D)R1(D)S1(D)1590R1(D1)R1(D1)1:R1(D)R1(D)10:NDERSTAND YOUR MISTAKE,"@"TYPE IN THE CORRECT VALUE."V(S2S21:E6E61:2"BORROWING IS NOT NECESSARY IN THIS STEP.":S2S21:E6E61:FS2S21:E6E61:S5S51:S52S50:"YOUR CARRY WILL ALWAYS BE 1.":G"YOUR CARRY IS NOT CORRECE6E61:3"YOU CAN NOT SUBTRACT WITHOUT FIRST"I:S2S21:E6E61r"BORROWING. (TO BORROW TYPE B).":Q3Q31:Q31ĺ"THAT IS NOT CORRECT. TRY AGAIN.":S2S21:E6E61:Q32Q30"THE CORRECT CHANGE IS "R(X1)1"."::"WHEN YOU U,1350S11230f"YOU ARE INCORRECT. PLEASE TRY AGAIN.":S1:S2S21:LS(5)72X,48G:E6E61l"SORRY, THE ANSWER IS ";A(X)"."::"WHEN YOU UNDERSTAND YOUR MISTAKE,"::"TYPE IN THE CORRECT ANSWER."S0:LS(5)72X,48G S2S21::S0:S20:NP=2600"LG$""0M16368,09NR30ZQ(16384)128R3R31:1105gRR3(R3)SG(16384)128:16368,0:G$(G):G16TG$"*"2600VG$(13)1100j(G$)0G$"0"G(G$)t1390:M1180,1360,1270,1300,1330XC211:LS(5)7X2,32:1100:LS(5)7X2,G176GGA(X)1030gM1:1160:LS(5)7X2,G48S1:1100:1390:1000LS(5)7X2,G176:S0:XS20İ1480S201740$2500.16384,128:(16384)1411070316368,0821870_X1C2'`S(X)R(X)K61.aX<bK60805^fR(1)S(1)R(1)0S(1)0805XC211:R1(X)R(X):S1(X)S(X):3:10);:X1C2:R(X)" ";::7)"- ";:X1C2:S(X);" ";::9);:X12C21:"-";::C1115206G$)57782G$:N5(G$)(NP1N5D:1:27:"PROBLEM #"NPf23:10:"PRESS '*' TO QUIT."% PRINT OUT OF PROBLEM&X1C2*R(X)((1)10)4S(X)((1)10):C11860HS(X)R(X)820RA(X)R(X)S(X)\]K60^C12C 1 AND 5.";736 (16):" " 18:1:"YOU MAY TRY UP TO 9 PROBLEMS. 20:1:"HOW MANY WOULD YOU LIKE? ";:G$:(G$)49(C2C11C21760[15::"YOU CAN'T HAVE BORROWING WITH 1-DIGIT"::"PROBLEMS.":16:" "(18):" ";X12500:X:700C26C207802::"THE NUMBER OF DIGITS MUST BE BETWEEN ROW":?:"(TYPE 1 OR 2)";:1100:C1(G$)48:C12C11700HE60(13):" ";11:1:"HOW MANY DIGITS DO YOU WANT"13:"IN THE PROBLEMS (BETWEEN 1-5)?";:1100:C2(G$)48C20C29736LENT, "N$"!":::"THIS CONTINUES UNTIL THE PROBLEM IS"::"SOLVED.":2430:Q2$"GOOD LUCK, "N$"!":11:(40(Q2$))2:Q2$Y13000::"WOULD YOU LIKE:":" 1) PROBLEMS WHERE YOU BORROW":" 2) PROBLEMS WHERE YOU DON'T BOR(16384)12849630c34,14::"THE CARRY APPEARS AND NOW YOU MUST"::"SUBTRACT 4 FROM 10."LS(5)12,177::"YOU MUST NOW TYPE A 6."::::11::"TRY";::" TYPING A 6."16368,0(16384)12854665LS(9)13,182J:"EXCELTED."NLS(6)11,49HX2430:"THIS DIGIT IS THEN REPLACED WITH A":b"NUMBER ONE LESS AND THE COMPUTER ASKS"::"FOR A CARRY."lLS(6)11,176:LS(5)12,32:2430q"THE CARRY HERE IS 1."::::11::"TRY";::" TYPING A 1."t16368,0vONE FROM THE NEXT DIGIT."K0:"THIS IS DONE BY TYPING ";::"B";::". "s5::12::"TRY";::" TYPING A B."616368,07(16384)12866567:34,12:D15:"WHEN YOU TYPE "(34)"B,"(34)" THE NEXT DIGIT OVER"E:"WILL BE HIGHLIGH::"SOLVED."2430:"HOWEVER, IF THE PROBLEM IS LIKE THE"::"FOLLOWING ONE, YOU WOULD HAVE TO "::"BORROW: ":LS(9)13,32:10);"5 1 0":7);"- 4 0 4":9);"-------"&13:"BECAUSE WE CANNOT SUBTRACT 4 FROM 0, WE"::"HAVE TO BORROW A 6!" x16368,0. y(16384)54128377< z8:14:6 |34,14::"VERY NICE, "N$",":18:"A 6 HAS BEEN PRINTED AND THE CURSOR IS"::"NOW UNDER THE 4." LS(7)13,182 LS(7)11,32 2430 15:1:"THIS CONTINUES UNTIL THE PROBLEM IS"0);"5 9 6":7)"- 2 4 0":9);"-------" rLS(7)13,32:15:"THE WHITE SQUARE IS THE CURSOR AND SHOWS":"WHERE THE NEXT NUMBER SHOULD GO.":2430:34,14: w15:"IN THIS CASE, 6 MINUS 0 IS 6. YOU SHOULD":"NOW TYPE A 6.":20:12::"TRY";::" TYPING BTRACTION.":: ""YOU WILL CHOOSE THE SIZE OF THE"::"PROBLEMS. YOU WILL DECIDE ALSO IF THERE"::"SHOULD BE BORROWING. (PROBLEMS WITHOUT"::"BORROWING ARE EASIER.)" T2430: ^"OK, ";N$;", HERE IS AN EXAMPLE "::"WITHOUT BORROWING:"( h:1::"RETURN";::".":7:"NAME: ";N$A N$(N$,12):(N$)0230Q :16368,0 "HI, ";N$;"."::"DO YOU WANT INSTRUCTIONS (Y/N)? ";:1100 G$"Y"G$"N"Ģ3:235 G$"N"700 :14::"INSTRUCTIONS"::5:"I WILL GIVE YOU PRACTICE IN SU,1704,1832,1960,1104,1232,1360,1488,1616,1744,1872,2000F (8):(14)Y "SUBTRACTION"t 10:14:"BY DON ROSS" 12:8:"MICROCOMPUTER WORKSHOPS :13:"COPYRIGHT 1983" Y12500: 16368,0$ :5:"TYPE YOUR FIRST NAME AND PRESS ";! ZM$(12)8d::X139:" ";::X123:39:" ":qnX3911:23:X:" ";::X2311:X:1:" ";::{x3000D1:R1(5),R(5),S(5),S1(5),A(5)7 LS(23):X023:LS(X):: 1024,1152,1280,1408,1536,1664,1792,1920,1064,1192,1320,1448,1576!                OU'LL DO BETTER ON THE NEXT ONE.":M$(12)"I'M ROOTING FOR YOU."E dX(2)"YOU'RE TERRIFIC!":M$(3)"A PERFECT TRY!":M$(4)"I'M IMPRESSED!" M$(5)"ALMOST PERFECT.":M$(6)"THAT WAS CLOSE.":M$(7)"YOU'LL GET IT NEXT TIME.":M$(8)"YOU'RE GETTING THERE."? M$(9)"KEEP TRYING.":M$(10)"YOU JUST NEED SOME PRACTICE.":M$(11)"YBER FOR ERROR MESSAGE. E50R6((1)41)G E51R6((1)45)` E51R6((1)49)f T 24:8:"PRESS ";::"RETURN";::" TO CONTINUE.";^ (16384)1412910c 16368,0: SUBR FOR ERROR MESSAGESD M$(1)"A GREAT JOB!":M$25508 5:1:"ESSNSR#:;06;D7:;38;)D7)OQ0(/4(m31;00;#QSDRR!#:;;#L";::" FOR MAIN MENU." 22:9:"PRESS ";::"P";::" FOR MORE PROBLEMS."; G$ :G$"M"ĺ(4);"RUN MENU" G$"P"600( 2550 SUBR TO PICK RND NUM110:B(X)0:S(X)0:X)E0:34,0:E507CC4:RR4=X TOTAL ERROR ANALYSISd 34,0:z 1:27:"AVERAGE" 2:15:"TOTAL";:25:"PER PROBLEM" 3:15:"-----";:25:"-----------" NP1Ģ5:1:"ERRORS";:17:E6;:29:(E6NP.5):HIT RETURN' SUBR FOR GET STATEMENTZ:" ";(8);::16384,128:G$((16384)128)h16368,0|G$"*"ġ:2500G$"0"G$"9"1930G(G$) SUBR TO ZERO MATRIXX110:Y110:A(X,Y)0:Y,XT0:S90:S70A16:X AGAIN."hS71:1710Kr"SORRY, "F$"."::G" IS INCORRECT. TRY AGAIN."U|1710w"THE CORRECT ANSWER IS "J"."}"WHEN YOU UNDERSTAND YOUR ERROR, TYPE IN""THE CORRECT ANSWER."S50S91/ 0 SUBR TO PRINT " TO CONTINUE"((16384)1411530816368,0:@NPJ2500j SUBR FOR ERROR CORRECTION"E1:E5E51:E6E61,6S5S51@S521670JS701650T"SORRY, "F$"."Y^"YOU DID NOT ENTER THE CORRECT CARRY."::"TRYFKG1390PS71:JK&Z15600d13006n<xBg18:1:"THAT IS CORRECT, "F$"."mER$"ERRORS":E51ER$"ERROR""YOU MADE "E5" "ER$" ON THAT PROBLEM."2800::M$(R6)34,1624:10:"HIT ";::"RETURN";::(R5):(C17):" ":(R5):(C16).1920:GKĺGIS901220OgGKRRR((GN$))uGK1260S71:JK15601170 PRINTS50Z K01390(16):((GN$)5)1920(KGĺG2S901350<M15C40(R3)"ZC112S(Z)S(Z)KCP(S(Z)10)SBS(Z)P10f$(R5):(C16)p.1920|3BGĺGBS901110LVBGCC1:BGRRR2:BG1140`S70:JB:1560j1060tS50~K(S(Z)10)Z11290$(X,1)0820,HB(X)B(X)(A(X,Y)10(CY))3RY:\XEpX1RTu(T):TT1dz(17):B(X)kXv(R3)15)"+"(R4)(16)X1C1:"-";:XY1CX1RS(Y)S(Y)A(X,Y)XY34,17K0MBER OF COLUMNS (1-9): ";:IN$:(IN$)49(IN$)57750@IN$RC(IN$):C4ClX1300:X:16384,0yNP1N5200024:10:"PRESS '*' TO QUIT."1:1:"PROBLEM # "NP X1R*Y1C4A(X,Y)((1)10)6T4 >A:5:F$",":8:"YOU MAY TRY UP TO 9 PROBLEMS."::"HOW MANY WOULD YOU LIKE? ";:W$:W$"1"W$"9"665|W$:N5(W$):14:1:"ENTER NUMBER OF ROWS (2-9): ";:GN$:(GN$)50(GN$)57690GN$R(GN$):Z(GN$):R4R717:1:"ENTER NU EACH PROBLEM, I WILL SHOW YOU HOW"::"MANY ERRORS WERE MADE. (TOTAL ERRORS"::"WILL BE SHOWN AT THE END OF EACH SET.)M::"PRESS ";::"*";::" TO EXIT BEFORE THE END OF A SET."R2900:34,0:VX BEGIN MAIN PROGRAMbE60:R40:C40i<29000@:19:3:"1":19:8::" ";(8);:6AB12:"CONTINUE IN THIS MANNER UNTIL THE"::"PROBLEM IS FINISHED. I WILL TELL YOU"D:"IF YOU MAKE A MISTAKE AND WILL GIVE YOU"::"THE ANSWER AFTER THE SECOND TRY."J2900:xL14:"AFTER"::"IF YOU TYPE A 1 FOR THE CARRY, A 1 WOULD":"APPEAR."c123:12::"TRY";::" TYPING A 1.";{2(16384)17756233:19:1434,10::12:"VERY NICE, "F$"."516:"REMEMBER: DON'T FORGET TO ENTER THE"::"CARRY EVEN IF IT IS A ZERO."A 2 WILL APPEAR.":22:12::"TRY";::" TYPING A 2!";R(16384)178496b8:20:"2"34,10::12:"VERY GOOD, "F$"!"+19:3::" ";(8);::0:14:"THE CURSOR HAS NOW MOVED TO THE TOP OF"::"THE NEXT COLUMN WHERE THE CARRY GOES. COLUMNS AND":"4 ROWS, YOU WOULD GET A PROBLEM LIKE THE":"ONE ABOVE."[ 16368,0:2900:12:"THE WHITE SQUARE IS THE CURSOR AND SHOWS":"WHERE THE NEXT NUMBER WILL GO. IF YOU"::"TYPE A 2 AS THE FIRST DIGIT OF THE SUM"::"OF THE FIRST COLUMN, columns c,R!nyoonyhinrhssrhuriy