' +JJJJ ?\>m0M='+l> /+l   d]@ŵLҦ]]LF L}BBL] X  ` 鷎귭෍ᷩ췩緈JJJJxL Lȿ L`lJJJJJ IL `L巬 췌`x (`(8`I`B` ``>J>J>VU)?`8'x0|&Hh VY)'&Y)xꪽ)' `Hh`V0^*^*>&` aI꽌ɪVɭ&Y&&Y& 꽌ɪ\8`&&꽌ɪɖ'*&%&,E'зЮ꽌ɪФ`+*xS&x'8*3Ixix&& 8  '  & x)*++`FG8`0($ p,&"`K ߼ 켩)```K ߼ 켩)`ij  !"#$%&'()*+,-./0123456789:;<=>?ֽ0LL𻽌׍ɪLFFB 췍@귎鷎lθҸ! 绠Ul\k 续k 续kUl\/8BθҸ!LLT L X -L[`TULIP:HH9 8L80^݌Hh ü ü݌ ռ ռ ռA ļD ļ? ļAEDE?HJ>h Լ ռ ռ ռ`HJ>݌h Hh݌`5`?`ȠHIHHHHhHH݌hHhHh݌H6 VDP (ED Z $0x8x D- ܸDD# H8`?E Vk *f???0xE Hh D#-EEE8` D ܸx D - ܸx8`-0ݩ?ʥD EEE`   LDcpq` [` ~  Lֽ0LL𻽌׍ɪLFFB 췍@귎鷎lθҸ! 绠Ul\k 续k 续kUl\/8BθҸ!LLT L X -L[`Ӝu`".Q`pNФbptťܥm2<(-Py0\|e<6e<g< JJJJj귍hI  aUL@ kU8  L  Q^R(jQ0l^l\  wUuW ԧ H h@ [_ /Q֩b_L`L[LLL`ª`LQLY[LXLeLee ў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 ``` 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õ`  \ 濭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`SAV RU DELET CLOSREA WRIT OPE PRIN BLOA VERIFp!pp 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 B / / ]ƴS0Jȴ ȴ)  紅D贅E B ƴ  / 0L Ν `HD٤DEEhiHLGh ` ŵBѵ-` ѵB-` ܫ XI볩쳢8 DH E𳈈췍Ȍ X0L 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䵍䵩m嵍`"L ŵ8ŵH ~(` d ֠z#?Ϡ\\zz]]`NR%(F%):BR%1:AA(0):5:8:CS$;"JUST A MOMENT, PLEASE.":22000:30:NBR%ER%:90u50:CV5:25:N::SF%0:7865LSF%7610)VSL%1:SF%1:30:5:1:CS$"USUALLY THE PRINTER CONNECTOR CABLE IS":7:"IN SLOT 1 INSIDE THE COMPUTER. "CS$;"IF":9:"YO3:CV18:200:A(W$):A7100,7500,800aSF%1:SL%0:AA(0):CV5:25:EF%DR%EF%0:DR%0:7110k1000NR%(F%)0Ģ7:5:QO$;CS$;FL$(F%);QO$::"DOES NOT HAVE ANY RECORDS IN IT."::CS$"PLEASE CHOOSE ANOTHER FILE.":TI1:50:CP$:7101TTI0:ER%"ANOTHER FILE?":300:WC1CV2:25:60003800XTI1:T$(0)" SEE A FILE ":30:6:1:CS$;"WOULD YOU LIKE TO:":9:5:"1. "CS$"SEE A FILE ON THE SCREEN":11:5:"2. "CS$"PRINT A FILE ON THE PRINTER":13:5:"3. "CS$T$(10)%gCV19:60:LN%1:NE%RRECT?":300:WC2ī6320?FC%CV19:25:BR%N:ER%N:23000NR%(F%)1İ30:10:1:CS$"DO YOU WANT TO EDIT ANOTHER RECORD IN"::"THIS FILE?":300:CV23:25:WC1RENR%(F%):CV9:25:6250*30:10:1:CS$"DO YOU WANT TO EDIT SOME RECORDS IN"::YOU EDIT (1-"NR%(F%)")?"? oCV20:60:RENR%(F%):NE%RE:LN%1P tNE%9LN%3b y200:RB(W$) RERB:BR%RB:ER%RB:CP$:22000 NRB:30:90:CH20:32:13:1:CS$"CHANGES:" CV15:CH3:100:FC%C$(N)W$90:21:1:CS$"IS THIS RECORD COS ";' Q"IN IT.":23:NR%(F%)06240 V2:CS$"DO YOU WANT TO ADD SOME RECORDS NOW?":300:WC1EF%0:RE0:RB0:NRB1:AF%1:T$(0)" ADD TO AN EXISTING FILE ":5100 X800 `NR%(F%)1RENR%(F%):RBNR%(F%):6300 j11:2:CS$"WHICH RECORD WILL :X9@ " IN THE FILE NAMED":N1((NR%(F%))):XN:"-";::| ::HF(A)1:CI$SP$CS$FL$(F%)SP$CN$;::".":50:6050 8TI0:30:8:2:CS$"THIS FILE HAS ";:NR%(F%)1ĺ"ONE RECORD ";:6225 GNR%(F%)0ĺ"NO RECORDS ";:6225 LNR%(F%)" RECORD AN EXISTING FILE ":5100" z800k CV5:25:6:1:CS$"WOULD YOU LIKE TO":CV8:CH3:34000:LN%1:40000 (W$)7000,6200,6100,800 30:CV8:25:CV:1:NR%(F%)1ĺCS$"THERE ARE "NR%(F%)" RECORDS";:X10:6120 CS$"THERE IS "NR%(F%)" RECORD";:C%0:CV:CHjCS$;DlMM1:KS,0:M$:LN(M$):MIICL1İ156^nLN8MM1:138:108spLN27C%1:150qM1(LN32LN33LN39LN45LN63)ī104rCF%MIICL((LN31LN47)(LN47LN91))130sCF%MIICL(LN32LN33LN39LN4(W$,JJ,1)(19)W$(W$,JJ1)(W$,JJ1,KK):KKKK1I cW$(W$,KK):: d24:8:EF%ĺCS$"PRESS "CK$"RETURN "CL$;"WHEN FINISHED."; fEF%Ģ23:4:CS$"JUST PRESS "CK$"RETURN "CL$;"TO LEAVE AS IS."; hCV:CH:CE$;:M0:M$"":W$"":IIWL%:CL0:FC%0J0:25: 9I :JJJJ:51z <CV1:5:"("QO$CS$"M"QO$" FOR "CS$"MENU)":CV:1:CS$"TYPE A NUMBER ";:27:N9LN%3 = ZCV5:25:5:1:CS$"RECORD #";N: [SL%W$C$(N):98:C$(N)W$:3:CS$C$(N): \:3:CS$C$(N):5 bKK(W$):JJ1KK:N TO MENU":) 2255:24:KS,0:JJ0:ZZ0U 3CV23:25:L500JJ200:24:8:JJĺCI$; 4CK$" SPACE BAR ";:CN$;:SP$;"("QO$CS$"M"QO$" FOR "CS$"MENU)";:I1L:ZZ(KP)128:ZZ32IL 6ZZ77IL:KS,0:JJ0::800 7ZZ81ġ:14000 8ZZ32ĹKS,0:J:TIDR%ı5 3:1:CS$"FILE: ";::" "CS$FL$(F%): 20:4:CI$"/"CN$;:" TO ERASE WORD";:23:CI$CK$"ESC"CN$;:CS$" TO CAPITALIZE":6:CI$CK$"CTRL"CN$"-"CI$CS$"E"CN$;:" TO ERASE ENTIRE LINE" !8:CI$CK$"CTRL"CN$;:"-";:CI$CS$"Q"CN$;:" TO RETUREW YORK. ALL RIGHTS RESERVED.( 30000@ :X(49234):62450L 50000U 800m 255:ZZ12000:: 255:ZZ11000:: 255:ZZ130:: CV:1:CF$: CV:CH:CE$: CH(36):CV(37): CP$:1:HT(A)::CI$CK$T$(0)CN$:  FPHH`$2064/60000A "UTIL-LO" LOWER HALF OF TEACHERS' UTILITY PROGRAM FOR "WORD ROULETTE," ONE OF THE WORD ALERT! COLLECTION; THE REGENTS/ALA COMPANY.  COPYRIGHT 1984 BY THE REGENTS/ALA COMPANY, NEW YORK, N            :9080& n#NF%NR%(0):NNR%(0)9078d s#FL$(N)FL$(N1):NR%(N)NR%(N1):ER%N:BR%N:XX0:21000: v#NR%(0)NR%(0)1:XX0:BR%0:ER%0:21000!x#30:5:8:CS$;"WOULD YOU LIKE TO DELETE"::5:"ANOTHER FILE OR "::5:"RECORD FROM A DIFFERENT"::5:"F:"FROM THE DISK PERMANENTLY."RU#16:8:CS$;"IS THAT CORRECT? ":300:WC29040Z#CV5:25:1:10:CS$"NOW DELETING:"::1:QO$;CS$FL$(F%)QO$" . . .":(4)"DELETE"FL$(F%) d#1:F%NR%(0)NR%(0)NR%(0)1::XX0:ER%0:BR%0:21000:ER%F%:BR%F%:210007:10:"1. "CS$"A FILE":9:10:"2. "CS$"A RECORD":11:10:"3. "CS$T$(10)<#CV19:60:LN%1:NE%3:CV18:200:A(W$):A9040,9500,800P#T$(0)"DELETE A FILE":30:1000:9:5:CS$;"YOU WOULD LIKE TO DELETE THE FILE":11:9:QO$;CS$FL$(F%);QO$:13:5 TO THE DISKETTE.":22:50_ CV19:25:15:3:CS$"DO YOU WANT TO ADD TO THIS FILE NOW?":300 WC1T$(0)" ADD TO AN EXISTING FILE ":5000 800'# M(#RA%1:DR%1:T$(0)"DELETE A FILE/RECORD":CP$:30:5:5:CS$;"WOULD YOU LIKE TO DELETE:":NAME CORRECT?":300:WC28110CV5:25:NR%(0)NR%(0)1:F%NR%(0):FL$(F%)W$:NR%(F%)0:XX0:BR%0:ER%0:21000:ER%F%:BR%F%:21000:24000CV2:25:8:(FL$(F%))31ĖHF(A)(FL$(F%))30Ė5QO$CS$FL$(F%)QO$:10:5:CL$"HAS NOW BEEN ADDED:100:J1NR%(0):W$FL$(J)Ă:J0:8120JNR%(0)::CV21:25:CV:1:CS$"THERE'S A FILE WITH THIS SAME NAME ON THE DISKETTE ALREADY. "CS$"PLEASE CHOOSE":"ANOTHER NAME.":22:23:CV21:25;:8115CV19:25:CV:5:CS$W$::CS$"IS THIS FILE A NEW FILE, ONE OF THEM MUST BE DELETED.":22:50:CV20:25q20:1:CS$"DO YOU WANT TO DELETE ONE FILE?":300CP$:WC1CF%0:9000800CV19:25:CV:1:CS$"WHAT IS THE NAME OF THE NEW FILE?":CVCV2:CH5:WL%30*22:5:N130:"-";: IT IS IN THE DISK DRIVE":"WHENEVER YOU CREATE A NEW FILE OR DECIDE";:"TO TRANSFER A FILE TO OTHER DISKETTES.":50H30:1000:50JNR%(0)108110;20:1:CS$"THERE ARE ALREADY TEN (10) FILES ON THIS DISKETTE. "CS$"IF YOU WANT TO CREATE$"ROULETTE DISKETTES WHEN YOU PICK":QO$CK$"T"QO$" ("CS$"TRANSFER A FILE) FROM THE "CS$"MENU."D:CS$"IF YOU INTEND TO TRANSFER YOUR FILES":"TO OTHER "CS$"WORD "CS$"ROULETTE DISKETTES,":"PLEASE LABEL THIS DISKETTE "QO$CK$"MASTER."QO$tFCS$"BE SUREANY OTHER":15:1:"FILES?":300:WC7000,800@CF%1:T$(0)" CREATE A FILE ":TI1:30:5:1:CS$"THIS OPTION ALLOWS YOU TO CREATE":"NEW FILES FOR YOUR "CS$"WORD "CS$"ROULETTE":"DISKETTE."^B:CS$"YOU MAY TRANSFER THESE FILES TO OTHER":CS$"WORD "CS"X139:"*";::sNBR%ER%:90:::CP$:CD$"PR#0":CD$"IN#0":CP$:36354::16302,0:X(49234):62450CS$(19):TI1:30:7:4:CS$"THAT'S THE END OF THE RECORDS IN"::HF(A):QO$CS$FL$(F%)"."QO$-13:CS$"DO YOU WANT TO SEE OR PRINT NR%(F%):22000:TI0:30:8:13:CS$"NOW PRINTING."CS$"":1:CD$"PR#"SL%:(9)"80N"(24):22:X139:"*";:::W$FL$(F%):98:FL$(F%)W$T$(8)"WORD ROULETTE FILE: "FL$(F%):T$(8):" "NR%(F%);:NR%(F%)1ĺ" RECORD":7650" RECORDS;FL$(F%);"."QO$::CS$"MAKE SURE THE POWER IS "QO$"ON,";QO$::"YOUR PRINTER IS "QO$;"ONLINE,";QO$;" AND YOU":"HAVE PAPER IN YOUR PRINTER.":::CS$"PRESS THE SPACE BAR WHEN YOU ARE READY."250:CP$:12:5:CS$"JUST A MOMENT, PLEASE.":BR%1:ER%"IS THIS CORRECT? ":300:WC7610,7540:CP$:30:1000:TI0:NR%(F%)0Ģ7:5:QO$;CS$;FL$(F%);QO$::"DOES NOT HAVE ANY RECORDS IN IT."::CS$"PLEASE CHOOSE ANOTHER FILE.":TI1:50:CP$:7610m5:1:CK$"O.K. ";CS$;"WE'LL PRINT "::HF(1):QO$;CS$URS ISN'T, "CS$"I NEED TO KNOW THE SLOT."X[12:5:CS$"IS YOUR PRINTER CONNECTED TO "`5:14:"SLOT 1? ":300:WC7610,7540t18:1:CF$:17:1:CS$"TO WHICH SLOT IS YOUR PRINTER CONNECTED?":LN%2:CV19:CH15:NE%7:60:200:SL%(W$)&22:CS$OUCAN GUESS THE "T$".":CV17:50:400:s@12:10:"0"CS$"SORRY, "CS$SF$(SN%)",YOU LOST YOUR TURN.":CV17:ZZ1175SE%50:ZZ:X16:0,155(37)4:1,5:901::4X13:2120::H0,155(37)5:1,5:901R0,100(1):1,4:3:CS$;"HERE IS THE "T$" WITH YOUR HINT.":CV23: xWG%0:SD(SN%)SD(SN%)D%:DP%DP%D%:10:10:"0"CS$"SORRY, "CS$;SF$(SN%)", YOULOSE "D%" POINTS, BUTYOU CAN SPIN AGAIN.(YOUR SCORE: "SD(SN%)")":CV17:)WG%2:10:10:"0"CS$"LET'S SEE IF YD%)V 10:10:"0"CS$"YOU HIT THEPOT OF GOLD!YOU MAY WIN "D%"POINTS!":CV17: X1(C1$):(C1$,X,1)UL$W$(C$,X,1):X(C1$)  (10:10:"0"CS$"YOUR HINT IS THELETTER "QO$CS$W$"."QO$"":500:CV17:50:400:C1$C$ġ:60142 -19:D%D%SE%50:9:10:CK$"0O.K., "CS$SF$(SN%)",NOW YOU CAN WIN"D%" POINTS!" QSD(SN%)D%0Ģ13:10:CS$;"0";CS$;"IF YOU GET IT RIGHT,YOU WILL HAVE "SD(SN%)D%"!" RCV17: PG%1:D%SD(SN%):D%0D%100 D%1000D%1000 D%0D%(SN%)DP%:SP%100:N13:22:3:29:S1$;:22:(34((SD(SN%)))):SD(SN%):2100:N:CV23:50: $CS$"THAT'S IT! "CS$"THAT'S THE RIGHT "T$"!": )CS$"GOOD WORK! "CS$"YOU JUST WON "DP%" POINTS!": .CS$"THAT'S THE "T$" "CS$"I WAS THINKING OF!":P L CS$"NO, "QO$CS$W$QO$" ISN'T IN THIS "T$".":i CS$"SORRY, BUT "QO$CS$W$QO$" IS NOT IN THE "T$".": CS$"SORRY, BUT THAT ISN'T THE RIGHT "T$".": HH%1:CV19:25:X(13(1)):X1060,1065,1070:2300:30 DP%5000DP%5000^ SD(SN%)SD(  FPHH`$2064H(121)256(122):L(560)256(561):L1,(H1):L2,(H2):L3,0:L4,0:L5,0:104,8::15 "ROUL2-HI"CV19:25:X(12(1)):20:1:WG%910,10,950,10:CV23:50:X925,930:PG%13000,10:03:"0";CS$"YOUR TIME IS UP!":SP%1500:22:NA%1::6003A900z`560,(121):561,(122)((121)16):104,64:16384,0j(4)"RUN ROUL2-HI"SVB%2:VT:CH:M$(1);:(1CH2PACES):ST$>aX1PACES:350g|N12:FX%0YY(16336)(16336)}VT:CH:M$(N):350:1800:VT:CH:BL$:CHCH1:N:X8~N35:VT:CH:M$(N):350:SP%400:22:VT:CH:BL$:N:VT:CH:M$(6);(7):CV20:25:21:1P,0:KS,0:22:1:(6)oN22:3:VB%ĺCS$"WHICH VOWEL WILL YOU BUY? ":3:"("QO$"/"QO$" NOT TO BUY A VOWEL)";RVB%Ė9:CS$"0YOUR LETTER GUESS? ";:SD(SN%)199ĺ:9:"("QO$"/"QO$" TO BUY A VOWEL)";WSE%İ350:*\CHSE%21:VT17:PACES13SE%(K1$)X):540aW$(K1$,X,1)K1$(K1$,X1)(9)(K1$,X,1)(14)(K1$,X1,(K1$)):X(K1$):AP%14Ģ5:2:CL$;K1$:WG%2000,2100&W$C$555'C2$C$:X$C2$:97:C2$X$:X$W$:97:W$X$:W$C2$WG%3:+WG%4:MW$"":NA%0:KZ$) +X1(C$):W$(C$,X,1)520VX1C1$W$(C1$,(C1$)X):WG%2:520X(C$)C1$(C1$,(C1$)1)W$:WG%2:520C1$(C1$,X1)W$(C1$,(C1$)X):WG%2:VB%ıX1(K1$)W$(K1$,1)K1$(9)(K1$,X,1)(14)(K1$,(C1$,ZZ,1);:443"1";UL$;>WG%2FX%0YY(16336)NZZ:"0":WG%1:X1(AZ$):AZ%(X)1W$(AZ$,X,1)CV19:CH1:25:CV:CS$"THIS LETTER HAS ALREADY BEEN GUESSED.":D%50:NA%1:SP%500:22:AZ%(X)0W$(AZ$,X,1)AZ%(X)1:X(A"::(15(13(((D%))))2):D%A93,3187,3187,6393,6393,38,99266,99266,1158,1158,99:(XX2)7,68(XX2)7,83(42XX)7,83(42XX)7,68(XX2)7,68:10:XX:CS$;FL$14:3:(C1$,1)UL$ĺCS$;ZZ1(C1$):(C1$,ZZ,1)UL$ĺ"0";aa cŠa a c̤a a `LbحaaaaɀL>ca)̴aiimaiLScLSc8aa c `hhɦ LcHH`aLaLb ?@,حaaLaɀLa8aaӭaaaa L-bVQLL-baaa ʹaL2b aȑiimaiLbLb8aaLb8aaժժԪժժժԪժЪʁժժҪԪժժCaCaCyCaժЪՀժ՞ժժժժժуժժժʪժªՊժժѪժժժժժªժժ~>pp>ժԪժժժ?f?fppժժժժժժժժժҪЪժիЪժŃCaCaCqCaժªՊժ՞{o|Ca|ժժժժժՃժժժªՂժҪժժժҪժժժժժҪժժFF~ppժԪժժժFFpp      SPACE BAR"CS$QO$" MESSAGE IF YOU WANT":21:4:"TO GO BACK TO THE "CS$"MAIN ";_ +CS$;"MENU." +50:30:4:1:"2. "CS$"PRESS "QO$CS$"Q"QO$" WHEN YOU SEE THE":6:4:QO$CK$"SPACE BAR"QO$CS$" MESSAGE IF YOU WANT" *+8:4:"TO EXIT FROM THE "CK$"TEACHE     !""""S$"NOW DELETING RECORD "DR%" FROM":QO$CS$;FL$(F%)QO$". . .":DR%NR%(F%)NR%(F%)NR%(F%)1:9533$5%NR%(F%)NR%(F%)1:BR%DR%1:ER%NR%(F%)1:22000:XDR%NR%(F%):C$(X)C$(X1)::BR%DR%:ER%NR%(F%):23000$=%24000:ER%F%:BR%F%:XX0:21000 %B%NR%(FISH TO DELETE.)"#(%11:"("CS$"IF DELETING MORE THAN ONE RECORD, START";:"WITH THE HIGHEST NUMBER AND WORK DOWN.":CV20:60:200:DR%(W$)#+%CV19:25:19:10:CS$"DELETE RECORD "DR%:22:10:CS$;"ARE YOU SURE? ":300:WC29500a$0%CV5:25:1:10:C.":9509&"#%NR%(F%)" RECORDS IN IT."~"%%8:CS$"WHICH RECORD WOULD YOU LIKE TO DELETE? ":NE%NR%(F%):LN%1:NR%(F%)9LN%3#&%14:1:CS$"IF YOU DON'T KNOW THE RECORD NUMBER,":"TYPE "QO$CS$"S";QO$" TO SEE A FILE, AND MAKE NOTE":"OF THE RECORDS YOU WILE? ":300:WC8999,800!%T$(0)" DELETE A RECORD ":30:1000:5:NR%(F%)0ĺQO$;CS$FL$(F%);QO$;" DOES"::"NOT HAVE ANY RECORDS IN IT.":9:CS$"THERE ARE NO RECORDS TO DELETE. ":50:9080"!%QO$;CS$FL$(F%);QO$;" HAS":NR%(F%)1ĺNR%(F%)" RECORD IN ITժԪժժՊՊժժժŁժʪʪժժժϪժժժժʪՊժժf~~pp~ժժժժժժժЪժժժժժՂՊժժҪժժCaCa|CaЪԪժ՟ժժժժժԪժժՊժʪʪժժӪժժժժՊʪժժF~~pp~ժԪժժժpppp1::(4);"RUNMENU"-Pú(16):(4);"PR#6"IED" 0,390,390,630,630,32:29:CS$SF$(SN%):(34((SD(SN%)))):SD(SN%):5:29:CS$SF$((SN%)):(34((SD((SN%))))):SD((SN%)):190,3279,3279,63190,63190,32:17:CS$;"ROUND: "WP%:D%0Ė15:4:CS$"ON THIS TURN":15:"YOU CAN WIN:16:25:SP%1000:22::FmVB%(K66K69K73K79K85K90)385wKP%K64:2400:W$(K):22:29:"0";CS$;W$;:SE%ı|SE%CV17:26:CV18:26::SE%ī350CP$:2:2:CK$"0CONSONANTS":5:2:CL$K1$:K1$KN$Ģ3:3:CK$"GUESS25:KS,0:23:18:CK$"(Y/N) ";:G$;1G$"Y"G$"N"300L6G$"Y"WC1]@G$"N"WC2cE^KP,0:K(KP)128:K17GU%1:::6024cVB%K47VB%0:CV16:25::eVB%K65K69K73K79K85385hVB%K47SD(SN%)199VB%1:CV:CAP%AP%1:VA:HA:IS$:0,160(1)40:1,4:901:VA:HA:NS$SLOW0K(KP)128:K32SLOW1:P%AP%:X%2(1)3:35:210SLOW1(AP%P%X%AP%P%X%14)ġ:232 130,100,145,55,151,55,130,55,97,55,86,55,75,130,97,75",CV23:0,0255:X1AP%:D%::gAP%3AP%9AP%14āP15:HA:VA:IS$:2120:HA:VA:NS$:2120:P:AP%4AP%6AP%12āP1704010:HA:VA:IS$:0,255P:1,10:901:HA:VA:NS$::P4018020:HA:VA:IS$:0,255P:1,10:901:HA:VA:NS$:12:11:CK$"SPACE BAR"CL$" TO STOP"9KS,0:KP,0:AP%0YVA1:X1338:HAX:250:XzHA33:X7196:VAX:250:XVA19:X2598:HAX:250:XHA1:X1976:VAX:250:X220 150,100,0, 100 ,300,0,700,500,0,350,200,50,65500SE%50:22:3:"50";:26:"GUESS"rKS,0:KP,0:CK$:AP%0Ģ8:11:CS$"0WELCOME TO"CK$"WORD ROULETTE!"12:11:"0"CS$"YOUR TURN, "CS$;SF$(SN%)".":11:CS$"PRESS THE "CK$"SPACE BAR."CL$:K(KP)128:K32218KP,0:212#SLOW0:35:"/"QO$" TO ERASE THE WORD":20:8:"YOU'RE TYPING, OR "QO$CK$"CTRL-E"QO$:22:8:CL$"TO ERASE THE ENTIRE LINE.":502>+30:10:1:CI$;CK$"NOTE";CN$": "CS$"IN THE "QO$CS$"ADD"QO$" AND "QO$CS$"EDIT"QO$" FUNCTIONS,":7:"YOU CAN PRESS "CI$CK$"CTRL-Q"CN$CS$"RS' UTILITY.":10:1:"3. "CS$"IN THE "QO$CS$"ADD TO AN EXISTING FILE"QO$:12:4:"OR "QO$CS$"EDIT A FILE"QO$" FUNCTIONS, YOU CAN:" /+14:4:"A. "CS$"PRESS THE "QO$CK$"ESC"QO$CS$" KEY TO"s4+:16:8:"CAPITALIZE A LETTER.":18:4:"B. "CS$"PRESS "QO$50SE%50;:11:100SE%50;:35:300SE%502:19:PT$:2:26:" LOSE":4:26:"100":8:2:"GET A";:34:"LOSE":10:2:"HINT";:34:"TURN"&15:3:650SE%50;:35:700SE%50:20:2:"LOSE";:26:"FREE":21:11:200SE%50;:19:350SE%50;:35:0ġ:108'MIICLİ174::108ELN65LN90MM1::108Km(7)(7);:MM1:W$(W$,M):HF%0(AP%4AP%6AP%12)İ35:211CP$:HF%0:X1338:1:X:SQ$:19:X:SQ$:X7196:X:1:SQ$:X:33:SQ$:+3:3:"0"1((W$,M1,1))19MM1:CLCL17 MM1:M0ġ:104E M$" "M$;o W$(W$,M):C%0:((W$,M,1))19C%1u M1ġ:104 MIICLİ174::108 ((W$,M1,1))19W$(W$,M1):MM2::108 M$(19):CLCL1::130174:LN32LN9M1(LN17(LN17LN65)LN90)ī104? oLN8MM1:138:108T pLN27C%1:150s xLN17GU%1:WG%3::6024 |LN13ĹKS,0:CVCV1:25:550: 164 M$;:W$W$M$ M1136 ((W$,M,1))19C%0 108 M2(M3C%)ġ:104! .":7:19:DP%] f21:1:ES$"0 = "CS$"CAPITALIZE "RT$:21:30:"0= "CS$"FINISHED" hCV:CH:(5);:M0:M$"":W$"":II35:CL0:FC%0:C%0:CV:CH jCS$; lMM1:KS,0:M$:LN(M$):MIICL1İ156 m(M1MIICL)(LN31LN91)130% n 8ZZ72HH%0HF%1:20000:50- 9ZZ32ı5 :52K aKK(X$):JJ1KK bJJKKĭ((X$,JJ,1))65X$(X$,JJ1)(X$,JJ1,KK):KKKK1:JJJJ1 cX$(X$,KK):: dZZ27:15:ZZ:" "::3:15:CS$"GUESS THE":15:T$" AND":15:"WIN..Z:S1$;S1$;" "::& 2255:KS,0E 4CV:19:SB$;:ZZ(KP)128 6ZZ77ģ35582:CP$:10:5:CS$"I'LL SHOW YOU THE MENU IN A MOMENT.":1:CD$"RUN MENU" 7ZZ81ģ35582:CP$:10:5:CS$"GOODBYE, "CS$;SF$(0)" AND "CS$;SF$(1)".":1:CD$"RUN TITLE"   FPHH`$2064/60000A "ROUL2-LO"G R35582^5000030000::3:0,0:X(49234):62450:5010255:ZZ1SP%::CV:1:(6):CV:CH:(5):50:14:3:"0";CS$;C$:255: #ZZ717:10:Z1:SF$(X)::CD$;"CLOSE"FL$(0)V X1NR%(0)1:YX:ZX1NR%(0):NR%(Z)NR%(Y)YZ: Z:YXNR%(11)NR%(X):FL$(11)FL$(X):NR%(X)NR%(Y):FL$(X)FL$(Y):NR%(Y)NR%(11):FL$(Y)FL$(11) X ZZNR%(0):X1NR%(0):NR%(X)10NR%(0)X1:XZZ :CF$,CK$,CL$,CO$,CP$,CS$,CT$,LB$,FL$(0),FL$,NR%,SB$:CD$;"CLOSE VAR" CD$;"OPEN"FL$(0)",L70":CD$"READ"FL$(0)",R"0:FL$(0):NR%(0):X1NR%(0):CD$;"READ"FL$(0)",R"X:FL$(X):NR%(X): CD$"READ"FL$(0)",R"11:FX%:CD$"READ"FL$(0)",R"13:NP%:X0NP%15,130,137,1,130,115,1,1,1,170,137,1,170,137,1,170,137,1,1,1,170,137,130,137,151,1,137,130,0 ~ BX:X1āZZ1100::1090 GX0Į: L0,X:1,50:901:1090 ` P4018020:0,255P:1,10:901::C CD$;"OPEN VAR,L500":CD$;"READ VAR,R1":CA$,21:1:CF$] :22:5:CS$"TYPE <"CS$"Y> FOR "CS$"YES OR <"CS$"N> FOR "CS$"NO ";:CH(36):M$v ;M$"Y"M$"N"825 <W$M$:(CH1):CS$;:W$; @CH(36):CV(37):W$"Y"WC1: AW$"N"WC2:` = 170,130,1,170,130,1,170,130,1,1,1,170,130,11)N48((LE$)1)WCN48:@ N8(36)CHāZZ120:ZZ:706n N8ĺM$;(5);:MM2:M0W$(W$,M):704 N8W$"":704 N13(W$)((LB$)1)(W$)((LE$)1)WC(W$): N13M2700 W$W$M$:M$;:704 704 9WC0:16368,0:1:21:CF$ 22:4:"** "CS$"TYPE A NUMBER FROM ";(LB$);" TO ";(LE$);" ** ";:(LE$)1Ģ23:10:"AND PRESS "CK$"RETURN. "; CH(36) MM1 16368,0:M$:N(M$):N8(N8N13)(N13N48)N57āZZ120:ZZ:706 (LE$)1N48((LB$)500007 $NR%(11):FL$(11):CD$(13)(4):QO$(34)A %3000U &ZZ1SP%:ZZ:} ZZ1150:ZZ:16368,0:23:1:CF$ 24:15:SB$;:N(16384)128:N32N81151 N81ġ:5000 16368,0:1:22:CF$:1: M0:M$"":W$"":16368,0:o  FPHH`$2064B"MENU FOR WORD ROULETTE"y ** WRITTEN AND PROGRAMMED BY ANITA R. MIRES ** ** THE REGENTS/ALA COMPANY, 2 PARK AVENUE, NEW YORK, NEW YORK, 10016 ** ** COPYRIGHT 1984, ALL RIGHTS RESERVED **  %)19570%D%30:5:CS$;"WOULD YOU LIKE TO DELETE ANY MORE ":7:"RECORDS FROM":9:HF(A):QO$CS$FL$(F%)"?"QO$:300:WC1İ30:5:9505%b%9080%'TI1:T$(0)" TEACHER OPTIONS ":30:10:1:CS$"JUST A MOMENT, PLEASE.":CD$;"RUN OPTIONS"W&*TI1:CP$:ժªժժժp~ppppժժժԪ׊ժժժժժժժժՊժժҪժժ՟CaCaCyCaՂՔԊժժ                  E LETTERS IN A WORD OR PHRASE."qNP%2ĺ"TWO PLAYERS"::"YOU WILL TAKE TURNS, STARTING WITH";SF$(0)".""EACH TURN STARTS WITH A ROULETTE SPIN.THE SPIN TELLS YOU HOW MUCH YOU WILLWIN (OR LOSE) IN THAT TURN."775,NP%:CD$;"RUN HO(WC):CV10:19:1:CS$;"YOU'LL PLAY WITH THIS CATEGORY:"::5:QO$;CS$;FL$".";QO$:4950:150:CP$:4090CP$:" WORD ROULETTE: ";:NP%24520"ONE PLAYER"::"THE COMPUTER WILL GIVE YOU A NUMBER OFTURNS, BETWEEN 8 AND 18, TO GUESS ALLTHgCP$:2:1:CS$;"CHOOSE A CATEGORY TO PLAY IN:":5:XX1NR%(0):(6((XX))):XX". "CS$;FL$(XX):(6((XX))):XX". "CS$;"BACK TO THE ";CS$;"MENU"LE$(NR%(0)1):700:WCNR%(0)1CV10:770,0:CP$:4090g18:1:CF$:FL$FL$(WC):NR%NR%YOUR CHOICE? ";FrTI$:(TI$)1(TI$)2(TI$)3(TI$)44210_|TI$"4"SE%0:4260SE%(TI$):SE%1T$"SLOW"SE%2T$"MEDIUM"SE%3T$"FAST"::CS$;"THE CLOCK SPEED IS SET AT "QO$;T$;QO$;".":150CP$:806,SE%:4090OU WANT TO PLAY?":8:4:"1. ";CS$;"SLOW (14 SECONDS - 50 POINTS)":10:4:"2. ";CS$;"MEDIUM (10 SECONDS - 100 POINTS)"h12:4:"3. ";CS$;"FAST (6 SECONDS - 150 POINTS)":14:4:CS$;"4. ";CS$;"DON'T PLAY AGAINST THE CLOCK.":17:5:CS$;"WHAT'S E HALL"#YCP$::16302,0:25003[14:6:CK$"HALL OF FAME":::X13:13:CS$NM$(X);:(29((HF(X)))):HF(X)::X:::7:"** ";CS$"ALL-TIME ";CS$"HIGH ";CS$"SCORES! **":1085]SP%2000:38:CO$;CP$:CP$:4090{^CP$:5:1:CS$;"HOW FAST DO Y(G$):768A,1:A4900,4270,4190,4180,4500,5000CT230,64:62450PUCO$;CA$WCP$:10:CS$"I'LL SHOW IT TO YOU IN JUST A MOMENT.":CD$"BLOADSCRUNCH":CD$"BLOADPIC.FRAME,A$4000":CD$"OPEN HALL,L60":CD$"READHALL,R"1:X13:NM$(X):HF(X)::CD$"CLOS1Ė3:"1"CL$"T";!::"0"S"1:CV2:CS$;"WHICH WOULD YOU LIKE TO DO? ";,16368,0:19:34:G$:G$;:G$CT$ĺCP$:10:CS$;"LOADING THE TEACHERS' MENU":X769806:X,0::CD$;"RUNUTIL-LO"6(G$)6(G$)1ĺ(8);" ";(8);:41400@2400:A. ";CS$;"SEE THE ";CS$;"HALL OF "CS$"FAME"5:"5. ";CS$;"READ THE "CS$"INSTRUCTIONS":5:"6. "CS$;"QUIT THE ";CS$;"GAME":19:1:CS$"PLEASE TYPE A NUMBER FROM 1 TO 6 ":22:3:"("CS$"CHOOSE #1 TO START THE GAME.)"CV:X16:3:" ";:(768X)(773)0Ĺ806,0Z49234,0:CP$:4:5:CS$"HELLO, ";CS$;SF$(0);:NP%2ĺ" AND "CS$SF$(1);h"!":CV9+CV:5:"1. ";CS$;"PLAY "CK$"WORD ROULETTE":5:"2. ";CS$;"CHOOSE A ";CS$;"CATEGORY":5:"3. ";CS$;"PLAY ";CS$;"AGAINST THE ";CS$;"CLOCK":5:"4ESSED "CS$"CTRL-"CS$"C."uZù222,0:216,0:12:6:CS$"PLEASE TURN OFF THE COMPUTER,":15:6:"AND BEGIN AGAIN.":1,0("PLEASE TURN OFF THE COMPUTER,":15:6:"AND BEGIN AGAIN.":1,0C:CK$(11):CL$(12):CN$(14):CS$(19):CP$(16)J2uKP16384:KS16368`4uCF$(6):CE$(5)~LuHT(A)(40(T$(0)))2:Pú(16):(4)"PR#6"ULuHT(A)(40(T$(0)))2:PCS$(19):36351:CP$:255:857:(222)255Ģ9:8:CS$"YOU HAVE PR TO EXIT"::7:"AND RETURN TO THE "CS$"MENU.":50H+T$(0)"WORD ROULETTE TEACHERS' UTILITY MENU":30:10:1:CS$"JUST A MOMENT, PLEASE.":35582:(4);"RUN UTIL-LO"Pú(16):(4)"PR#6"1:35582:CD$"RUN UTIL-LO"20uQO$(34):CD$(13)(4):CI$(9)U WANT TO":10:5:"STOP WORKING?":300'6WC1CV7:25:8:1:CS$"PLEASE REMOVE THE DISKETTE, AND TURN"::"OFF THE COMPUTER.":16:10:CS$;"THANK YOU!":1,0'6800 (:TI1:T$(0)" TRANSFER A FILE ":30:10:5:CS$"JUST A MOMENT, PLEASE."::CD$"RUNŠǠРŠҮΠՠ̠ŠҠҠſT$(0)" INSTRUCTIONS ":LN72:30:8:3:CS$;"JUST A MOMENT, PLEASE.":CD$"RUN INSTRUCT"&2TI1:T$(0)" PLAY WORD ROULETTE ":30:10:CS$"JUST A MOMENT, PLEASE.":CD$;"RUN INTRO"''6TI1:T$(0)" QUIT THE TEACHERS' UTILITY ":30:8:5:CS$"ARE YOU SURE YO = 170,130,1,170,130,1,170,130,1,1,1,170,130,115,130,137,1,130,115,1,1,1,170,137,1,170,137,1,170,137,1,1,1,170,137,130,137,151,1,137,130,0 BX:X1āZZ1100::1090 GX0Į: L0,X:1,50:901:1090 0,100(1):1,4:901:0,(37)5:"RUN TITLE" ZZ32ı! 152@ 9WC0:16368,0:21:1:CF$ :22:5:CS$"TYPE <"CS$"Y> FOR "CS$"YES OR <"CS$"N> FOR "CS$"NO ";:CH(36):M$ ;M$"Y"M$"N"825 <W$M$:(CH1):CS$;:W$; @CH(36):CV(37):W$"Y"WC1: AW$"N"WC2:GHTS RESERVED ** 50000- 30000:4340? ZZ1SP%::N 255:KS,0` KP,0:CV:19w SB$;:ZZ(KP)128 KS,0:ZZ77ġ:35582:CP$:10:5:CS$"LOADING THE MENU...":1:CD$"RUN MENU" ZZ81ġ:35582:CP$:10:5:CS$"GOODBYE!":1:CD$  FPHH`$2064V "FAME - HALL OF FAME FOR WORD ROULETTE" ** WRITTEN AND PROGRAMMED BY ANITA R. MIRES ** ** THE REGENTS/ALA COMPANY, 2 PARK AVENUE, NEW YORK, NEW YORK, 10016 **  ** COPYRIGHT 1983 , ALL RI    0L`          80 W0ĺCP$:6:5:CS$"WELL, ";CS$;SF$;", YOU DIDN'T QUALIFY"::5:"THIS TIME. ";CS$;"MAYBE YOU'LL BE"::5:"LUCKIER NEXT TIME." SP%500:22:15:1:CF$:16:7:CS$;"WOULD YOU LIKE TO SEE THE"::14:CK$;"HALL OF FAME?":825:WC1İ4630CCP$1,6:901: P1:21:CF$:1: CP$:HF(3)SSW1:CP$:5:8:CS$"YES, "CS$SF$", YOUR SCORE OF "SS:10:5:"HAS QUALIFIED YOU FOR THE " W1Ģ12:14:CK$"HALL OF FAME!":::5:"C O N G R A T U L A T I O N S!":SP%500:22:CV23:150:CP$:4560:43ԿŠӠŠӧͿ٠ɠŠլſŠӠŠΧӠͿɠĠάŮɧĠŠРƠŬŮ٠ɠŠŠϠՠŠӿ٠ŠŠŠ٠Š׿ɧĠŠϠŠή٠ɠŠҠҿŠſɧĠŠĬŮ٠ɠŠŠҿɧĠŠŠҠϬŮԧӠĠȠŠ̿ΠɠŠŠˠ׿נȠӠŠ̿נȠРĠΠԍŠРӠĮԠϠՠԿϠՠŠԠӿ  ٍύ΍ōٍŠοϠՠŠǠͿΧԠԠҠŮŠӠŠͿϠՠŠԿΠɠŠԠĿŠΠɠ٠ɧ͠ǠҠŠנӮɧ̠ŠԡŠӠŠŠԿϠՠŠԠſӠΧԠԠŮ٠ɠŠŠҿӠԠΠſԠŠϠՠſӠŠӠϠǮϠՠŠӠΠҠſ̠ՠ٠ΠȿΠōϠՠŠӿϬɧ͠ԠǮ٠ɠРտ     TIME IS UP!":SP%1500:22:NA%1::60031900j`560,(121):561,(122)((121)16):104,64:16384,0j(4)"RUN ROULETTE-HI"$(1);:(1CH2PACES):ST$.aX1PACES:350W|N12:FX%0YY(16336)(16336)}VT:CH:M$(N):350:1800:VT:CH:BL$:CHCH1:N:X(~N35:VT:CH:M$(N):350:SP%400:22:VT:CH:BL$:N:VT:CH:M$(6);(7):CV20:25:21:13:"0";CS$"YOUR22:1:(6)dN22:3:VB%ĺCS$"WHICH VOWEL WILL YOU BUY? ":3:"("QO$"/"QO$" NOT TO BUY A VOWEL)";RVB%Ė9:CS$"0YOUR LETTER GUESS? ";:SD199ĺ:9:"("QO$"/"QO$" TO BUY A VOWEL)";WSE%İ350:\CHSE%21:VT17:PACES13SE%VB%2:VT:CH:M540VW$(K1$,X,1)K1$(K1$,X1)(9)(K1$,X,1)(14)(K1$,X1,(K1$)):X(K1$):AP%14Ģ5:2:CL$;K1$:WG%2000,2100&W$C$555'C2$C$:X$C2$:97:C2$X$:X$W$:97:W$X$:W$C2$WG%3:+WG%4: MW$"":NA%0:KP,0:KS,0:X1(C$):W$(C$,X,1)520KX1C1$W$(C1$,(C1$)X):WG%2:520zX(C$)C1$(C1$,(C1$)1)W$:WG%2:520C1$(C1$,X1)W$(C1$,(C1$)X):WG%2:VB%ıX1(K1$)W$(K1$,1)K1$(9)(K1$,X,1)(14)(K1$,(K1$)X)::443"1";UL$;3WG%2FX%0YY(16336)CZZ:"0":WG%1:X1(AZ$):AZ%(X)1W$(AZ$,X,1)CV19:CH1:25:CV:CS$"YOU HAVE ALREADY GUESSED THIS LETTER.":D%50:NA%1:SP%500:22:AZ%(X)0W$(AZ$,X,1)AZ%(X)1:X(AZ$) T%QC1))):NT%QC1693,3187,3187,6393,6393,38,99266,99266,1158,1158,99:(XX2)7,68(XX2)7,83(42XX)7,83(42XX)7,68(XX2)7,68:10:XX:CS$;FL$14:3:(C1$,1)UL$ĺCS$;ZZ1(C1$):(C1$,ZZ,1)UL$ĺ"0";(C1$,ZZ,1);$SF$:3:(34((SD))):SD:190,3279,3279,63190,63190,32:17:CS$;"ROUND: "WP%:D%0Ė15:4:CS$"ON THIS TURN":15:"YOU CAN WIN:"::(15(13(((D%))))2):D%29:5:CS$;"TURNS":31:"USED:";:(39((QC1))):QC1:31:"LEFT:";:(39((N73K79K85K90)385PwKP%K64:2400:W$(K):22:29:"0";CS$;W$;:SE%ıq|SE%CV17:26:CV18:26::SE%ī350CP$:2:2:CK$"0CONSONANTS":5:2:CL$K1$:K1$KN$Ģ3:3:CK$"GUESSED"0,390,390,630,630,3;2:29:CSſɧ͠ϠĠϠŠŮŠՠǠĠſĠՠǠǠϠ˿ϠՠŠҠſŠӠŠͿϠՠĠŠԧӠ٠šΠРŠáӠĠӠ̡Š٠ĠԠԮՠϠ٠ٮԠĠՠŠϠ˿ϠՠĠƠɠſϠ̠ŠſԠӠ٠ٮɡԧӠҠſΠΠŠԠҠοɧĠŠϠŠԠٍϠՠԠϠſԧӠŠϠԠծՠˠŠԮ     z"#g>0~ ̠Ҡ נҠӠ Ҡ!ӠӠԠˠ" Ԡ Ůà Ƞ٠ Ҡ ԠӠΠ"ծà" ŭɠ ̠àӠϠ ՠ ŠӠΠŠŠ Š ŮӠ Ӡ ԭϠԠ٠ΠŠ ΠԠ ̠Š ̲Ϡ̲ɠŭϠ îŠ ҠԠԠ  ҠҠ̭Ϡ"̭ɠ'ŭɠW"Q$CP$:10:5:CK$;"WORD ROULETTE "CL$"WILL START"::5:"IN JUST A MOMENT."e&(770)0İ4950)X1NR%7:768X,0:X8NP%1ĺCD$"RUN ROULETTE-LO"BCD$"RUN ROUL2-LO" VCD$"OPEN"FL$(0)",L70":CD$"WRITE"FL$(0)",R"12:FL$:NR%:CD$"CLOSEEAD"FL$(0)",R"14:SF$:SS:CD$"READ"FL$(0)",R13":NP%:CD$"CLOSE"FL$(0)dXu1::CD$"OPEN HALL,L60"{buCD$"READ HALL,R"1luX13:NM$(X):TE$(X)NM$(X):HF(X):TS(X)HF(X):X:CD$"CLOSEHALL"yPú(16):(4);"PR#6"(13)(4):QO$(34):AZ$"ABCDEF":CI$(9):CN$(14):FL$(0)"ROULETTEFILE":W0:uCO$(15)(20):OP$(15)(16):V$(15)(1):SB$"1"CL$"WXYZ 0":KP16384:KS16368DuCD$"BLOADSCRUNCH":CD$"BLOAD PIC.FRAME,A$4000"GNuCD$"OPEN"FL$(0)",L"70:CD$"RTIME ";CS$;"HIGH ";CS$;"SCORES! **":108576W04720T>1::CD$"OPEN HALL,L60"lHCD$"WRITE HALL,R"1RX13:NM$(X):HF(X):X\CD$"CLOSE HALL"pSP%2000:22::OP$:CP$:M0uCP$(16):CE$(5):CF$(6):CK$(11):CL$(12):CS$(19):CD$CP$::16302,0:25003s 14:6:CK$"HALL OF FAME":::X13:13:CS$;TE$(X);:(29((TS(X)))):TS(X)::X*W1SP%500:22:9:X13:13:" ";:13:CS$;NM$(X);:(29((HF(X)))):HF(X):1255:22::X)4:7:"** ";CS$;"ALL-"HALL OF FAME. ";CS$;"WE'LL":12:5:"ONLY KEEP YOUR HIGHEST SCORE.":150:CP$UXqHF(4)SS:NM$(4)SF$:N4X1N1:YX:ZX1N:HF(Z)HF(Y)YZ:Z:YXHF(0)HF(X):NM$(0)NM$(X):HF(X)HF(Y):NM$(X)NM$(Y):HF(Y)HF(0):NM$(Y)NM$(0) X"A0CP$:CV10:CV:CS$"JUST A MOMENT, PLEASE.":CD$"RUN INTRO"p:CP$:10:5:CS$;"GOODBYE!":CD$"RUNTITLE"CP$:X13:SF$NM$(X)SSHF(X)HF(X)SS:SS0NSF$NM$(X)SSHF(X)SS0:P$:8:5:CS$;SF$;", YOU ARE ALREADY IN":10:5:"THE ";CK$;:8:5:CS$"WOULD YOU LIKE TO"::5:"PLAY AGAIN?":825:WC2ī4410&CP$:8:5:CS$;"DO YOU WANT TO PLAY THE GAME"::5:"THE SAME WAY?":825:WC24400(CP$:10:CS$"JUST A MOMENT, PLEASE.":NP%1ĺCD$"RUN ROULETTE-LO"+NP%2ĺCD$"RUN ROUL2-LOōځ   RECORD?":T$(3)"KNOW THE NUMBER OF RECORDS IN THE FILE?":NE%3:-@CV:CH:N1NE%:CH:N". "CS$T$(N)::CH:N". "CS$T$(10):CV22:60:NE%N:200:-Pú(16):(4)"PR#6" "CS$"DELETE A FILE/RECORD",}M$(7)"O. "CS$"TEACHER OPTIONS":M$(8)"T. "CS$"TRANSFER A FILE":M$(9)"Q. "CS$"QUIT":M$(10)"P. "CS$"PLAY THE GAME AS A STUDENT":T$(10)CS$"GO TO THE "CS$"MENU"N-ЄT$(1)"SEE ALL THE RECORDS?":T$(2)"EDIT A(40(FL$(F%)))2-+LuHT(A)(40(T$(0)))2+}M$(1)"I. "CS$"INSTRUCTIONS FOR WORKING WITH FILES":M$(2)"C. "CS$"CREATE A FILE", }M$(3)"S. "CS$"SEE A FILE":M$(4)"E. "CS$"EDIT A FILE":M$(5)"A. "CS$"ADD TO AN EXISTING FILE":M$(6)"D. OSE"FL$(F%):*0uWL%35:NR%0:RB0:RE0:LN0:RA78:LN%0:QO$(34):SP$" ":CD$(4):CI$(9):CK$(11):CL$(12):CN$(14):CS$(19):CP$(16):C$(30):FL$(10),NR%(10):LG%70*2uKP16384:KS16368:FL$(0)"ROULETTEFILE"*4uCF$(6):CE$(5)+JuHF(A)LG%:XBR%ER%:CD$"READ"FL$(F%)",R"X:C$(X)::CD$"CLOSE"FL$(F%):)Y:1:CD$"OPEN"FL$(F%)",L"LG%:XBR%ER%:CD$"WRITE"FL$(F%)",R"X:QO$C$(X)QO$::CD$"CLOSE"FL$(F%): *]:1:CD$"OPEN"FL$(F%)",L"LG%:CD$"WRITE"FL$(F%)",R"0:FL$(F%):NR%(F%):CD$"CL TRANSFER"u( N:1:CD$"OPEN"FL$(XX)",L"LG%:XBR%ER%:CD$"READ"FL$(XX)",R"X:FL$(X):NR%(X)::CD$"CLOSE"FL$(XX):(R:1:CD$"OPEN"FL$(XX)",L"LG%:XBR%ER%:CD$"WRITE"FL$(XX)",R"X:FL$(X):NR%(X)::CD$"CLOSE"FL$(XX):C)U:1:CD$"OPEN"FL$(F%)",L"":RT$"1#$%&----0":NP%(775):CP$(16):SB$"1"CL$"WXYZ 0"^ 36354:16302,0:4535 ZZ1150:ZZ:16368,0:23:1:"" 24:3:SB$" = CONTINUE M = MENU";:N(16384)128:N32N77N81151 16384,0:16368,0:N77ġ:4650"FL$(0):VCP$:10:5:CS$;"SEE YOU LATER!":X1NR%7:768X,0:X:CD$"RUN TITLE"nPú(16):(4);"PR#6"U NEED ADDITIONAL INFORMATION ABOUT" +9:1:"AN ITEM, PLEASE CONSULT THE HANDBOOK.":11:1:CS$"DETAILED INFORMATION IS LISTED THERE."N +14:CS$"SPECIAL FEATURES AVAILABLE:":17:1:"1. "CS$"PRESS "QO$CS$"M"QO$" WHENEVER YOU SEE THE":19:4:QO$CK$"L:ZZ(16384)128:ZZ32IL7 6ZZ77ZZ81ġ:11080W 8ZZ32Ĺ16368,0:JJ0:25:^ 9Im :JJJJ:51$ *:CP$:T$(0)" INSTRUCTIONS ":30:3:3:CS$;"TO USE THIS AUTHORING UTILITY,":5:1:"SIMPLY CHOOSE AN ITEM FROM THE MENU. "CS$"IF":7:1:"YO(12):CN$(14):CS$(19):CP$(16):CP$:11000A CV:1:(6):v CP$:1:((40(T$(0)))2)::CI$CK$T$(0)CN$:: 216368,0:JJ0:ZZ0 3CV23:25:L500JJ200:24:8:JJĺCI$; 4CK$" SPACE BAR ";:CN$;:"("QO$CS$"M"QO$" FOR "CS$"MENU)";:I1  FPHH`$20646 "INSTRUCT"r ACCESSED FROM TEACHERS' UTILITY MENU OF WORD ROULETTT BY ANITA MIRES COPYRIGHT 1984; THE REGENTS/ALA COMPANY 50000:X(49234):62450. QO$(34):CI$(9):CK$(11):CL$      ƠҮԠҠӠΠĮԧӠ̭ŠҮſԠ̠ŠǠŠ̮Ҡ̠ԠŠĮĠŠŬšŠӠŠٮӠŠӠԠήԠ٬ſŠԠӮſ٬ՠŠŠǠҮɧĠŠϠŠΠԮŠŠӠҠծԠӠҠŠҿҿŠŠŠšɠԠϠŠԠ̮Πɠ̠ՠˠҿŠŠšŠŠӠٮΠŠōŠҠŠšϮӠҠҠſΠɠŠſ ) ٩ ٩ 4H hߦ$! ٩$`tuۘۍ5ێ 0N5 +0z ԍ5 mJ AՌۘ [Z AՌ۽I]Iƍ3I2ۭu$3p ڙtۈL (ɬ ɮ ɬ ɢ Ԑ`ʨ`hh UN5 2ѢE$` )L  )ՠ ɠiPɗ*ɘɍL=Ʌ-ɖ5 I 2ѩ$`$3p.ۆE  Lԥ3ɾ` >1ۭնHED 3 3,hնN1,1pd x٭=م<>م=EM 40 4ّ<<=18<=L E Uڊ<)<L>+ m 4L,Hh)hRhذdfۈ ,ѩHHLԶ 2L L@  QѠ67'`N/۠89&`(ۍ)ۮ'۽HH)ۮ(`((ۺwn*ۮ(,3L ©éĭ&@JLLl&3jَϹB@/ u,5L 5,*ÁăȁƒȁƃˁɁ䠠䠠䠠苁㎃莋ッ苁ȁߍ΃ڍōڍƒŁځōΠŠōځ150":22G2400:4:"O = 100":22:2400:4:"U = 50":SP%1000:22:YAZ%(KP%)1ız W$"A"W$"E"VB%200:4140W$"I"VB%150:4140W$"O"VB%100:4140"W$"U"VB%50,3200:!SN%1:WP%0:NW%3:CV17:SD(SN%)50:SD(0)50:ZZ(SN%)D%:(34((SD(SN%)))):SD(SN%):} SD(SN%)SD(SN%)VB%:DP%DP%VB%:29:3:S1$;:(34((SD(SN%)))):SD(SN%):2150:"0":X26:X:2:" "::4:2:CS$"VOWELS":2400:4:"A = 200":SP%500:22:2400:4:"E = 200":22:2400:4:"I = Y:BB4:3:29:S1$;:(34((X))):X;H 0,B:1,10:901:X:29:S1$; SD(SN%)SD(SN%)D%:DP%DP%D%:(34((SD(SN%)))):SD(SN%): B200:XSD(SN%)SD(SN%)D%Y:BB4:3:29:S1$;:(34((X))):X;& 0,B:1,10:901:X:29:S1$;'0 SD(SN%)SD901\0,(37)5:1,6:901:KfZZ136808:0,255ZZ:1,10:901:ZZ:N114:ZZ:N:N18:X,Y:0,X:1,Y:901:N::` 0,100(1):1,4:901:0,(37)5:1,6:901: Y10 ZZD%Y:ZZ25YY10:2510 ' B40:XSD(SN%)SD(SN%)D%CK$"(Y/"(RA)") ";:G$31G$"Y"G$(RA)300D6G$"Y"WC1W@G$(RA)WC2cERA78: T$(0)" WORD ROULETTE TEACHERS' UTILITY MENU ":TI1:304SL%0:FC%0:TI0:RA%0:CF%0:AF%0:LN0:EF%0:DR%0:SF%0:AA(0)H8:X110:1:CS$;M$(0LN8(W$)W$"":M$;:" ";:M$;:MM1:202>LN8202ZLN48LN57M$"":202M$"0"W$""ĺM$;:W$W$M$:258M$;:W$W$M$(W$)1(W$)NE%M$"":W$"":26:202MII205KS,0:CV22:25:,CV23:25:KS,0:23:18:L$;:M0:M$"":W$"":CV:CHPKS,0:M$:MM1:LN(M$):W$""LN13MM1:205hLN77ġ:KS,0:800MIILN13ĺ(7);:26:202DR%(M$)83ĺM$;::KS,0:7000M1LN13270LN8(W$)1W$(W$,((W$)1)):M$;:" ";M$;:MM1:205(W$)1):1800X(W$)11:X2ġ:104M(W$,X,1)(19)CLCL1(W$,X,1)(32)W$(W$,X1):MX1:CH:CV:CE$:CH:CV:CS$;W$;::108:CVCV1:CHCH1IILN%:II1ĺ"AND PRESS "CK$"RETURN "CL$;:27:CVCV1:CHCH1C2::108%M$(19):CLCL1::130N174:LN33LN44LN58LN90ġ:108TmMIICLİ174::108LN32LN34LN58LN61LN90MM1::108EF%63205105(7)(7);:MM1:W$(W$,M): (W$)1(W$,1)" "W$(W$,((W$,M,1))19C%01086M2(M3C%)ġ:104[((W$,M1,1))19MM1:CLCL1qMM1:M0ġ:104M$" "M$;W$(W$,M):C%0:((W$,M,1))19C%1M1ġ:104MIICLİ174::108 ((W$,M1,1))19W$(W$,M1):MM5LN63(LN64LN91))1309tLN47MIICL1İ190:108Yv(LN5AF%)(LN5EF%)ī104vwAF%LN17CQ%1::5420xLN17ġ:800yEF%LN13M1FC%1:zM1LN13ī104|LN13ĹKS,0:180:164:MM1:108M$;:W$W$M$M1130,1,170,130,1,170,130,1,1,1,170,130,115,130,137,1,130,115,1,1,1,170,137,1,170,137,1,170,137,1,1,1,170,137,130,137,151,1,137,130,0 BX:X1āZZ1100::1090 GX0Į: L0,X:1,50:901:1090 Pú(16):(4)"PR#6"N0:901:1090 Pú(16):(KP(16384):KP12860 AKP148Č36354:(16)::16302,0:10:(19)"LOADING THE TEACHERS' MENU.":35582::(4)"RUN UTIL-LO" F1:22:(5):17:22:(19)"THANK YOU!" d(15)(16) x768,1:X769806:X,0: 1:(4)"RUN START" = 170,(20)(16)< /D$(4):(768)1ĺD$"BLOAD BGL MUSIC POKES" 0FL$(0)"ROULETTEFILE":D$;"OPEN"FL$(0)",L70":D$;"READ"FL$(0)",R11":FX%:D$;"CLOSE"FL$(0):FX%Ĺ901,96 1(768)1İ1085 216302,0:16:22:" ",(19)"PRESS ANY KEY" 716368,0 <  FPHH`$20642 "TITLE"W BOOT PROGRAM FOR WORD ROULETTEl BY ANITA MIRES COPYRIGHT 1984; REGENTS/ALA COMPANY 50000 :(4);"BLOAD ROU.PIC,A$4000"((768)1ĺ(4)"BLOADROULETTE.ABS" -36354:(15);    1G$"Y"G$"N"300* 6G$"Y"WC1:= @G$"N"WC2:z CV5:25:BR%0:ER%0:XX0:20000:BR%1:ER%NR%(0):20000 NR%(0)41010E 6:1:CS$"ONLY THE FOUR "CS$"REGENTS/"CK$"ALA "CS$"FILES ARE ON ":8:"THE DISKETTE NOW. ":12:1:CS$"THE FI :JJJJ:51^ CV1:5:"("QO$CS$"M"QO$" FOR "CS$"MENU)":CV:1:CS$"TYPE A NUMBER ";:27p W$"":CV:CH KS,0:W$:LN(W$) LN77ġ:KS,0:15990 LN49LNNE%48202 KS,0:CV22:25: ,CV23:25:KS,0:23:18:CK$"(Y/N) ";:G$ ";::" "CS$FL$(F%):* 2KS,0:JJ0:ZZ0V 3CV23:25:L500JJ200:24:8:JJĺCI$; 4CK$" SPACE BAR ";:CN$;:"("QO$CS$"M"QO$" FOR "CS$"MENU)";:I1L:ZZ(16384)128:ZZ32IL 6ZZ77IL:KS,0:JJ0::15990 8ZZ32ĹKS,0:JJ0:25: 9I84 BY THE REGENTS/ALA COMPANY, NEW YORK, NEW YORK. ALL RIGHTS RESERVEDR 50000j :X(49234):62450 30000::CP$:15000 CV:1:(6): CH(36)2:CV(37)1: CP$:1:((40(T$(0)))2)::CI$CK$T$(0)CN$::TIı 3:1:CS$"FILE:s  FPHH`$20645 "TRANSFER" TRANSFER ROUTINE FOR THE TEACHERS' UTILITY PROGRAM FOR "WORD ROULETTE," ONE OF THE WORD ALERT! COLLECTION; THE REGENTS/ALA COMPANY. WRITTEN AND PROGRAMMED BY ANITA R. MIRES.F  COPYRIGHT 19   YOUR RECORDS.":RA69:300:WC1CV5:25:50067 800Ao6000z`560,(121):561,(122)((121)16):104,64:16384,0j(4)"RUN UTIL-HI".NN1:NNA%5105q,CV5:25:24000:BR%RB:ER%RE:23000:NE%NR%(F%):BR%F%:ER%F%:XX0:21000:CQ%CQ%0:800.|CV4:25:10:1:CS$"DO YOU WANT TO ADD ANY MORE RECORDS?"::1:CS$"PRESS "QO$CK$"E"QO$" (END)"CL$" IF YOU HAVE FINISHED":14:"ENTERING RD OR SHORT PHRASE."::"("CS$"MAXIMUM 35 CHARACTERS INCLUDING":" SPACES AND PUNCTUATION.)"}CV14:CH3:32:100:C$(N)W$25:CV:3:CS$C$(N):20:1:CS$"IS THIS CORRECT?":300:WC25105CV20:25:REN:NE%N:RENR%(F%)NR%(F%)NR%(F%)1":NE%30:200:NA%(W$)REyNA%30CH1:26:24:CV:2:CS$"ONLY 30 RECORDS ALLOWED IN A FILE! ":22:CV9:25:5102TI0:CV8:25:CK$"O.K. "CS$"WE'LL START WITH RECORD #"N".":50:30\CV6:25:5:1:CS$"RECORD #"N:8:1:CS$"PLEASE TYPE A WOHIS FILE NOW HAS "(RE);:RE1ĺ" RECORD.":5102" RECORDS.":RE30Ģ10:CS$"ONLY 30 RECORDS ARE ALLOWED IN A FILE.":12:CS$"YOU CANNOT ADD ANY MORE RECORDS TO":14:"THIS FILE.":50:80010:1:CS$"HOW MANY RECORDS WILL YOU ADD?":CV22:60:LN%300:CV3:25:(W$)Nġ:80043F%(W$):RBNR%(0)1E8RA%F%F%4KGAF%1:WL%35:LN%1:RE0:RA%1:T$(0)" ADD TO AN EXISTING FILE ":CF%CF%0:5006TI1:301000:NR%(0)4800RENR%(F%):RBRE1:NRB/TI0:30:TI1:8:1:CS$"TH FILE DO YOU WANT?"::RA%āN5NR%(0):4:N4". "CS$FL$(N):1040bN1NR%(0):NR%(0)9LN%3 (5((N))):N". "CS$FL$(N)NE%N::RA%NN4CF%1095$(5((N))):N". "T$(10))CV22:60:27:CHCH1:NE%NE%1:RA%NE%NE%4.22iEF%Ģ12:1:CS$"THE FILES WHICH YOU CREATE ARE THE ONLY "::"ONES WHICH CAN BE EDITED.":22:50:AF%Ģ12:1:CS$"THE ONLY FILES WHICH YOU CAN ADD TO ARE "::"FILES THAT YOU HAVE CREATED YOURSELF.":22:50:50::800B6:1:CS$"WHIC00CV5:25:BR%0:ER%0:XX0:20000:BR%1:ER%NR%(0):20000:LN%1:CF%Ģ6:1:CS$"THESE ARE THE FILES ON THE DISKETTE:"::1015NR%(0)4SF%10106:1:CS$"ONLY THE FOUR "CS$"REGENTS/"CK$"ALA "CS$"FILES ARE ON ":8:1:"THE DISKETTE NOW. ":2X):=p1:5:CS$;"WHICH WOULD YOU LIKE TO DO? ":CV5:CH29wCV:CH:16368,0:G$:(G$)64(G$)84ĺ" ";:900;:A(G$)64:A5000,920,8000,9000,6000,920,920,920,11000,920,920,920,920,920,10000,13000,14000,920,7000,15000(8)SP$(8);:90),SB$:CD$;"CLOSE VAR" CD$;"OPEN"FL$(0)",L70":CD$;"READ"FL$(0)",R11":FX%:NP%:CD$;"CLOSE"FL$(0):NP%NP%1:FX%Ĺ901,96 FX%0Ĺ901,173 *20,20279,20279,13920,13920,20:8:7:CS$"HI THERE!"2/NP%2Ģ10:7:CS$"YOUR TEACHER HAS SET UP R "CS$"YES OR <"CS$"N> FOR "CS$"NO ";:CH(36):M$K ;M$"Y"M$"N"825e <W$M$:(CH1):CS$W$; @CH(36):W$"Y"WC1: AW$"N"WC2: ZZ120:ZZ: CD$(13)(4):CD$;"OPEN VAR,L500":CD$;"READ VAR,R0":CE$,CF$,CK$,CL$,CP$,CS$,FL$(M2:M0W$(W$,M):403- N8W$"":403I N13(W$)0İ900:400b N13SF$W$:36,1: W$W$M$:M1ĺCS$;M$;:429 MII1(W$,M,1)" "ĺM$;:429 MII1ĺM$; 403 9WC0:16368,0:21:1:CF$2 :22:5:CS$"TYPE <"CS$"Y> FO;4 MM1:MII1ĺ(7)(7);:MM2:W$(W$,M):403 16368,0:M$:N(M$):N8(N8N13)(N13N20)(N20N65)N90İ900:406 N20ĺCP$:10:CS$"LOADING THE TEACHERS' MENU":35582:CD$"RUN UTIL-LO" N8M1İ900:406 N8ĺM$;" ";M$;:M50000/ (36354:(16)::3:16302,0:2000W ZZ1150:ZZ:16368,0:23:1:CF$ 24:19:SB$;:N(16384)128:N32N81151 N81ĺCP$:10:5:CS$;"SEE YOU LATER!":CD$;"RUN TITLE" 16368,0: M0:II8:8:M$"":W$"":CV:CH:CS$  FPHH`$2064E "INTRO FOR WORD ROULETTE"{ ** WRITTEN AND PROGRAMMED BY ANITA R. MIRES ** ** THE REGENTS/ALA COMPANY, 2 PARK AVENUE, NEW YORK, NEW YORK, 10016 ** ** COPYRIGHT 1983 , ALL RIGHTS RESERVED **  "0:WC2ĺCP$:10:CS$"GOODBYE!":CD$"RUN TITLE"gCV10:25:11:CS$"REMEMBER THAT YOU CAN PRESS "QO$;CS$"M"QO$::"WHEN YOU SEE "SB$;CL$" TO GO BACK TO"::"THE MENU.":CV23:50:25:5010D NCP$:2:CS$"WINNING AT "CK$"WORD ROULETTE:1. "CS$"GUESS THITE"FI$",R"14/SF$(X):SD(X):CD$"CLOSE"FI$E1:CD$"RUN FAME"X17:1:CS$;SF$(X)" IS THE WINNER, BUT YOU"::"CANNOT ENTER THE ";CS$"HALL OF "CS$"FAME"::"WITH A SCORE OF "SD(X)".":CV23:50/bCP$:8:CS$;"WOULD YOU LIKE TO PLAY AGAIN?":3040,11040,78j12:8:CS$;SF$(X);:(24((SD(X)))):SD(X):8:CS$;SF$(X);:(24((SD(X)))):SD(X)SD(X)10007000 17:1:CS$"IN A MOMENT, WE'LL SEE IF "CS$;SF$(X)::"CAN ENTER THE ";CS$"HALL OF "CS$"FAME.":1:CD$"OPEN"FI$",L"70:CD$"WRTHE TIE.":6056pXSD(1)SD(0):CS$"THE GAME IS NOW OVER, AND"::CS$;SF$(X);" WON BY "SD(X)SD(X)" POINTS!"CV23:50:CV20:25:WP%NW%5030 CP$:6:1:CS$"WELL, "CS$SF$(0)" AND "CS$;SF$(1)","::"THAT WAS A GOOD GAME!":40,78169,78169,110 SHOW YOU THE "T$".":30:D%SD(SN%):2500:3000:SP%1500:CV2:22:WP%NW%6056SD(1)SD(0)NW%NW%1:CV23:50:CV16:25:CS$"THAT'S THE END OF "WP%" ROUNDS, AND IT'S":"A TIE! "CS$"YOU TWO HAVE THE SAME SCORE.":CS$;"LET'S DO ANOTHER ONE TO BREAK 25:CH3:100#WG%3İ2000:900:AP%9WG%45052KWG%450501000:CV17:25:CV:WP%NW%ĺCS$"YOU GOT IT THIS TIME, ";CS$SF$(SN%)"!"::CS$"LET'S SEE WHO GETS THE NEXT ONE.":6056PHH%1:GU%CV17:25:CV:3:CS$"GIVE UP? "CS$"I'LL05 t5009uVB%0:NA%ĴPG%13000,10:CV23:50:5050O{WG%1İ900:5050e|WG%2İ430:3100w~C1$C$WG%4 WG%2CV17:25:CV2:1:CS$"DO YOU WANT TO TRY TO GUESS THE "T$"?":CV4:7:"("CS$"YOU CAN WIN "DP%" POINTS.)":300:WC1CV18:fWG%0:200:AP%1100,1100,1200,1400,1100,1600,1100,1100,1500,1100,1100,1400,1100,1300:AP%9İ50AP%6000,6000,6000,5065,6000,5050,6000,6000,6015,6000,6000,5065,6000,5065p400:845:VB%İ4000:845:VB%06000qVB%İ4100s2500:NA%600:N776775NR%:(N)0ZZZZ1EN:ZZ5āN776775NR%:N,0:NnGU%0:X1(AZ$):AZ%(X)0::K1$KN$QP%(1NR%(1)):(775QP%)0ī503523000775QP%,1:WP%WP%1:DP%3000:C1$C$:T$"WORD":30100SN%SN%PG%0:WC0:HH%0 'CV12:180:13:CS$"NOW, "QO$CK$O1$QO$CL$" PLAYERS MAY"::"PLAY "CS$"WORD "CS$"ROULETTE.":18:8:CS$"IS THIS CORRECT?":970 'CV4:180:A210110H'CD$"OPEN"FL$(0)",L"LG%:CD$"WRITE"FL$(0)",R"11:FX%:TT%:CD$"CLOSE"FL$(0):T$(0)" WORD ROULETTE YOU":8:4:"TO CHOOSE THE NUMBER OF PLAYERS" '10:4:"ALLOWED TO PLAY THE GAME.":150:12:CS$"RIGHT NOW, "QO$CK$O1$QO$CL$" PLAYERS"::"MAY PLAY." '150:17:CS$"DO YOU WANT TO CHANGE THIS"::"TO "QO$CK$O2$"?"QO$CL$:970 'A1TT%TT%:125 B'A1FX%FX%:125 `'CV11:180:12:CS$"THE SOUND EFFECTS ARE NOW "QO$CK$O1$"."QO$CL$:14:8:CS$"IS THIS CORRECT?":970 j'CV4:180:A210030 t'O2$"ONLY TWO":O1$"EITHER ONE OR TWO":TT%1İ125. ~'6:"2. "CS$"THIS PART OF THE UTILITY ALLOWS%:CD$"CLOSE"FL$(0)# 'FX%1İ125 .'7:"1. "CS$"THIS PART OF THE UTILITY ALLOWS YOU":9:4:"TO CUSTOMIZE THE SOUND EFFECTS.":14:CS$"THE SOUND EFFECTS ARE NOW TURNED "QO$CK$O1$"."QO$CL$ 8'16:CS$"DO YOU WANT TO TURN THEM "QO$CK$O2$"?"QO$CL$:970: CV:1:(6):@ (16):1:HT(A):(9)CK$T$(0)(14):v CV23:180:16368,0:24:18:CK$"(Y/""N) ";:G$ G$"Y"G$"N"970 G$"Y"A1 G$"N"A2  'CV5:180::CD$;"OPEN "FL$(0)",L"LG%:CD$"READ "FL$(0)",R"11:FX%:TT   FPHH`$20644 "OPTIONS"l ACCESSED FROM THE TEACHERS' MENU OF WORD ROULETTE BY ANITA MIRES COPYRIGHT 1984;THE REGENTS/ALA COMPANY 50000d30000:10000}O3$O1$:O1$O2$:O2$O3$: 255:ZZ11000:  ,M1,1))19MM1:CLCL1/ MM1:M0ġ:104= M$" "M$;g W$(W$,M):C%0:((W$,M,1))19C%1m } M1ġ:104 MIICLİ174::108 ((W$,M1,1))19W$(W$,M1):MM2::108 M$(19):CLCL1::130174:LN32LN90ġ:10817(LN17LN65)LN90)ī1047 oLN8MM1:138:108L pLN27C%1:150k xLN17GU%1:WG%3::6032 |LN13ĹKS,0:CVCV1:25:550: 164 M$;:W$W$M$ M1136 ((W$,M,1))19C%0 108 M2(M3C%)ġ:104 ((W$9:DP%U f21:1:ES$"0 = "CS$"CAPITALIZE "RT$:21:30:"0= "CS$"FINISHED" hCV:CH:(5);:M0:M$"":W$"":II35:CL0:FC%0:C%0:CV:CH jCS$; lMM1:KS,0:M$:LN(M$):MIICL1İ156 m(M1MIICL)(LN31LN91)130 nM1(LN2HH%0HF%1:20000:50% 9ZZ32ı- :52C aKK(X$):JJ1KK bJJKKĭ((X$,JJ,1))65X$(X$,JJ1)(X$,JJ1,KK):KKKK1:JJJJ1 cX$(X$,KK):: dZZ27:15:ZZ:" "::3:15:CS$"GUESS THE":15:T$" AND":15:"WIN...":7:110:ZZ:S1$;S1$;" "::, 2255:KS,0K 4CV:19:SB$;:ZZ(KP)128 6ZZ77ģ35582:CP$:10:5:CS$"I'LL SHOW YOU THE MENU IN A MOMENT.":1:CD$"RUN MENU" 7ZZ81ģ35582:CP$:10:5:CS$"SEE YOU LATER, "CS$;SF$".":1:CD$"RUN TITLE" 8ZZ7  FPHH`$2064/60000G "ROULETTE-LO"M X35582d5000030000::3:0,0:X(49234):62450:5010255:ZZ1SP%::CV:1:(6):CV:CH:(5):50:14:3:"0";CS$;C$:255: #ZZ717:?":825:CV1:1:CF$:WC2ĢCV:1:CE$:3010 CVCV3:SF$(1)SF$(2)ĺ(7)(7):CV:1:CF$:CV:1:CS$"YOUR NAMES MUST BE DIFFERENT!"::CS$"PLEASE GIVE ME A NEW NAME FOR PLAYER #2.":XX1:CVCV5:150:CV:1:CF$  CP$:10:1:CS$"NOW LET'S L  CVCV2 20:CS$;"PRESS ";CK$;"RETURN ";CL$;"WHEN YOU ARE FINISHED.":22:5:"(";CS$"IF YOUR NAME IS LONGER THAN":5:"EIGHT LETTERS, PLEASE GIVE ME":5:"A SHORT NAME FOR YOU.)"; CH9:400:SF$(X)W$- 20:1:CF$:10:18:CS$"IS THIS CORRECTTHIS"::7:"DISKETTE FOR TWO PLAYERS.":150:3006` 10:7:CS$"HOW MANY PLAYERS? (1 OR 2) ";~ NP$:NP$(20)N20:408 NP%(NP$):NP%1NP%23002 CP$:CV6 X1NP%:CV:1:CS$"WHAT'S YOUR FIRST NAME";:NP%1ĺ", PLAYER #"X; "?"LES YOU CREATE ARE THE ONLY ONES"::"THAT CAN BE TRANSFERRED.":50: 6:1:CS$"WHICH FILE DO YOU WANT?"::N5NR%(0):4:N4". "CS$FL$(N)::NN4 $4:N". "T$(10) )NE%NR%(0)3:CV22:200N.CV3:25:(W$)Nġ:T$(0)"WORD ROULETTE TEACHERS'  GUESSING THE WORD OR PHRASEAFTER EACH CORRECT LETTER GUESS, YOUWILL HAVE A CHANCE TO GUESS THE PHRASE,IF YOU WANT. IF YOU MAKE A MISTAKE,YOU WON'T LOSE ANY POINTS."i "PRESS"ES$" BEFORE A LETTER TO CAPITALIZE,AND PRESS "RT$:16:16:OL THE SPINMOST OF THE TIME!":150:" THE POT OF GOLD":1:23:PT$"IF YOUR SCORE IS NEGATIVE, THE POT OFGOLD WILL RAISE IT TO ZERO. IF YOUHAVE NO POINTS, YOU MAY WIN 100. YOUCAN DOUBLE YOUR SCORE UP TO 1000POINTS, OR WIN 1000 MOR: N81ġ:CP$:10:"SEE YOU LATER!":(4);"RUN TITLE"@ 150:CP$;"IN THE SECOND PART OF YOUR TURN, YOUWILL SEE A WORD OR PHRASE LIKE THIS:"y " ---- -- ---- ----?YOU MUST GUESS A LETTER THAT YOU THINK IS IN THE PHRASE. 0@@ @ a@@p x0  8`108 - `@@ C|@ ~  p88 07 0`@ x | ~x~@@ 0@@@~  p@x~ ``  8  E@0@y|p#@>3@`0`   @~z @ ;08  E80@<8``&@  |@@` 0  `   @ @ @`f p 008  E` 00@8```@x<,p A  @ `@` @@  N@   (@  E@b 0``88pA `p @8 a0 @@@00 @@x `C `@  (x0 F63 ``@p` F,0p@`0`  1 |`@ `@@` @1 < <`   / F|@   H IS ";QO$;CS$FL$".";QO$'zNCV23:mY25:CD$"OPEN"FL$",L70":CD$"READ"FL$",R"QP%:C$:CD$"CLOSE"FL$:0uSF$(1),AZ%(26),SD(1):QO$(34):CD$(13)(4):S1$" ":SE%(806).2u1:CD$;"OPEN VAR,L500":CD$;"READ VAR,R2":CK$,CL$,CP$,CS$,SB$,RET A HINT.":16:"4. ";:SE%ĺCS$"IT'S BETTER NOT TO PLAY AGAINST THE CLOCK UNTIL YOU'RE SURE THAT YOU UNDERSTAND THE GAME.">NSE%0ĺCS$"TAKE YOUR TIME TO DECIDE WHICH LETTER TO GUESS. "CS$"DON'T FORGET THAT THE CATEGORY YOU'RE PLAYING WITE MOST COMMON LETTERS FIRST:"CK$" S, T, R, M, N, L, P, C, D, H"*N8:"2. "CS$"TRY TO GUESS WORDS WITHOUT VOWELS: "CK$"TH"UL$" = THE C"UL$"N = CAN Y"UL$UL$"R = YOUR"4N12:"3. "CS$"TRY TO STOP THE ROULETTE SPIN ON "PT$:14:4:"OR "CK$"G YOUR "QO$CS$"MASTER"QO$" DISKETTE.":50:15990~;CV5:25:10:CS$;"PLEASE INSERT THE "CS$"WORD "CS$"ROULETTE DISKETTE";::"WITH THE FILE YOU WISH TO TRANSFER."::CS$"PRESS THE SPACE BAR WHEN YOU ARE READY.":TI1:Z%2:50:CV5:25;216,0:15900RANSFER"::QO$CS$FL$(F%)QO$::"TO ANOTHER "CS$"WORD "CS$"ROULETTE DISKETTE?":300:WC115050t;TI1:30:8:CS$"WOULD YOU LIKE TO TRANSFER ANOTHER"::CS$"WORD "CS$"ROULETTE FILE?":300:WC2Ĺ216,0:50000/y;WC2CV5:25:10:1:CS$"PLEASE INSERTONE.":50:WC2:15225V;NR%(0)NR%(0)1:FL$(NR%(0))FL$(F%):NR%(NR%(0))NR%(F%):F%NR%(0):XX0:ER%0:BR%0:21000:ER%F%:BR%F%:21000:24000:BR%1:ER%NR%(F%):23000[;11:3:CS$"THE TRANSFER IS COMPLETE.":50_`;CV5:25:8:CS$"WOULD YOU LIKE TO TL$(X)TF$F%X:FL$(F%)TF$:NR%(F%)TN%:ER%F%:BR%F%:XX0:21000:XNR%(0):::15195Z::ER%0:BR%0:XX0:20000:NR%(0)9CV6:25:8:CS$"THERE ARE ALREADY 10 FILES ON THIS"::"DISKETTE. "CS$"YOU MUST DELETE A FILE"::"BEFORE YOU CAN ADD ANOTHER 9:QO$CS$FL$(F%)QO$::"ALREADY EXISTS ON THIS DISKETTE."::CS$"DO YOU WISH TO REPLACE?":300:WC215200:CV5:25:BR%0:ER%0:24000:BR%1:ER%NR%(F%):23000:TF$FL$(F%):TN%NR%(F%):BR%0:ER%0:XX0:20000:BR%1:ER%NR%(0):20000:X1NR%(0):T:FCS$"WORD "CS$"ROULETTE DISKETTE"::"TO WHICH YOU WISH TO TRANSFER THIS FILE."::CS$"PRESS THE SPACE BAR WHEN YOU ARE READY.":50:CV5:25:216,0:15900:Z%1::CD$"VERIFY"FL$(0):Z%0:216,0:15950::CD$"VERIFY"FL$(F%)k:CV5:25:CS$"THE FILE CANNOT BE TRANSFERRED.":50:15220^:TI0:30:10:CS$"JUST A MOMENT, PLEASE."{:BR%1:ER%NR%(F%):22000 :CV5:25:10:1:CS$"PLEASE TAKE OUT THE "CS$"WORD "CS$"ROULETTE"::"DISKETTE CURRENTLY IN THE DISK DRIVE"::"AND INSERT THE "ANY NEW FILES TO IT.":508:TI1:1000:NR%(0)415990:8:1:CS$"YOU WISH TO TRANSFER THE FILE"::QO$CS$FL$(F%)"."QO$::CS$"IS THAT CORRECT?":300:WC2150200:NR%(F%)1CV5:25:10:1:QO$CS$FL$(F%)QO$::"DOESN'T HAVE ANY RECORDS IN IT."::0SE%50;:11:100SE%50;:35:300SE%502:19:PT$:2:26:" LOSE":4:26:"100":8:2:"GET A";:34:"LOSE":10:2:"HINT";:34:"TURN"%15:3:650SE%50;:35:700SE%50:20:2:"LOSE";:26:"FREE":21:11:200SE%50;:19:350SE%50;:35:MIICLİ174::108=LN65LN90MM1::108Ce(7)(7);:MM1:W$(W$,M):HF%0(AP%4AP%12(AP%6QC1))İ35:211CP$:HF%0:X1338:1:X:SQ$:19:X:SQ$:X7196:X:1:SQ$:X:33:SQ$:*3:3:"0"15 YOU USED BEFORE GUESSING IT.THAT IS, YOU WILL WIN MORE IF YOU GUESS"NP%1ĺ"A LONG PHRASE AFTER ONLY A FEW TURNS.":150:4650S "YOU WILL WIN 3000 BONUS POINTS, PLUS ALLTHE POINTS THAT THE TWO OF YOU HAVELOST SO FAR IN THAT ROUND OF PLAY."WHEN YOU ARE FINISHED.YOU MUST SPELL CORRECTLY, BUT DON'TWORRY ABOUT MISTAKES IN PUNCTUATION.":150J" POINTS FOR GUESSING THE WORD OR PHRASE":NP%1ĺ"THE NUMBER OF POINTS YOU MAY WIN DEPENDSON THE LENGTH OF THE PHRASE AND HOWMANY TURNSE AFTER THAT!"n"YOU DON'T LOSE ANY POINTS IF YOUGUESS A WRONG LETTER AFTER THE POT OFGOLD!":1509" GUESSING A LETTERIT IS BEST TO GUESS THE MOST COMMONLETTERS FIRST: S, T, R, M, N, L, P, C, D, HTHEN LOOK FOR LETTERS THAIF YOUR GUESS ISRIGHT, YOU GET A CHANCE TO TYPE THEWHOLE PHRASE.":150:CP$;"THERE ARE THREE ROUNDS OF PLAY IN A" "GAME. A ROUND OF PLAY ENDS WHEN ";:NP%1ĺ"YOU: 1) GUESS THE PHRASE CORRECTLY. 2) GIVE UP BY TYPING CTRL-Q.";CL$;"."A::CS$"BE SURE THAT THE OTHER "CS$"WORD ":CS$"ROULETTE ";:"DISKETTES TO WHICH YOU":"WISH TO TRANSFER A NEW FILE HAVE FEWER":"THAN 10 EXISTING FILES."::CS$"IF 10 FILES ALREADY EXIST ON A":"DISKETTE, YOU WILL NOT BE ABLE TO":"TRANSFER UTILITY MENU":30:10:5:CS$"JUST A MOMENT, PLEASE.":35582:CD$"RUN UTIL-LO"_3F%(W$)4::TI1:T$(0)" TRANSFER A FILE ":30:5:1:CS$"THIS OPTION ALLOWS YOU TO TRANSFER":"FILES WHICH YOU HAVE CREATED TO OTHER":CS$"WORD "CS$"ROULETTE DISKETTES$(16):C$(30):FL$(0)"ROULETTEFILE":T$(10)CS$"GO TO THE "CS$"MENU":LG%70:KS16368:rPú(16):(4)"PR#6"NCD$"OPEN"FL$(F%)",L"LG%:XBR%ER%:CD$"WRITE"FL$(F%)",R"X:QO$C$(X)QO$::CD$"CLOSE"FL$(F%):]:1:CD$"OPEN"FL$(F%)",L"LG%:CD$"WRITE"FL$(F%)",R"0:FL$(F%):NR%(F%):CD$"CLOSE"FL$(F%):[0uQO$(34):CD$(4):CI$(9):CK$(11):CN$(14):CS$(19):CP:FL$(X):NR%(X)::CD$"CLOSE"FL$(XX):R:1:CD$"OPEN"FL$(XX)",L"LG%:XBR%ER%:CD$"WRITE"FL$(XX)",R"X:FL$(X):NR%(X)::CD$"CLOSE"FL$(XX):U:1:CD$"OPEN"FL$(F%)",L"LG%:XBR%ER%:CD$"READ"FL$(F%)",R"X:C$(X)::CD$"CLOSE"FL$(F%):^Y:1:"0>50:CV5:25:Z%1ī15065*:>15230=N>216,0:50000HX>15100v>TI1:T$(0)" WORD ROULETTE TEACHERS' UTILITY MENU ":30:10:3:CS$"JUST A MOMENT, PLEASE."::CD$"RUN UTIL-LO"' N:1:CD$"OPEN"FL$(XX)",L"LG%:XBR%ER%:CD$"READ"FL$(XX)",R"X;Z%1::CD$"VERIFY"FL$(0),;Z%0:15020>216,0:(7);:(7):30:8:CS$"THERE IS A PROBLEM. "CS$"PLEASE CHECK"::"TO MAKE SURE YOU HAVE A "CS$"WORD "::CS$"ROULETTE DISKETTE IN THE DISK DRIVE."&>::CS$"PRESS THE SPACE BAR WHEN YOU ARE READY.(4);"PR#6"B:CK$(11):CL$(12):CN$(14):CS$(19):CP$(16):LG%70:CF$(6):CE$(5):FL$(0)"ROULETTEFILE"~5uKC16368:uHF(A)(40(FL$(F%)))2DuHT(A)(40(T$(0)))2NuPú(16):(4)"PR#6"OTEACHERS' UTILITY MENU ":220:10:5:CS$"JUST A MOMENT, PLEASE.":35582^'CD$"RUN UTIL-LO"0uQO$(34):CD$(4):CK$(11):CL$(12):CS$(19):LG%70:FL$(1),T$(1):FL$(0)"ROULETTEFILE":O1$"ON":O2$"OFF"DuHT(A)(40(T$(0)))2Nu Pú(16):$,X,1))31YYYY1+ JuX:XX((42YY)2):_ uX1(C1$):X1C1$UL$(C1$,(C1$)X):30110 uX(C1$)((C1$,1))64C1$(C1$,X1)UL$:30110 u((C1$,X,1))64C1$(C1$,X1)UL$(C1$,(C1$)X) u((C1$,X,1))32T$"PHRASE" u:!PúT$,ES$,PT$,SQ$,IS$,NS$,ST$,BL$,UL$,KN$,FI$,AZ$^3uZZ16:M$(ZZ):ZZ:KS,KP:CD$;"CLOSE VAR":uCD$"OPEN"FI$",L70":CD$"READ"FI$",R"11:FX%:CD$"READ"FI$",R"13:NP%,SF$(0),SF$(1):CD$"READ"FI$",R"12:FL$,NR%:CD$;"CLOSE"FI$ IuYY0:X1(FL$):((FLժՊժժժՊՊժժժժªҪժժժժCaCaCaCaժԊժЪ՞sgOyCaCyժժժժժ僀ժժժҪՌժҪժժԪҪժժժժժЪժՊf?f~ppժЪժժժ>>pp>ժԪժժժժժժժʪªժŪժժCaGqCqCqԪժԪժվccGqCaCqժժժժժ净ժժժЪժЪժժЪªժժժժժԪժpp~ժҪժժժF~~pp~ժԐժժժनԪժժժՊʪՊժŪժժ¿՚CaOyCyCyժժЪժՊ׾CaCaCaCaժժժժժժժժԪժԪժժªʪժժժԪժԪժԊժҪժժժf~~pp~ժՔՀժժ׾ժՊժժժժʪʪժժŪժժժպCa|||ժժҪժժ`CaCqCa ժժժժժժժժԪժԪժժʪʪժժժ偀              THE LONGER YOU WAIT TO GUESS, THE MOREYOU CAN WIN. BUT YOU MUST BE CAREFUL,"%"BECAUSE YOU NEVER KNOW WHEN THE OTHERPLAYER WILL BE READY TO GUESS AND TAKEAWAY YOUR CHANCE!":150*" QUITTING EARLYIF YOU WANT TO QUIT THE GAME, PREST USUALLY GOTOGETHER:  ING, CK, CH, TH, WH, SP""THEN LOOK FOR SHORT, EASY WORDS: THE, THIS, IS, YOU, A, AND, ARE":150J" BUYING A VOWEL IF YOU HAVE 200 POINTS OR MORE, YOUMAY BUY A VOWEL. THE PRICE OF THE VOWEL,50-20 3) RUN OUT OF TURNS." NP%2ĺ"ONE OF YOU: 1) GUESSES THE PHRASE CORRECTLY. 2) GIVES UP BY PRESSING CTRL-Q"CL$".IF THE TWO OF YOU HAVE THE SAME SCOREAT THE END OF THE GAME, THERE WILL BEAN EXTRA ROUND TO SEE WHO WINS." 1504)"PR#6"U):S$;:(20X):S$;:23:(20X):S$;:(20X):S$;:X X010:1:(11X):S$;:1:(11X):S$;:40:(11X):S$;:40:(11X):S$; *ZZ140:ZZ:X:22:1:S$;:40:S$:23:40:S$;:1: 35582 1:(4);"RUN INTRO" Pú(16):(4);"PR#6":"BY":11:7:CS$"ANITA "CS$"MIRES AND "CS$"LAURA "CS$"SAVELY" 13:16:"ONE OF THE":15:9:QO$CS$"WORD "CS$"ALERT!"QO$" "CS$"COLLECTION" 19:9:CS$"THE "CS$"REGENTS/"CK$"ALA "CS$"COMPANY":21:14:CS$"COPYRIGHT 1984":40004 X019:1:(20X::ZZ12500:ZZ:(16)W S$"*":T$(1)"WORD ROULETTE":QO$(34):CS$(19):CK$(11) 2060:3:14:T$(1):14:N1(T$(1)):"-";: 6:5:CS$"A "CS$"WORD-"CS$"RECOGNITION "CS$"STRATEGY "CS$"GAME":5:"--------------------------------"? 9:20  FPHH`$20642 "START"[ SECOND TITLE PAGE OF WORD ROULETTEp BY ANITA MIRES COPYRIGHT 1984; THE REGENTS/ALA COMPANY 50000_36354:(16)::16302,0 l(1101)6Ģ24::7:"BE SURE CAPS LOCK IS DOWN.";   (16):(4);"PR#6"KSLKJ <"<"""<< <"""<"><$""< """"  "" 6***""""""""""<""< :< $"""2,"""""**6"""""< >>8  80,1ABCDEFHI"*:<"">""""""""""""">>><2"<""">""" ""  ">"6**"""""&*2""""""""""""*,"" "" ">""""""""""""""**6"""""""> >>> >00000>">>< (&20 *, **>> "2*&" " >>  ">> "8""> """"""< >> "$! $%%#,ep% !Lp"% $`"H ͒*+)hi#"H ͒!*0+i+icH#c hc`"%$$%H hi#`$% ͒b,c*+Md,cPMb*!0 +i+`%J) a+ߒje *`PPPP򠥹͠0sL"$!e (' !!%##`e`" e$$ ",q0rs(!#L"L$a - $ `L `,fPfA[8 & & &mg)mh ˒e$*+Md$(Mb,cp ,bpP!pA* +i+Md$qr"s`,Ta@0,U`* L" zLB$!$$"% %L"b`f`f`,,Lҩb`@``cd` pLXcd`r$s%L$tc`d`f`e`Yc`d`L$e (' 8!$!$%",qLǎ !%# !Lǎ5 (5`)`W L{ IHHH``F}я"*?GOWrzȐFՐF*Q$``1  emgh` a` ,q0qai$r%s`@a`r$$hLcd`,qSiaLL L$L$ B `t8967 ,R,W T ,P`ɭӠҠΠΠ ((*)  a+*HN OI*P,h*,H,_0ɛ_ ɍ $h`ɐ 6+_ pLǎ Lǎ z@@@@@@@@@@@@@@@@@@@@@@ @ P(I*U*U  @0 `@@@@   @B$ @  ~AAAA~T]EEYJJKZ?A@A@A@?<.~<|$BN !!c \,L 6<~<~> ?|<~,L 6 ]U]MU]HIHI:*:+@IKMII@@~MeEMaҒaп~]EM]   5,930:PG%13000,10:H CS$"NO, "QO$CS$W$QO$" ISN'T IN THIS "T$".": CS$"SORRY, BUT "QO$CS$W$QO$" IS NOT IN THE "T$".": CS$"SORRY, THAT'S NOT THE CORRECT "T$".": HH%1:CV19:25:X(13(1)):X1060,1065,1070:2300:30I SDSDDP%:SP  FPHH`$2064H(121)256(122):L(560)256(561):L1,(H1):L2,(H2):L3,0:L4,0:L5,0:104,8::15 "ROULETTE-HI" CV19:25:X(12(1)):20:1:WG%910,10,950,10:CV23:QCNT%HH%150: X92    !!! ! ! ! ! !!!!!!!"" 1,6:901:7fZZ136808:0,255ZZ:1,10:901:ZZ:lN114:ZZ:N:N18:X,Y:0,X:1,Y:901:N::` 0,100(1):1,4:901:0,(37)5:1,6:901: Y10 ZZD%Y:ZZ25YY10:2510  B40:XSDSDD%Y:BB4:3:29:S1$;:(34(F$",YOU LOSE A TURN."CS$"TURNS LEFT: "NT%QC"":CV17:NT%QC0WG%3:50:400::6032_EzZZ1175SE%50:ZZ:X19:0,155(37)4:1,5:901::4X14:2120::H0,155(37)5:1,5:901R0,100(1):1,4:901 \0,(37)5:0 POINTS, IS SUBTRACTED FROM YOURSCORE, BUT YOU CAN WIN THE POINTS FROM""YOUR ROULETTE"CL$" SPIN. REMEMBER, IF YOU GUESS A VOWEL THATISN'T IN THE WORD OR PHRASE, YOU LOSETHE PRICE OF THE VOWEL AND THE ROULETTE"CL$"POINTS.":150":" THE ROULETTE SPINPRESS "SB$" "CL$"TO START THE ROULETTE SPIN.THEN PRESS "SB$" ";CL$;"TO MAKE IT STOP.IT WILL STOP TWO, THREE, OR FOURSQUARES AFTER YOU PRESS "SB$"."F"WITH SOME PRACTICE, AND A LOT OF LUCK,YOU WILL LEARN TO CONTR.  FPHH`$20640 "HOW"h INSTRUCTIONS FOR WORD ROULETTE ACCESSED FROM MENU BY LAURA E. SAVELY COPYRIGHT 1984; THE REGENTS/ALA COMPANY 50000C CL$(12):PT$"1"CL$"ijkl mnop 0":QU$(34):ES$"11900       !":CV23: xWG%0:SDSDD%:10:10:"0"CS$"I'M SORRY, YOU LOSE"D%" POINTS, BUT YOUGET TO SPIN AGAIN.(YOUR SCORE: "SD")":CV17: WG%2:10:10:"0"CS$"LET'S SEE IF YOUCAN GUESS THE "T$".":CV17:50:400:Y@10:10:"0"CS$"SORRY, "CS$S OF GOLD!YOU MAY WIN "D%"POINTS!":CV17:c X1(C1$):(C1$,X,1)UL$W$(C$,X,1):X(C1$)i  (10:10:"0"CS$"YOUR HINT IS THELETTER "QO$CS$W$"."QO$"":500:CV17:50:400:C1$C$ġ:6014 -19:3:CS$;"HERE IS THE "T$" WITH YOUR HINT.CK$"0O.K., "CS$SF$",NOW YOU CAN WIN"D%" POINTS!" QSDD%0Ģ13:10:CS$;"0";CS$;"IF YOU GET IT RIGHT,YOU WILL HAVE "SDD%"!" RCV17: PG%1:D%SD:D%0D%100 D%1000D%1000 D%0D%(D%)- 10:10:"0"CS$"YOU HIT THEPOT%100:N13:22:3:29:S1$;:22:(34((SD))):SD:2100:N:CV23:50:| $CS$"THAT'S IT! "CS$"THAT'S THE RIGHT "T$"!": )CS$"GOOD WORK! "CS$"YOU JUST WON "DP%" POINTS!": .CS$"THAT'S THE "T$" "CS$"I WAS THINKING OF!":6 LD%D%SE%50:9:10:ōΠŠō͍ōՍčӠӍ΍ӠӍӠӍΠԍӠӍ΍ӠӍ΍ӠӍ΍ōԍΠŠōԠٍΠōō  :CD$"CLOSE"FL$:Q0uAZ%(26):QO$(34):CD$(13)(4):S1$" ":SE%(806)2u1:CD$;"OPEN VAR,L500":CD$;"READ VAR,R2":CK$,CL$,CP$,CS$,SB$,RT$,ES$,PT$,SQ$,IS$,NS$,ST$,BL$,UL$,KN$,FI$,AZ$3uZZ16:M$(ZZ):ZZ:KS,KP:CD$;"CLOSE VAR"p:uCD$"OSURE THAT YOU UNDERSTAND THE GAME.">NSE%0ĺCS$"TAKE YOUR TIME TO DECIDE WHICH LETTER TO GUESS. "CS$"DON'T FORGET THAT THE CATEGORY YOU'RE PLAYING WITH IS ";QO$;CS$FL$".";QO$zNCV23:Y25:CD$"OPEN"FL$",L70":CD$"READ"FL$",R"QP%:C$ GUESS WORDS WITHOUT VOWELS: "CK$"TH"UL$" = THE C"UL$"N = CAN Y"UL$UL$"R = YOUR"&4N12:"3. "CS$"TRY TO STOP THE ROULETTE SPIN ON "PT$:14:4:"OR "CK$"GET A HINT.":16:"4. ";:SE%ĺCS$"IT'S BETTER NOT TO PLAY AGAINST THE CLOCK UNTIL YOU'RE PRESS "QO$;CS$"M"QO$::"WHEN YOU SEE "SB$;CL$" TO GO BACK TO"::"THE MENU.":CV23:50:25:5010 NCP$:2:CS$"WINNING AT "CK$"WORD ROULETTE:1. "CS$"GUESS THE MOST COMMON LETTERS FIRST:"CK$" S, T, R, M, N, L, P, C, D, H"Y*N8:"2. "CS$"TRY TO$;SF$;", BUT YOU CANNOT ENTER"::"THE "CS$"HALL OF "CS$"FAME WITH A SCORE OF "SD".":CV23:50bCP$:8:CS$;"WOULD YOU LIKE TO PLAY AGAIN?":300:WC2ĺCP$:10:CS$"SEE YOU LATER, "CS$;SF$"!":CD$"RUN TITLE"bgCV10:25:11:CS$"REMEMBER THAT YOU CAN114,78:12:(24((SD))):SD:SD1000700016:1:CS$"IN JUST A MOMENT, WE'LL SEE IF YOU"::"CAN ENTER THE "CS$"HALL OF "CS$"FAME.":1:CD$"OPEN"FI$",L"70:CD$"WRITE"FI$",R"14:SF$:SD:CD$"CLOSE"FI$1:CD$"RUN FAME"^X16:1:CS$"SORRY, "CS500SE%50:22:3:"50";:26:"GUESS"qKS,0:KP,0:CK$:AP%0Ģ8:11:CS$"0WELCOME TO"CK$"WORD ROULETTE!"12:11:"0";CK$"SPACE BAR"CL$" TO START";:K(KP)128:K32218KP,0:212SLOW0:35:12:11:CK$"SPACE BAR"CL$" TO STOP"S "QU$"Q"QU$"WHEN YOU SEE "SB$". IF YOU WANT TOCHOOSE A DIFFERENT OPTION FROM THE MENU,PRESS "QU$" M.";QU$;"IF YOU PRESS CTRL-Q"CL$" WHILE TYPING YOUR"+"ANSWER, THE COMPUTER WILL SHOW YOU THEWORD OR PHRASE AND SET YOUR SCORE TO 0."4".":30:D%SD:2500:3000oWG%4ĺCS$"YOU WIN THIS ROUND, "CS$SF$"!":WP%3ĺ:CS$"LET'S PLAY ANOTHER ONE."CV23:50:CV20:25:WP%35030,CP$:8:1:CS$"WELL, "CS$SF$", THE GAME IS OVER AND"::"YOUR SCORE IS:":114,78169,78169,105114,105WG%3İ2000:900*AP%9WG%45065BQCNT%WG%45050ZHH%1:CV17:25:CVGU%WG%4ĺCS$"SORRY, BUT THAT WAS YOUR LAST TURN.":CV23:50:CV17:25:CV:CS$;"THIS IS THE "T$".":30GU%Ė3:CS$"GIVE UP? "CS$"I'LL SHOW YOU THE "T$10:CV23:HH%1:50:6030.{WG%1İ900:6030D|WG%2İ430:3100V~C1$C$WG%4WG%2CV17:25:CV2:1:CS$"DO YOU WANT TO TRY TO GUESS THE "T$"?":CV4:7:"("CS$"YOU CAN WIN "DP%" POINTS.)":300:WC1CV18:25:CH3:100WG%4İ100050RAP%6000,6000,6000,5065,6000,5050,6000,6000,6015,6000,6000,5065,6000,5065|p400:845:VB%İ4000:845:VB%06000qVB%İ4100s2500:NA%6005t500uVB%0:6:(39((QC))):QC:37:" ";:(39((NT%QC))):NT%QC:NA%ĴPG%13000,5035VQC0:23000:775QP%,1:WP%WP%1:NT%(((C$)2)3)7:C1$C$:T$"WORD":30100jDP%300NT%500QCQC1:QC1DP%DP%300PG%0:WC0:HH%0WG%0:200:AP%1100,1100,1200,1400,1100,1600,1100,1100,1500,1100,1100,1400,1100,1300:AP%9W$"I"VB%150:41403W$"O"VB%100:4140F"W$"U"VB%50R,3200:WP%0:CV20:SD50:ZZ0:N776775NR%:(N)0ZZZZ1N:ZZ3āN776775NR%:N,0:NGU%0:X1(AZ$):AZ%(X)0::K1$KN$QP%(1NR%(1)):(775QP%)0ī:"0":X26:X:2:" "::4:2:CS$"VOWELS":2400:4:"A = 200":SP%500:22:2400:4:"E = 200":22:2400:4:"I = 150":222400:4:"O = 100":22:2400:4:"U = 50":SP%1000:22:AZ%(KP%)1ı W$"A"W$"E"VB%200:4140(X))):X;* 0,B:1,10:901:X:29:S1$;L SDSDD%:(34((SD))):SD: B200:XSDSDD%Y:BB4:3:29:S1$;:(34((X))):X;& 0,B:1,10:901:X:29:S1$;0 SDSDD%:(34((SD))):SD: SDSDVB%:29:3:S1$;:(34((SD))):SD:2150"Y"G$"N"300"6G$"Y"WC13@G$"N"WC29Ee^KP,0:K(KP)128:K17GU%1:::6032cVB%K47VB%0:CV16:25::eVB%K65K69K73K79K85385hVB%K47SD199VB%1:CV16:25:SP%1000:22::mVB%(K66K69K40:1,4:901:VA:HA:NS$[SLOW0K(KP)128:K32SLOW1:P%AP%:X%2(1)3:35:210SLOW1(AP%P%X%AP%P%X%14)ġ:232 130,100,145,55,151,55,130,55,97,55,86,55,75,130,97,75,CV23:25:KS,0:23:18:CK$"(Y/N) ";:G$1G$AP%9AP%14āP15:HA:VA:IS$:2120:HA:VA:NS$:2120:P:AP%4AP%6AP%12āP1704010:HA:VA:IS$:0,255P:1,10:901:HA:VA:NS$::P4018020:HA:VA:IS$:0,255P:1,10:901:HA:VA:NS$::AP%AP%1:VA:HA:IS$:0,160(1)KS,0:KP,0:AP%00VA1:X1338:HAX:250:XQHA33:X7196:VAX:250:XsVA19:X2598:HAX:250:XHA1:X1976:VAX:250:X220 150,100,0, 100 ,300,0,700,500,0,350,200,50,650,0255:X1AP%:D%::>AP%3OOK AT THE MENU..."r CD$;"OPEN"FL$(0)",L70":CD$;"WRITE"FL$(0)",R"13:NP%:X1NP%:SF$(X)::CD$"CLOSE"FL$(0)& 35582:1:CD$"RUN MENU"Pú(16):(4);"PR#6"0:1:CS$"WOULD YOU LIKE TO CREATE A NEW FILE?":300:WC8000,800a vRENR%(F%):NR%(F%)06050 w12:1:CS$"THIS FILE HAS NO RECORDS IN IT YET."::CS$"DO YOU WANT TO ADD SOME RECORDS TO IT?":300 xWC1RE0:RB0:NRB1:EF%0:AF%1:T$(0)" ADD TO%  FPHH`$2064H(121)256(122):L(560)256(561):L1,(H1):L2,(H2):L3,0:L4,0:L5,0:104,8::15 "UTIL-HI"pEF%1:RA%1:WL%35:AA(0):T$(0)" EDIT A FILE ":TI1:30:1000:NR%(0)46006A rCV5:25:11$,1))64C1$(C1$,X1)UL$:30110\u((C1$,X,1))64C1$(C1$,X1)UL$(C1$,(C1$)X)~u((C1$,X,1))32T$"PHRASE"u:Pú(16):(4);"PR#6"PEN"FI$",L70":CD$"READ"FI$",R"11:FX%:CD$"READ"FI$",R"13:NP%,SF$:CD$"READ"FI$",R"12:FL$,NR%:CD$;"CLOSE"FI$IuYY0:X1(FL$):((FL$,X,1))31YYYY1JuX:XX((42YY)2):uX1(C1$):X1C1$UL$(C1$,(C1$)X):30110#uX(C1$)((C" "