' +JJJJ ?\>m0M='+l> /+l  H d@hLҦ L~ L  ﵪ*i BB䵊嵰`72µ- i ư&( Rp s P  LLʬLoō 鷎귭෍ᷩ췩緈JJJJx Lȿ L8ᷭ緍췩 緍i 8 `巬 췌`x (`(8`I`B` ``>J>J>VU)?`8'x0|&HhHh VY)'&Y)xꪽ)' `Hh`V0^*^*>&` aI꽌ɪVɭ&Y&&Y& 꽌ɪ\8`&&꽌ɪɖ'*&%&,E'зЮ꽌ɪФ`+*xS&x'8*3Ixix&& 8  '  & x)*++`NG8`0($ p,&" ۿ ۿڿL흍ٿ vLQ  !"#$%&'()*+,-./0123456789:;<=>?  ( 9 +"  "*  (9"1 ( ,.(0# 2  /#0/#0 *?'#07#00/0/'#07#0:"4<*55/**5/*%5/)1/)1/)1/)'#0/#0*5/*75/**5/*:5//#0/#0'#07#0:::*::'#07#0).).*#!.*'!.8)(#/-)(#/-,,eb)++$ h( ,!!"@h !D)"E` @ $ C ` DQ &J80^݌Hh ü ü݌ ռ ռ ռA ļD ļ? ļAEDE?HJ>h Լ ռ ռ ռ`HJ>݌h Hh݌`HH ᥠ L\HIHHHHhHH݌hHhHh݌H6 VDP (FD Z $0x8x D- ܸDD# H8`?F Vk *f???0xF Hh D#-FFF8` D ܸx D - ܸx8`-0ݩ?ʥD FFF`   LDcpq` [` ~  L IH  /JJJJ"LL뷩 ᷩ췩 ɛ LDLSAVBPILOCUNLOCIBPIBPIBPPRBPIBLISCALBPIBUZZOFӜsqu`".Q`pNФbptťܥm2<(-Py0\|e<6e< ~ vL~ JJJJj귍hI  aUL@ kU8  L  ^R(jQ0l^l\  OÌȌ`W ԧ H h@ [_ /QSIRb_L`LLLL`ª`LQL߼YLeLXLeLee ўQ0 L&RE;BY; Ꝥ$`( R \ZLl8 ўR HH\`\Z[YS6`LxQɿu3'RͲʎRʎ]]]ɍuL͟ɍ}RLRɍg^H8 ^hZLɍR LͲɊRR% QLܤͲ Z@ -^ ş\[Z QY\[Z8`l6Lş_Ȍb_Ͳ] )Y h( ֭ͲLɍ [LLĦ__ ^ 9 LҦ3 9 a   0LjLY u< (_9 ˭ɠuɠK_9 ?LˆʎõĵL õ ĵµ aµ`` L̦µ_bJLuLz`  ȟ QlXJ̥KlV  ȟ QlV eօ3L׭Lܫ &RL &QL d L4 We)n `@-eff L f`L . tQLѤ LҦL` OPu d L Ne)noon 8ɍ` ^f\õL ^NR  RΩLҦ\L \ şL_ NLjHv 3h`0h8` [L NС õ`A@` ŵL]Lõ`  \ 濭0 ş  Q ^\lZl^\8  ş Lȟ`fhjõĵ@OAP`u@`@&`QR`F Ls  @DAF@u`8` %@ @A@`@`@A`Mµ ) LЦ`8@AWc@8@-@HAȑ@hHȑ@ȑ@hHȑ@Ȋ@ch8&ȑ@Hȑ@Ah@LHȑ@ȑ@ htphso`hMhL`9V8U897T6S67`INILOASAVRUCHAIDELETLOCUNLOCCLOSREAEXEWRITPOSITIOOPEAPPENRENAMCATALOMONOMOPRINMAXFILEFINBSAVBLOABRUVERIF!pppp p p p p`" t""#x"p0p@p@@@p@!y q q p@ ,\Z[PRR3\ɄSɊ"RQJ(0Fw6. ^-%p 㩠RP.Q I* P\L˵B̵C8pB߮Z\ @ յյ\BIR Z-^ Jp\IZLLӜv  Ϡ@跻~!Wo*9~~~~ɬƬ~_ j ʪHɪH`Lc (L ܫ㵮赎 ɱ^_ J LsL Q(`贩紎 DǴҵԵƴѵӵµȴ 7 ַ :ŵƴѵǴҵȴµ納贍﵎ٵ്ᵭⳍڵL^ѵ-I `  4 ò-յ!  8صٵ紭ﵝ 7L (0+BC  7L HH`LgL{0 HH` õL H hBL BH [ h`Lo õ ڬL B ڬ LH hB@ յյ [L (ȴ) ȴ 7L L ( L (ȴL{ƴѵ洩ƴǴҵ 7 ^* B0 HȱBh ӵԵ 8 L8 ݲ` ܫ  / / şFD B / / ]ƴS0Jȴ ȴ)  紅D贅F B ƴ  / 0L Ν `ND8HFFhDh N ş`, ŵBѵ`, ѵB8`  XI볩쳢8 DH E𳈈췍Ȍ X0 · JLǵBȵC`,յp` 䯩 R-յյ`յ0` K R-յյ`ɵʵӵԵ` 4 K ( ѵҵLBȱBL8` DBHBH : ַ޵BȭߵBhhӵԵ RBܵmڵ޵ȱBݵm۵ߵ` 䯩LR˵̵ֵ׵`LzĪLR E( 8` R` ELRŪƪ`췌 յյI뷭鷭귭ⵍ㵍跬ª 뷰` Lf ݵܵߵ޵ ^`8ܵ i B8` 4L ֵȱB׵ ܯ䵍൭嵍 ` DȑB׵Bֵ  ַ յյ`` ᥠ hh`ĵµ`ڿ8.ڿ.ۿ`êL`õĵBCõĵ`µµ`L õBĵCصص Qƴ0"Bƴ 󮜳` 0۰ϬBƴ8`i#`ЗLw!0>ﵭ` m ﳐ 7i볍 8 ЉLw`H h ݲL~ `浍국䵍뵩嵠Jm赍嵊mjnnn浈ۭm浍浭m䵍䵩m嵍`"L ŵ8ŵH x(`F d£àĠz# u`z#        .``ALL`RIGHTS`RESERVED``Ϡ Эà.ԭՠ"̠ӠԮŠ Ҡ   () 1982   DECAP ZS2(T1)7 (Z$,Z,1)"^"495J Z9Z:200:ZZ9i Z1Z$(Z$,(Z$)1):480 Z$(Z$,Z1)(Z$,(Z$)Z) 240  F1498 F2ZY80:8200 ZT$Z$:500::ZX1:ZY80:4:995 F2ZY80:8200 ZY75:H $(Z$,Z9,1):Q$"@"Z9Z91:240@ ZXS(T1):ZY80:F1ZY150[ ZT$Q$:530:4:ZY75:g ,CAPTLZu 6ZS2(T1) ;Q$(Z$,Z,1) >Q$"@"(Q$"A"Q$"Z")395 @Z9Z:200:ZZ9 EZ1Z$"^"Z$:390 JZ$(Z$,Z1)"^"(Z$,(Z$)1Z) 220):(ZA$,T,1)" "N$N$(ZA$,T,1):/ Z9500; F1210f ZLS(T1):ZRZL5:ZT60:ZB73:22087: ZLS(T1):ZRZL5:ZT130:ZB143:22087: Q$(Z$,Z91,1):Q$"@"Z9Z91:220 ZXS(T1):ZY80:F1ZY150 ZT$"^"Q$:530:4:ZY75:! Q$"^PRACTICE":4 #ZX15:ZY120:ZT$"^HI! ^TYPE YOUR NAME AND PRESS RETURN.":4:75,140205,140:ZX119:ZY160:ZT$"(NAME)":4 (ZX84:ZY145:ZU1:22120:ZU0:(ZA$,4)"MENU"(ZA$,5)" MENU"9541 )(ZA$)ZA$(13)40% -NM$ZA$:N$"^":T1(ZA$&,CAP-PRAC%2.7.82 11:00AM 027000M960,0:29000:22006:10`22220:8200:fr D$(4) A$(25),S3(16,10),ZX(25),ZY(25),ZT$(25) :5:75,1075,60205,60205,1075,10:3:ZX91:ZY40:ZT$"^CAPITALIZATION":4:ZX112:ZY60:ZT               Y>:X1,Y1:X1,Y1:X3,Y1:X1,Y2:X3,Y2:X,Y3:X2,Y3:X1,Y4Lt[LAST LINE:WZ: HqRESTORE-&K Rq:K768810:A:K,A::1013,76:1014,0:1015,3: \q201,82,208,38,32,177,0,32,103,221,32,82,231,32,26,214,144,8,160,4,177,155,201,131,240,3,76,124,217,165,155,164,156,56,233,1,32,80,216,76,166,217,96 ` HEARTFjX,Y:X2,Y:Z1(ZT$):ZZ((ZT$,Z,1)):ZZ3222330: VZU022290W VZZ65ZZ90ZD0:22300q WZD64:ZXZXZA:22300 WZZ94ZF1:ZXZXZW:ZD64:22330 WZIZX(Z1)ZW:ZI0ZI(279ZWZA)22330 &WZZZD(ZZZD0)ZI,ZJ 0WZF1ZXZXZA:ZD0:ZF0  ' NMECC SUPPORTED SUBROUTINESB U232,0:233,96:230,64h UD$"BLOADSMALL CHARACTERS,A$6000"{ UZH7:ZW7:ZA1 U:16297,0:16302,0:16304,0:3:1:0: V WRITE ON HGR SCREEN VZT$""ı VZJZY15:ZJ0ZJ192ZHı* VZD0:ZF0:4:ZX15:ZY145:ZT$"BY AND USED WITH PERMISSION OF:":4 ZX66:ZY170:ZT$"^M.^E.^C.^C.":4:ZX66:ZY180:ZT$"2520 ^BROADWAY ^DRIVE":4 ZX66:ZY190:ZT$"^ST. ^PAUL, ^M^N 55113":4 (16384)205Ĺ16368,0:D$"RUNT-MENU"  G1200::85:ZT$"^HARTLEY ^COURSEWARE, ^INC.":4W xZX68:ZY100:ZT$"^ALL RIGHTS RESERVED":4| }40,10228,10228,2740,2740,10 ~X102:Y68:T14:3:990:60000:0:990:60000::990 3:600009 ZX15:ZY130:ZT$"^UPPER/LOWER CASE LETTERS DEVELOPED"\ HELLO"1.3.82 1:00PM -27000E214,129:29000:10]22220:: PRINT ITi D$(4)v :22000 100D$"RUNCAP-PRAC"d:ZX55:ZY30:ZT$"^CAPITALIZATION ^PRACTICE":4( nZX70:ZY70:ZT$"^COPYRIGHT (C) 1982":4:ZX50:ZY     J15:1995:4::8900:8920>:J13:1995:4::8910j:J12:1995:J2ZT$ZT$", "N$"."y4::89202100XTITLSb:X1lJ15:1995:J5F21:500m4::8900:8920:J14:1995:J2500:4::89102100:8900:89202100%HOL/AM/PM/:X1KJ14:1995:4::8910o:J15:1995:4::8900:8920:J14:1995:4::8910:J13:1995:J1ZT$ZT$", "N$","4::ZT$"^PRESS RETURN.":89202100pPLC NMSz:X1 995:4:JJ3JJJJ1:3040O 8900:8920:1995::ZT$ZT$", "N$".":4:8910Y 2100cDAYSm:X1J13:1995:4::8910:J13:1995:4::8900:8920:J13:1995:4::8910:T13:1995:T3ZT$ZT$", "N$"." 4:":4ZX20:ZY100:ZT$"^YOU HAD "(NC)" CORRECT OUT":4:ZX20:ZY120:ZT$"OF "(J)" PROBLEMS ATTEMPTED.":4:8900:89209500 PERS NMS X1:KK1 :JJ1 1995:4:JJ3JJJJ1:3025 8910:KK2KKKK1:3020 :JJ1 19195D^A$Z$:ZX1:ZY110:ZT$A$(J):Z$ZT$:500:4:QQ0:Q10:610n_Q8Q81:Z$A$:800:S3(Q8,QQ1)J:CC0xb2180fF20:9100:CC1021958900:8920:J3NCJ.412190J:JJ1NCJ2195:ZX20:ZY80:ZT$N$", YOU ARE FINISHED.":4:8910<:1995:4:1995:ZT$ZT$", "N$".":4:8910F4PRACYCNC0:CC0:F10eHJ1NSR:995:ZX1:ZY80:ZT$A$(J):800:4:500:F21:8200TJ4ZX20:ZY150:ZT$"^PRESS ^H FOR HELP.":22220:ZY80WT1:700\Z$A$(J)2150]ZX90:ZY30:ZT$"^INSTRUCTIONS":4:90,25173,25:iZX59:ZY190:ZT$"^PRESS RETURN TO GO ON.":4:ZXZX(X):ZYZY(X):ZT$ZT$(X):XX1:1ST WRD:X1J14:1995:4:8910 :1995:4:1995:4:ZX1:ZY100:ZT$"THIS, "N$"./[16368,0:16384,128:(16384)1411115w`:ZX1:ZY80:ZT$"^THIS WOULD BE THE NEXT SENTENCE.":4:8900:892016368,0::ZX1:ZY80:ZT$"^NOW WE WILL GO BACK TO THE":4:ZX1:ZY100:ZT$"BEGINNING SO YOU CAN CHOOSE.":4:8910FF0:950050:705:B10)8:1980:J14:1995:4:t=ZX1:ZY150:ZT$"MY HOUSE IS RED.":4:Z$ZT$:500:T1:F11:ZY145:705GZX1:ZY170:ZT$"^MY HOUSE IS RED.":4:600LT11240:(16384)1411120V:ZX38:ZY190:ZT$"^PRESS RETURN AGAIN TO GO ON.":405:B10%:1980:J14:1995:4:UZX1:ZY150:ZT$"^MY HOUSE IS RED.":800:4500:T1:ZY145:B11:B2195:B30:705:B10$:1980:J14:1995:4:)ZX1:ZY150:ZT$"^MY ^HOUSE ^IS ^RED.":4:Z$ZT$ .500:T1:F11:ZY145:B11:B2197:B3/T1(Z$):(Z$,T,1)"^"Z$(Z$,T1)(Z$,(Z$)T)E4:ZT$Z$:hZX250:ZY20:ZT$"#"(J):4:nxINST:X1F11:FF1:1980:J13:1995:4:ZX1:ZY150:ZT$"^MY HOUSE IS RED.":800:4500:T1:ZY145:B11:B2160:B30:71)710F1ZY145CT1ZXS(T1):ZNS1(T1)7ZX2:0:790PTQT1lZXS(T):ZNS1(T)7ZX2u790TT1B1B31B32:1990:ZY145710ZX,ZYZN,ZY:3: RMV CAPS%Z$ZT$*(Z$,1)"^"Z$(Z$,(Z$)1):8106KYB2B3B31CKY200TXZX:TZT:7900:ZXTX:TTZ:ZY75:724^KY195TZT:300:TTZyKY197TZT:400:TTZ(KY141B1B3)(KY141B1)Ē0:790:KY155B1ġ:JJ1:2190(KY160KY195KY197KY141KY155)(KY141B1B3NDRLN CAPSZQQ0:Q10(]Z$ZT$:5003bK1QTg(Z$,S2(K),1)"^"İ690:650{l(Z$,S2(K),2)(34)"^"QQ7:690:S(K)QQQ1,ZY5S(K)4QQQ1,ZY5:GT ANSRZY7573016368,0:16384,128:KY(16384):16368,0(Z$,T1,1)" "Q$".^"Q$".M"Q$".W"Q$".E"560+QQ1:S(Q)Z:S1(Q1)Z11:S2(Q)T11:Z10:(Z$,T11,1)"."S1(Q1)S1(Q1)1,T12ĭ(Z$,T12,2)".,"S1(Q1)S1(Q1)20T1:S1(Q)Z1:(Z$,1)"?"(Z$,1)(91)S1(Q)S1(Q)1: XUZX1:ZY150:ZT$Z$:500:ZL1:ZR279:ZT130:ZB150:22087:4:ZY145:495W  SNT CORDf F2Z$ZT$ Z40:Z10:Z1:Q1:S(Q)Z:S2(Q)1:T11(Z$)1 (Z$,T1,1)"@"Z4Z41:S4(Z4)Q:560 (Z$,T1,1)"^"560 ZZ7:Z1Z118&Q$(Z$,T1,2)::ZA0F,VZA$(ZA$,1,(ZA$)1):(ZA$)1ZA$(ZA$,1,(ZA$)1):22140X,VZA$"":22140},VZXZXZW:ZT$X$Z$:22230:22140,VZA$(8)ZA$"":22140,VZ(ZA$)2:Z0ZA$"":22200,VZA$(ZA$,Z),VZKZW:ZU0ZKZKZA-VZTZYZH:ZBZY:ZLZX:+rVZA$"":ZXZXZW4+|V22900:16368,0:(Z$)13ıg+V((Z$)8ZXZW(ZU1)ZA267)Z$(34)22140+VZA$ZA$Z$:(Z$)822160+VZA$(8)ZA$"":22140,VZA1:ZTZY(ZA1)8ZH(ZA2)4:ZBZY3(ZA1)5:ZLZX(ZU1)ZA:ZRZXZW:ZXZXZW:22087230,64,*UD$"BLOADSMALL CHARACTERS,A$6000"?*UZH7:ZW7:ZA0n*U:16297,0:16302,0:16304,0:3:1:0:*U16301,ZF:*EVCLR SPT ON SCRN*GV0*JVZZTZB:ZL,ZZR,Z:Z:3:*TVUNDRSCR*^VZT$"":Z1ZN:ZT$ZT$(95):Z:22230:*hVINPT9)j'252,135245,135245,131:268,135275,135275,131:q)l'252,135245,131248,126:268,135275,131272,126:)n'256,150256,159252,159:264,150264,159268,159:)p'256,150250,157246,153:264,150270,157274,153:) NMECC*U232,0:233,96:0,115255,120260,125](1'258,119:262,119:262,117262,113263,113:258,117258,113257,113(4'10094:10090:262,133257,139264,139257,146(8'FEı(B'T16:0:10090:3:10092:0:10094:3:10096:0:10092:3:10090(D'0:10096:3:10094:)i'170:ZB190:22085:9540C'N%:ZX110:ZY90:ZT$"^W ^A ^I ^T":22220['X%MDY:Y1Y9İ9200j'Y%Y1İ9250'v%Y1000,2000,3000,4000,5000,6000,7000,8000,9598'~%'%'' MAN(.'3:252,129268,129268,149252,149252,129:260,129260,125266,11926:Y(16384):16368,0:Y205ZA$"MENU":9541R&;%Y175Y184ZA$(Y128):9545X&?%q&D%ZX230:ZY185:22120&E%ZA$"M"(ZA$,4)"MENU"(ZA$,5)" MENU"ZA$(20)ĺD$"RUNT-MENU"&F%ZA$"0"ZA$"8"ZA$"-1"'I%Y(ZA$)1:Y1Y9ZL230:ZR279:ZT$Z$A$(Z1):A$(Z1)A$(Z2):A$(Z2)Z$:T~%"$D$"OPENINSTR,L1000":D$"READINSTR,R"MD:X:T1X:ZX(T),ZY(T),ZT$(T)::D$"CLOSE":%%MENU%&%:960,0:ZX(I)%0%R59500%5%ZX0:ZY20:ZT$"^WHICH WOULD YOU LIKE TO DO, "N$"?":4.&:%T110:ZX,ZY,ZT$:4((8)6)4İ10000$#!$#CLRI$#ZL18:ZR270:ZT130:ZB145:22085:T$#RD FL$#D$"OPENTEST.FILE,L1200":D$"READTEST.FILE,R"MD:NS:NS9230$$T1NS:A$(T):$$D$"CLOSE"$$T1NS$$Z1((8)NS1):Z2((8)NS1):Z1NSZ2NS9240%%ZT$"##ZC2ZT$ZT$", "N$"!"S##CC10ZT$"^YOU DID 10 IN A ROW CORRECTLY!"m##9195:ZX20:ZY150:4##ZX20:ZY170:ZT$"A GOOD JOB YOU'RE DOING, "N$".":CC99150##4##CC10ZT$"^GREAT JOB, "N$"!":4:8900:8920::40000$#CC9(16384)1418930,""(16384)155ġ:2190W""ZXX0:ZYY0:3:4:(16384)1418925j""3:16368,0:u"#RIGHT"#R52150"#CCCC1:NCNC1:CC9ZC9:9115"#ZC((8)101):ZC10ZCZ0ZC99114"#Z0ZC:T1ZC:ZT$:##ZC1ZT$N$", "Y195:X0ZX:Y0ZY:ZT$"^PRESS RETURN.":4:g!"ZT$"^PRESS RETURN, "N$".":ZX84(7(N$)):ZX1ZX1!"ZY195:X0ZX:Y0ZY:4!"X0Y0X091:Y0195!"16368,0:T1800:(16384)1418930!"(16384)155ġ:2190!"""ZXX0:ZYY0:0:4::J2ZT$ZT$", "N$"."( n4::89202 |2100D  UNDRLN TITLES Z4F2ıg  Z1Z4:SS4(Z)  ZZS1(S):A$(Z$,S2(S)S1(S)((Z$,S2(S),1)"^"),1)  A$"."A$"!"A$"?"ZZZZ1  S(S),ZY7S(S)(7ZZ)2,ZY7 & b Z40:+!"ZX91:Z WITH THE SENTENCE ABOVE.":22220:ZY80:3@MISC=J:X1_TJ12:1995:4::8900:8920}Y:J15:1995:4::8910^K12::J14:1995:4::8900:8920:Kc:J14:1995:4::8910h:J13:1995:4::8900:8920 m:J12:1995O MOVE THE LINE.":22220:ZX1:ZY170:ZT$" ^PRESS ^R^E^T^U^R^N WHEN YOU THINK":22220:ZX1:ZY180:ZT$" THE SENTENCE IS CORRECT.":22220ZT$"^PRESS RETURN TO GO ON.":ZX45:8911)ZT110:ZB191:ZL0:ZR279:22085:ZX20:ZY150:ZT$"^CONTINUEHELPFFı90,110260,110260,1750,1750,110ZT124:ZB174:ZL1:ZR259:22085:ZX1:ZY134:ZT$" ^PRESS ^C TO CAPITALIZE.":22220:ZX1:ZY146:ZT$" ^PRESS ^E TO ERASE A CAPITAL.":22220ZX1:ZY158:ZT$" ^PRESS ^S^P^A^C^E ^B^A^R TtZA$"N"1100+~ZT130:ZB145:220871?GET MODEa:"WHICH DO YOU WANT TO DO?":T17:Y$:T22:4:Y$:21:4:868:"WHICH? ";Y$:MD(Y$)1::MD2MD81820&9200:Y91NS25ı'Y92Y94ı(0:ZX1:ZY15:ZT$"^TYEND"1160Z cT1(A$):(A$,T,1)"^"Ă:ZX1:ZY130:ZT$"(^NO LETTERS CAPITALIZED.)":4 eZT130:ZB145:ZL0:ZR279:22087:ZX1:ZY150:ZT$"^O^K? (^Y/^N)":4:ZX70:ZY150:ZU1:22120:ZU0 fZA$"N"ZA$"Y"1125jZT90:ZB125:ZL0:ZR279:22087ANT TO SAVE NEW SENTENCES? Y";:(36):16368,0:"";Y$:Y$"N"1095M D9250W G9500] Kq LINPUT SENTENCE VZT130:ZB145:ZL0:ZR279:22087:ZX1:ZY150:ZT$"^ENTER NEW SENTENCE.":4 `ZX1:ZY110:22120:(ZA$)1120 aA$ZA$:A$"END"A$"^$"END"1090S ZA$"N"ZA$""ZA$"Y"ZT130:ZB145:ZL98:ZR279:22087:1053f ZA$"Y"1080 $1100:A$(K)A$:A$"END"A$"^END"KK1:1090 8ZL0:ZR279:ZT40:ZB80:22087:ZL98:ZR110:ZT130:ZB145:22087 =K B:C C12:"DO YOU WZX1:ZY170:ZT$"^PRESS 'RETURN' TO PASS.":4:ZX1:ZY180:ZT$"^TYPE '^Y' TO CHANGE SENTENCE.":4 K1NS:ZX1:ZY60:ZT$"#"(K):4:ZX1:ZY85:ZT$A$(K):500:4:8200 ZX1:ZY150:ZT$"^CHANGE? (^Y/^N)":4 ZX98:ZY150:ZU1:22120:ZU0 ZA (Z$,T1,1)"^"ZZ1:5600 ZZ7:Z1Z11r &Q$(Z$,T1,2):(Z$,T1,1)" "Q$".^"Q$".M"Q$".W"560 +QQ1:S(Q)Z:S1(Q1)Z11:S2(Q)T11:Z10 0T1:S1(Q)Z1:(Z$,1)"?"(Z$,1)(91)S1(Q)S1(Q)1 :  MODIFY 1800b | T-MENU#2.9.82 3:00PM .27000=22006:10P22220:8200:\ D$(4)x S3(10,20),A$(25),S(25)~Z9500 SNT CORDZ$ZT$Z40:Z10:Z1:Q1:S(Q)Z:S2(Q)1:T11(Z$)1(Z$,T1,1)"@"Z4Z41:S4(Z4)Q:560          MBER AND PRESS RETURN.%4LAST LINED ^I,10,70,2 - ^PROPER PERSONAL NAMES3v10,85,3 - ^DAYS OF WEEK & MONTHS,10,100,"4 - ^HOLIDAYS, ^A.^M. & ^P.^M.",10,115,5 - ^PROPER PLACE NAMES,10,130,6 - ^TITLES4 10,145,7 - ^MISCELLANEOUS,10,160,8 - ^START OVER WITH A NEW STUDENT,1,185,^TYPE A NU^NICE JOB,^PERFECT!,^YES! ^YES! ^YES!,^WAY TO GO!,^COULDN'T BE BETTER!,^W^O^W!,^THE ^F^O^R^C^E IS WITH YOU!,^I'M GOING TO TELL YOUR TEACHER WHAT A 2˃^FANTASTIC!,^WONDERFUL! %3l10,40,0 - ^INSTRUCTIONS,10,55,1 - ^FIRST WORD IN SENTENCE AN HC = 3 OR HC = 5 OR HC = 7 THEN HCOLOR= 3q1h19,819,70:17,617,72:40090:19,70105,70:17,72107,72:400901i105,70105,8:107,72107,6:40090:105,819,8:107,617,6:400901r:10050:G1200:11G1100::2˃YOU'RE DOING GREAT!,,76,124,217,165,155,164,156,56,233,1,32,80,216,76,166,217,96F0@RWRD]0E:FE1:10000:FE0t0JZT$"== "N$" =="0TX025025:Y160(X1.875):ZXX:ZYY:4:0^ZT$"^GREAT JOB!":Y307020:ZYY:ZX29:4:+1cHC17:HC: HCOLOR= 0: IF HC = 1 OR50:KY(16384):KY12722960$/Y//Y22910^/YZ$(KY128):0:ZX7,ZY6ZX13,ZY6:3:m/HqRESTORE-&/Rq:K768810:A:K,A::1013,76:1014,0:1015,3:<0\q201,82,208,38,32,177,0,32,103,221,32,82,231,32,26,214,144,8,160,4,177,155,201,131,240,3ZXZXZW:ZD64:22330C.WZIZX(Z1)ZW:ZI0ZI(279ZWZA)22330^.&WZZZD(ZZZD0)ZI,ZJ{.0WZF1ZXZXZA:ZD0:ZF0.:WZ:.tYCRSR.~Y3:ZX7,ZY6ZX13,ZY6.YZ9150:KY(16384):KY12722960.Y.Y0:ZX7,ZY6ZX13,ZY6/YZ91ZRZXZK:22090:ZXZXZK:22140(-VWRT6-VZT$""ıU-VZJZY15:ZJ0ZJ192ZHı-VZD0:ZF0:Z1(ZT$):ZZ((ZT$,Z,1)):ZZ3222330-VZZ64ZXZXZW:22330-VZU022290-VZZ65ZZ90ZD0:22300-WZD64:ZXZXZA:22300.WZZ94ZF1:250:Z:ZT190ZH2:ZB191:ZL270ZW19:ZR273ZW8:22090Z,V(16384)128İ22080:220506V16368,0:ZT190ZH2:ZB191:ZL0:ZR279:22090:ZUZK:@VZX270ZW19:ZT$"'SPACE BAR":22230:ZX270ZW9:ZT$"'":22230:EVCLEARS ANY SPOT ON HGR SCREEN4'UD$"BLOADSMALL CHARACTERS,A$6000":UZH7:ZW7:ZA1IU3:1:0:ZU16301,ZF:V16368,0:ZKZU:ZU0:ZX275ZW25:ZY191:ZT$"PRESS":22230V22080:ZX276ZW8:ZT$"TO GO ON":22230VZ1(ZS1)84:(16384)12722070VZ9"VZ1N PRACTICE PROGRAM"EX%::6:"WHICH? ";Y$:Y9(Y$):Y91Y959500fv%Y93000,2000,1000,4000,9596{|%D$"RUNCAP-PRAC"&PRNT A LN&J1(Z$):Q$(Z$,J,1):Q$"^"9920&Q$;&:: NMECC SUPPORTED SUBROUTINESU232,0:233,96:230,6T1NS:(34)A$(T)::D$"CLOSE"&6$0%MENUC!%D$:D$"CLOSE"&%::4:"DO YOU WANT TO:":::6:"1 - ADD SENTENCES"::6:"2 - DISPLAY/DELETE SENTENCES"::6:"3 - DISPLAY/MODIFY SENTENCES"+%:6:"4 - PRINT SENTENCES ON PRINTER"::6:"5 - RU#(Y$)329020)[#(Z$)LMĺ"";:9020Ad#Z$Z$Y$:Y$;:9020Ux#(Z$)0F81:[#c#RD#D$"OPENTEST.FILE,L1200":D$"READTEST.FILE,R"MD:NS:T1NS:A$(T)::D$"CLOSE"$"$WRT ,$D$"OPENTEST.FILE,L1200":D$"WRITETEST.FILE,R"MD:NS:"2#F90:F80: F8=RTN ONLY5<#Y$:(Y$)139080H=#(Y$)219020i>#Y$";"Y$","Y$":"Y$"/"?#(Y$)27ġ:9500@#(Y$)3ijP#(Y$)89050R#(Z$)F91:S#(Z$)1Z$"":Y$" "Y$;:9020U#Z$(Z$,(Z$)1):Y$" "Y$;:9020Z))2,ZY7& b Z40:E"ZX91:ZY190:ZT$"^PRESS RETURN.":4:d"ZX84(7(N$)):ZX1ZX1"ZY190:ZT$"^PRESS RETURN, "N$".":4"16368,0:16384,128:16368,0:"ZX91:ZY200:ZT$"^PRESS RETURN.":4:8920:(#GET ROUTINE)#Z$"DO A LWRCASE LN9.K1(Z$):Q((Z$,K,1)):Q644930I/Q944915g0KK1:(Z$,K,1)"@"4912}1(Z$,K,1);:49303Q65Q91ĺ(Q);:49308(Q32);B:: UNDRLN TITLE Z4ı Z1Z4:SS4(Z)  S(S),ZY7S(S)(7S1(SETTERS.)"::"CHECK YOUR MANUAL."q16:1:868:"IN WHICH SLOT IS YOUR PRINTER? ";Y$:SL(Y$):SL0SL74025D$"PR#"SL:T1MD1:Y$::"MODE:"Y$::T1NS:Z$A$(T):"#"(" "(T),2)"> ";:4900:::D$"PR#0"9500$A$H ZL0:ZR279:ZT40:ZB80:22087:ZL98:ZR110:ZT130:ZB145:22087X NS253020 ::8:"YOU HAVE "NS" SENTENCES.":1091PRNT ON PRNTER1800!::4:"BE SURE PRINTER IS TURNED ON."::"(NOT ALL PRINTERS WILL PRINT":"LOWER CASE L ADD SENT 1800 NS25ĉ::12:"YOU ALREADY HAVE 25 SENTENCES IN"::"THIS FILE. YOU MAY NOT ADD ANY MORE."::22:"PRESS RETURN ";Y$:9500 ZX1:ZY60:ZT$"^ADDING SENTENCE #"(NS1):4:1100:A$"END"A$"^END"3090 NSNS1:A$(NS)..":T1ND:A$(S(T))"*":: T1NS:A$(T)"*"Ă:2090k%NSNS1:TNSāKTNS:A$(K)A$(K1)::2080*12:"SURE YOU WANT TO DELETE THESE? Y";:(36):16368,0:"";Y$:Y$"N"9500/9250:9500T ZX1:ZY192:ZT$"^PRESS RETURN":4:"";Y$:Y0:12:1:868:"DELETE:";:LM3:9000:F82050FF9NDNDND1:2060YZ$"END"2070t(Z$)1(Z$)NS2050NDND1:S(ND)(Z$) 8:1:958:NDĺ"DELETING:";:T1ND:S(T)",";::2050ND252050ND9500:12:12:"THINKING.$"#"(K):YY20:ZYY:ZX1:4:ZT$A$(K):ZYY9:ZX1:4PY160KNSİ2900:\:2900ND0:::"ENTER THE NUMBERS OF THE SENTENCES":"YOU WISH TO DELETE, FOLLOWED BY":"'RETURN' AFTER EACH NUMBER.":"TYPE 'END' WHEN YOU ARE FINISHED."-"<"ZT$">":4b.X,YX3,Y4X6,Y:4@DELETE::8:"ALL SENTENCES WILL BE DISPLAYED."::"PLEASE NOTE THE NUMBERS OF THE ONES"::"YOU WOULD LIKE TO DELETE FROM THE FILE."22:"PRESS RETURN ";Y$18007:Y0:K1NS:ZTPE ' ' TO CAPITALIZE.":4:X42:Y6:19902ZX1:ZY28:F31:ZT$"^TYPE ' @' TO CAPITALIZE ^A^N^D UNDERLINE.":4:F30:X42:Y19:199040,25279,25:0,150279,1505ZX1:ZY190:ZT$"^TYPE 'END' WHEN FINISHED.":4::T16MD:ZT$::ZX20:ZY45:ZT$6/?7 I--??q - &)u6'4$46v-=$ u$66$>46666$ u66 -?6- I166&$ -66" ->?7--'du66& -6&$6M??666$ u6&66&/I66?6666$-  6666&$ & 6&66$, u6& -6?$- 666?- 66$SONAL NAMES,^DAYS OF WEEK AND MONTHS,"^HOLIDAYS, ^A.^M. & ^P.^M.",^PROPER PLACE NAMES,^TITLES,^MISCELLANEOUS{&LAST LINEZX7,ZY6ZX13,ZY6%Y3:^%l 1 - FIRST WORD IN SENTENCE AND I,2 - PROPER PERSONAL NAMES%v3 - DAYS OF WEEK & MONTHS,"4 - HOLIDAYS, A.M. & P.M.",5 - PROPER PLACE NAMES,6 - TITLES%7 - MISCELLANEOUSl&^FIRST WORD IN SENTENCE & ^I,^PROPER PER)ZI,ZJ$$0WZF1ZXZXZA:ZD0:ZF0-$:WZ:9$tYCURSOR^$~Y3:ZX267ēZX7,ZY6ZX13,ZY6$YZ9150:KY(16384):KY12722960$Y$Y0:ZX7,ZY6ZX13,ZY6$YZ9150:KY(16384):KY12722960$Y$Y22910%YZ$(KY128):0:ZX267ēD0:ZF0:Z1(ZT$):ZZ((ZT$,Z,1)):ZZ3222330Q#VF3ZZ64ZXZXZW:22330a#VZU022290~#VZZ65ZZ90ZD0:22300#WZD64:ZXZXZA:22300#WZZ94ZF1:ZXZXZW:ZD64:22330#WZIZX(Z1)ZW:ZI0ZI(279ZWZA)22330$&WZZZD(ZZZD02230:ZU0:22140,"VZA$(8)ZA$"":22140N"VZ(ZA$)2:Z0ZA$"":22200_"VZA$(ZA$,Z)y"VZKZW:ZU0ZKZKZA"VZTZYZH:ZBZY:ZLZX:ZRZXZK:22090:ZXZXZK:22140"V WRITE ON HGR SCREEN"VZT$""ı"VZJZY15:ZJ0ZJ192ZHı2#VZ)8ZH(ZA2)4:ZBZY2(ZA1)5:ZLZX(ZU1)ZA:ZRZXZW:ZXZXZW(ZU1)ZA::22087n!VZA$(ZA$,1,(ZA$)2)!V(ZA$,1)"^"ZXZX1:ZA$ZA$" ":22154!V(ZA$,1)"@"F20:ZA$ZA$" ":22154!V22140!VZA$"":22140!VZXZXZW"VZT$X$Z$:2ZLZX(ZU1)ZA7:ZRZXZW6(ZU1):ZL,102ZR,102X V(ZA$)Z$"^"(ZA$,1)"^"22140 VZ$"^"Z$"@"ZA$ZA$Z$:ZU1:22140 V((Z$)8ZXZW(ZU1)ZA267)Z$(34)22140 VZA$ZA$Z$:(Z$)822160 VZA$(8)ZA$"":22140T!VZTZY(ZA1GV0&JVZZTZB:ZL,ZZR,Z:Z:3:GTV UNDERSCORES ON HGR SCREENt^VZT$"":Z1ZN:ZT$ZT$(95):Z:22230:hVINPUTS ON HGR SCREENmVF20rVZA$"":ZXZXZW|V22900:16368,0:(Z$)13ı}VZ$"@"F21~VZ$" "F202 VF2Z$(8)ͮĠՠӠРҠοŠŠӠЮͮŠנӠΠҠ٠ԠЮ̠ͮՠŠנҧӠſؠͮŠϠΠҠŮ̠ӠĠΠԮ˧ӠٮԠӠؠͮŠΠՠŠϠ٠ŠҠҿŠŠŠԠЮͮŠŠΠΠ̠ٮԠӠ٠ˠԠԮԮٮŠŠŠΠٮŠӠΠĠΠҮŠԠϠϠΠٮԠŠŠҠҮ̠ ŠԠٿɠנŠΠȮŠԠŠԠˮŠĠĠԠ٠ԮŠŠ͠ӮӠԠ͠Π̠ŠՠſħӠҠӠנΠٮŠԠԠϠԠΠٮŠ٠̠ΠҮנӠ٬ɠˮ٠٠ӠΠԮԧӠϠŠԠ٠ӠƠΠΠٮ٠٠Ӡ٬٠ȮŠȠƠ٠ӠԮɧ̠ŠՠŠԠ٠Π̮ӠҮŠΠҠȿŠΠҠ٠Ӡɮ٠Š٠Ӡٮ٠ĠΠՠŠΠٿɠŠҮŠŠҮ̠ϠǠȠ¿Š̠ԠϠŠԮɠŠӮҠӠŮΠҮŠŠҿŠŠƠˠӠŮĠԠŠŠŮŠ̠Ġ͠ŠϠ̠̿ΠŠŠ׿͠ŠӮˠŠŮ٠ҠӠҮ̮ɠŠҮˠҠΠҮخŠŠӠϠ٠ٮŠՠԠӠŠԿĠӠӠ٠Ԯ̠ΠӠŠŠſŠ̠ĠӮ٠ΠҠծ٠ĠĠƠ٬Ӯӿ͠Ԡ٠٠ԮŠנŠΠӠԠŠˮ٠ĠӠӮΠӠɠנҮˠҮӠٮ̠ͬĠ٠ΠԮԠĠɠԠϠŠӮȮҮĠӮΠŠŠٮŠӠϠŠĠӮӮΠӠ٠ȠŠϿӮŠſƠɠΧԠŠլɠ̠ϠŮĠɠҠŠ̿ŠĠɠԠȠҮ̠ĠɠŠĠɠԠŠſ٠ǠĠɠΠΠԮϠӠϠӠҮ٠ɠ̠ՠΠŠǿŠҍٿҠǠӠӠǠӠɠͮΠɠРտǠǠΠΠԮ̠ɠŠՠ׿ɠΧԠϠȠծϠɠ̠ſ٠ĠĠɠԠҠŮɠŠŠͮՠԠŠȠŮĠɠŠՠԠϠӠΠſŠĠɠ̠ŮŠĠɠ٠Ϯ٠ɠŠԠ˿ɠ̠̠ՠٮ٠͠Ġɠ̠ˮ̠Š          666$,e$? u66$$666$, u -=?-?/- 666$$=/u6ve $666 $-66 $$&- 6ve $66?-----/------.-=2ԠӠŮԠĠĠ٠ҠſҮĠĠΠ׮ȮŠӠҠ̠ӬîɠĠϠ͠Ԡ̧ӠȠ®ɠŠԠŠ͠ӠŠŮΠĠҠ٠ԠſԠſΠŮĠŠҠРҠǿԧӠ̠РϠӠΠĠԿɠΧԠˠҮӠӠŮɠŠҠή٠ӠӠ٠ԮήŮӠҮŠҠſ٠ϠԮ٠ҠӠŠ٠̠Ӯ٠ԠĠӠҮŠήϠՠנҠ̠̿ԠΠŠΠο̠̠ŠϠήӠĮɠԠԠŠϠŠӮ٠ŠΠӠŠנŠŠԠȮŠӠΠŠԮӮ׮Ӡ̧Ӡ̠˿ͧӠŠŠŠԠ׿ҠΠŠŠŠӮ̠ɠŠŠ׬ӿŠŠɠӠ٠ĮŠŠҠΠӠ٠ĮŠΠɠŠŠŠοԠӠĠϠˠƠ٠ӮŠĠŧӠ ϠŮϠՠȠŠԿĠ٠ŠԠ˿ŠŠӠӠ̠ҮΠŠȠŠŠϠŠӠĠٮĠՠŠοŠӠŠҠԠҮΠՠŠˠŠҠſԧӠϠŠŠԠנΠήΠĠՠĠҠοŠŠƠŠˠӠϠŮ٧Ӡנ˿ŠŠӠĠҠӮϠŠ͠ҿɠנŠŠӠˠŮŠŠӠΠĬĠˮɠŠˠĠ٠ŮɠΧԠŠŠŠǠǮɠĠŠנˠӮӠŠԮŠՠҠΠŠΠοŠĠҠӠȠΠԮŠĠҠήӠŠΠŠŠŮɠԠϠ٠ԠŠĠ̮ϠҠˠΠŠŮĠȠӠΠ٠Ӡ̠ԮŠՠΠϠӬſӠŠӠ̠ŮӠŠ̠ƠծӠӬӠǠٮ̠ӠΠĿŠĠŠ٠ӠΠŮӠҠ͠ΠٿŠŠ٠ӠȠϮŠӠ٠͠ϠŮĠ͠ΠŠΠſŠŠϠ͠ΠŠήԧ̠ՠ٠ϠԬοŠӠΠŠҠҠǮŠàΠӠЮŠՠΠϠάӿŠ٠ӠŠ̡Ġ͠ϠϠ٠ŠЮͮɠԠŠȠԠŠͮŠȠƠ٠ӠԠ١ŠŠҠŠԠΠͮΠ͠ŠԠοŠԠϠРԠԮ٠ҠӠӮ̠ĠɠĠŠԠŠЮͮĠŠԠĠǠ٠ȠӮ̠ΧӠ٠ŠΠٿ٠ŠԠҠЮͮŠǠנӠǠŠήɠŠŠΠŧӠٮŠĠԠɠĠϠȠͮԠӠŠЮͮΠɠԠŮԠŠǮΠŠŠԠŬͮĠЮͮĠŠĮԠŠŠͮĠЮͮԠԠĠԠŠǍƠՠŠԠϠŠͮŠԠҠŠ٠ӍӠĮϠō̠ŠҠӮźɰ٠ŠӠȠӍƠŠˠĠӍԠٮŠŠӠƠŠҍŠӠĮź٠ŠȠӠٮŠӠƠӍŠϠĮخ٠٠ӠΠήӠΠĠՠ΍̠ΠӠƠŠˍŠӠĮź٠ӠӠ٠ŠӍԧӠ٠ŠӍĮź٠ΠˍӠŠӠĮź٠ˍźͮîӮҮӬĠӮŠӠĮźҮ̮͠ōԧΧӠԬŠčԠӠŠӠӠĮӠӠΠ٠ōϠҮŠĠɧӠӍĮŠҍŠŠŠӍҠՠϠٍĠȠӮخŠӠŠšӠΠϠ٠ōƠōŠԠĠΠŠӠӮخӠĠŠŠԿӠȠӠͬĬĠŠԠĠ΍ԠĠӠӮخ٠͠ӠǠҮŠӠԬŬĠ΍ŠĠΠՠŠŠ̠ҍĠŠԠȠ̠Ү٠ԮΠՠӠΠŠՠ̍ŠŠԠŮŠԍŠՠӠΠՠ̠Ϡ΍ϠŠԠŮ٠ԮŠŠŠҬՠŠĠϠˠή٠ǠŠŠҮΠՠӠŠà٬ŠĠՠŠ΍̠ŠĮϠĠĠ٠ԮΠՠӠŠŠ٬Πՠ          ٠ԠſӠǠҮŠӠԬŬĠ΍ŠĠΠĠȠӮخŠӠŠšӠΠϠ٠ōƠōӠͬĬĠŠĠ΍٠ŠĠӠӮخӠĠŠŠԿӠȠӠͬĬĠŠԠĠ΍ԠĠӠӮخ٠ȠŮخŠנҮȠčҠΠٮΠӠȠӠҬҬҠҠŠĠԠŬ٠ŠԠĮخɠԠϠŠҮӠȠ٠ӠŠĮخŠӠҠҠ̠ٮ̠ӠȠӠҬҬĠҠŠčΠĠҧӠԿŧӠҠŮɠŠϠȠԠ٧ӠčΠήӠΠϠ٠ŠƮՠĠŠԍӠΠŠӠƠӬӬӬ΍ӬîخϠՠĠŠàήˠԠӮŠӠΠĠӍϠ٠٠̮ӠΠϠՠ΍٠ōҠӠƠӠčŠĠŠĮźŠԠϠӠԠˍҠŠϠōͮĠЮͮӠҍ̠͠ˠԠǍƠՠϠԠϠϮƠՠӠ΍ՠ̠ŠŠϠˠΠӍȠӠҠͮĠЮͮ