' +JJJJ ?\>m0M='+l> /+l   d]@ŵLҦ]]L L}BBL]浍국絍뵍䵺L 鷎귭෍ᷩ췩緈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/  !"#$%&'()*+,-./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- ( >Ϡ@跻~!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 / / ]ƴ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 ~(`  d - z# u`|LL pp pp pp||@@@@@@@@@@@@  pp  00@@ LLLL<<  00@@00  00@@@@@@@@||@ pp LL<>6*U*U*U*U>"**">AwwA>>cw]UU]wc"""""<""< 4< """""""""*6""""""> >>>@@@@@@@@@@@@000000 <$<$$88 8$$8$<80$$8 $$$  $ $ 6****$$$$$$$$$8$$8 4 8 $$$4,$$$""**6""$$$8 <<(\ >"#"& "::$$<$$$$$$$$$$$<<<$4$$$<$$$88 $$ $$<6**"""$$,4$$$$$$$$""*2\$$$8 >$$$$$$$$$""***6$$$$$$< <$">>< ("" ( **>< $4,$ $ <<  $<< $8$$< $$$$$8  $'h''''m'` @`t:"L!!#t#L"!    " 0 # 0LA& L& L&`+ 2' q&t&( r&u& &mq&r&u&q&t&' L&' &&( && &m&&&&&'I-L&+ % && & &m&&&'-+ `* 0 iH8h) '0 iH8* B&%* B&%%L$`%%%%%%%%0@%%%%0$%) %* &%) %* B&%L<%%%%L,%`%%%%JJJ%%%%0S%%%%0$%) %* &%) %* B&%L%* B&%* B&%%%L%` !?"$ $$hL $h $i $ `@ABC@(A(B(C(@PAPBPCP@ABC@ABC@ABCH hIH *0h H M$L$M$h)L$h)L$h`%%%%JJJ%%%%0R%%%%0$%) %* &%) %* B&%L$$R##$S##2#g###3#h###M$ n$H R#K#S#L#hLQ#hS#iS#M$ n$H ####hL#h#i#ʬ 6$# $5$# $M$ n$H ####hL#h#i#M$ n$H  $,3:TX,CH$::9200:3000T CO,2:SP,255:PC,1,3:TX,B1$:PC,X,3:L(SW$(W)):IV0: I1L:CH$(SW$(W),I,1):CH$"/"İ2400 CH$" "CH$"-"CH$"/"įTX,CH$:2300 CH$" "CH$"-"įNO:TX,CH$:IV1įINV   NO:9200:3000 ` IV1IINV:SY,3:DE,1,1,40,24:PC,2,9:I138:TX,"X"::NO:SY,1 CO,3:PC,3,6:TX,"LOOK CAREFULLY AT":PC,9,8:TX,"EACH":PC,3,10:TX,"PART OF THE WORD." S(W)1ī2200 CO,2:SP,200:I1WL(W):CH$(W$(W),I,1):INV:PC,XI1,3:TX,CH$:NO:PC,XI1d STEPS2 4/2/84W00NC(W)07305DX(11WL(W)2):S0:SS1:9000:CO,4:INV:SY,3:DE,1,1,40,24:PC,2,9:I138:TX,"X":NO:SY,1:PC,X,3:CO,2:TX,W$(W):CO,3:PC,5,8:TX,"SAY THE WORD.":30000:9200; SS1:9000:CO,4:       9:TX," ":SN1ĺBE$680% :PC,1,22:TX,"LEFT OR RIGHT ARROW KEY MOVES THE CURSOR":PC,1,24:TX," STOPS WORK ON THE CURRENT WORD":820:920:1020:1130:12404 )>H22:V1:L16:PC,1,1:TX,"ENTER THE NEW WORD:":PC,H,V1:TU,ENT FILES ":PC,14,12:TX,"ON THIS DISK...":40000PC,8,2N7:TX,"ENTER NUMBER OF STUDENT ":PC,8,2N9:TX,"(OR FOR ALL)":N1NPC,30,2N19:N$" ":ENN,N$,2,T%,AL%:(N$)2740000AL%0N0N(N$):NNS740PC,30,2N1," WORDS)":D(N)1įPC,36,2N5:TX,") "QfD(N)MWNGNG1:TX,"*** FULL ***"lD$;"CLOSE "SF$::NGNSįPC,5,10:TX,"ALL STUDENT WORD LISTS ARE FULL.":PC,5,12:TX,"RETURNING TO PREVIOUS MENU...":400006702PC,8,10:TX,"THERE ARE NO STUDD$;"READ "SF$:TE$(N),ST$(N),S(N),G(N),C(N),C$(N),NX(N),NX$(N),ML(N),D(N),P(N),A0(N),A1(N),A2(N),A3(N),A4(N),A5(N),A6(N),A7(N),A8(N),A9(N):N$(N):N$N$". "(bPC,5,2N5:TX,N$:TX,ST$(N):PC,21,2N5:D(N)MWįTX,"(NOW HAS ":W$(D(N)):TX,W$:TXTX," ":PC,40,Y:TX," "::CO,2:PC,2,24:TX," YOU MAY PRESS AT ANY TIME. "d NO:CO,2 NO:PC,8,4:TX,"ADD A WORD TO STUDY LIST FOR:":N1NS:ST$(N):D$;"CLOSE STUDENT NAMES":N1NS:SF$ST$(N)".STUDENT INFO FILE":D$;"OPEN "SF$:MW30:NG0:BL$"":I140:BL$BL$" "::650Q BO$"":I138:BO$BO$(135):x D$;"VERIFY STUDENT NAMES":60000 D$;"OPEN STUDENT NAMES":D$;"READ STUDENT NAMES":NS:NS0650V :NO:CO,0:DE,1,1,40,24:PC,2,1:TX,BO$:INV:Y124:PC,1,Y:1)TC$(H)""TC$(H)(32)B @C$(H)(21)C$(H)TC$(H):HH1:200U JC$(H)" "200v TPC,H,V:TX,C$(H):HH1:200 hXH1H1:I$I$C$(X)::IH40:PC,I,V:TX," ":PC,I,V1:TX," "::  - D$(4):BE$(7):QU$(34):BASE5632:SN(BASE48):):ENC,C$(H),T%:(C$(H))2740000n (C$(H))34įPC,1,16:TX,"USE THE SINGLE QUOTE MARK (') INSTEAD.":210 C$(H)(13)360 C$(H)(8)TC$(H1)C$(H1):HH1:200 HH1L310 SN1ĺBE$ "WA1C$(H)" "1740 ,220 6C$(H)(2|LL pp pp pp||@@@@@@@@@@@@  pp  00@@ LLLL<<  00@@00  00@@@@@@@@||@ pp LL<]T*UKկժWT *U!ժ)ɮ* 55:U6=Ʈժժ@00 ||pp LLLLLL pp@@00  || || || ||pp  pp||  |||| || |||| || pp ժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժէժ٭i%IժԪjN*ժJ^JժժժժժժժժժժժժժժժժժժժժժժժժժժժתժժժժժժkST(@x&Uzuj\[JJ6S5YjUժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժ V{Cժ](ժժhժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժj֪ժՓ&VT+ªժ'ժjZ:ժ]&_VժժժժժժԪժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժOU&PP6]V8juҪȪIF3ժ#W%ժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժjժժժժժժT+դժժժժ4ժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժ*]ڪժWЕ.G"#Ҫժ'ժժ[&ժY(W&V2ժժժժժժԪժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժ[e6`.jJUzwEתU )&yj( ͢WHժժժժժժժժժժժժժժժժժժժժժժժժկ׻ݿիժժժժժժժժժժ=j ݨAT(II,NVU.t )]Zw U*,ժժժժժժտժժժժժժժժժժժժժժժժժժתתժժժժժRzvv W +[FէjU@z.MRʦOoՒUժժժժժժߤժժժժժժժժժժժժժժժժժתתժժժժժ.'7dP&.E/25U**h \&+W)ըT(ժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժJժ+5Y괥EժҪd*ժ:g]F&ժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժߪժժժժժժժժժժ/֪i*eMjR 5Zn-ժScm(ժժT RECORDS."-R$:(R$)27ĉ::"BYE...":WR$"M"ĹBASE45,0::D$"RUN STDISKS"j16368,0:480D$"DELETE STUDENT NAMES"D$"OPEN STUDENT NAMES":D$"WRITE STUDENT NAMES":NTNT1:NT:NT1āI1NT1:SN$(I):S$:D$"CLOSE STUDENT NA" ":410-I1NT:S$SN$(I)ī5743BNT3ī515TDE,2,2,39,17fINV:FI:NO: PC,8,6:TX,"SORRY, THERE'S NO MORE ROOM":PC,13,8:TX,"FOR NEW STUDENTS.":PC,12,11:TX,"PRESS TO STOP ":PC,5,13:TX,"OR 'M' TO MANAGE STUDEN@ժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժjqժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժ*ЪժZ*KժkߪժժժժQ,ժ6Sժժ        ժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժߪժժժժժժժժժժ'=+Su֪*ժ՚KJjdjKUժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժEm,R3h,u"-z+gH4.^Wy*+Sږߊ}iUzժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժQ,ժժժժ+ժժժժ=ժժժ eժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժӪY6ժe6굥ժDS7,ժi&Qi˳ժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժ T"UQU~*U$Q.WU *IW*l*g E:\u*)ժժժժժժժժժժժժժժժժժժժժժժժժ+ժժժժժժժժժժժժժժժժժժU'-ѥ>' UzpUJWRZ( >*UAI*X^C:WnO.%ժժժժժժתժժժժժժժժժժժժժժժժժժժժժժժժ-IU:I{U,+'+U+uj]z*U5"/(QT%ժժժժժժԪժժժժժժժժժժժժժժժժתߪժժժժժWYT)RV:jԪURJh2U*-+M*UkϮ4"BBCժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժߪժժժժժժժժժժ/ݶ틪)WR(ު4Wժb- u(կիժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժuں!Mo$Uz4u%+0+uj-SʔmizժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժԪժժժժ+ժ'UԪ]ժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժ,֪-ժEvj*+ժAiժ*)ժժSňժժժժժժժժժժժժժժժժժժժժժժժժ׻ݪݫժժժժժժժժ)v Yc*"Q*M+T0]"CSk,.+(UzSjժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժmժժժժժժժժժժ$!E*+"W*rBj6+WT*tZ :UjO*)ժժժժժժתժժժժժժժժժժժժժժժժժժժժժժժժS! PK/Tmbjf/݊o%zU(UZ*eC+]H ժժժժժժԪժժժժժժժժժժժժժժժժߪժժժժժw[FlYuV4(UjiWjI["-]()SU;iժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժ)ժ媪=VժZKժժ嫋HJTժժժժժժժժժժժժժժժժժժժժժժժժժߪժժժժժ%֚H%UUje|ZG+%xZ*&ժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժUժժժժժժ/UXԪ|ժXTժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժ*ժW ժVjժEժ-ժժWՔTժժժժժժժժժժժժժժժժժժժժժժժժ׻ݪժժժתժժժժժ%jTRQQ**Uj^, E*-3U*iB)*]c1U )ժժժժժժՐҪժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժiT"d":-G> U UBBJUC#Ti 0 V(U W*+ժժժժժժתժժժժժժժժժժժժժժժժժժժժժժժժ]N-uªZjD*ۚj%()NMJ)GժժժժժժԪժժժժժժժժժժժժժժժժժժժժժw=]JZUIծ~T IY,T+) Du}K*Uժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժ+ժ?YaJEժՕjJժؼUժժժժժժժժժժժժժժժժժժժժժժժժժתժժժժժժiΪՊXM"[z&yjgK 'Q)u\*JժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժUժժժժժժ?U]Ԫ,ժժ ժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժԪjVT+ժE7ժ":ժM.ՔVժժժժժժժժժժժժժժժժժժժժժժժժտ׿իժժժתժժժժժSfjk,UZ*< U*QM0SWr "e*]"Q ժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժݩժժժժժժժժժժ *J>h/M-:ժժ2:I116:TX,"="::TU,0:L16:150:W$I$<H(W$)13ī820eRAB0:I1(W$):(W$,I,1)" "AB1uS:AB0820p(W$,1)" "W$(W$,(W$)1):880z(W$,1)" "W$(W$,(W$)1):890 NH22:V5:L(W$)2:PC,1,3:TX,"ENTER A MI4Հחࠀח 뀀dH22:V8:L18:PC,H1,V:A$(32):ENC,A$,T%:(A$)131400Pi(A$)211380bnOC$S1$:1070xH22:V10:L18:PC,H1,V:A$(32):ENC,A$,T%:(A$)131420}(A$)211400OC$S2$:PC,H,V1:L18:TU,2:I1L:TX,"="::TU,0:11301240CHANGES <<"F<H22:V1:PC,H1,V:A$(32):ENC,A$,T%:(A$)131360ZA(A$)211340FOC$W$:820:(MW$)(W$)2OC$" ":920:1380PH22:V5:PC,H1,V:A$(32):ENC,A$,T%:(A$)131380U(A$)211360ZOC$MW$:920<:ENS,A$,2,T%,AL%:A$(A$,1):A$"Y"A$"y"1430H A$"N"A$"n"1320\(A$)2740000}PC,34,18:TX," ":SN1ĺBE$1270 (PC,1,18:TX,BL$:PC,1,18:TX,">> PRESS IF ENTRY IS CORRECT <<":PC,1,19:TX,">> PRESS RIGHT ARROW KEY FOR 2$)13S2$""ZPC,1,16:TX,">> THE SENTENCE MUST INCLUDE THE WORD <<":SN1ĺBE$}PC,1,7:I14:TX,BL$::1020 DE,1,12,40,20:INV:FI:NO:DE,1,1,40,24:PC,5,18:TX,"ARE THESE ENTRIES CORRECT? (Y/N) "0A$"Y ":PC,38,180:A$((16384)):(A$)13(A$)27500302 ñH WD0:45571,30: X D$;"CLOSE" (222)4(222)6(222)8(222)958110 (222)558310 60000 SY,3:DE,2,2,39,23:IN:FI:NO: _!PC,6,7:A$"PLEASE MAKE SURE THAT "DN$(DT):)CH$ suvu#{uD$"CLOSE"WF$4uINV:FI:NOsuMS$SN$(N)"'S LIST OF WORDS":PC,(21(MS$)2),3:TX,MS$uI1NWuX5:YI5:I15X22:YI10uPC,X,Y:TX,W$(I)uu50010:20210Zò eù16368,0, nõ16384,128:16368,U:DU:DU:DU$::DU:DU$:DU:NW2cuD$"CLOSE"SF$tguWF$SN$(N)".DYNWB":D$"VERIFY "WF$:D$"OPEN"WF$:D$"READ"WF$luW1NW:SW$(W):CVL,SW$(W):DU$:DU$:DU$:I16:DU::DU$:DU:DUquW$(W)"":C1(SW$(W)):CH$(SW$(W),C,1):CH$"/"W$(W)W$(WP2:205020u LIST WORDS):u206505Du30030@Iu30050Nu216,0:INV:FI:NO:PC,11,10:TX,SN$(N):TX," DOES NOT HAVE":PC,11,12:TX,"A LIST OF WORDS YET.":50010:20210 buSF$SN$(N)".STUDENT INFO FILE":D$"OPEN"SF$:D$"READ"SF$:DU$:DU$:DDT1:OP10aTNT0įINV:FI:NO:PC,4,10:TX,"THERE ARE NO STUDENTS ON THE DISK.":50010:20210yTD$"RUN WORDS.HOME"U TV20650: ^VST$SN$((A$)):S1$ST$:OQ3:20900 rVT1$T2$:S1$S2$:S1S2:G1G2:C1C2:C1$C2$:N1N2:N1$N2$:M1M2:D1D2:P1$S1$".DYNWB":D$"OPEN"F$:D$"DELETE"F$:SN$(N)"":NUNT1H4SDT1:OP99SF1$"STUDENT NAMES":D$"OPEN"F1$:D$"DELETE"F1$:D$"OPEN"F1$:D$"WRITE"F1$:NU:NU021410SA0:I1NT:SN$(I)""ĺSN$(I):AA1SSD$"CLOSE":BASE45,1:NTA:182 S DATA? (Y/N) ":TX,A$:A(A$)3g4RA$"Y ":PC,A,12:TX," ":PC,A,12:ENS,A$,2,TS%,AL%:(A$)27202108RA$(A$,1):A$"Y"A$"y"A$"N"A$"n"21044> THE SENTENCE MUST INCLUDE THE WORD <<":PC,1,19:TX,BL$:1380 BN:EN:N0B1:ENSժժժժժժժժժժժժժժժժժժժժժժ׻ݪիժժժժתժժժժժ5*ۨWTOA"uj_"jQ"MjNS^nF*ժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժ*7Ԫժժժժժժժժժf2)դ 4Q(['o;/wp+P URs m~S(cPKժժժժߪժժժժժժժժժժժժժժժժժժժߪժժժժժժժ,e:" >U.V!-U*ը.)_Rk,\+֊ZZjժժժժժժʪժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժ+m$!JjtU*'[jתU $,/h")ɚT B1Q ժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժߪժժժժժժժժժժ/5+%Bx=l[ߪׂ'I7T݊K*t*ժժժժժժժժժժժժժժժժժժժժժժժժժתתժժժժժVk j;5jEZkMԸ/UR/]Rڮתujwժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժ*Y(QժԪ)ժ"ժժժժ)ժժժBIժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժ[ժqլe&*ժժVjժI.Tb*ժժժժժժժժժժժժժժժժժժժժժժժժݪիժժժߪժժժժժ%*#]UQ+ebUnV_"*}JU*O&1*(ժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժ*$Ԫժժժժժժժժժt"ե\TUK"U.U;RjR/MUE,\^W)+c&ժժժժժժߪժժժժժժժժժժժժժժժժժժժߪժժժժժժժ--ABUPkU ),;C**lzQy=Ԣj!M)'ժժժժժժҪժժժժժժժժժժժժժժժժժժתߪժժժժժy%)+S UDFZj2T"%) mjUjբ+@b ժժW8eXTTT`QW eXL9X3W eXRWSWL9X3W RWSWL9X4W eXTWUWL9X4W TWUWL9X5W eXVWWWL9X5W VWWWL9XhWWWɗ eXhW eXL9X eXL[ eXL9X eX(W eXL9X(WcW eXdW eXeW eXfW eXgWcLLL<<  00@@00  00@@@@@@@@||@@00 ||XL9X@ eXL9XL9XcWdWxW|W_40eWLZ PW YeWLZcWdW eXL9X T eX T e pp|| || pp  LL pp|| ||LL pp pp pp||@@@@@@@@@@@@  pp  00@@ L0:A1:A2:A3:A4:A5:A6:A7:A8:A9:D$"CLOSE"@QOQ220768SQDT1:OP7: vQNUNT:NS1SN$(NT)S2$:21300Q20210R R20650:S1$SN$(N):IN:FI:NO:PC,3,10:TX,"ARE YOU SURE YOU WANT TO DELETE ALL":PC,3,12:A$"OF "S1$"'S STUDENTL%:AL%0420+SY,3:CO,2:(S$)27260<S$(S$,AL%)Q(S$,1)"A"442C0:I1(S$):CH$(S$,I,1):(CH$"A"CH$" "CH$"-")(CH$"z")C1C0576PC,3,14:TX,"PLEASE USE ONLY LETTERS IN YOUR NAME."SY,1:PC,6,5:TX,NAMES":NT:NTāI1NT:SN$(I):/D$"CLOSE"QSY,3:DE,1,1,40,24:CO,4:FIwCO,2:X1338:DP,BEE(3),X,17:DE,2,2,39,17:INV:FI:NO:CO,2SY,1:CO,3:PC,2,3:TX,"WHAT IS YOUR NAME?" PC,6,5:S$" ":CO,4:ENS,S$,10,T%,AO,2k @PC,3,20:TX,"PRESS 'S' TO START SPELLING PROGRAMS":PC,5,22:TX,"OR 'M' TO MANAGE STUDENT RECORDS" TR$:R$"S"R$"s"370 ^R$"M"R$"m"ĹBASE45,0::D$"RUN STDISKS" h16368,0:340 r |:D$"OPEN STUDENT NAMES":D$"READ STUDENT PRESS TO GO ON OR TO EXIT":SY,1:31000:1060D :PC,1,1:CO,4:SY,1:TX,"** WORDS TO STUDY **":SY,3:DE,1,1,40,24:CO,2:NM0:I1NW:ZC(I)01530NMNM1:NM15įPC,1,NM5NM15įPC,20,NM515 NM$(NM)". ":NM1LING":PC,1,3:TX,"IS ":P.2:30000hCA$"N"įTX,"LOOK! YOUR SPELLING":PC,1,3:TX,"IS ":P.2:30000P.5:30000:SN1įTN,100,20INV:TX,"CORRECT":NO:TX,".":NC(W)NC(W)1:ZC(W)ZC(W)1<P.5:30000:SY,3:DE,1,1,40,24:PC,1,9:CO,2:TX,"30000:WW(W)1:SN1įTN,250,50RdINV:TX,"INCORRECT":CA$"N"įNO:TX,".":1440nI13:PC,4,3:NO:TX," ":P.3:30000:INV:SN1įTN,250,50PC,4,3:TX,"IN":P.3:30000::TX,"CORRECT":NO:TX,".":1440 #CA$"Y"įTX,"YES, YOUR SPEL0 (CA$)271465GCA$(CA$,AL%):CVL,CA$:CA$"Y"CA$"N"1327jPC,17,5:TX," ":SN1ĺ(7)t(1280/NA(W)NA(W)1:CW$W$(W):CVL,CW$:CVL,A$:PC,1,1:I15:TX,B1$::PC,1,1:A$CW$1415UTX,"YOUR SPELLING":PC,1,3:TX,"IS ":P.2:TX,"HAVE YOU SPELLED THE":PC,3,3:TX,"WORD CORRECTLY?"P1:30000:PC,X1,9:I1WL(W)2:TX," "::P1:30000:SP,200:CO,3:PC,X,9:TX,W$(W):SP,255:CO,4P.5:30000:PC,4,5:TX,"(ANSWER Y/N) "CA$"Y ":PC,17,5:ENS,CA$,2,T%,AL%:AL%0128,1,3:TX,S1$(W):PC,1,5:TX,S2$(W):P2:30000:800CO,2:PC,X,7:A$"HABIT ":ENS,A$,18,T%,AL%:AL%0A$(A$,AL%):1220RPRP1:800:1180(A$)2714658DE,1,1,20,5:INV:FI:DE,1,11,20,12:FI:NO:DE,1,1,20,8:PC,1,1:CO,4:Y,3:DE,1,1,40,24:CO,2:PC,5,22:TX,"SPELL THE WORD AND PRESS RETURN.":PC,1,24:TX,"":SY,1.PC,10,1:TX,".":I1500::PC,X,1:CO,2:SP,255:TX,W$(W):I110::PC,1,1:TX,B1$:I11000:20CO,3:SP,235:PC& SY,3: & DE,1,1,40,24: & CO,2: & PC,5,22: & TX,"SPELL THE WORD AND PRESS RETURN.": & PC,1,24: & TX,"": & SY,1: GOSUB 30000 $20000:X(11WL(W)2):NPNP1:RP0):SY,1:CO,4:SP,255:INV:PC,1,9:TX,B1$:NO:SCREEN." b31000:1000!  Q %F(0)10:F(1)20:F(2)40:F(3)100:RP3RP3 )PC,10,7:TX,".":I1500::PC,X,7:CO,2:SP,255:TX,W$(W):I1F(RP)::PC,1,7:TX,B1$:  HGR2 : & SY,1: & CO,4: & SP,255: & INV: & PC,1,9: & TX,B1$: & NO: , DP1:IP.1:RP1:SN(BASE48):CVL5829 N:RE:CO,0:FI:SY,3:DE,2,2,39,23:INV:FI:NO:CO,2:DE,1,1,40,24:PC,17,1:TX," TESTING " XPC,12,8:TX,"PRESS AND":PC,8,10:TX,"LOOK FOR THE WORD TO FLASH":PC,9,12:TX,"AT THE TOP OF THE St8&&0jjjE 0  )(`)00 0)`0:LM0:WM0 LM(W$)2100(*WM174:WM1ıtHS$(S$,1,CP%1)US$(S$,CP%(W$),(S$)CP%(W$)1):|@ EBASE45,0:D$;"RUN STDISKS":`::"SEE LINE #";(218)(219)256;" FOR ERROR #";(222) {US$"":I1(W$)2:US$US$"="::LP%0:CP%0:LM0:WM0:I1(S$):CH$(S$,I,1):WM1CH$"A"WM0:LM0:CP%0WM1I20:2100CH$(W$,LM1,1)CP%0:LM0:WM0:2100 LMLM1:I1CP%1:2080 LM1CP%I:(S$,I1,1)"A"CP%,A$,2,T%,AL%:A$(A$,1):(A$"Y"A$"y")F1ī450HA$"Y"A$"y"700jA$"N"A$"n"(A$)2740000PC,32,12:TX," ":SN1ĺBE$1690 WA$""WA$C$(H)WA$:HH1:C$(H)" "360H22ī360PC,H,V:TX," ":1760QU$:QU$;S1$;QU$:QU$;S2$;QU$:G(I):CP%:LP%:0:0:ML(I):"P":0:3:D$;"CLOSE ";WF$khII1:IE1475s| :PC,12,10:TX,"DO YOU WANT TO ADD":PC,12,12:TX,"ANOTHER WORD? (Y/N) "F0:I1NS:D(I)30F11A$"Y ":PC,32,12:ENS:ML(I):D(I):P(I)]A0(I):A1(I):A2(I):A3(I):A4(I):A5(I):A6(I):A7(I):A8(I):A9(I)D$;"CLOSE";SF$:216,0:1600WF$ST$(I)".DYNWB":D$;"VERIFY ";WF$:D$;"APPEND ";WF$:1610@D$;"OPEN ";WF$VJD$;"WRITE ";WF$:QU$;W$;QU$:QU$;MW$;"""""""""""DD""D"DDD"DDD"D"DDDDD"DDDDD"DDDDD"""DDD"DD""D"""D"D"""D"""""D"D"""D"D"""D"D"""D"DD""D"""D"D"""D"D"""D"D"""""D"""D"D"""D"DD""DDDDD"DDDDD"DDDDD"DDDDD"DD"DD"DDDDD"DD""""""""""""""""""""""""""""""""""""""DD""""""""""""""""""""""""""""""""""""""DD""""D""""""""""""""DDDDDDDDD""DD"D""""""D"""D"DDDD""DDDDD"""""""""""""DD"D""""D"D"""D"D"""""""""D"DDDDD"DDDDD"DD"D""""D"D"""D"D"""""""""D"D"""D"D"""D"DD"DDDDDD"D"""D"D"""""""""D"D"""D"""""D"DD""""""""DDDDD"DDDDDDDDDDD"D"DDD"DDDDD"DD"""""""""""""""""""""""""""O$? CO,2:PC,3,3:TX," AMERICAN EDUCATIONAL COMPUTER, INC."_ CO,4:PC,2,5:TX,BO$:CO,2 "PC,14,8:TX,"RUEL A. ALLRED":PC,14,10:TX,"LOUISE O. BAIRD":PC,14,12:TX,"EDWIN A. READ" 6PC,14,16:TX,"COPYRIGHT 1984" ;CO,4:PC,2,18:TX,BO$:CDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD""DDDD""""""""""""""""""""""""""""""""""""""DD"DDDDDD""DDDD"DDDDDDDD""D""DD""""DDD""DD"D""""""""""D"D"""""""""D""D"""""""D""DD"DDDDDD"D"""D"D"""""""""D""D"""""""D""DD""""""""D"""D"DDDDDDDDDDD""D"""""""D""DD"DDDDD""D""DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDY MISSES PER WORD :";:35:MPD8pB" % CORRECT TO SEE REWARD :";:35:PCvCDTPĺ" CATEGORY TO BE HIDDEN :";:35:HC:::DC$"1."FC$" 2."SC$:(A$)271010R1:58562.`(222)255ĦNjD$;"RUN HELLO"::D$"FP":UINSERT PROPER SIDE.":TX,A$:50010:(A$)271010R1:58562`(222)255ĦĆjD$;"RUN HELLO"::D$"FP":"D""""""D""DD"""D""D""D""""D"""""D""""""""""""""D""DD"""D""D""D""""DD"""D"""""""""""DDDDD""DD"""D""D""DDDDDD"D"D"""""DDDDDDD""""D""DD"""D""D""""""""""D"D"""""""""""D"""D""DD"""D""D""""""""""""DDDDD"""""""DD""D""DD""""""D"""""""""""""""""""""""""D"""""DD"""""D"""D"""D"""D"DDDD"D"""""DD"""D"D""""""D"""D"D"""D""D""""""DDD"""DD"""D"D"""DDD"""D"""""D"""D"""DDD""""""DD"""D"DDDDD""""D"""""D"""DDDDDD""""""""DD"""D"""""D"""""D"""D"""D""""D""""DDDDDDD"""D"""""D""D"""D"D"""D"""""D"""""""""DD"""D""D""D"""D"""D"""D"""""DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD""DDDD""""""""""""D""""""""""D"""D""D"""""""DD""""""""""""D""""D"""""D"""D""D"D"""""DD"""DDDDDD"""D"""D"D""""D"""D""D"D""D""DD"""D"""""DDDD""""""D"""D"D"D""""D""D""DD"""D""""""""""D"""""D""D"D"D""""D"""""DD"""D"DDDD"":TX,"TO PLAY A GAME? (Y/N)"O&A$" ":PC,30,12:ENS,A$,1,T%,AL%:AL%040230v0A$"Y"A$"Y"ĺD$;"RUN MAZE GAME":A$"N"A$"n"ĺD$;"RUN STMENU"DPC,30,12:TX," ":SN1ĺ(7)N40230 D$"RUN HELLO":TE$:ST$:ST%:GL:CD:CL$:ND:NL$:ML:NW:PW:I15:DA(I):DR(I):\ (4);"CLOSE"SF$l NW040220PC,6,24:TX,">> PRESS RETURN TO CONTINUE <<":R$:(R$)13(R$)2740218D$;"RUN STMENU":PC,12,10:TX,"WOULD YOU LIKE":PC,8,12I$:D040219)DNWĺD$;"DELETE ";FI$SF$ST$".STUDENT INFO FILE":D$;"OPEN"SF$:D$;"READ"SF$:TE$,ST$,ST%,GL,CD,CL$,ND,NL$,ML,DU,DU:I15:DA(I):DR(I):D$"DELETE"SF$:D$"OPEN"SF$:D$;"WRITE"SF$:NWNWD:BASE42,NW:PWPWD:BASE43,PWGFI$:D$;"DELETE"FI$:D$;"OPEN"FI$:D$;"WRITE"FI$:D0:QU$(34):I1NW:ZC(I)040090gDD1:40100QU$;W$(I);QU$:QU$;MW$(I);QU$:QU$;S1$(I);QU$:QU$;S2$(I);QU$:GL(I):CP(I):LP(I):PS(I):NA(I):ZC(I):MT$(I):NC(I):DZC(I) :(4);"CLOSE"F:R$(27)1465,yR$(13)ı/6ySN1ĺ(7):@y31010B} _}HU((1)5):HU232005l }CO,HU:u@ ACO,2:SY,3:DE,1,22,40,24:SP,255:PC,1,22:TX,"< PLEASE WAIT WHILE I RECORD YOUR LIST >"VJSF$ST$".STUDENT INFO FILE":D$;"OPEN"3*NSUM0:N0:I1NW:SUMSUMZC(I):ZC(I)0NN1E,N:SUM014654NR((1)SUM1):SUM0:W1NW:SUMSUMZC(W):SUMR20060HN(WW1)(N1)20010RNW1W:\NfNWW1:WNW1465pN0u :uPP1P750::P1:y "y16368,0:R$0NM$" "NM$#TX,NM$:TX,W$(I)4:NM01670 SY,1:CO,4:PC,2,4:TX,"YOU'VE":PC,2,6:TX,"MOVED":PC,2,8:TX,"UP!!!":D$;"BLOADI.LADDER-1,A6144":CO,2:Y1531:DP,6144,27,Y:SN1įTN,10Y,5040000 N %N(BASE49)1200702,C2,C2$,N2,N2$,M2,D2,P2,A0,A1,A2,A3,A4,A5,A6,A7,A8,A9\QD$;"CLOSE":OQ20584,20758,22130qQDT1:OP6:58505QF1$S2$".STUDENT INFO FILE":D$"OPEN"F1$:D$"DELETE"F1$:D$"OPEN"F1$:D$"WRITE"F1$0QT2$:S2$:S2:G2:C2:C2$:N2:N2$:M2:D2:P2:A1:OP4;$QF$S1$".DYNWB":D$"OPEN"F$:D$"DELETE"F$:20960AQVQDT1:OP5:58505QF1$S1$".STUDENT INFO FILE":D$;"VERIFY";F1$:T2$T3$:S2$S3$:S2S3:G2G3:C2C3:C2$C3$:N2N3:N2$N3$:M2M3:D2D3:P2P36QD$"OPEN "F1$:D$"READ "F1$:T2$,S2$,S2,G":TX,A$:PC,6,12:TX,"STUDY WORD LIST? (Y/N) "yQA$" ":PC,29,12:TX," ":PC,29,12:ENS,A$,2,TS%,AL%:(A$)2720210 QA$(A$,1):A$"Y"A$"y"A$"N"A$"n"20744QA$"N"A$"n"20210QOQ2:20902QD2020210QD20:20942 QDT0010:202107PPC,9,22:TX,"ENTER NUMBER OF STUDENT:"wPPC,34,22:TX," ":A$"1 ":ENN,A$,2,TS%,AL%:(A$)2720210P(A$)1(A$)NTĺ(7):20685PN(A$):P/P20650:S1$SN$((A$)):IN:FI:NO:PC,6,10:A$"DO YOU WISH TO ERASE "S1$"'S:PC,9,11:TX,"STUDENTS ON THIS DISK.":50010:20210;P tPIN:FI:NO:PC,8,3:TX,"STUDENT FILES ON THIS DISK"PNT0įPC,4,10:TX,"THERE ARE NO STUDENTS ON THE DISK.":50010:20210 PI1NT:PC,15,3I4:A$(I)". "SN$(I):TX,A$::(M$)1İ5A$"n"20502EbPPC,3,21:TX," NOW RECORDING DATA TO STUDENT FILE "hPT2$T1$:S2$S1$:S2S1:G2G1:C2C1:C2$C1$:N2N1:N2$N1$:M2M1:D2D1:P2P1:A$"":NS1NTNT1jP20942xP{PNT3205014}PIN:FI:NO:PC,9,9:TX,"THERE IS NO ROOM FOR MORE",J:TN,10,5 :I12500:a I58195828:J:I,J:: 104,168,104,166,223,154,72,152,72,96 BO$"":I138:BO$BO$(134):  SY,3:DE,1,1,40,24:PC,2,1 CO,4:TX,BO$:INV:Y124:PC,1,Y:TX," ":PC,40,Y:TX," "::NO:PC,2,24:TX,B,76:5228,215:5229,17T D$"BLOAD CVL,A$16C5":D$"BLOAD BSYMFS-SYMTABS-MS,A$2000"v RE::D$"BLOAD TITLE,A$4000" I110:DP,BEE(1),3,5:DP,BEE(2),3,5:TN,10,5 I3302:DP,BEE(1),I,5:DP,BEE(2),I,5:TN,10,5 :J510:DP,BEE(3),312072,217:2073,41A 4563,76:4564,96:4565,20: JUMP TO PATCH{ POKES TO DISALLOW QUOTES, EXTEND &ENS TO LOWER CASE 5216,201:5217,123 5218,176:5219,4 5220,201:5221,34 5222,208:5223,3 5224,76:5225,181:5226,17 52270ĺ(7):20558sZPPC,4,22:TX," ":PC,4,21:TX," ARE THESE ENTRIES CORRECT? (Y/N) "\PPC,38,21:TX," ":PC,38,21:A$"Y ":ENS,A$,2,TS%,AL%:(A$)2720210^PA$(A$,1):A$"Y"A$"y"A$"N"A$"n"20572 `PA$"N" d HELLOHI 3/16/84#nD$(4)gsD$"BLOAD I.BEES,A15360":BEE(1)15360:BEE(2)15587:BEE(3)15814xBASE5632:(BASE45)255370D$"BLOAD BACP800FS,A$800"1013,76:1014,0:1015,8 2066,177:2067,43:2068,17:2069,51:2070,1:2071,40:       DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDY MISSES PER WORD :";:35:MPD8pB" % CORRECT TO SEE REWARD :";:35:PCvCDTPĺ" CATEGORY TO BE HIDDEN :";:35:HC:::DC$"1."FC$" 2."SC$:""""D""""""DD"""""""D"""""""D"""D"""D""""D"""D"""""DD""""""D""""D""D"""D"""""D""""D"""D""""DD"""""D"""""""D"""D"""""""D""""D"""D"""DD""""D"""""""D"""D"""""""""D""""D"""D""DD"""D"""""""D"""D"""""""""""D""""D"""""DD""""""""""""""D""""""""""""""""""D""""DD""""""D"D""""D""""""""D""""D""DD""""D""""D"""D"""D""""D"""D"""D"""""D"DD""DDD""""D""D"""""D""""D"""D""DDDD""""DD""D""""""""D"""""""D""""D"""D""""D""""DD""D"""""""D"""D"""D""""""D"""D"""D""""DD""DDDDDD"D"""""""D"""D""""D"""D""DDDD"DD""""""""D"""""""D"""D"D""""DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDY MISSES PER WORD :";:35:MPD8pB" % CORRECT TO SEE REWARD :";:35:PCvCDTPĺ" CATEGORY TO BE HIDDEN :";:35:HC:::DC$"1."FC$" 2."SC$:N PLAY AGAIN ":4:"THE NEXT TIME YOU FINISH A TEST!":171021:"DO YOU WANT TO PLAY AGAIN? (Y/N) ";KY$:KY$"Y"KY$"N"Ģ21:34:" ":1680KY$"N"1710LP(0):WT0:SC0:GL0:WO0:LO0:DR1:200:CD$"RUN STMENU":RCD$"OPEN H:FL1630$@SC(FL)SCF21:1630UTLPFL9:HR$(LP)HR$(LP1):SC(LP)SC(LP1):[^fh1660rCD$"OPEN HONOR ROLL":CD$"WRITE HONOR ROLL":LP110:HR$(LP):SC(LP):|CD$"CLOSE HONOR ROLL":216,0::1730;NGNG1:NG2Ģ20:11:"YOU CAA$NA$:1560:F21640I::"ENTER YOUR INITIALS >";A$:(A$)101450tFL0:LP1011:SC(LP)SCFLLP:LP1:LP9FL11:HR$(LP1)HR$(LP):SC(LP1)SC(LP)::HR$(FL1)A$:SC(FL1)SC:1640FL0:LP110:HR$(LP)A$FLLP:LP10 ,:F20)(2(PXPH))(PYPL):A$JA$(P):( Y (16384)127A$((16384)128):16368,0_f rSN0ı(0,P:2,0:3,DR:5,0:ST%:F PY1:X1:GS%:DT(0):Z dY1:X1:0,DT:PS%:nI12500::::SCSC(10)1640AL: ";G::. F80,BC:1,AC:CM%:P255:1310:0,AC:1,BC:CM%:Mt W~A$""ZTOTMZ(J):J1280,1230:OTZT(A$):OTZTMZ(J):OTTT1:1010:T1160OTOTOZ(J):  !PX(0):PY(1):P(8(PXPL))(4(PYPH)f pSCG1390?zSISI10:MDMD10:MTMT2:MT2MT2R16368,0:310X_ :21:1:159);::(40)(41)256(36),32: :22:3:"SCORE: ";SC;" ":: :23:3:"TIME : ";T;" ":: :22:21:"GO12:DTDC(I)SCSCSII:P25I:1310:980;:Y19780FT570p23:3::"TIME RAN OUT"::1210:870w  I1TD:::23:21:"FINISH BONUS : 500"::SCSC500:980 I1TD::23:8::"BONUS : ";30T::SCSC30T:980:1210:I1TD:490 940:980:1010:1040X :OXX:OYY:DTCC:1370:1140:DTBC:1370:A$"A"YY1j lA$"Z"YY1} vA$(8)XX1 A$(21)XX1 X0X0 X39X39 Y0Y0 Y19Y19 1350:DTWCXOX:YOY:1070:SCSC100:980+I START.":; OJ2Ģ22:8::"PRESS BUTTON 0 TO START.": OJ0Ģ22:4::"TO USE THE KEYBOARD PRESS A KEY.":3:"TO USE A JOYSTICK PRESS BUTTON 0.": OJ1(16287)128J0J2 OJ1(16287)127J1 OJ2(16384)127J1 J156)256:1,AD256L @DM%:BWĹ0,BC%:1,BC:CM%:0,WC%:1,WC:CM%:16303,0X hI1MD rX(38(1)1):Y(18(1)1):1350:DTBC370 DTDC(2(1)1):1370::TMT:GLGL1:GG(GL):OJJ:J0:X2:Y0:DTCC:1370:940:OJ1Ģ22:10::"PRESS A KEY TO1):DC(1)DT(11):DC(2)DT(15):BWBC%BC:WC%WC:BC160:WC32:CC107:AC96:DC(1)163:DC(2)170 MD30:SI25:MT20:TD1000:MZ(1)135:MZ(2)72:OZ(1)MZ(1)20:OZ(2)MZ(2)20:PL80:PH175:: 6(4)"BLOAD MAZE:";((1)4)3;",A";AD:16304,0:0,AD(AD2DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDY MISSES PER WORD :";:35:MPD8pB" % CORRECT TO SEE REWARD :";:35:PCvCDTPĺ" CATEGORY TO BE HIDDEN :";:35:HC:::DC$"1."FC$" 2."SC$:D""DDD"""""DD"""DDDDD""DDDD"""D"""""""""D""D"""""""DD"""D"""D""D""""""D"""""""""D""DDD"""""DD"""D"""D""D""""""D""""""""""""""""""""DD"""DDDDD""DDDDD""DDDDD""""""""""""""""DD""""""""""""""""""""""""""""""""""""""DD""""""""""""""""""""""""""""""""""""""DD""""D""""D""D"D""D""""D"""""""DD""""D"""""""D""""D""DD"""D""""D"""""""DD""""DDDDDD""D""""D""D""""D""""D"""""""DD""""""""""""""""""""""""""""""""""""""DD"""D"""D""DDDDD""DDDDD"""""D""DDD"""""DD"""D"""D""D""""""D"""""""""D""""D"""""DD"""D"""D""D""""""D"""""""""DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD""DDDD""""""""""""""""""""""""""""""""""""""DD""""D"""""""DDDDDD""D""""D""""D"""""""DD""""D"""""""D""""D""D""""D""""""""""""DD""""D"""""""D""""D""D"""DD""""D"""""""DD""""DDDD""""D""""D""D""D"D""""D"""""""DD""""D""""""  ENS,A$,8,TS%,AL%:(A$)2720210EHPAL%0įPC,29,12:TX,N1$:20558JPN1$((A$)):(N1$)1(N1$)NLĺ(7):PC,29,12:TX," ":20550NPPC,29,16:A$" ":ENS,A$,1,TS%,AL%:(A$)2720210PPAL%0A$(M1):PC,29,16:TX,A$:20570RPM1(A$):M1:TX," ":20528d4PC0:I1(S1$):CH$(S1$,I,1):(CH$"A"CH$"-"CH$" ")CH$"z"C15P:C0(S1$,1)"A"ī205506PPC,3,18:TX,"PLEASE USE LETTERS ONLY FOR THE NAME.":PC,29,8:TX," ":(7)7P20528!FPPC,29,12:A$" ":20550E0PPC,29,8:A$" ":ENS,A$,10,TS%,AL%:(A$)2720210]2PAL%0ĺ(7):205283PPC,2,18:TX," ":S1$(A$,AL%):A0:I1NT:AA(S1$SN$(I))::A0ĺ(7):PC,8,18:TX,"THAT NAME HAS BEEN USED.":PC,29,8 NAME":PC,18,8:TX,S1$:PC,3,12:TX,"LIST # (1..":NL$(NL):TX,NL$:TX,")"PPC,20,12:TX,N1$:PC,3,16:TX,"MASTERY LEVEL":PC,20,16:A$(M1):TX,A$&PPC,4,21:TX,"FOR EACH ITEM, ENTER NEW DATA":PC,4,22:TX,"OR TO LEAVE UNCHANGED.":NS0LLOHI": PD$"RUNHELLOHI":q PT1$T3$:S1$S3$:S1S3:G1G3:C1C3:C1$C3$:N1N3:N1$N3$:M1M3:D1D3:P1P3:NS1 PIN:FI:NO:PC,18,3:TX,"CURRENT":PC,29,3:TX,"NEW":PC,19,4:TX,"DATA":PC,29,4:TX,"DATA"LPPC,29,4:TX,"DATA":PC,3,8:TX,"STUDENT"; OPC,28,22:TX," ":PC,28,22:M$"2 ":EN,M$,2,TS%,AL%O O(M$)2720478q O(M$)1(M$)8ĺ(7):20410 ONS0:(M$)20650,20600,22000,21000,30000,21500,20700,20478 O20025 OBASE45,255 POP2:DT1:(BASE11)0ĹBASE45,255:D$"RUNHETX,"3. CHANGE STUDENT DATA"i NPC,7,12:TX,"4. DELETE STUDENT":PC,7,14:TX,"5. LIST OF WORDS TO STUDY" jOPC,7,16:TX,"6. ADD WORDS TO STUDY":PC,7,18:TX,"7. ERASE WORDS TO STUDY":PC,7,20:TX,"8. START SPELLING PROGRAMS":PC,14,22:TX,"ENTER CHOICE>:TX," ":PC,40,Y:TX," ":_ CO,2:PC,2,24:TX," (YOU MAY PRESS AT ANY TIME) ":NOw DE,2,2,39,23:CO,2 NINV:FI:NO:PC,10,3:TX,"MANAGE STUDENT RECORDS" NPC,7,6:TX,"1. LIST OF STUDENTS":PC,7,8:TX,"2. ADD NEW STUDENT":PC,7,10::DN$(4)"GAMES" DT1:OP3i D$"OPENSTUDENT NAMES":D$"READSTUDENT NAMES":NT:NTāI1NT:SN$(I): D$"CLOSE":(BASE45)0ī20210 RE::SY,3:DE,1,1,40,24:CL0:CO,CL:BO$"":I138:BO$BO$(130): PC,2,1:TX,BO$:INV:Y124:PC,1,Yd STDISKS 4/2/84$i58010InG4:NL72: 72 LISTS FOR GRADE 4VxCVL5829D$(4):BASE5632:T3$"":S3$"":S33:G3G:C30:C3$"":N31:N3$"1":M31:D30:P30DN$(4),SW$(30),W$(30) DN$(1)"STUDENT":DN$(2)"TEACHER":DN$(3)"WORD BANK"                       DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD""DDDD"""""""""""D""""""""""""""""""""""""""DD"""""""""D""D""""""""D"""""""""D""""""DD""D"D""""D"""D""""D"""D""DDD""""D"""""DD"DD"D""""D"""""""""D"""D"""D"""""D""""DD""D"D""""D"""""D""""D"""D""DDDD"""D"""DD""""D""""D"  ߇LJ1u 뀀à  $L" %L" x% ʬ , $l"$m"L9"6$l"5$m"L"M")M$ n$H l"e"m"f"hLk"hm"im"`$ 8  # 0 i #L"# J%%#% #& N' #$( #N$N$ $L" %L" x% ʊ  :(4)"RUN STMENU":Bn the screen and you're"KfHPC,3,19:TX,"on your way to better spelling."lfR$:R$(27)R$(13)ī1000f16368,0:SN1ĺ(7)f400f fR$:(R$)271000f&(R$)13580f016368,0:SN1ĺ(7)f:540fDINV:FI:NOfNgour way to better spelling."=eR$:R$(27)R$(13)ī1000We16368,0:SN1ĺ(7)`e400ie eR$:(R$)271000e&(R$)13580e016368,0:SN1ĺ(7)e:540eDINV:FI:NOeNe:(4)"RUN STMENU":B$":X,"will come on the main menu:"Hd@PC,3,14:TX,"'NEW WORD LIST.' The computer will"}dBPC,3,16:TX,"tell you what to do from then on."dDPC,3,18:TX,"Now press . The main menu"dFPC,3,20:TX,"will come on the screen and you're"eHPC,3,22:TX,"on y2,2,39,23:500Dc.PC,3,3:TX,"The computer will keep track of the"yc0PC,3,5:TX,"words you need to learn. You will"c2PC,3,7:TX,"study only your own words."c<PC,3,10:TX,"The first time you use the program"d>PC,3,12:TX,"choose number 2 owords to study. The computer "Vb(PC,3,18:TX,"will give you your own list. Then "b*PC,3,20:TX,"it will give you a pre-test on these"b,PC,3,22:TX,"words."c-DE,1,1,40,24:PC,1,24:INV:TX," PRESS TO GO ON. ":NO:DE,TX,"you saw several screens. Each of "[aPC,3,7:TX,"them asked you to do something..."aPC,3,9:TX,"type your name, choose a number, or"aPC,3,11:TX,"press ."a$PC,3,14:TX,"The first thing you need is a list"b&PC,3,16:TX,"of `d INSTRUCT 4/4/84`:RE:BASE5632:SN(BASE48):SY,3:DE,1,1,40,24:CO,4:FI:DE,2,2,39,23:INV:FI:NO:CO,2:ST$"":I110:CH$((BASE10I)):CH$(0)272`ST$ST$CH$:`PC,3,3:TX,"Welcome. In order to get this far"'aPC,3,5:!Q! ʊ !l!m!!0ʠ A! A!,)$ A!`!l!m!!0ʩ !Δ!` L}"$ 8  ?" 0 i?"L!:" J%%:"% ?"& N' :"$( ?"N$N$ L%L&L9 L!L&LB&L'    L  , $m!$l!Lh 6$m!5$l!m! l! i  ʽn!o!  ,)$  `l!m! !Δ!` $!J!$!K!6$!P!5$i               6LL ߦ0LޠHȱȱh0`8 `     08967 ! " # %$     /! 0! .!` ͯ  L  N   N  N ! N! ! " N" " # N# # Lʊ    L        ! ! ! " " " # # # `  0`       67 L/989L ߦ0Lޠ"ȭ# // / (,  ߦ0Lޠȭ/  `  ! " # `  )`  `hhL  ` L0LEʊ      ȭ  !#",`$ 5  <8WLi  Li % L  L    +  $  `   $ g^2B  [ .L   $ ^ L&7 --)**'++(L@.++-L.,,LN)&)L ߦ0Lޠȭ,  ` ߦ0Lޠȱȱ CL L0 NL   $ L&^LL -+. 0: .LL|867` Lގ` Lގ` Lގ ` ᥠ$%` "*' "Lޥ "'Lg L ߦ0Lޠ'ȱȱ ߦ0Lޠ(ȱȱ 15)&)+-,(8+'^*+.*+* ` L 22%);M3Ȍ24ȱ5 3JJLs34NjNjJJLs54**)?Ls5)?m [ ` ߦ0Lޠȭ899L^677` g 률QP ְL|889` g 률QP  + ` PEL  N= 1  $ ^L5  !   L I L N L C ʎ L S L K L hhL` `  #  !  ` jjj   `i`  ! ݩ ` g 륡Lv݈ 2     !  m " m! # !   ߦ0Lޠȱȱ ߦ0Lޠ1ȱȱL~ \ L ]  L  L L $   0EL8eL&  ʬ0x x  ` g 륡Lvݩ    !  m " m! #    i    $   + L ` "LP ߦ0Lޠȱȱ`"# " L 0L ` ,0  #)  0   L L` ʎ ` ` ` `  ` ` Lލ0` g!!E"!#"$" %#`` $ " # %@]  r   ! d L   V    H!  L   ! 4   & L   !      `I` `  Q  L)3(;1TX TNPC DIDEANFITA FT DPt ESBATS REENqIN NO SP TU CO CL SYOV-MT;MAI FLȭ c0Lȱȱ  , L l     $:216,0:565 '42000x +PC,9,13:TX,"ASK FOR HELP":DE$((222)):PC,11,15:TX,"WITH DISK ERROR #":TX,DE$:TX,"." ,PC,6,17:TX,"THEN PRESS RETURN TO CONTINUE.":16368,0:R$:R$(13)ĺD$;"RUN TESTING" -556 5B1$"":I120:B1$B1$" "::NW),LP(NW),PS(NW),NA(NW),ZC(NW),MT$(NW),NC(NW),DZC(NW),WL(NW),WW(NW) I1NW:W$(I):MW$(I):S1$(I):S2$(I):GL(I):CP(I):LP(I):PS(I):NA(I):ZC(I):MT$(I):NC(I):DZC(I):WL(I)(W$(I)): D$;"CLOSE ";FI$:565 &(222)5NWI1:D$;"CLOSE ";FI((1)5):HU232005#j }CO,HU:*j@ XjE:SY,3:CO,2:DP,6854,16,5:DE,1,1,40,24jJINV:CO,4:PC,9,11:X125:TX,BO$::PC,11,13:CO,2:NO:TX,"HOW'S THAT DOG DOING?":CO,4:INV:PC,9,15:X125:TX,BO$:jOD$;"BLOAD CHAIN,A520":520"DRILL"W:DZC(I)DZC(I)1::20090XiNR((1)SUM1):SUM0:W1NW:SUMSUMDZC(W):SUMR20220hiNWW120090siNW1W:yiNi0u i:uPP1P750::P1:iy i"y16368,0:R$:R$(27)40000i,yR$(13)ıi6ySN1ĺ(7)i@y31010iJyi} j}HU20:SP,255:SY,3:PC,1,22:NO:TX," PRESS RETURN TO GO ON TO EXIT ":31000:PC,1,22:TX,B3$:1090th N hRNSQ020090h\NWW1:WNWıhfN::"ALL WORDS USED - RETURNING TO MENU":40000izNSUM0:I1NW:SUMSUMDZC(I)::SUMDL1āI1NՀ ۳ߟ 뀀`p@~Հx࿿ ۳ߟ d TESTING 4/3/84VxBASE5632:ST$"":I110:CH$((BASE10I)):CH$(0)125hyST$ST$CH$:}D$(13)(4):NW(BASE42):550D FI$ST$".DYNWB":D$;"VERIFY ";FI$:D$;"OPEN ";FI$:D$;"READ ";FI$:W$(NW),MW$(NW),S1$(NW),S2$(NW),GL(NW),CP( 뀀Հ࿿燇             膢 ȱ " <67 L  8ij v vo>20160"H:20916#\::210TX,A$:PC,6,9:TX,"DISK IS PROPERLY INSERTED AND":PC,6,11:TX,"THE DISK DRIVE DOOR IS CLOSED."! PC,13,18:A$"DISK ERROR - "((222)):TX,A$:50010:(A$)2720105!?WD158530!DOP210,20480,183,20772,20904,20943,20961,21212,21305,21510"SY%`d NEWLIST 4/2/84#`h58010\`lD$(4):CL4:BASE5632:SN(BASE48):OP0:LA21000`qF$(99):DN$(0)"STUDENT":DN$(1)"WORD BANK":HM24575:WB$"WORD BANK DISK":CVL5829:ST$"":I110:(BASE10I)0I10:152`ST$ST$((BASE10I))ia:M               TO EXIT":31000:0u 6:uPP1P750::P1:=y _"y16368,0:R$:R$(27)40100o,yR$(13)ı6ySN1ĺ(7)@y31010}HU((1)5):HU232005 }CO,HU:NO:CO,2::SY,3:PC,10,13:TX,"PLEASE WAIT A MOMENT."::(4);"RUN ST20909afU14:CVL,BA$(U):PC,1,2U2:TX,BA$(U)::O1MaO1O$"FIRST"baO2O$"SECOND"vaO3O$"THIRD"aO4O$"FOURTH"aPC,1,13:TX,"WHICH WORD GOES ":TX," ":INV:PC,17,13:TX,O$:NO:TX,"?":PC,25,13QbI16:: WITHOU `d ALPHA 4/3/84)`:DE,1,1,40,24`PC,1,23:TX,"TYPE THE WORD AND PRESS . YOU MAY PRESS AT ANY TIME."` DE,1,1,40,20`  `SP,255:F0:U1`*20000: `>J1U1:BA$(J)W$(W)2090aH:BA$(U)W$(W):UU1:U4I):TX,A$:AA1:SN1įTN,22020(A1),50Gk:I0NW1:GF(I)0429wk(WA)įPC,3,2AJ:INV:TX,"WATCH-OUT":WA0kPC,X(A110),2AJ:A$(A1)". ":NO:TX,A$:GF(I)0įINVkTX,W$(I):AA1:SN1įTN,22020(A1),50k;lNO:A0įDE,:TX,NW$:TX," WORDS IN LIST ":TX,NL$:TX,"."7j430jPC,12,1:TX," WORDS IN LIST ":TX,NL$:TX," ":J8NW2:I0NW1:WL(I)(W$(I)):WL(I)LWLWWL(I)j:X(36LW)21:A0:WA1:I0NW1:GF(I)0420)kPC,X(A110),2AJ:A$(A1)". "W$( !!:TX,CH$:OV,0iyC5izX3:YY2:Y24įPC,X,Y:GLUi{50010:(A$)27DO1:2000iSY,3:DE,2,2,39,23:IN:FI:NO:CO,CL:PC,2,1:IN:TX," ":NO:CO,2i(BASE47)1396.jPC,7,10:TX,"THERE ARE ":NW$(NW)SP,255:PC,7,1:TX," GENERALIZATION FOR LIST ":TX,NL$:TX," ":ahuX3:Y2(5(A2))3:PC,X,YhvGL0A1:C1(GL$(GL)):CH$(GL$(GL),C,1):CH$(94)įPC,X1,Y1:TX,CH$:PC,X,Y:377hwCH$(91)CH$(92)įTX,CH$:XX1:377ixPC,X1,Y:OV,1gm"CLOSE":SY,3:DE,2,2,39,23:CO,2:IN:FI:NO:PC,10,9:TX,"TURN THE DISK OVER AND":PC,9,11:TX,"PUT IT BACK IN THE DRIVE.":50010:(A$)2757000grOP2:58507gsA0:I010:AA(GL$(I)"")::A0390@htSY,3:DE,2,2,39,23:IN:FI:NO:CO,2:(SW$(I)):CH$(SW$(I),CH,1):CH$"/"W$(I)W$(I)CH$:343GfVS(I)1MfWcf[(BASE47)0364f\SY,1:CO,1:PC,3,3:TX," ":PC,11(W$(I))2,3:TX,W$(I):SN0āP1500::364fhJ3024030:TN,J2I,20:flI(NW1)II1:340OP3:DT0Re6F$F$((NL$)):"VERIFY"F$:D$;"OPEN ";F$:D$;"READ ";F$:NW,LN$:I0oeHGL$(I):I10II1:328wePI0eTSW$(I),MW$(I),S1$(I),S2$(I),GF(I),GL(I),CP(I),LP(I),PS(I):CVL,SW$(I):CVL,MW$(I):CVL,S1$(I):CVL,S2$(I) TO PLAY MAZE GAME":12:"OR TO EXIT ";FKY$:KY(KY$):KY13KY2770P:KY271710Z::10:"USING COLOR OR B/W SCREEN (C OR B) ";KY$:KY$"B"KY$"C"90 xBW          1uఐՀըхՀ 2005j }CO,HU:j@ DjERE::SY,3:DP,6854,16,5:DE,1,1,40,24jJINV:CO,4:PC,9,11:BO$(133):X125:TX,BO$::PC,11,13:CO,2:NO:TX,"HOW'S YOUR DOG DOING?":CO,4:INV:PC,9,15:X125:TX,BO$:jOD$;"BLOAD CHAIN,A520":520"DRILL"UY:BA1:30000:31000:INV:FI:NO:2060+i N @i*NW(NW(1)1):Hi0u `i:uPP1P750::P1:iyPC,1,13:TX," PRESS RETURN TO GO ON TO EXIT "i"y16368,0:R$:R$(27)40000i,yR$(13)ıi6ySN1ĺ(7)i@y31010j}HU((1)5):HU23hP hQ NO:PC,17,12:TX," ":PC,1,13:TX,B3$:PC,1,1:TX,B3$::J13:INV:I14:PC,23,2I2:TX,"+":SN1įTN,250I50,25hn :NO:I14:PC,23,2I2:TX," ":::INV:I14:PC,23,2I2:TX,"+"::NO:I14:PC,5,2I2:TX,"GOOD!":"io PLET'S BACK UP AND TRY THESE WORDS AGAIN.":YO4:P.5:30000:SN1įTN,250,20g PC,25,Y22:TX,B$:X2015:PC,X,Y22:TX,AB$(Y):P.2:30000:PC,X,Y22:TX,B$:SN1įTN,250,20g :PC,1,Y22:TX,AB$(Y):UY:BA$(U)AB$(Y)::PC,1,2:TX,B3$:2180:O42180 PC,1,2U2:TX,B$:SN1įTN,75,101e? 2390eB J173:PC,J,2U2:TX,BA$(U):P.1:30000:PC,J,2U2:TX,B$:SN1įTN,75,10eL eV PC,9,2U2:TX,BA$(U):BA$(U)"":P.7:30000:PC,9,2U2:TX,B$:PC,25,2O2:TX,AB$(O):SN1įTN,75,10 f OO1C,25,17:TX,B$:PC,25,17:2240'd d PC,1,15:TX,"I DON'T SEE THAT WORD.":PC,1,17:TX,"SPELL IT AGAIN, PLEASE.":30000:PC,25,17:TX,B$:PC,25,17:2240d e DR(3)DR(3)1:TRTR1:PC,1,15:TX,B3$:PC,1,17:TX,B3$:PC,25,13:TX,B$:F0237000;cDA(3)DA(3)1:CVL,AB$(O):U14:AB$(O)BA$(U)2330Rc:SN1įTN,250,40acO12300cI1O1:AB$(O)AB$(I)2296c:2300dDR(3)DR(3)1:TRTR1:PC,1,15:TX,"YOU USED THAT WORD. ":PC,1,17:TX,"HOW ABOUT A NEW ONE? ":30000:P(21):JA$(4)"Z":JA$(8)(8):A(X)(X(DC$)2):DT(X)X16X::    T THIS DUMMY LOOP, PROGRAM HANGS IF EXECUTE 'YOU USED THAT WORD ALREADY' SEGMENT bAB$(O)" ":ENS,AB$(O),ML,T%,AL%:AL%02240b(AB$(O),1)" "AB$(O)(AB$(O),2,(AB$(O))1):AL%AL%1:2245cAB$(O)(AB$(O),AL%):AB$(O)(27)400,8,13:TX,"PLEASE WAIT JUST A MINUTE."::(4);"RUN STMENU"0MENU""UST A MOMENT."::(4);"RUN STMENU"WNU"SY,3:PC,8,13:TX,"PLEASE WAIT JUST A MOMENT."::(4);"RUN STMENU"EWAIT JUST A MOMENT."::(4);"RUN STMENU"UST A MINUTE."::(4);"BLOAD CHAIN,A520":520"NEWLIST";PNO:CO,2::SY,3:PC"NOMONCIO":"MAXFILES1":103,1:104,96:24576,0:BASE45,0:BASE49,0:BASE22,G:"RUN HELLOHI"(ASE22,G:"RUN HELLOHI")"MAXFILES1" 103,1:104,96:24576,0:LOAD PROGRAMS AT $6001 BASE45,0: FIRST TIME FLAG6 BASE49,0: USE Zdd HELLO 1/16/84 .xBASE5632:G4:140=BASE48,1E:B$"=-=-=-=-=-=-=-=-="::13:5:B$:12:6:"-";:30:"-"11:7:"=";::" A.E.C. SPELLING ";::"="12:8:"-";:30:"-":13:9:B$:c 20:13:"LOADING PROGRAMS...": !SE45)255ĹBASE45,0 RE:h SY,3:DE,1,1,40,24:CL4:CO,CL:FI:CO,2:DE,2,2,39,23:INV:FI:NO DP,15360,1,2:CO,4:INV:Y25:PC,8,Y:TX," "::DE,2,2,39,23:PC,2,6:TX," ":CO,2:NO:DP,15360,33,2:INV:CO,4:PC,33,6:TX," ":CSE24,0:A0āI1A:BASE23I,((C$,I,1))::A8ĹBASE23I,0 A(N$):BASE33,0:A0āI1A:BASE32I,((N$,I,1))::A8ĹBASE32I,0 BASE41,M:BASE42,D:1010 S$"":I110:(BASE10I)0I10:930 S$S$((BASE10I)) :(BA:PC,1,1:CO,4:TX,"** WORDS TO STUDY **":NM0:CO,3:I0NW1:NC(I)0TMTM1WvdvI0:NM0vvNC(I)11530vNMNM1:PC,1,NM1(TM10):NM$(NM)". ":NM10NM$" "NM$vTX,NM$:TX,W$(I)vINW1II1:1495vNM01650|wSP,240"uP.5:30000:SN1įTN,100,20MuINV:TX,"CORRECT":NO:TX,".":NC(W)1uP.5:30000:SY,3:DE,1,1,40,24:PC,1,10:CO,2:TX,"PRESS TO GO ON OR TO EXIT":SY,1:50120:(A$)27DO1:1470uuW(NW1)WW1:1049u QvTX," ":P.3:30000:INV:SN1įTN,250,50mtPC,4,3:TX,"IN":P.3:30000::TX,"CORRECT":NO:TX,".":1440xt tCA$"Y"įTX,"YES, YOUR SPELLING":PC,1,3:TX,"IS ":P.2:30000uCA$"N"įTX,"LOOK! YOUR SPELLING":PC,1,3:TX,"IS ":P.2:3000PC,17,5:TX," ":(7SH):1280ms1CW$W$(W):CVL,CW$:CVL,A$:PC,1,1:I15:TX,B1$::PC,1,1:A$CW$1415sUTX,"YOUR SPELLING":PC,1,3:TX,"IS ":P.2:30000:SN1įTN,250,50sdINV:TX,"INCORRECT":CA$"N"įNO:TX,".":1440*tnI13:PC,4,3:NO:NK":DN$(4)"GAMES":(BASE45)09002 DT1:OP2_ JST$"":I110:(BASE10I)0I10:333{ LST$ST$((BASE10I)) M:F$ST$".STUDENT INFO FILE":D$;"VERIFY";F$:D$;"OPEN";F$:D$;"READ";F$:T$,S$,S,G,C,C$,N,N$,M,D,P? |D$;"CLOSE":A(C$):BA1,9:I1WL(W)2:TX," "::P1:30000:SP,200:CO,3:PC,X,9:TX,W$(W)RrSP,255~rP.5:30000:PC,4,5:TX,"(ANSWER Y/N) "rCA$"Y ":PC,17,5:ENS,CA$,2,T%,AL%:AL%01280r (CA$)27DO1:1470rCA$(CA$,1):CVL,CA$:CA$"Y"CA$"N"1329 sDO1:1470)qAL%0A$(A$,AL%):1220@qRPRP1:800:1180Sq(A$)271465qSP,255:SY,1:DE,1,1,20,5:INV:FI:DE,1,11,20,12:INV:FI:NO:DE,1,1,20,9:PC,1,1:CO,4:TX,"HAVE YOU SPELLED THE":PC,3,3:TX,"WORD CORRECTLY?"FrP1:30000:PC,XPNP1:RP0qp&PC,10,1:TX,".":I1500::PC,X,1:CO,2:SP,255:TX,W$(W):I110::PC,1,1:TX,B1$:I11000:p+SP,235:CO,3:PC,1,3:TX,S1$(W):PC,1,5:TX,S2$(W):P2:30000:800 qCO,2:PC,X,7:A$" ":ENS,A$,18,T%,AL%:(A$)27,255:SY,1:CO,4:INV:PC,1,9:TX,B1$:NOoSY,3:CO,2:DE,1,1,40,24:SP,255:PC,5,22:TX,"SPELL THE WORD AND PRESS RETURN.":PC,1,24:TX,"":SY,1o!NC(W)01460o"WL(W)(W$(W)) p#NA(W)1:X(11WL(W)2):N50120:n5B1$"":I120:B1$B1$" "::P1:IP.1:RP1:FT1Dn1000Pn  n%F(0)10:F(1)20:F(2)40:F(3)100:RP3RP3n)PC,10,7:TX,".":I1500::PC,X,7:CO,2:SP,255:TX,W$(W):I1F(RP)::PC,1,7:TX,B1$:n nnW0)oSP ":CO,2:DE,2,2,39,23:NO:A$"G"ī371Sm(A$)27DO1:2000nINV:FI:NO:PC,11,1:TX," SELF-CORRECTED TEST ":PC,12,8:TX,"PRESS AND":PC,8,10:TX,"LOOK FOR THE WORD TO FLASH":PC,9,12:TX,"AT THE TOP OF THE SCREEN.":1,1,40,24:PC,4,23:TX,"PRESS 'G' TO REPEAT GENERALIZATION"lPC,1,24:IN:TX," PRESS TO GO ON TO EXIT ":16368,0l16384,128:16368,0:A$((16384)):(A$)13(A$)27(A$)71440:mCO,CL:PC,1,24:TX," td STMENU 3/16/84 #i58010/nD$(4)MxD$;"BLOAD I.BEES,A15360"BASE5632:DN$(4),FF$(99):W$(30),MW$(30),S1$(30),S2$(30),WL(30),CP(30),LP(30),PS(30),NA(30),ZC(30),M$(30),NC(30),DZ(30)$ DN$(1)"STUDENT":DN$(2)"TEACHER":DN$(3)"WORD BATX,"HOW'S THAT DOG DOING?":CO,4:INV:PC,9,15:X125:TX,BO$:hlOD$;"BLOAD CHAIN,A520":520"DRILL"S̍΍ٍROPER DISK.":50010:(A$)2710201R1:58562C`(222)255ĦbjD$"RUN HELLO"::D$"FP":st::"BYE":10):R0:58570WD14D$;"VERIFY";F$:58010CR158180qOP210,330,10020,20020,30090,40090,450205819:(222)658030"SY,3:DE,2,2,39,23:IN:FI:NO:PC,7,10:A$"THIS IS NOT A VALID "DN$(DT):TX,A$:PC,7,12:TX,"DISK. INSERT PSY,3:DE,2,2,39,23:IN:FI:NO: PC,8,9:TX,"ERROR WHILE READING DISK":PC,8,11:TX,"SOME DATA MAY BE MISSING.":50010:OP60010,380,60010,60010,60010,60010,60010,60010,60010F$"A"(8)(8)(8)(8)(8)(8)(8)(8):F$F$DN$(DT)" DISK"(AKE SURE THAT "DN$(DT):TX,A$:PC,6,9:TX,"DISK IS PROPERLY INSERTED AND":PC,6,11:TX,"THE DISK DRIVE DOOR IS CLOSED.":PC,13,18:A$"DISK ERROR - "((222)):TX,A$:50010:(A$)271020?WD158562DOP210,330,10020,20020,30090,40090,45030!CO,CL:PC,1,24:TX," ":CO,2:DE,2,2,39,23:NO:r5819:WD0:D$;"CLOSE"(222)4(222)6(222)8(222)958110(222)55831060000SY,3:DE,2,2,39,23:IN:FI:NO: PC,6,7:A$"PLEASE MBASE45,4:D$;"RUN TESTING":1020,ȯ ;үBASE45,0IܯDT1:OP7]毺D$"RUNSTDISKS"ZïDE,1,1,40,24:PC,1,24:IN:TX,"PRESS TO CONTINUE TO EXIT":16368,0nõ16384,128:16368,0:A$((16384)):(A$)13(A$)2750030WïSE45,3:D$;"RUN DRILL":1020$@ <J(BASE42)040080TCO,2:DE,2,2,39,23:IN:FI:NO:PC,8,9:TX,"THERE ARE NOT ENOUGH WORDS":PC,8,11:TX,"IN YOUR FILE TO TEST YOU.":PC,8,13:TX,"GET A NEW WORD LIST FIRST.":50010:1020DT1:OP6:58507%SE45,2:D$;"RUN NEWLIST":1020&0u >:u(BASE42)330080DuCO,2:DE,2,2,39,23:IN:FI:NO:PC,8,9:TX,"YOU NEED MORE WORDS TO DO":PC,8,11:TX,"THESE ACTIVITIES. GET A":PC,8,13:TX,"NEW WORD LIST FIRST.":50010:1020uDT1:OP5:58507uBAA$,AL%):A$(27)A$"6"60020J(A$)1(A$)5ĺ(7(BASE48)):1180A(A$):INV:PC,11,62A:A$(A):TX,A$:A10000,20000,30000,40000,45000' 'DT1:OP3:58507$'BASE45,1:D$;"RUN INSTRUCT":1020 N *NDT1:OP4:585074NBANEW WORD LIST":PC,11,12:TX,"3. WORD ACTIVITIES" MPC,11,14:TX,"4. TESTING":PC,11,16:TX,"5. MANAGE STUDENT RECORDS":PC,11,18:TX,"6. STOP":PC,14,21:TX,"ENTER CHOICE>" PC,28,21:TX," ":PC,28,21:A$" ":EN,A$,2,TS%,AL%:AL%01180A$(O,2:NOZ DP,15587,1,20:CO,4:INV:Y2024:PC,8,Y:TX," "::CO,2:NO:DP,15587,33,20l DE,1,1,40,24 PC,14,3:TX,"MAIN MENU FOR" MS$" "S$" ":X(21(MS$)2):PC,X,5:INV:TX,MS$:NO1 LPC,11,8:TX,"1. INSTRUCTIONS":PC,11,10:TX,"2. LE":G(BASE22)!yD(BASE42)?y*F$ST$".DYNWB":D02290HyOP7lyD$"OPEN"F$:D$"DELETE"F$:2380uyOP8yD$"OPEN"F$:D$"READ"F$:I1y W$,MW$,S1$,S2$,WL,CP,LP,PS,NA,ZC,M$,NC,DZ:J0NW1:W$W$(J)NC(J)2:JNWy. :IDII1:2320 z: "(NWNM):TX,A$:PC,22,22(TM9):A$"WORDS TO STUDY: "(NM):TX,A$WxsFT12000xtPC,6,24:TX,">> PRESS RETURN TO CONTINUE <<":50120:FT03110x xPC,6,24:TX," NOW RECORDING YOUR WORD LIST ":OP6:DT0yF1$ST$".STUDENT INFO FI0:A$"YOU'VE LEARNED ALL THE STUDY WORDS":PC,1,7:I1(A$):CH$(A$,I,1):32000:TX,CH$:SN0RT((1)188)50:TN,RT,10w@:I13:P.6:30000:TX,"!":SN0RT((1)188)50:TN,RT,10whHxrSP,255:SY,3:CO,2:PC,1,22(TM9):A$"WORDS CORRECT:ENS,A$,2,T%,AL%:A$(A$,1):A$"Y"A$"y"1430Hn A$"N"A$"n"1320\n(A$)2740000}nPC,34,18:TX," ":SN1ĺBE$n1270 o(PC,1,18:TX,BL$:PC,1,18:TX,">> PRESS IF ENTRY IS CORRECT <<":PC,1,19:TX,">> PRESS RIGHT ARROW KEY FOR 2$)13S2$""mZmPC,1,16:TX,">> THE SENTENCE MUST INCLUDE THE WORD <<":SN1ĺBE$}mPC,1,7:I14:TX,BL$::1020mm mDE,1,12,40,20:INV:FI:NO:DE,1,1,40,24:PC,5,18:TX,"ARE THESE ENTRIES CORRECT? (Y/N) "0nA$"Y ":PC,38,18lPC,1,7:TX,"ENTER A SENTENCE":PC,1,8:TX,"USING THE WORD:":WA1:WM0:LM0:CP%0:LP%0:WA$"":H22:V8:L18l.PC,H,V1:TU,2:I1L:TX,"="::TU,0:PC,H,V3:TU,2:I1L:TX,"="::TU,0:150:S1$I$:lj mtH22:V10:L18:WA0:170:S2$I$:(SSSPELLING":PC,1,4:TX,"FOR THE WORD (MUST":PC,1,5:TX,"NOT BE A REAL WORD):"]kL16L16kPC,H,V1:TU,2:I1L:TX,"="::TU,0:IHL40:TX," "::150:MW$I$:(MW$)13MW$"X"kMW$W$H22:PC,H,V:TX," ":940kk o2:I116:TX,"="::TU,0:L16:150:W$I$ STOPS WORK ON THE CURRENT WORD":820:920:1020:1130:1240i4 )j>H22:V1:L16:PC,1,1:TX,"ENTER THE NEW WORD:":PC,H,V1:TU,ENT FILES ":PC,14,12:TX,"ON THIS DISK...":40000hPC,8,2N7:TX,"ENTER NUMBER OF STUDENT ":PC,8,2N9:TX,"(OR FOR ALL)":N1NhPC,30,2N19:N$" ":ENN,N$,2,T%,AL%:(N$)2740000hAL%0N0hN(N$):NNS740iPC,30,2N1," WORDS)":D(N)1įPC,36,2N5:TX,") "QgfD(N)MWNGNG1:TX,"*** FULL ***"glD$;"CLOSE "SF$::NGNSįPC,5,10:TX,"ALL STUDENT WORD LISTS ARE FULL.":PC,5,12:TX,"RETURNING TO PREVIOUS MENU...":40000g6702hPC,8,10:TX,"THERE ARE NO STUDD$;"READ "SF$f:TE$(N),ST$(N),S(N),G(N),C(N),C$(N),NX(N),NX$(N),ML(N),D(N),P(N),A0(N),A1(N),A2(N),A3(N),A4(N),A5(N),A6(N),A7(N),A8(N),A9(N):N$(N):N$N$". "(gbPC,5,2N5:TX,N$:TX,ST$(N):PC,21,2N5:D(N)MWįTX,"(NOW HAS ":W$(D(N)):TX,W$:TX䢍䢍렽梍客ᠽ򮢍墍墍墍墍梍󢍢򠽽󢍢󢍢堽󢍢󮢍󢍢󢍢忢䢍䢍蠽袍袍򢍢򠽽ᱰ䢍墍䮢墍󢍢좍忢墍墍墍   ̍YOU.":B68,0:R$:R$(13)ĺD$;"RUN DRILL"9p<41010Ap p::14:4:"ASK YOUR TEACHER":15:6:"TO PREPARE A":13:8:"A NEW STUDENT DISK":18:10:"FOR YOU.":10:"FOR YOU.":B0:"FOR YOU.":11,15:TX,"WITH DISK ERROR #":TX,DE$:TX,"."o2PC,6,17:TX,"THEN PRESS RETURN TO CONTINUE.":16368,0:R$:R$(13)ĺD$;"RUN DRILL"o<41010o p::14:4:"ASK YOUR TEACHER":15:6:"TO PREPARE A":13:8:"A NEW STUDENT DISK":18:10:"FOR N,250,10n6:CO,2"n6X31:Y185n6 WAG TAIL{n6R((1)10):I1R:DP,DOG(2),X,Y:DP,DOG(3),X,Y:SN1įTN,100,5n6n6I11000:n610400n@ nJ40020nD$;"RUN STMENU"-o(:SY,3:PC,9,13:TX,"ASK FOR HELP":DE$((222)):PC,P">-#S7āI711:PC,I,1:TX," ":PC,21I,1:TX," ":9008r.#CO,3:I1S:PC,I,1:TX,"*":PC,21I,1:TX,"*"0#SN1įTN,20010I,101#:CO,4:PC,13,1:S$(S):TX,S$:# #30000:SP,255:CO,2:SY,3:PC,1,24:TX,"PRESS TO GO ON, "ANOTHER WORD.":9200.W(NW1)WW1:910940100@@ JSS1:9000:PC,3,8:CO,3:TX,"LET'S REPEAT THE":PC,2,10:TX,"EIGHT STUDY STEPS.":9200:990(# )#SY,1:SP,255:CO,4:DE,1,6,20,12:INV:FI:DE,1,1,20,12:NO:S1įPC,8,1:TX,"STE"N"7270^HCO,3:PC,1,7:TX,"CAREFUL! LOOK AGAIN,":PC,1,8:TX,ST$:TX,".":SN1įTN,200,50nR9200:8000fCO,4:PC,1,7:TX,"YOU'LL GET IT NEXT TIME, ":TX,ST$:TX,".":9200:8000pNO:SY,1:CO,3:PC,3,10:TX,"YOU ARE READY FOR":PC,5,11:TX,ORK,":PC,(11(ST$)2),8:TX,ST$:TX,"!":I12000:W DE,1,2,20,5:CO,4:FI:CO,2I3302:DP,15360,I,5:DP,15587,I,5:SN1įTN,10,5DP,15814,31,3DE,1,1,40,2430000:72804PC,3,8:TX,"IT LOOKS OK TO ME.":7280>C$DE,1,8,20,12:INV:FI:DE,1,1,20,12:NO:CW$W$(W):CVL,CW$:CVL,A$:A$CW$7230eC$"N"7220SP,255:PC,1,1:TX,B1$:CO,3:I110:PC,I,1:TX,"*":PC,21I,1:TX,"*":SN1įTN,20010I,306 :CO,4:SP,255:PC,1,7:TX,B1$:PC,6,7:TX,"GOOD WORD CORRECTLY?":P1:300008SP,200:PC,X,3:TX,W$(W)aSP,255:PC,4,12:TX,"(ANSWER Y/N) "CO,4:C$"Y ":PC,18,12:ENS,C$,2,T%,AL%:AL%07120C$(C$,AL%):C$(27)40100CVL,C$:((C$"N")(C$"Y"))įPC,18,12:TX," ":C$" ":7120T":INVPCO,4:A$"LET ":PC,X,5:ENS,A$,20,T%,AL%:AL%06100(A$,1)" "A$(A$,2,(A$)1):AL%AL%1:6110A$(A$,AL%):A$(27)40100DA(1)DA(1)1:NO:SS1:9000:CO,3:PC,1,8:TX,"HAVE YOU SPELLED":PC,1,10:TX,"THE WO,4:INV:SY,3:DE,1,1,40,24:PC,2,12:I138:TX,"X"::NO:SY,1 PC,1,9:TX,"WHEN YOU ARE READY TO SPELL THE WORD, PRESS RETURN.":31000:CO,4:PC,1,3:TX,B1$:PC,1,9:TX,B1$:TX,B1$:TX,B1$PC,1,9:TX,"SPELL THE WORD AND PRESS RETURN AGAIN.:SY,3:DE,1,1,40,24:PC,2,9:I138:TX,"X"::NO:SY,1:CO,3:PC,4,7:TX,"CHECK THE WORD" PC,4,8:TX,"TO SEE IF YOU":PC,6,9:TX,"SPELLED IT":PC,6,10:TX,"CORRECTLY.":P2:30000:PC,X,3:CO,2:TX,W$(W):9200ASY,1:PC,1,5:TX,B1$:SS1:9000:CW$(W),I,1):PC,XI1,3:TX,CH$: : 9200:SS1:9000:SP,255:PC,1,7:CO,3:TX," CLOSE YOUR EYES. SEE THE WORD IN YOUR MIND AND SPELL IT." D P2.5WL(W)3:30000:PC,1,3:TX,B1$:30000:9200:PC,1,3:TX,B1$:TX,B1$:TX,B1$:SS1:9000[ CO,4:INVV0:NO: j IV0IV1:INV:/ SS1:9000 CO,4:INV:SY,3:DE,1,1,40,24:PC,2,9:I138:TX,"X"::NO:SY,1:SP,255:CO,3:PC,3,7:TX,"SAY THE LETTERS":PC,5,9:TX,"IN THE WORD." 30000:SP,235:PC,1,3:TX,B1$:SP,180:CO,2:I1WL(W):CH$(͍ԍԍȠҮ͍ǍǍŠԠӢǠήٍٍ͍ԧӠԠ΢͍ҍҍ٠ӠŠ͍ōנ͍ԍԍŠӢ٠̮͍ōōӠԢӠŮ͍ԍԍŠΠӢ͍α̍âآԠӠ٠Ѝ658030iSY,3:DE,2,2,39,23:IN:FI:NO:PC,7,10:A$"THIS IS NOT A VALID "DN$(DT):TX,A$:A$"DISK"PC,7,12:A$A$". INSERT PROPER SIDE.":TX,A$:50010:(A$)2757000…R1:58562ԅ`(222)255ĦjD$;"RUN HELLO"::D$"FP":50010:0010,60010,60010kF$"A"(8)(8)(8)(8)(8)(8)(8)(8):F$F$DN$(DT)" DISK"(10):R0:58570tWD1D$;"VERIFY";F$:58010R158180OP262,371,310,60010,60010,2020,2230,2290,2450,60010,2720,2810,3115,57005 5819:(222)6OP3įSY,3:CO,2:DE,1,1,40,18:IN:FI:NO:58120SY,3:CO,2:DE,2,2,39,23:IN:FI:NO:PC,8,9:TX,"ERROR WHILE READING DISK":PC,8,11:TX,"SOME DATA MAY BE MISSING."50010:OP60010,60010,365,60010,60010,60010,60010,2370,60010,60010,60010,6,6,9:TX,"DISK IS PROPERLY INSERTED AND" PC,6,11:TX,"THE DISK DRIVE DOOR IS CLOSED.":PC,13,18:A$"DISK ERROR - "((222)):TX,A$:50010:(A$)271010?WD158562DOP262,371,60010,60010,60010,2020,2240,2290,2450,60010,2720,2810,3115,57005STMENU"5819:WD0E(222)4(222)6(222)8(222)958110Y(222)558310d60000OP3įSY,3:CO,2:DE,1,1,40,18:IN:FI:NO:58120ŁSY,3:CO,2:DE,2,2,39,23:IN:FI:NO(PC,6,7:A$"PLEASE MAKE SURE THAT "DN$(DT):TX,A$:PC nð50120íOP5ıxïCO,CL:INV:PC,1,24:TX," ":CO,2:DE,2,2,39,23:NO:ù16368,0ˀõ16384,128:16368,0:A$((16384)):(A$)13(A$)2750130рñ瀨DT0:OP14:58507޹BASE44,2:D$;"RUN OP132+ D$"BLOADCHAIN,A520":520"STEPS2":60010G*NW(NW(1)1):O0u g:uPP1P420::P1:o} }HU((1)5):HU232005 }CO,HU:ZïSP,255:SY,3:CO,2:DE,1,1,40,24dïPC,1,24:IN:TX," PRESS TO GO ON TO EXIT "ST":PC,9,11:TX,"2. 8 STUDY STEPS":PC,9,14:TX,"WHICH WOULD YOU LIKE?"~ A$" ":PC,31,14:TX," ":PC,31,14:ENN,A$,2,T%,AL%:(A$)2757000~ (A$)0(A$)33080~ (7SN):3050~ LA(A$):FT0:LA1LA2:1000~& (NM0)(DO1)57000( )570001} SY,3:CO,2:DE,1,1,40,24:IN:FI:NO} BO$"":B125:BO$BO$(131)::CO,3:PC,8,4:TX,BO$:INV:Y416:PC,7,Y:TX," ":PC,33,Y:TX," "::PC,8,16:TX,BO$} NO:CO,2I~ PC,13,6:TX,"YOU MAY CHOOSE:":PC,9,9:TX,"1. SELF-CORRECTED TEI,0\| F1$ST$".STUDENT INFO FILE":D$"OPEN"F1$:D$"DELETE"F1$:D$"OPEN"F1$:D$"WRITE"F1$| T$:ST$:S:G:C:C$:N:NL$:ML:D:PA:A0:A1:A2:A3:A4:A5:A6:A7:A8:A9:D$"CLOSE":OP12} BASE42,D:NM0:I0NW1:NMNM(NC(I)0)::(NM0)(DO1(I):MLNC(I):"M":NC(I):34{ INW1II1:2500C{ D$"CLOSE"{ DDND:OP11:C$NL$:NL$((NL$)1):(NL$)(BASE50)NL$"1"| I19:BASE22I,(BASE31I)::BASE32,N2:A(NL$):BASE33,0:A0āI1A:BASE32I,((NL$,I,1))::A8ĹBASE32B "CLOSE"=zL ND0:I0NW1:(NC(I)0)(NC(I)ML)NDND1Nzt :ND02700Wz OP9z D$"OPEN"F$:D$"APPEND"F$:D$"WRITE"F$:I0z (NC(I)0)(NC(I)ML)2520{ W$(I):MW$(I):(34);S1$(I);(34):(34);S2$(I);(34):WL(I):CP(I):LP(I):PS(I):NA3RP3fn)PC,10,7:TX,".":I1500::PC,X,7:CO,2:SP,255:TX,W$(W):I1F(RP)::PC,1,7:TX,B1$:qn n:SP,255:SY,1:CO,4:INV:PC,1,9:TX,B1$:NO;oSY,3:CO,2:DE,1,1,40,24:SP,255:PC,5,22:TX,"SPELL THE WORD AND PRESS RETURN.":PC,1CORRECTED TEST ":PC,12,8:TX,"PRESS AND":PC,8,10:TX,"LOOK FOR THE WORD TO FLASH":PC,9,12:TX,"AT THE TOP OF THE SCREEN.":50120m5B1$"":I120:B1$B1$" "::P1:IP.1:RP1:FT1m1000m  n%F(0)10:F(1)20:F(2)40:F(3)100:RP ":16368,0Yl16384,128:16368,0:A$((16384)):(A$)13(A$)27(A$)71440lCO,CL:PC,1,24:TX," ":CO,2:DE,2,2,39,23:NO:A$"G"ī371l(A$)27DO1:2000mINV:FI:NO:PC,11,1:TX," SELF-kPC,X(A110),2AJ:A$(A1)". ":NO:TX,A$:GF(I)0įINVnkTX,W$(I):AA1:SN1įTN,22020(A1),50tkkNO:A0įDE,1,1,40,24:PC,4,23:TX,"PRESS 'G' TO REPEAT GENERALIZATION" lPC,1,24:IN:TX," PRESS TO GO ON TO EXIT NW1:WL(I)(W$(I)):WL(I)LWLWWL(I)Zj:X(36LW)21:A0:WA1:I0NW1:GF(I)0420jPC,X(A110),2AJ:A$(A1)". "W$(I):TX,A$:AA1:SN1įTN,22020(A1),50j:I0NW1:GF(I)0429j(WA)įPC,3,2AJ:INV:TX,"WATCH-OUT":WA0@2,2,39,23:IN:FI:NO:CO,CL:PC,13,1:IN:TX," ":NO:CO,2`i(BASE47)1396iPC,10,10:TX,"THERE ARE ":NW$(NW):TX,NW$:TX," WORDS IN":PC,10,12:TX,"YOUR NEW WORD LIST."i430&jPC,13,1:TX," NEW WORD LIST ":J8NW2:I0" GENERALIZATION "3huX3:Y2(5(A2))3:PC,X,YdhvGL0A1:C1(GL$(GL)):CH$(GL$(GL),C,1)hwCH$"Z"CH$"a"įTX,CH$:XX1:377hxPC,X1,Y:OV,1:TX,CH$:OV,0hyChzX3:YY2:PC,X,Y:GLh{50010:(A$)27DO1:2000JiSY,3:DE,"CLOSE":SY,3:DE,2,2,39,23:CO,2:IN:FI:NO:PC,10,9:TX,"TURN THE DISK OVER AND":PC,9,11:TX,"PUT IT BACK IN THE DRIVE.":50010:(A$)2757000gsA0:I010:AA(GL$(I)"")::A0390htSY,3:DE,2,2,39,23:IN:FI:NO:CO,2:SP,255:PC,13,1:TX,$(I)):CH$(SW$(I),CH,1):CH$"/"W$(I)W$(I)CH$:343BfVS(I)1HfW^f[(BASE47)0364f\SY,1:CO,1:PC,3,3:TX," ":PC,11(W$(I))2,3:TX,W$(I):SN0āP1500::364fhJ3024030:TN,J2I,20:flI(NW1)II1:340gmDT0Me6F$F$((NL$)):"VERIFY"F$:D$;"OPEN ";F$:D$;"READ ";F$:NW,LN$:I0jeHGL$(I):I10II1:328rePI0eTSW$(I),MW$(I),S1$(I),S2$(I),GF(I),GL(I),CP(I),LP(I),PS(I):CVL,SW$(I):CVL,MW$(I):CVL,S1$(I):CVL,S2$(I)7fUS(I)0:W$(I)"":CH1(SWΠҠĮ͍РԠȢӮ͍ҍҍԠĠĮ͍ōōŠΧԠŮ͍ӽ͍ՍՍŠҠ̢͠Š͍ԍԍŠĠȮ͍ӍӍӢӮ͍ύύΠӿ͍ōō٬Š͍ԧӍɧӍԠŠנ΢ŠϠϮ͍ӍӍŠˠĠ͢ҠЮ͍ԍԍ̠ҠŠԠŠЍōĠҠŢԠ͍ԍԍŠŠĢĮ͍̍11000:m(&m6 GO THROUGH WALLAm6I131:DI(I2)22Um6DP,DOG(D),I,18jm6PC,I,19:TX," "~m6SN1įTN,100,5m6m6I11000:m6CO,0:I150:X((1)523):Y((1)611):PC,X,Y:TX," "n6Y((1)717):PC,X,Y:TX,"#":SN1įT1):TN,R10,5+l'PC,X,Y:TX," "1l(Kl (X29:Y18:TR0:14040]lF( FALL BACKklP(YH181vlZ(X19Yl_(Y1įPC,X7,Y1:TX," "ld(DP,DOG(6),X,Y:PC,X9,Y1:TX," ":SN1įTN,Y10,5l(l(DP,DOG(4),1,18:SN1įTN,180,10m(I19,Y:TX," "::Y118:DP,DOG(4),21,Y:SN1įTN,10Y,10Wk':TR0:I12000::10400pk' DOG CROSSES WALL}k'X2027k'DP,DOG(4),X,Y:SN1įTN,10Y,5k'k'Y46:PC,X,Y:TX," ":k'X29k'Y1181l'DP,DOG(2),X,Y:SN1R((1)18įPC,X1,Y6:TX," ":PC,X1,Y5:TX," "Rjt'DP,DOG(5),X,Y:SN1įTN,Y10,15Xj'jj'TR18ī10310j' DOG REACHES TOP OF SCREENj'Y36:PC,X,Y:TX," ":j'Y1:R410150j' DOG RIDES DOWN ON THE WALL9k'DE,1,1,40,24:Y25:PC,i'X19Y:TR7Y11ī100990ij' DOG CRASHESmik'PC,X1,Y5:TX," ":PC,X1,Y6:TX," ":SN1įTN,180,50il'Y1116:DP,DOG(6),Y3,Y:DE,Y3,Y,Y6,Y6:INV:FI:NO:Y:OV,1:DP,DOG(6),15,17:OV,0im'SN1įTN,180,100in'I12000::10400-js'X1X,24:TX,"/":Ah='CO,0:Y24111:PC,23,Y:TX,"#####"::CO,2[hB'TR0X1:Y18:14040mhC'R((1)41)hD'TR10TR15R4ī14000hL'DP,DOG(4),1,18:I11000::TR1ī10400hM' DOG JUMPShQ'TR18TR18hV'H18TR:H0H1h`'Y18H1i000,6000,10006g(4);"BLOAD CHAIN,A520":520"FLASH"_g(4);"BLOAD CHAIN,A520":520"ALPHA"gp(4);"BLOAD CHAIN,A520":520"MISSPELLED"g@(4);"BLOAD CHAIN,A520":520"PROOF"g' DOG REWARDSg$':NOh.'SY,3:DE,1,1,40,24:CO,1:X140:PC,,M$,2,T%,AL%:AL%08402fRM(M$):M1M5880FfW(M$)2740000if\PC,28,21:TX," ":SN1ĺ(7)rff840fpM540000fuINV:PC,10,72M:M$(M):TX,M$:NO:NM3999fM1M3įPC,3,21:TX," CHOOSE 2 OR 4 TODAY. ":860 gM8000,2" ":TX,ST$:TX," "9eNO:PC,10,9:TX,"1. PROOF/SPELL"ePC,10,11:TX,"2. ALPHABETIZING":PC,10,13:TX,"3. BE THE TEACHER":PC,10,15:TX,"4. FLASH CARDS":PC,10,17:TX,"5. RETURN TO MAIN MENU":PC,13,21:TX,"ENTER CHOICE> "fHPC,28,21:M$" ":ENN "::B1$"":I120:B1$B1$" "::P1-d ?dNU2İ10000d:RE:SY,3:CO,1:PC,2,1:INV:TX,BO$:Y124:PC,1,Y:TX," ":PC,40,Y:TX," "::PC,2,24:TX,BO$dNO:CO,2:PC,11,3:TX,"WORD ACTIVITIES FOR"eX(21(ST$)2):PC,X1,5:INV:TX,,ZC(I),MT$(I),NC(I),DZC(I):WL(I)(W$(I)):DZC(I)DL:MW$(I)"X"MW$(I)"x"NMNM1pc&:D$;"CLOSE ";FI$:564c0(222)5ĺD$;"CLOSE DYNWB":NWI1:564c1(222)642000c241000c4ML16:B$"":I1ML:B$B$" ":: %d5B3$"":I140:B3$B3$"3sbW$(NW),MW$(NW),S1$(NW),S2$(NW),GL(NW),CP(NW),LP(NW),PS(NW),NA(NW),ZC(NW),MT$(NW),NC(NW),DZC(NW),WL(NW):560bFI$ST$".DYNWB":D$;"VERIFY ";FI$:D$;"OPEN ";FI$:D$;"READ ";FI$:I1NWTcW$(I),MW$(I),S1$(I),S2$(I),GL(I),CP(I),LP(I),PS(I),NA(I)6)15901Dau10000:ST$"":I110:CH$((BASE10I)):CH$(0)126Va}ST$ST$CH$:b~X(21(ST$)2):M$"WILL "ST$"'S DOG":X1(21(M$)2):SY,3:CO,2:NO:DE,1,1,40,24:PC,X1,3:TX,M$:PC,12,5:TX,"JUMP OVER THE WALL?":CVL5829:NW(BASE42):DL `d DRILL 3/16/84!`o41000a`qBASE5632:D$(13)(4):SN(BASE48):SQ(BASE49):NUNU1`rBO$"":I138:BO$BO$(130):`sNU1700atD$;"BLOAD I.DOGS,A5888":D$;"BLOAD I.DOG-6,A15901":DOG(2)5888:DOG(3)6371:DOG(4)6854:DOG(5)7337:DOG(     010(mR%(1)220:(38656R%)122002mCO,3mmY%R%20:X%R%Y%20:PC,X%1,Y%1:TX," ":38656R%,0mR%(1)220:(38656R%)02230mY%R%20:X%R%Y%20:PC,X%1,Y%1:TX,"Z":38656R%,1:NOm38443,8mn(38423)0įPC,VX%,VY%CO,C2:120(38401),180:120(38401),180?l (38446)1ī2000^lM37632(38430)1:N37632mlNM2110l X3%(N):Y3%(N1):X4%(N2):Y4%(N3):C$((N4))l*PC,X3%,Y3%:TX," ":PC,X4%,Y4%:TX,C$l4NN5:2075l>(38422)1İ2300mR20N:Y1%,180N:Y1%,180N:(kSY,1:0.kDk(38422)1İ2300skCO,1:PC,VX%,VY%:C$(32(38423)):TX,C$k32768:32771kX1%(38416):Y1%(38417):X2%(38418):Y2%(38419):C$((38403)))lCO,C1:PC,X1%,Y1%:TX," ":PC,X2%,Y2%:TX,C$:jD(38656R%)31850> YOU CANNOT BACKSPACE TO THE LAST":PC,1,14:TX," LINE. YOU MAY MAKE CHANGES LATER. <<" PC,H,V" C$(H)(320":520"DRILL"LL"B,BO$::PC,11,13:CO,2:NO:TX,"HOW'S THAT DOG DOING?":CO,4:INV:PC,9,15:X125:TX,BO$:nOD$;"BLOAD CHAIN,A520":520"DRILL"Bd WORDS.HOME 3/16/843xC$(40),TC$(40):400; YPC,1,13:I14:TX,BL$:I$"":XHHL:C$(X)"":TC$(X)""::H1H(WA$)0āI1(WA$):C$(H1I1)(WA$,I,1):TC$(H1I1)(WA$,I,1):PC,H,V:TX,C$(H1I1):HH1::WA$""e (OC$)      MES">F$S$".STUDENT INFO FILE":D$"OPEN "F$:D$"WRITE "F$p&"":S$:3:G:0:" ":1:"1":1:D:P0A0:A1:A2:A3:A4:A5:A6:A7:A8:A9:D$"CLOSE "F$>A(S$):I1A:BASE10I,((S$,I,1))::A10ĹBASE10I,0?580_@PC,HU232005i }CO,HU:i@ KiERE:SY,3::DP,6854,16,5:DE,1,1,40,24iJINV:CO,4:PC,9,11:BO$(133):X125:TX,BO$::PC,11,13:CO,2:NO:TX,"HOW'S YOUR DOG DOING?":CO,4:INV:PC,9,15:X125:TX,BO$:iOD$;"BLOAD CHAIN,A520":520"DRILL"1::20090HhNR((1)SUM1):SUM0:W1NW:SUMSUMDZC(W):SUMR20220XhNWW120090chNW1W:ihNrh0u h:uPP1P750::P1:hy h"y16368,0:R$:R$(27)40000h,yR$(13)ıh6ySN1ĺ(7)h@y31010hJyh} i}HU((1)5):SY,3:CO,2:PC,1,18:TX," PRESS TO GO ON TO EXIT ":31000:SP,235:SY,1:8070dg N tgRNSQ020090g\NWW1:WNWıgfN::"ALL WORDS USED - RETURNING TO MENU":40000 hzNSUM0:I1NW:SUMSUMDZC(I)::SUMDL1āI1NW:DZC(I)DZC(I)OK!"Ef%!CO,4:TX,S$:SN1āI110:TN,25010I,10:TN,10010I,10:WfH!SP,235:8600xfp!A$(A$,AL%):A$(27)40000fv!DZC(W)DZC(W)1:DZC(W)DLDZC(W)DLfz!CO,4:INV:PC,1,1:TX,"THE SENTENCE IS OK.":NO:SN1įTN,150,30\g!P1:30000:SP,255:TX,"-"::OV,0:P1:CO,4:SN1āI12:TN,200,40:P.1:30000:e INV:PC,1,8:TX,W$(W):NO:SN1āI13:TN,200,40:P.1:30000:e NO:CO,2:8600e! e !AL%08560f!DR(2)DR(2)1:DZC(W)DZC(W)1:TRTR1:PC,1,7:SP,255:S$"THE SENTENCE IS 2:OV,1:PC,CP(W),Y:I1(MW$(W)):TX,"-":SN1RT((1)200)50:TN,RT,20^d :OV,0:8600d DZC(W)DZC(W)1:DZC(W)DLDZC(W)DLd CO,4:INV:PC,6,1:TX,"LOOK AGAIN.":SN1įTN,200,30?e P1:30000:L(MW$(W)):CO,2:NO:OV,1:PC,CP(W),Y:I1L::R28450c: AL%08355;cD A$(A$,AL%):A$(27)40000ocE (A$,1)" "A$(A$,2,(A$)1):AL%AL%1:8261cI CVL,A$:A$CW$8360c] DR(2)DR(2)1:DZC(W)DZC(W)1:TRTR1:A$CW$įCO,4:PC,8,1:TX,"GOOD!"cl LP(W)1Y3cv LP(W)2Y5Ld CO,1CP(W)1:CH$(PS$,I,1):TX,CH$:;bR2įTX,W$(W):8180JbTX,MW$(W)]bNPCP(W)WL(W)b(PS$,NP,1)"="NPNP1:8185bINP(PS$):CH$(PS$,I,1):TX,CH$::LP(W)1įPC,1,5:TX,S2$(W) c CO,2:PC,1,7:A$" ":ENS,A$,16,T%,AL%Ha20000:DA(2)DA(2)1:CW$W$(W):CVL,CW$:CO,3:R((1)31):R3R1eaRR1R1R:SAME0:8120aSAMESAME1:SAME3R((R1)R):R1R:SAME0aLP(W)1Y3:PS$S1$(W):8140aPC,1,3:TX,S1$(W):Y5:PS$S2$(W)aPC,1,Y:CP(W)18160"bI `d PROOF 4/3/84-`h:DE,1,1,40,24:`jPC,1,21:TX," IF ALL THE WORDS ARE CORRECT PRESS . IF A WORD IS MISSPELLED, TYPE IT IN CORRECTLY. YOU MAY PRESS AT ANY TIME."`SP,235:DE,1,1,40,20:SY,1`INV:FI:NO     pp|`ygsp|Oy`?@@@@@@@@@@@@@@@@@@@@@@@@@@@@@|@pppp@??@pppp@??|| ?????? ~~~~~~~ ~~~~~~??????? LLp|ff|pLL33``33LLp|``|pLLffO|ps`y|pp|Ogy`O||||pp||?@@@ppp|||?~x@p|`x~|p@~x`?|||x~ppp@@@?```ag?ga```CCsssaagggCs`x~sC~x`sssCCCgggaaa`@@pp00pp||  ||``````````??@@@ppp|||@p|`x~|p@~x`|||ppp@@@?>> >">"""" <"""<">>><""> >""""    "6*"""""""""""<""< 4< """""""""*6""""""> >>>) > >">"""" <"""<">>><""> >""""    "6*"""""""""""<""< 4< """""""""*6""""""> >>!Q! ʊ !l!m!!0ʠ A! A!,)$ A!`!l!m!!0ʩ !Δ!` L}"$ 8  ?" 0 i?"L!:" J%%:"% ?"& N' :"$( ?"N$N$ ΍  G'&i(i`5:TX,BO$:4kOD$;"BLOAD CHAIN,A520":520"DRILL" : ky +k"y16368,0:R$:R$(27)40000;k,yR$(13)ıKk6ySN1ĺ(7)Vk@y31010\kJyck} k}HU((1)5):HU232005k }CO,HU:k@ kERE:SY,3::DP,6854,16,5:DE,1,1,40,24AlJINV:CO,4:PC,9,11:X125:TX,BO$::PC,11,13:CO,2:NO:U5jfN::"ALL WORDS USED - RETURNING TO MENU":40000jzNSUM0:I1NW:SUMSUMDZC(I)::SUMDL1āI1NW:DZC(I)DZC(I)1::20090jNR((1)SUM1):SUM0:W1NW:SUMSUMDZC(W):SUMR20220jNWW120090jNW1W:jNj0u k:uPP1P750::P1"LOOK AGAIN.":SN1įTN,200,30 P1:30000:L(MW$(W)):CO,2:NO:OV,1:PC,CP(W),Y:I1L:TX,"-"::OV,0:P1:CO,4:SN1āI12:TN,200,40:P.1:30000: INV:PC,1,8:TX,W$(W):NO:SN1āI13:TN,200,40:P.1:30000: NO:CO,2:8600 !  ٍ G'&&`3,14:TX," DO YOU WANT SOUND? (Y/N) ":PC,34,14:A$" ":ENS,A$,2,T%,AL%:AL%0ī576AA$(A$,AL%):A$"Y"A$"y"ĹBASE48,1:445BA$"N"A$"n"ĹBASE48,0:445CPC,34,14:TX," ":576DBASE45,0:D$"RUN STMENU"O$(U)AB$(Y)::PC,1,4:TX,B3$:2180,kP kQ NO:PC,17,14:TX," ":PC,1,15:TX,B3$:PC,1,3:TX,B3$::J13:INV:I14:PC,23,2I4:TX,"+":SN1įTN,250I50,25ln :NO:I14:PC,23,2I4:TX," ":::INV:I14:PC,23,2I4:TX,"+"::NO:I EYES, TEACHER!":6465g7 dg<PC,1,10:TX,"THANK YOU, TEACHER!":SN1āI1502010:TN,I,I5:gAAN4įPC,4,8:TX,W$(M)gF30000:31000:6150gU31000:6150g N g*NW(NW(1)1):g0u g:uPP1P750::P1:gy IhySY,3:DE,1,1,4@ 1fERE::SY,3:DP,6854,16,5:DE,1,1,40,24fJINV:CO,4:PC,9,11:BO$(133):X125:TX,BO$::PC,11,13:CO,2:NO:TX,"HOW'S YOUR DOG DOING?":CO,4:INV:PC,9,15:X125:TX,BO$:fOD$;"BLOAD CHAIN,A520":520"DRILL"T:CO,4:PC,1,10:TX,"GOODNW(NW(1)1):e0u 0e:uPP1P750::P1:7ey eySY,3:SP,255:PC,1,19:CO,2:TX," PRESS RETURN TO GO ON OR TO EXIT"e"y16368,0:R$:R$(27)40000e,yR$(13)ıe6ySN1ĺ(7)e@y31010e}HU((1)5):HU232005e }CO,HU:f(DW$(AN)):TX,"-":SN1įTN,250,10`d(:NO:OV,0:CO,4:PC,1,9:TX,"GOOD EYES, TEACHER!":6465hd7 d<PC,1,9:TX," YOU'RE RIGHT! ":SN1āI1502010:TN,I,I5:dAAN4įPC,4,7:TX,W$(M)dF30000:31000:6150dU31000:6150d N e*c AN4įPC,4,7:TX,"NO, LOOK AT #":AN$(AN):TX,AN$:TX,".":PC,4,9:TX,W$(M):30000:6470c AN5įPC,3,7:TX,"NO, ALL THE WORDS":PC,3,9:TX,"ARE OK!":6470c cDR(4)DR(4)1:TRTR1:AN56455"dAN4įPC,4,AN:SP,240:CO,2:OV,1:I1,4,5:TX,"ALL WORDS OK."TbCO,0:INV:PC,1,7:T$"4 ":ENN,T$,2,T%,AL%:AL%06360ybNO:T$(T$,AL%):T$(27)40000bT(T$):T1T56375bNO:PC,1,7:TX," ":SN1ĺ(7)b6360bDA(4)DA(4)1:T(T$):TAN6415bSN1įTN,200,40^)5)1-a.20000:J1D1:DW$(J)W$(W)6190JaB:DW$(D)W$(W):ANDMW_aVDD1:D46190yajAN4DW$(AN)MW$(M)aSY,3:DE,1,1,40,20:INV:FI:NO:SY,1:CO,0:I15:PC,1,I:CH$(I)".":TX,CH$:bCO,4:I14:PC,4,I:TX,DW$(I)::CO,0:PC9`d MISSPELLED WORDS - "BE THE TEACHER" - 4/3/84M`p:DE,1,1,40,24`rPC,1,21:TX,"TYPE THE NUMBER OF THE MISSPELLED WORD AND PRESS . TYPE 5 IF ALL THE WORDS ARE CORRECT. YOU MAY PRESS AT ANY TIME."` aD1:AN((1     "" ` ` `8  *-٢ ` *-` *-С ` *-Љ `" ! i i    & L     L I)  &  LG    L`   L` Lf`Ⱦ` & ` ``  !5 ʎ`` ʢԢȢԠӠЍ !@0$(`$(` :HU232005g }CO,HU: g@ NgE:SY,3:CO,2:DP,6854,16,5:DE,1,1,40,24gJINV:CO,4:PC,9,11:BO$(133):X125:TX,BO$::PC,11,13:CO,2:NO:TX,"HOW'S YOUR DOG DOING?":CO,4:INV:PC,9,15:X125:TX,BO$:hOD$;"BLOAD CHAIN,A520":520"DRILL"ZC(I)1::20090NfNR((1)SUM1):SUM0:W1NW:SUMSUMDZC(W):SUMR20220^fNWW120090ifNW1W:ofNvf0u f:uPP1P750::P1:fy f"y16368,0:R$:R$(27)40000f,yR$(13)ıf6ySN1ĺ(7)f@y31010fJyf} g}HU((1)5)255:SY,3:PC,1,19:NO:TX," PRESS RETURN TO GO ON TO EXIT ":31000:PC,1,19:TX,B3$:1090je N zeRNSQ020090e\NWW1:WNWıefN::"ALL WORDS USED - RETURNING TO MENU":40000fzNSUM0:I1NW:SUMSUMDZC(I)::SUMDL1āI1NW:DZC(I)D1įTN,250,40ndCO,2:SP,220:PC,X,3:TX,W$(W):INV:PC,X,6:DAL%WL(W):D0āI1D1:A$A$"?"::JWL(W)dD0āI1D:CW$CW$" "::JAL%d D0JWL(W)dI1J:(CA$,I,1)(CW$,I,1)1330dPC,XI1,6:X$(A$,I,1):TX,X$ae2:30000:SP,TR1:32000:PC,8,8:TX,"GOOD!":SN1āI1502010:TN,I,I5:cSP,255:SY,3:PC,1,19:CO,2:TX," PRESS RETURN TO GO ON TO EXIT ":31000:PC,1,19:TX,B3$:1090c cDZC(W)DZC(W)1:DZC(W)DLDZC(W)DL d32000:PC,8,8:TX,"OOPS!":SN21X:ENS,A$,L,T%,AL%:AL%01120ub(A$,1)" "A$(A$,2,(A$)1):AL%AL%1:PC,1,6:TX,B1$:PC,X,6:TX,A$:1161bA$(A$,AL%):CW$W$(W):CVL,CW$:CA$A$:CVL,CA$:(A$)2740000bDA(5)DA(5)1:CA$CW$1210?cDZC(W)DZC(W)1:DR(5)DR(5)1:TRЯTX," ":AaI38:PC,2,I:TX," ":PC,39,I:TX," "::CO,2:NOJaB aL20000:CO,2:NO:SY,1:X(11WL(W)2):SY,1:PC,3,3:TX,B$"b`PC,1,6:TX,B1$:PC,8,8:TX," ":CO,2:PC,X,3:TX,W$(W):31000:PC,3,3:TX,B$:PC,X,6:A$" ":L`d FLASH 4/3/84,`:DE,1,1,40,24`PC,1,21:TX,"WHEN YOU ARE READY TO SPELL THE WORD PRESS AND TYPE IT. THEN PRESS TO GET THE NEXT WORD. YOU MAY PRESS AT ANY TIME." aINV:CO,4:I239:PC,I,2:TX," ":PC,I,9:    ERO-IN ALGORITHM -- POKE 1 TO USE SEQUENTIAL ALGORITHMS BASE22,G: GRADE LEVELg "RUN HELLOHI"6 m@y31010'm}HU((1)5):HU2320054m }CO,HU:;m@ gmERE::SY,3:DP,6854,16,5:DE,1,1,40,24mJINV:CO,4:PC,9,11:X125:TX,BO$::PC,11,13:CO,2:NO:TX,"HOW'S THAT DOG DOING?":CO,4:INV:PC,9,15:X125:TX,BO$:nOD$;"BLOAD CHAIN,A5214:PC,5,2I4:TX,"GOOD!":Flo P1:30000:31000:INV:FI:NO:2060Nl N cl*NW(NW(1)1):kl0u l:uPP1P750::P1:lyPC,1,22:TX," PRESS RETURN TO GO ON TO EXIT "l"y16368,0:R$:R$(27)40000l,yR$(13)ıl6ySN1ĺ(7)LING":PC,1,3:TX,"IS ":P.2:30000hkCA$"N"įTX,"LOOK! YOUR SPELLING":PC,1,3:TX,"IS ":P.2:30000kP.5:30000:SN1įTN,100,20kINV:TX,"CORRECT":NO:TX,".":NC(W)NC(W)1:ZC(W)ZC(W)1":SY,1f.PC,10,1:TX,".":I1500::PC,X,1:CO,2:SP,255:TX,W$(W):I110::PC,1,1:TX,B1$:I11000:2g0CO,3:SP,235:PC& SY,3: & DE,1,1,40,24: & CO,2: & PC,5,22: & TX,"SPELL THE WORD AND PRESS RETURN.": & PC,1,24: & TX,"": & SY,1: GOSUB 30000e$20000:X(11WL(W)2):NPNP1:RP0f):SY,1:CO,4:SP,255:INV:PC,1,9:TX,B1$:NO:SCREEN."db31000:1000!d  Qd%F(0)10:F(1)20:F(2)40:F(3)100:RP3RP3d)PC,10,7:TX,".":I1500::PC,X,7:CO,2:SP,255:TX,W$(W):I1F(RP)::PC,1,7:TX,B1$:d eHGR2 : & SY,1: & CO,4: & SP,255: & INV: & PC,1,9: & TX,B1$: & NO: ,cDP1:IP.1:RP1:SN(BASE48):CVL5829cN:RE:CO,0:FI:SY,3:DE,2,2,39,23:INV:FI:NO:CO,2:DE,1,1,40,24:PC,17,1:TX," TESTING "dXPC,12,8:TX,"PRESS AND":PC,8,10:TX,"LOOK FOR THE WORD TO FLASH":PC,9,12:TX,"AT THE TOP OF THE S$:216,0:565b'42000xb+PC,9,13:TX,"ASK FOR HELP":DE$((222)):PC,11,15:TX,"WITH DISK ERROR #":TX,DE$:TX,"."b,PC,6,17:TX,"THEN PRESS RETURN TO CONTINUE.":16368,0:R$:R$(13)ĺD$;"RUN TESTING"b-556c5B1$"":I120:B1$B1$" "::̍! čōɠ٠ΠŢ̠͍ȍȍŠŠƠӮ͍ O,4:PC,9,11:X125:TX,BO$::PC,11,13:CO,2:NO:TX,"HOW'S THAT DOG DOING?":CO,4:INV:PC,9,15:X125:TX,BO$:iOD$;"BLOAD CHAIN,A520":520"DRILL",BO$:iOD$;"BLOAD CHAIN,A520":520"DRILL" 0,24:SP,255:PC,1,22:CO,2:TX," PRESS RETURN TO GO ON OR TO EXIT"kh"y16368,0:R$:R$(27)40000{h,yR$(13)ıh6ySN1ĺ(7)h@y31010h}HU((1)5):HU232005h }CO,HU:h@ hERE::SY,3:DP,6854,16,5:DE,1,1,40,24tiJINV:CՀժꪪՀԂꪪժՕբŅժժժեժՒʪժ着ժϞԀՀժժժժժԪժժժժ<ժߪժժԪժՑժ""""ME? (Y/N)"Ns&A$ = " ": & PC,30,12: & ENS,A$,1,T%,AL%: IF AL% = 0 GOTO 40230s0IF A$ = "Y" OR A$ = "Y" THEN PRINT D$;"RUN DV3.ANN"s:IF A$ = "N" OR A$ = "n" THEN PRINT D$;"RUN HELLO"sD& PC,30,12: & TX," ": IF SN = 1 THEN PRINT CHR$ (7) tNGL:CD:CL$:ND:NL$:ML:NW:PW:I15:DA(I):DR(I):Lr (4);"CLOSE"SF$rPC,6,24:TX,">> PRESS RETURN TO CONTINUE <<":R$:(R$)13(R$)2740218rD$;"RUN STMENU" s HGR2 : & PC,12,10: & TX,"WOULD YOU LIKE": & PC,8,12: & TX,"TO PLAY A GADNWĺD$;"DELETE ";FI$qSF$ST$".STUDENT INFO FILE":D$;"OPEN"SF$:D$;"READ"SF$:TE$,ST$,ST%,GL,CD,CL$,ND,NL$,ML,DU,DU:I15:DA(I):DR(I):qD$"DELETE"SF$:D$"OPEN"SF$:D$;"WRITE"SF$:NWNWD:BASE42,NW:PWPWD:BASE43,PW7rTE$:ST$:ST%:FI$:D$;"DELETE"FI$:D$;"OPEN"FI$:D$;"WRITE"FI$:D0:QU$(34):I1NW:ZC(I)040090gpDD1:40100pW$(I):MW$(I):QU$;S1$(I);QU$:QU$;S2$(I);QU$:GL(I):CP(I):LP(I):PS(I):NA(I):ZC(I):MT$(I):NC(I):DZC(I)p:(4);"CLOSE"FI$:D040219q:R$(27)1465o,yR$(13)ı/o6ySN1ĺ(7):o@y31010Bo} _o}HU((1)5):HU232005lo }CO,HU:uo@ oACO,2:SY,3:DE,1,22,40,24:SP,255:PC,1,22:TX,"< PLEASE WAIT WHILE I RECORD YOUR LIST >"VpJSF$ST$".STUDENT INFO FILE":D$;"OPEN"΍"