' +JJJJ ?\>m0M='+l> /+l   d]@ŵLҦ]]L L}BBL] 鷎귭෍ᷩ췩緈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,&"_]` L/浍굺L  !"#$%&'()*+,-./0123456789:;<=>?  1#"""  (9"1 ( ,.(0# 2  /#0/#0 *?'#07#00/0/'#07#0:"4<*55/**5/*%5/)1/)1/)1/)'#0/#0*5/*75/**5/*:5//#0/#0'#07#0:::*::'#07#0EB 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`   vLDcpq` [` ~  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 iõ`  \ 濭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`INILOASAVRUCHAIDELETLOCUNLOCCLOSREAEXEWRITPOSITIOOPEAPPENRENAMCATALOMONOMOPRINMAXFILEFINBSAVBLOABRUVERIF!pppp p p p p`" t""#x"p0p@p@@@p@!y q q p@  LANGUAGE NOT AVAILABLRANGE ERROWRITE PROTECTEEND OF DATFILE NOT FOUNVOLUME MISMATCI/O ERRODISK FULFILE LOCKESYNTAX ERRONO BUFFERS AVAILABLFILE TYPE MISMATCPROGRAM TOO LARGNOT DIRECT COMMANč$3>L[dmx- ( D Ϡ@跻~!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䵍䵐`"L ŵ8ŵH ~(`F d ֠z# u`28ı&'10120+&' *********************H&' *** ERROR HANDLING ***N&'Y&'216,0a&'13h&(8n& (&("THAT LIST IS NOT ON DISK."&(&((23:" PRESS TO CONTINUE. ";:RR$&2(&* ********************* '+ *** IX3 % %! *** ! ***$% !XX1-%!X,Y<% !Y4,Y2XF%*!XX3L%4!h%' *********************}%' *** TIMER ***%$'T1740DS%.'T%8'%t' *********************%~' *** EXCESS INPUT ERROR TRAP ***%'X(16384):16368,0&'X14X $: $D *** R ***,$N X1,X3Y2=$X X1,X3Y4J$b Y,Y4XU$l X3,Yb$v X2,Y1o$ X3,Y3u$ $ *** T ***$ Y,Y3X2$ X,X4Y4$ XX1$ $ *** A ***$ X1,X2Y2$ X1,X2Y4$ Y,Y4X% Y,Y4 #|X,Y3#X3,Y1 #1# *** U ***>#Y,Y4XM#Y,Y4X3\#X1,X2Yb#s# *** P ***#X1,X3Y4#X1,X3Y2#Y,Y4X#X3,Y3## *** E ***# X1,X3Y# X1,X2Y2#& X1,X3Y4$0 Y,YT TO PLAY AGAIN? ";"AN$."AN$"N"7890A"AN$"Y"7810I"94R"400}":22:" ONE MOMENT PLEASE.";":12:(4)"RUN PROGRAMS""@ **********************"J *** LETTERS ***"T *** S ***"^VY4Y2"hX,X3V#r8090!XX5!8140#!XX5-!82007!XX5A!8260J!X11U!YY10_!8020i!XX5s! 8340}!XX5!8390!(XX5!28260!<XX5!F8450!PXX5!Z8450!dXX5!nDS5!x10000!!22""DO YOU WAN";:10010 ", X **********************B b *** FINALE ***J l:R v23X _ 8 "YOU'RE A SUPERSTAR, "NAME$"!"  L ********************** V *** SUPERSTAR *** ` j((1)14)1 tX4 ~Y9 8020 XX5!GHT1RIGHTNR7000%35,20:IT180:"GREAT, "NAME$"!! ";:OiB$(BL$,17((RI)))10:9:B$;:12:9:B$;11:9:" THAT'S "RIGHT" RIGHT!! ";DS4:10010: 7:" "NAME$", HERE'S YOUR NEXT WORD: "::" YOU CAN DO BETTER THAN":"THAT. PLEASE TRY AGAIN."=5850wG$;"THAT'S NOT RIGHT, "NAME$".":"PLEASE TRY AGAIN."5850118685200p **********************z *** REWARD *** *** SCORE KEEPING ***RIGHTRI958)vPHRASE5760,5770,5790,5810,5830bG$"NOT QUITE, ";NAME$".":"PLEASE TRY AGAIN.":5850G$"I'M SORRY, ";NAME$;", THAT'S NOT IT.""PLEASE TRY AGAIN.":5850G$NAME$", THAT'S NOT RIGHT.":"PLEASE TRY AGAIN."58503G$NAME$", AGAIN ***WNGWNG1(WNGNW5700535,20:;C11\" THE WORD WAS ";buTEMP$(WRDNO);{"."" LET'S TRY ANOTHER, ";NAME$"."DS2100106680:5060DNXPHRASE((1)5)1b13lRY, TIME IS UP. "0" THE WORD WAS ";6ITEMP$(WRDNO);OZ".":e10010o5610@ANS$TEMP$(WRDNO)5510J6010TTEMP$(WRDNO)TEMP$(N)^NN1hN1ır5060| **********************  *** TRY 16368,0:X1415440'X1365259D(ANS$)2ANS$"":5265eANS$(ANS$,(ANS$)1):5265X155İ22000::12:5610X1605265ANS$ANS$(X128)11:4:868:ANS$;:" ";:Z35,20:10" OOPS! SOR  10010320:9:"PRESS TO END.";>35,19E1L8\(NAME$", ";2"WHAT WAS THE WORD I":"SHOWED YOU?"<10100FP11:"=> ";di" ";(8);noAN$""xZ170SECX(16384):X128Ă:52801NRWRD$(N)+D$;"CLOSE ";F$4750R **********************q *** WORD SELECTION ***}N1NRTEMP$(N)WRD$(N)NNRWRDNO((1)N)1WNG017(TEMP$(WRDNO))2" ";G$;TEMP$(WRDNO)DSSHW***10200B:18:" PRESS TO EXIT THIS OPTION."}12:"WHAT IS THE NAME OF YOUR SPELLING LIST? => ";F$F$""100(F$,1)"A"(F$,1)"Z"ĺ(7):4021D$;"VERIFY ";F$D$;"OPEN ";F$D$;"READ ";F$NRN,3416"$27,3417",$24,321806$21,2919>@$21,2620LJ$21,2321RT$X 'i' # T E N #o'u'|'9.'5,3468'5,347B'17,195L'16,206V'15,177`'19,217j'14,168t'20,228~'13,159'21,239 5F#9,206P#8,217%Z#7,982d#20,228=n#6,89Jx#21,239W#10,146d#10,147r#10,1422#10,1423#6,815#7,916#21,2315#20,2316#8,2317#9,2218#10,2219$20,2220$33,3415$30: 21,2323D 6,823'X 24,2964b 24,297Bl 24,2922Pv 24,2923\ 6,830h 6,931v 21,2330 20,2331 7,1032:19,2232 8,2133 9,2034 10,1935 %#&# # N I N E #'#(#2#2<#10,19 ^9,206h8,217#r7,980|20,228;6,89H21,239T6,710b22,2310o11,176|11,17711,172211,17236,81821,23186,919 20,2319 7,2220 7,2221& 20,23220 6,92227,321725,3018*23,2819821,2620F19,2421T17,2222b15,2023p13,1824~11,16259,1426 7,12277,1028 7,829*=> # E I G H T #?@22,2410EJ8T10,195TOP? (Y/N)";(8);(8);:RR$21URR$"Y"RR$"y"ĬB1U:1:20004H1VB2:T:" ";::T2232:1:T:" ";:39:" ";:::T2392:T:" ";:0*N2:T3382:T:" ";::T3222:2:T:" ";:38:" ";:::T3382:T:" ";:0/N04N34,3:35,20:32,3:33,33:0>N0U16368,00U35,201U:12:" DO YOU WANT TO S;(34);F$;(34)4/B-"196 NAME$ =";(34);NAME$;(34)P/F-"UNLOCK SUPER SPELLER"j/P-"SAVE SUPER SPELLER"/Z-"LOCK SUPER SPELLER"/d-"CH = 1"/n-"GOTO 10"/x-D$;"CLOSE SCRATCH"/}-34,23:/-D$;"EXEC SCRATCH"/-/-/ N:E0$N:T239*********************Q., *** CHANGE NW, REPLY AND DISPLAY TIMES THEN SAVE ***h.-D$;"OPEN SCRATCH". -D$;"DELETE SCRATCH".-D$;"OPEN SCRATCH".-D$;"WRITE SCRATCH".(-"170 SEC = ";SEC.2-"180 NW = ";NW.<-"190 SHW = ";SHW/A-"195 F$ ="""Z1$"3"/-,SHW(Z1$):SHW0Z1$"0"SHW3F-,19:19:868:SHW- ,22:"ARE THESE ENTRIES CORRECT? (Y/N)";(8);(8);(8);(8);:RR$-!,RR$"N"RR$"n"11210-",22:1:868::" STORING NEW INFORMATION ON DISK. ";:::12-$,:12., LLOW FOR A CORRECT RESPONSE? ";L,,:"DEFAULT=8";::Z1$:Z1$""Z1$"8"[,,SEC(Z1$)u,,SEC0Z1$"0"SEC8,,15:19:868:SEC,,,,,,"HOW MANY SECONDS WOULD YOU LIKE WORDS TOBE DISPLAYED FOR? "; -,:"DEFAULT=3";::" ";Z1$:Z1$R MAIN MENU. ";::RR$ ++)++1051++10h++"HOW MANY TRIES WILL YOU ALLOW FOR EACH WORD? ";++:"DEFAULT=3";::" ";Z1$:Z1$""Z1$"3"++NW(Z1$)++NW0Z1$"0"NW3++11:7:868:NW++++!,+"HOW MANY SECONDS WILL YOU A*|+:" * THE LENGTH OF TIME THAT WORDS WILL BE DISPLAYED."::" * THE AMOUNT OF TIME YOU HAVE TO TYPE THE ANSWER CORRECTLY."::" * THE NUMBER OF INCORRECT ANSWERS"*}+" YOU MAY ENTER."++23:1::" PRESS FONTINUE. ";::RR$)u+:"YOU MAY LOAD LISTS FROM DISK BY USING"::"THE 'L' OPTION FROM THE MAIN MENU OR"::"ENTER YOUR OWN WORDS BY PRESSING"::".")y+::"BY CHOOSING THE 'P' OPTION FROM THE"*z+:"MENU, YOU CAN CHANGE THE FOLLOWING:"O USE 'SUPER SPELLER', YOU MUST FIRST"::"STORE A LIST OF WORDS ON DISK. THESE"::"WORDS CAN BE PRACTICED LATER. THERE IS"::"A SAMPLE WORD LIST ENTITLED, ";::"'WORDS'";::","(r+:"ALREADY ON THIS DISK.")s+23:1::" PRESS TO CONPUTS ***'+' +'*+14#'4+9'>+" INSTRUCTIONS "?'H+E'M+r'R+"'SUPER SPELLER' IS A GAME WHICH HELPS"'\+:"CHILDREN TO REMEMBER HOW TO SPELL WORDS."'f+"THE PROGRAM WILL QUICKLY DISPLAY WORDS"::"THEN ASK YOU TO RETYPE THEM."::(p+"T3090 2000:X23:Y11:3100P A$:A$"K"įT255,90:2300:3100:2200:150i T102,90:2100:3100 2000:X29:Y11:3110 A$:A$"L"įT255,90:2300:3110:2200:160 T114,45:2100:3110 2000:X34:Y11:3120A$:A$"M"įT255,9$"H"įT255,90:2300:3070:2200:120> T96,90:2100:3070X 2000:X13:Y11:3080 A$:A$"I"įT255,90:2300:3080:2200:130 T96,90:2100:3080 2000:X17:Y11:3090 A$:A$"J"įT255,90:2300:3090:2200:140 T102,90:2100: WT76,90:2100:30401 Z2000:X33:Y1:3050a _A$:A$"F"įT255,90:2300:3050:2200:90y aT76,90:2100:3050 d2000:X1:Y11:3060 sA$:A$"G"įT255,90:2300:3060:2200:100 uT86,180:2100:3060 x2000:X7:Y11:3070& }A$:AX15:Y1:3020> AA$:A$"C"įT255,90:2300:3020:2200:60V CT86,90:2100:3020o F2000:X21:Y1:3030 KA$:A$"D"įT255,90:2300:3030:2200:70 MT86,90:2100:3030 P2000:X27:Y1:3040 UA$:A$"E"įT255,90:2300:3040:2200:80 P12800:P ::7- I039:0,39I3 #K (2000:X3:Y1:3000{ -A$:A$"A"įT255,90:2300:3000:2200:40 /T128,90:2100:3000 22000:X9:Y1:3010 7A$:A$"B"įT255,90:2300:3010:2200:50 9T128,90:2100:3010 <2000:1 CREATED BY BOB CHINN APRIL, 1981f 112 S. EVERGREEN ST. ONARGA, IL. 60955} (815)268-7373::48005:12:"*** ALPHABET ***"::13:"BY BOB CHINN"::14:"APRIL 1981":::11:"CREATED FOR CHRIS"      ING THE PROGRAM PLEASE WAIT ...."A +(4)" RUN COUNTING HORSES"@RS **p ******************************:"JUDY GORTON'S KINDIE NUMBERS 1-6"  " **************************" " * *" " * '19,217j'14,168#t'20,2280~'13,159='21,239K'10,2913Y'10,2914g'10,2922u'10,2923'13,1530'21,2330'14,1631'20,2231'15,1732(19,2132 (16,2033(17,1934(*:10!+"LOAD17#9,2218#10,2219+$20,22209$33,3415G$30,3416U"$27,3417c,$24,3218q6$21,2919@$21,2620J$21,2321T$ '' # T E N #'''9.'5,3468'5,347B'17,195L'16,206V'15,177 `935  %##&# # N I N E #)'#/(#62#2C<#10,195OF#9,206[P#8,217fZ#7,98sd#20,228~n#6,89x#21,239#10,146#10,147#10,1422#10,1423#6,815#7,916#21,2315#20,2316#8,23  20,2319 7,2220' 7,22215& 20,2322A0 6,922O: 21,2323[D 6,823hX 24,296ub 24,297l 24,2922v 24,2923 6,830 6,931 21,2330 20,2331 7,1032:19,2232 8,2133 9,2034 10,1> # E I G H T #?'@22,2410-E4J8AT10,195M^9,206Yh8,217dr7,98q|20,228|6,8921,2396,71022,231011,17611,17711,172211,17236,81821,23186,919v10,29610,297%33,3414331,3415A29,3416O27,3217]25,3018k23,2819y21,262019,242117,222215,202313,182411,16259,1426 7,12277,1028 7,829*=G ******************************K ** PART 2 OF KINDIE NUMBERS **p ******************************:"JUDY GORTON'S KINDIE NUMBERS 1-6"  " **************************" " * *" " * '10,2913'10,2914&'10,29224'10,2923B'13,1530P'21,2330^'14,1631l'20,2231z'15,1732(19,2132 (16,2033(17,1934(*:10+"LOADING THE PROGRAM PLEASE WAIT ...." +(4)" RUN COUNTING HORSES"2004A$:A$"U"įT255,90:2300:3200:2200:250MT102,90:2100:3200f2000:X7:Y31:3210 A$:A$"V"įT255,90:2300:3210:2200:260 T114,180:2100:32102000:X14:Y31:3220A$:A$"W"įT255,90:2300:3220:2200:270$2200:220"T86,90:2100:3170<2000:X30:Y21:3180mA$:A$"S"įT255,90:2300:3180:2200:230T96,180:2100:31802000:X35:Y21:3190A$:A$"T"įT255,90:2300:3190:2200:240T102,90:2100:31902000:X1:Y31:30:X12:Y21:3150BA$:A$"P"įT255,90:2300:3150:2200:200\T128,180:2100:3150v2000:X18:Y21:3160A$:A$"Q"įT255,90:2300:3160:2200:210T86,90:2100:31602000:X24:Y21:3170 A$:A$"R"įT255,90:2300:3170:0:2300:3120:2200:1701T114,45:2100:3120J2000:X0:Y21:3130{A$:A$"N"įT255,90:2300:3130:2200:180T114,45:2100:31302000:X6:Y21:3140A$:A$"O"įT255,90:2300:3140:2200:190T114,45:2100:3140200A"::l"2 = EASY "::5v"3 = MODERATE"::M"4 = HARD "::e"5 = HARDEST "::lA{X1400:A17600A27500A37400A47300A57200 PA0:PA50:PA100:LPA150:PA200:D FOR HITuI15!zS16336VK(S):K(S):K(S):K(S):K(S):K(S):K(S)\SCSC70G: ADD ON POINTS- TIME TO HITPAPA5: REDUCE PAUSE:::" SCORE : ";SC1000X"ENTER DIFFICULTY LEVEL.";A$::b"1 = EASIEST H SCORE%::"HIGH SCORE : ";HSF:" YOUR SCORE : ";SC:::T16368,0w" DO YOU WANT ANOTHER TRY? ";A$A$"N"Ā CLEAR VARIABLES FOR NEXT GAMESC0:X0:Y0:XX0:YY0:XY0:LI0:10p SUBR. FOR TARGET HIT s SOUN$I13:0:1,3736(1)1:1,3736(0)2:5.12@8TX,TYIB190d **SUBR. FOR SPLAT **SO1200:S(16336):LIVELIVE1:LIVE35030: NO LIVES LEFT16368,0: RESET KEYBOARD12:SCHSHSSC: TEST FOR NEW HIGPLAT! XY126000: HIT TARGETF G0:SCSC5::::" SCORE :";SCU 0:TX,TY:v  ** PLOT TARGET **1010 G=0~ G0 TX(37(1))1 TY(37(1))1 TX,TY)01020: SQUARE OCCUPIED I13:0:1,3736(1)1:1,3736(0)2:-3XY12260: XY = COLOR OF SQUAREN A(16384):A128120: NO KEY PRESSEDz FIND KEY PRESSED AND CHANGE DIRECTION A136XX1:YY0 A149XX1:YY0 A193YY1:XX0 A218YY1:XX0 16368,0 100 XY13XY15000: S0,380:0,3838 Z1000/ d ** MAIN LOOP **6 n1a xXXXX:YYYY: UPDATE PLOTTING VALUES XYX,Y): GET COLOR OF SQUARE LANDED ON 1 X,Y: PLOT NEW HEAD GG1:G70900: TOO LONG TO HIT TARGET I0PA:: PAUSE" XY1XY1.":7 "***************************************"::] "PRESS 'RETURN' TO CONTINUE.";A$g 936q 7000 SET SPEED X2:Y2: SET STARTING POINT (:13 2XX1:YY0: SET START DIRECTION 7 DRAWER BORDERS <0,380:0,3838 F9,22:6:16,2232:33,3516:33,3419:33,3522V 15:37,22:A12000::::::: :::"************* DIRECTIONS *************" "TO MOVE 'SNAKE' USE THE TWO ARROW KEYS": "FOR HORIZONTAL, AND USE 'A' AND 'Z'": "FOR THE VERTICAL ::13:0,380:0,3838:0,380:0,3838:12:2,516:2,519:2,522:17,182:20,215:15:16,228:16,2214:9,17:10,18:11,19:12,20:13,21/ 13:16,2217:16,2222:18,2116:18,2119:9:16,2225:26,19:27,18:27,20:28,17:28,21:29,16:2     :X6:Y21:3140:T114,459DX12:Y21:3150:T128,180UNX18:Y21:3160:T86,90qXX24:Y21:3170:T86,90bX30:Y21:3180:T96,180lX35:Y21:3190:T102,90vX1:Y31:3200:T102,90X7:Y31:3210:T114,180X14:Y31:3220:T86,900X33:Y1:3050:T76,908X0:Y11:3060:T86,180SX6:Y11:3070:T96,90oX12:Y11:3080:T96,90X17:Y11:3090:T102,90X23:Y11:3100:T102,90X29:Y11:3110:T114,45&X35:Y11:3120:T114,450X0:Y21:3130:T114,45X1:YY1 |P1882:TP,3:P@X,YX:X,YX:X,YY:X,YYRX0Y39430bXX1:YY1k370z15:805,2X3:Y1:3000:T128,90X9:Y1:3010:T128,90X15:Y1:3020:T86,90X21:Y1:3030:T86,90X27:Y1:3040:T76,9" YOU";:T96,90:" COME";:T102,90:" AND";:T102,90:" PLAY";:T114,90:" WITH";:T114,90:" ME";:T128,200wT2200Y:1^P1127:805,4:T128P,1:805,1:T128P,1:PhX19:Y20rP10012:TP,3:PsX,YX:X,YX:X,YY:X,YY wX35:Y31:3250?1A$:A$"Z"įT255,90:2300:3250:2200:300Y3T114,180:2100:3250`59621:"NOW";:T128,90:" I";:T128,90:" KNOW";:T86,90:" MY";:T86,90@" A";:T76,90:" B";:T76,90:" C'S":T86,180E4mJ23:"WON'T";:T96,90:T86,90:T86,90:T96,90:2100:3220>2000:X21:Y31:3230oA$:A$"X"įT255,90:2300:3230:2200:280T96,90:T102,90:2100:3230"2000:X28:Y31:3240'A$:A$"Y"įT255,90:2300:3240:2200:290)T102,90:2100:3240,2000:X00}#X30:Y25:1400#"'5'X10:Y5:1400I$'X10:Y15:1400].'X10:Y25:1400p8'X20:Y5:1400B'X20:Y15:1400L'X20:Y25:1400Q'X30:Y5:1400V'X30:Y15:1400['X30:Y25:1400`'X20:Y35:1400j'3" COME BACK S:Y5:1400rX20:Y25:14001|X30:Y5:1400EX30:Y15:1400YX30:Y25:1400_e(#x2#X10:Y5:1400<#X10:Y15:1400F#X10:Y25:1400P#X20:Y5:1400Z#X20:Y15:1400d#X20:Y25:1400n#X30:Y5:1400x#X30:Y15:14400X30:Y251400!'X:bX10:Y5:1400NlX10:Y25:1400avX20:Y5:1400uX20:Y25:1400X30:Y5:1400X30:Y25:1400X20:Y15:1400@JX10:Y5:1400TX10:Y15:1400^X10:Y25:1400 hX20   X10:Y5# 14001 X10:Y25; 1400H X30:Y5R 1400` X30:Y25j 1400x X20:Y15 1400  p zX10:Y5 1400 X10:Y25 1400 X20:Y5 1400 X20:Y25 1400 X30:Y51,Y4X   X10:Y15* 14008 X30:Y15B 1400H N \ X10:Y25f 1400t X20:Y35~ 1400 X10:Y15 1400  X10:Y5 1400 X10:Y25 1400 X30:Y5 1400 X30:Y25 140030,3639 12 31,3334& 9  ASK QUESTIONX :"PRESS THE CORRECT KEY"^ e At AN1210 ANĺ"VERY GOOD!" 1 0,3639 PAUSE1700:PAUSE  x12 X,Y X1,X1Y1 X2,X2Y2 8 Y3E THE APPLE! WELL DONE !"> 20:"PRESS ANY KEY TO CONTINUE"J G$:G$i (4)" RUN COUNTING BOATS"o u  X20:Y15 1400  L1 V30,3233 `35,3633 j29,3734 t28,3835 ~28,3836 28,3837 29,3738 OON, WON'T YOU? " Z# dL115* iN; DRAW TREESu N1000,2000,3000,4000,5000,6000,7000,8000,9000,10000 1100: DRAW REWARD 1200: ASK QUESTION L 950  4,3,2,5,1,8,6,9,7,10,7,6,10,8,9 :10 " YOU DESERV :10% " COUNTING OBJECTS."?" -------- --------"I::c" NUMBERS 1- 10 "" DO YOU WISH TO CONTINUE OR ";#R$:R$(R$"N"80-R$"Y"1002"(THAT IS NOT AN "N" OR "Y"):?730 P:10:" COME BACK S     X2:Y7,Y8X3! % L7& Y,Y8X:X,X3Y8=+ E/ M0 Y,Y8X:Y1,Y4X1:Y4,Y6X2:Y1,Y4X3:Y,Y8X45 9 N: Y,Y8X:Y1,Y4X1:Y4,Y7X2:Y,Y8X3? C OD Y1,Y7X:Y1,Y7X3:X1,X2Y:X1,XX2,X3Y4:X1,X2Y8 ' HJ Y,Y8X:Y,Y8X3:X,X3Y4P X I{ Y,Y8X1:X,X2Y:X,X2Y8  J Y5,Y7X:Y,Y7X2:X1,Y8:X1,X3Y  K Y,Y8X:Y3,Y5X1:Y1,Y3X2:Y,Y1X3:Y5,Y7X3:X1,X2Y:X1,X2Y8" * DX Y,Y8X:Y1,Y7X3:X,X2Y:X,X2Y8^ f E Y,Y8X:X,X3Y:X,X2Y4:X,X3Y8  F Y,Y8X:X,X3Y:X,X2Y4  G Y1,Y7X:X3,Y1:Y4,Y7X3:X1,X3Y:1:l15:!42:4P11400:P:=1:E Ay Y1,Y8X:Y1,Y8X3:X1,X2Y:X1,X2Y4  B Y,Y8X:Y1,Y3X3:Y5,Y7X3:X,X2Y:X,X2Y4:X,X2Y8  C Y1,Y7X:Y1,Y2X3:Y6,Y723:"WON'T";:T96,90:" YOU";:T96,90:" COME";:T102,90:" AND";:T102,90:" PLAY";:T114,90:" WITH";:T114,90:" ME";:T128,200P13500:P::5:"DO YOU WISH TO PLAY AGAIN? ";R$R$"Y"R$"YES"20:"BYE FOR NOW." 2200:::T86,90:T96,90:T96,905X21:Y31:3230:T102,90RX28:Y31:3240:T102,90pX35:Y31:3250:T114,180w921:"NOW";:T128,90:" I";:T128,90:" KNOW";:T86,90:" MY";:T86,90" A";:T76,90:" B";:T76,90:" C'S ":T86,180455,173,48,192,136,208,5,206,9,3,240,9,202,208,245,174,8,3,76,10,3,96V100)100FLT(B13)0ĺ6P:AVE(GTNL10.5)10RZ18:8:"AVERAGE =";AVEd22:" FOR ANOTHER GO":" TO QUIT ";:A$nA$" "ĀxA$(13)Ĭ10201380LOC776798:BYTE:LOC,BYTE::D 255,2A$:A$(13)1280'12:SP:" "/ NLW4:"* "^3mB193205("* ";(B);" ";LT(B);" ";:LT(B)0ĺ(TT(B)LT(B)100)100,2LT(B)0ĺ,<(B13);" ";LT(B13);" ";:LT(B13)0ĺ(TT(B13)LT(B13)T)(K)# KEY(16384):16384,09 KEYKSPT:1240a KEY13ĺ(7);(7):SPT:T41:1240g q (7) 255:22:"YOU HAVE SCORED ";41T;" POINTS" GTGT41T:23:"GRAND TOTAL =";GT;" AVE= ";(GTNL10.5)10;" "; TT(K)TT(K)41T******************":V119:"* *"::"***************************************" LNL150 VK((1)26193) `4:9:"LETTER NUMBER ";NL jLT(K)LT(K)1 tT140 ~DL 776,T:777,10:778 12 ERAGE FOR EACH LETTER IS "::"DISPLAYED AS WELL AS ITS FREQUENCY";:A$Q 1430 :"ENTER DIFFICULTY LEVEL (1 TO 20) ";DL$ DL(DL$) DL1DL20ĺ(7):1020 DL1555DL $16384,0 .TT(300),LT(300) 81s B"*********************31:140:V:I:L$(I):N111::V:I:" "::I:12:L$(I):d ZX(KL)(KL)(KL)(KL)(KL):p A$:22G :5:"THE OBJECT OF THIS GAME IS TYPE EACH"::"LETTER BEFORE IT REACHES THE OTHER "::"SIDE OF THE SCREEN. AFTER 50 LETTERS"::"YOUR AVY"# I1(A$):L$(I)(A$,I,1):2 I1(A$)E L$(I)" "210W R((1)3)1n R240,250,260,240t { 1 1000 T39I1:140:12:T:L$(I);" ":: V111:V:I:140:L$(I):N111::V:I:" "::I:12:L$(I):= V231E d"***************************************":V119:"* *"::"***************************************"nKL16336xL$(40)150ZX(KL)(KL)(KL): A$" * LETTER INVADERS * BY P.V. MERR     4,3,134,1,133,0,170,160,1,132,2,173,48,192,136,208,4,198 " 1,240,7,202,208,246,166,0,208,239,165,3,133,1,198,2,208,241,96 "1013,76:1014,0:1015,3"J805,4"|I2,Y3X3:Y,Y1X4! "! Zf! X,X3Y:X,X3Y8:Y,Y2X3:Y3,Y4X2:Y5,Y6X1:X,Y7l! r!! 201,84,208,15,32,177,0,32,248,230,138,72,32,183,0,201,44,240,3,76,201,222,32,177,0,32,248,230 !I768833:P:I,P:I:"P 104,13 WD Y,Y8X:Y5,Y7X1:Y2,Y5X2:Y5,Y7X3:Y,Y8X4J R X Y,Y1X:Y2,Y3X1:Y3,Y5X2:Y5,Y6X3:Y7,Y8X4 Y,Y1X4:Y2,Y3X3:Y5,Y6X1:Y7,Y8X Y! Y,Y1X:Y2,Y3X1:Y4,Y8X2:Y1,Y3X:Y6,Y7X:Y1,Y2X3:Y5,Y7X3:X1,X2Y:X1,X2Y4:X1,X2Y8Wq _u Twv Y,Y8X2:X,X4Y}{  U Y,Y7X:Y,Y7X3:X1,X2Y8  V Y,Y3X:Y4,Y6X1:Y7,Y8X2:Y4,Y6X3:Y,Y3X4  2Y8 I M PBN Y,Y8X:Y1,Y3X3:X,X2Y:X,X2Y4HS PW QX Y1,Y7X:Y1,Y7X3:X1,X2Y:X1,X2Y8:X2,Y6:X4,Y8] a Rb Y,Y8X:Y1,Y3X3:Y4,Y6X2:Y6,Y8X3:X,X2Y:X1,Y4g k SQl Y['X30:Y25:1400&`'X20:Y35:1400,j',---- --------"I::c" NUMBERS 1- 10 "" DO YOU WISH TO CONTINUE OR ";#R$:R$(R$"N"80-R$"Y"1002"(THAT IS NOT AN "N" OR "Y"):?730 P:10:" COME BACK S:1400d#X20:Y25:1400-n#X30:Y5:1400Ax#X30:Y15:1400U}#X30:Y25:1400[#a't'X10:Y5:1400$'X10:Y15:1400.'X10:Y25:14008'X20:Y5:1400B'X20:Y15:1400L'X20:Y25:1400Q'X30:Y5:1400V'X30:Y15:1400X10:Y5:1400"TX10:Y15:14006^X10:Y25:1400IhX20:Y5:1400]rX20:Y25:1400p|X30:Y5:1400X30:Y15:1400X30:Y25:1400(#2#X10:Y5:1400<#X10:Y15:1400F#X10:Y25:1400P#X20:Y5:1400Z#X20:Y15X20:Y51400!X20:Y25+14008X30:Y5B1400PX30:Y25Z1400`fXybX10:Y5:1400lX10:Y25:1400vX20:Y5:1400X20:Y25:1400X30:Y5:1400X30:Y25:1400X20:Y15:1400@J0:Y25 1400 X30:Y5' 14005 X30:Y25? 1400E K X X10:Y5b 1400p X10:Y25z 1400 X30:Y5 1400 X30:Y25 1400 X20:Y15 1400  p zX10:Y5 1400 X10:Y25 1400 X2,Y2 X2,Y2 1) X1,Y4 X1,YE X1,X1Y2K Q _ X10:Y15i 1400w X30:Y15 1400  X10:Y25 1400 X20:Y35 1400 X10:Y15 1400  X10:Y5 1400 X135,35   ASK QUESTION> :"PRESS THE CORRECT KEY"D K AZ AN1210q ANĺ"VERY GOOD!"x 1 0,3639 PAUSE1700:PAUSE  x15 X,Y X2,Y X2,Y X2,X2Y1 X2,X2Y1 X2,X2Y3 OU HAVE COUNTED ALL THE GHOSTS"D 20:"PRESS ANY KEY TO CONTINUE"P G$:G$o (4)" RUN COUNTING TREES"u {  X20:Y15 1400  L15 V34,39 [36,39 `34,3638 e1 j35,39 o12 t33,3837 ~34,3636 OON, WON'T YOU? " Z# dL115* iN< DRAW GHOSTSv N1000,2000,3000,4000,5000,6000,7000,8000,9000,10000 1100: DRAW REWARD 1200: ASK QUESTION L 950  2,4,3,1,5,8,6,7,10,9,6,9,10,8,7 :10 " WELL DONE Y. :10% " COUNTING OBJECTS."?" -------- --------"I::c" NUMBERS 1- 10 "" DO YOU WISH TO CONTINUE OR ";#R$:R$(R$"N"80-R$"Y"1002"(THAT IS NOT AN "N" OR "Y"):?730 P:10:" COME BACK S     X1,Y1:X2,Y:> Y,Y7X:Y,Y7X3:X,X3Y:Y,Y2X2:} !Y,Y2X:Y4,Y7X:Y4,Y7X3:Y2,YX3:X1,X2Y3: "Y7,Y4X:Y7,Y4X3:X1,X2Y3:Y,Y2X2: #X,X3Y:X,X3Y5:X,Y1:X1,Y2:X2,Y3:X3,Y4:( $X,X3Y7:X2Y:X2,Y1:X1,Y2:f Y,Y7X:X,X3Y7:X,X3Y4:Y7,Y4X3:X1,Y3:X2,Y2:X3,Y1: X,X3Y7:X,X3Y:X,X3Y4:Y7,Y4X:Y3,Y1X3: Y,Y7X1:X,X3Y7: Y,Y7X:Y,Y7X3:X,X3Y: Y7,Y2X:Y7,Y1X3:2X3: Y,Y7X:X,X3Y:R Y,Y7X:Y,Y7X3:X,X3Y7:Y7,Y5X2:w Y,Y7X:Y,Y7X3:X,X3Y7: Y,Y7X:Y7,YX3:X,X3Y:X,X3Y7: Y,Y7X:X,X3Y7:X,X3Y4:Y7,Y4X3: Y,Y7X:Y1,Y7X3:X,X3Y7:X,2Y4:- Y,Y7X:X,X2Y4:X,X3Y7:h Y,Y7X:X,X3Y7:X,X3Y:Y,Y4X3:X2,X3Y4: Y,Y7X:Y,Y7X3:X,X3Y4: Y,Y7X1: Y,Y7X3:X,X3Y:Y,Y2X: Y,Y7X:X1,Y4:X2,Y3:X2,Y5:X3,Y6:X3,Y7:Y,YR:10% " COUNTING OBJECTS."?" -------- --------"I::c" NUMBERS 1- 10 "" DO YOU WISH TO CONTINUE OR ";#R$:R$(R$"N"80-R$"Y"1002"(THAT IS NOT AN "N" OR "Y"):?730 P:10:" COME BACK S,3224pN25,3017:25,30256zN27,2816:27,2826<NRN11,6:12,7:13,8hN30,8:31,7:32,6N10,35:11,34:12,33N29,33:30,34:31,35N9,1014:32,3314N10,1121:31,3221N9,1027:32,3327N"*** GREAT COUNTING ***"20:Y25:1400!Q'X30:Y5:14005V'X30:Y15:1400I['X30:Y25:1400]`'X20:Y35:1400cj'm N:13z*N5,38214N7,3620:7,3622>N9,3419:9,3423HN11,2018:11,2024RN13,1817:13,1825\N15,1616:15,1626fN23,3218:2300F#X10:Y25:1400)P#X20:Y5:1400=Z#X20:Y15:1400Qd#X20:Y25:1400dn#X30:Y5:1400xx#X30:Y15:1400}#X30:Y25:1400#''X10:Y5:1400$'X10:Y15:1400.'X10:Y25:14008'X20:Y5:1400B'X20:Y15:1400L'XX30:Y25:1400&X20:Y15:1400,2@EJX10:Y5:1400YTX10:Y15:1400m^X10:Y25:1400hX20:Y5:1400rX20:Y25:1400|X30:Y5:1400X30:Y15:1400X30:Y25:1400(#2#X10:Y5:1400<#X10:Y15:14 p zX10:Y5 1400) X10:Y253 1400@ X20:Y5J 1400X X20:Y25b 1400o X30:Y5y 1400 X30:Y25 1400  X bX10:Y5:1400 lX10:Y25:1400 vX20:Y5:1400 X20:Y25:1400 X30:Y5:140015 1400  % X10:Y5/ 1400= X10:Y25G 1400T X30:Y5^ 1400l X30:Y25v 1400|   X10:Y5 1400 X10:Y25 1400 X30:Y5 1400 X30:Y25 1400 X20:Y15 1400  GOOD!" 12 0,29394 PAUSE1700:PAUSE: B x15K X,YR 1c X1,X1Y1k 14| X2,X2Y2   X10:Y15 1400 X30:Y15 1400  X10:Y25 1400 X20:Y35 1400 X10:YHE COUNTING FOR NOW" 20000% + 9 X20:Y15C 1400I Q L13\ V32,35j `31,3336x j30,3439 t30,38 ~34,38 37,3832   ASK QUESTION :"PRESS THE CORRECT KEY"  A AN1210 ANĺ"VERYOON, WON'T YOU? " Z# dL115* iN; DRAW BOATSu N1000,2000,3000,4000,5000,6000,7000,8000,9000,10000 1100: DRAW REWARD 1200: ASK QUESTION L 950  7,3,8,1,5,9,4,10,2,6,8,5,7,10,9 :10 " THAT'S ALL T :10% " COUNTING OBJECTS."?" -------- --------"I::c" NUMBERS 1- 10 "" DO YOU WISH TO CONTINUE OR ";#R$:R$(R$"N"80-R$"Y"1002"(THAT IS NOT AN "N" OR "Y"):?730 P:10:" COME BACK S      7,103016,188%17,199316,1823A18,2025O18,2026]18,2027k18,2028y17,192916,18308,1731$9,1632.10,153338,10238UV # S E V E N #WXb10l10,295 m %n # S I X #+o1p8q4Er10,155Qs9,166]t8,177iu7,118uv6,109w6,910x6,811z12,276{12,287|10,1621~9,17228,92417,19248,256,8286,929 1310,131410,1315,10,1316:10,1317H10,2818V10,2919d10,3020r26,302127,302227,302327,302426,302510,302610,302711,292812,282910,142410,13251915,182014,1721,13,3122:12,3123H12,3124V15,2125d15,2126r15,212725,292525,292625,2927 # F I V E #:1310,301010,301110,301210,131 20,2622 10,3026+ 10,30279 10,3028G 10,3029M Se # F O U R #l v:1125,271024,271123,271222,271321,271420,231519,221618,211717,201816,19 #10,1828$10,3029)%10,3030/*5 I # T H R E E #O Y :12g 15,2610u 15,2611 15,2612 15,2613 15,2626 15,2627 15,2628 15,2629 15,2630 20,2619 20,2620 20,2621311,141410,1315-10,1216;24,2713I25,2814W26,2915e27,3016s 28,301728,301828,301927,302026,292125,282224,272323,2624 19,2525!17,2426"10,2127**$J ** ASK QUESTION AND CHECKFK **************************gL:"PRESS THE KEY (";N;") ";nNA}QAN1100VANĺ"VERY GOOD!"[14:0,3636:36,636` # T W O #:114,251113,261212,1510,3021& % BELL %,413e35,362:34,373:33,384:32,395:35,366kq * * BEEP AND PAUSE * *BEEP1100SOUND(16336)$BEEP)PAUSE1250:PAUSE.I ************************ 3,2,5,4,1,6,7,8,9,10,8,6,9,7,10,7,10,8,9,6,9,7,10,8,6,9,8,6,7,10N :10x "THAT'S ALL OF THE NUMBERS FOR NOW." 20:"PRESS ANY KEY TO GO TO THE MENU"; G$:G$ 1   # O N E #  :15 10,3018:10,3019:10,3020: SOON, WON'T YOU?" $ L130+ NE *** DRAW NUMBER *** N1000,2000,3000,4000,5000,6000,7000,8000,9000,10000 1020: DRAW FLOWER 1100: ASK QUESTION SOUND BUZZER N TIMES S1N:1050:S L  ,950D  225 A, F" NUMBERS WITH SOUND"K G" ======= ==== ====="S H:[ _10 d"DO YOU WISH TO CONTINUE OR "; eR$:R$ fR$"N"1 gR$"Y"110 h:"(THAT IS NOT AN 'N' OR A 'Y'):? i95 n200 :10:"COME BACK& " * 1-10 *"M " * *"t " **************************"| 20 "SELECT A PROGRAM - TYPE <1> OR <2>" :"(OR <0> TO QUIT) "; !G$:G$ (G$"1"65 -G$"2"11000 /G$"0"150 MENU *"< " * ==== *"c " * *" " * 1. NUMBERS WITH SOUND *" " * 1-10 *" " * *" " * 2. COUNTING OBJECTS *"C& ******************************K ** PART 2 OF KINDIE NUMBERS **p ******************************:"JUDY GORTON'S KINDIE NUMBERS 1-6"  " **************************" " * *" " *               NS => ";:(36):- /A$:(16384)27ī470] 2O(A$"D")4(A$"M")3(A$"S")2(A$"A")x 4(16384)63İ5000:5 7O047 8 :O3O4ĺ"FOR WHAT NUMBER?":"(0 GIVES RANDOM SELECTION)";:BB$:BB(BB$) ;BB1BB9ī55 <::"SELECT DI030 X0:YY9  Y4530001 : GOTO30055Y1 C$:C$"*"Ā' C$" "30226 C(C$)64G C$"?"C27X C$"!"C28k (C$)273000~ C28C13010 C10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34,35,36,37 0:X,X3Y1:3 XX5:X363NO, ";N$;" TRY AGAIN: ";:W1$-,W1$W$400Q6"NO, THE RIGHT SPELLING IS: ";cFL1:52:250m1000FL0::((1)15)1200 HOUSE,DOG,CAT,BAT,TOP,*T15500:: :16302,0:X0:Y9 0:S4047:0,39S::3 X,X348H:Z1,Z1((A$,Z1,1))48((A$,(Z2),1))48V:Z:_d:"HELLO, WHAT'S YOUR NAME ?";N$gW$xW$"*"240:200X0:Y9:T1(W$):C$(W$,T,1):3011:FL14201000:3:W1$W1$W$40050""Y6,Y4X3:X,Y6:Y4,Y2X2:X2,Y:B %Y7,Y2X2:X2,Y: 2A$"4202611820335037330:4045645036736107427907268429420420":54 4A$"4202611820335037330:4015315615915026426826127727268429" 6((1)15)197H15:V25:Z1523:Z1((A$,Z,1))Y15:1400}#X30:Y25:1400$#*'='X10:Y5:1400Q$'X10:Y15:1400e.'X10:Y25:1400x8'X20:Y5:1400B'X20:Y15:1400L'X20:Y25:1400Q'X30:Y5:1400V'X30:Y15:1400['X30:Y25:1400`'X20:Y35:1400j'BACK ShX20:Y5:1400&rX20:Y25:14009|X30:Y5:1400MX30:Y15:1400aX30:Y25:1400gm(#2#X10:Y5:1400<#X10:Y15:1400F#X10:Y25:1400P#X20:Y5:1400Z#X20:Y15:1400d#X20:Y25:1400n#X30:Y5:1400 x#X30:5 1400X30:Y25#1400)/XBbX10:Y5:1400VlX10:Y25:1400ivX20:Y5:1400}X20:Y25:1400X30:Y5:1400X30:Y25:1400X20:Y15:1400@JX10:Y5:1400TX10:Y15:1400^X10:Y25:1400 1400  ! X10:Y5+ 14009 X10:Y25C 1400P X30:Y5Z 1400h X30:Y25r 1400 X20:Y15 1400  p zX10:Y5 1400 X10:Y25 1400 X20:Y5 1400 X20:Y25 1400X30:Y5 X1,Y1  ( X10:Y152 1400@ X30:Y15J 1400P V d X10:Y25n 1400| X20:Y35 1400 X10:Y15 1400  X10:Y5 1400 X10:Y25 1400 X30:Y5 1400 X30:Y2537 29,3738 30,3639$ 7  ASK QUESTIONV :"PRESS THE CORRECT KEY"\ c Ar AN1210 ANĺ"VERY GOOD!" 1 0,3639 PAUSE1700:PAUSE  x7 X,Y1 X,X2Y 9 X,Y1 X2,Y1 1UNTED ALL THE HORSES", :"* WELL DONE *"Q 20:"PRESS ANY KEY TO CONTINUE"] G$:G$| (4)"RUN COUNTING GHOSTS"   X20:Y15 1400  L12 V30,3133 `35,3633 j29,3734 t28,3835 ~28,3836 28,38OON, WON'T YOU? " Z# dL115* iN< DRAW HORSESv N1000,2000,3000,4000,5000,6000,7000,8000,9000,10000 1100: DRAW REWARD 1200: ASK QUESTION L 950  2,4,3,1,5,8,6,7,10,9,6,9,10,8,7 :10 " YOU HAVE CO :10% " COUNTING OBJECTS."?" -------- --------"I::c" NUMBERS 1- 10 "" DO YOU WISH TO CONTINUE OR ";#R$:R$(R$"N"80-R$"Y"1002"(THAT IS NOT AN "N" OR "Y"):?730 P:10:" COME BACK S    18,202618,2027*18,2028817,1929F16,1830S8,1731`$9,1632n.10,1533{38,10238UV # S E V E N #WXb10l10,295v10,29610,29733,341431,341529,3416155s9,166t8,177(u7,1184v6,109@w6,910Lx6,811Yz12,276f{12,287t|10,1621~9,17228,92417,19248,256,8286,9297,103016,18817,19916,182318,20250,281810,2919#10,3020126,3021?27,3022M27,3023[27,3024i26,3025w10,302610,302711,292812,282910,142410,1325m n # S I X #opq4r10,2,312415,2125#15,2126115,2127?25,2925M25,2926[25,2927agy # F I V E #:1310,301010,301110,301210,131310,131410,131510,131610,13171,3029  $ # F O U R #+ 5:11C25,2710Q24,2711_23,2712m22,2713{21,271420,231519,221618,211717,201816,191915,182014,172113,312212,31231 R E E #  :12& 15,26104 15,2611B 15,2612P 15,2613^ 15,2626l 15,2627z 15,2628 15,2629 15,2630 20,2619 20,2620 20,2621 20,2622 10,3026 10,3027 10,3028 1025,281426,2915$27,30162 28,3017@28,3018N28,3019\27,3020j26,2921x25,282224,272323,2624 19,2525!17,2426"10,2127#10,1828$10,3029%10,3030*  # T HKEY (";N;") ";NA$QAN1100;VANĺ"VERY GOOD!"U[14:0,3636:36,636m]PAUSE1700:PAUSEs`y # T W O #:114,251113,261212,151311,141410,131510,121624,2713 13:35,362:34,373:33,384:32,395:35,366@Fc * * BEEP AND PAUSE * *i)PAUSE1250:PAUSE.I **************************J ** ASK QUESTION AND CHECKK **************************L:"PRESS THE 9,6,9,7,10,8,6,9,8,6,7,10# :10M "THAT'S ALL OF THE NUMBERS FOR NOW."y 20:"PRESS ANY KEY TO GO TO THE MENU"; G$:G$ 1   # O N E #  :15 10,3018:10,3019:10,3020:10,3021    % BELL %BACK SOON, WON'T YOU?" ( L130/ NI *** DRAW NUMBER *** N1000,2000,3000,4000,5000,6000,7000,8000,9000,10000 1020: DRAW FLOWER 1100: ASK QUESTION L  ,950  3,2,5,4,1,6,7,8,9,10,8,6,9,7,10,7,10,8, 225 A. F" RECOGNISING NUMBERS "O G" =========== ======= "W H:_ _10 d"DO YOU WISH TO CONTINUE OR "; eR$:R$ fR$"N"1 gR$"Y"110 h:"(THAT IS NOT AN 'N' OR A 'Y'):? i95 n200 :10:"COME & " * 1-10 *"M " * *"t " **************************"| 20 "SELECT A PROGRAM - TYPE <1> OR <2>" :"(OR <0> TO QUIT) "; !G$:G$ (G$"1"65 -G$"2"11000 /G$"0"150 MENU *"< " * ==== *"c " * *" " * 1. RECOGNISING NOS *" " * 1-10 *" " * *" " * 2. COUNTING HORSES *"& ******************************K ** PART 2 OF KINDIE NUMBERS **p ******************************:"JUDY GORTON'S KINDIE NUMBERS 1-6"  " **************************" " * *" " *          (F$,1)"A"(F$,1)"Z"ĺ(7):3005; *** SAVE LIST ***N D$;"OPEN ";F$c D$;"DELETE ";F$v D$;"OPEN ";F$ D$;"WRITE ";F$ NR N1NR WRD$(N)  D$;"CLOSE ";F$& 750 ********************** *** GET LIST G SPELLING LIST":" ---------------------"k 2:12:"DO YOU WANT TO SAVE THIS LIST? (Y/N) ";:F$ F$"Y"F$"y"F$"N"F$"n"3006:F$"N"F$"n"Ĭ 12:1:868:" PLEASE ENTER A NAME FOR THIS LIST."::" => ";F$:F$""3008" :WN(WN$):WN02115&WNNR2260h23:1:958:" THERE'S NO SUCH WORD NUMBER!":T11500:r211523:1:958:"ENTER NEW WORD NUMBER ";WN;"? ";WRD$(WN)L ::2020 **********************2 :4:" STORIN23:1:958:" PRESS TO LIST WORDS AGAIN."dH"DO YOU WANT TO CHANGE ANY WORDS? (Y/N) ";mRAN$xz34,21AN$(27)ĉ::2020AN$"N"N$"n"ĉ:3005AN$"Y"AN$"y"213023:1:958"CHANGE WHICH WORD NUMBER? ";WN$`NR0ġ:100+ **********************E *** CHECK LIST ***Kv" FOLLOWING IS THE WORD LIST:":34,2|N1NRN20(N20)ĺ:"PRESS FOR MORE. ";:ZZ$: 5"WORD NUMBER "; N;*" ";WRD$(N)44CS TO PRACTICE WITH.";<"PRESS AFTER EACH WORD."B"TO FINISH, PRESS ON AN EMPTY LINE."::34,(37)N1100$5."WORD NUMBER ";8N;B"? ";WRD$(N)LWRD$(N)""NN1:1112V:N100XZNRN3 p10010z9104010)5010/BD$;"OPEN ";F$UD$;"READ ";F$]NRiN1NRvWRD$(N)|D$;"CLOSE ";F$800 ********************** *** INPUT ROUTINE ***10100 "YOU ARE ENTERING WORDMENU ***:10100)1000/710@105G9j " WHAT IS YOUR NAME? ";NAME$|NAME$""760 20000*54" OK, ";NAME$;". WE'LL START NOW.">HR" FIRST WORD:":\WRD$(1)""900fDSAN$AN$(27)440v3:13:"THANKS FOR USING:":::" ONE MOMENT PLEASE."::(4)"RUN PROGRAMS"AN$"I"İ11010AN$"P"İ11210AN$"L"ġ:4000AN$(13)430 ***********************400 *** INSTRUCTIONS OR CHANGE PARAMETERS. ******* 4 12 " PRESS 'I' FOR INSTRUCTIONS 'P' TO CHANGE PARAMETERS 'L' TO LOAD A SPELLING LIST TO EXIT PROGRAM OR TO CREATE A NEW LIST. => "; (Q) TO QUIT ";` A216,0i EAN$| J:AN$"Q"630 OAN$"S"930 TAN$"P"ī4000 ^AN$"N"ī315 h1000,  ******* THIS SUBROUTINE WILL GIVE YOU THE CHANCE TO GET *** SKIP TO NEW WORD LIST QUERY IF PROGRAM HAS JUST BEEN SAVED WITH NEW VALUES ***l :IF CH = 1 THEN 520u 500 ;:10U @" INPUT (S)AME SPELLING LIST (P)REVIOUSLY SAVED SPELLING LIST (N)EW SPELLING LIST ELLER":34,8 v xD$(4)9 G$(7): *** BELL ***W *********************** *** DEFAULT VALUES OF RESPONSE TIME, NUMBER OF WRONG GUESSES ALLOWED AND DISPLAY TIME FOR EACH WORD *** SEC8 NW3 SHW3 F$"" NAME$""S ****************** ! [93= \:(4)"DELETE SCRATCH"H ]216,0W ^WRD$(100)g `TEMP$(100)o a: bBL$" " d105:120 i n s:41):T15:40:2)::39)::3:13:"UP TIME PRESENTS:":5:15:"SUPER SPI) UP^TIME 946 ****************** Q *** ***n *** THE *** ( *** *** - *** SUPER ***< *** *** F *** SPELLER *** P *** ***  Z                N110:S3%(N,2):N' :16302,07 C((1)8)D C3200Q C4200^ C7200k C1200 SH((1)7)10 SH12225 SH16225 WUN((1)10) WUN2240 WUN9240 TWO((1)10) TWO1255 TWO8255 10,10,35,35,60,60,85,85,110,150T 195,225,195,225,195,225 ,195,225,195,212 10,10,35,35,60,60,85,85,110,150 N110:S1%(N,1):N N110:S1%(N,2):N N110:S2%(N,1):N N110:S2%(N,2):N N110:S3%(N,1):N! 1000d650=i(4);"BLOAD SETS":232,136:233,19CnQs16302,0[x1:0}S1%(10,2):S2%(10,2):S3%(10,2): 5,35,5,35,5,35,5,35,5,22 10,10,35,35,60,60,85,85,110,150 100,130,100,130,100,130,100,130,100,123$     2,X2Y3Y1,Y5X/4X2,X1Y35>BX2,Y1OX1,Y2ZX,Y3gX1,Y4tX2,Y5X2,Y5X1,Y4X1,Y2X2,Y1X,Y1 X,Y5 X2,X2Y3 :"'MASTER MATH' IS AN ELEMENTA,X2Y7^Y,Y7X3$hX2,Y15rY4,Y7X2;|JX3,X2YYY,Y7X2_nX3,X2YX3,X2Y3X3,X2Y7&Y,Y7X30Y,Y7X2:lX3,X2YvX3,X2Y3Y,Y3X3Y,Y7X2 XY1,Y7X22X,X2Y3+<X3,X2Y78FX3,Y6>PMxY,Y4X3\Y,Y7X1mX3,X2Y4sX3,X2YX3,X2Y3X3,X2Y7Y,Y3X3Y4,Y7X2X3,Y6@X3,X2YJX3,X2Y4TX3X3,X2Y%X3,X2Y74Y,Y7X3CY,Y7X2ITLX1,YaVY,Y6Xr`X1,X1Y7xjX3,Y1X3,X2YY1,Y3X2X3,X2Y4Y4,Y7X3X3,X2Y7X3,Y1X3,X2Y (45016302,0:16304,0:16297,0:34,0:::12:5:"WE HOPE YOU ENJOYED MASTER MATH."::"PLEASE WAIT. WE ARE EXITING TO THE MENU.":15:"THANK YOU!":(4);"RUN PROGRAMS"N11000,1100,1200,1300,1400,1500,1600,1700,1800,1900,2000,2100,2200,2300T:1:21:"PROBLEMS RIGHT ";NR;" PROBLEMS WRONG ";NW;:MYTTTPī440T^0bcR1X20odR2X0{hL035rX,X19L|LR2ī12412523:1:"DO YOU WANT TO DO MORE? (Y/N)";:868A$:A$"Y"Ĺ34,0:5A$"N"K(K$)0L2232+X14,X3L2L9 EG!KCī300V"NM1ī305d#N12:900p$NMNM1'NM1NWNW1:281,NM0NRNR11Z(C10):NC(Z10):9006Z0ī335@NZ:XX8:900JXX8OTPNRNWR340:345=B:Y10 Z(M10)# R1X141 R2X34E NM(Z10):900R Z0260e NZ:XX8:900o XX8v L XX8 X,X1220 NO9:900 XX8:Y22 NM0340:23:1:"PLEASE ENTER YOUR ANSWER FOR "A;T$;B": ";:868:"";K$:(1)G) BB0BBB& DL4ī1508 A2B2ī130^ O3CAB:DA:T$"+":O1T$"-" O2CAB:DA:T$"*":O3T$"/" O4B0ī135 DL3C10ī130 O2O4AC:CD E((1)15)1 E L12 L1MA:Y0 L2MFFICULTY LEVEL: (1-4) ";5 ADL$:DL(DL$):DL;(8);G CDL1DL465 F::"HOW MANY PROBLEMS WOULD YOU LIKE? ";:"";TT$:TT(TT$):TT1Ĭ PNR0:NW0 c dDL1G4 nDL2G6 xDL3DL4G10 |R0 }RR1 A((1)G) B(  :(4)"RUNMENU"16,175D11000:D,:16302,0:1802'770,173:771,48:772,192:773,136:774,208:775,5:776,206:777,1:778,3:779,240:780,9:781,202'782,208:783,245:784,174:785,0:786,3:787,76:788,2:789,3:790,96:791,0:792,0$' NSO 0P(A$)1a 13:(A1%(P)5),Y5(A1%(P)5),Y25A1%(WUN)30,Y25A1%(WUN)30,Y5A1%(P)5,Y5q :21170,175 <FL111:22216,160:D120:D:FL ?A$ D(A$)ANS600 I20000 N575 X22216,160 ]768,10:769,10:770b(ANS1)200:ZZ105:SO2004 23A2%(P),Z:PP(A2%(P)10),ZZX 23A2%(P),Z:PP(A2%(P)10),ZZx 768,SO:769,5:770:SOSO6 23A2%(P),Z:PP(A2%(P)10),ZZ ZZ4:ZZZZ4:Z25530 505 CC:SHA1%(P),Y &PP1:PPPP1:P(A$)560 +500 J(A$)1380" O(A$)WUN3805 T(A$)WUN380E ^22125,160_ c3:((A$)1)125,175h h390s |20000| 325 ANSWUN(A$) P1(A$) PPP1 23A2%(P),100:PP(A2%(P)10),105:PPPP1:P P1:PP2 D11000:D Z1 C:SHA1%(P),Y:768,SO:769,15:770:PQ FL111:2225,160:D120:D:FLY A$l (A$)WUN300w "20000 '280 ,2225,160 1768,10:769,10:770 63:(WUN1)25,175 ;2070,175 @FL111:22125,160:D120:D:FL EA$ C((1)8) C3180* C41807 C7180D C1180R C1CC2` C2CC5n C5CC6| C6CC1 SH((1)7)10 SH12225 SH16225 WUN((1)10) WUN2240 WUN9240 P1WUN SO100(P10)*N 10004(4);"BLOAD SETS":232,136:233,19?Z10000Od:16302,0Yn1:0mA1%(9):A2%(9) 5,35,65,95,125,155,185,215,245 5,35,65,95,125,155,185,215,245 N19:A2%(N):NN19:A1%(N):N Y30:YY110     790,96:791,0:792,0 '{SO801205:768,SO:769,3:770:NSO801205:768,SO:769,3:770:T770,173:771,48:772,192:773,136:774,208:775,5:776,206:777,1:778,3:779,240:780,9:781,202782,208:783,245:784,174:785,0:786,3:787,76:788,2:789,3:170,2:C:P1?FL0%DFLFL1XIC:SHS1%(P,1),S1%(P,2):SHS3%(P,1),S3%(P,2)gND150:DuSFL2620X768,3:769,5:770]0:SHS1%(P,1),S1%(P,2):SHS3%(P,1),S3%(P,2)bD150:Dg580lPANS630qFL0:PP1:580vS2%(P,2):768,SO:769,10:7709SHS1%(PP,1),S1%(PP,2)G FL4555VD150:Ds0:SHS2%(P,1),S2%(P,2)SHS1%(PP,1),S1%(PP,2)!D150:D&510+PTWO5650FL0:PP1:PPPP1:SOSO12:51053:170,2170,130275,130275,210,2)768,10:769,10:770E3:(ANS1)S3%(10,1),S3%(10,2):CVD12000:D_195nP1TWO:~WP1WUN:PP(WPP)1C1CC2C2CC5C5CC6C6CC1SO150FL0:P1FLFL1CC:SHS2%(P,1),TWO385 w635 |3656 22S2%(10,1),S2%(10,2)O 768,10:769,10:770v 3:(TWO1)S2%(10,1),S2%(10,2):C D11000:D 465 21170,150 22S3%(10,1),S3%(10,2) A$ (A$)ANS440 635 42022S3%(10,1),S3%(768,10:769,10:770< J3:(WUN1)S1%(10,1),S1%(10,2):CK O2076,150[ TD1500:Dh YP1TWOz ^SO200(P10) cC:SHS2%(P,1),S2%(P,2):D150:D:768,SO:769,10:770:P hFL17:22S2%(10,1),S2%(10,2):D120:D:FL mA$ r(A$) TWOWUN240! ANSWUNTWO. P1WUN@ SO100(P10) "C:SHS1%(P,1),S1%(P,2):D150:D:768,SO:769,10:770:P 'FL17:22S1%(10,1),S1%(10,2):D120:D:FL ,A$ 1(A$)WUN320 6635 ;300 @22S1%(10,1),S1%(10,2) Ez#  ŠΠħ  ̠ ̠ ̠! ̠ҠȠŠΠĠǠŠɠ ´  µ  Ӡ̠5έҠӠ̠ Ӡ ³  ´µ  ± Ҡ̠  ² ³  ǠӠ ҠӠ ǠӠ Š à± ² !ՠ ϠҠҠ+ ӠԠĠ ǠӠ ӠҠˠ ǠӠ 801205:768,SO:769,3:770:E%NSO801205:768,SO:769,3:770:K*N6,175D11000:D+:16302,0:1801'770,173:771,48:772,192:773,136:774,208:775,5:776,206:777,1:778,3:779,240:780,9:781,202'782,208:783,245:784,174:785,0:786,3:787,76:788,2:789,3:790,96:791,0:792,0$' NSO0P(A$)1` 13:(A1%(P)5),Y5(A1%(P)5),Y25A1%(WUN)30,Y25A1%(WUN)30,Y5A1%(P)5,Y5p :21170,175 <FL111:22216,160:D120:D:FL ?A$ D(A$)ANS600 I20000 N575 X22216,160 ]768,10:769,10:770b(ANS1)2100:ZZ105:SO2004 23A2%(P),Z:PP(A2%(P)10),ZZX 23A2%(P),Z:PP(A2%(P)10),ZZx 768,SO:769,5:770:SOSO6 23A2%(P),Z:PP(A2%(P)10),ZZ ZZ4:ZZZZ4:Z25530 505 0:SHA1%(P),Y &PP1:PPPP1:P(A$)560 +500 J(A$)1380" O(A$)WUN3805 T(A$)WUN380E ^22125,160_ c3:((A$)1)125,175h h390s |20000| 325 ANSWUN(A$) P1(A$) PPP1 23A2%(P),100:PP(A2%(P)10),105:PPPP1:P P1:PP2 D11000:D Z1 C:SHA1%(P),Y:768,SO:769,15:770:PQ FL111:2225,160:D120:D:FLY A$l (A$)WUN300w "20000 '280 ,2225,160 1768,10:769,10:770 63:(WUN1)25,175 ;2070,175 @FL111:22125,160:D120:D:FL EA$ C((1)8) C3180* C41807 C7180D C1180R C1CC2` C2CC5n C5CC6| C6CC1 SH((1)7)10 SH12225 SH16225 WUN((1)10) WUN2240 WUN9240 P1WUN SO100(P10)*M 10004(4);"BLOAD SETS":232,136:233,19?Z10000Od:16302,0Yn1:0mA1%(9):A2%(9) 5,35,65,95,125,155,185,215,245 5,35,65,95,125,155,185,215,245 N19:A2%(N):NN19:A1%(N):N Y30:YY110 (4);"RUN HELLO")4)(LN15.cJd ** PROGRAMS TITLES **PenSU$(1)"BATNUM":SU$(2)"IQ TEST":SU$(3)"MINDWARP":SU$(4)"JIG-SAW PUZZLE":SU$(5)"WUMPUS 2":SU$(6)"REACTOR": xSU$(7)"TEXT OTHELLO":SU$(8)"JOTTO":SU$(9)"FOLLOW ME":S ŠˠϮōǭנōӍנōōЍԠҍӠōΠύŠԠԍ 801205:768,SO:769,3:770:F%NSO801205:768,SO:769,3:770:L*N0:SHS2%(P,1),S2%(P,2)SHS1%(PP,1),S1%(PP,2)!D150:D&510+PTWO5650FL0:PP1:PPPP1:SOSO12:51053:170,2170,130275,130275,2170,2:C2 :3:100? Y,Y7X:Y,Y7X3:X,X3Y3:X,X3Y7: Y,Y7X:Y1,Y3X3:Y5,Y6X2:X,X3Y:X,X3Y4:X,X2Y7: Y,Y7X:X,X3Y:X,X3Y7: Y,Y7X:X,X2Y:X,X2Y7:Y1,Y6X3: Y,Y7X:X,X3Y:X,X3Y7:X,X        :"YOU THE OPPORTUNITY TO RE-TRY MISSED "::"WORDS."`:"IF YOU HAPPEN TO MISS SEEING A WORD AS "::"IT IS FLASHED ON THE SCREEN, YOU "::"MAY HIT >RETURN< TO HAVE THE SAME WORD"::"DISPLAYED AGAIN."2000q:::"AT THE END OF THE QUIZ, Y:"THEM FOR SPELLING PRACTICE. IT WILL "::"THEN FLASH EACH WORD ON THE SCREEN AND"::"PROVIDE TWO OPPORTUNITIES TO SPELL IT"::"CORRECTLY."B2000L:6V:"EACH WORD MISSPELLED ON BOTH ATTEMPTS"::"WILL BE RECORDED AS AN ERROR PROVIDING": SPELLING WORDS OR RETRIEVED A SAVED"::"LIST FROM A FILE."F$2000.:::"YOU MAY GENERATE LISTS OF UP TO 100 "::"SPELLING WORDS (LIMIT MAY BE CHANGED IN"::"LINE 70). THE PROGRAM WILL OPTIONALLY "::"SHUFFLE YOUR WORDS BEFORE PRESENTING"8 ***"::;:13:"DOCUMENTATION":13:"-------------":"SPELLING BEE IS A PROGRAM DESIGNED TO "::"TEACH SPELLING AND PROVIDE PRACTICE."::"IT IS NOT INTENDED TO TEST SPELLING"::"SKILLS."<:"THE PROGRAM ALLOWS YOU TO ENTER A LIST"::"OF/*"770 NNNN1(*D$;"CLOSE "SF$.44>::H:@R:S * SCRAMBLE *_S1NNsIX((1)NN)1TEMP$WW$(S):WW$(S)WW$(IX):WW$(IX)TEMP$S:::: * DOCUMENTATION * ::::9:"*** SPELLING BEE(TRY 'OFTEN MISSPELLED'?)":16E:"ENTER NAME OF SPELLFILE: ";SF$p(SF$)12SF$"SPELLFILE - "SF$:740(SF$,12)"SPELLFILE - "SF$"SPELLFILE - "SF$D$;"OPEN "SF$D$;"READ "SF$NN0NNNN1 WW$(NN)WW$(NN)")12SF$"SPELLFILE - "SF$:560V&(SF$,12)"SPELLFILE - "SF$"SPELLFILE - "SF$j0D$;"OPEN "SF$:D$;"WRITE "SF$DI1NNNWW$(I)XIb"/*"lD$;"CLOSE "SF$v:::: * READ SPELLFILE * 22:" AGAIN? (Y/N) ";:16368,0:Q$.Q$"Y"ī220@Q$"N"ī460YWW$(NN1)"/*"ī630:::"WOULD YOU LIKE TO SAVE YOUR"::"SPELLING LIST? (Y/N) ";:16368,0:Q$Q$"N"ī630Q$"Y"ī500::"ENTER SPELLFILE NAME: ";SF$ (SF$;" WORDS."_ RTNNĺ:"* * * C O N G R A T U L A T I O N S !"::"YOU GOT THEM ALL!":460 :"WOULD YOU LIKE TO REVIEW THE WORDS YOU GOT WRONG? ";:16368,0:Q$ Q$"Y"230 Q$"N"430:"WOULD YOU LIKE TO GO THROUGH"::"THE LIST C O R R E C T ! ! !":ER(J)1:380; TXX0ī370D ^XX1c h"SORRY - TRY AGAIN.":300 r"SORRY, THE CORRECT SPELLING IS: "::" >>> ";:WW$(J) |I12000:I XX0 J ::"YOU GOT ";RT;" WORDS RIGHT"::"OUT OF ";NNč׍ō΍ OF THE TYPE DESIRED.":23:" PRESS 'RETURN' TO CONTINUE =>";:X$:TRY LEVEL ":"MATH TUTORIAL. IT WILL ALLOW THE STU- ":"DENT TO CHOOSE THE ARITHMETIC FUNCTION ":"TO WORK ON AS WELL AS A ANY NUMBER WHICH":"MAY REQUIRE SPECIAL ATTENTION. TO USE "F"'MASTER MATH', SELECT THE OPERATION WITH":"THE FIRST LETTERÍō̍Ѝٍ̍̍̍΍ȍҍōǍԍōٍԍōōԍԍԍύ̍ōōӍȍ΍ٍҍōōٍōōԍō΍ҍ΍ōōԍˍٍ΍̍ЍҍōōƍԍӍٍɍӍč J(A$)1380" ODT(w5δ X Ue-Ȍ]ȔëY^, ɠaȸ÷yȴKaDOʉ-P[ș`[I -|[ʙPY^ 向Z^ J JZ^ J C:SHA1%(P),Y:768,SO:769,15:770:PQ FL111:2225,160:D120:D:FLY A$l (A$)WUN300w "20000 '280 ,2225,160 1768,10:769,10:770 63:(WUN1)25,175 ;2070,175 @FL111:22125,160:D120:D:FL EA$ C((1)8) C3180* C41807 C7180D C1180R C1CC2` C2CC5n C5CC6| C6CC1 SH((1)7)10 SH12225 SH16225 WUN((1)10) WUN2240 WUN9240 P1WUN SO100(P10)* 10004(4);"BLOAD SETS":232,136:233,19?Z10000Od:16302,0Yn1:0mA1%(9):A2%(9) 5,35,65,95,125,155,185,215,245 5,35,65,95,125,155,185,215,245 N19:A2%(N):NN19:A1%(N):N Y30:YY110   787,76:788,2:789,3:790,96:791,0:792,00$'W NSO801205:768,SO:769,3:770:~%NSO801205:768,SO:769,3:770:*N:450) 22216,160:768,10:769,10:770> (ANS1)216,175O D11000:Dd :16302,0:180j  '770,173:771,48:772,192:773,136:774,208:775,5:776,206:777,1:778,3:779,240:780,9:781,202*'782,208:783,245:784,174:785,0:786,3:P),Z ZZ10:C:SHA1%(P),Z. Z100430N 768,SO:769,3:770:SOSO5W 405l CC:SHA1%(P),Z} 23A1%(P),Y PP1:P(A$)440 401 21170,175 FL111:22216,160:D120:D:FL A$ (A$)ANS500 20000  J(A$)1380" O(A$)WUN3805 T(A$)WUN380E ^22125,160e _P1(A$):23A1%(P),YY:P c3:((A$)1)125,175 h390 |20000 325 ANSWUN(A$) D11000:D P1(A$) ZY:SO100 23A1%(P),110 0:SHA1%( C:SHA1%(P),Y:768,SO:769,15:770:PQ FL111:2225,160:D120:D:FLY A$l (A$)WUN300w "20000 '280 ,2225,160 1768,10:769,10:770 63:(WUN1)25,175 ;2070,175 @FL111:22125,160:D120:D:FL EA$ C((1)8) C3180* C41807 C7180D C1180R C1CC2` C2CC5n C5CC6| C6CC1 SH((1)7)10 SH12225 SH16225 WUN((1)10) WUN2240 WUN9240 P1WUN SO100(P10)* 10004(4);"BLOAD SETS":232,136:233,19?Z10000Od:16302,0Yn1:0mA1%(9):A2%(9) 5,35,65,95,125,155,185,215,245 5,35,65,95,125,155,185,215,245 N19:A2%(N):NN19:A1%(N):N Y30:YY110   T19::7:" ";:34:" ";:::7:28):G 13:11:"'A' = ADDITION"h #15:11:"'S' = SUBTRACTION" (17:11:"'M' = MULTIPLICATION" -19:11:"'D' = DIVISION" .:23:3:" SELECT FUNCTION OR 'ESC' TO EXIT ":3:" PRESS '?' FOR INSTRUCTIOG:16302,0:16304,0:16297,0:1:1:958::1 :41):T15:40:2)::39)::3:13:"UP TIME PRESENTS:":5:16:"MASTER MATH" :7:12:"BY: DAVID S. HARNED":34,89:8:"SELECT ARITHMETIC OPERATOR:") 11:7::28):        qFL0:PP1:580vA{SO801205:768,SO:769,3:770:hSO801205:768,SO:769,3:770:n770,173:771,48:772,192:773,136:774,208:775,5:776,206:777,1:778,3:779,240:780,9:781,202.782,208:783,245:784,174:785,0:7860,2170,130275,130275,2170,2:C*:P13?FL0?DFLFL1rIC:SHS1%(P,1),S1%(P,2):SHS3%(P,1),S3%(P,2)ND150:DSFL2620X768,3:769,5:770]0:SHS1%(P,1),S1%(P,2):SHS3%(P,1),S3%(P,2)bD150:Dg580lPANS630FL17CC:SHS2%(P,1),S2%(P,2):768,SO:769,10:770SSHS1%(PP,1),S1%(PP,2)a FL4555pD150:D0:SHS2%(P,1),S2%(P,2)SHS1%(PP,1),S1%(PP,2)!D150:D&510+PTWO5650FL0:PP1:PPPP1:SOSO12:510"53:17768,10:769,10:770:3:(ANS1)S3%(10,1),S3%(10,2):CKD12000:Dc(4);"NOMON I,C,O"y(4);"RUN SUB22"P1TWO:WP1WUN:PP(WPP)1C1CC2C2CC5C5CC6C6CC1SO150FL0:P1FLw635 |365+ 22S2%(10,1),S2%(10,2)D 768,10:769,10:770k 3:(TWO1)S2%(10,1),S2%(10,2):C| D11000:D 465 21170,150 22S3%(10,1),S3%(10,2) A$ (A$)ANS440 635 420 22S3%(10,1),S3%(10,2)69,10:7701 J3:(WUN1)S1%(10,1),S1%(10,2):C@ O2076,150P TD1500:D] YP1TWOo ^SO200(P10) cC:SHS2%(P,1),S2%(P,2):D150:D:768,SO:769,10:770:P hFL17:22S2%(10,1),S2%(10,2):D120:D:FL mA$ r(A$)TWO385 UN240 ANSWUNTWO# P1WUN5 SO100(P10)u "C:SHS1%(P,1),S1%(P,2):D150:D:768,SO:769,10:770:P 'FL17:22S1%(10,1),S1%(10,2):D120:D:FL ,A$ 1(A$)WUN320 6635 ;300 @22S1%(10,1),S1%(10,2) E768,10:7S3%(N,2):N :16302,0, C((1)8)9 C3200F C4200S C7200` C1200t SH((1)7)10 SH12225 SH16225 WUN((1)10) WUN2240 WUN9240 TWO((1)10) TWO1255 TWO8255 TWOW35,35,60,60,85,85,110,150I 195,225,195,225,195,225 ,195,225,195,212v 10,10,35,35,60,60,85,85,110,150 N110:S1%(N,1):N N110:S1%(N,2):N N110:S2%(N,1):N N110:S2%(N,2):N N110:S3%(N,1):N N110:5 d6502i(4);"BLOAD SETS":232,136:233,198nFs16302,0Px1:0u}S1%(10,2):S2%(10,2):S3%(10,2)}: 5,35,5,35,5,35,5,35,5,22 10,10,35,35,60,60,85,85,110,150 100,130,100,130,100,130,100,130,100,123 10,10,  83,245:784,174:785,0:786,3:787,76:788,2:789,3:790,96:791,0:792,0O$'v NSO801205:768,SO:769,3:770:%NSO801205:768,SO:769,3:770:*NA$)ANS600I20000N575/X22216,160H]768,10:769,10:770]b(ANS1)216,175nD11000:D:16302,0:180'770,173:771,48:772,192:773,136:774,208:775,5:776,206:777,1:778,3:779,240:780,9:781,202I'782,208:7 7FL14 8P(A$)ANS572j 9CC:SHA2%(P),YY:D110:D:0:SHA2%(P),YY:SHA1%(P),Y:D110:D :C:SHA1%(P),Y:CC:SHA2%(P),YY:768,15:769,8:770:FL:PP1:567 ;D1100:D:567 <FL111:22216,160:D120:D:FL ?A$ D(D 768,SO:769,10:770:P+ P1:PP2E 0P(A$)1:D1800:D 13:(A2%(P)5),YY5(A2%(P)5),YY25A2%(WUN)30,YY25A2%(WUN)30,YY5A2%(P)5,YY5 2D1100:D:21170,175 3P(A$)WUN 4CC:SHA2%(P),YY:D1200:D:P 5P(A$)1    8,2:789,3:790,96:791,0:792,0&$'M NSO801205:768,SO:769,3:770:t%NSO801205:768,SO:769,3:770:z*N%16,175D11000:D/(4);"NOMON I,C,O"E(4);"RUN SUB33"Z:16302,0:180`'770,173:771,48:772,192:773,136:774,208:775,5:776,206:777,1:778,3:779,240:780,9:781,202 '782,208:783,245:784,174:785,0:786,3:787,76:78 0P(A$)1a 13:(A1%(P)5),Y5(A1%(P)5),Y25A1%(WUN)30,Y25A1%(WUN)30,Y5A1%(P)5,Y5q :21170,175 <FL111:22216,160:D120:D:FL ?A$ D(A$)ANS600 I20000 N575 X22216,160 ]768,10:769,10:770b(ANS1)200:ZZ105:SO2004 23A2%(P),Z:PP(A2%(P)10),ZZX 23A2%(P),Z:PP(A2%(P)10),ZZx 768,SO:769,5:770:SOSO6 23A2%(P),Z:PP(A2%(P)10),ZZ ZZ4:ZZZZ4:Z25530 505 CC:SHA1%(P),Y &PP1:PPPP1:P(A$)560 +500 J(A$)1380" O(A$)WUN3805 T(A$)WUN380E ^22125,160_ c3:((A$)1)125,175h h390s |20000| 325 ANSWUN(A$) P1(A$) PPP1 23A2%(P),100:PP(A2%(P)10),105:PPPP1:P P1:PP2 D11000:D Z1 C:SHA1%(P),Y:768,SO:769,15:770:PQ FL111:2225,160:D120:D:FLY A$l (A$)WUN300w "20000 '280 ,2225,160 1768,10:769,10:770 63:(WUN1)25,175 ;2070,175 @FL111:22125,160:D120:D:FL EA$ C((1)8) C3180* C41807 C7180D C1180R C1CC2` C2CC5n C5CC6| C6CC1 SH((1)7)10 SH12225 SH16225 WUN((1)10) WUN2240 WUN9240 P1WUN SO100(P10)*| 10004(4);"BLOAD SETS":232,136:233,19?Z10000Od:16302,0Yn1:0mA1%(9):A2%(9) 5,35,65,95,125,155,185,215,245 5,35,65,95,125,155,185,215,245 N19:A2%(N):NN19:A1%(N):N Y30:YY110,3:787,76:788,2:789,3:790,96:791,0:792,040?EN"ī200" I1NN:ER(I)0:I:RT0. J1NN? ER(J)1400X :10:10:"WORD ";J :::10:">>> ";:I11000:I:WW$(J) I1200:I :11 "16368,0 ,:::10:">>> ";W$ 6:: @W$" "(W$)0ī250+ JW$WW$(J)RTRT1:"I1NN- :"ENTER WORD ";I;:": ";WW$(I)B (WW$(I))0160I I :"OK, ALL WORDS ARE ENTERED."::"NOW LETS SEE IF YOU CAN SPELL THEM." :"WOULD YOU LIKE THE WORD LIST SCRAMBLED? (Y/N): ";:16368,0:Q$:Q$:Q$"Y"İ900:220 Q$"NLLING LIST"::5::"R";::" - RETRIEVE ONE ON FILE."::5::"I";::" - REVIEW INSTRUCTIONS."~ i:5::"Q";::" - QUIT" n:16368,0:Q$ sQ$"I"İ1000:80 xQ$"R"İ700:200 }Q$"Q"Ā Q$"E"ī80 ::"HOW MANY WORDS? ";NN  * SPELLING EXERCISE *:* PUBLIC DOMAIN SOFTWAREW* BY M. E. GRIFFITH JR.](:o2D$(13)(4)w<:FLIM100:WW$(LIM):ER(LIM)P:9::"*** SPELLING BEE ***":Z:::"DO YOU WISH TO:"::5::"E";:` d" - ENTER A NEW SPE     C:SHA1%(P),Y:768,SO:769,15:770:PQ FL111:2225,160:D120:D:FLY A$l (A$)WUN300w "20000 '280 ,2225,160 1768,10:769,10:770 63:(WUN1)25,175 ;2070,175 @FL111:22125,160:D120:D:FL EA$ C((1)8) C3180* C41807 C7180D C1180R C1CC2` C2CC5n C5CC6| C6CC1 SH((1)7)10 SH12225 SH16225 WUN((1)10) WUN2240 WUN9240 P1WUN SO100(P10)* 10004(4);"BLOAD SETS":232,136:233,19?Z10000Od:16302,0Yn1:0mA1%(9):A2%(9) 5,35,65,95,125,155,185,215,245 5,35,65,95,125,155,185,215,245 N19:A2%(N):NN19:A1%(N):N Y30:YY110   1,0:792,0$'7 NSO801205:768,SO:769,3:770:^%NSO801205:768,SO:769,3:770:d*N76,175D11000:D.(4);"NOMON I,C,O"D(4);"RUN SUB44"J'770,173:771,48:772,192:773,136:774,208:775,5:776,206:777,1:778,3:779,240:780,9:781,202 '782,208:783,245:784,174:785,0:786,3:787,76:788,2:789,3:790,96:790P(A$)1` 13:(A1%(P)5),Y5(A1%(P)5),Y25A1%(WUN)30,Y25A1%(WUN)30,Y5A1%(P)5,Y5p :21170,175 <FL111:22216,160:D120:D:FL ?A$ D(A$)ANS600 I20000 N575 X22216,160 ]768,10:769,10:770b(ANS1)2100:ZZ105:SO2004 23A2%(P),Z:PP(A2%(P)10),ZZX 23A2%(P),Z:PP(A2%(P)10),ZZx 768,SO:769,5:770:SOSO6 23A2%(P),Z:PP(A2%(P)10),ZZ ZZ4:ZZZZ4:Z25530 505 0:SHA1%(P),Y &PP1:PPPP1:P(A$)560 +500 J(A$)1380" O(A$)WUN3805 T(A$)WUN380E ^22125,160_ c3:((A$)1)125,175h h390s |20000| 325 ANSWUN(A$) P1(A$) PPP1 23A2%(P),100:PP(A2%(P)10),105:PPPP1:P P1:PP2 D11000:D Z1 C:SHA1%(P),Y:768,SO:769,15:770:PQ FL111:2225,160:D120:D:FLY A$l (A$)WUN300w "20000 '280 ,2225,160 1768,10:769,10:770 63:(WUN1)25,175 ;2070,175 @FL111:22125,160:D120:D:FL EA$ C((1)8) C3180* C41807 C7180D C1180R C1CC2` C2CC5n C5CC6| C6CC1 SH((1)7)10 SH12225 SH16225 WUN((1)10) WUN2240 WUN9240 P1WUN SO100(P10)*f 10004(4);"BLOAD SETS":232,136:233,19?Z10000Od:16302,0Yn1:0mA1%(9):A2%(9) 5,35,65,95,125,155,185,215,245 5,35,65,95,125,155,185,215,245 N19:A2%(N):NN19:A1%(N):N Y30:YY110ō׍΍č Q$:DOU MAY:"::" --- REVIEW WORDS MISSED."::" --- REVIEW THE ENTIRE LIST."::" --- SAVE THE LIST TO DISKETTE."::"THE FILE NAME ASSIGNED WILL BE:"::"'SPELLFILE - ' PLUS YOUR ASSIGNED NAME."2000::"RETURN TO CONTINUE:";::"";    " ,D$(4):D$;"RUN TURNKEY":B$B$(C):CH:1:868:B$:D$;B$:CC212ĀW 40 C1(CV8):C2CVC18:P1024128C240C1CH:C(P):#=================== PROGRAM`DESIGNED`BY PETER STUBBS NEWCASTLE NSW 781,202`'782,208:783,245:784,174:785,0:786,3:787,76:788,2:789,3:790,96:791,0:792,0f$' NSO801205:768,SO:769,3:770:%NSO801205:768,SO:769,3:770:*N@A$)ANS600I20000N575/X22216,160H]768,10:769,10:770]b(ANS1)216,175nD11000:D(4);"NOMON I,C,O"(4);"RUN SUB"'770,173:771,48:772,192:773,136:774,208:775,5:776,206:777,1:778,3:779,240:780,9: 7FL14 8P(A$)ANS572j 9CC:SHA2%(P),YY:D110:D:0:SHA2%(P),YY:SHA1%(P),Y:D110:D :C:SHA1%(P),Y:CC:SHA2%(P),YY:768,15:769,8:770:FL:PP1:567 ;D1100:D:567 <FL111:22216,160:D120:D:FL ?A$ D(D 768,SO:769,10:770:P+ P1:PP2E 0P(A$)1:D1800:D 13:(A2%(P)5),YY5(A2%(P)5),YY25A2%(WUN)30,YY25A2%(WUN)30,YY5A2%(P)5,YY5 2D1100:D:21170,175 3P(A$)WUN 4CC:SHA2%(P),YY:D1200:D:P 5P(A$)1 J(A$)1380" O(A$)WUN3805 T(A$)WUN380E ^22125,160_ c3:((A$)1)125,175h h390s |20000| 325 ANSWUN(A$) SO200 P1(A$) SOSO12 CC:SHA2%(P),YY:0:SHA1%(P),Y:D150:D:C:SHA1%(P),Y:D1100: C:SHA1%(P),Y:768,SO:769,15:770:PQ FL111:2225,160:D120:D:FLY A$l (A$)WUN300w "20000 '280 ,2225,160 1768,10:769,10:770 63:(WUN1)25,175 ;2070,175 @FL111:22125,160:D120:D:FL EA$ C((1)8) C3180* C41807 C7180D C1180R C1CC2` C2CC5n C5CC6| C6CC1 SH((1)7)10 SH12225 SH16225 WUN((1)10) WUN2240 WUN9240 P1WUN SO100(P10)* 10004(4);"BLOAD SETS":232,136:233,19?Z10000Od:16302,0Yn1:0mA1%(9):A2%(9) 5,35,65,95,125,155,185,215,245 5,35,65,95,125,155,185,215,245 N19:A2%(N):NN19:A1%(N):N Y30:YY110  *********************S938,173:939,48:940,192:941,136:942,208:943,5944,206:945,169:946,3:947,240:948,9:949,202:950,208:951,245952,174:953,168:954,3:955,76:956,170:957,3:958,96******************** **:784,174:785,0:786,3:787,76:788,2:789,3:790,96:791,0:792,0I$'p NSO801205:768,SO:769,3:770:%NSO801205:768,SO:769,3:770:*N:81,202'782,208:783,245:784,174:785,0:786,3:787,76:788,2:789,3:790,96:791,0:792,450) 22216,160:768,10:769,10:770> (ANS1)216,175O D11000:Dg (4);"NOMON I,C,O"} (4);"RUN SUB55"  '770,173:771,48:772,192:773,136:774,208:775,5:776,206:777,1:778,3:779,240:780,9:781,202C'782,208:783,245P),Z ZZ10:C:SHA1%(P),Z. Z100430N 768,SO:769,3:770:SOSO5W 405l CC:SHA1%(P),Z} 23A1%(P),Y PP1:P(A$)440 401 21170,175 FL111:22216,160:D120:D:FL A$ (A$)ANS500 20000  J(A$)1380" O(A$)WUN3805 T(A$)WUN380E ^22125,160e _P1(A$):23A1%(P),YY:P c3:((A$)1)125,175 h390 |20000 325 ANSWUN(A$) D11000:D P1(A$) ZY:SO100 23A1%(P),110 0:SHA1%(TION" 9006 "ALL OF ABOVE IN SEQUENTIAL ORDER"< Q (4);"RUN SUB1"f (4);"RUN SUB2"{ (4);"RUN SUB3" (4);"RUN SUB4" (4);"RUN SUB5" p(4);"RUN SUB11"dN5700 N6800B ,"MATCH TO IDENTIFY EXCLUSION SUBSET I"K ^900x "MATCH TO IDENTIFY EXCLUSION SUBSET II" 900 "MATCH TO IDENTIFY & SEPARATE SUBSET" &900 X"MATCH TO IDENTIFY & REMOVE SUBSET" 900 "COMPLEMENTARY ADDI$)6110 (4);"NOMON I,C,O"& \ :::::::"PLEASE WAIT WHILE FILE IS LOADED"n (A$)11000 (A$)22000 (A$)33000 (A$)44000 (A$)55000 (A$)66000 N1300 N2400 N3500 N4600 ܽ1011,69 :G" ";::"SUBTRACTION MODELS":S(:::m2"WHICH DO YOU WANT?"u7N1<::N;::" ";:200ANN1:N680F60P:Z" TO RETURN TO MENU"d:nA$x(A$)1110 }(A   UVW;@r\ <@*#rrqYIUVWdede2MUVWqYY_ 2]ӠҠǠӠΠΠŠdedeM&]עӠҠҠǠqf/?rOӠΠŠȠŠD2UVWdede2MUVWqYY7f/?r<q_F/?r F@p()_xP@p()_xZ@p(ġ)_xd@p(ס)_xn@p(ȡ)_x9xqq3>]Ƞ̠٠ĠĠΠˬά_0u] ]ΠӠ" ]ΠӠ]Ǡ2UVWԱ`.?6@r%[Yqd6?e[L1]ԠҠԠӠ                 NSW 20-6-82 ======================= PROGRAM`DESIGNED`BY PETER STUBBS NEWCASTLE NSW 20-6-82 ========================2B$"RUN"B$"EXEC":CCCX CH639:210:B$B$(C):CH:1:868:B$:D$;B$:CC212Ā` 40 C1(CV8):C2CVC18:P1024128C240C1CH:C(P):, =================== PROGRAM`DESIGNED`BY PETER STUBBS NEWCASTLE 1:868:K5ĀC n"PRESS 'LETTER' YOU WISH TO ";:K1B$"LOAD"V xK2B$"LOCK"k K3B$"UNLOCK" K4B$"DELETE": B$;:198::K$:K(K$)48 K17KT1680 CH1:CVSTK16:210:C194(B$"RUN"B$"LOAD")B$"B"B$ C21C160ĹP1,219:P,T193:P1,221:TT1:SCV FCV:24:A$"TYPE LETTER TO RUN, OR LOAD =1 LOCK=2 UNLOCK=3 DELETE=4 EXIT=5 ...." PB$"RUN":1:(A$,39);:A$(A$,2)(A$,1):K(16384):K128āK175:K:K(0):80 Z16368,0:KK176:K1K5160 d ND823G"A I1(HEX$):511I,((HEX$,I,1))128::72,0:144j #HMEM3919,96:TURN OFF INIT COMMAND (:::1:D$(13)(4):HMEM6113,67:HMEM6196,96:D$;"CATALOG":HMEM6113,2:HMEM6196,206 2B(37)2:B22B22- <T0:CH4:CV023:210:-::::* HMEM(115)(116)256 HEX$"BCBA:A2 0C 20 4A F9 A9 00 85 40 85 41 A0 C8 18 B9 F2 B3 F0 0E 0A 90 FB 48 E6 40 D0 02 E6 41 68 18 90 F0 88 D0 E9 A6 40 A5 41 AC 00 E0 C0 20 D0 07 20 1B E5 20 2F AE 60 20 24 ED 20 2F AE 60 N ADC3:20 BA BC$d6?e\`$Td6?eM6&]ŠӠΠf\f/?r/` $ڲq ڱq `ڲ $_ ڲq`$q\ ڲ!` $q"\ ڱ_ԠآbUVW ghY$lq UVW ghqYq_)vi j k `$l m n f/?rqq\ )f/?rijk ijk `$, f/?rqq\)`WY$0UVWq/?rq/?r 5q:`$Dq/?rDM6Lf/?rIM]ӠҠǠӠΠӠŠΠӠNqq\ Xf/?r`$v&a]ӠĠӠԠŠӠα)_&U+cS(ԠӠŠԠҠՠԠϠſԠԠŠҠΠ)',` $.(-ca(ԠΧԠŠҠΠ)_+K.ca(ŠΠȠҠΠӠΧ)Pa()cc/UV@*#r9()$`@*#r9()$`@*#r9()$_q_&q_&q_&-ca(ŠҠͧҠӧ)c_ *&a(נ٠ӠϠՠ)GT'`$E(`$+a(ŠҠƠ@"rM6o dqױqa(ϠՠԺ)a(ά)Pa(ά)P a(ο)cHa(͠)ca()ca(Ӡ)c= S(ŠͬҠӠĠӠΧ)&@`;@r$J`ٲ!r` $|q"\ ڱO|qqf/?r@p()UVW\ <@*#rrqYSqq@p()UVW\ <@*#rrqY\\_ %UVWqY[(N@" rC@"rCӠĠŬŠ͠ӠϠ͠?+]ӠԠŠԠҠĠԠҢ,f/?r_, 6q_T@q_T Jq#T` $^ڲq ڱq Y_h ^ڲqhq\ \ <@*#rrqYC@p()qqUVW\ <@*#rrqY*ױqױ]ҠҠĠR]ŠӠΠĠӠԠƠ͠ȠҠĠŠ \_DL*]ƠŠ͠ײf@p(ҭ)qqUVW\ <@*#rrqYN@p()qq UVW\ <@*#rrqYq_7fqUVW\ <@*#rrqYf/?rB@p()qqUVW`$@p(ҭ)qqUVW\ <@*#rrqYG@p()qq UVW\ <@*#rrqY_C@p()qqUVW\ <@*#rrqY\`$\_DT`$666666--%$$566--5??766'$$??'----5????'----5????*---->????)(((--^q666666>X  $$$$-` $$??           66f$$$$666 dd, ddd, ,vvvvvvv?????????? ddddd, , 5vvvvvv>???????'-------??????'------=8?????,-----????'----???'---??? --?g-=8,----------5??????????7----------5??????????7----------5??????????7----------5??????????'II66????????$$$$$$$NRQ??????'$$$$$?????$$$$???'$$t?'$'666uu-- -( -(( $$?8??666v$$$$ 66666%$$$$,066666.$$$$$$ 6666666%$$$$$$,06666666.$$$$$$$$56666666.$$$$$$$$56666666. $$$$$$,6666666 $$$$$$566666f$$$$$566666666.---------$$$$$$$$$<666666666'$$$$$$$$<666666666'$$$$$$$$<666666666'$$$$$$$$<666666666$$$$$$$$$?????.---->????.---->????.---->????.---->????.---->????.---->????.---->????.---->????W----5????'?????????'$$$$$$$$tvt@CO^o~R 0=T7% 666666b-66--%b-6?wI6?66666--$$$---36.-6??' -666 -u6??$---6666-( <88L $?6- $$$$$<8?6666- $$$$?666[Llmnghlmnghlmn[e.']ӠȠӠӬӬĠԠŠҠԠӮl8'Lf8rUVWdede2MUVWq/?&rkgh[#ijklmn[2lmnijklmn[Rlmnlmnghlmnlmn[Llmnghlmnghlmn=ijkijklmnlmn[dijkijklmnlmnghghgh[rghijklmnijklmnijkijk[Llmnghlmnghlmn[Rlmnlmnghlmnlmn[Iijklmnijklmn[ijklmn[0\lmnijkijka[cfghijklmnijklmngh[.pijklmnlmn[6zlmnijjklmnijkghgh[Y*ghghghlmnlmnijk[=Hlmnijkijklmn[9Rijkijkhijklmnijkghgh[&[]ŠҠˠ!lmngh[bijk[/ ]ӠԠӠΠaghimnlmnUVWXijkYlmn=lmn[^BlmnijklmnijkijkG[&]ŠӠΠ_gklmnijkgh[^$ijklmnijklmnijk)gh[J.ijkghghghlmn[_8lghijk[SghghUVWXijkYlmn lmn[Fijklmnghghgh[eijkghijħ)ccQ/]ӠԠӠΠIijklmnijklmn[4ghlmnijk[lghijklmnghghΠ)&@:`@*#r9()$`@*#r:()$M6_'ca(ŠҠӠҠ)c_ M6^cca(ӠҠ)ca(ŠӠ͠)E@E()o a(ϠΠΠŠΧ)7ccca(ϠĠҠͬŠc$` $q\ _:q\ 8 rq\ 8 r_Tq \ 8drq\ 88dr rq\ 8 r%UϹVW\YϹKM6o &S(ϠՠԠϠ٠qq\ 8 rq\ 8 rH_f=Rq q\ 8drq\ 88dr r\q\ 8 rf@p(Ԡ)qq9pf/?rUVW\ <@*#rrqY/zqf/?r`$P bױE(ԠΠĠٮ)A`$ `$PbE(ŠǮ)_ Pa(ŠӠǮ)_ 'Pa(ՠԠ̠͠ԡ)' Lf/?r`c$R` $>*qq\ 4_f7> B]ӠˠŠҠĠϠŠƠԠӠ`$2_`$2_`$2_ Y$ ]ӠԠӠ>`ױ$`ױ$bױE(ԠΠԠٮ)<`ױAB1`;X/*d900a;c9k*I58J;I*98J;u;8V48;h(8;Z}~};X.88/;\]88;d.89!,X.88/;d;g$9/l;] ]88;X.+d;X/+d90$a;c9%e9u;;h?8;W09:X|$)d6?e\`$)\'_)8)Td6?ePS(Ҡ)'`%\8')`%\')Y[Q)q/? rq/? rM6o PbE()FE()G`$*d6?e\*`$*\'_*(*Td6?e`b@\'_)()Td6?e`%\8'`%\')Y[`)q/?rq/? rM6cPa(ҠŠŠ)P a(ԠƠҠ)S)cPa(ӠΧ)cPa(ΠҠŠҮ)o PA)bE()FE()3tA)qM6oa(ӠӠŠĠ٧κ)yfh h  h hh Ɍp ˝yȟ |Ⱥ˨x{ ˨y{˨z{6˨{|ɕ yKAAIXAA1P(Pٶ2PMPٷ$@A7B?$@A7+h)a(נ٠ӠϠՠ)Gq#r)TUVWq/? rq/?rK|)M6o PbE()FE()G`$)\`$)\'_))Td6?e)`%\8'`%\')Yq[0)]ŠĢŠӠΠŠ96!XpC^]Axsesik}rhf xw x}͓ ο~͓ ν }~h ؊ L sh d 蕽q؊ L r}~ q}~ dw} 罍8L#*L8$)L-"?;)>@0ďYFFFL$%8LK>)89>"K@ ďYFFFL8$)"L)"8)>L8$)L>)!-%"()>BČ']#(TUVW^q/? r^q/? rU(M6o PbE(ؠ)FE()G`$(d6?e\`$(\'_(((Td6?e`%\8'`%\'(Y^q[2(]ŠΠŠӠΠŠS(a(ӠӠŠ=*VúWB̻Pъ̹DD)1(0-4(-'%0-+*D71&6+10-*!D70%607D%0D(-*!DUTWRTɝͻ?U-*2E($+nM44sQ*}4)a@E(yti;za{ijg|l`f˫˫x؀zgfog|x؀g~mz|aemx |`mif{mza{ij˫ɀzmeiaflmzijxg|p`J˫˫x؀zgfog|x؀g~mz|aemx |`mXSrY<[ZHbEUZ(Y [Z _ZY>ZZ$9#1>VGFDEFV7$3VI'\LQKJWRXL>XQL>ILQPY>_PMK[LO0s5|􃛆}W sUE s5|}W sUE*s5|}W sUAs5|}W sU7s%FUTW4BU CAB#8:A;" + ";B;" = ?"-940811:DC216,0ONDND1\CD99014:"NO....THE qp x  dNkhbzt(Ò 2bz▅"NO....THE RIGHT ANSWER IS ";X3 HM11300:M R880 \"VERY GOOD !":RCRC1 fM11300:M p180 zA((1)10):B((1)10)AB10890 X((1)17):Y((1)2)# 89 X;", ";X1;", ";F Y1710Z :" ";:50,255v ", ";X3;", ";X4:740 X2;", "; 50,63:" ";:50,255 ", ";X4 750 11 "GIVE THE MISSING NUMBER. ";Z 216,0 NCNC1:14dTq_UelntvvvvivvvvtmVf]Wdg`zfVj]^TgV]DTcafV$]JTdgltzzzztvvvtmV]pTggefflV]fT`bfV]lTgV]To`gfV]Tgene`n7pܼ([Ҽ(Hȼ?nL–qàd Ɋûks뇆睁雀鈇通ɝõHKɔNcȼXjp融菇HRɚYlI JRfcvpɉ fi]q"]q<+]q!n`1050! SC((RT10NT))2RTRTM "LEVEL 1 SCORE.....";(SC)] Z((1)4)j Z0290w Z1440 Z2650 Z3890 "8:"HOW MANY *'S ARE THERE?" ,X((1)201):NANA1 611:M1X @"*";:M J340 T11:30 dA$"NUMBER OF PROBLEMS"3nB$"NUMBER RIGHT"?x:936Y9:14:" LEVEL I "t24:29:"R. PITSCHKA"M11000:MCOUNT0936:240COUNTCOUNT1NTNANBNCNDRTRARBRCRD ::PK(16384):16368,0:PK155 ŠͫŠͫŠͫŠͫŠͫŠͫT}dede0dededededeTW0]T1UTW0^T1TU Q)0_T1\TW0XT1TW0YT1TW0ZT1TW0[T1TW0DT1TTW0ET1TW0FT1VTW0GT1TTW0@T14TWUTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTxtxtt ׵ԛuu}uvdu-BSH^I581'BSB-0BPB#,&B02%33wƯ!.H 6}h3I{ . jJ ) x3"#. jJ ) x3"#." -}k i ͨڨSߖӳiƲEz}v`r}w`vgfcg{vg|}v`fqaԠjiuݕtv|||p| p||||||  |߿߿nm߽ |nߌm߽qqsqqqqqq`vv| | ||vv| | ||mn݊ vv|||p| p||||||||  ҠŠӠΠî)_zu uԱqԱ[uM6a(ՠΠˠŠĠƠ̠ՠԺ)cP a(Π)P a()Gua(N!Z[(IZM(AF(JAO(XZAF\(IFL(KGDGZD((((( AN( sit}jyspsnhj"ݔriq~ynoilhssnpyoouzesiornand(FQGG43FQ@AFZ3=4MZԕMZ$'MZԾ%$歼@MZԾ%%歼Z'ᕳDXQUGQ4QZ@QF43@34[F43Z3'ᕱ@$MZԾ$'笽[&A$ƽ][C4YAW\4@]YQ84]Z4GQW[ZPG84P[4M[A4CUZ@44R[F4QUW\4UZGCQFB%A$$&EYPTFP()GPa()d0eccNuUVW Y2SuM6N@" ra(ԠӠҠſ)R@WZtM6o a(ϠՠԠŠԠҠǠӬҠϠŠԿ)cYbua(ԠŠ)a(ΠϠŠ)cS(ŠԠԠƠ)Fc?0*Pa(ϠՠԠϠ٠ά)P a(ӠҠϩ)R@>:*`;@r$?*`@*#r9()$((`@*#r9()$D*(?*ca(ŠҠӠjf˫˗yqd罕hbbbh  {ȵˆyȺɋ˅q`˧p˘yˬ}ȭy˩4:A$;:30:NB#^4:B$;:30:RB@h"MISSING NUMBERS TO 20"Tr4:A$;:30:NCh|4:B$;:30:RC"HORIZONTAL ADDITION TO 10"4:A$;:30:ND4:B$;:30:RD"HORIZONTAL SUBTR. TO 10"4:A$;:30:NE4:B$;:30:RE"V300:M1560RFRF1+C101520;11:14:C;E1530U11:13:C;l22:"VERY GOOD !"}M11300:MCOUNT251570180"936,"COUNTING"64:A$;:30:NA@4:B$;:30:RAJ"VERTICAL ADDITION TO 10"T213:"-";B:1370%<12:B1013607F"- ";B:1370BP"-";BQZA101390ed13:"--":1400tn12:"---"x141018:"WHAT IS THE DIFFERENCE? ";D216,0NFNF1CD148021:"NO....THE RIGHT ANSWER IS ";CM11IGHT ANSWER IS ";C#M11300:M-1270G8:A;" - ";B;" = ";CSRERE1j14:"VERY GOOD !"{M11300:MCOUNT251570180A((1)6)5:B((1)(A1)):CAB 8:A10131014:A:132013:A(A101340eedTI[pPnlmtv}vtmmtvkvtmVYxRgVYnRgbltvvwtVYRggefflV3YRfcgcafV8YRgnfVY6R~~g`cl~~g~glVY *216,0N 4NCNC1:14a >ZX2Y0900t HZX3Y1900 RY1870 \"NO....THE RIGHT ANSWER IS ";X2:880 f"NO....THE RIGHT ANSWER IS ";X3 pM11300:M z930"VERY GOOD !":1:13:C; 22:"VERY GOOD !"1 M11300:ME COUNT251570N 180k X((1)17):Y((1)2)x,bl1t t` ~:a@llpJlI\_l6~Ie+Ie!Iezt߿}[睒ܷdީܐ[ss|dbט] ]ԑt ԇݍ?Խr/Գ}Ie&ԩt_}1X T"*";:M ^360* h11:30:Y5 r216,0B |XY420j 14:"NO....THE RIGHT ANSWER IS ";X{ M11300:M 460 14:"VERY GOOD !" RARA1 M11300:M COUNT251570 180 A((1)10):B((1)10):CAB CxltyzcbecaO剛쇇{끨TSK KEYztttxtthjzvTETQebgblxdT0E^Q|ebgl`}T+E@Qe`eebgblxdnebdTEJQeaaebgblxdn|`}vtvTE|QefmdTTTtvTEJQefldTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTT4:B$;:30:RD::9"TOTAL PROBLEMS";:30:NTU"TOTAL RIGHT";:30:RT["PERCENTAGE RIGHT";:30:(100RTNT);"%":"PRESS SPACE BAR":16368,0Q$:E7:"IF YOU WANT TO RETURN TO THE MENU, THEN 936$"COUNTING"'.4:A$;:30:NA;84:B$;:30:RAZB"VERTICAL ADDITION TO 10"nL4:A$;:30:NBV4:B$;:30:RB`"MISSING NUMBERS TO 20"j4:A$;:30:NCt4:B$;:30:RC~"HORIZONTAL ADDITION TO 10"4:A$;:30:ND4:B$;:30:RB"10X + Y"24:A$;:30:NCF4:B$;:30:RCg"HORIZONTAL ADDITION TO 14"{4:A$;:30:ND4:B$;:30:RD"HORIZONTAL SUBTR. TO 14"4:A$;:30:NE4:B$;:30:RE"VERTICAL SUBTR. TO 14"4:A$;:RF1C101570$11:14:C;.1580>"11:13:C;U,22:"VERY GOOD !"f6M11300:Mz;COUNT251610@180J936T"TENS + ONES"^4:A$;:30:NAh4:B$;:30:RAr"VERTICAL ADDITION TO 14"|4:A$;:30:NB12:B101410!x"- ";B:1420,"-";B:A91440N13:"--":1450]12:"---"h146018:"WHAT IS THE DIFFERENCE? ";D216,0NFNF1CD153021:"NO....THE RIGHT ANSWER IS ";CM11300:M1595RF 1305#8:A;" - ";B;" = ";C/RERE1F 14:"VERY GOOD !"WM11300:MkCOUNT251610t180(A((1)10)5:B((1)10):CAB2C9C01320<8:A91360F14:A:1370P13:AZA91390d13:"-";B:1420n0:MyCOUNT251610!~180GA((1)10)5:B((1)10):CABYC9C01160r8:A;" - ";B;" = ?"RTRARBRCRDRERF120011:D216,0NENE1CD127014:"NO....THE RIGHT ANSWER IS ";CM11300:M)10)AB14990CAB88:A;" + ";B;" = ?"C1040N11:DY216,0e$NDND1s.CD1110814:"NO....THE RIGHT ANSWER IS ";CBM11300:ML1145V8:A;" + ";B;" = ";C`RDRD1j14:"VERY GOOD !"tM1130?" \870f11:D"p216,02zNCNC1:14?DC940c"NO....THE RIGHT ANSWER IS ";CtM11300:M}975"VERY GOOD !"8:10A;" + ";B;" = ";CRCRC1M11300:MCOUNT251610180A((1)10):B((1ER IS ";C M11300:M# 825/ RBRB1< C9800L 11:14:C;` COUNT251610i 810y 11:13:C; *22:"VERY GOOD !" 4M11300:M 9COUNT251610 >180 HA((1)9)1:B((1)10):C10ABR8:10A;" + ";B;" = ";K bM11300:M( gCOUNT2516101 l180U vA((1)10):B((1)10):CABc C14630q 8:14:A 13:"+";B 13:"--" 690 18:"WHAT IS THE SUM ? ";AN 216,0 NBNB1 ANC760 21:"NO....THE RIGHT ANSWK M11300:M 6152 14:"VERY GOOD !"> RARA1R 8:A1B1540q A;" TENS ";B;" ONES = ";Kz 620 A1B1580 &B1600 0A;" TEN ";B;" ONES = ";K :620 DA;" TEN ";B;" ONE = ";K N620 XA;" TENS ";B;" ONE = #PRK2KRP?>5#PMPORpjz:qDA@p[z$q1A2ACH@pHz.q2AD@@p%zq1KRP'5>PRK2KRP?>5#PMPORp.zqDA@p z q1KRP$5>PRK2KRP?>5PMPORpzqDA@pzq1KRP$5>#PRK2KRP>=6SNSLQsyrGACszqAAJ3pzqBAF\@pzq>1>1Apzq3;DI@pq{qADJR>?^^^^$85P ;5:&R3 KEY. IF NOT, PUSH ."z:16368,0DPK(16384)NPK141Ĺ16368,0:160XPK155Ĺ16368,0:(4)"RUN HELLO"b1860AERTICAL SUBTR. TO 10")4:A$;:30:NF=4:B$;:30:RFCb"TOTAL PROBLEMS";:30:NT~"TOTAL RIGHT";:30:RT"PERCENTAGE RIGHT";:30:(100RTNT);"%":"PRESS THE SPACE BAR":16368,0Q$&:l07:"IF YOU WANT y21:"NO....THE RIGHT ANSWER IS ";C7yM11300:MAy1850MyRFRF1[yC91820ky11:14:C;uy1830y11:13:C;y&22:"VERY GOOD !"y0M11300:My:COUNT251870yD180yN936yX"COUNTING, 1'S, 5'S, 10'S"zb4:A$;x68:A91610!x@14:A:1620,xJ13:A:xTA91640Ox^13:"-";B:1670Wxh12ixr"- ";B:1670tx|"-";BxA91690x13:"--":1710x12:"---"x1710x18:"WHAT IS THE DIFFERENCE? ";Dx216,0xNFNF1xCD1780& wNENE1wANC1510Cw14:"NO....THE RIGHT ANSWER IS ";CTwM11300:M^w1540uw14:"VERY GOOD !"wRERE1wM11300:MwCOUNT251870w180wA(10(1))9:B((A1)(1)):CAB:B91560w"16368,0w,C10156012:13:Dv2RDRD1,v<22:"VERY GOOD !"=vFM11300:MQvPCOUNT251870ZvZ180vdA(100(1)):B(100(1)):AB1380vn16368,0vx8:A;"....";BvABCAvABCBv1440v11:"WHICH NUMBER IS GREATER? ";ANw216,0D181150u8:14:A"u14:B1u13:"+";C?u13:"--"Ju1230mu18:"WHAT IS THE SUM? ";ANxu216,0uNDND1uAND1300u21:"NO....THE RIGHT ANSWER IS ";DuM11300:Mu 1360uD91320u12:14:D;:1330 v((t$14:"NO....THE RIGHT ANSWER IS ";D9t.M11300:MCt81130etB8:A;" + ";B;" + ";C;" = ";D|tL14:"VERY GOOD !"tVRCRC1t`M11300:MtjCOUNT251870tt180t~A(9(1))1:B(9(1))1:C(9(1))1:DABCt16368,0 u"VERY GOOD !"sM11300:M3sCOUNT251870NBNB1srHANC880rR21:"NO....THE RIGHT ANSWER IS ";Cr\M11300:Mrf950rpRBRB1rzC9920r11:14:C;r930r11:13:C;s22: qNANA1qANX3Y690Jq14:"NO....THE RIGHT ANSWER IS ";X3Y[qM11300:Mdq720{q14:"VERY GOOD !"qRARA1qM11300:MqCOUNT251870q180qA(10(1)):B(10(1)):CABq16368,0qC18740r8:14,0pNANA1 pANX4Y690Lp14:"NO....THE RIGHT ANSWER IS ";X4Y]pM11300:Mfp720sp&X;", ";p0XY;", ";p:X2Y;", ";pD50,63:" ";:50,255pN", ";X4YpX610pb11pl"GIVE THE MISSING NUMBER. ";ANqv216,0Y1:380(ohX(16(1)):X5X:Y5:380DorX(6(1)):X10X:Y10To|R(2(1))[o8hoR1550uoX;", ";oXY;", ";oX2Y;", ";oX3Y;", ";o50,63:" ":50,255o470o11o"GIVE THE MISSING NUMBER. ";ANp216K1551870)nSC(((RT10)NT))2RTRTYn"LEVEL 4 SCORE...........";(SC)inZ(6(1))vnZ0310nZ1740nZ2970nZ31150n"Z41380n,1560n6R(3(1))n@16368,0nJR1360nTR2370o^X(90(1)):mdA$(30),B$(30)0mnA$"NUMBER OF PROBLEMS"FmxB$"NUMBER RIGHT"Rm:936^mCOUNT0zm9:14:"MATH LEVEL IV"mM11300:Mm936:240mCOUNTCOUNT1mRTRARBRCRDRERFmNTNANBNCNDNENF n::PK(16384):16368,0:P         !!! ! PUSH KEY. IF NOT, PUSH ."U16368,0fPK(16384)PK141Ĺ16368,0:120PK155Ĺ16368,0:(4)"RUN HELLO"1930A30:NF4:B$;:30:RF!@"TOTAL PROBLEMS";:30:NT\"TOTAL RIGHT";:30:RT0"PERCENTAGE RIGHT";:30:(100RTNT);"%"5:"PRESS SPACE BAR";::16368,0DQ$l:Gv7:"IF YOU WANT TO RETURN TO THE MENU, THEN ~1602A(9(1))1:B(9(1))1:AN10ABN8:10A;" + ";B;" = ?"c34,11:16368,0m1700yNDND112:958:14CAN1260"NO....THE RIGHT ANSWER IS ";ANTM11300:TM34,0:1290"VERY GOOD !"50,127:" ":50,255ANA(1700>$12:958:NCNC1M.CAN1120v814:"NO....THE RIGHT ANSWER IS ";ANBV70LTM11300:TMQ34,0:V1150`14:"VERY GOOD !"eSCSC10jRCRC1:V7V71tTM11300:TMy34,0:R21020z8:"10 + ";350,127:" ";:50,255C" = ";A10LANAV1050o8:"10 + ";A;" = ";50,127:" ":50,255ANA1010508:A;" + 10 = ";50,127:" ":50,255ANA1010508:A10;" - 10 = "; ";AN V70 M11300:M+ 34,0:4 820V 8:A;" TENS ";B;"ONES = ";ANm 14:"VERY GOOD !"z SCSC10 RBRB1:V7V71 *M11300:M /34,0: 4160 >R(4(1)):16368,0 RA(9(1))1 \R0940 fR1980p l640% .:Ӡ»ŠˀPÀŒ9ˌ +PSJ[HPSJ[HPJH€(":Ӡ»Ӡ*29I4<0@FPHNP" I\Z-PDd":ϮŠԠҠ34,0: V70 650( 12:958? 14:"VERY GOOD !"L SCSC10` RARA1:V7V71t 8:A1B1570 &A;" TENS ";B;" ONES = ";K 0640 :A1B1610 DB1630 NA;" TEN ";B;" ONES = ";K X640 bA;" TEN ";B;" ONE = ";K ?" ^430 hA1B1400* rB1420G |A;" TEN ";B;" ONES = ?"P 430l A;" TEN ";B;" ONE = ?"u 430 A;" TENS ";B;" ONE = ?" 1700 NANA1 CK510 12:958 14:"NO....THE RIGHT ANSWER IS ";K M11300:M -::::* HMEM(115)(116)256 HEX$"BCBA:A2 0C 20 4A F9 A9 00 85 40 85 41 A0 C8 18 B9 F2 B3 F0 0E 0A 90 FB 48 E6 40 D0 02 E6 41 68 18 90 F0 88 D0 E9 A6 40 A5 41 AC 00 E0 C0 20 D0 07 20 1B E5 20 2F AE 60 20 24 ED 20 2F AE 60 N ADC3:20 BA BC!" " """""""" 34,2 SC100830( V70310; V77V78660I V78250[ Z(5(1))1h Z0310u Z1660 Z2830 "Z31160 ,1310 6A(9(1))1:B(9(1))1:K10AB @16368,0 J8:A1B1360 TA;" TENS ";B;" ONES =* dA$"NUMBER OF PROBLEMS"3nB$"NUMBER RIGHT"?x:936F9^14)"MATH LEVEL V"qTM11300:TM|:200RTRARBRCRDRERFNTNANBNCNDNENFSC(((RT10)NT))2RTRT"LEVEL 5 SCORE...........";(SC)! ! !!!!!!!""" " " 2150LE BAR";:|>Q$|H:|R7:"IF YOU WANT TO RETURN TO THE MENU, THEN PUSH KEY. IF NOT, PUSH ."|\16368,0|fPK(16384)|pPK141Ĺ16368,0:130|zPK155Ĺ16368,0:(4)"RUN HELLO"}ER TO 99"{4:A$;:30:NE1{4:B$;:30:RES{"VERTICAL SUBTRACTION TO 18"g{4:A$;:30:NF{{4:B$;:30:RF{ {"TOTAL PROBLEMS";:30:NT{ "TOTAL RIGHT";:30:RT{*"PERCENTAGE RIGHT";:30:((100RT)NT);"%" |4:"PRESS SPACngdnTH.8S`npongdnTo."SvtttelvT.QblrmleflV5,QbnpongdnT.SvgtxtvT.S`npongdnV,QblrmleflV,SvgtxtvT.S`npongdnT.S`npongdnV_-Qtvvͽ˨˨ŽͫŽ˨΍͠ҠӍ"NOMONCIO"O:::255:7:9:"CATALOG MENU VERSION 1.2":10:" BY STEPHEN THOMAS AND CHUCK FOWLER":14:16:"19/OCT/1981"PAA("A"):DD$(4):BELL$(7)Q13RDIVERTC"CATALOGD"DRV%DS0RTEENF(8)1:NP((NF4)20)1\FSFP:REC0N:216,0bGkHFIXIERRERR1:ERR2DRV3DRV:67JNF0:NP0:70KDIVERT2192:REC0N2178:S0RT2224:SFP2400:FIX2455L2440:DRV(2439)MC$(110) N""27-8I1255:(F2$)32F2$(F2$,2):`9F2$(F2$" ",30)u:DD$CMD$F$","F2$;64:FL4:FHNF1<I110:F((FLFH)2):F$(C$(F),8)=F2$F$FLF:>F2$F$FHF:?27@ERR0A72B:SFP:470DD$"CLOSE":DD$"NOMONI"91216,0:FIX:K$::27S23:"CONFIRM (Y/N) ";x3K$:K$"Y"K$"N"ĺBELL$;:514K$:K$"N"275DD$CMD$F$:1366:"ENTER NEW FILENAME, OR HIT [RETURN]"::"TO RETURN TO MENU"72:"AS ";F2$:958:F2$K$):CN1CNNCĺBELL$;:36L%CMD$(CMD$(CN),2):CMD(CMD$(CN)):CMD421g&(CMD$" ",6):958|'CMD40,44,50,54(CMD1Ĺ104,8)DD$CMD$F$*CMD1Ā+64:27,34,2:-48.DD$"MONI":DD$"OPEN"F$:DD$"READ"F$/657: NSW 20-6-82 ===================NC)"1UNLOCK" !LK$" "CMD$(NC1)"1LOCK":CMD$(NC2)"3DELETE":NCNC3:CMD$(NC)"4RENAME" "CMD$(NC1)"1VERIFY":NCNC2:CMD$(NC)"5RETURN TO CATALOG" #3:C1NC:C": "(CMD$(C),2)::1$K$:CN(2B$"RUN"B$"EXEC":CCCX CH639:210:B$B$(C):CH:1:868:B$:D$;B$:CC212Ā` 40 C1(CV8):C2CVC18:P1024128C240C1CH:C(P):, =================== PROGRAM`DESIGNED`BY PETER STUBBS NEWCASTLE 1:868:K5ĀC n"PRESS 'LETTER' YOU WISH TO ";:K1B$"LOAD"V xK2B$"LOCK"k K3B$"UNLOCK" K4B$"DELETE": B$;:198::K$:K(K$)48 K17KT1680 CH1:CVSTK16:210:C194(B$"RUN"B$"LOAD")B$"B"B$ C21C160ĹP1,219:P,T193:P1,221:TT1:SCV FCV:24:A$"TYPE LETTER TO RUN, OR LOAD =1 LOCK=2 UNLOCK=3 DELETE=4 EXIT=5 ...." PB$"RUN":1:(A$,39);:A$(A$,2)(A$,1):K(16384):K128āK175:K:K(0):80 Z16368,0:KK176:K1K5160 d ND823G"A I1(HEX$):511I,((HEX$,I,1))128::72,0:144j #HMEM3919,96:TURN OFF INIT COMMAND (:::1:D$(13)(4):HMEM6113,67:HMEM6196,96:D$;"CATALOG":HMEM6113,2:HMEM6196,206 2B(37)2:B22B22- <T0:CH4:CV023:210:1000:L 1700#C(C$))41Ĺ16368,0:1608rPK155Ĺ16368,0:(4)"RUN HELLO"B|1630J11l"GIVE THE MISSING NUMBER=>";tC$(C$,1)"Q"1500(C$"0"(C$)0)(C$)10001800:"THAT IS AN INVALID VALUE - PLEASE TRY AGAIN..."34,10L1ACE BAR TO CONTINUE""16368,03"PK(16384)C,PK321600M61560U@:J7:"IF YOU WANT TO RETURN TO THE MENU, THEN PUSH KEY. IF NOT, PUSH ."T16368,0^PK(16384)hPK1tvtmVvD8SggefflVzD%SebzflVmD.SaflgbbfVDStvvwtV DSedT-DSnlgfmtv}vtmmtvkvtmVDSgVDSggefflVDSebzflVDSg`dTFQebzfVDSVDSggVDStxxxxxxxxxxxxxxxxtmVDRPdeVBEXPtvvSCSC10&8:10A;" + ";B;" = ";AN2RDRD1E TM11300:TMQ34,0:Z160A(8(1))1:B(10(1))10::AN10AB(8:10A;" + ";B;" = ?"216368,0<1700FNENE1P12:958:14ZCAN1410 d"NO....THE RIGHT A