' +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:       PC,1,7:TX,"ENTER A SENTENCE":PC,1,8:TX,"USING THE WORD:":WA1:WM0:LM0:CP%0:LP%0:WA$"":H22:V8:L18.PC,H,V1:TU,2:I1L:TX,"="::TU,0:PC,H,V3:TU,2:I1L:TX,"="::TU,0:150:S1$I$:j tH22:V10:L18:WA0:170:S2$I$:(SSSPELLING":PC,1,4:TX,"FOR THE WORD (MUST":PC,1,5:TX,"NOT BE A REAL WORD):"]L16L16PC,H,V1:TU,2:I1L:TX,"="::TU,0:IHL40:TX," "::150:MW$I$:(MW$)13MW$"X"MW$W$H22:PC,H,V:TX," ":940 o2: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 MI9: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$:|LL pp pp pp||@@@@@@@@@@@@  pp  00@@ LLLL<<  00@@00  00@@@@@@@@||@ pp LL<~P@@ (@PPTUUUBJ JJPU* P**********EUUUUU @jjj@x~W***+////UUUUUUUU???~W_]]]UU(*******UUUUUUUUJ *****(((UUUUUUUUj*******WWWuu*****UUUUUUUU********UUUUUUU**  UUUUUUUU********PPPPPPPP********PP@****( UUUUUUUU********UUUUUUUU******** UUUUUUUT********PPPPPPPP******** (UTPPEA**UUUUUUUU********UUUUUUUU********UUUUUUzj|p?@@PPTTUU********EEAQP********UUUUUUUU********UUUUUUUU********UUUUUUUU********UUUUU** PTUU****PPPP ****UP@ (( TUUUUUUT********UUUUUUUU***UUUUU*" ****UTTPUU *****yWUUU|? TO STOP ":PC,5,13:TX,"OR 'M' TO MANAGE STUDEN1u ********UUUUUUUU********UUUUUU****UUU@@****( *UUUUUUUU********UUUUUUUU********UU @00PPTTTPP@********UUUUUUUU********UUUUUUUU********UUUUUUU**" @@***** UU@"" ((**UUUUUUUU********U ժժժժתժժժժժժժժժժժժժժժժժժժժժժժժ]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-:ժժժժժժժժժժժժժժժժժժժժժժժժתժߪտժժժժժժ5U]I&hURJf*- ~c*J.5 "j]ժժժժժժԪժժժժժժժժժժժժժժժժժժժժժw>]T*UKկժWT *U!ժ)ɮ* 55:U6=Ʈժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժէժ٭i%IժԪjN*ժJ^JժժժժժժժժժժժժժժժժժժժժժժժժժժժתժժժժժժkST(@x&Uzuj\[JJ6S5YjUժժ8:"A NEW STUDENT DISK":18:10:"FOR YOU.":RR":15:6:"TO PREPARE A":13:8:"A NEW STUDENT DISK":18:10:"FOR YOU.":TEACHER":15:6:"TO PREPARE A":13:8:"A NEW STUDENT DISK":18:10:"FOR YOU.":N DRILL"<41010 ::14:4:"ASK YOUR TEACHER":15:6:"TO PREPARE A":13:8:"A NEW STUDENT DISK":18:10:"FOR YOU.":86368,0:R$:R$(13)ĺD$;"RUN DRILL"t<41010t .u::14:4:"ASK YOUR TEACHER":15:6:"TO PREPARE A":13:TN,10I,10,:12000*.I13000::1@ FD$;"RUN STMENU"(:SY,3:PC,9,13:TX,"ASK FOR HELP":DE$((222)):PC,11,15:TX,"WITH DISK ERROR #":TX,DE$:TX,"."2PC,6,17:TX,"THEN PRESS RETURN TO CONTINUE.":16368,0:R$:R$(13)ĺD$;"RU1),18,I::I812:DP,BU(2),18,I:::INV:CO,1:PC,20,11:TX," ":PC,19,12:TX," ":CO,2:NO\+I2403:INV:CO,1:J311:YIJ:Y25Y0įPC,5,Y:TX,BO$:+NO:CO,2:J911:YI2(9J):Y0įDP,DV(J),3,Y:J4įPC,10,Y:TX,I$ +:SN11)3)7:I1R2:DP,SH,32I,20I:INV:CO,1:X32I10:X41įPC,X,20I4:TX," "} +Y20I6:Y25įPC,32I5,Y:TX," "+Y20I7:Y25įPC,32I7,Y:TX," " +CO,2:NO:TN,148,70:T170::TN,140,70::R1112000aR+B15:I812:DP,BU(3,5:I16:DP,DV(10),2(16I),2I1:*INV:CO,1:PC,19,12:TX,"=":NO:CO,2:J16:DP,DV(J),3,2J11:J4įPC,10,2J11:TX,I$*:I17:TN,148,17020I:T117020I::TN,140,17020I:T117020I::Q*D$"BLOAD I.BLK FISH,A15360":R2((0":I1R:J1I:YJI19:I3YJ16W&*DP,O(J),6,Y:TN,20I,10:::R5TR1010870X*I15:DP,O(6),10,19:DP,O(3),6,19:DP,O(4),6,20:SN1įTN,50,10l*v*12000* &*DP,WF,21,18:DP,WF,23,22:DP,WF,35,21:DP,WF,3,3:DP,WF,13,9:DP,WF,3****UUUTPAEE********UUUUUUUU********UUUUUUUU J ***UUUU****UUU********UUUUUUUU********UUUUUUUUr****UUUU****@@GPUUUU********UUUUUUUUUUUU " (***EEAQP********ժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժ V{Cժ](ժժhժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժj֪ժՓ&VT+ªժ'ժjZ:ժ]&_VժժժժժժԪժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժOU&' 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*&ժժ8,0:A$((16384)):(A$)13(A$)27500304 ñJ WD0:45571,30: Z D$;"CLOSE" (222)4(222)6(222)8(222)958110 (222)558310 60000 SY,3:DE,2,2,39,23:IN:FI:NO: a!PC,6,7:A$"PLEASE MAKE SURE THAT "DN$(DT)(W)CH$ suvu%{uD$"CLOSE"WF$6uINV:FI:NOuuMS$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:1636DU:DU:DU:DU$::DU:DU$:DU:NW4cuD$"CLOSE"SF$vguWF$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$P1P2:20502 0u LIST WORDS+:u206507Du30030BIu30050Nu216,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$:SDT1:OP10cTNT0įINV:FI:NO:PC,4,10:TX,"THERE ARE NO STUDENTS ON THE DISK.":50010:20210{TD$"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::F$S1$".DYNWB":D$"OPEN"F$:D$"DELETE"F$:SN$(N)"":NUNT1J4SDT1: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 NT DATA? (Y/N) ":TX,A$:A(A$)3i4RA$"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 U UBBJUC#Ti 0 V(U W*+ժժժժժժժժժժժժժժժժժժժժժժժժ׻ݪժժժժתժժժժժ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 ժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժߪժժժժժժժժժժ'=+Su֪*ժ՚KJjdjKUժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժEm,R3h,u"-z+gH4.^Wy*+Sږߊ}iUzժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժQ,ժժժժ+ժժժժ=ժժժ eժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժӪY6ժe6굥ժDS7,ժi&Qi˳ժժ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@@ LA0:A1:A2:A3:A4:A5:A6:A7:A8:A9:D$"CLOSE"BQOQ220768UQDT1:OP7: xQNUNT: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 STUDEL%: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 QU$: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$;IB$D(I)D(I)1:D(I)MW1640:M$"ADDING WORD TO "ST$(I)"'S":PC,21(M$)2,10:TX,M$:PC,14,12:TX,"STUDY LIST ...":SF$ST$(I)".STUDENT INFO FILE"::D$;"OPEN ";SF$:D$;"WRITE "SF$T$(I):ST$(I):S(I):G(I):C(I):C$(I):NX(I):NX$(I) 0S$S1$:2000:WM1LP%1:S1$S$:1440ZS$S2$:2000:WM1LP%2:S2$S$:1440iSN1ĺBE$PC,1,13:I14:TX,BL$::PC,1,18:TX,">> THE SENTENCE MUST INCLUDE THE WORD <<":PC,1,19:TX,BL$:1380 BN:EN:N0B1:ENSdH22: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,18ժժժժժժժժժժժժժժժժժժժժժժժժߪտժժժժժժlUMASUZ)*e#׮.UxQ-ʪݪ_3ךժժժժժժߔժժժժժժժժժժժժժժժժժתתժժժժժ+:zV6/պ~5W)jm(L*5yߪPjNJժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժjTˁ+%YժڪJvժZtG$ժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժߪժժժժժժժժժժi֪R>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(ժժ@ժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժjqժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժ*ЪժZ*KժkߪժժժժQ,ժ6Sժժ   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:SO$? 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$:C3,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(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":CREEN." 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 S$: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 ";FId 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(t8&&0jjjE 0  )(`)00 0)` G'&&`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," ":1760,G2,C2,C2$,N2,N2$,M2,D2,P2,A0,A1,A2,A3,A4,A5,A6,A7,A8,A9^QD$;"CLOSE":OQ20584,20758,22130sQDT1:OP6:58505QF1$S2$".STUDENT INFO FILE":D$"OPEN"F1$:D$"DELETE"F1$:D$"OPEN"F1$:D$"WRITE"F1$2QT2$:S2$:S2:G2:C2:C2$:N2:N2$:M2:D2:P2:T1:OP4=$QF$S1$".DYNWB":D$"OPEN"F$:D$"DELETE"F$:20960CQXQDT1:OP5:58505QF1$S1$".STUDENT INFO FILE":D$;"VERIFY";F1$:T2$T3$:S2$S3$:S2S3:G2G3:C2C3:C2$C3$:N2N3:N2$N3$:M2M3:D2D3:P2P38QD$"OPEN "F1$:D$"READ "F1$:T2$,S2$,S2'S":TX,A$:PC,6,12:TX,"STUDY WORD LIST? (Y/N) "{QA$" ":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 QD50010:202109PPC,9,22:TX,"ENTER NUMBER OF STUDENT:"yPPC,34,22:TX," ":A$"2 ":ENN,A$,2,TS%,AL%:(A$)2720210P(A$)1(A$)NTĺ(7):20685PN(A$):P1P20650:S1$SN$((A$)):IN:FI:NO:PC,6,10:A$"DO YOU WISH TO ERASE "S1$"E":PC,9,11:TX,"STUDENTS ON THIS DISK.":50010:20210=P vPIN: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$)1N"A$"n"20502GbPPC,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{PNT3205016}PIN:FI:NO:PC,9,9:TX,"THERE IS NO ROOM FOR MOR,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 522710ĺ(7):20558uZPPC,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$" 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:        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:"""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""""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"DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDY MISSES PER WORD :";:35:MPD8pB" % CORRECT TO SEE REWARD :";:35:PCvCDTPĺ" CATEGORY TO BE HIDDEN :";:35:HC:::DC$"1."FC$" 2."SC$:"""""""""""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"""""""""""""""""""""""""""DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD""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""    :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)120070PRESS 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,"":ENS,A$,8,TS%,AL%:(A$)2720210GHPAL%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$):M,8:TX," ":20528f4PC0: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$" 020550G0PPC,29,8:A$"ANNIE ":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,29NT 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.":NSHELLOHI": PD$"RUNHELLOHI":s 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"NPPC,29,4:TX,"DATA":PC,3,8:TX,"STUDEE>"= OPC,28,22:TX," ":PC,28,22:M$" ":EN,M$,2,TS%,AL%Q O(M$)2720478s 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$"RUN:TX,"3. CHANGE STUDENT DATA"k 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 CHOIC,Y:TX," ":PC,40,Y:TX," ":a CO,2:PC,2,24:TX," (YOU MAY PRESS AT ANY TIME) ":NOy 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,10K":DN$(4)"GAMES" DT1:OP3k 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,1d STDISKS 4/2/84$i58010KnG8:NL72: 72 LISTS FOR GRADE 8XxCVL5829D$(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 BAN                       DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDY MISSES PER WORD :";:35:MPD8pB" % CORRECT TO SEE REWARD :";:35:PCvCDTPĺ" CATEGORY TO BE HIDDEN :";:35:HC:::DC$"1."FC$" 2."SC$:"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""  $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      ɠٍɍ((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}HU12:DP,BU(2),32,I:I:J@hOD$;"BLOAD CHAIN,A520":520"DRILL"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āI1NROPER DISK.":50010:(A$)2710201R1:58562C`(222)255ĦbjD$"RUN HELLO"::D$"FP":st::"BYE":(21):JA$(4)"Z":JA$(8)(8):A(X)(X(DC$)2):DT(X)X16X::):CE$(5):CO$(15):CN$(14):DR1:G(13):SN(5680)LP113:G(LP):: 1500,3000,5000,8000,12000,17000,22000,26000,29000,32000,36000,41000,61000B0FI$(51),DU$(51),HW$(30),WD$(30,5),C1$(30),C2$(30),HR$(10),SC(10),WO%(30):JA$(15):JA$(1)"A":JA$(2)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"""@0$(`$(` 膢 ȱ " <67 L  8ij v vo>20160"H:20916#\::2: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$)2720105!?WD158530!DOP210,20480,183,20772,20904,20943,20961,21212,21305,21510 "%`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,13RbI16:: 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 EXIT "i"y16368,0:R$:R$(27)40000i,yR$(13)ıi6ySN1ĺ(7)i@y31010j}HU((1)5):HU2 hP 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 P"LET'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$:21801:O42180=f FF1:O13:OOO14:AB$(O)AB$(OO)2510sf :INV:PC,23,2O2:TX,"+":SN1įTN,250O50,25f NO::INV:PC,23,2O2:TX,"+":SN1įTN,250O50,25f 2640f Ng 30000:PC,17,12:TX," ":PC,1,13:TX,B3$:PC,1,1:TX,0(e> PC,1,2U2:TX,B$:SN1įTN,75,102e? 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 OOPC,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 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:    1,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,"  TX,"HOW'S THAT DOG DOING?":CO,4:INV:PC,9,15:X125:TX,BO$:hlOD$;"BLOAD CHAIN,A520":520"DRILL"SE 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,45030SY,CL:PC,1,24:TX," ":CO,2:DE,2,2,39,23:NO:p5819: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 MAKBASE45,4:D$;"RUN TESTING":1020*ȯ 9үBASE45,0Gܯ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$)2750030UïCO45,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#45,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:58507uBASE,AL%):A$(27)A$"6"60020H(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:585074NBASEW 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$(A$2:NOX DP,15587,1,20:CO,4:INV:Y2024:PC,8,Y:TX," "::CO,2:NO:DP,15587,33,20j DE,1,1,40,24 PC,14,3:TX,"MAIN MENU FOR" MS$" "S$" ":X(21(MS$)2):PC,X,5:INV:TX,MS$:NO/ LPC,11,8:TX,"1. INSTRUCTIONS":PC,11,10:TX,"2. NESE45)255ĹBASE45,0 REf 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," ":CO,͍ɍɍ 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 STUDɍԍԍӠӠȠӮ͍ōōԠӠŢ͍ōōԠ͠΢Ӯ͍DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDY 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""""""   INUE.":16368,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.":̍̍̍̍̍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$(ɍ\\WUUU*:ff:***,"""(***UUP*********f~:**%%%UUUUU55-*VU%%%UUTRKMUU******** UUTU****UUUU (VZZjUE,"""(***TQUUUUP"((*****)iaUUU-**(**))**UPEEEE******** ** **( @@ (( ++kk+++,UW" UUUUUUUU********UUUUUUUU********UUUUUUUU*****VUUUUUUURJ*********UUUUUUUU********UUUUUUUU******** UUUUUUUU********UUUUUUUU********55---+++UUUUUUUU*********)))%%%UUUUUUUU********UUUUUUUU******** UUUUUUUU********UU5--KSU***))%%V+kkkk++,W_\\_WUU:~f658030iSY,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):NAr):PC,28,11:TX,I$:TR1510650,)120003) )D$"BLOAD I.GOLD,A15360":I110:DP,G(1),6,17:DP,G(2),9,20::SN1āI110:TN,20(11I),102I:)TR0:12000)) )R((1)71):R1R2)R4R5%)D$"BLOAD I.OCT.SEGS,A1536C,32,Y:TX,I$)J")I:12000),) 6)I23212:PC,I,24I:INV:CO,1:TX,BO$:PC,I,25I:TX,BO$:PC,I16,32I:TX," ":PC,I16,33I:TX," "@)NO:CO,2:J19:DP,DV(J),I,24I2J:J4įPC,I7,24I2J:TX,I$^):SN1įTN,96,40:TN,74,20!25,Y:J4įPC,32,Y:TX,I$3(:SN1įTN,2Y50,20F(:TR1410540(I15TR9:Y192I:Y0įPC,27,Y:INV:CO,1:TX,BO$:YY1:Y0įPC,27,Y:TX,BO$(NO:CO,2:SN1įTN,Y50,20(J9I1:Y2(JI)1:Y1JI:10520 )DP,DV(J),25,Y:J4įP,23:TR510290((12000!2( w<(I19:X6((1)6)3:Y2((1)71):DP,WF,X,Y:SN1R((1)20020):TN,R,10F(:TR610340Z(12000d(RS210700n(10360x( (I1500::I915TR1:I010540(JI9:Y2(JI)1:DP,DV(J),,2:DP,BC,6,Y1:DP,LB,6,Y3:Y18101305~':12000<' V'TR4TR5TR610170a'10250'N15:I1712:DP,BU(1),14,I:SN1įTN,2I,10':I1712:DP,BU(2),14,I:::TR410250(12000 ( (DP,LV,1,19:DP,RV,18,20:DP,SL,22LOAD CHAIN,A520":520"MISSPELLED"J@(4);"BLOAD CHAIN,A520":520"PROOF"Q' ':D$"BLOAD I.CHEST,A15360":DE,1,1,40,24:CO,1:FI:CO,2:RS((1)51):RS1TR1010880(B'Y13:DP,LB,6,Y::DP,BC,6,1:Y16TR:CO,1:INV:PC,6,Y:TX,BO$:NO:COf840pM540000IuINV:PC,10,72M:M$(M):TX,M$:NO:NM3999M1M3įPC,3,21:TX," CHOOSE 2 OR 4 TODAY. ":860M8000,2000,6000,1000(4);"BLOAD CHAIN,A520":520"FLASH"(4);"BLOAD CHAIN,A520":520"ALPHA"!p(4);"B,"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> "HPC,28,21:M$" ":ENN,M$,2,T%,AL%:AL%0840RM(M$):M1M5880W(M$)2740000\PC,28,21:TX," ":SN1ĺ(7)TX,B0$:Y124:PC,1,Y:TX," ":PC,40,Y:TX," "::PC,2,24:TX,B0$NO:CO,2:PC,11,3:TX,"WORD ACTIVITIES FOR":X(21(ST$)2):PC,X1,5:INV:TX," ":TX,ST$:TX," ":NO:PC,10,9:TX,"1. PROOF/SPELL"yPC,10,11:TX,"2. ALPHABETIZING":PC,10,13:TX+ 0(222)5ĺD$;"CLOSE DYNWB":NWI1:564? 1(222)642000J 241000r 4ML16:B$"":I1ML:B$B$" ":: 5B3$"":I140:B3$B3$" "::B1$"":I120:B1$B1$" "::P1  NU2İ10000B:RE:SY,3:DE,1,1,40,24:CO,1:PC,2,1:INV:60I FI$ST$".DYNWB":D$;"VERIFY ";FI$:D$;"OPEN ";FI$:D$;"READ ";FI$ 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)):DZC(I)DL:MW$(I)"X"MW$(I)"x"NMNM1 &:D$;"CLOSE ";FI$:56489:WF16212:G(1)15360:G(2)G(1)483 TO(1)15360:O(2)O(1)99:O(3)O(2)99:O(4)O(3)99:O(5)O(4)99:O(6)O(5)99:SH15360:BO$" " ^W$(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):5DE,1,1,40,24:CO,2:MS$" WILL "ST$" FIND THE GOLD? ":X(21(MS$)2):PC,X,19:I1(MS$):TX," "::PC,X,20:TX,MS$:PC,X,21:I1(MS$):TX," ":$ D$"BLOAD I.SHELL.BUB,A39077":SL39077:BU(1)SL307:BU(2)BU(1)99:LB15360:BC15651:LV15846:RV160:DL3:I$" "(ST$,1)" " :D$"BLOAD I.DIVER.SEGS,A5888":DV(1)5888:DV(2)6147:DV(3)6406:DV(4)6665:DV(5)6924:DV(6)7183:DV(7)7442:DV(8)7701:DV(9)7960:DV(10)8091 RE::CO,1:FI:CO,2:J19:DP,DV(J),13,2J1:J4įPC,20,2J1:TX,I$ :d DRILL WITH DIVER 3/193iNUNU1:NU1700Fj39076:41000jnB0$"":I138:B0$B0$(130):pBASE5632:D$(13)(4):SN(BASE48):SQ(BASE49):ST$"":I110:CH$((BASE10I)):CH$(0)126}ST$ST$CH$: ~CVL5829:NW(BASE42)         ? (Y/N) ";KY$:KY$"Y"KY$"N"Ģ18:33:" ":1761IKY$"N"1770CD$"OPEN HONOR ROLL":CD$"WRITE HONOR ROLL":LP110:HR$(LP)" ":SC(LP)0:HR$(LP):SC(LP)::CD$"CLOSE HONOR ROLL" 5CD$(4):Q$(34):HM$(12):CG$(7):CC$(3ONOR ROLL":CD$"READ HONOR ROLL":LP110:HR$(LP),SC(LP)::CD$"CLOSE HONOR ROLL"DC$"HONOR ROLL":CL40:20:C12:4:LP110:C:HR$(LP);("...........",11(HR$(LP)));" ";SC(LP)::NG21671710:17:"DO YOU WANT TO START":9:"A NEW HONOR ROLLN 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(AD21:KY$"C"BW0y AD32768:DM%768:CM%800:GS%832:PS%864:(4)"BLOAD DRAW MAZE,A$300":(4)"BLOAD CHANGE MAZE,A$320" (4)"BLOAD GET/PUT SCRN,A$340":WN%642:ST%707:(4)"BLOAD SOUND GENERATOR,A$282"^ DR5:BCDT(2):WCDT(4):CCDT(13):ACDT(C 1780:30"A(20):DC$:u::1720:21:5:"PRESS 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     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. 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)) :(BANK":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$):BAtd 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 BA:        !!! 0":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"Bɠٍ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@ *iASP,255iE:SY,3:DE,1,1,40,24:CO,1:FI:CO,2:PC,4,12:TX," ":PC,4,14:TX," ":PC,4,13:TX," HOW'S THAT DIVER DOING? "jJJ13:I2112:DP,BU(1),32,I:I:I2111::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$ ٍӠӮ͍ōōŠӢ͍΍΍ŠӠΠȠٮ͍ōōŠҠӠ΢٠Š͍΍ō͍ōōӠή͍΍΍ŠԠӠ͍ōҍӢĮ͍ҍҍ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:2:DP,BU(2),32,I:I:J>jOD$;"BLOAD CHAIN,A520":520"DRILL":1NW:SUMSUMDZC(I)::SUMDL1āI1NW:DZC(I)DZC(I)1::20090jNR((1)SUM1):SUM0:W1NW:SUMSUMDZC(W):SUMR20220jNWW120090jNW1W:jNj0u k:uPP1P750::P1MW30: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)(20āI1(OC$):C$(H1I1)(OC$,I,1):TC$(H1I1)(OC$,I,1):PC,H,V:TX,C$(H1I1):HH1::OC$"":HH1 HH11HH1:GE$:PC,1,13:TX,">> YOU CANNOT BACKSPACE TO THE LAST":PC,1,14:TX," LINE. YOU MAY MAKE CHANGES LATER. <<" PC,H,V" C$(H)(32d 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$)             P,BU(2),32,I:I:J9kOD$;"BLOAD CHAIN,A520":520"DRILL"k4: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:IOD$;"BLOAD CHAIN,A520":520"DRILL",0: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@ fASP,255fE:SY,3:DE,1,1,40,24:CO,1:FI:CO,2:PC,4,12:TX," ":PC,4,14:TX," ":PC,4,13:TX," HOW'S THAT DIVER DOING? "fJJ13:I2112:DP,BU(1),32,I:I:I2112:DP,BU(2),32,I:I:J$gNW(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:PC&9`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 ʎ`` ɍ   G'&i(i` :HU232005g }CO,HU: g@ ,gASP,255gE:SY,3:DE,1,1,40,24:CO,1:FI:CO,2:PC,4,12:TX," ":PC,4,14:TX," ":PC,4,13:TX," HOW'S THAT DIVER DOING? "hJJ13:I2112:DP,BU(1),32,I:I:I21ZC(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$" ":LA`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"3n*NSUM0:N0:I1NW:SUMSUMZC(I):ZC(I)0NN1En,N:SUM01465n4NR((1)SUM1):SUM0:W1NW:SUMSUMZC(W):SUMR20060nHN(WW1)(N1)20010nRNW1W:n\NnfNWW1:WNW1465npNn0u n:uPP1P750::P1:ny o"y16368,0:R$ɍ"