' +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"L뷩 ᷩ췩 ɛ LDLSAVBPILOCUNLOCIBPIBPIBPPRBPIBLISCALBPIBUZZOFӜsqu`".Q`pNФbptťܥm2<(-Py0\|e<6e< ~ vL~ JJJJj귍hI  aUL@ kU8  L  ^R(jQ0l^l\  OÌȌ`W ԧ H h@ [_ /QSIRb_L`LLLL`ª`LQL߼YLeLXLeLee ўQ0 L&RE;BY; Ꝥ$`( 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׭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` @@A` @A@  B C BBCLCee LfBL ީLhh`LLN7ɿLݍҭ -A@@i@@@i@AAݣ@ݢΩDDLeA@@lL /?@Hɷ@#@h@!ɵ@ɥͰi+hɝi@@/8e@@DAA͈@̈DDL܇@BA݅C@BAC濽տ`xxlt]iVȿQkKIGetchar RE;BY;LꍁlL<ԍL LHr7s8 LH HLݍ ,,(` LH e UL׉ LH LH,, sL,,, t鍁` H `Le HL H LL H QL H Llש B\ȹ'ȹ' (LRANGWRITE PROEND DATFILE NOT FOUNVOLUMI/O ERDISK FULLOCKESYNTANO BUFFERTYPE MISMATCTOO LARGNOT DIREC q`QrU`)`]N|Lي80ʭ) $% B橠 B  `L߭ɍ_LةحW`8& 9ʩ8`WL ( yۭ N N L,H whLZ؍^؍_`$,,L`hhhL٭0 ,Y0L,Ƀɛɍ8ɠnɻɺ: nY(8l mnحuIn Lw8n ۠u  ۥgh,,0۬ۍ،؍Ld8 L߭ u ب H بh,8m l بNۘHج,8۰h Z wةͽH h  بL]8Ѕυ Z0 Z LڭٍَٺHץ9WIn0 hH )? @(78In׽n I-- h+( ,,0 ,Hّ(ho Lލ ׭,0 )?( Ɉoɀ@MXXH Ihh0 LڊʰڍX,עLڍhhیڬ7۬ )ڠ8۬ڰ(HH `ȹ0,Ȍ ɍ  ɠ )?, @, LB Lߺ LƠ LLւ&LݩLL#B B!P`L_~_z{k~o_;U>w?S&@` <8@>@?xk?@~{(_}+~__~_/~~~~@`|?<8xzw?uk?}u~Popppu@o_~~~?~?x~<Pox?a`k_xo_ $ D'$EG 2@@  ?&@@@ H @@ PH@<&&H( D|@DAH@& &&&Ggs| @8<g@# @Hosq\pD`yg  g@pxH (b@ PH*@8 &&H( |@DAH@&@8@@&"@@ oz H @ PH@<&&H( @DAH@@ &&Ggs| @8<g@$osq\p`yg@&  `HOc @|NH @ &&Ggs|D@8<g@# &&8@0 D@    8`@`&HOc $2@|NHI@, & ` Ggs|@8<g @#@$osq\y D`yg &  `@@ HOc @|NHdy H( |@DAH@?& @@ H (@ PH*@<&&H( |@DAH@&!?DD@ &&osq\ D`yg 8`@`&&H b@ PH@8 &&H( @DAH@& 8@@gGsq@ 'x 1) 8<@D@@ H @b@ PH@8 @&&@ @, @&&&Ggs|@8<g@$osq\ `yg@&  `HOc $@|NHI@ &&Ggs| @8<g @$&osq\ `yg@  8@?ժժժժժժժժժժժժժժժժժժժHOc 2@|NH@, &&Ggs| @8<g@# osq\qpD`yg @HH(  bPH)y  8`HOc 2@|NH        z}`C`k/@~{U*U*U*U*U*U È?p?a`k?`@{6`UjU:UnU p@@@!@8P?z~zzoo <@c ~uuk??W/ }u`W{o@U> 0@c<>@n_~_~{o{o_ q:U"U+U@` < 8@>@?p@k^~{ U*U*U*U*U*U >@` 0<8xzw?uk?}u~@opp@u@o>>>x><@ox``k@_xoG`c$$$$ *@@ ar}@A@k/@~~ ^kk{_~ww&H@?p?a`k?x_|{>"_:ujUn_>@?z~zzkk <@cuuk?}?_?}~uWzo{} > 0@c<>doW_~{o{?D>U*u*@` < 8@>pp`k?`_{}zuo~_W}>@` 0<8xzw/u?~?}u{opx@?`o_pqyx8<@GGs>>x><@x``k@_|o_ $CCC'D#P& @ Axwa@/~~_{k{z__/𙜚@?p?A`k/~|{"W:}:U?*@>}{~zz{{~|?~~?cx~~ _}uk??? |~_zo?u} > 0@c<>ToW_~kok?P(U*U*U~~~x~?`|?|?xP>x?p`k?@_|oT{u?~Ww >@` 0<8x@zwoJux?}~W{>ȱ?, ߠȱwȱx, ߠΚ>w͘`͗͘LN8`PT(P ߠ8, ߠ0 L` J  Z     ?` LS `>8~~~~~~Popw`?po"T*U @@H!@D $">>>x><Pox``k?@~o_ "` jw~@x/_pwzj{~__ @>p?A`k?|{@(U?}:U?}+z}ozz~{{|x|~?cp||h_?}uk??}>y{WW*U*U*U*U> 0@c>p{wWkoo}*U*U*|||p~?`xxp@>x?apk?`_|oPnw?~W}U>@` 0<8x|? u*.U*||||||Popou@o?~oG"(U*U*Hyqp>@@H!8D ">>>x>Pox``{?@o`"@pppx@ hw?|`@?}@_>rwzz{z_~>@>p?A`k?|{:?}{u}o          :(MS$,C,1)","ĂXs(TS$(MS$,C):PSTS$162,S:TS$(MS$,C1):PSTS$170,S10:LL1fx(L:10380w(EF1:19010(A$"SPACE BAR to continue... ":PSA$0,180:A$""䍖(WT%255:ICA$,CH%,WT%:CH%2710010:EF010310(:CF$:10010-(A$"S- Name -- Tried %Right - Tested on -":PSA$0,25rP(L113:S2910L:NM$,TF,TC,MS$:NM$(NM$,15):PSNM$0,SZ(TF010360:TF$(TF):PSTF$104,SČ_(TC$((100TCTF))"%":PSTC$128,Sd((MS$)20ČPSMS$2203(MS$),S:10360n(C2011S":BE$:S110000:NM$,TF,TC,MS$: (NM$;:TF0ĺ:10270e(22);TF;30);(100TCTF)"%";39);MS$l(S((:D$"PR#0":CF$:10010<(:OF$"SCORES":RF$"SCORES":BE$:EF0F(ER:FT2:1800:A$"test scores":PSA$83,5:FT3:1800:103703K(A$" - when you're ready ...":PSA$0,140:A$""w'WT%255:ICA$,CH%,WT%:CH%2710010:CH%32ČBL:CH%8((A$)0):10210':D$"PR#1":"TEST SCORES":::10280'"----- Name ----- Finished %Right --- Tested on ---":!(:OF$"SCORES":RF$"SCORE510:(A$"E"A$"e")32010 ":PSA$0,125:A$""ɉ~'WT%255:ICA$,CH%,WT%:(A$"P"A$"p")10200:(A$"S"A$"s")10300艈'BL:CH%8((A$)0):10110*'A$"Press SPACE BARf the program":PSA$0,85\G'A$" E End the program and boot another disk":PSA$0,95L'A$"Your choice > ":PSA$0,110:A$""V'WT%255:ICA$,CH%,WT%`'(A$"L"A$"l")10100:(A$"D"A$"d")10410:(A$"C"A$"c")2110:(A$"B"A$"b")10$'A$"Press: If you wish to:":PSA$0,40b.'A$" L List all the test scores":PSA$0,553'A$" D Delete all the test scores":PSA$0,65؇8'A$" B Set how often verb 'to be' is used":PSA$0,75B'A$" C Continue with the rest oPH$(PH1))1)2LO(SC%(PH)2(PHPH%))EP2:PSER$L,154kZ#(SD)āIT13:ST(KC):STER10:STER10:ITrd#Lx#PH:WT%4:A$"":ICA$,CH%,WT%:ER$(45)ER$(127):EP3:0:9030†#3:'ER:FT2:1800:A$"for teachers":PSA$63,5:FT3:1800-WK(T)WK(T)1:WK$(T,WK(T))PH$(PH)LPH:ER$"'":AP%1:INSTRA$,ER$,AP%:2#TL0:PH1PH%:TLTL(PH$(PH)):SC%(PH)SC%(PH1)ı<#PH:TLTLPH%2:EP2:ER$(45):ATLıF#PH1PH%:SC%(PH1)(PH$(PH1))SC%(PH)190809P#LLO(SC%(PH1)(H)):IL92ER$(IL32)(PH$(PH),2):SC%(ER$(A$,(ER$)))USC%(PH)SC%:SC%8090PT(PH)2ĭ(SS$(PH))0ER$"'":SC%1:INSTRA$,ER$,SC%:SC%0PH$(PH)SS$(PH)TPT(PH):(T3WK(T)10)8090:WK(T)0āSWK(T)01:WK$(T,S)PH$(PH)8090:"$"RUN ESL64"\STALLING LOOP>\A150:(16384)127185F\:[\ ANY KEY PROMPT\ POKE - 16301,0: REM TEXT/GRAPHICS\:23:08:"PRESS ANY KEY TO CONTINUE."\SN MODEYs16302,0:FULL PAGE HGR2 OR HGR1Zx16300,0: SHOW PAG16299,0: SWITCH TO HGR2%[IF[16300,0:16301,0:0:1:3j[GARBAGE(IA):PLANT NEW SEED[D$"BLOAD TITLE.S, A$4000":49168,0::49234,0:UN16384[(55)190192:16384,0:103,1:104,64:D$"RUN ESL48" \22784,0:103,1:104,89:DE 1Z}D$;"BLOAD GES.PG2"=Z16299,0:SWITCH TO PAGE TWOWZ FLIP PAGES ONCE SETgZ:16368,0vZI199999Z195ZI3İ200Z16300,0: SWITCH TO HGR1Z16301,0: TEXT/GRAPHICSZ195Z16302,0: FULL PAGE HGR2 OR HGR1[ Y::D$(4):230,32:62450:Y(D$"BRUN MACH":UN967bY-D$"BLOAD GES1.S, A$4000":UN16384zY2D$;"BLOAD GES.PG2"Yd16304,0: SET GRAPHICS MODEYn16297,0: HIGH RESOLUTION MODEYs16302,0:FULL PAGE HGR2 OR HGR1Zx16300,0: SHOW PAG    UA(2):FT2:1800kj,BF$"SB7.S, A"UA(0):UNUA(0):A$"be":PSA$126,45:A$"lazy":PSA$215,60:FT3:1800j,FT3:1800:A$"Sample 3":PSA$115,8:PSP$(2,1)97,86:A$". statement":PSA$97,1081k,A$"He is lazy.":PSA$100,154:SC15:6500:BRBR%(CRA$,ER$,SC%:SC%08070:PHPH%8080_^ASC%(ER$)ĭ((A$,SC%(ER$)))64SC%SC%1:8020hSC%1ĭ((A$,SC%1))64SC%SC%1:8020rSS08080:PH$(PH)SS$(PH):8080烆SS0ĭ(SS$(PH))0SS1:ER$SS$(PH):SC%1:8020;PT(PH)1IL(PH$(P4)::PSA$87,154:X11000:Ni+,0:A$(RB$,10):PSA$80,154:3:X1500:i.,A$"You":PSA$87,154:SC15:6400:BRBR%(CH%):BR11410,11320,11320,11450,11410,11210,11410i8,BL:11310i, * SECOND SAMPLE SENTENCE *j,BF$"CB.S, A"UA(2):ER:UN". statement":PSA$97,108Th,A$"They have a pencil.":PSA$80,154:X13000:h,A$"-":LO801017:PSA$LO,154:(SD)āIT14:ST(KC):STER10::X190:h$,:X15000::0:A$(RB$,10):PSA$80,154:3:X1500:i),A$"":C14:A$A$(911250,11240,11240,11410,11250,11170,112509g+BL:11230|g+BF$"CB.S, A"UA(2):ER:UNUA(2):BF$"SB2.S, A"UA(0):UNUA(0)g+FT2:1800:A$"have":PSA$116,45:BF$"OB2.S, A"UA(1):UNUA(1)h+FT3:1800:A$"Sample 2":PSA$115,8:PSP$(2,1)97,86:A$UA(2)^f+BF$"SB2.S, A"UA(0):UNUA(0):A$"have":PSA$116,45:BF$"OB2.S, A"UA(1):UNUA(1)f+FT3:1800:A$"Sample 1":PSA$115,8:PSP$(2,1)97,86:A$". statement":PSA$97,108*g+A$"You have a pencil.":PSA$80,154:SC15:6500:BRBR%(CH%):BRSP$(TN,4)1403(P$(TN,4)),154^e+BRBR%(CH%):BR11188,11184,11184,11210,11188,11186,11188me+BL:11180e+TNTN1(TN1)e+TNe+ * FIRST SAMPLE SENTENCE *f+3:ER:FT2:1800:A$"samples":PSA$100,50:X1500::BF$"CB.S, A"UA(2):ER:UN2:1800:ER:A$"verbs":PSA$106,50Id+BF$"CB.S, A"UA(2):ER:UNUA(2)xd+A$"kick":PSA$120,45:FT3:1800:TN15d+3:LN13:PSP$(TN,LN)97,7511LN::PSP$(TN,4)1403(P$(TN,4)),154 e+SC10:6540:0:LN13:PSP$(TN,LN)97,7511LN::P50,11160c+BL:11140*c+OBOB1(OB1)Mc+OB: * SHOW SYMBOLS SCREEN *zc+3:BF$"SYMBOLS.S, A"UA(2):ER:UNUA(2)c+SC30:FT3:1800:6540c+BRBR%(CH%):BR11170,11168,11168,11170,11170,11110,11170c+BL:11164: * DEMO TENSES *$d+3:FTCTS *>bf+FT2:1800:ER:A$"objects":PSA$180,50:FT3:1800kbp+OB17:BF$"CB.S, A"UA(2):ER:UNUA(2)bz+BF$"OB"OB".S, A"UA(1):UNUA(1):A$"(a), (the) "OB$(OB)" .":PSA$150,154c+SC10:6540:BRBR%(CH%):BR11160,11145,11145,11162,11160,1112):ER:UNUA(2)@a+BF$"SB"SB".S, A"UA(0):UNUA(0):A$SB$(SB)ha+IN(A$):IN95A$(IN32)(A$,2)za+PSA$30,154a +SC10:6540:BRBR%(CH%):BR11060,11045,11045,11110,11060,11050,11060a%+BL:11040a*+SBSB1(SB1)a4+SBb[+ * THE OBJEC$X,180:37`Y12:(KB)1276590:Y:PSC$X,180M`C:S:CH%32:3:~`U$:U$:CH%(U$):CH%7ĹSD,255(SD):6540`3:`* * SHOW THE SUBJECTS *`+3:FT2:1800:ER:A$"subjects":PSA$35,50:FT3:1800a +SB110:BF$"CB.S, A"UA( $ $$          ժժժժժժՂ &   &   &   &      ժժժժժժժժժժժժժժժժժժժժ          &   &   &   &       @KK gg K KÑ KȄ K  # K `@K K  K@.(          &   &   &   &   T*U*U*U*U*U*U*U*U*U*U*ժ   $$        12,1712,143:R150:(KB)1276590j_xR:3:2,143276,143276,1712,1712,143:R150:(KB)1276590t_R:S_A$"SPACE BAR":A(A$):S1SC:C1A:C66580:(KB)1276590_Y12:(KB)1276590:Y `4:X1037C2(C6):C$(A$,C,1):PS * FLASHING SPACE BAR *J^R12:P%180:L%30:SOUNDP%,L%:X110::i^ P%180:L%120:SOUNDP%,L%^A$"SPACE BAR":PSA$110,180:A$(RB$,3):0:PSA$171,180:3:A$"":PSA$171,180^(SC40^dKS,0:S14%_nS14:0:2,143276,143276,17BR%(46)6:C4857:BR%(C)2::BR%(32)1~]C65122:BR%(C)3::C9195:BR%(C)8:BR%(C32)8::BR%(63)6:BR%(39)3:BR%(93)0]3]UA(2),UC(2):UA(0)AD:UA(1)AD6256:UA(2)AD]11010] * CHANGE FONT *]232,FT(FT,0):233,FT(FT,1):^(LS%1),SR%(3,SP):SP0T\tLS08:P%(1,LS),P%(2,LS),P%(3,LS),P%(4,LS),P%(5,LS),SP%\~LSSP%(LS)SP1:SPSPSP%:SSP%(LS)SP:SR%(0,S),SR%(1,S),SR%(2,S),SR%(3,S),SP$(S):S\LS\CF$']BR%(127):C064:BR%(C)8::BR%(7)5:BR%(13)7:BR%(27)4:$(5,4):LN14:TN15:P$(TN,LN)::A[BOF$"SPECS":RF$"SPECS"i[LSB%:SB$(SB%):SB1SB%:SB$(SB):[VVB%:VB$(VB%),CV$(VB%),VT(VB%):VB1VB%:VB$(VB),CV$(VB),VT(VB):[`OB%,TR%:OB$(OB%):OB1OB%:OB$(OB):\jLS%,SP:P%(5,LS%),SP$(SP),SP%R TO READ TO GET LENGTH OF LAST BLOAD2ZUNSC967vZRB$(127)(127)(127):C14:RB$RB$RB$::RB$RB$(RB$,41)ZAD8256:FT23:HO(AD256):FT(FT,1)HO:LOAD256HO:FT(FT,0)LOZ$BF$"]ESL"FT", A"AD:ADAD(LA)256(LA1):FT:19010%[8P}*YA$" 132N""": SAMPLES FOR ESL48PYFT(3,1):230,32:ER62450:SD7625YPS970:ICHAR973:D$(4):KC49200:KB49152:KS49168:SOUND956YBF$D$"BLOAD":OF$D$" OPEN":RF$D$" READ":CF$D$"CLOSE"%ZBL959:LA43616:(55)190LA48977: ADD K  # KdKK K@h?! K  K K    &@@ H @ PH@<^ts&H( @DAH@& ?@"@@ &H @@ PH@<&&H( |@DAH@&&Ggs|@8<g@# osq\9 D`yg && D@ H (b@ PH*@8 @@@H(dy  " ) >&H( `|@DAH@& &8?yg@ &  `HOc @|NH@ $H&Ggs| @8<g@$&osq\p`yg@   `@&HOc @|NH @ &D@ H Db@ PH@8 @&&  8`@HOc $2@|NHI@, @@@I(  "xP) "&Ggs|@8<g @# &osq\ D` &H @b@ PH@8@<&&H( |@DAH@G!!!? "@@ &H (@ PH*@<&&H( |@DAH@?&Kω K@@ K@ K K  # @K K K K@`Ab K@  K|@8<g @$osq\ `yg@&  8`@HOc D2@|NH@, @&&&H( @DAH@& @@Gcs @bqyx< 8@@D@ PSP$(P%(5,LS),5)97,130:7450`P15:(P4P%(4,LS)1)7445:P5ĭP%(5,LS)2ĭAP%07445PSP$(P%(P,LS),P)97,7511PPAR(4)PT(PH):7470$AR(4)0.FT3:1800JPH1PH%:SS0:ER$PH$(PH):SC%1%TSC%(A$)8070:INST00K(PT(PH)2AR(4)2)7420:P%(5,LS)2AP0Ē0:PSP$(2,5)97,130:3tP%(4,LS)1Ē0:PSP$(1,4)97,119:3~76000:P15:PSP$(P%(P,LS),P)97,7511P::3(PT(PH)1PT(PH)3)7460:PT(PH)47440:PSP$(P%(4,LS),4)97,119:7450!208:PSA$193,V::7330SFT2:1800:PSOB$(OB)2355(OB$(OB)),60:FT3:1800h3:AR(3)0:7400AR(3)OB7400:OBTR%ČUNUA(1):7370πFT2:1800:PSOB$(OB)2355(OB$(OB)),60::FT3:1800܀AR(3)OB(PT(PH)1PT(PH)3)AR(4)076箠ӽ֍ӽ֍箠ӽ֍ӽ֍箠֍(ӽ֍ӽ֍ӽ֍ӽ֍ӽ֍֍֍֍危֍֍֍危婽֍卲֍֍危֍֍֍危֍卲ӽ֍ӍӍӍӽ֍ӽ֍ӍӍӽ֍ӍӍӽ֍ӽ֍ӍӍӍӽ֍֍֍􍲬危֍ӽ֍Ӎ􍱬֍危֍危ﲬ󍷬󍷬󍷬󍷬󍷬󍷬󍷬󍷬󍷬󍷬󍷬󍱬퍲卷󍳬 K9 K  # K @KxK (K KЁ KȄ K  # KKxK Kó K  K 0 # K KτKicK K@(@ #  # K @K Kxt K K KժժժժժժՀxgā # ȁK K     K   # @K "@Kp@K F K΁ K 䐀 K(@Ł K @ 4 Kx  K0 @ K@ K  # `K8" Ё@KPǁ@K 0 K@p K`` K@ # ~K|"K  p@K0@X愃 K@p  K`  K@ K @ # |@K@"K p@ KwwP Oyyx凃wwP OyyxvxwuOz߁yxwȁwQ!OyyxwwP!Oyyx@*xwvO OyyxwvO*OyxxwuOzyxKK tفK  K K̙ K K K㈐ K͆ K  # K AK K  K K̐ K K  # 䍱􍱬덱䍱危䍱󍲬卷󍲬􍱬ӽ֍󍷬笲笲󍱬􍱬䍱䍱䍱䍱䍱ɍ򍱴笱笱笲笲笱笱笱笲笲笱笱笱    +Pyxv̀xȈxQ}yxvŀZ|Q}xxxxQ%Q}xwxЙxĻQ%Q}ހxwxāЈxȍQ'QyƀxvxȈxQ)PyxvˀಀxȈx蛀Q@tEŀwxR%؁Q}yxwxQ%Q}xxxxQ%Q}xwx  7200#AR(1)0ČUNUA(0):AR(1)1N SS(PT(PH)2):SSĭPH1ĭSC%(3)0SS0e%AR(2)1SS07300*FT2:1800:3SS:A$VB$(VB):PSA$1406(A$),45:FT3:180043:AR(2)SSPT(PH)37350:AR(3)07400:4:OBTR%7320A$(RB$,27):V201SC$X,180:38~Y12:(KB)1276590:Y:PSC$X,180N~C:S:CH%32:3:~U$:U$:CH%(U$):CH%7ĹSD,255(SD):6540~3:~SS(PT(PH)1):SS0ĭPH1SS1~SS7150:AR(1)07200:4:A$(RB$,29)V161208:PSA$1,V::AR(1)0:3:712,1712,143:R150:(KB)1276590k}xR:3:2,143276,143276,1712,1712,143:R150:(KB)1276590u}R:S}A$"SPACE BAR":A(A$):S1SC:C1A:C66580:(KB)1276590}Y12:(KB)1276590:Y ~4:X1037C2(C6):C$(A$,C,1):PEST2400:BR63010:A13:OK(A)0::3010\|R12:P%180:L%30:SOUNDP%,L%:X110::{| P%180:L%120:SOUNDP%,L%|A$"SPACE BAR":PSA$110,180:A$(RB$,3):0:PSA$171,180:3:A$"":PSA$171,180|dKS,0:S14&}n0:2,143276,143276,1UA(1):{AR(4)1āP15:PSP$(P%(P,LS),P)97,7511P:J{SC40:6400{jBRBR%(CH%):BR6300,6260,6260,6300,6300,6300,6300{tBL:6100{TESTĭOK(1)OK(2)OK(3)OK(4)4TCTC1:TC(LS)TC(LS)1{TFTF1:TESTTF(LS)TF(LS)1+|BR42010:TPH1PH%2:A$A$PH$(PH)" "::A$A$PH$(PH%1)PH$(PH%):PSA$10,154`zAR(1)0ČUNUA(0)zAR(2)0FT2:1800:PSVB$(VB)1406(VB$(VB)),45:FT3:1800zAR(3)6070:OBTR%FT2:1800:PSOB$(OB)2355(OB$(OB)),60:FT3:1800:6070{UN50:ER$""PyC1(PH$(PH)):A((PH$(PH),C)):ER$ER$(8861(A32)WD%(A)):yPSER$PL(PH),154:LO((PH$(PH))1)(224)256(225)4:5110y PSPH$(PH)PL(PH),154y>PHyzES10:EEPL(PH%)3:4850yA$(RB$,35):0:PSA$90,180:3:A$""IzFL35170;x6FL0:BL:SF1:EF1:FL$(CH%32):4800:5150xESPL(PH):EEPL(PH1)3:4850:A$PH$(PH)5900:SS$(PH)""A$SS$(PH)PH$(PH)SS$(PH):5900xBL:TRYTRY1:TRY2SF1:EF(PH$(PH)):FL$PH$(PH):4800:5950 yESPL(PH):EEPL(PH1)3:48150,wPA(PH$(PH))A$(A$,(A$)1):5800pwZ(CH(A1)32A1)5175:A35150:CH(A2)32CH(A1)1055150wdILIL1:BL:CH%8:IL35150wnIL0:SFA1:EFA:FL$"I ":4800:5150wLO(A1)PE(PH)5800 x,(A1PH1)5150:CH%925150:FLFL1:5950:TRY0:7100:OK(PT(PH))0:PT(PH)3VBVB%OK(2)0mvWT%120:CH%0:A$"":PSA$PL(PH),154:LO(1)PL(PH)vICA$,CH%,WT%:A(A$):CH%31LO(A1)(224)256(225):CH(A)CH%v(BRBR%(CH%):BR5200,5170,5400,2010,5800,5800,5800v2BLw7CH%8:5U$(U):(SD)āIT14:ST(KC):STER10:`uER$ER$U$:PSU$TL,154:TL(224)256(225):CuSC%(PH)0:PE(PH)TL:PHPH%1ER$" ":PSER$PE(PH),154uPH:PL(PH%1)(224)256(225)uPH$(PH%)"."PE(PH%)PE(PH%)56vPH1PH%:SC%(PH)0:PL(PH)(224)256(225)YtSC%(PH)05080:SC%(PH)SC%(PH1)SC%(PH)SC%(PH1)5080tER$PH$(PH):PHPH%1ER$ER$" "tPSER$PL(PH),154:5090tER$"":TLPL(PH):C1(PH$(PH)):A((PH$(PH),C,1))tUWD%(A)8861(A32):PHPH%U95+u1),154:FsST1800::ITCsA$(A$,1,SF1)FL$(A$,EF1):sER$(RB$,(EEES4)3):0:PSER$ES,154:3:ER$"":PSER$ES,154:sA04120:AR13:AR(AR)1::AR(4)2s8010s9010sES10:EELO(A)6:4850:SC%(PH%1)100tPH1PH%A$10,154/rzKS,0:WT%20:A$"":ICA$,CH%,WT%Fr4:PSRB$5,154:rESLO(SF):EELO(EF1):IT12:IT1İ4850:ST1500::PSFL$ES,154rST1800::4850:F1(FL$):LO(SFF1)(224)256(225) sF$(FL$,F,1):CH(SFF1)(F$):PSF$LO(SFFt" oN ,,,,"; negative"8oN ,,,"@ progressive",{oN "kicked","kick","will kick","will be kicking","did not kick"UAKS49168:SOUND956YBF$D$"BLOAD":OF$D$" OPEN":RF$D$" READ":CF$D$"CLOSE"%ZBL959:LA43616:(55)190LA48977: ADD$PH$(PH%):4800:5010Nq*H$" "A$:EC4660:A$(RB$,35):0:PSA$90,180:3q/A$"SHIFT-N : "(CP%32)" > "(CP%):PSA$93,180:SN1q4A$(H$,2):PSA$10,154:qfBL:4:PSRB$5,154:3 rpA$"Please be sure the 'CAPS LOCK' key is UP.":PS1:CP%(PH$(1))%p64650:FL34120p:FL0:BL:SF1:EF1:FL$(CH%32):ESLO(SF):EELO(EF1):4850:PSFL$ES,154:A$FL$:4100pXAOL4100:(A$,OL)OB$(OB)WT%15pb4100pA05010:BL:4020qWT%154100:LO(A2)LO(A1)7:SFA1:EFA1:FL1054090>orOK(1)0:ILIL1:CP%73:BL:4650:CH%8:IL34100o|IL0:SFA1:EFA:FL$"I ":ESLO(SF):EELO(EF1):4850:PSFL$ES,154:A$(A$,1,SF1)FL$:CH(A1)73:4100o0C30ĭA3C31:CH(2)92CH(3)92İ4710:4020p5A14440:CH%924100:FLFL90,180:3:SN0:PSA$10,154cnICA$,CH%,WT%:A(A$):CH%31LO(A1)(224)256(225):CH(A)CH%yn LO(A1)2704120nBRBR%(CH%):BR4200,4120,4400,2010,4600,5010,5010nCH%8:BL:4100oh(CH(A1)32A1)4120:A34100:CH(A2)32CH(A1))(Q32)(PH$(1),2)YmQ$"":PH1PH%2:Q$Q$PH$(PH)" "::Q$Q$PH$(PH%1)PH$(PH%)ymFT3:1800:A14:OK(A)1:mA$(TF1):PSA$2593(A$),180mOL(OB$(OB)):LOC(1)10:WT%50mA$"":PSA$10,154:4100nSNH$(RB$,35):0:PSH$)1:PH$(PH%)S$:3570Ll PT(PH%)2:PH$(PH%)VB$(VB):LS12PH$(PH%)CV$(VB)l C:PH%PH%1:PT(PH%)3:OBTR%PH$(PH%)"a":SS$(PH%)"the":PH%PH%1:PT(PH%)3m PH$(PH%)OB$(OB):PH%PH%1:PT(PH%)4:PH$(PH%)(4617(P%(4,LS)1)):Q(PH$(1)):Q95PH$(1:3570;k AD0PH%PH%1:PT(PH%)2:AD1:PH$(PH%)C$:3570Zk PH$(PH%)PH$(PH%)C$:3570k PH%PH%1:CC1:AD0:(SP$,C,1)"S"3560:S$SB$(SB):S(S$):A1S:((S$,A,1)" ")3558k PT(PH%)1:PH$(PH%)(S$,A1):PH%PH%1:S$(S$,A1)l A:PT(PH%A"UA(1):UC(1)OBjz UNUA(1)qj SPSP%(LS)SP%(LS1)1:SBSR%(0,SP)SBSR%(1,SP)VBSR%(2,SP)VBSR%(3,SP)Ăj PH%0:AD0:SP$SP$(SP):C1(SP$):C$(SP$,C,1)k C$"="3550:C$"("C$")":WT%C:INSTRSP$,C$,WT%:SS$(PH%)(SP$,C1,WT%C1):CWT%    g R QP?ɀL)iimiL8` ?@, ߠȱȘw <Lzʩ ߠȱ>ȱ? ޠ  J>)8 eȱe騥   Ȍ0 `450P15:(P4P%(4,LS)1)7445:P5ĭP%(5,LS)2ĭ    E z Ew` g`,0Oƃ ~ ~,L `_ z E,0 ͩ `,)I >Αw>ȩw?< <S LS `>8  A$VB$(VB):HT1406(A$):PSA$HT,45:CVVByiH TESTOK(3)03430:VBVB%OB((1)(OB%TR%)1)TR%:COOB3400:3430iR OB((1)TR%)1:COOB3410if COOB:OBTR%FT2:1800:PSOB$(OB)2355(OB$(OB)),60:3500jp UC(1)OBĺ::BF$"OB"OB".S, x{xvvxzxvvxyxvvxӎyxvvZ@EwyywvwzҠyvvwzӘxvvx{ӌxvv  Qh (TESTOK(2)0)3305:YB((LS15)(LS3(LS3))):YBĭBE65535VBVB%:3305h VB((1)(VB%1BEYB)1):VBVB%VBVB%h VBCV3301:VBVB%1LS123300h VBVB%1ĭLT(LS)ĭLT(LS)VT(VB)3301h OK(3)0OBTR%VBVB%3301,i FT2:1800::4g TEST0A$"lesson "(LS):PSA$115,8:3100[g A$"test ("(LS)")":PSA$115,8g P15:PSP$(P%(P,LS),P)97,7511P:g (TEST)(OK(1))SB((1)SB%)1:SBCS3200g UC(0)SBĺ::BF$"SB"SB".S, A"UA(0):UC(0)SBh UNSCUA(0):CSSB0LS120(LS12)::2240nfTS(LS)1TS(LS):A$"*":3TS(LS):PSA$11129(LS12),2010LS120(LS12):2240fLS124:TS(LS)0Ă:BL:2110f` LS(24(1)1):TS(LS)02400g :BF$"CB.S, A"UA(2):ER:UNUA(2):UC(0)0:UC(1)0:3:P110:SS$(P)"" want to test? ":PSA$23,4PeA$"(Press RETURN when finished.)":PSA$23,14seA$(RB$,5):0:PSA$250,4:3eA$"":PSA$250,4e13010:CH%272110:(A$)02300fLS25A$"*":LS124:TS(LS)1TS(LS):3TS(LS):PSA$11129(LS12),201":PSA$30,11:A$"":WT%90odICA$,CH%,WT%:A(A$):BRBR%(CH%):BR2224,2226,2224,2110,2228,2224,2228:2226d(A$)16ĭ(A$)1CH%322222dBL:CH%8(A0):2222dNM$A$" ":(NM$)12220d0:PSER$10,11:3eA$"Which lessons do youR-53M1?w n5 76NI)R---u -1-3vu?M13M1smNM13MN 5M13  NMMq-M13M1?w ?M .----NJ{J{J{J{->7->7->7->o7@@C?.- ??N -5?*m ->??w- -JJJmw M:N)NJj>o?MI:?M II??MII??oI 3R-53M1smN56-3M13-u mR-3v-NI1*-n -u?R-3---u 3?w6N R-53M1?w ?M >6-3M13Mq)66N 56o )6M.nq)566-N5-n n N -n1nq)R-3M1s-N-3M?7nI-N I166s-N Mn7 n N 666-uM17 n n NIM13m1n)n N )3M13M1s-N -3M?76NI )3M13 mN -3M?7 n N )3M:w -N --66vIMM13M13M1s-N M13M13MN IM13M1n >7MqM1s  3MqJM1s 6vI---.-uN.)3M1?w *uIR > -߻-M1n) >M?MIJIM???NIJ-I???NINI )s N )-nin)?3MI:??MIM M13--n N -3M?7M13-u J)36Ms-N -n1n1-u J--n?76--NJ--n?76NII)36M5s-uJM13M1??n n N -66JJMJMJMmw M:N)NMI6MM-M 57R 6N6N J -??-NN J17M**--J7uJ)3M5.M-Nm1w6-N)sI.-u-->N-N>I> 3--v 5--.-6s-N -޻M:?n -N.--6NI))3M?M1s-d  07AJ]ckt{0@FVa{ $6HYgy (3AOYjy %/=JYfv"JJJJmw M:N)N    "?"ĺD$"RUN DEMO"1cWLS1LS25ČBL:CH%8:2120Nc\LS252200:TEST0:3010cTEST1:ER$(RB$,84):0:PSER$10,11:PSER$10,153cPSER$10,10:3:A$"All lessons (25)":PSA$90,152cT13:WK(T)1:WK$(T,0)" ":dA$"What is your NAME? {SzzӁz̅Ġ{{􃸰{SzzzĠ{{㳀|S؀zz€{Ġ{{|܏RyzÀ{Ġ{\@G{{|Ryz{Ơ{{T%Syz{ {{T&Syz΂{⠀{{SzyzΆ{{  ss RETURN to continue... ":PSA$0,182:WT%250:A$""Ib*ICA$,CH%,WT%b>EL0:TC0:TF0::BF$"LESSONS.S, A$800":ER:UN2048:F23:BF$"]ESL"F", A"FT(F,0)256FT(F,1)::A02:UC(A)0:bHA$"":FT3:1800:PSA$82,11cR13010:CH%2010010:A$(T1),5810S::ha AF$"SCORES":WF$"SCORES":TL0:LS124:TF(LS)02070:NM$CM$TF(LS)CM$TC(LS)CM$LSaNM$" ":TS(LS)0:TC(LS)0:TF(LS)0:TLTL1a:TL1ĺ" Total-"CM$TF;CM$TC;CM$QT$MS$QT$:" "CM$0CM$0CM$aCF$:TC0:TF0:TS(25)06b A$"PreSMS$70,16@`A$"Finished:":PSA$0,28:A$(TF):PSA$70,28`A$"% correct:":PSA$120,28:A$((100TCTF.5))"%":PSA$190,28`(WK(1)WK(2)WK(3)3)2060:A$"You need work on these:":PSA$0,44`T13:S0WK(T)aPSWK$(T,S)100ৈwvuYvR"Qǐ"Qwvuv„Q"Pఀ#R𧄀wvuv…Q́!P#SPwvuvvQ!PwvuvvQܱ"Pwࠐvu@*Dvv…Q!Pwwvvv„Q!Pwwvvv⇀Q!    25)10_WD%(C)Q_:3N_UA(2),UC(2):UA(0)AD:UA(1)AD6256:UA(2)ADc_A14:OK(A)1:m_2010_232,FT(FT,0):233,FT(FT,1):_TEST02110:TF02110_ER:A$"Name:":PSA$0,4:PSNM$70,4 `A$"Tested on:":PSA$0,16:10810:P8::BR%(7)5:BR%(13)7:BR%(27)4:BR%(46)6:C4857:BR%(C)2::BR%(32)1^C65122:BR%(C)3::C9195:BR%(C)8:BR%(C32)8::BR%(63)6:BR%(39)3:BR%(93)0^0:WD%(127):FT3:1800:C32127:BR%(C)71210_A$(C):PSA$10,149:Q(224)256(2]oRF$"SPECS"W]tLS0LS%:P%(1,LS),P%(2,LS),P%(3,LS),P%(4,LS),P%(5,LS),SP%,LT(LS)]~LSSP%(LS)SP1:SPSPSP%:SSP%(LS)SP:SR%(0,S),SR%(1,S),SR%(2,S),SR%(3,S),SP$(S):S]LS]CF$:SP%(LS%1)SP1:LO(50),CH(50)I^BR%(127):C064:BR%(C)RF$"SPECS":19010;\LSB%:SB$(SB%):SB1SB%:SB$(SB):\VVB%:VB$(VB%),CV$(VB%),VT(VB%):VB1VB%:VB$(VB),CV$(VB),VT(VB):\`OB%,TR%:OB$(OB%):OB1OB%:OB$(OB):]jLS%,SP:P%(5,LS%),SP$(SP),SP%(LS%1),SR%(3,SP),LT(LS%),TF(LS%),TC(LS%):SP0$"]ESL"FT", A"AD:ADAD(43616)256(43617):FT:1075f[.:OF$"SCORES":RF$"SCORES":BE:CF$:1080[3OF$"SCORES":WF$"SCORES":BE6.49:"6.49 ":CF$:19010[8TS(25),MS$(1),P$(3,5):P15:T03:P$(T,P):::MS$(0)",":MS$(1)"-"\BOF$"SPECS":"READ":AF$D$"APPEND"4ZCM$", ":QT$(34):BL959JZP216384:UNSC967ZRB$(127)(127)(127):C14:RB$RB$RB$::RB$RB$(RB$,41)ZUL$(95):C14:UL$UL$UL$:ZAD8256:FT23:HO(AD256):FT(FT,1)HO:LOAD256HO:FT(FT,0)LO7[$BF;'YA$" 132N""": ESL48 PROGRAMmYFT(3,1),WK$(3,11),WK(4):230,32:ER62450:EC((64435)6):SD7625YPS970:ICHAR973:INSTR962:D$(4):KC49200:KB49152:KS49168:SOUND956ZBF$D$"BLOAD":OF$D$"OPEN":WF$D$"WRITE":CF$D$"CLOSE":RF$D$                         PT(PH)1IL(PH$(PH)):IL92ER$(IL32)(PH$(PH),2):SC%(ER$(A$,(ER$)))lSC%(PH)SC%:SC%8090PT(PH)2ĭ(SS$(PH))0ER$"'":SC%1:INSTRA$,ER$,SC%:SC%0PH$(PH)SS$(PH)TPT(PH):(T3WK(T)10)8090:WK(T)0āSWK(T)01:WK$(TTSC%(A$)8070:INSTRA$,ER$,SC%:SC%08070:PHPH%8080v^ASC%(ER$)ĭ((A$,SC%(ER$)))64SC%SC%1:8020hSC%1ĭ((A$,SC%1))64SC%SC%1:8020ɃrSS08080:PH$(PH)SS$(PH):8080SS0ĭ(SS$(PH))0SS1:ER$SS$(PH):SC%1:8020R,LS),4)97,119:74508 PSP$(P%(5,LS),5)97,130:7450wP15:(P4P%(4,LS)1)7445:P5ĭP%(5,LS)2ĭAP%07445PSP$(P%(P,LS),P)97,7511PPAR(4)PT(PH):7470Â$AR(4)0҂.FT3:1800؂JPH1PH%:SS0:ER$PH$(PH):SC%1<1PT(PH)3)AR(4)07600b(PT(PH)2AR(4)2)7420:P%(5,LS)2AP0Ē0:PSP$(2,5)97,130:3P%(4,LS)1Ē0:PSP$(1,4)97,119:37600Ɓ0:P15:PSP$(P%(P,LS),P)97,7511P::3(PT(PH)1PT(PH)3)7460:PT(PH)47440:PSP$(P%(4A$(RB$,27):V201208:PSA$193,V::7330jFT2:1800:PSOB$(OB)2355(OB$(OB)),60:FT3:18003:AR(3)0:7400AR(3)OB7400:OBTR%ČUNUA(1):7370FT2:1800:PSOB$(OB)2355(OB$(OB)),60::FT3:1800AR(3)OB(PT(PH)SA$1,V::AR(1)0:3:7200:AR(1)0ČUNUA(0):AR(1)1e SS(PT(PH)2):SSĭPH1ĭSC%(3)0SS0|%AR(2)1SS07300*FT2:1800:3SS:A$VB$(VB):PSA$1406(A$),45:FT3:180043:AR(2)SSPT(PH)37350:AR(3)07400:4:OBTR%732002(C6):C$(A$,C,1):PSC$X,180:3O~Y12:(KB)1276590:Y:PSC$X,180e~C:S:CH%32:3:~U$:U$:CH%(U$):CH%7ĹSD,255(SD):6540~3:~SS(PT(PH)1):SS0ĭPH1SS1~SS7150:AR(1)07200:4:A$(RB$,29)V161208:P0:2,143276,143276,1712,1712,143:R150:(KB)1276590}xR:3:2,143276,143276,1712,1712,143:R150:(KB)1276590}R:S}A$"SPACE BAR":A(A$):S1SC:C1A:C66580:(KB)1276590}Y12:(KB)1276590:Y$~4:X1037CLS)1B|BR42010:TEST2400:BR63010:A13:OK(A)0::3010s|R12:P%180:L%30:SOUNDP%,L%:X110::| P%180:L%120:SOUNDP%,L%|A$"SPACE BAR":PSA$110,180:A$(RB$,3):0:PSA$171,180:3:A$"":PSA$171,180|dKS,0:S14=}n3:1800:6070{UNUA(1)Q{AR(4)1āP15:PSP$(P%(P,LS),P)97,7511P:a{SC40:6400{jBRBR%(CH%):BR6300,6260,6260,6300,6300,6300,6300{tBL:6100{TESTĭOK(1)OK(2)OK(3)OK(4)4TCTC1:TC(LS)TC(LS)1|TFTF1:TESTTF(LS)TF(Y KEY TO REBOOT... ";!VJA$:6JN,"< past","& present","> future"`N,,"; negative",yN,"@ progressive",,N,". statement","? question",ƔN,"' contraction","' contraction",є }::6U:CF$D$"CLOSE":RF$D$"READ":AF$D$"APPE)1TT1:A$"?":LS0:13060Q2LS(A$):LS1LS25BR%(CH%)2ČBL:CH%8:13020Z2TT03ER$(RB$,80):0:PSER$20,173:3:PSLS$(LS)20,1733PSA$HT,VT:13020ՓBJEL(218)256(219):EN(222)::D$LJ:"ERROR# "EN" AT LINE "EL:"PRESS AN1:TS(B)0FBB!N*B:MS$(FB)gX*BFB124:TS(B)0ĭTS(B1)TS(B1)1MS$MS$MS$(TS(B1))(B)ob*:2WT%50:LS0:TT0:HT(224)256(225):VT(226):CH%0ђ2ICA$,CH%,WT%:(A$)0LS0:TT0:2LS(A$):CH%32ı2CH%63TEST0(A$@F`}惀zဣ_À|{_€|{࿀`{zÁzÁzఀԁzఀ{м{{}{{` 10540@)CH%6310550:10540eJ)(A$)010010:A(A$):(A100.0A0)10550:A100BE65535:10580~O)BEA(VB%1)(100A)T)A$"Done.":PSA$0,160:ST11500:^):OF$"SCORES":WF$"SCORES":((BE)" ",6):CF$:10010:*MS$""D*B241(A)"% of the time":PSA$0,125\)A$"(except lessons 15, 18, 21 and 24).":PSA$0,135")A$"New value? (or just RETURN) > ":PSA$0,150:A$"",)WT%255:ICA$,CH%,WT%:BR%(CH%)10550,10560,10550,10010,10570,10540,105706)BL:CH%8((A$)0):65:ST11500::10010c(:D$"DELETE SCORES":OF$"SCORES":WF$"SCORES":((BE)" ",6):CF$(A$"All scores have been erased.":PSA$0,165:ST11500::10010܏)A100:BE65535A(1000BE(VB%1BE).5)10")A$"'to be' is currently used ":CF$:10010D(A$"SPACE BAR to remove all scores":PSA$0,125(A$"ESC to choose a different option":PSA$0,135(A$"Your choice > ":PSA$0,150:A$""؎(WT%255:ICA$,CH%,WT%:CH%3210460(BL:A$"Nothing deleted":PSA$0,1S:10360*n(C2011:(MS$,C,1)","Ăos(TS$(MS$,C):PSTS$162,S:TS$(MS$,C1):PSTS$170,S10:LL1}x(L:10380(EF1:19010ƍ(A$"SPACE BAR to continue... ":PSA$0,180:A$""(WT%255:ICA$,CH%,WT%:CH%2710010:EF010310 (1800:10370JK(A$" -- Name -- Tried %Right - Tested on -":PSA$0,25P(L113:S2910L:NM$,TF,TC,MS$:NM$(NM$,15):PSNM$0,SZ(TF010360:TF$(TF):PSTF$104,Sی_(TC$((100TCTF))"%":PSTC$128,Sd((MS$)20ČPSMS$2203(MS$),ԠƤ®Ӭ̠Һ̠ΠԠèèҽҠРϠӤЩ ԍƠȥĠԽĠΨΠԽӽϠŠ̴Š̴àƠԠԠƤӮӬ̠Һ̠ΠԠҠƠϠԠƤ̢ƢԨƬԨƬԠҠϠèԍҠԠϠ˨ԩˤԬ ԍԠξ T ЀTȟ|̀yyȏ𗂤\T؁"ЀY؁|yЏzxЁU ЀT"YȀ}yzxT ЀT|Ȁ}yzV T ЀT|ȀzyˀyVԨӥƨӥèӥРҠӠϠӥԠХөХөХөХөХөХԨөԠƤХӥР͠ϨȨ͠èĺĠč̠Ġ̍ΠЍŠ̶Š̶΢ ̴ ͍ԠƤ̢ԢĺĠĠˠˠԠԺҠϠԠӥк͠ХӥФЩХӥҥ  إgh Hȱh`籅ɲX<ȱ=>B8 ":PSA$0,125:A$""~'WT%255:ICA$,CH%,WT%:(A$"P"A$"p")10200:(A$"S"A$"s")10300'BL:CH%8((A$)0):10110ontinue with the rest of the program":PSA$0,85sG'A$" E End the program and boot another disk":PSA$0,95L'A$"Your choice > ":PSA$0,110:A$""V'WT%255:ICA$,CH%,WT%1`'(A$"L"A$"l")10100:(A$"D"A$"d")10410:(A$"C"A$"c")2PSA$63,5:FT3:1800D$'A$"Press: If you wish to:":PSA$0,40y.'A$" L List all the test scores":PSA$0,553'A$" D Delete all the test scores":PSA$0,658'A$" B Set how often verb 'to be' is used":PSA$0,751B'A$" C CPP#LLO(SC%(PH1)(PH$(PH1))1)2LO(SC%(PH)2(PHPH%))EP2:PSER$L,154Z#(SD)āIT13:ST(KC):STER10:STER10:ITd#LІx#PH:WT%4:A$"":ICA$,CH%,WT%:ER$(45)ER$(127):EP3:0:9030ن#3:'ER:FT2:1800:A$"for teachers":,S)PH$(PH)8090:9WK(T)WK(T)1:WK$(T,WK(T))PH$(PH)cPH:ER$"'":AP%1:INSTRA$,ER$,AP%:2#TL0:PH1PH%:TLTL(PH$(PH)):SC%(PH)SC%(PH1)ıʅ<#PH:TLTLPH%2:EP2:ER$(45):ATLıF#PH1PH%:SC%(PH1)(PH$(PH1))SC%(PH)19080PT(PH)1IL(PH$(PH)):IL92ER$(IL32)(PH$(PH),2):SC%(ER$(A$,(ER$)))lSC%(PH)SC%:SC%8090PT(PH)2ĭ(SS$(PH))0ER$"'":SC%1:INSTRA$,ER$,SC%:SC%0PH$(PH)SS$(PH)TPT(PH):(T3WK(T)10)8090:WK(T)0āSWK(T)01:WK$(TTSC%(A$)8070:INSTRA$,ER$,SC%:SC%08070:PHPH%8080v^ASC%(ER$)ĭ((A$,SC%(ER$)))64SC%SC%1:8020hSC%1ĭ((A$,SC%1))64SC%SC%1:8020ɃrSS08080:PH$(PH)SS$(PH):8080SS0ĭ(SS$(PH))0SS1:ER$SS$(PH):SC%1:8020R,LS),4)97,119:74508 PSP$(P%(5,LS),5)97,130:7450wP15:(P4P%(4,LS)1)7445:P5ĭP%(5,LS)2ĭAP%07445PSP$(P%(P,LS),P)97,7511PPAR(4)PT(PH):7470Â$AR(4)0҂.FT3:1800؂JPH1PH%:SS0:ER$PH$(PH):SC%1<Š̶Š̍ŠЍŠЍǍ 쭬젬쭬ѐwvvvxѸvvvvxѮvvvvxvvvvZ@Dwxvw၈vwxvwuwxјvwuwwvvvw z#` ;s¶Ӡ ̱  µӠ ±ӠǠ ³Ӡ ´Ӡ ȠµӠ Ƞ Р·Ӡ¸ӠӮӠ ³Ӡ´Ӡ ¹Ӡ̶=ϠӮDz"̠B ̳Ϡ ²Ӡ ±Ӡ²ӠµӠ ·Ӡ ´Ӡ ¶Ӡ  ӱӠ ŮӠ̲®Ӡ ¶Ӡ³Ӡ ±Ӡ Ӡ  Ӡ ӮӠР ̶̱ ̴=   L(:D$"DELETE SCORES":OF$"SCORES":WF$"SCORES":((BE)" ",6):CF$(A$"All scores have been erased.":PSA$0,165:ST11500::10010ŏ)A100:BE65535A(1000BE(VB%1BE).5)10 )A$"'to be' is currently used "(A)"% of the time":PACE BAR to remove all scores":PSA$0,125l(A$"ESC to choose a different option":PSA$0,135(A$"Your choice > ":PSA$0,150:A$""(WT%255:ICA$,CH%,WT%:CH%3210460(BL:A$"Nothing deleted":PSA$0,165:ST11500::10010hw?|`@?}@_>rwzz{z_~>@>p?A`k?|{:?}{u}oT*U*U*Ujk?}?|? 0@cx~>U*U*U*U*U*U*U*Uh?P@od@_.x}~z{{~z@>_/~W}?>x@` 0<8xx@*U*T@?}|{zwo~~_~z:(_?}uk?}?}>>|?|?x>~P*UP@@*U+ ]*U U*U*@?x?a`k@_|o @,UP*A@*U*@*T*P;/}zW}?G@op?u@k?@zo"*U*U* "&@GH!D &h{__~~k?}??~ 0~@cx~~|{uWko/} _?P@/p.@|]~z{{~{ @>]|~w?}?~x@` 0<8xx@z}?t@?=`{pw?{z_~~>*?}uk?}}~~~~x~~@op`@ouoT*Ux?a`k_|o`#@CKGBK@!"B`qppp@~}xA`k/@|{lo/}{_}?܂@np?u`k?pzoG*P*U*UjTppq@HH1x<  @<to_~_~z{/?_ 8~@c~}~}Wk?/w_Pp/xW/|x@~?<|>_~_z{{~{bu>w~w? *~@` 8<88@~px? {h_?k~_~>||||@`x<8phw?uk?}}~~8~Pop`@ou?@o_||||p|<@x?apk_xoW $ $$$%A "@@ >> xI8|l>@x@@@HH@GD| xg`l=l|0|C@$|` c|~1~@@x@JH!"lE@   H@l@@@@O@H( |g`||~1~B@@%|p cl|0~@@"@"@DL!"lP*U*U* =Fx"<pq8x8x@HOOD8% 0,cypGF c 3B@@< ,!p@FcSba"" yx!DpSr8n@!@x"@pqx<F"  @. 02@ Gxgq c 3|B @<2Q@@!FP@n @2 @@ << @qI.>.>.>.>V w5757mI7m)7-5?7m;.M)۷II 55757575757575 * - -?????7m m 57m m 57m m 57m m 5IIII* -???7-M)5;.MI5;.MI5;.MI5;VII J--???-M)5;.MI5;.MI5?;w---??VII* -??5?II55757m--????.mI->;.MI)>;.MI)>?.---??IIIJ--???-M -757mII:?---??II III 575---5????-MI57mI 57mI 5??---->??VIIJ--???-M ->;.---->????.?---->???VIIII-5??.>.M:??7---;.>.>.>VI ?5757m-???7-M)5;ayd8_c/RcF_!)"fffffXXXaRIJ--->???-M 5;.MI5;.MI5?;w---㠬쭬㠬쭬㠬쭬젬   nin)?3MI:??MIMJ1JMJMJMJ J JJ3J-JJ JߒJ J J1JMJnJMJnJsJ3J3J3J J3J J.JNJ*I6MM-M ?J?JR--3M1smu5.-3M1߻--N1JJR7uJ)3M13M1s-N1w6-N)sI.-u-->N-N I> 3--v --n?wI-N -޻M:?n -N--6NIN)3M?M1s-N)3M1?w *uIJN -߻-M1n) >M?MIIM???NIJ-I???NINII)sIM)-aId )2@MZk| &,28>DJPV\bhntz -:L[dmz !IJ57R 6N6N JJ-JPSA$0,125E)A$"(except lessons 15, 18, 21 and 24).":PSA$0,135")A$"New value? (or just RETURN) > ":PSA$0,150:A$""ϐ,)WT%255:ICA$,CH%,WT%:BR%(CH%)10550,10560,10550,10010,10570,10540,105706)BL:CH%8((A$)0):10540@)CH%6310550"@@ I@D2@DL!"mU*U*U*U*U*U*U*U*U*`cqpq `qyxpH< aD`,<@@HOGGx `` cG3=@ppqq8xy<`<@CCGg `?@ppqq8xy<<@@GgcqaqxxU*U*U*U*U*U*U*U*U*@ppqq8xy<@pip"<<`cqpq `qyxpH< aD,< O&l=l|0|<`@!|` c|~1~`@`@@xqpI8D">@JH!"m?@ I@D@ H   H@a@@@ I@D2@@@O@H(|g`||~1~<@@@"|p cl|0~@@@@U*U*U*U*U*U*UqIMII*--->???NI-?-?-?.--->???VII -* -???.m)757575II --->???.>.--???NI5---???VIIII:.>--->??w)>.>.>.-5?I*MI5;.MI5;.MI5;.MI5?;w---5?II*MI)>;mI5wm)>w-5?w5II*MII5;.M)M)>;  T*U*U*U*U*U*U*U*U*U*U*ժ     &   &   &   &   T*U*U*U*U*U*U*U*U*U*U*ժ   $$             &   &   &   &   0   dC#           ժժժժժժժժժժժժժժժժժժժժ ժժժժժժՂ  &   &   &   0   $               &   &   &   0   $ $$             &   &   &   ժժժժժժժժժժժժժժժժժժժժ   dGC# dGC#           &   &   &   &         $'A$"Press: If you wish to:":PSA$0,40b.'A$" L List all the test scores":PSA$0,553'A$" D Delete all the test scores":PSA$0,65؇8'A$" B Set how often verb 'to be' is used":PSA$0,75B'A$" C Continue with the rest oPH$(PH1))1)2LO(SC%(PH)2(PHPH%))EP2:PSER$L,154kZ#(SD)āIT13:ST(KC):STER10:STER10:ITrd#Lx#PH:WT%4:A$"":ICA$,CH%,WT%:ER$(45)ER$(127):EP3:0:9030†#3:'ER:FT2:1800:A$"for teachers":PSA$63,5:FT3:1800-WK(T)WK(T)1:WK$(T,WK(T))PH$(PH)LPH:ER$"'":AP%1:INSTRA$,ER$,AP%:2#TL0:PH1PH%:TLTL(PH$(PH)):SC%(PH)SC%(PH1)ı<#PH:TLTLPH%2:EP2:ER$(45):ATLıF#PH1PH%:SC%(PH1)(PH$(PH1))SC%(PH)190809P#LLO(SC%(PH1)(H)):IL92ER$(IL32)(PH$(PH),2):SC%(ER$(A$,(ER$)))USC%(PH)SC%:SC%8090PT(PH)2ĭ(SS$(PH))0ER$"'":SC%1:INSTRA$,ER$,SC%:SC%0PH$(PH)SS$(PH)TPT(PH):(T3WK(T)10)8090:WK(T)0āSWK(T)01:WK$(T,S)PH$(PH)8090:","; negative",(N,"@ progressive",,LN,". statement","? question",uN,"' contraction","' contraction", }::6U"STR962:D$(4):KC49200:KB49152:KS49168:SOUND956ZBF$D$"BLOAD":OF$D$"OPEN":WF$D$"WRITE":CF$D$"CLOSE":RF$D$3070:2LS(A$):LS1LS25BR%(CH%)2ČBL:CH%8:13020C2TT0[3PSA$HT,VT:13020BJEL(218)256(219):EN(222)::D$œLJ:"ERROR# "EN" AT LINE "EL:"PRESS ANY KEY TO REBOOT... ";ГVJA$:6N,"< past","& present","> future"N,:MS$(FB)PX*BFB124:TS(B)0ĭTS(B1)TS(B1)1MS$MS$MS$(TS(B1))(B)Xb*:2WT%50:LS0:TT0:HT(224)256(225):VT(226):CH%02ICA$,CH%,WT%:(A$)0LS0:TT0:ђ2LS(A$):CH%32ı2CH%63TEST0(A$)1TT1:A$"?":LS0:1:10540NJ)(A$)010010:A(A$):(A100.0A0)10550:A100BE65535:10580gO)BEA(VB%1)(100A)T)A$"Done.":PSA$0,160:ST11500:ё^):OF$"SCORES":WF$"SCORES":((BE)" ",6):CF$:10010ܑ:*MS$""D*B2411:TS(B)0FBB N*BESL48"nn-D$"RUN ESL64"3n8J * ERROR HANDLING *\nBJEL(218)256(219):EN(222)::D$nLJ:"ERROR# "EN" AT LINE "EL:"PRESS ANY KEY TO REBOOT... ";nVJA$:6nN * DATA STATEMENTS *oN "< past","& present","> future","& future","< pas-3M1s--N- -3MNI@@>> " !-3>">"&,28>DJPV\bhntz -:L[dmz !IJ57R 6N6N JJ-JuvT́OQ؀RvutPӀQxuv懀uOQ̱䁐Q񈆏wuvuOQГRwvRPQÁȂ%SŒuvvRP܀QጀyuvvR@)Ɵuv†POQȀRvƑuvŒRᜈOQ%Sƃuv    5R-53Ms-NI)*-n --NR-3---u n:?-N R--3M1?w ?oI 5.-3M13Mq*6-N 56o J5n.n N566-N--n m u--3M1߻- -NR-3M1s-N--3M?7>MIR--3M1?w om7-NIR---u 1-3Msu - L(:D$"DELETE SCORES":OF$"SCORES":WF$"SCORES":((BE)" ",6):CF$(A$"All scores have been erased.":PSA$0,165:ST11500::10010ŏ)A100:BE65535A(1000BE(VB%1BE).5)10 )A$"'to be' is currently used "(A)"% of the time":PACE BAR to remove all scores":PSA$0,125l(A$"ESC to choose a different option":PSA$0,135(A$"Your choice > ":PSA$0,150:A$""(WT%255:ICA$,CH%,WT%:CH%3210460(BL:A$"Nothing deleted":PSA$0,165:ST11500::10010p 8`@`&HOc 2@|NH @,@ &&Ggs| @8<g@$Q@A!osq\ `yg@   `@&HOc $@|NHI@ &&Ggs:(MS$,C,1)","ĂXs(TS$(MS$,C):PSTS$162,S:TS$(MS$,C1):PSTS$170,S10:LL1fx(L:10380w(EF1:19010(A$"SPACE BAR to continue... ":PSA$0,180:A$""䍖(WT%255:ICA$,CH%,WT%:CH%2710010:EF010310(:CF$:10010-(A$"S- Name -- Tried %Right - Tested on -":PSA$0,25rP(L113:S2910L:NM$,TF,TC,MS$:NM$(NM$,15):PSNM$0,SZ(TF010360:TF$(TF):PSTF$104,SČ_(TC$((100TCTF))"%":PSTC$128,Sd((MS$)20ČPSMS$2203(MS$),S:10360n(C2011S":BE$:S110000:NM$,TF,TC,MS$: (NM$;:TF0ĺ:10270e(22);TF;30);(100TCTF)"%";39);MS$l(S((:D$"PR#0":CF$:10010<(:OF$"SCORES":RF$"SCORES":BE$:EF0F(ER:FT2:1800:A$"test scores":PSA$83,5:FT3:1800:103703K(A$" - K  K၃ K K| K K  #  dKKKx > K K K0 K  # `'$KK when you're ready ...":PSA$0,140:A$""w'WT%255:ICA$,CH%,WT%:CH%2710010:CH%32ČBL:CH%8((A$)0):10210':D$"PR#1":"TEST SCORES":::10280'"----- Name ----- Finished %Right --- Tested on ---":!(:OF$"SCORES":RF$"SCOREKヌ K K K K  # I KKK` K K K K   # IK KK Kq| K Kጄ K  # I`K KK K Kȁ K K A~‡€ # IK `geKK K K K@`(@c1À #  # $dKK K K K KժժժժժժՀ8@€ # K $&K    510:(A$"E"A$"e")32010 ":PSA$0,125:A$""ɉ~'WT%255:ICA$,CH%,WT%:(A$"P"A$"p")10200:(A$"S"A$"s")10300艈'BL:CH%8((A$)0):10110*'A$"Press SPACE BARf the program":PSA$0,85\G'A$" E End the program and boot another disk":PSA$0,95L'A$"Your choice > ":PSA$0,110:A$""V'WT%255:ICA$,CH%,WT%`'(A$"L"A$"l")10100:(A$"D"A$"d")10410:(A$"C"A$"c")2110:(A$"B"A$"b")10SC%(PH)05950:TRY0:7100:OK(PT(PH))0:PT(PH)3VBVB%OK(2)0x%WT%120:CH%0:A$"":PSA$PL(PH),154:LO(1)PL(PH)%ICA$,CH%,WT%:A(A$):CH%31LO(A1)(224)256(225):CH(A)CH%%(BRBR%(CH%):BR5200,5170,5400,2010,5800,5800,5800%2BLH%U956$U$(U):(SD)āIT14:ST(KC):STER10:k$ER$ER$U$:PSU$TL,154:TL(224)256(225):C$SC%(PH)0:PE(PH)TL:PHPH%1ER$" ":PSER$PE(PH),154$PH:PL(PH%1)(224)256(225)$PH$(PH%)"."PE(PH%)PE(PH%)5A%PH1PH%:PH1PH%:PL(PH)(224)256(225)d#SC%(PH)05080:SC%(PH)SC%(PH1)SC%(PH)SC%(PH1)5080#ER$PH$(PH):PHPH%1ER$ER$" "#PSER$PL(PH),154:5090#ER$"":TLPL(PH):C1(PH$(PH)):A((PH$(PH),C,1))$UWD%(A)8861(A32):PHPF$LO(SFF1),154:F)"ST1800::ITN"A$(A$,1,SF1)FL$(A$,EF1):"ER$(RB$,(EEES4)3):0:PSER$ES,154:3:ER$"":PSER$ES,154:"A04120:AR13:AR(AR)1::AR(4)2"8010"9010"ES10:EELO(A)6:4850:SC%(PH%1)100$#s UP.":PSA$10,154:!zKS,0:WT%20:A$"":ICA$,CH%,WT%Q!4:PSRB$5,154:!ESLO(SF):EELO(EF1):IT12:IT1İ4850:ST1500::PSFL$ES,154!ST1800::4850:F1(FL$):LO(SFF1)(224)256(225)"F$(FL$,F,1):CH(SFF1)(F$):PS1:EFA1:FL$PH$(PH%):4800:5010Y *H$" "A$:EC4660:A$(RB$,35):0:PSA$90,180:3 /A$"SHIFT-N : "(CP%32)" > "(CP%):PSA$93,180:SN1 4A$(H$,2):PSA$10,154: fBL:4:PSRB$5,154:3!pA$"Please be sure the 'CAPS LOCK' key i4100:FLFL1:CP%(PH$(1))064650:FL34120:FL0:BL:SF1:EF1:FL$(CH%32):ESLO(SF):EELO(EF1):4850:PSFL$ES,154:A$FL$:4100XAOL4100:(A$,OL)OB$(OB)WT%15b4100A05010:BL:4020! WT%154100:LO(A2)LO(A1)7:SFA,"; negative",(N,"@ progressive",,LN,". statement","? question",uN,"' contraction","' contraction", }::6U"STR962:D$(4):KC49200:KB49152:KS49168:SOUND956ZBF$D$"BLOAD":OF$D$"OPEN":WF$D$"WRITE":CF$D$"CLOSE":RF$D$3070:2LS(A$):LS1LS25BR%(CH%)2ČBL:CH%8:13020C2TT0[3PSA$HT,VT:13020BJEL(218)256(219):EN(222)::D$œLJ:"ERROR# "EN" AT LINE "EL:"PRESS ANY KEY TO REBOOT... ";ГVJA$:6N,"< past","& present","> future"N,:MS$(FB)PX*BFB124:TS(B)0ĭTS(B1)TS(B1)1MS$MS$MS$(TS(B1))(B)Xb*:2WT%50:LS0:TT0:HT(224)256(225):VT(226):CH%02ICA$,CH%,WT%:(A$)0LS0:TT0:ђ2LS(A$):CH%32ı2CH%63TEST0(A$)1TT1:A$"?":LS0:1:10540NJ)(A$)010010:A(A$):(A100.0A0)10550:A100BE65535:10580gO)BEA(VB%1)(100A)T)A$"Done.":PSA$0,160:ST11500:ё^):OF$"SCORES":WF$"SCORES":((BE)" ",6):CF$:10010ܑ:*MS$""D*B2411:TS(B)0FBB N*BW{@G{zx@v|{zy@w@D|wQ{`{zx@w@dwQ{a>؉{zx@w|\|wW{@{ࠀzx@ww@)* w|wR"W{zzwwR$W{zzwD|wQ$W{zy@w|DDwQ   PSA$0,125E)A$"(except lessons 15, 18, 21 and 24).":PSA$0,135")A$"New value? (or just RETURN) > ":PSA$0,150:A$""ϐ,)WT%255:ICA$,CH%,WT%:BR%(CH%)10550,10560,10550,10010,10570,10540,105706)BL:CH%8((A$)0):10540@)CH%6310550R(1)0:3:7200..AR(1)0ČUNUA(0):AR(1)1Y. SS(PT(PH)2):SSĭPH1ĭSC%(3)0SS0p.%AR(2)1SS07300.*FT2:1800:3SS:A$VB$(VB):PSA$1406(A$),45:FT3:1800.43:AR(2)SS.PT(PH)37350:AR(3)07400:4:OBTR%7320$/A$(RB$,(A$,C,1):PSC$X,180:3C-Y12:(KB)1276590:Y:PSC$X,180Y-C:S:CH%32:3:-U$:U$:CH%(U$):CH%7ĹSD,255(SD):6540-3:-SS(PT(PH)1):SS0ĭPH1SS1-SS7150:AR(1)07200:4:A$(RB$,29).V161208:PSA$1,V::AKK K K K K K  # KKK K K K K Á # K؇K K K K K  # KKK K K K K  # KKKÇ K K K K  # KKKK K K K  # K KK K K K؁6,143276,1712,1712,143:R150:(KB)1276590v,xR:3:2,143276,143276,1712,1712,143:R150:(KB)1276590,R:S,A$"SPACE BAR":A(A$):S1SC:C1A:C66580:(KB)1276590,Y12:(KB)1276590:Y-4:X1037C2(C6):C$R42010:TEST2400:BR63010:A13:OK(A)0::3010g+R12:P%180:L%30:SOUNDP%,L%:X110::+ P%180:L%120:SOUNDP%,L%+A$"SPACE BAR":PSA$110,180:A$(RB$,3):0:PSA$171,180:3:A$"":PSA$171,180+dKS,0:S141,n0:2,1432770*UNUA(1)E*AR(4)1āP15:PSP$(P%(P,LS),P)97,7511P:U*SC40:6400*jBRBR%(CH%):BR6300,6260,6260,6300,6300,6300,6300*tBL:6100*TESTĭOK(1)OK(2)OK(3)OK(4)4TCTC1:TC(LS)TC(LS)1*TFTF1:TESTTF(LS)TF(LS)16+B@g(  #  # KK؁K K Kȁ KժժժժժժՀ  # K K 3:A$""T)PH1PH%2:A$A$PH$(PH)" "::A$A$PH$(PH%1)PH$(PH%):PSA$10,154k)AR(1)0ČUNUA(0))AR(2)0FT2:1800:PSVB$(VB)1406(VB$(VB)),45:FT3:1800*AR(3)6070:OBTR%FT2:1800:PSOB$(OB)2355(OB$(OB)),60:FT3:1800:60PH1)3:4850:ER$""[(C1(PH$(PH)):A((PH$(PH),C)):ER$ER$(8861(A32)WD%(A)):(PSER$PL(PH),154:LO((PH$(PH))1)(224)256(225)4:5110( PSPH$(PH)PL(PH),154(>PH(zES10:EEPL(PH%)3:4850)A$(RB$,35):0:PSA$90,180:50:FLFL1:FL35170F'6FL0:BL:SF1:EF1:FL$(CH%32):4800:5150'ESPL(PH):EEPL(PH1)3:4850:A$PH$(PH)5900:SS$(PH)""A$SS$(PH)PH$(PH)SS$(PH):5900'BL:TRYTRY1:TRY2SF1:EF(PH$(PH)):FL$PH$(PH):4800:5950(ESPL(PH):EEPL(0 x80<< P <<?~|Cx3  |@@@ >p|8~|x xx@|p@|| p8 `<~p?xx?@xx? x@~`xp|? @ pAb A$"Press RETURN to continue... ":PSA$0,182:WT%250:A$""Tb*ICA$,CH%,WT%b>TC0:TF0::BF$"LESSONS.S":::49234,0:TEST0bCER:UNSCP2:A02:UC(A)0::BF$"CB.S, A"UA(2):LS$(LS%1)"Test"bHA$"":FT3:1800:PSA$82,11 cR13010:CH$(T,S)100(T1),5810S::sa AF$"SCORES":WF$"SCORES":TL0:LS124:TF(LS)02070:NM$CM$TF(LS)CM$TC(LS)CM$LSaNM$" ":TS(LS)0:TC(LS)0:TF(LS)0:TLTL1a:TL1ĺ" Total-"CM$TF;CM$TC;CM$QT$MS$QT$:" "CM$0CM$0CM$aCF$:TC0:TF0:TS(25)06:10810:PSMS$70,16K`A$"Finished:":PSA$0,28:A$(TF):PSA$70,28`A$"% correct:":PSA$120,28:A$((100TCTF.5))"%":PSA$190,28`(WK(1)WK(2)WK(3)3)2060:A$"You need work on these:":PSA$0,44`T13:S0WK(T)aPSWK9:Q(224)256(225)10%_WD%(C)Q._:3Y_UA(2),UC(2):A02:UA(A)P2A6256:n_A14:OK(A)1:x_2010_232,FT(FT,0):233,FT(FT,1):_TEST02110:TF02110_ER:A$"Name:":PSA$0,4:PSNM$70,4`A$"Tested on:":PSA$0,127):C064:BR%(C)8::BR%(7)5:BR%(13)7:BR%(27)4:BR%(46)6:C4857:BR%(C)2::BR%(32)1^C65122:BR%(C)3::C9195:BR%(C)8:BR%(C32)8::BR%(63)6:BR%(39)3:BR%(93)0^0:WD%(127):FT3:1800:C32127:BR%(C)71210_A$(C):PSA$10,14$"SPECS"W]tLS0LS%:P%(1,LS),P%(2,LS),P%(3,LS),P%(4,LS),P%(5,LS),SP%,LT(LS),LS$(LS)]~LSSP%(LS)SP1:SPSPSP%:SSP%(LS)SP:SR%(0,S),SR%(1,S),SR%(2,S),SR%(3,S),SP$(S):S]LS]LS$(LS%1)"Test":CF$:SP%(LS%1)SP1:LO(50),CH(50)[^BR%(1(\LSB%:SB$(SB%):SB1SB%:SB$(SB):p\VVB%:VB$(VB%),CV$(VB%),VT(VB%):VB1VB%:VB$(VB),CV$(VB),VT(VB):\`OB%,TR%:OB$(OB%):OB1OB%:OB$(OB):\jLS%,SP:P%(5,LS%),LS$(LS%1),SP$(SP),SP%(LS%1),SR%(3,SP),LT(LS%),TF(LS%),TC(LS%):SP0]oRF # K PK `؃K ` K @ K@ K K Á # 8K 0K  K   K@ K  # pK@K@K Kp K@ K0 K  K@@KK Kp K` K  # 8K @K@K K@( #  # @K KpK K  Kph? KժժժժժժՀ # K   AD(48977)256(48978):FT:1075S[.:OF$"SCORES":RF$"SCORES":BE:CF$:1080[3OF$"SCORES":WF$"SCORES":BE6.49:"6.49 ":CF$:19010[8TS(25),MS$(1),P$(3,5):P15:T03:P$(T,P):::MS$(0)",":MS$(1)"-"\BOF$"SPECS":RF$"SPECS":19010ND"!ZCM$", ":QT$(34):BL9597ZP216384:UNSC967{ZRB$(127)(127)(127):C14:RB$RB$RB$::RB$RB$(RB$,41)ZUL$(95):C14:UL$UL$UL$:ZAD8256:FT23:HO(AD256):FT(FT,1)HO:LOAD256HO:FT(FT,0)LO$[$BF$"]ESL"FT", A"AD:AD;YA$" 132N"""ZYFT(3,1),WK$(3,11),WK(4):230,32:ER62450:EC((64435)6):SD7625YPS970:ICHAR973:INSTR962:D$(4):KC49200:KB49152:KS49168:SOUND956ZBF$D$"BLOAD":OF$D$"OPEN":WF$D$"WRITE":CF$D$"CLOSE":RF$D$"READ":AF$D$"APPE      !!!!!!!""" " " " " """""""""    M$0CM$"bCF$:TC0:TF0:TS(25)0db A$"Press RETURN to continue... ":PSA$0,182:WT%250:A$""wb*ICA$,CH%,WT%b>TC0:TF0::BF$"LESSONS.S":::49234,0:TEST0bCER:UNSCP2:A02:UC(A)0::BF$"CB.S, A"UA(2):LS$(LS%1)"Test"cHA$"":FT44aT13:S0WK(T)?aPSWK$(T,S)100(T1),5810S::a AF$"SCORES":WF$"SCORES":TL0:LS124:TF(LS)02070:NM$CM$TF(LS)CM$TC(LS)CM$LSaNM$" ":TS(LS)0:TC(LS)0:TF(LS)0:TLTL1b:TL1ĺ" Total-"CM$TF;CM$TC;CM$QT$MS$QT$:" "CM$0C70,49`A$"Tested on:":PSA$0,16:10810:PSMS$70,16n`A$"Finished:":PSA$0,28:A$(TF):PSA$70,28`A$"% correct:":PSA$120,28:A$((100TCTF.5))"%":PSA$190,28a(WK(1)WK(2)WK(3)3)2060:A$"You need work on these:":PSA$0,A$10,149:Q(224)256(225)10-_WD%(C)Q6_:3a_UA(2),UC(2):A02:UA(A)P2A6256:v_A14:OK(A)1:_2010_232,FT(FT,0):233,FT(FT,1):_ * CHOOSE A LESSON *_TEST02110:TF02110`ER:A$"Name:":PSA$0,4:PSNM$ŒBR%(127):C064:BR%(C)8::BR%(7)5:BR%(13)7:BR%(27)4:BR%(46)6:C4857:BR%(C)2::BR%(32)1^C65122:BR%(C)3::C9195:BR%(C)8:BR%(C32)8::BR%(63)6:BR%(39)3:BR%(93)0^0:WD%(127):FT3:1800:C32127:BR%(C)71210 _A$(C):PS]oRF$"SPECS"_]tLS0LS%:P%(1,LS),P%(2,LS),P%(3,LS),P%(4,LS),P%(5,LS),SP%,LT(LS),LS$(LS)]~LSSP%(LS)SP1:SPSPSP%:SSP%(LS)SP:SR%(0,S),SR%(1,S),SR%(2,S),SR%(3,S),SP$(S):S]LS]LS$(LS%1)"Test":CF$:SP%(LS%1)SP1:LO(50),CH(50)c^:190100\LSB%:SB$(SB%):SB1SB%:SB$(SB):x\VVB%:VB$(VB%),CV$(VB%),VT(VB%):VB1VB%:VB$(VB),CV$(VB),VT(VB):\`OB%,TR%:OB$(OB%):OB1OB%:OB$(OB):]jLS%,SP:P%(5,LS%),LS$(LS%1),SP$(SP),SP%(LS%1),SR%(3,SP),LT(LS%),TF(LS%),TC(LS%):SP0 A"AD:ADAD(48977)256(48978):FT:1075[[.:OF$"SCORES":RF$"SCORES":BE:CF$:1080[3OF$"SCORES":WF$"SCORES":BE6.49:"6.49 ":CF$:19010[8TS(25),MS$(1),P$(3,5):P15:T03:P$(T,P):::MS$(0)",":MS$(1)"-"\BOF$"SPECS":RF$"SPECS"D$"APPEND")ZCM$", ":QT$(34):BL959?ZP216384:UNSC967ZRB$(127)(127)(127):C14:RB$RB$RB$::RB$RB$(RB$,41)ZUL$(95):C14:UL$UL$UL$:ZAD8256:FT23:HO(AD256):FT(FT,1)HO:LOAD256HO:FT(FT,0)LO,[$BF$"]ESL"FT",A@YA$" 132N""": ESLbYFT(3,1),WK$(3,11),WK(4):230,32:ER62450:EC((64435)6):SD7625YPS970:ICHAR973:INSTR962:D$(4):KC49200:KB49152:KS49168:SOUND956 ZBF$D$"BLOAD":OF$D$"OPEN":WF$D$"WRITE":CF$D$"CLOSE":RF$D$"READ":AF$%2010010:A$"?"ĺD$"RUN DEMO"@cWLS1LS25ČBL:CH%8:2120]c\LS252200:TEST0:3010cTEST1:ER$(RB$,84):0:PSER$10,11:PSER$10,153cPSER$10,10:3:A$"All lessons (25)":PSA$90,152dT13:WK(T)1:WK$(T,0)" "::LS$(LS%1uP%Pȁz{zv{{|uuR&P{ā{|ƒuuQ%Pǀ{p{{uuQ%Ṕz{Á{u@3+wuuP%PȀ{Ȁ{wuuP{ȁ{|vuuP{{|vuzP                     ! ! !!:PSA$2593(A$),1805n * INPUT FIRST ANSWER *XnOL(OB$(OB)):LOC(1)10:WT%50vnA$"":PSA$10,154:4100nSNH$(RB$,35):0:PSH$90,180:3:SN0:PSA$10,154nICA$,CH%,WT%:A(A$):CH%31LO(A1)(224)256(225):CH(A)CH%o Lthe":PH%PH%1:PT(PH%)3m PH$(PH%)OB$(OB):PH%PH%1:PT(PH%)4:PH$(PH%)(4617(P%(4,LS)1)):Q(PH$(1)):Q95PH$(1)(Q32)(PH$(1),2)mQ$"":PH1PH%2:Q$Q$PH$(PH)" "::Q$Q$PH$(PH%1)PH$(PH%)mFT3:1800:A14:OK(A)1:nA$(TF1)0:S$SB$(SB):S(S$):A1S:((S$,A,1)" ")3558jl PT(PH%)1:PH$(PH%)(S$,A1):PH%PH%1:S$(S$,A1)l A:PT(PH%)1:PH$(PH%)S$:3570l PT(PH%)2:PH$(PH%)VB$(VB):LS12PH$(PH%)CV$(VB)m C:PH%PH%1:PT(PH%)3:OBTR%PH$(PH%)"a":SS$(PH%)"(SP):C1(SP$):C$(SP$,C,1)~k C$"="3550:C$"("C$")":WT%C:INSTRSP$,C$,WT%:SS$(PH%)(SP$,C1,WT%C1):CWT%:3570k AD0PH%PH%1:PT(PH%)2:AD1:PH$(PH%)C$:3570k PH$(PH%)PH$(PH%)C$:35702l PH%PH%1:CC1:AD0:(SP$,C,1)"S"356TR%)1:COOB3410Ujf COOB:OBTR%FT2:1800:PSOB$(OB)2355(OB$(OB)),60:3500jp UC(1)OBĺ::BF$"OB"OB".S, A"UA(1):UC(1)OBjz UNUA(1)j SPSP%(LS)SP%(LS1)1:SBSR%(0,SP)SBSR%(1,SP)VBSR%(2,SP)VBSR%(3,SP)Ăk PH%0:AD0:SP$SP$CV3301:VBVB%1LS123300Gi VBVB%1ĭLT(LS)ĭLT(LS)VT(VB)3301hi OK(3)0OBTR%VBVB%3301i FT2:1800:A$VB$(VB):HT1406(A$):PSA$HT,45:CVVBiH TESTOK(3)03430:VBVB%OB((1)(OB%TR%)1)TR%:COOB3400:3430jR OB((1)h (TEST)(OK(1))SB((1)SB%)1:SBCS3200bh UC(0)SBĺ::BF$"SB"SB".S, A"UA(0):UC(0)SBxh UNSCUA(0):CSSBh (TESTOK(2)0)3305:YB((LS15)(LS3(LS3))):YBĭBE65535VBVB%:3305h VB((1)(VB%1BEYB)1):VBVB%VBVB%i VB(LS)0Ă:BL:21105g` LS(24(1)1):TS(LS)02400Og * SET UP PROBLEM *zg ER:UNSCUA(2):3:P110:SS$(P)"":g TEST0A$"lesson "(LS):PSA$115,8:3100g A$"test ("(LS)")":PSA$115,8g P15:PSP$(P%(P,LS),P)97,7511P:/PSA$250,41f13010:CH%272110:(A$)02300fLS25A$"*":LS124:TS(LS)1TS(LS):3TS(LS):PSA$11129(LS12),2010LS120(LS12)::2240fTS(LS)1TS(LS):A$"*":3TS(LS):PSA$11129(LS12),2010LS120(LS12):2240gLS124:TS(A$)1CH%322222.eBL:CH%8(A0):2222LeNM$A$" ":(NM$)12220de0:PSER$10,11:3eA$"Which lessons do you want to test? ":PSA$23,4eA$"(Press RETURN when finished.)":PSA$23,14eA$(RB$,5):0:PSA$250,4:3 fA$"":ns (25)":PSA$90,152edT13:WK(T)1:WK$(T,0)" "::LS$(LS%1)(A$,11):LS124:TS(LS)0:dA$"What is your NAME? ":PSA$30,11:A$"":WT%90dICA$,CH%,WT%:A(A$):BRBR%(CH%):BR2224,2226,2224,2110,2228,2224,2228:2226e(A$)16ĭ3:1800:PSA$82,11CcR13010:CH%2010010:A$"?"ĺD$"RUN DEMO"ccWLS1LS25ČBL:CH%8:2120c\LS252200:TEST0:3010c * CHOOSE LESSON(S) TO TEST *cTEST1:ER$(RB$,84):0:PSER$10,11:PSER$10,153dPSER$10,10:3:A$"All lesso2):3:P110:SS$(P)"":Kg TEST0A$"lesson "(LS):PSA$115,8:3100rg A$"test ("(LS)")":PSA$115,8g P15:PSP$(P%(P,LS),P)97,7511P:g (TEST)(OK(1))SB((1)SB%)1:SBCS3200h UC(0)SBĺ::BF$"SB"SB".S, A"UA(0):UC(0)S124:TS(LS)1TS(LS):3TS(LS):PSA$11129(LS12),2010LS120(LS12)::2240fTS(LS)1TS(LS):A$"*":3TS(LS):PSA$11129(LS12),2010LS120(LS12):2240fLS124:TS(LS)0Ă:BL:2110f` LS(24(1)1):TS(LS)02400g ER:UNSCUA(2220e0:PSER$10,11:3VeA$"Which lessons do you want to test? ":PSA$23,4eA$"(Press RETURN when finished.)":PSA$23,14eA$(RB$,5):0:PSA$250,4:3eA$"":PSA$250,4e13010:CH%272110:(A$)02300RfLS25A$"*":LS)(A$,11):LS124:TS(LS)0:UdA$"What is your NAME? ":PSA$30,11:A$"":WT%90dICA$,CH%,WT%:A(A$):BRBR%(CH%):BR2224,2226,2224,2110,2228,2224,2228:2226d(A$)16ĭ(A$)1CH%322222dBL:CH%8(A0):2222eNM$A$" ":(NM$)1TRY2SF1:EF(PH$(PH)):FL$PH$(PH):4800:5950Z{ESPL(PH):EEPL(PH1)3:4850:ER$""{C1(PH$(PH)):A((PH$(PH),C)):ER$ER$(8861(A32)WD%(A)):{PSER$PL(PH),154:LO((PH$(PH))1)(224)256(225)4:5110{ PSPH$(PH)PL(PH),154:4800:5150&zLO(A1)PE(PH)5800[z,(A1PH1)5150:CH%925150:FLFL1:FL35170z6FL0:BL:SF1:EF1:FL$(CH%32):4800:5150zESPL(PH):EEPL(PH1)3:4850:A$PH$(PH)5900:SS$(PH)""A$SS$(PH)PH$(PH)SS$(PH):59001{BL:TRYTRY1:y* NUM ALPH TIME ?. Dy2BLTy7CH%8:5150}yPA(PH$(PH))A$(A$,(A$)1):5800yZ(CH(A1)32A1)5175:A35150:CH(A2)32CH(A1)1055150ydILIL1:BL:CH%8:IL35150 znIL0:SFA1:EFA:FL$"I "BVB%OK(2)0DxWT%120:CH%0:A$"":PSA$PL(PH),154:LO(1)PL(PH)xICA$,CH%,WT%:A(A$):CH%31LO(A1)(224)256(225):CH(A)CH%x(BRBR%(CH%):BR5200,5170,5400,2010,5800,5800,5800x) 1 2 3 4 5 6 7<,154:TL(224)256(225):CZwSC%(PH)0:PE(PH)TL:PHPH%1ER$" ":PSER$PE(PH),154~wPH:PL(PH%1)(224)256(225)wPH$(PH%)"."PE(PH%)PE(PH%)5w * INPUT REVISIONS * xPH1PH%:SC%(PH)05950:TRY0:7100:OK(PT(PH))0:PT(PH)3V%(PH)SC%(PH1)5080;vER$PH$(PH):PHPH%1ER$ER$" "XvPSER$PL(PH),154:5090vER$"":TLPL(PH):C1(PH$(PH)):A((PH$(PH),C,1))vUWD%(A)8861(A32):PHPH%U95vU$(U):(SD)āIT14:ST(KC):STER10:wER$ER$U$:PSU$TL:AR(AR)1::AR(4)2Iu8010: CHECK FOR CORRECT WORD IN STRING ENTEREDu9010: CROSS OUT EXTRANEOUS TEXT IF OTHERWISE PERFECTuES10:EELO(A)6:4850:SC%(PH%1)100uPH1PH%:PL(PH)(224)256(225)vSC%(PH)05080:SC%(PH)SC%(PH1)SCSFF1)(224)256(225)UtF$(FL$,F,1):CH(SFF1)(F$):PSF$LO(SFF1),154:FitST1800::ITtA$(A$,1,SF1)FL$(A$,EF1):tER$(RB$,(EEES4)3):0:PSER$ES,154:3:ER$"":PSER$ES,154:t * ANALYSIS *uA04120:AR133CspA$"Please be sure the 'CAPS LOCK' key is UP.":PSA$10,154iszKS,0:WT%20:A$"":ICA$,CH%,WT%s4:PSRB$5,154:s * FLASH *sESLO(SF):EELO(EF1):IT12:IT1İ4850:ST1500::PSFL$ES,154tST1800::4850:F1(FL$):LO(SFA1:EFA1:FL$PH$(PH%):4800:5010^r*H$" "A$:EC4660:A$(RB$,35):0:PSA$90,180:3r/A$"SHIFT-N : "(CP%32)" > "(CP%):PSA$93,180:SN1r4A$(H$,2):PSA$10,154:r\ * 3 CAPS IN A ROW; PRINT MESSAGE *sfBL:4:PSRB$5,154:H%924100:FLFL1:CP%(PH$(1))5q64650:FL34120q:FL0:BL:SF1:EF1:FL$(CH%32):ESLO(SF):EELO(EF1):4850:PSFL$ES,154:A$FL$:4100qXAOL4100:(A$,OL)OB$(OB)WT%15qb4100qA05010:BL:4020&rWT%154100:LO(A2)LO(A1)7:2)32CH(A1)1054090NprOK(1)0:ILIL1:CP%73:BL:4650:CH%8:IL34100p|IL0:SFA1:EFA:FL$"I ":ESLO(SF):EELO(EF1):4850:PSFL$ES,154:A$(A$,1,SF1)FL$:CH(A1)73:4100p0C30ĭA3C31:CH(2)92CH(3)92İ4710:4020 q5A14440:CO(A1)2704120FoBRBR%(CH%):BR4200,4120,4400,2010,4600,5010,5010o 1 2 3 4 5 6 7o NUM ALPH TIME ?. oCH%8:BL:4100ph(CH(A1)32A1)4120:A34100:CH(AOBĺ::BF$"OB"OB".S, A"UA(1):UC(1)OB5jz UNUA(1)j SPSP%(LS)SP%(LS1)1:SBSR%(0,SP)SBSR%(1,SP)VBSR%(2,SP)VBSR%(3,SP)Ăj PH%0:AD0:SP$SP$(SP):C1(SP$):C$(SP$,C,1)k C$"="3550:C$"("C$")":WT%C:INSTRSP$,C$,WT%:SS$(PH%)B%3301Ci FT2:1800:A$VB$(VB):HT1406(A$):PSA$HT,45:CVVBiH TESTOK(3)03430:VBVB%OB((1)(OB%TR%)1)TR%:COOB3400:3430iR OB((1)TR%)1:COOB3410if COOB:OBTR%FT2:1800:PSOB$(OB)2355(OB$(OB)),60:3500'jp UC(1)Bh UNSCUA(0):CSSBhh (TESTOK(2)0)3305:YB((LS15)(LS3(LS3))):YBĭBE65535VBVB%:3305h VB((1)(VB%1BEYB)1):VBVB%VBVB%h VBCV3301:VBVB%1LS123300h VBVB%1ĭLT(LS)ĭLT(LS)VT(VB)3301i OK(3)0OBTR%VBVK K K K # €K ĀKK K K K K  # ÀK ĀKK菞  KЀ K K K  # K ĀKK KЁ K K K  K  #  K ĀK🂀K KЀ K Kȏ K  # @K ĀKKKK K K K  # K pĀKK KЀ K K@=( #  # €KKK K K KժժժժժժՀ # K `a€KS(PT(PH)2):SSĭPH1ĭSC%(3)0SS0<%AR(2)1SS07300}*FT2:1800:3SS:A$VB$(VB):PSA$1406(A$),45:FT3:180043:AR(2)SSPT(PH)37350:AR(3)07400:4:OBTR%7320A$(RB$,27):V201208:PSA$193,V::7330*FT2:1800:;.M)M)>;;.M-m)>?????-m)-۷III ے*MI5;.MI5;.MI5?;w---5?wI)>---???MII@@@@ 5-5?w)>.>.>.>-o A8_c/RcF_!)"fffffXXXaRIJ--->???-M 5;.MI5;.MI5?;w---     CH%7ĹSD,255(SD):6540: TURN SOUNDS ON/OFF ON ^G=3:_X * SELECTIVE ERASE/REDRAW *SS(PT(PH)1):SS0ĭPH1SS1SS7150:AR(1)07200:4:A$(RB$,29)ہV161208:PSA$1,V::AR(1)0:3:7200AR(1)0ČUNUA(0):AR(1)1% S6590R:SSA$"SPACE BAR":A(A$):S1SC:C1A:C66580:(KB)1276590qY12:(KB)1276590:Y4:X1037C2(C6):C$(A$,C,1):PSC$X,180:3ҀY12:(KB)1276590:Y:PSC$X,180耴C:S:CH%32:3:4U$:U$:CH%(U$):0:L%120:SOUNDP%,L%mA$"SPACE BAR":PSA$110,180:A$(RB$,3):0:PSA$171,180:3:A$"":PSA$171,180~dKS,0:S14n0:2,143276,143276,1712,1712,143:R150:(KB)1276590xR:3:2,143276,143276,1712,1712,143:R150:(KB)127TESTĭOK(1)OK(2)OK(3)OK(4)4TCTC1:TC(LS)TC(LS)1\~TFTF1:TESTTF(LS)TF(LS)1~BR42010:TEST2400:BR63010:A13:OK(A)0::3010: "?" REPEATS~ * FLASHING SPACE BAR *~R12:P%180:L%30:SOUNDP%,L%:X110:: P%18B)),45:FT3:1800e}AR(3)6070:OBTR%FT2:1800:PSOB$(OB)2355(OB$(OB)),60:FT3:1800:6070s}UNUA(1)}AR(4)1āP15:PSP$(P%(P,LS),P)97,7511P:}SC40:6400}jBRBR%(CH%):BR6300,6260,6260,6300,6300,6300,6300}tBL:6100:~|>PH#|p * DONE WITH PROBLEM *@|zES10:EEPL(PH%)3:4850k|A$(RB$,35):0:PSA$90,180:3:A$""|PH1PH%2:A$A$PH$(PH)" "::A$A$PH$(PH%1)PH$(PH%):PSA$10,154|AR(1)0ČUNUA(0)}AR(2)0FT2:1800:PSVB$(VB)1406(VB$(VS)2AP0Ē0:PSP$(2,5)97,130:3KP%(4,LS)1Ē0:PSP$(1,4)97,119:3U76000:P15:PSP$(P%(P,LS),P)97,7511P::3Ԅ(PT(PH)1PT(PH)3)7460:PT(PH)47440:PSP$(P%(4,LS),4)97,119:7450 PSP$(P%(5,LS),5)97,130:74507PЌPSOB$(OB)2355(OB$(OB)),60:FT3:1800?3:AR(3)0:7400kAR(3)OB7400:OBTR%ČUNUA(1):7370FT2:1800:PSOB$(OB)2355(OB$(OB)),60::FT3:1800AR(3)OBك(PT(PH)1PT(PH)3)AR(4)07600"(PT(PH)2AR(4)2)7420:P%(5,L 8@@ժժժժժժժժժժժժժժժժժժժ!X 8@, &&Ggs| @8<g@# osq\qpD`yg @HH(  bPH)y  8`HOc 2@|NH- @@>ou?{{>x@` 0<8xx@*U*TzHz7W?}s/}u?(_~z/~_~k?GT*U*U*UjWU~|? 0@cx~> U*U*U*U*U*U*U*UGh_>p@b@/8|/}?}U?/}Gx@|#`"@pppx*U*U*|||p~?`xxp@~uXa~kGh/?/wu~?~ 0~@cx~~|kk/_~W_ G _zp@p/@<}/}?}w??}p,UP*A@*U*@*T*zWW/~~G3@uP~@~`}"*U*U* "&@GH!D &>|?|?x>~P*UP@@*U* ]*UL U*U*@uX~a`@|~z ܂0@~uP~`_~p}G*P*U*UjTppq@HH1x<  @<~~~x~~@uP`@zk}MT*UuX>a`{|#`#@CKGBK@!"B`qppp @~}o|?{z~x@` 0<8xx@zW/|z? Hp_W}u?}u?*_~z/_~"@@  bw/w/_|6~@` 8<88@~WxxzHh_~_?}}+/}?||||@`x<8ph_~z/z~kGt/}?}/wu?_ 8~@c~}{k/_~w~_~GzxPp/|x@~?<| >/}?W?}?}o@~WX~C`_@k|L~UW/}_~W_~G zy+Wv+~?|?@<~./?}W}?upx_P~G`Wk|QuW?}z{ Ĉ0~uP~s`_~}*T*uj_~U@@ ~8~PuP`@z)@}_W||||p|<@uX~apzxW# $ $$$%A PuX0pz @}_W~~~?~?x~<PuX>a`{x_# $ D'$EG 2@@  W/U?WzS&@` <8@~w@>x?z~H(z_?}}+}/~~~~@`|?<8xz_~z+_z~kGp?}/wt_ <@c }zk/U >@` 0<8xz_zk_z~oGP?}}/w?u_ <@c zz/~W_~/G }j? /WS@z> 0@c<> @.+?}Wuw_pz_@~C`W@;~U*U*U*U*U*U È1wP~c`_~`@}6`Uj_z_~U p@@@!@8@~A@W@k~ v?uu?uok& H0@wP~c`_~h|>"_zj_~W4@uPp@z@}4>>>x><@uX `z@xG#`c$$$$ *@@ a Q?U'UkU@` < 8@~w@~p@{~~H U*U*U*U*U*``z@|_# $CCC'D#P& @ AD>U/u*@` < 8@~wP~p`{`I}kz}?})/>@` 0<8xzW~z+~_zzoG@}u/w?}O <@czz/_~_{?H}kn/W{{ > 0@c<> do+?}WuWpr_|?~~?cx~~ zz/_~_z?G |ko/WG{ > 0@c<> Tok?}_uWpx_`~a@W{~w?uu?u+/ 𙜚0@wP~G`_~j|"_z*_~_.3uPx@~`}_$pqyx8<@GGs>>x><@tX~~~PuP ~`~p}"T*U @@H!@D $">>>x><PuX``z@?|_# "` P(U*U*U~~~x~?`|?|?xP~uX~p`{@|ITo{}?}*'>@` 0<8x@z_~J xzz_oG@~eu/w/}w~p;`|IP.yu?koW>@` 0<8x|W **U*HzWw/}u?}w|x|~?cp||hzz/~_z?Hy+/'/U*U*U*U> 0@c> pck/}_~U_oj_~@P{pw?uuu//  0@~sP~C`_~k|@h_~._~_?3~~~@ )h|`Ai@?r}?}uu/}/? 0@~WP~G`_~c|zW~_/~~3||||||PuPn@~~}G"(U*U*Hyqp>@@H!8D ">>>x>PwX``z@|#`"@pppx*U*U*|||p~?`xxp@~uXa"% of the time":PSA$0,125V)A$"(except lessons 15, 18, 21 and 24).":PSA$0,135")A$"New value? (or just RETURN) > ":PSA$0,150:A$"",)WT%255:ICA$,CH%,WT%:BR%(CH%)10550,10560,10550,10010,10570,10540,105706)BL:CH%8((A$)0):10540OF$"SCORES":WF$"SCORES":((BE)" ",6):CF$y(A$"All scores have been erased.":PSA$0,165:ST11500::10010) * Set probability of verb 'to be' *֓)A100:BE65535A(1000BE(VB%1BE).5)10)A$"'to be' is currently used "(A)cores":PSA$0,125R(A$"ESC to choose a different option":PSA$0,135~(A$"Your choice > ":PSA$0,150:A$""(WT%255:ICA$,CH%,WT%:CH%3210460(BL:A$"Nothing deleted":PSA$0,165:ST11500::100102(:D$"DELETE SCORES":S$(MS$,C1):PSTS$170,S10:LL12x(L:10380C(EF1:19010{(A$"SPACE BAR to continue... ":PSA$0,180:A$""(WT%255:ICA$,CH%,WT%:CH%2710010:EF010310‘(:CF$:10010ܑ( * DELETE SCORES *(A$"SPACE BAR to remove all s>P(L113:S2910L:NM$,TF,TC,MS$:NM$(NM$,15):PSNM$0,SfZ(TF010360:TF$(TF):PSTF$104,S_(TC$((100TCTF))"%":PSTC$128,Sd((MS$)20ČPSMS$2203(MS$),S:10360ߐn(C2011:(MS$,C,1)","Ă$s(TS$(MS$,C):PSTS$162,S:TTCTF)"%";39);MS$(S6((:D$"PR#0":CF$:10010T;( * Display on screen **~<(:OF$"SCORES":RF$"SCORES":BE$:EF0F(ER:FT2:1800:A$"test scores":PSA$83,5:FT3:1800:10370K(A$" -- Name -- Tried %Right - Tested on -":PSA$0,250:CH%32ČBL:CH%8((A$)0):10210P':D$"PR#1":"TEST SCORES":::10280'"----- Name ----- Finished %Right --- Tested on ---":ώ(:OF$"SCORES":RF$"SCORES":BE$:S110000:NM$,TF,TC,MS$ (NM$;:TF0ĺ:10270(22);TF;30);(1000,125:A$""U~'WT%255:ICA$,CH%,WT%:(A$"P"A$"p")10200:(A$"S"A$"s")10300t'BL:CH%8((A$)0):10110' * Send scores to printer *؍'A$"Press SPACE BAR when you're ready ...":PSA$0,140:A$""%'WT%255:ICA$,CH%,WT%:CH%271001 ":PSA$0,110:A$""0V'WT%255:ICA$,CH%,WT%`'(A$"L"A$"l")10100:(A$"D"A$"d")10410:(A$"C"A$"c")2110:(A$"B"A$"b")10510:(A$"E"A$"e")32010Ȍj'BL:CH%8((A$)0):3:10010 t'A$"List to printer or screen? (P or S) > ":PSA$lete all the test scores":PSA$0,65d8'A$" B Set how often verb 'to be' is used":PSA$0,75B'A$" C Continue with the rest of the program":PSA$0,85G'A$" E End the program and boot another disk":PSA$0,95L'A$"Your choice > H%,WT%:ER$(45)ER$(127):EP3:0:90303#3:N' * Teacher section *'ER:FT2:1800:A$"for teachers":PSA$63,5:FT3:1800$'A$"Press: If you wish to:":PSA$0,40.'A$" L List all the test scores":PSA$0,55%3'A$" D De:ER$(45):ATLı: NO EXTRA CHARSZF#PH1PH%:SC%(PH1)(PH$(PH1))SC%(PH)19080P#LLO(SC%(PH1)(PH$(PH1))1)2LO(SC%(PH)2(PHPH%))EP2:PSER$L,154܉Z#(SD)āIT13:ST(KC):STER10:STER10:ITd#L*x#PH:WT%4:A$"":ICA$,C(T)01:WK$(T,S)PH$(PH)8090:HWK(T)WK(T)1:WK$(T,WK(T))PH$(PH)rPH:ER$"'":AP%1:INSTRA$,ER$,AP%:(# * CHECK FOR STABBING IN THE DARK *2#TL0:PH1PH%:TLTL(PH$(PH)):SC%(PH)SC%(PH1)ı: NOT IN ORDER$<#PH:TLTLPH%2:EP2):SC%1:8020aPT(PH)1IL(PH$(PH)):IL92ER$(IL32)(PH$(PH),2):SC%(ER$(A$,(ER$))){SC%(PH)SC%:SC%8090·PT(PH)2ĭ(SS$(PH))0ER$"'":SC%1:INSTRA$,ER$,SC%:SC%0PH$(PH)SS$(PH)!TPT(PH):(T3WK(T)10)8090:WK(T)0āSWK0:INSTRA$,ER$,SC%:SC%08070:PHPH%8080f^ASC%(ER$)ĭ((A$,SC%(ER$)))64SC%SC%1:8020hSC%1ĭ((A$,SC%1))64SC%SC%1:8020؆rSS08080:PH$(PH)SS$(PH):8080: FOUND IT; MAKE SUBSTITUTION? SS0ĭ(SS$(PH))0SS1:ER$SS$(PH15:(P4P%(4,LS)1)7445:P5ĭP%(5,LS)2ĭAP%07445YPSP$(P%(P,LS),P)97,7511P`PwAR(4)PT(PH):7470$AR(4)0.FT3:1800ȅ@ * CHECK FOR CORRECT WORD OR SUBSTITUTE *JPH1PH%:SS0:ER$PH$(PH):SC%1,TSC%(A$)807p?px?@xx@@B`?~A?`O@p|~|~? @@@ *" " @~p?`>x??xx?|?x? |@|x?|~~p||@A@3 a~p?px?`x?~x @@?~|?|~`?|@|pp2>r"~|`8~~x xp|@ || <~`xx?@x?x? x@x|``|`p&@p!$DD" `p?@xx?@x?~x? x@?x?~xs|0~x?|x? ~@|x?~?|~~s|~@@@xp<8<, C~p?xx?p?x?~x8x@?~|?|~p|@?|"2""BDLDpy DB8""" P! <8 @~p?`~|C@p8~ ( @ `@`x``|<&AcxD< "<~p?x?@x?~x?p1x@x?~xs|ppep~p?px?@xx@@B`|A`O@p|~| 00x~~@@pq*<"q< @~p?`x?`~`?|8@<~`p~xx x$p|@|A x8@@~x?@xx?x@xx@`|q @`E`8 BB~p?x?@x?x? x@~p|x{|" @~p?px?@x?~x? B?@~p~x~|@@@@b @D@,`B~p?~x?xx?@xx`@`|~?~?~x|~`?|@`" BD0!  xx?p~|C`87~!Hp~~x xx@xx@`?|~ x@` {~?p?~x?@x?`x? x@~?p|p{| ```8 ~p?px?@xx@@E`|A@_?`||g008@`~p?x?|x?`xx@p|C?~~x}~`| > Bp`C8 ! p `p`x?p~|`6~!Xx  p8x~`~x x,p~@?  |A@ @b~p?|x?@xx? x@~?`xp|8@ 8 ~p?px?@xx`p|A@?~@|C|w`~p?px?@x?x?`B?@pp|||`@`` x8@p@B`|p2 !~p?x?`x?x?x8x?x~@|8ZP`? ` 0 p<~<`8~(`@  |@A@ p8```~|x xx@|x @?|| @@pA#xX@0 ~p?`x?@x?xx pxC@?~@xC?|p~p?px?@xx?@B@@pp||y|p@  DD<@gqq","q9< @B~p?x?|x?px0<@p|s?~~|}~@<*P` 00`p`?~|@p~(`@  |@@@ >p|8~|x xx@|p@|| p8 `<~p?xx?@xx? x@~`xp|? @ p         !!! ! ! @)CH%6310550:10540_J)(A$)010010:A(A$):(A100.0A0)10550:A100BE65535:10580xO)BEA(VB%1)(100A)T)A$"Done.":PSA$0,160:ST11500:^):OF$"SCORES":WF$"SCORES":((BE)" ",6):CF$:100100* * BUILD "TESTED ON" SA1)7:SFA1:EFA1:FL$PH$(PH%):4800:5010eq*H$" "A$:EC4660:A$(RB$,35):0:PSA$90,180:3q/A$"SHIFT-N : "(CP%32)" > "(CP%):PSA$93,180:SN1q4A$(H$,2):PSA$10,154:qfBL:4:PSRB$5,154:3 rpA$"Please be sure the 'CAPS4440:CH%924100:FLFL1:CP%(PH$(1)) future"ΘN,,"; negative",瘘N,"@ progressive",, N,". statement","? :(A$)0LS0:TT0:,2LS(A$):CH%32ı_2CH%63TEST0(A$)1TT1:A$"?":LS0:130602LS(A$):LS1LS25BR%(CH%)2ČBL:CH%8:130202TT0ؗ3ER$(RB$,80):0:PSER$20,173:3:PSLS$(LS)20,1733PSA$HT,VT:13020 8J * ERROR TRING *:*MS$""/D*B2411:TS(B)0FBB@N*B:MS$(FB)X*BFB124:TS(B)0ĭTS(B1)TS(B1)1MS$MS$MS$(TS(B1))(B)b*:2 * INPUT LEGAL LESSON NUMBER *2WT%50:LS0:TT0:HT(224)256(225):VT(226):CH%02ICA$,CH%,WT%@xx@B@c@_``?x|A|x` 0DD@@q "2 " @B~p?@x?~x?px?p@@@x|?~|}~p|xD2 !~p?xx?~x?x?x `@@?x?x~@?|@?@`<<b><,L8DXpp0lx xp@p@|x 8~q?px?@xx? x@|@pp|p8`!$dx" ~p?`x?@x?@x pxC?|xc?|@~p?px?xx?~|~p|x8B@2 !~p??x?@x?|x 8@?~|?x~`?|@ " "2BDDd I BD P0xp @``?@~|C@`89~ (@?`?@?  @?@@@ `pp~@p~|8!$DD" ~p?@`x?@x?x?x pxC|xc|?x@~p?px?@xx@@B@@?``x|~|| b 88|@@ ""y" @~p?@x?~x?x?x?0 p@"BDDD  |B@>"> P @ xp?`~|C<@8~? (@x?@  p@`@ <~p~|x xp|@` |x `p`@p~?x?@xx? x@||pp|1PT(PH)3)AR(4)07600b(PT(PH)2AR(4)2)7420:P%(5,LS)2AP0Ē0:PSP$(2,5)97,130:3P%(4,LS)1Ē0:PSP$(1,4)97,119:37600Ɓ0:P15:PSP$(P%(P,LS),P)97,7511P::3(PT(PH)1PT(PH)3)7460:PT(PH)47440:PSP$(P%(4A$(RB$,27):V201208:PSA$193,V::7330jFT2:1800:PSOB$(OB)2355(OB$(OB)),60:FT3:18003:AR(3)0:7400AR(3)OB7400:OBTR%ČUNUA(1):7370FT2:1800:PSOB$(OB)2355(OB$(OB)),60::FT3:1800AR(3)OB(PT(PH)SA$1,V::AR(1)0:3:7200:AR(1)0ČUNUA(0):AR(1)1e SS(PT(PH)2):SSĭPH1ĭSC%(3)0SS0|%AR(2)1SS07300*FT2:1800:3SS:A$VB$(VB):PSA$1406(A$),45:FT3:180043:AR(2)SSPT(PH)37350:AR(3)07400:4:OBTR%732002(C6):C$(A$,C,1):PSC$X,180:3O~Y12:(KB)1276590:Y:PSC$X,180e~C:S:CH%32:3:~U$:U$:CH%(U$):CH%7ĹSD,255(SD):6540~3:~SS(PT(PH)1):SS0ĭPH1SS1~SS7150:AR(1)07200:4:A$(RB$,29)V161208:P0:2,143276,143276,1712,1712,143:R150:(KB)1276590}xR:3:2,143276,143276,1712,1712,143:R150:(KB)1276590}R:S}A$"SPACE BAR":A(A$):S1SC:C1A:C66580:(KB)1276590}Y12:(KB)1276590:Y$~4:X1037CLS)1B|BR42010:TEST2400:BR63010:A13:OK(A)0::3010s|R12:P%180:L%30:SOUNDP%,L%:X110::| P%180:L%120:SOUNDP%,L%|A$"SPACE BAR":PSA$110,180:A$(RB$,3):0:PSA$171,180:3:A$"":PSA$171,180|dKS,0:S14=}n3:1800:6070{UNUA(1)Q{AR(4)1āP15:PSP$(P%(P,LS),P)97,7511P:a{SC40:6400{jBRBR%(CH%):BR6300,6260,6260,6300,6300,6300,6300{tBL:6100{TESTĭOK(1)OK(2)OK(3)OK(4)4TCTC1:TC(LS)TC(LS)1|TFTF1:TESTTF(LS)TF(SA$90,180:3:A$""`zPH1PH%2:A$A$PH$(PH)" "::A$A$PH$(PH%1)PH$(PH%):PSA$10,154wzAR(1)0ČUNUA(0)zAR(2)0FT2:1800:PSVB$(VB)1406(VB$(VB)),45:FT3:1800{AR(3)6070:OBTR%FT2:1800:PSOB$(OB)2355(OB$(OB)),60:FTL(PH):EEPL(PH1)3:4850:ER$""gyC1(PH$(PH)):A((PH$(PH),C)):ER$ER$(8861(A32)WD%(A)):yPSER$PL(PH),154:LO((PH$(PH))1)(224)256(225)4:5110y PSPH$(PH)PL(PH),154y>PHyzES10:EEPL(PH%)3:4850zA$(RB$,35):0:P0:CH%925150:FLFL1:FL35170Rx6FL0:BL:SF1:EF1:FL$(CH%32):4800:5150xESPL(PH):EEPL(PH1)3:4850:A$PH$(PH)5900:SS$(PH)""A$SS$(PH)PH$(PH)SS$(PH):5900xBL:TRYTRY1:TRY2SF1:EF(PH$(PH)):FL$PH$(PH):4800:5950 yESP00 w2BLw7CH%8:5150CwPA(PH$(PH))A$(A$,(A$)1):5800wZ(CH(A1)32A1)5175:A35150:CH(A2)32CH(A1)1055150wdILIL1:BL:CH%8:IL35150wnIL0:SFA1:EFA:FL$"I ":4800:5150wLO(A1)PE(PH)5800!x,(A1PH1)515PH1PH%:SC%(PH)05950:TRY0:7100:OK(PT(PH))0:PT(PH)3VBVB%OK(2)0vWT%120:CH%0:A$"":PSA$PL(PH),154:LO(1)PL(PH)vICA$,CH%,WT%:A(A$):CH%31LO(A1)(224)256(225):CH(A)CH%w(BRBR%(CH%):BR5200,5170,5400,2010,5800,5800,58(A32):PHPH%U95BuU$(U):(SD)āIT14:ST(KC):STER10:wuER$ER$U$:PSU$TL,154:TL(224)256(225):CuSC%(PH)0:PE(PH)TL:PHPH%1ER$" ":PSER$PE(PH),154uPH:PL(PH%1)(224)256(225)uPH$(PH%)"."PE(PH%)PE(PH%)5MvH%1)1000tPH1PH%:PL(PH)(224)256(225)ptSC%(PH)05080:SC%(PH)SC%(PH1)SC%(PH)SC%(PH1)5080tER$PH$(PH):PHPH%1ER$ER$" "tPSER$PL(PH),154:5090tER$"":TLPL(PH):C1(PH$(PH)):A((PH$(PH),C,1))uUWD%(A)88611)(F$):PSF$LO(SFF1),154:F5sST1800::ITZsA$(A$,1,SF1)FL$(A$,EF1):sER$(RB$,(EEES4)3):0:PSER$ES,154:3:ER$"":PSER$ES,154:sA04120:AR13:AR(AR)1::AR(4)2s8010s9010 tES10:EELO(A)6:4850:SC%(P LOCK' key is UP.":PSA$10,154FrzKS,0:WT%20:A$"":ICA$,CH%,WT%]r4:PSRB$5,154:rESLO(SF):EELO(EF1):IT12:IT1İ4850:ST1500::PSFL$ES,154rST1800::4850:F1(FL$):LO(SFF1)(224)256(225)!sF$(FL$,F,1):CH(SFF