' +JJJJ ?\>m0M='+l> /+l   d']6@5L&]655]6LF%5 & "L}"BB5L&]6 X  `6 7777777 7777JJJJx 77L? L7877777777 776i 7 7867 7`77 777777`x =(`(8`5775I7`B` 76`77`>J><;VU<)?<`8'x0|<&HhHh 8 8 8 8V&` aI꽌ɪVɭ&Y:&<&Y:&;: 꽌ɪ\8`&&꽌ɪɖ'*&%&,E'зЮ꽌ɪФ`+*xS&x'8*3Ixix&& 8 9: :' 9: :& :x)*++`FG8`0($ p,&"ųųೳŪŪųųij  !"#$%&'()*+,-./0123456789:;<=>?8  1 '" *"( (9"1 ( ,.(0# 2  /#0/#0 *?'#07#000'#07#0:"4<*55**5*%5)1)1)1)'#0/#0*5*75**5*:5/#0/#0'#07#0:::*::'#07#0"):$(%"%:$(%"%$$2%4%$$2%4%$(2()!)E(!8b $!H(+ "@H !D)"E` @ $ C ` DQ &J80^݌Hh < <݌ < < h < < < <`HJ>݌h Hh݌`葠葠ȔЖȔЖȠHIHHHHhHH݌hHhHh݌H6 (G FG HZXj 80x D9$xxH` >( Z>h Z>L=.xxH >hh@(LH>9L>HH/Hh/ H?-З( 8(& 8$8 H` *8HNx`* >x$50x*$50xL9JJJJ`HHjf5 >h $50x`HA>VD;;P >(ED Z> ?$0x8x D9- 8DD# H8`?E Vˆʎ55L $ 5 55555 &a*5`*5` "L&5_*b*JL%u**Lz%`** $  Q(lXJ̥KlV $  Q(lV eօ3L e3L &%R*L &%Q*L d' "L4% N'e*)n*5 5 &`@-e*f*f* 5 "L# "5f*`L %.* *t*Q*L$ %L&*L` "O**P**u** d' "L% N'e*)n*o*o*n* &8ɍ` ^&f\*555L& ^&NR* & "R*ΩL&)\*Z* ʽ LH*v 3h`0h8` " ['L & N'С55 &5`*A*@` +5L^6L65`  \* ?*0 '\* '  Q( ^&\*lZl^?*c*q)H c*h`f*5h*5j*555@O*AP*`u*@`@5&`Q*R*`E 'Ls' ' ' @DAE@u*`8` %@ @A@`@`**@*A`M5 ) "L&`8@AW*c*@8@-@HAȑ@hHȑ@ȑ@hHȑ@Ȋ@c*h8&ȑ@Hȑ@Ah@L'Hȑ@ȑ@* htphso`hMhL`9V*8U*897T*6S*67`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- (   Ϡ734@~3!+,W,o,*--,,9,-.-~3~3,,,,~3~3,,,,~3_*3 j.5 *H*H`Lc3 (+L3 +55555 1^3_* )3J Q*L_3Ls3443 D23455545554 70 / 7 :/354545455454555535L^/5-5I5555 55` / 4/ 2-5! / 08555454 70L3 (+50+5B5C3 2 70L35 *H*H`Lg3L{3505 *H*H` 3 ,5L3 3 1 ,H 1hBL, 0 BH [1 1h`Lo3 35 ,L3 3 1B , 1L,H 0hB@ 55 [1L133 (+34) 34 70L3 3L3 (+ 055L- (+34L{33454445 70 ^/* / 3B0 HȱBh -355 -8 /L38 25` +5 /3 /. /. 3 E7D B. /. /. 0]34S0J4 4) 3 4D4E B. 4  /. 02L3 Ν3 3`HD٤33DEEhiHLG.h ` /5B5-` /5B-` + X05I33383 33DH /4 E03744Ȍ7 X040 7 J7L35B5C`,5p` / R0-55`50` K/ R0-55`575755` 4/ K/ /( 55L/BȱBL/58` D2BH5BH :/ 75Bȭ5Bhh55 R0B5m55ȱB5m55` /LR0557755`*7*75LR0 E0(33 48`433 R0` E033LR0*7*7`777 555I7575757577** 7757`7 L35555f /55555555 ^/`855 i /B58` 41L 15ȱB5 /5555 /5`3 D23ȑB55B5 / 7 55`5555555555 5555`555`55BC55`5555`L3 /5B5C355 0Q340"B4 3` 02۰Ϭ33B438`3i#`3ЗLw35!50>5555`53 /3m3 3 3733i35 3583 /35ЉLw35`H /5h 25L/~43 533`55555555J5m55m5jn5n5n5ۭ55m5555m55m55`"L? 585H ~.(3` # d ֠z# u*`LKxHHD+(DA/(Dq'  I)(H  p闠 y) 񗰐 z$ r0θ4KHH0t# p y0p 9G @0ɩL[hHHϸȸI^hHHoTDDp *U*U*U*(@|`x@wxgs?`?xg`| |B!(  `|~(  !>!@PB"(ԪՊتPتǺ @T*U*U*U  r'$  @B ժժժ x XA@"" s? (Y/N)";:YN$:JWVYN$"N"ĺ(12):10:"Getting the questions......":W"V(12):"HOMONYMS are words that SOUND alike."::"They MEAN different things. But they"::"SOUND alike."'X,V:"Here are some examples:"::"1. I have a BLUE (a color) coat.press ."VN200gVNR$:"There are "NQ" questions, but you may"::"stop whenever you want."VN:"Count the shapes to find out your "::"score."VN11:"This means correct:"VN3:1150,80VU200WV3:"Do you want to see the example(37)85:P4P321U4N(12);(UHNE$;CURNCC((1)9):(3);CC;JU\N4dUfN20(2(IS$))2:IS$UpNP1,P3P2,P3P2,P4P1,P4P1,P3UzN9UNT$VN"Read each sentence. Choose the "::"correct word to fit in the blank."::"Type its letter, then "";XT`>X1X1015960#Tb>NQ102T>X915570BT>X1017000LTt@5000ThB(12):5:"Insert new disk and press .";T|BG$:G$(13)17020TBTBD$;"PR#6"TBT N4:3U*NIS$"INSTRUCTIONS":P1140((IS$)9):P2140((IS$)7.5):P3YN$S@=YN$"N"15605ST=,S=(12):R$RS="Which exercise do you want?":5]S=X18dS=4xS=X;". "LINE$(X)S>XS0>4:"9. ANOTHER STUDENT":3:"10. QUIT"SX>22:O$:R$T]>23:"Type the NUMBER of your choice,":"then press .";:168,72.R=7:13:"";FIRST$:FIRST$""15630JR=FIRST$"TEACHER"30000oR=9:13:"";LAST$:LAST$""15640R"=N$LAST$"."FIRST$R,=11:"Is this correct? ";:150:FIRST$;" ";LAST$;:255:" "R1=120,88250,88S6=13:"Type Y or N .";:"::"ALIKE, but have"::"different meanings."8Q<200MQ<(18):(12):2lQ<"Hi! What is your name?"wQ<6:O$Q<7:1:"First name:";:" "Q=9:1:"Last name:";:" "R =79,57168,57:79,72783,128:S0P($ "" &"""  "" ****$$$$"""$$0&< ,""""**"""$>>   *U"":*:<"">""$$$$$$$$$$$>$ $>>$ "2"<""">"""8 "  "$>"6*""""""&*2"""""""$$"""*,"" "" ">*"""""""""""""**"""""">"">>> >00000>* i @0 66$>>< (&20 *,  **> > "2*&" " >>  ">> "8""> """"""<  >>  8  @@""0*U*U*U* ( p   @(U*U*U*U*U*U*U*U*U*U*U*U*U*U*U ~ Bժժժ(բŪتPX   A@ H!(PՂ֬цԩP֪Ѧʕ D""HD0 |}y~`p@(U*U*U*U*U*U*U*U*U*U*U*U*U*U*U pG@`  @   *U*U*U*( @ ppayp(  `A `~ժժժ(CC?|x?p?` 8 A~G HB(֬ъԩP֯Ѧʕ @DaT*U*U*U  B (U*U*U*U*U*U*U*U*U*U*U*U*U*U*U @@!  << *U*U*U*( !@( `p8      8p`@`pp@@@@@@@@pppx @`p8 ||||@@ xp@`p8 |||| || xp@`p8 ||  xp||@`p000@`p8 8p`@@@@@@@L\xppx\L@@@@@@||@@@@`pp`@`p0||`pp`@`p8 Ƀpppppppppppp>>>><<88` ` ` |?|?00~~px\\xp@@||``<f0f8<@`p8330xLLL|xxlL xp`pp`@`p0 W         O ң/  M $' 1$L11 $$ ɍ` )?~?7 , AY M 3 o 2+I`*)hQL$h 1L$h)L$h*`ɇ :I :`,0`  I`UU**ժU**U4+;߂ +|[?,$ +|B\|#B\9 Σ8 0h`H 0Iȱ 0I _ 0h `+i,^!*i,4*iPII*&if*+`, P\H_p , PPH` Bh $ 0IPH*&& h*H&& h& f$)% Ș)% L$, J , 0IH)hl )M H4+))`,1ɰ(ɸ$)_ B``ɠhɃ`ə`ɚ`ɂ`ɀ`ɐ`ɑ `ɗ@ `Ʌ `ɒ `ɔL `H, P $$!$  , %%#%% y $h( k HH _ 0h,  k  $( ɛɍ `HH 3, P Ș! 3$hh` k,  %%#%*I* 0`H, ,0 h`(*)) &+`H,@ &,P,R,Wh,  N H%2 hH)*** **m(L(mhH h '`,ɰ Ʌ+hi#2H $)) &)!(*e))e++8) )L Lp"H $)) &+(*hi#H j j L *(+) 0!*(`$ H))? @(hN    Vɖ ILɓ%Ɂ)ɍ*ɘ&,  ɕ( ` (LN N ` `(5 $, P$$!#$%, i#V%i#%M%L" `"%$Iiii=ߤ$%H " %%, %%#h%LB y ,fH <hLp $,  %%#%  kH %+I`*L )*! 0h`"H $)) &)(*)#`LkL Li ލR,0 LF J̩@K @& &  < 2 y6789L8L< | $(  ΰɐ$, P$$~!$$P$"%n%, %%L"ɍ7Ɋ7ɈɌOɎfɆ>ɉɋɏZ $ H h .#` L}%J u H h d #` L Q ; #` Q #`#2 '( H() 1 eȱm)h`JJ`#JȱJLh `#  <(eΨ =)eϰ%Hh>?iJK̅  1& ')*& "'JJ) ""% m% ʥ0)J!m%! `JJJJS) PI ȄR%*QTU'T8ePT UeRU QJJJ`JJJJS) PI ȄR%*QTU'T8ePT UeRU QJJJ`00', "&,i8i#H&ii&hif&i'`'i, &i,. &iPII&&if&H !"hH8 H!S hIiHSQUhPTh !"IiR"fS8PQ% 8TeRTUU&E%0Q&&kS TePTUeQPفŴxaIL &WSP& )`" !H)&JJ&&h' &' &' f&') &'#i%0J$)` .Q&%0Q&&`$0JI0`'0% I`0 I0ܩ(ߠQ)'%01&*%0Q)&E%0*Q&&QeS)j     G$):G1G410085%Lj'G1G4100700Lo'(12)NLt'G2000,10600,12000,11000mLh) DELETE ALL STUDENT FILESL)"THIS WILL WIPE OUT ALL STUDENT FILES ON"::"THIS DISK."L):"PROCEED? (Y/N) ";:YN$L)YN$"Y"10000L)L)D$;"DELETE SFILE"M(12):R$:63Ya"Are you sure you want to QUIT?"YYa:"Y = YES, I want to QUIT now."~Ya:"N = NO, I want to CONTINUE."Y b:"Type Y or N :";Y bYN$:YN$"Y"ĺ(12):Y4b:8000Y0uYDuD$;"PR#0"YXuD$;"IN#0"Zbu::10:"PLEASE WAIT....ӮÍͮǍٮٍή̍ǍϮ͍ "::"1. The storm BLEW (strong wind)."vX6V:"2. Have you seen the MAIL (letters)"::"2. Is your dog a MALE (boy)?"X@V:"Try to figure out the correct meaning"::"of the word by thinking about the"::"sentence in which it is used."XTV Ya34,4:Ӎ  (@ԀX؊pئӪXئ8 T*U*U*U !( | (  x!$AG!B(ԪՊXPXخ @@ `  D @@@B@ ժժժ @&D dA   "~ |~~``p~~x(`ց؊تضժئǺ T*U*U*U x?(  (   ba#HBA(ֱ`x{@P՚`x{|? @@ F  D 0!B@ (U*U*U*U*U*U*U*U*U*U*U*U*U*U*U &D0"dA !<$~ BA# B(`ց֬цԮPրPʕ T*U*U*U (  (  $BB !  (ֱPؚ @`?`*U*U*U*D1 @D ?BApp9x(U*U*U*U*U*U*U*U*U*U*U*U*U*U*U ~p@NY1Xhp p ""(@ Ba|'D`B(PՂ֬цԩPQʕ  (  (U*U*U*U*U*U*U*U*U*U*U*U*U*U*U  `oqgC~~?pps(բŪت @*U*U*U*D"dO`#H               `(--U9????1.----% ??GCCCCCLR ?`-??v-$ - ;NIA?ō΍ƍ΍Ǎ΍ȍ΍ōԠȍ΍ȍ΍ɍύɍύɍύS0:R0K'D$(4)K':34,0-K$'(12):3IK.'12:"File Maintenance"OK8'hK=':"1. Check scores"KB':"2. Delete student file"KQ':"3. View/print a word list"KV':"4. Return to student program"K`'20:"Enter your choice--->";Le'G$:G(;:36,28:"Score";:36,36:"%":"_______________________________________"OJ[JX1NSJ(LAST$(X),12);", ";(FIRST$(X),9);:36,24:(FL$(X),1);:36,TA(X):T(X)"/"N(X);:36,TB(X):P(X)JXJJD$;"PR#0"JD$;"IN#0"J(3075K<N0:N I34,0IYN$%IYN$"Y"45906IN0:NS0:R0AI10000OI(12):3rI"Please turn on the printer."I:"Roll the paper past the perforation."I 100IID$;"PR#1"I20((DISK$)2)IDISK$:IJ"Name";:36,18:"Exercise"),12);", ";(FIRST$(X),9);24)(FL$(X),1);TA(X))T(X)"/"N(X);TB(X))P(X)RHNN1eHN18İ100:N0lHrXHt:"You have "R1" scores on this disk."HvR90ĺ"IT IS ABOUT TIME TO DELETE THE FILE!"H|100H:I"Do you want a printout? (Y/N)";D$;"CLOSE SFILE"Gf216,0-GpR10100003GHGDISK$"HOMONYMS"NG :YG(12)nG20((DISK$)2){GDISK$:G"Name";18)"Exercise";28)"Score";36)"%":"---------------------------------------"GG34,4GX1NSHH(LAST$(X file is read."$FD$;"OPEN SFILE"9F D$;"READ SFILE"CF*RR1vF4FL$(R):LAST$(R):FIRST$(R):T(R):N(R):P(R)F>T(R)9TA(R)27F@T(R)10TA(R)28FAP(R)100TB(R)34FBP(R)100TB(R)35FDP(R)10TB(R)36FMNSNS1FR2090G\ Each program disk can hold 100 names"::"and scores. When you approach this"::"limit, you will have to delete the file"::"from the program disk, and start over."E200E10000E(12)E3E2140E(12)F "Please wait while the(12)RDt"This program reads the files created"::"by the Word Mentor programs."D:" The names and scores for each disk"::"will be displayed on the screen. If a"::"printer is attached, the information"::"can also be printed out."E:" cro Soft":F$"All Rights Reserved"AC:20((A$)2):A$:::IC13aC20((B$)2):B$:yC$20((C$)2):C$:C.20((E$)2):E$:C820((F$)2):F$:CB1:Z140:"#";:Z:Z222:Z:"#";:40:"#";:Z:Z140:"#";:ZC`200Dj7:"Press to continue.";9BnG$:G$(13)110KBs(37):(15)QBx|B23:7:"Press to continue.";BG$:G$(13)110B(12):3:B:B(12):8#CA$"The Manager":B$"Copyright (C) 1985":C$"by":E$"Criterion MiNS(100),R(100),J(100),FL$(100)1ATA(75),TB(75)=A(D$(4)A2 "HOM.A","EXERCISE A","HOM.B","EXERCISE B","HOM.C","EXERCISE C","HOM.D","EXERCISE D","HOM.E","EXERCISE E","HOM.F","EXERCISE F","HOM.G","EXERCISE G", "HOM.H","EXERCISE H"AZ1000"Bd24:@ COPYRIGHT 1985 BY5@ CRITERION MICRO SOFTQ@ ALL RIGHTS RESERVEDn@ SCORE READER UTILITY@ MODIFIED 2/22/85@ HOMONYMS@ 3072@Q$(30),W1$(30),W2$(30),CL$(30),CW$(30)ALAST$(100),FIRST$(100),N(100),T(100),P(100),       z#??    Ҡɮ͠!ԮΠԮϠ Š Š ͮĠͮŠͮƠͮǠͮȠ!Ӯ͠"ͺ۰ݠƠȮàϠͮͮ ͮà* `An~pA7p8p"(*@ `G (*AH@PB  D8D<(* `Ac@p`qG~q"(*@ `Gs8NsNcqg9 (*(**U*U*U*U*U*U*U*U*U*U*U*(*@ U*U*U*U*U*U*U*U*U*U*U*(* @p(* "(*@ ` (*(*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U**(*@(*(*@(*(*"D((*@ ` (*(**U*U*U*U*U*U*U*U*U*U*U*(*@(*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U**"`App{@D((*@ `G (*:FGNaq@PB0xt88<(*"`cs8`qp`9GCGsD((*@ `Gs8NsNc9g9 (*ժ(*(*@(*@C#$` a <G(*"D((*@ ` (*(ժժժժժժժժժժժժժժժժժժ*(*@(*(*@(*(* "(*@ ` (*(* "D"D"D"D"D"(*@(*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U** `Appq@"(*@ `G (*"@0CDH(* `ws8`qp`yGCGs"(*@ `Gs8NsNc9g9p (*P*(*(*@(* $dC'@p DH(* Q*U*U*U*U*U*U*U*U*U*"(*@ ` (*(*(*@(*(*@*U*U*U*U*U*U*U*U*U*U*U*U*U(*(*"D((*@ ` (*(*"D"D"D"D"D"D((*@ U*U*U*U*U*U*U*U*U*U*U*(*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U**"`App`@D((*@ `G (*@B 80(*"`s8`qp`yGCGsD((*@ `Gs8NsNc9g9| (*@*U(*(*@(* $$$@ H(*"D"D"D"D"D"D((*@ ` (*(*(*@(*(*(*(* "(*@ `x (*(* "D"D"D"D"D"(*@ (*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U**"T*U*U*U*U*U*U*U*U*U*E((*@ (*(*(*@(ժժժժժժժժժժժժժժժժժժ*"`Ac~Cpnqq~qD((*@ `Gn `A8wp (*AO@B D@D(*"`~p`AG8pD((*@ `GcNsxGcAg9| (*(*"D"D"D"D"D"D((*@ (*(*"D((*@ ` (*P*(*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U**(*@*U*U*U*U*U*U*U*U*U*U*U*U*U(*(*@(*@@ G(* "(*@ (*(*(*@(*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*tting the words.....":-N0/D$;"OPEN "FL$(X)CND/D$;"READ "FL$(X)ONX/13000[Nb/J110Nl/Q$(J):W1$(J):W2$(J):CL$(J):CW$(J)N/JN2D$;"CLOSE "FL$(X):216,0:(12)N2"Homonyms - "LINE$(X):N2J110:H4N2J9H5!O2J;". "Q$(J):H)10000M*(12):106M+"Getting the program....."OM +D$;"RUN HOMONYMS.M"UM +[M\+M.(12):3:X18:FL$(X):LINE$(X):X". "LINE$(X)::XM.:"Type a number and press -->";M/"";X:X1X8Ģ(37):36,36:12040N/(12):2:"GeU*U* .""""< <"""<">$ "" &"""  "" ****$$$$"""$$0&< ,""""**"""$>>   *U*U*":*:<"">""$$$$$$$$$$$>$ $>>$ "2"<""">"""8 "  "$>"6*""""""&*2"""""""$$"""*,"" "" ">*"""""""""""""**"""""">"">>> >00000>* @0 66$>>< (&20 *,  > > "2*&" " >>  ">> "8""> """"""<  >> "LKxHHD+(DA/(Dq'  I)(H  p闠 y) 񗰐 z$ r0θ4KHH0t# p y0p 9G @0ɩL[hHHϸȸI^hHHoTDD>>><<88` ` ` |?|?00~~px\\xp@@||``<f0f8<@`p8330xLLL|xxlL xp`pp`@`p0     :(W1$(J),14);20)(W2$(J),12):EO2LINELINE1:LINE4İ200:LINE0LO2JWO2LINE0O2:"Do you want a printout? (Y/N)";:YN$:O2YN$"Y"10000O3:"Make sure your printer is on and the"::"paper is set. Then press any key.";:G$O 3 P3ͮͮÍͮÍčͮčōͮōƍͮƍǍͮǍȍͮȍ `p8      8p`@`pp@@@@@@@@pppx @`p8 ||||@@ xp@`p8 |||| || xp@`p8 ||  xp||@`p000@`p8 8p`@@@@@@@L\xppx\L@@@@@@||@@@@`pp`@`p0||`pp`@`p8 Ƀpppppppppppp>>>><<88` ` ` |?|?00~~px\\xp@@||``<f0f8<@`p8330xLLL|xxlL xp`pp`@`p0 W         O ң/  M $' 1$L11 $$ ɍ` )?~?7 , AY M 3 o 2+I`*)hQL$h 1L$h)L$h*`ɇ :I :`,0`  I`UU**ժU**U4+;߂ +|[?,$ +|B\|#B\9 Σ8 0h`H 0Iȱ 0I _ 0h `+i,^!*i,4*iPII*&if*+`, P\H_p , PPH` Bh $ 0IPH*&& h*H&& h& f$)% Ș)% L$, J , 0IH)hl )M H4+))`,1ɰ(ɸ$)_ B``ɠhɃ`ə`ɚ`ɂ`ɀ`ɐ`ɑ `ɗ@ `Ʌ `ɒ `ɔL `H, P $$!$  , %%#%% y $h( k HH _ 0h,  k  $( ɛɍ `HH 3, P Ș! 3$hh` k,  %%#%*I* 0`H, ,0 h`(*)) &+`H,0 @ &,P,R,Wh,  N H%2 hH)*** **m(L(mhH h '`,ɰ Ʌ+hi#2H $)) &)!(*e))e++8) )L Lp"H $)) &+(*hi#H j j L *(+) 0!*(`$ H))? @(hN    Vɖ ILɓ%Ɂ)ɍ*ɘ&,  ɕ( ` (LN N ` `(5 $, P$$!#$%, i#V%i#%M%L" `"%$Iiii=ߤ$%H " %%, %%#h%LB y ,fH <hLp $,  %%#%  kH %+I`*L )*! 0h`"H $)) &)(*)#`LkL Li ލR,0 ,J̩@K @& &  < 2 y6789L8L< | $(  ΰɐ$, P$$~!$$P$"%n%, %%L"ɍ7Ɋ7ɈɌOɎfɆ>ɉɋɏZ $ H h .#` L}%J u H h d #` L Q ; #` Q #`#2 '( H() 1 eȱm)h`JJ`#JȱJLh `#  <(eΨ =)eϰ%Hh>?iJK̅  1& ')*& "'JJ) ""% m% ʥ0)J!m%! `JJJJS) PI ȄR%*QTU'T8ePT UeRU QJJJ`JJJJS) PI ȄR%*QTU'T8ePT UeRU QJJJ`00', "&,i8i#H&ii&hif&i'`'i, &i,. &iPII&&if&H !"hH8 H!S hIiHSQUhPTh !"IiR"fS8PQ% 8TeRTUU&E%0Q&&kS TePTUeQPفŴxaIL &WSP& )`" !H)&JJ&&h' &' &' f&') &'#i%0J$)` .Q&%0Q&&`$0JI0`'0% I`0 I0ܩ(ߠQ)'%01&*%0Q)&E%0*Q&&QeS)j.."ZluD$;"RUN MGR" MGR"DD$;"PR#1"'P3"Homonyms - "LINE$(X):7P"3J110:H4DP'3J9H5P@3J;". ";Q$(J):36,H:(W1$(J),14);:36,18:(W2$(J),14)::JPT3P^3D$;"PR#0"Ph3D$;"IN#0":3075:10000B4A(637)223250WA"Please make sure the CAPS LOCK key is"::"pressed DOWN."_A10xA"PLEASE WAIT......"A,(4);"RUN "T$2T$2 is"::"pressed DOWN." 10 "PLEASE WAIT......" ,(4);"RUN "T$22@T$"HOMONYMS.M"3@ A16297: SW TO HI RESM@ B16300: SW TO P1n@C16302: TEXT TO GRAPHICS{@D16304@E230@F32: TURN ON P1@<@n(4);"BLOAD PI.HOM,A$2000"@xA,0:B,0:C,0:D,0:E,F@X14000:X@A::  쮮뮍𮮮䮍宮쮮ɠᮮ宍ﮮ쮍쮮宍宮ﮮ쮍宮󮮮宮⮮󮮮宮宮宍󮮮뮮宍   ȍٮ؍ҍ؍宮箍󮮮宍宮讍宍𮮮宠򠠠ﮍᮮ䮮䮍 쮮䮮ᮮ䮮宮򮮮䮍宮宮䮍宮󮮮议뮍쮮   宮宍ᮮ宮宮쮮쮮쮮宍宮䮮䮍宮宠򠠠ᮮ讍쮮򮮮򮮮宮宮󮮮    宮⮍宮宮宍䮮箍ɍɍ󮮮宮讍󮮮宮ﮮ宮䮮䮍宮ﮍ󮮮ɠ𮮮쮍宮宍䮮宮殍   Íҍ؍ȍӍō뮍宮宮䮍ɠᮮ忍堍󮮮宍䮮宮젠򮮮宮㮍宮ɠ箮쮮ɠ򮮮殮宮     " 䮮ᮮᮍ󮮮ᮮ宮宍ᮮɮ宮宮宮宮宮ᮮɠ   čō΍ˍˍˍˍōٍōύύ͍ʍЍ΍Ѝ΍ÍЍ΍宮䮍󮮮䮍쮮䮠쮮殮ﮮᮮ宮宮뮍򮮮堍򮮮쮮宍ᮮ宮ᮮﮮ宮   Ѝ΍ōЍ΍ƍЍ΍ɵ٠Ȯˍɵ٠ȮˍÍɵ٠Ȯˍčɵ٠Ȯˍōɵ٠Ȯˍƍɵ٠ȮˍӍҍᮮ宮宍宮򮮮宍蠠宍宮󮮮宮宮宮宮宍宮䮍宮뮍ᮮ殮ᮮ뮍箮忍宮䮮    (TL$))2:"HOMONYMS"N<3?N.":::gL0(12)L0:"Please insert the disk you want to run."::"Then press . ";L0Y$:Y$(13)12520L0L1(4);"RUN HELLO"L$1L:: M:D$;"OK/YN$:YN$"Y"ĺ(12):15700)K/(12)uK/:"Does someone else want to do an"::"exercise on this disk? (Y/N)";K/YN$:YN$"Y"15500K/(12)K 0:"Do you or someone else want to do an"::"exercise on ANOTHER DISK? (Y/N) ";L 0YN$:YN$"Y"re are the ones you missed:""J/JM1I2HJM$(M);:14:M$(M1)OJMWJ N0`J PX0iJ 200J& 3:"Please wait."Jb/N0:T0:P0:H0:I0:NQ0:J0:FX$"":DT1:F$"":NW0Jg/A(0)Ji/(12):3Jl/"Do you want another exercise? (Y/N) ";10 I600I100I200$IX*I;I@34,0:(12)eIJP(TN)100:P(P102.5)(102.5)mITR$sIcIhFIRST$", you scored "T" out of "NIjIm"You missed ";NT"."IoIr"You scored "P;"%."IwN0I|I010000IJ"He00:HHAN$CL$(J)İ300:!HR'H2H(12)9H6DH20000YHD$;"OPEN "F$(X)nHD$;"READ "F$(X)zHJ110H Q$(J):W1$(J):W2$(J):CL$(J):CW$(J)H6000HxJHpD$;"CLOSE "F$(X)H216,0H200H(12)H34,2IX1;". "Q$(J):G(3);CC%G12:W$EG"A. "W1$(J)::"B. "W2$(J)OG34,6ZG14:3zG(18): REGULAR SMALL FONTG 2G 20:"Type a letter, then press .";G"";AN$G (AN$)1779G*AN$(65)AN$(66)779H>AN$CL$(J)İ5 (FvR$;FJ(10(1))1HFL0690SFG1LcFK(G)J640jFGtFLL1FK(L)JF6FH22F"Which is the correct word?":FB4:N9B5FT$FCCCC1:CC9CC0: CHARACTER COLOR GN1e, ";FIRST$;"!":"E"Super!!":CE"Nice going, ";FIRST$;".":SER$:18:O$\ELB0yE"You chose: <";AN$;">."E"The correct answer is: <";CL$(J);">"EII1E&M$(I)CW$(J)E0EX: Fb ANSWER DISPLAY & INPUT is correct.":D^"You are right with <";CL$(J);">.":Dh"<";CL$(J);"> is right.":Dr"<";CL$(J);"> is correct.":D|"<";CL$(J);"> is o.k.":E"Right you arR$:23C3:0,175279,175:C24:" for more";GCN5250fC", to STOP.";oCRE$|CN5280CRE$(32)25000CRE$(13)250C"(12):C'R$C,18:O$C1LB1C6"You chose: <";AN$;">."D@PT$"T"TT1::W$(23):R$(18) BF1023,123-BH783,128RBK15000: NAME/DATE/INSTRUCTIONShBPD$;"NOMON C,I,O"sBZ15000yBdBnNN1Bp1BsLB1PXPX13Bx0,20278,20Bz3B}LB1āO260PX5:1O,11:1O,11:OBLB1Ĕ1PX3,11BC72$A/(4);"BLOAD ST.ALIEN, A5120"=A0232,0:233,20:1:0A2Q$(60),J(60),CL$(60),K(60),I(60),G(60),M$(60),H(60),C1$(50),C2$(50),C3$(50),Y1$(20),Y2$(20),Y3$(20),F$(20)A7D$(4):O$(15)A< INIT VARIABLESBAE$(5):T$(20):BF$(25):DB$(26)@ COPYRIGHT (C) 1984:@ BY CRITERION MICRO SOFTT@ ALL RIGHTS RESERVEDZ@ y@ LAST UPDATE 9/06/84@(1023)12345@::@12:11::"HOMONYMS LOADING"@@#(4);"BRUN LOMEM:":16384@((4);"BRUN H"A-:::30ӍҍÍӍҍōӍҍŠȍӍōŠȍӍȍŠȍӍǍŠȍӍčŠȍӍ΍*)NS*"Here are the ones you missed:":6NX*M1I2RNb*M$(M);:14:M$(M1):MiNl*M1I:M$(M)"":MqN*:Np+D$;"PR#0"Nz+D$;"IN#0"N+3075N.(12):10:"Please wait......"ND/: Ob/N0:T0:P0:H0:I0:NQ0:J0:FX$"":DT1:F$"":NW0:PX0"Type your answer here -->";:YN$5M)YN$"Y"12000;M)M):"Make sure the printer is on."::"Then press any key.";:G$M)M)D$"PR#1"M):FIRST$;" "LAST$" - HOMONYMS ";(F$(X),1):M)"Score = "T" out of "N", or "P"%."M)I010900NNTE SFILE"1L'(F$(X),1):LAST$:FIRST$:T:N:PBL(D$;"CLOSE "NL)200:3qLh)"Do you want a printed copy?"L|):"You must have a printer attached."L):"Y = Yes, I want a printed copy now."L):"N = No, I do not want a printed copy."!M):etter."=KP59P70ĺ"Not bad, but you need to do better."cKP69P90ĺ"You did a good job."KP89ĺ"Not perfect, but very, very good!!"K':K8'N$LAST$"."FIRST$K`'D$;"OPEN SFILE"Kt'D$;"CLOSE SFILE"K'D$;"APPEND SFILE" L'D$;"WRI, you scored "T" out of "N:8Jm"You missed ";NT".":SJr"You scored "P;"%.":J|I0ĺ:"You had a perfect score!!!":10000J"Here are the ones you missed:":JM1I2JM$(M);:14:M$(M1)JM:KP60ĺ"You will have to do much b%I(12):"Word list - "LINE$(X):VIWL1102:CW$(WL);14)CW$(WL1)::WL:200aIp(12)kI34,2wIY110IS1:600:100:200:YI@34,0:(12):S0IJP(TN)100:P(P102.5)(102.5)ITR$:"EXERCISE - "(F$(X),1):JhFIRST$"AN$CL$(J)İ300:HR-H(12):6:20000BHD$;"OPEN "F$(X)WHD$;"READ "F$(X)cHJ110H Q$(J):W1$(J):W2$(J):CL$(J):CW$(J)H5300HxJID$;"CLOSE "F$(X):216,0:(12):"Do you want to see the words? (Y/N)";:YN$:YN$"Y"6000". "Q$(J): G(3);CC:12:W$@G"A. "W1$(J)::"B. "W2$(J)QG34,6:14:3qG(18): REGULAR SMALL FONTxG 2G 20:"Type a letter, then press .";G"";AN$G (AN$)1779G*AN$(65)AN$(66)779G>AN$CL$(J)İ500:HH .FvR$AFJ(10(1))1NFL0690YFG1LiFK(G)J640pFGzFLL1FK(L)JF6:H22F"Which is the correct word?":FB4:N9B5FT$:CCCC1:CC9CC0: CHARACTER COLOR GN1;"Outstanding, "FIRST$".":NER0:"That's right "FIRST$", good for you!":^ER$:18:O$gELB0E"You chose: <";AN$;">."E"The correct answer is: <";CL$(J);">"EII1E&M$(I)CW$(J)E0&FX ANSWER DISPLAY & INPUT <";CL$(J);"> is correct.":9D|"<";CL$(J);"> is o.k.":]D"Right you are, ";FIRST$;"!":nD"Super!!":D"Nice going, ";FIRST$;".":D"You are doing a super job, ";FIRST$".":D"Fantastic!":D"You are really moving, "FIRST$".":E3)250C"(12):$C,18:O$:LB1AC6"You chose: <";AN$;">."CJTT1:RR1:R340,350,360,370,380,390,400,410,420,430,440,445,450CT"Yes, <";CL$(J);"> is correct.":C^"You are right with <";CL$(J);">.":Ch"<";CL$(J);"> is right.":Dr"1:1:LB1PXPX13(Bx0,20278,20:3RB}LB1āO260PX5:1O,11:1O,11:OgBLB1Ĕ1PX3,11mBBR$:23:1:0,175278,175:24:" for more";BS0250B", to STOP.";BRE$BS0280BRE$"S"25000CRE$(1ALIEN, A5120"&A0232,0:233,20:1:0pA2Q$(25),J(25),CL$(25),K(25),I(25),G(25),M$(25),H(25),F$(20),LINE$(20)}A4WL$(20)A7D$(4):O$(15)AAE$(5):T$(20):BF$(25):DB$(26):W$(23):R$(18)AF1023,123APD$;"NOMON C,I,O":15000BdNN@ COPYRIGHT (C) 19849@ BY CRITERION MICRO SOFTS@ ALL RIGHTS RESERVEDt@ LAST UPDATE 2/22/85@(12)@::10:"PLEASE WAIT......"@(1023)12345@#(4);"BRUN LOMEM:":16384@((4);"BRUN H.IIC" A-(4);"BLOAD ST.!! ! ! ! ! !!!!!!!!!      ΍΍΍Í΍΍č΍΍ō΍΍ƍ΍΍ҍ̍΍΍Í΍č΍0L@` g RgƖ8PgPQhQghe Ӣi  g y  gh^_8^eP^ȱ^ eQ^^_Ll8ePeQ`L"