' +JJJJ ?\>m0M='+l> /+l   d]@ŵLҦ]]LF L}BBL]렮 鷎귭෍ᷩ췩緈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[`12346: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`SAVLOAINIRUCHAIDELETLOCUNLOCCLOSREAEXEWRITPOSITIOOPEAPPENRENAMCATALOMONOMOPRINMAXFILEFINBSAVBLOABRUVERIFp!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]]`A"A$"a"A5:95000D%A$"Z"A$"z"A6:9400AN%(7);:9020N% XD SCh%SCQ1IQ2,Q3JQ4:{2:936:10:12(CLUE$)0ĺ"OLD CLUE: ";CLUE$212:"ENTER CLUE.":(CLUE$)0ĺ"(OR PRESS RETURN FOR NO CHANGE.)"2A$:(A$)0ı20}#SYZS:35000##CU1İ40000-#A3:7#9600k#A9520,9520,9200,9300,9500,9400,9067,9530,9530~#II1:I0I3#9020T$II1:I3I0^$9020$JJ1:J7J0$9020%JJ1:J0J7&%90200%CU1İ400002%:%A$"3ı h(# AS(*#0:ZS1MX9008],#936:"TOO MANY CHARACTERS. CAN'T ADD ANOTHER."h-#26000n.#0#5000:0:I0:J0<#9600:21500:9100k#MD1n#ZSZS1:S%(ZS)J4I296x#X%(ZS)QX:Y%(ZS)QY:XS%(ZS)XS:YS%(ZS)YS:R%(ZS)R:V%(ZS)İ40000A2:%JI1:J1JZS:40000:IJ:4030NJI1:JZSJ1X4085rA3:SYI:CU1İ40000x R4000A3ıJI:V%(I)1:18000A3: UAZS0ıSY1ZS:V%(SY)0::@ CHGJ4000TAYY1 QYY2QYY2 # S:5000:CU1İ40000JZS0A3:RI1QXX%(I):QYY%(I):XSXS%(I):YSYS%(I):RR%(I)4000021000:A4060,4070,4080,4090,4080,4090,4100,4090,4055(7);:4050CU1İ40000A1:CU1( KZKY:KY(49152):KYKZKY1282520F2 DD0DD1:DXDX4:DYDY4Y< 49168,0:2572nF A3:CU1İ40000tP } SA ZS0ı SY1ZS V%(SY)13100 V%(SY)1 SY&   45000:QXX1QXX1 QXX2QXX2 QYY1Q550,2560,2570,2630,2525/ A$"A"A$"a"2560G A$"Z"A$"z"2570X (7);:2520^ s DX1:DY0:2572 DX1:DY0:2572 DX0:DY1:2572 DX0:DY1 MD1:35000 QXX%(SY)DX:QYY%(SY)DY:3500 X%(SY)QX:Y%(SY)QY:35000'IR%(SY)16:I48I0(MD1:35000ZQXX%(SY):QYY%(SY):XSXS%(SY):YSYS%(SY):RId3500X%(SY)QX:Y%(SY)QY:R%(SY)R:350002010A3: M CU1İ40000 XSXS%(SY):YSYS%(SY):RR%(SY) DD0:21000:A2530,2530,2540,224000:4000:A550,602,6106ZA$"SELMOV":50000:600[bMU8:24000:2500:A550,612,280tdA$"MOV":50000:610| RCU1İ4000021000:A2020,2020,2030,2040,2030,2040,2050,2040(7);:2010IR%(SY)16:I0I482041500:A280,520,530.A$"REMOVE":50000:5007280Z&MU4:23000:A280,560,570,600v0A$"ROTMOV":50000:550:MU6:24000:4000:A550,571,572;A$"SELROT":50000:570<MU7:24000:2000:A550,574,280>A$"ROT":50000:572XMU6:0,420!A$"SETCUR":50000:3901MU2:24000K51000:A390,440,280eA$"TEXT":50000:420MU1:24000:41000:A370,470,490A$"SETCUR":50000:460MU3:24000:9000:A460,492,280A$"SPECIAL":50000:490MU5:240004:280 619000:TB15008 814010:13010:13000:280L @MU4:24000:A$\ JA$"?"300e T280 ^20000:A280,360,370 hA$"PARMS":50000:350 rMU3:23000 |A350,382,390,460 ~A$"NORM":50000:370 MU1:2400041000:A370,41NTRO":50000 DT0% MU1:23000@ A210,240,250,310,230U 17000:TB1500^ 210x A$"MAIN":50000:210 19000:TB1500 14500 PF0210 13010:13000 MU2:23000 "A210,300,350,500,550,320,230 ,A$"ADD1":50000ŠҠՍàŠנōŠԠΠǠōĠŠȠǍĭŭŭנՍĠӠϠ΍ҠŠӠ͠΍àŠӠΠ΍֠נ΍Ġ̠Ҡ̠ҍΠ      ES FOR YOU TO":"EDIT, AND YOU DON'T HAVE PERMISSION TO":"EDIT EXISTING PUZZLES. SORRY":26000o PZ017090 3:232,T6:233,T5 Q1214:Q216:Q30:Q418:J07:I03:J4I2Q1IQ2,Q3JQ4:: 49232,0:232,T4:233,T3:QX8:QY140 A$"I2V1:M$(KS,0)(jOKSKN:20040%(O=(OKNKS1:KNNMKN1H(O20320N(PV(PA3a(P52000g(Pm(xPu(}PA1(~P52000(P(P(PA2(P(@Q(JQLS(KS)LS(KS)1:LS(KS)NV(KS)LS(KS)1(TQ20060(Q(Q(7);(Q20070(R CM) 1:20(A$)21::A$;3'HNH1:KS2V1::M$(KS,0)>'JN20070U'RNLS(KS)0LS(KS)1'\NH2:KS2V1::40H2);:H2:"= ";M$(KS,LS(KS))'fN21000'pNA20600,20700,20300,20400,20300,20400,20500,20800,20900'LO'VOKNKS1:KN0KNNM(`O:H1:KSITEM"H&/NV3V32:3:V3::"RETURN";::10:"PRESS RETURN TO GO ON TO";n&0NV3V31:10:V3:"THE NEXT STEP";t&1N&3NIM1NM:H1:IM2V1:M$(IM,0);&4NLS(IM)0LS(IM)1&6NH2:"= ";M$(IM,LS(IM)):&>NKS0KS1&@NA$"SET TEXT PARAMETERS"'BN THE ESC KEY TO GO BACK";R%*NV3V31:10:V3:"TO THE PREVIOUS MENU";:TY120013e%+NV3V32:3:V3%,N:"SPACE";::10:"PRESS SPACE TO MAKE A CHANGE";%-NV3V32::3:V3:"<- ->";::10:"USE THE ARROW KEYS TO CHOOSE";&.NV3V31:10:V3:"A MENU ";:40:" ";:I1$#NTY0G$$N1:24:39);:2039,32::2:20005:20019]$%NV311:TY1V313$&N2:V3:"======================================";$'NV3V31:3:V3::"?";:10::"PRESS THE ? KEY FOR HELP";$(NV3V32:3:V3::"ESC";:10:%)N"PRESS18100c#FS%(I)S%(SY):X%(I)X%(SY):Y%(I)Y%(SY):XS%(I)XS%(SY):YS%(I)YS%(SY):R%(I)R%(SY):V%(I)0k#FSYv#FZSI:#8J CHK#=JTB0#BJMD0ı#LJMU4:25000#VJ48000#`JA$"Y"İ16000#jJ# N TAP#!N:936$"N:40);:I1223:1:I1:" -"B"ARE YOU SURE YOU WANT TO QUIT (Y/N)? ";B"B48000:A$"N"ıM"B44000"BLOC20491:LOC1,0:103,LOC(LOC256)256:104,(LOC256)"BCR$;D$;"RUN FRONTEND""PF DC"ZFI0:ZS0ı"dFMD1:SY1ZS"nFV%(SY)1İ35000:18100#FII1:ISY$"0"A$:16330?I^C?ZC016225H?I1ZC:D$;"WRITE \";FF$;",R";PZMXIZAL?A$(CLUE$,(I1)141,14)N?(A$,1)" "ĺ"_"(A$,(A$)1):16220R?A$\?Ia?ZN016255% f?I1ZN:16070>B$A$>A$(ZC)<>(A$)3A$"0"A$:16100R>B$B$A$:A$(ZN)p>(A$)3A$"0"A$:16120?B$B$A$:A$(ZS) ?(A$)3A$"0"A$:16140?B$B$A$ ?B$%?ZA016195*?I1ZA:D$;"WRITE \";FF$;",R";PZMXI.?A$(AN14:ZC(T):ZCTZCZC1">ZN0<>ZAZCZNZSMX16048o>936:"PUZZLE IS TOO LONG. DELETE SOMETHING.">26000:TB1>>TB0:42000>CR$;D$;"OPEN \";FF$;",L16">D$;"WRITE \";FF$;",R";PZMX>B$"":A$(ZA)>(A$)3A$"0"A$E FREE PUZZLES AVAILABLE!"%826000+8B8PZPF:3000:18000Z8ANSWER$"":CLUE$""e8MD0:n> SP>(ANSWER$)0İ13010>(CLUE$)0İ13000>PZ016027>PZ1PZ400PZ1>T(ANSWER$)14:ZA(T):ZATZAZA1>T(CLUE$)Z,1)#6PZ200A$(G1$,PZ200,1)56A$"1"140306936:12:"PUZZLE ";PZ;" DOES NOT EXIST.":"PLEASE TRY A DIFFERENT NUMBER."626000:1401063000:18000:3100068 ENP8PF0:490008PF0145608936:(21):(1):"NO MOR:20:15);:20,6B$:B$;:B$(27)A1:I6B$CR$A$A$B$:14012i6(A$)0PZ0ĺ(7);:14011|6(A$)0A3:6EO:319106PZ(A$):E0PZZVPZ(A$,1,(A$))6319006PZ0145006PZ1PZ400140106PZ200A$(G0$,PMD1:CLUE$A$:"2:936:10:1I2(AN$)0ĺ"OLD ANSWER: ";ANSWER$212:"ENTER ANSWER.":(ANSWER$)0ĺ"(OR PRESS RETURN FOR NO CHANGE.)"2A$:(A$)0ı2MD1:ANSWER$A$:6 EP6190006PM0145006MU3:250006A$"":20)((A$,14,2))4yV%(QI)0-4ySYQI:3500054zQIR4 zD$;"CLOSE \";FF$:216,0X4za48| ERo4B|EE(222)4L|EE5319004V|936:21:1:"(NEW PUZZLE)"4[|QI11000:QI4`|ZS0:ZA0:ZC0:ZN0:ANSWER$"":CLUE$""4e|E1:4t|"5|"ERROR: ";ZC:ZN1311823yQI1ZND3yD$;"READ \";FF$;",R";PZMXZAZCQIW3yA$:QN$QN$A$_3yQIo3yZS131245|3yQI1ZS3yQ$;TTQI4yA$:S%(QI)((A$,1,3)):X%(QI)((A$,4,3)):Y%(QI)((A$,7,3)):XS%(QI)((A$,10,2)):YS%(QI)((A$,12,2)):R%(QI 2eyQI1ZA2fyQ$;TTQIE2hyA$:(A$,1)"_"A$" "(A$,(A$)1)\2iyANSWER$ANSWER$A$d2jyQIq2ryCLUE$""2wyTTTTZA:ZC1311402|yQI1ZC2yQ$;TTQI2yA$:(A$,1)"_"A$" "(A$,(A$)1)2yCLUE$CLUE$A$2yQI2yQN$""3yTTTT901vu1u1y1yMD0)1"y31800I1JyCR$;D$;"OPEN \";FF$;",L16"u1TyQ$D$"READ \"FF$",R":TTPZMX:Q$;TT}1XyE01ZyE0ĄA$:310701\y310751^yZA((A$,1,3)):ZC((A$,4,3)):ZN((A$,7,3)):ZS((A$,10,3))1cyANSWER$""2dyZA1310900040 0Ru.0Xu43000:D$;"OPEN \";FF$;",L256"I0buD$;"READ \";FF$;",R0"R0luG0$m0nuD$;"READ \";FF$;",R1"v0quG1$0su(G0$)200(G1$)200300700tuD$;"CLOSE \";FF$1uu936:"PUZZLE FILE DIRECTORY IS CORRUPTED.":"TRY ANOTHER DISK.":26000:170 ID/:uD$;"BLOAD ]ANF,A";T1H/;uT2(T1)2T1:T2(T2)256(T21)T1d/uT5(T2256):T6T2256T5/DuFF$"LWELL":WHOSE$"P"FF$"USER"/NuD$;"BLOAD ]LWELL,A";T2/PuT7T2(43616)256(43617)0QuT781923V^I11N2%(MU)*.`^1:I120:M2$(MU,I1);2.j^I18.t^A.a T3~.a936:K10N3%(MU)2:I1N3%(MU):A$M3$(MU,I)::L(A$).a(A$,1)"*"LL1::A$(A$,L).aK:21L2:A$;:KK2::.e DY.e(7);"PRESS RETURN TO CONTINUE.";:A$.e/0u1N1%(MU)'-`]A$(M1$(MU,I1),1)KNI1/-b]I1@-d]KN023320K-f](7);V-p]23100^-] 2t-]49239,0:49232,0-]:936-]1:24:-^"RETURN";:-^"=DO NEXT STEP, ";-^-$^"ESC";:-.^"=CANCEL, ";:-8^-B^"?";:-L^"=HELP";.23500,23900,23900,[ BK8,[KNKS1:KN0KNN1%(MU)W,[:H1:KS2V1:M1$(MU,KS)h,"[KSKN:23082q,h[ FW,r[KNKS1:KNN1%(MU)KN1,|[23320,[,[NC%(MU)KS,[AKS2,[,0\,:\A1,D\,\ HELP,\A2,\,\] -^]KN0:I11:" ";:40:" ";:I1_+Y1:24:39);:2039,32:1:21(M1$(MU,0))2:M1$(MU,0);::KSNC%(MU)n+YKS0KS1~+ZTY1:20005+ ZI11N1%(MU):3:I121:M1$(MU,I1);:+*ZH1:KS2V1::M1$(MU,KS)+˭LS(2)3YSYS1AHR16(LS(3)1)AMVX13XS:VY16YSBR˴LS(4)52060,52070,52080,52090,52100,521(7);:51010#@ǭFG1ĺ(7);:510104@MD1:ZSZS1D@S%(ZS)A31\@X%(ZS)QX:Y%(ZS)QY@XS%(ZS)XS:YS%(ZS)YS:R%(ZS)R@SYZS:35000:40000@QXQXVX@QYQYVY@ǭQXX1QXX2QYY1QYY2FG1@ǭFG0İ40000@ǫ51010@ȭZS151080T TEXT?:ǹ232,T4:233,T3%?<ǰ450006?>ǭCU0İ40000??@FG0G?BǾA$S?LA(A$)b?VǭA851200s?`ǭA2751050?bǭCU1İ40000?dA1:?jǭA6351060?lǭCU1İ40000?nA2:?tǭA1351070?vǭCU1İ40000?xA3:?~ǭZS1MX51100 @Ǻ>íE150034>íI1500606>Þ:1:21((A$)2)A>úA$;:L>ë50070v>í(A$,1)" "(A$)1A$(A$,(A$)1)>Ö1:I:A$;>ÂI>úCR$;D$;"CLOSE ";H$>Þ>Ö1:24:"PRESS RETURN WHEN YOU FINISH READING.";>þA$>ñ>E1:?8Dz GE="SEARCH",G1$,"0",PF.=PF0PFPF2004=:=Pò]=UÉ:936:H$"H "A$:E0:50900y=díE0ĺCR$;D$;"OPEN ";H$=níE0ĺD$;"READ ";H$=píE050040=rúD$;"CLOSE":"NO HELP AVAILABLE FOR MENU ";H$=sð26000:=xÁI123>íE0į"INPUT",A$ <X2XH2<Y1YLYS162)< Y2YH2/<;<X1XL2M<X2XHYS162_<Y1YLXS122k<Y2YH2q<"w< :K 49232,0_ 232936:(6):(15) x"WELCOME TO":::(12):"MIND OVER MATTER":::(13):"PUZZLE EDITOR.": 936:(10):"PLEASE WAIT A MOMENT WHILE I GET READY." 44000 30000 51000: PM1152. 49000:PZPF PZ0Č936:21:1:"THERE ARE NT3k2D10:D21:D310z<VX12:VY0FXL0:YL0:XH210:YH159P:1:0RZ3:XL,YLXL,YHXH,YHXH,YLXL,YLdCS1:CL5oDV1pMX64 rS(MX),X(MX),Y(MX),XS(MX),YS(MX),R(MX),V(MX)6 tD$(4):CR$(13)E uWHOSE$"P"c v49233,0:??(175)256(176)46-PM(228)2149 T12048WT3(T1256):T4T125610,52120,52130B\VY0:+BfVX0:VYVY:6BpVX0:CBzVYVY:IB˱[BVXVX:VY0:hBVXVX:|BVXVX:VYVY:ՠŠϠŠōӠŠǿĠӍ΍ΠՠŠٮȠŠĠՠŠϠԿҠҠΠĠҠӍ΍ҠϠŮԠƠŠӠ΍ŠŠ͠ŠҠթՠŠŠӠϠӠōĠR+@(175)256(176)46&@384009@G$(1),PL(400)G@BT0:BL3h@D$(4):CR$(13):DCHAR$" "@COUNT0:ERASE0:GUESS$"":CS$"/-\!":AMPT0@936@BTBT1@ BT1İ3000@<1000@F4000@KBT1İ5000:100\AN936:21:1:"WORD              LOC163841K LOC1,0:103,LOC(LOC256)256:104,(LOC256)i (4);"RUN PUZZLE EDITOR"50SESOUND EFFECTS.RM FQP,0EQ,0`^_:ʽe^^e__l^" ަư8^_氠^LQ^P^i^_^Ѹ "^eP^_eQ_ ȱ^G"SE",20,0:J130::6G(175)256(176)46LG@D$"RUN FRONTEND"X30:Y70:A$"MATTER":33000"F}sFS((A$,1))1: IF S = 39 THEN XDRAW 100 AT X,Y: GOSUB 34000: GOTO 33005FSS30:100X,Y:34000F퀭(A$)1ıFI2(A$)FXX10:S((A$,I,1))1:34000FI:FЄS:99FڄSOUND$"ON"İ36000G:20310:KELO40000+EVO1O1,O2:1LX,LYAE`O1O3,O4:1RX,RYNEjOI1INCfEoOSOUND$"OFF"20350tEtO"SE",5,0E~OI:O1LX:O2LY:O3RX:O4RY:EyD$(4)E"y4:0:1:232,0:233,97E,yX30:Y30:A$"MIND":33000E6yX30:Y50:A$"OVER":33000F@y,199,81,DNMUSIC$"OFF"İ2000:C11000:CHDNI18:RX(I):RY(I):IDO 184,76,184,76,184,77,183,78,183,78,182,79,182,80,182,80D$OO1LX(1):O2LY(1)D.OO3RX(1):O4RY(1)D8OINC15D=O232,0:233,100 EBOK18:LXLX(K):LYLY(K):RXRX(K):RYRY(K)33,100CN0:0:1+CN1184,76:1203,776CN31000NCNSOUND$"OFF"20200kCND$;"BLOAD PLAYER,A$300"CND$;"BLOAD M.SWESQUE,A$7700"CN2000CN30,0:31,119:768CNI18:LX(I):LY(I):IDN 203,77,203,78,203,79,203,80,202,81,201,81,200,81PICDRAW"+BHND$;"BLOAD LBRPROF.SPC,A23040"7BRNL23040QB\N36352,L(L256)256eBfN36353,(L256)uBkN:16302,0BpN36400BuN1000BzNX2560025616BNABNX,ABNXBN 1,0,4,0,63,46,46,37,37,60,60 ,247,45,21,30,7,0CN232,0:29:22:"ROSLYN HEIGHTS, NEW YORK";EA9:23:"ALL RIGHTS RESERVED"SA16301,0YAcA936A10:21:"WRITTEN BY:";:4:23:"MICHAEL HEINS, DENEEN MELANDER,";:13:24:"AND DAVE MARK";A1:1:" "AA ND$(4):R$(13)B>NR$D$;"BLOAD   TYPE 3 MENU 936/ K10N3%(MU)2@ I1N3%(MU)Q A$M3$(MU,I)_ :L(A$) $(A$,1)"*"LL1::A$(A$,L) .K:21L2:A$; 8KK2 BI? M3$(8,8),N3%(8)#N3%(1)6WM3$(1,1)"PLEASE TURN THE DISKETTE OVER TO THE"(M3$(1,2)"*BACK SIDE":M3$(1,3)"(WHERE THE PUZZLES ARE KEPT)":M3$(1,4)"AND PRESS":M3$(1,5)"*RETURN"2M3$(1,6)"WHEN YOU ARE READY"<MU1:1000FA$ P  8!@8192:(175)256(176)466@D$(4):R$(13)D@/:936:c@2R$;D$;"BLOAD ]ANF,A24832"{@=R$D$"OPEN MOMOPTS"@>D$"READ MOMOPTS"@?SEED@@TIMER@ASOUND$@BD$"CLOSE MOMOPTS"@F20000@9:21:"(C) 1984, LEARNING WELL";#A     58}i8M xwM 8M JJJi }JJJ}JJJ} 88 ) eJJJJ)}AC )j)`JJ}}}]\ _ ȱ^8e^^_ , l^ưȭ氩L8ˍ`b ^_^Ѹ "^eP^_eQ_ ȱ^8e^^_ , l^ưȭ氩L8ˍ`J  `  O8} L^_:ʽe^^e__l^" ަư8^_氠^LQ^P^i^_^Ѹ "^eP^_eQ_ ȱ^8e^^_ , l^ưȭ氩L8ˍ`P^P^i^_^Ѹ "^eP^_eQӠŮĠՠŠϠŠſŠǿǿŠŠҠύŠΠӍ΍ΠՠŠٮȠŠĠՠŠϠԿҠҠΠĠҠӍ΍ҠϠŮŠӠΠŠč͠ŠӠթՠŠŠӠϠ΍ӠήӠŠҠӠԠĠԍנĠҠڧ̠ԠӠōՠԠԬΠӠήŠΠŠŠҠύŠŠŠӠŠԩΠӍ΍ΠՠŠٮŠŠҠ̠ŠҍӠŠҠϠŠĬΠӠήӠŠŠҠ̠ŠҍӠŠҠϠŠčΠӠήӠŠŠҠ̠ŠҍӠĠŠ٠ՠԠԬΠŠԮՠ٠ŠԠٍ٠ՠԮŠԠנ٩ύԠӮǠŠנӠĠҠڧŠŠǠϠŠ̍ҠՠԬΠӠήӠΠϠΠϠծӠŠŭ΍ǠЍΠƠԍ̍ԠЍԠ΍̍̍čĠ̍Ġ̍ǠנӠĠҠڧōŠҠϠŠŠŠՠԍŠԠҠƠԠϠҮŠԠĠԍנĠҠڧ̠ԠӠōՠԠԬΠӠήŠΠŠŠҠϠōˠōŠŠӠŠԩĠӍ΍ΠՠŠٮŠΠŠŠҠϠōԠҠϠŠĬΠӠήӠŠŠҠ̠ŠҍӠŠҠϠŠčΠӠήӠŠŠҠ̠ŠҍӠĠŠ٠ՠԠԬ΍ӠήӠŠҠӠ̠ҍΠ̠ҍӠ̠ҠΩŠҠΠŠ΍ҠŠҍ͠ŠҍҠō̍ōōҠō̍ō̍Ҡ΍̍Ǡ΍ӴŠҠՍàŠנōŠԠΠǠōĠŠȠǍĭŭŭנՍĠӠϠ΍ҠŠӠ͠΍àŠӠΠ΍֠נ΍ĠŠȠǍĠ̠Ҡ `  O8}58}i8M xwM 8M JJJi }JJJ}JJJ} ++8 ) eJJJJ)}AC )j)`ൣ` `FJEH<K>,1);$LOOPLOOP1:LOOP5LOOP1BCH(16384):CH1286020X16368,0:936: g RP g RPQ L犦  L犦   L犦   JJJJ) )     }ȱ}&OJJJ **  ($) JJ)0JJ)%NJJJJJJ) Ѫժժժժ|x>X?))XDRAWRMSHAPEغ8f g``0``((pp`@p''88Nc`M]lM&&e^^e__l^" ަư8^_氠^LQ^P^i^_^Ѹ "^eP^_eQ_ ȱ^8e^^_ , l^ưȭ氩L8ˍ`d000%b WHEN READY"bnA$:936bx41010ESOUND EFFECTS.RM FQP,0EQ,0`^_:ʽ٠ŠԠٍ٠ՠԮŠԠנ٩ύԠӮǠŠנӠĠҠڧŠŠҠϠŠ̠ҍՠԮӠΠϠΠϠծӠŠŠҠ̠ŠҍӠŠȍΠƠԍ̍ԠЍԠ΍̍̍čĠ̍Ġ̍ǠנӠĠҠڧōŠҠϠŠŠŠՠԍŠԠҠƠԠϠҮŠΠŠԮՠ͹΍ŠˍōōҍӍӍӍ ˍ`P8:SCR;:26:APT$%ЃGME:SCR:APTH%փ12:4:GME;:18:SCR;:26:APT[%؃GME:SCR:APT%ڃ14:4:GME;:18:SCR;:26:APT%僺R$D$"CLOSE MOMSCORE"%胭A$"P"ĺD$"PR#0"%ꃰ34000:30000%"IS THE PRINTER ON (Y OR N)? ";:B$% B$"Y"ī33000& L e8+%! hLc۠^_:ʽe^^e__l^" ަư8^_氠^LQ^P^i^_^Ѹ "^eP^_eQ_ ȱ^8e^^_ , l^ưȭ氩L8} ) &78 ,8 } i } Ẋi(`0SESOUND EFFECTS.RM FQP,0EQ,0`SEARCHSTRING SEARCH.RM R % lݠ { lݩ j݅H E0ĺCR$;D$;"VERIFY \";FF$'a^E0ı8ah936:21:1`ar"PLEASE TURN THE DISKETTE OVER TO"a|"SIDE 2 (WHERE THE PUZZLES ARE KEPT)"a"AND PRESS WHEN YOU ARE READY."aA$:936a40010aE1:a( NEED FRONT SIDEb2E0:4025L1$CH(16384):CH1284230:16368,0:936:TGME$(IE1)"2"ī4000w936::1:1:I139:" ";:II124:I:39:" ";:I24:1:I139:" ";:II124:I:1:" ";:I:+9:12:"WOULD YOU LIKE";:10:12:"TO PLAY AGAI ,K1%6TYME$(K,1)"0"İ4210:<;1:K9:K9ĺ" ";p@"NUMBER ";K1;": ";TYME$(K,0);:36:TYME$(K,1)JKK1:K104150T4210:rL1:16368,0|24:9:"HIT ANY KEY TO CONTINUE";24:7:(CS$,L,1);:33:(CS$,L,1);LL1:L ---> ";:HLP$2HLP$"A"ĺCR$D$"RUN FRONTEND"WHLP$"B"İ400:CR$D$"RUN GAME2"lHLP$"C"ī4040|4090:40009364:11:"HIGH SCORES LIST";5:10:"TIME = ";TME;" SECONDS";1:9:"1ST PLACE: ";TYME$(0,0);:36:TYME$(0,1):1:1:I139:" ";:I5I124:I:39:" ";:IQ24:1:I139:" ";:InI124:I:1:" ";:I:6:8:"A) RETURN TO MAIN MENU ";:8:8:"B) PLAY ANOTHER GAME ";:10:8:"C) VIEW HIGH SCORES LIST ";14:4:"CHOOSE OPTION A,B, OR C9ī1160LK9I11:TYME$(K,0)TYME$(K1,0):TYME$(K,1)TYME$(K1,1):K|TYME$(I,0)NME$(IE,J):TYME$(I,1)SCR$(IE,J)D$"OPEN MOMHIGH"D$"WRITE MOMHIGH"NTIMESI09:K01:TYME$(I,K):K:ID$"CLOSE MOMHIGH"936:D:TIME.D$"CLOSE MOMOPTS"68TIMENTIMESī1100L=D$"OPEN MOMHIGH"c@D$"WRITE MOMHIGH"BTIME:NME$(IE,J):SCR$(IE,J)GI19:K01:"0":K:IID$"CLOSE MOMHIGH"KLI09:(SCR$(IE,J))(TYME$(I,1))ī1150VI` ~I EXTRA$(I)"0"ıV IX1(EXTRA$(I)):NME$(I,IX):SCR$(I,IX):AMP$(I,IX):IX:o CR$D$"OPEN MOMHIGH" D$"READ MOMHIGH" NTIMES I09:K01:TYME$(I,K):K:I D$"CLOSE MOMHIGH" D$"OPEN MOMOPTS" $D$"READ MOMOPTS")SEE):SX$(I,0)SCR$(IE,J):AX$(I,0)AMP$(IE,J)0 G ,D$"OPEN MOMSCORE"_ 6D$"WRITE MOMSCORE" @K0(IDX1):L02:GX$(K,L):SX$(K,L):AX$(K,L):L:K JD$"CLOSE MOMSCORE" T LOC163841:LOC1,0:103,LOC(LOC256)256:104,(LOC256) 2:GX$(K,L):SX$(K,L):AX$(K,L):L:K> D$"CLOSE MOMSCORE"k I0(IDX1):ROSTER$(I)NME$(IE,J)ī250r Ix GX$(I,2)GX$(I,1):SX$(I,2)SX$(I,1):AX$(I,2)AX$(I,1) GX$(I,1)GX$(I,0):SX$(I,1)SX$(I,0):AX$(I,1)AX$(I,0)* GX$(I,0)GME$(IEJ: KIE0ī200! LJ0ī200< MCR$D$"OPEN MOMROSTER"T PD$"READ MOMROSTER"] ZIDX _IDX0ĺD$"CLOSE MOMROSTER": dI0(IDX1):ROSTER$(I) iI D$"CLOSE MOMROSTER" D$"OPEN MOMSCORE" D$"READ MOMSCORE"& K0(IDX1):L00):AMP$(I,0)$ 2GME$(I)"2"ĄTMEE 7GME$(I)"3"ĄEXTRA$(I):500L :Ic <D$"CLOSE MOMTEMP" >JO:GME$(IE)(26)İ300:5000 AGME$(IE)"1"İ75:IEIE1:62 DGME$(IE)"2"İ1000:75:IEIE1:62 E70:IEIE1:62 FJ0(EXTRA$(IE)):75:Y ROSTER$(59)ANME$(2,5):SCR$(2,5):AMP$(2,5):GME$(3)fGX$(59,2):SX$(59,2):AX$(59,2) D$(4):CR$(13):CS$"/-\":IE0CR$D$"OPEN MOMTEMP"D$"READ MOMTEMP" I03"GME$(I)$GME$(I)(26)ī60 (NME$(I,0):SCR$(I,       ! w- -)s-N-3M?7nIR-53M1?w n5 76NI)R---u -1-3vu?M13M1smNM13MN 5M13  NMMq-M13M1?w ?M .----N) 3vu666n*N >iNI---5??7--5??7--5??7--u@@@C?.- ??N -5?*m ->??--;.>.>.-u5rVw-->.>.>*-u7I?--???N->7->oI I??MI vRR-53M1smN56-3M13-u mR-3v-NI1*-n -u?R-3---u 3?w6N R-53M1?w ?M >6-3M13Mq)66N 56o )6M.nq)566-N5-n n N -n1nq)R-3M1 I166s-N Mn7 n N 666-uM17 n n NIM13m1n)n N )3M13M1s-N -3M?76NI )3M13 mN -3M?7 n N )3M:w -N --66vIMM13M13M1s-N M13M13MN IM13M1n >7MqM1s  3MqJM1s 6vI---.-uJ?M1s-N.)3M1?w *uIR >RMI>--5???--wNI --ޛ-- *I--???.--7NI )s N ->7->*--??-M  M13--n N -3M?7M13-u J)36Ms-N -n1n1-u J--n?76--NJ--n?76NII)36M5s-uJM13M1??n n N -66-N??MI ? ? ?wqImmw M:N)N-n mN-6R 6N56N 5 --NN n:?w1VIM7R?RINIVI 5)3M5.M-Nm1w6-N)sI.-u-->N-N>I> 3--v 5--.-6s-N -޻M:?n -N.--6NI))3Mad$39CL]hox~&:EYdx !3EVdv  5@FTbl}*8BP]ly" 66N nR>)-n- nM1?nI      3M?7nIR-53M1?w n5 76NI)R---u -1-3vu?M13M1smNM13MN 5M13  NMMq-M13M1?w ?M .----N) 3vu666n*N >iNI---5??7--5??7--5??7--u@@@C?.- ??N -5?*m ->??w- -Iu5rVw-->.>.>*-u7I?--???N->7->oI I??MI vRR-53M1smN56-3M13-u mR-3v-NI1*-n -u?R-3---u 3?w6N R-53M1?w ?M >6-3M13Mq)66N 56o )6M.nq)566-N5-n n N -n1nq)R-3M1s-N-N Mn7 n N 666-uM17 n n NIM13m1n)n N )3M13M1s-N -3M?76NI )3M13 mN -3M?7 n N )3M:w -N --66vIMM13M13M1s-N M13M13MN IM13M1n >7MqM1s  3MqJM1s 6vI---.-uJ--;.>.>.-.)3M1?w *uIR >RMI>--5???--wNI --ޛ-- *I--???.--7NI )s N ->7->*--??-M  M13--n N -3M?7M13-u J)36Ms-N -n1n1-u J--n?76--NJ--n?76NII)36M5s-uJM13M1??n n N -66-N I166s- ? ?wqImmw M:N)N-n mN-6R 6N56N 5 --NN n:?w1VIM7R?RINIVI 5)3M5.M-Nm1w6-N)sI.-u-->N-N>I> 3--v 5--.-6s-N -޻M:?n -N.--6NI))3M?M1s-Nad )/9BS^ent0;OZn);LZl}+6<JXbs .8FSbo" 66N nR>i----nN> ?  ưȭ氩L8ˍ`X "&-STATEMENTS" OF THIS KIND" INVALID CALL ADDR0SESOUND EFFECTS.RM FQP,0EQ,0`^_:ʽe^^e__l^" ަư8^_氠^LQ^P^i^_^Ѹ "^eP^_eQ_ ȱ^8e^^_ , l^ MODULE INVOCATIONS? 3 INVOCATIONS OF A PARTICULAR MODULE? (PRESS 'T' TO CHANGE SEARCH TYPE, OR TO QUIT)" *** CALL STATEMENTS *** " *** AMPERSAND STATEMENTS *** "PRESS 'S' FOR NEW SEARCH " OR 'L'O INSPECT LINE "PROGRAM CONTAINS NO> :۩$ [ :ۦ :۩Q : b S hhLiL$ [ BhhLe hhL  `lѸ "``SEARCH TYPE: "CALL STATEMENTS"AMPERSAND STATEMENTS" DO YOU WISH TO SEARCH F: 1 ALL SUCH STATEMENTS? 2 ALL, l^ưȭ氩L8ˍ`Щ Л ۦ! X X JaƠ } "%' k $ [ :۩ :۩7 : b X X $ "  ڦ JL } L# Ll k 5$  B ک :۩ˠa1 :ۦ0SESOUND EFFECTS.RM FQP,0EQ,0`^_:ʽe^^e__l^" ަư8^_氠^LQ^P^i^_^Ѹ "^eP^_eQ_ ȱ^8e^^_ $)%XX10:S((A$,I,1))1:34000.I:9ЄS:99?+.6:1:"CLEARING HIRES PAGE 1...";::h.7:1:"FILE NAME TO LOAD (RETURN='";NAME$;"')":": ";G$|.G$""G$NAME$.:16302,0.R$D$"BLOAD ";G$/I1DLAY:I/936::S((A$,1))31:100X,Y:34000퀭(A$)1ıI2(A, OR T)EST: "; .'4:34:C$+ 8'C$"Q"ĀB B'C$"R"Č936:360\ L'C$"S"İ11000:10000v V'C$"T"İ12000:10000 `'(7):10030 *6:1:"FILE NAME (RETURN='";NAME$;"')":": ";G$ +G$""G$NAME$ +R$D$"BSAVE ";G$;",A8192,L8192"+936::700D lF$"S"ĺ"SMALL";:R$D$"BLOAD ]SMALL STANDARD,A24832":700T v(7);:600h X(X$):Y(Y$) 0:0:1:232,0:233,97 33000 330 '936: '2:1::" PICTURE EDITOR "; $'4:1::"Q)UIT, R)ETURN, S)AVE X$""X$(XO) X;$ YOY5 17:1:958k 17:1:"Y --(CARRIAGE RETURN = ";YO;:")--> ";Y$ Y$""Y$(YO) Y; FO$F$ X18:1:"FONT (B=BIG, S=SMALL) ---> ";:F$ ]F$FO$700 bF$"B"ĺ"BIG";:R$D$"BLOAD ]BLOCK,A24832"58:B$A$3 o12:1:"(CARRIAGE RETURN = '";A$;"')"J r13:1:"---> ";A$^ wA$(15)10000o |A$""A$B$ 15:1:"ENTER X AND Y COORDINATES" 16:1:"-------------------------"; XOX 17:1:"X --(CARRIAGE RETURN = ";XO;:")--> ";X$AME$""NAME$"PROF.PIC"* 6:6:NAME$;? D$(4):R$(13)k 611:1:"LOADING ";NAME$;" ON HIRES 1"; @R$D$"BLOAD ";NAME$ J16304,0 TI1DLAY:I ^ h11:1:"ENTER TEXT STRING TO PLACE ON PICTURE" kA$""Ą"---> ";A$:375 m9,:16302,02DLAY20005<X0:XO0:Y0:YO0NFF$"XXXX":FO$"DDDD"Zd936:2:1::" PICTURE EDITOR ";4:1::"PICTURE FILE TO EDIT:"5:6:"CARRIAGE RETURN = PROF.PIC";6:1:"---> ";NAME$ N          @@@@15X1,Y:3:X,YX10,Y::1:)>--??MII*---5????NI)---->???III ->?.>.>5w5757-5?V 7575757575757575o--?w)>.>5575*-?VIIiI?.-----????.- -5???.MI 5??7m-- ??.---???--NI-----5nIIInIIInIIInIIInIIInIIInIII>?????MIII???.>.--???NI5---???VII55757--5??75757?-->?VI*MI5;.MI5;.MI5;.MI5?---5???VII**M-??wmI5wm)>w-5?w5I *M)M)>;;.M)M)>;;.M)M)>;;.M)M)>??----->???VIIIm*m ->??w)-?.5?.??-m-5?;III;*MI5;.MI5;.MI5?-- 5?wI*-m)???7m)m)57m m 57m m 57m m 5IIII*--???7mI->7mI)>7mI)>7mI)>۷IIIJ--???-M)5;.MI5;.MI5?;w---??VII*--???7mI->7mI)>7mI-??7m-;.>MIIJ--->???-M 5;.MI5;.mI5??-m575oJ-5??-757575IIJ --->-MI5?7mI-?;.M-?---->???VII- -5??-757--5??757575IIIJ---5????-MI57mI 5;w--m5??NI)>--??MI?5757---???7mI->7mI)>7mI)>7mI)>۷III57*>.>.>.>.>V5 57*>.>.>.>.>-?M5757mI57mI7--???.M)57mI5۷II 75757575757575 ?--???----;7->7->II----5????oII ->7-w J---5????-MI57mI 57mI 5;w--m5??VIIm5757m--??7mI)57mI 57mI 5?7----???IIIJ--->???-757?---5???VIIII 575-- 5??-MI57mI 57mI 5;w---->???VII J---5???? ->;.MI)>;.MI)>???.--m57mI 57mI 5III --MI->?;?N) ?.5?.5?.5?.-m -5??VIII5mI 57mI 57-M -??--?w57575II-----5????wII)>-?-?-?->7----5????III--->?75757575757-->?I 5w5w5w5w5w5w5 --->?w 575757575-->?I J ???-M ->;NII5?-?75*>VI J)5?.5?.m????---??-VI@@@@15X1,Y:3:X,YX10,Y::1:---5????wI57575757575IImmI 57mI 57mI 57mI 57mI 57mI 5;w---->???VIIIm)-??;.MI)>;.MI)>;mI5wm)>w-5?w5III --???-M.>.>VII - --???-M ->;.MI)>?---5???-M ->;.MI)>?---??II --???-M ->;.MI)>?--m5??NI)>.>ۛ----???IIIJ:7->J:7->IJ:7->J:7->woJ >-M????----5????->II---5???*--->???JIIJI7-????.----????NI-7II -----????NI ->.>-?-?-?----5????III---????NI ->.>ۛ---->???wII->.>ۛ----???IIIII-?-?-?-7---->???wII575 ----5????757mI???7----?575?----???IIII ---5????-757m--??7mI)57mI 5??---??II I----5????wII)>-?-?-?n n n n MIIIIiI?.-----????.- -5???.MI 5??7m-- ??.---???--NI ?-->?JIJ:7->IIII5555555II --???-M ->;.MI)>;.MI)>;.MI)>;.MI)>?---??II --5??wI57575757575 -nIIInIII>?????MIIII 6666666n?JM-----5?????7-----5?????7-----5?????7-----5?????7-----5?????7-----5?????7-----5?????7-----5?????oIII -JIMMI sMI MNI 7-?w)57575757575?-?M M n n n IRwIRMIRMIR7IR7IR?IRIR?IRMIR@@@@15X1,Y:3:X,YX10,Y::1: --ۻMII3MII3MII3MII3MIIsMI??III------5nIIInIIInIIInIIInIII۷IIII5555555II --???-M ->;.MI)>;.MI)>;.MI)>;.MI)>?---??II --5??wI57575757575 ----????NI ->.>-?-?-?----5????III---????NI ->.>ۛ---->???wII->.>ۛ----???IIIII-?-?-?-7---->???wII575 IR7IR????oIII -JIMMI sMI MNI 7-?w)57575757575?-?M M n n n n n n n MIIIIiI?.-----????.- -5???.MI 5??7m-- ??.---???--NI ?-->?JIJ:7->R --ۻMII3MII3MII3MII3MIIsMI??III------5nIIInIIInIIInIIInIIInIIInIII>?????MIIII 6666666n?JM-----5?????7-----5?????7-----5?????7-----5?????7-----5?????7-----5?????7-----5?????7-----5?ad9*CSi '1;EOYbbbkIJ >-M????----5????->III        38400 LOC163841QLOC1,0:103,LOC(LOC256)256:104,(LOC256)936:1:10:"LOADING PUZZLE EDITOR...PLEASE WAIT..."(4);"RUN PUZZLE EDITOR"=";(34);"L";(34):"(REMOVE LINES 6,7,8 OF 'ED' AFTER YOU":"READ THIS MESSAGE)"̠ҍӠ̠ҠΩŠҠΠŠ΍ҠŠҍ͠ŠҍҠō̍ōōҠō̍ō̍Ҡ΍̍Ǡ΍ŭ΍ǠTZ``!` XDRAW SYMBOL0`"SE",20,07`ˆRK`Ĉ232,T4:233,T3Y`̈XT0:YT0_``!S96Ĺ232,T6:233,T5:"XDRAW",S96,XXT,YYT,XS,YS:232,T4:233,T3:`&"XDRAW",S,XXT,YYT,XS,YS`0`@ NEED BACK (PUZZLE) SIDE`JE0:40200aT4020'16368,0:936::21e6IR%(IX)1CRIR%(IX):PL$(IX);", YOU'RE STILL IN":140106CR(R7):PL$(IX);", YOU'VE MADE IT TO"6"THE ";RM$(R2N%(CR));"...":QR%(R2N%(CR))0:140416140456XX1:49168,0:24:1:" PRESS SPAC936:R$D$"PR#1"-&"SCORES FOR ";HNDL$f&&8:2:"GAME NUMBER";:17:"SCORE";:25:"ATTEMPTS";q&033690&ЄL1:16368,0&ڄ24:9:"HIT ANY KEY TO CONTINUE";&䄢24:7:(CS$,L,1);:33:(CS$,L,1);&LL1:L5L1'CH(16384):CH1283_$D$;"CLOSE \";FF$_.NZ0R_8JQ1200:(G$(0),JQ,1)"1"NZNZ1:PL(NZ)JQX_B_LJQ1200:(G$(1),JQ,1)"1"NZNZ1:PL(NZ)200JQ_V_j_Є RANDOMIZE PL LIST_ڄNZ0ı_䄁IQ1NZ`JQ((1)NZ)1:TZPL(IQ):PL(IQ)PL(JQ):PL(JQ)І936:4:4:"SCORES FOR ";HNDL$;a$8:2::"GAME NUMBER";:17:"SCORE";:25:"ATTEMPTS";:z$R$D$"OPEN MOMSCORE"$D$"READ MOMSCORE"$I1ī33740$K11I1:K213:GME$SCR$APT$ƒK2:K1$̃GME:SCR:APT%΃10:4:GME;:10#,R$D$"OPEN MOMROSTER"4#6D$"READ MOMROSTER"=#@SZEO#ESZE0ī33625u#JI1SZE:NME$:NME$HNDL$ī33650|#TI#YR$D$"CLOSE MOMROSTER"#^"NAME WAS NOT ON ROSTER";:I1100:I:34000:30000#rR$D$"CLOSE MOMROSTER"#|A$"P"ī33800$$"(15 CHARACTERS) -->";HNDL$3"HNDL$(HNDL$,15)a"1:9:HNDL$;"'S SCORES WILL BE PRINTED";"1:12:"WOULD YOU LIKE THE SCORES PRINTED ON":"THE PRINTER (P), THE SCREEN (S), OR":"NOT AT ALL (N) ";:A$"A$"N"ī30000#A$"P"A$"S"ī3000E0ī33250.!؁I1SZE:NME$:I;". ";NME$:IG!⁺D$"CLOSE MOMROSTER"^!쁺D$"PR#0":34000:!܂936:2:1::" MIND OVER MATTER ";!悝:8:4:"PRINT A PLAYER'S HISTORY";"1:6:"WHICH PLAYER'S SCORES WOULD YOU LIKE? ";:1:7:120:NME$:I;". ";NME$:IH 41:I21SZE:20::NME$:I;". ";NME$:Ia 8D$"CLOSE MOMROSTER"g L "IS THE PRINTER ON (Y OR N)? ";:A$ A$"Y"ī33000 " ":" " D$"PR#1" D$"OPEN MOMROSTER" D$"READ MOMROSTER" āSZE !ɁSZNU";:12:5:"TYPE A LETTER";:A$0" ":" "CA$"P"ī33200RA$"S"ıf33045:34000:3:R$D$"OPEN MOMROSTER"D$"READ MOMROSTER"$SZE)SZE0Č936:33080.936:1:1:SZE21āI1SZE:NME$:I;". ";NME$:I:33080 3I~NME$(I);~I0,~R$D$"CLOSE MOMSCORE"66~s而936:2:1::" MIND OVER MATTER ";:8:4:"PRINT THE ROSTER""6:5:"P) PRINT THE ROSTER";:8:5:"S) VIEW THE ROSTER ON THE SCREEN";:10:5:"M) RETURN TO MAIN MEME$(I)NME$(I)SCR$R$:K!}I9}D$"CLOSE MOMSCORE"P}D$"OPEN MOMSCORE"i}D$"DELETE MOMSCORE"}SZE0Č936:10:5:"ALL NAMES ON THE ROSTER HAVE BEEN ";:11:15:"DELETED";:34000:}D$"OPEN MOMSCORE"}D$"WRITE MOMSCORE"}I1SZEOMROSTER"#n}D$"WRITE MOMROSTER",x}SZE>}SZE0ī32150W}I1SZE:NME$(I):Ip}D$"CLOSE MOMROSTER"}D$"OPEN MOMSCORE"}D$"READ MOMSCORE"}SZE0ī32200}I1SZE}IIIāK19:SCR$:K}NME$(I)"":SCR$""}K19:SCR$:ND MOMROSTER"}SZE=#}SZE0ĺD$"CLOSE MOMROSTER":32220g&}IISZEāI1SZE1:NME$(I):I:32060(}I1SZE1:IIIĄNME$(I)-}NME$(I)2}I<}D$"CLOSE MOMROSTER"F}D$"OPEN MOMROSTER"P}D$"DELETE MOMROSTER"Z}SZESZE1 d}D$"OPEN MA$:A$R$32008P}A$;:(A$"0"A$"9")ĺ(7)(7)(7);:29:" ";:30:32001a}II10(A$)}A$:A$R$ĺ(7)(7)(7);:29:" ";:30:32001}(I1ISZE)ĺ(7)(7)(7);:29:" ";:30:32001 }III:20: }D$"OPEN MOMROSTER" }D$"REA MOMSCORE"Nz}33045:22:1:"TO DELETE A PLAYER, TYPE THE PLAYER'S ";:23:1:"NUMBER FOLLOWED BY . TO RETURN";:24:1:"TO THE MENU, TYPE : ";}A$:(A$"1"A$"9")(A$R$)ĺ(7)(7)(7);:32001}A$R$ı}I(A$):A$;:$(SZE)NME$&yR$D$"OPEN MOMROSTER"?yD$"WRITE MOMROSTER"JzSZE1czI0SZE:NME$(I):I|zD$"CLOSE MOMROSTER" zSZE031270!zD$"OPEN MOMSCORE"#z31280&zD$"APPEND MOMSCORE"0zD$"WRITE MOMSCORE":zI19:"0":I DzD$"CLOSE "yR$D$"OPEN MOMROSTER"5yD$"READ MOMROSTER">ySZEWySZE0SZE40ī31180fyI0SZE1syNME$(I)zyIyR$D$"CLOSE MOMROSTER"ySZE40Ė1:17:"NO MORE ROOM!!! TRY DELETING A NAME";(7)(7)(7):34000:y17:26:"..."; yNME:4:"ADD A NAME TO THE ROSTER";T,y1:12:"NAME (15 CHARACTERS OR LESS) TO ADD";i6y1:13:":";NME$}@yNME$(NME$,15)Jy1:15:"NAME = ";NME$Ty1:17:"ADD TO THE ROSTER (Y OR N)? ";:A$^yA$"Y"ı|y1:17:"ADDING NAME TO THE ROSTER ,214:R$;D$;"RUN ED"5u(X128)"H"ī33500:30000Uu(X128)"R"İ33000:30000}u(X128)"M"ĺR$;D$;"RUN FRONTEND"v(X128)"L"ĺR$;D$;"RUN LIST PUZZLES"\v(7);:30100y936:2:1::" MIND OVER MATTER ";!"y:8:22:"R";:uI1?u24:19:(CS$,I,1);:21:(CS$,I,1);RuII1:I5I1ouX(16384):X12830100u24:20:(X128);u16368,0u(X128)"A"İ31000:30000u(X128)"C"ī10u(X128)"D"İ32000:30000u(X128)"E"Ĺ228RY";/u22:1:"ENTER TO LIST THE ROSTER";]u18:1:"ENTER TO LIST PUZZLE ANSWERS";u20:1:"ENTER TO RETURN TO MIND OVER MATTER";u:7:8:"A";:7:10:"C";:7:12:"D";u7:14:"E";:7:16:"H";:7:18:"L";:7:20:"M";: u:78,0bu5:18::"MENU";Llu8:1:"ENTER TO ADD A NAME TO THE ROSTER";uqu10:1:"ENTER TO CHANGE OPTIONS";vu12:1:"ENTER TO DELETE A NAME FROM THE ROSTER"{u14:1:"ENTER TO EDIT PUZZLES";~u16:1:"ENTER TO LIST A PLAYER'S HISTORETURN>..............GO TO NEXT OPTION";:P:22:11:" NUMBER KEYS OK ";::22:1:" ";:0u::u:2:1::" MIND OVER MATTER ";DuD$(4):R$(13)NuCS$"/-\!"Xu1636NDS)";:30:TIME;::2201bR$D$"OPEN MOMOPTS"HlD$"WRITE MOMOPTS"RvSEED\TIMEhSOUND$sG1NUM~G3NUMWHOSE$D$"CLOSE MOMOPTS"30000"SE",50,0:+:23:1:"...CHANGE VALUE ...QUIT";:24:1:"< "ĺ(7);:560CNWHOSE$"P"WHOSE$"L":"LEARNING WELL'S";:560uSWHOSE$"P":"PLAYER'S OWN";::" ";::560X15:4::"WHOSE PUZZLES?";:23:WHOSE$"P"ĺ"PLAYER'S OWN ";ZWHOSE$"L"ĺ"LEARNING WELL'S";]7:4::"GAME 2 TIME (IN SECO70(7):470G13:4::"PUZZLES FOR GAME 3";:30:G3NUM;" ";k&15:4::"WHOSE PUZZLES?";:23'WHOSE$"L"ĺ"LEARNING WELL'S";(WHOSE$"P"ĺ"PLAYER'S OWN ";015:22:TEMP$523:TEMP$R$600?TEMP$"Q"610DTEMP$"380: 11:4::"PUZZLES FOR GAME 1";:30:G1NUM;" ";l 13:4::"PUZZLES FOR GAME 3";:30:G3NUM;: 13:29:TEMP$ TEMP$R$540 TEMP$"Q"610 TEMP$" "G3NUMG3NUM1:G3NUM50G3NUM1TEMP$" "Ğ:720:30:G3NUM;::" ";:4:300- h9:4:"SOUND";:30:SOUND$;:" ";_ r11:4::"PUZZLES FOR GAME 1";:30:G1NUM;:r |11:29:TEMP$ TEMP$R$450 TEMP$"Q"610 TEMP$" "G1NUMG1NUM1:G1NUM50G1NUM1 TEMP$" "Ğ:720:30:G1NUM;::" ";:380 (7):z#? Š Š Ҡ ȠӠ ɠʠҠ ̠ ˠР Ƞ Ϡ Ġؠ "Ҡ"Ӡ#ԠӠ Ġ̠ à ̠Ġ  Ơ"ŠҠLӠ ! נ Ʈà" ͮŠ"ͮӠ!Ӡ  ű-Ų0ų5ӠĠ 4,81279,81J214,36279,363J214,102279,102UJ214,0279,0:214,159279,159wJ$214,0214,79:214,81214,159}JLJLS((A$,1))31:100LX,LY:1600J(A$)1ıJI2(A$)JLXLX7:LS((A$,I,1))1:1600JI:K@LS33LXLXAPPEND MOMBTEMP"(ID$"WRITE MOMBTEMP"3I(26)KID$"CLOSE MOMBTEMP"bID$"RUN WRITEDATA"uICOUNTG1NUMıI5000:IIPV0I6:210,0210,159:0,159210,159:0,00,159:0,0210,0:278,0278,79:278,81278,159 J214,79279,79:21$"WRITE MOMBTEMP"H"1"%HHNDL$0HCOUNT:HAMPTRHD$"CLOSE MOMBTEMP"bHBTBLī280H936:23:1:"WOULD YOU LIKE TO PLAY ANOTHER GAME?";:24:9:"(TYPE Y OR N) ---> ";:HLP$H(HLP$"Y"HLP$"y")Č936:280H"Y";:5ICR$D$";HNDL$:" NUMBER OF PUZZLES ATTEMPTED = ";AMPT:" NUMBER OF PUZZLES CORRECT = ";COUNTnGCR$D$"PR#0"xG936GBT1ī210GCR$D$"OPEN MOMBTEMP"GD$"DELETE MOMBTEMP"GCR$D$"OPEN MOMBTEMP"G220GCR$D$"APPEND MOMBTEMP"HDWOULD YOU LIKE TO PRINT YOUR SCORE? ";:24:9:"(TYPE Y OR N) ---> ";:HLP$jF(HLP$"Y"HLP$"y")200F936:23:1:"IS THE PRINTER TURNED ON? (HIT Y OR N) ";:HLP$:(HLP$"Y"HLP$"y")ī160]GCR$D$"PR#1":(12)" SCORE FOR "AGAIN? Y/N: ";:HLP$:155]E936:23:1:"DO YOU WANT TO SEE THE ANSWER? (Y/N) ";HLP$:150E(HLP$"Y"HLP$"y")ĺ"YES";:9010:CND0:121E(HLP$"N"HLP$"n")ĺ"NO";:100E(7);:936:23:1:"TRY AGAIN? Y/N: ";:HLP$:155KF936:23:1:"$"n")ĺ"NO";:9010:121DD(HLP$"Y"HLP$"y")ĺ"YES";:9500:121MD125oDHT20(ANSWER$)2:HT1HT1D(HLP$"Y"HLP$"y")Č936:21:1:"THE ANSWER TO THIS PUZZLE IS: ":HT::ANSWER$::6000:100E(HLP$"N"HLP$"n")Č936:23:1:"TRY PTAMPT1:PZPL(AMPT):31000:4700:9010]Cy10500:CK1İ7000:COUNTCOUNT1:4500:400:100C}CND0Č936:23:1:"WOULD YOU LIKE A CLUE? Y/N: ";:HLP$:140CCND2Č936:23:1:"DO YOU WANT TO SEE THE ANSWER? Y/N: ";:HLP$:150D(HLP$"N"HLPNDL$,15):5000+BdCOUNTG1NUMAMPTNZ118{Bf936:21:2:"CONGRATULATIONS, ";HNDL$;:22:10:"YOU'RE DONE";:6000:160BuCOUNTG1NUMČ936:21:1:"CONGRATULATIONS, ";HNDL$;:22:10:"YOU'RE DONE";:6000;160BvPV0İ32000BwPV1(CxCND0:AMPUZZLES APPEAR IN THE LARGE BOX.";:22:1:"TYPE IN WHAT YOU THINK THE PUZZLES MEAN.";:6000AO21:1:"IF YOUR ANSWER IS NOT CORRECT, YOU MAY";:22:1:"ASK FOR A CLUE AND TRY AGAIN.";:6000AP22:1:"PLEASE TYPE YOUR NAME...":"";HNDL$BUHNDL$(Hō, l^ưȭ氩L8ˍ`}A`qq, l^ưȭ氩L8ˍ`qM CONTAINS NO "&-STATEMENTS" OF THIS KIND" INVALID CALL ADDR0SESOUND EFFECTS.RM FQP,0EQ,0`^_:ʽe^^e__l^" ަư8^_氠^LQ^P^i^_^Ѹ "^eP^_eQ_ ȱ^8e^^_ NTS? 2 ALL MODULE INVOCATIONS? 3 INVOCATIONS OF A PARTICULAR MODULE? (PRESS 'T' TO CHANGE SEARCH TYPE, OR TO QUIT)" *** CALL STATEMENTS *** " *** AMPERSAND STATEMENTS *** "PRESS 'S' FOR NEW SEARCH " OR 'L'O INSPECT LINE "PROGRA1 :ۦ> :۩$ [ :ۦ :۩Q : b S hhLiL$ [ BhhLe hhL  `lѸ "``SEARCH TYPE: "CALL STATEMENTS"AMPERSAND STATEMENTS" DO YOU WISH TO SEARCH F: 1 ALL SUCH STATEME8e^^_ , l^ưȭ氩L8ˍ`Щ Л ۦ! X X JaƠ } "%' k $ [ :۩ :۩7 : b X X $ "  ڦ JL } L# Ll k 5$  B ک :۩ˠa(XX$"A"XX$"Z")OA$OA$XX$'SX*I9-Sb*SS0u INIT ROUTINE FOR PUZZLE DISPLAYfS1uBT1İ34000:pS4uMX32|S5uT12048S6uT3(T1256):T4T1256T3S:uD$;"BLOAD ]ANF,A";T1S;uT2(T1)2T1:T2(T2)256(T21)T1SKJSOUND$"ON"ERASE0İ2000LKTERASE0:]K"SE",20,0:vK CR$D$"OPEN MOMOPTS"K D$"READ MOMOPTS"K SEEDK TIMEK SOUND$K G1NUMK G3NUMK WHOSE$K D$"CLOSE MOMOPTS"K& K30000LLX21Ҡ 0:?.A3z|ǏȆʌ˒̖Еʠҕ؍߇肠~|zvtspruz~{`#࿋ෆහൂAAA ==65,, ## AVTRRSUYRRTWRWUUVIKOUHIK`a_wwiklibSNKHFFHJLO"!$$%'&())A##$$%&&))*--.03-)'#4834-3495878nnmmmoooC?<:<99:?>;889;9>IFDEHLQVX\`cc^YVVX\ac[Rdggda_[XTPKFCCJIIK_YRLIJLOSYRQQV[__\Wh<!$6&"2!#!!(57676+)!07=AJNTW[cgkpuyȆτyrjb_ZVOF=0Y^dinsxxvvx{{xuqjd^igecljigge   |0088Nc`Ẋi(`^_:ʽe^^e__l^" ަư8^_氠^LQ^P^i^_^Ѹ "^eP^_eQ_ ȱ^8e^^_ , l^ưȭ氩L8ˍ`aJJJ} 88 ) eJJJJ)}AC )j)`JJ}}}]\ } ) &78 ,8 } i } JJJ )  ($) JJ)0JJ)%NJJJJJJ)  `  O8}58}i8M xwM 8M JJJi }JJJ}RETURN> WHEN READY"_nA$::*_x41010DRAWRMSHAPEغ8 g RP g RPQ L犦  L犦   L犦   JJJJ) )     }ȱ}&O"/^"AND PRESS WHEN YOU ARE READY."=^A$:936H^40010R^E1:h^( NEED FRONT SIDEx^2E0:40200^]&"XDRAW",S,XXT,YYT,XS,YSD]0b]@ NEED BACK (PUZZLE) SIDEr]JE0:40200]TE0ĺCR$;D$;"VERIFY \";FF$]^E0ı]h936:21:1]r"PLEASE TURN THE DISKETTE OVER TO"^|"SIDE 2 (WHERE THE PUZZLES ARE KEPT)936 \΁E1\؁)\Є RANDOMIZE PL LIST5\ڄNZ0ıB\䄁IQ1NZx\JQ((1)NZ)1:TZPL(IQ):PL(IQ)PL(JQ):PL(JQ)TZ~\\\ XDRAW SYMBOL\"SE",20,0\ˆR\Ĉ232,T4:233,T3\̈XT0:YT0\]!S96Ĺ232,T6:233,T5:"XDRAW",S96,XNZ1:PL(NZ)JQ[BL[LJQ1200:(G$(1),JQ,1)"1"NZNZ1:PL(NZ)200JQR[VX[j[ COMES HERE IF PUZZLE FILE NOT FOUND[936:1:21:"PLEASE TURN THE DISKETTE OVER TO":"SIDE 2 (WHERE THE PUZZLES ARE KEPT)":"AND PRESS ";\āA$:ɂ7Z(}I79104:105I,1105I,158:105I,1105I,158:=Z2}XZ耲 INIT LIST OF PUZZLEScZ쀰40000ZD$;"OPEN \";FF$;",L256"ZIQ01ZD$;"READ \";FF$;",R";IQZG$(IQ)ZIQZ$D$;"CLOSE \";FF$Z.NZ0[8JQ1200:(G$(0),JQ,1)"1"NZ531900*YV|936:21:1:"(NEW PUZZLE)"=Y[|QI11000:QIiY`|ZS0:ZA0:ZC0:ZN0:ANSWER$"":CLUE$""sYe|E1:yYt|Y|"ERROR: ";EE:Y} WIPE PUZZLE FROM SCREENY }0Y }I078Y}105I,79I105I,79I105I,79I105I,79I105I,79IZ}";FF$;",R";PZMXZAZCZNQIXyA$:S((A$,1,3)):X((A$,4,3)):Y((A$,7,3)):XS((A$,10,2)):YS((A$,12,2)):R((A$,14,2))Xy35000XzQIX zD$;"CLOSE \";FF$Xz0XzX8| COMES HERE IF ERROR ON READING PUZZLE FILEXB|EE(222) YL|EEyD$;"READ \";FF$;",R";PZMXZAQILWyA$:(A$,1)"_"A$" "(A$,(A$)1)_WyCLUE$CLUE$A$gWyQIrWyQN$""WyZN131182WyQI1ZNWyD$;"READ \";FF$;",R";PZMXZAZCQIWyA$:QN$QN$A$WyQIWyZS131250WyQI1ZSXyD$;"READ \(A$,1,3)):ZC((A$,4,3)):ZN((A$,7,3)):ZS((A$,10,3))IVcyANSWER$""YVdyZA131090fVeyQI1ZAVfyD$;"READ \";FF$;",R";PZMXQIVhyA$:(A$,1)"_"A$" "(A$,(A$)1)ViyANSWER$ANSWER$A$VjyQIVryCLUE$""VwyZC131140V|yQI1ZC"W"5UTu"TABLES ARE ";T781921;" BYTES TOO LARGE"::@UXu33000KUbu34000XU{u3:0:1^UuUy READ IN AND DISPLAY PUZZLE PZU"y31800UJyCR$;D$;"OPEN \";FF$;",L16"UTyD$;"READ \";FF$;",R";PZMXUXyE0UZyE0ĄA$:31070U\y31075:V^yZA(2T21$T>uT5(T2256):T6T2256T58T@u232,T4:233,T3_TDuFF$"LWELL":WHOSE$"P"FF$"USER"{TNuD$;"BLOAD ]LWELL,A";T2TPuT7T2(43616)256(43617)TQuT7819230040URu"NOT ENOUGH ROOM FOR ICON TABLES.":"USE ICON EDITOR AND REDUCE TABLE SIZE.e^^e__l^" ަư8^_氠^LQ^P^i^_^Ѹ "^eP^_eQ_ ȱ^8e^^_ , l^ưȭ氩L8ˍ`p ) eJJJJ)}AC )j)`JJ}}}]\ } ) &78 ,8 } i } Ẋi(`^_:ʽ$) JJ)0JJ)%NJJJJJJ)  `  O8}58}i8M xwM 8M JJJi }JJJ}JJJ} 880EQ,0`XDRAWRMSHAPEغ8 g RP g RPQ L犦  L犦   L犦   JJJJ) )     }ȱ}&OJJJ )  (DZ۷g];7110SESOUND EFFECTS.RM FQP,糞00i 󟳾//eQ_ ȱ^8e^^_ , l^ưȭ氩L8ˍ`-2,8 } i } Ẋi(`0SESOUND EFFECTS.RM FQP,0EQ,0`^_:ʽe^^e__l^" ަư8^_氠^LQ^P^i^_^Ѹ "^eP^_8M xwM 8M JJJi }JJJ}JJJ} 88 ) eJJJJ)}AC )j)`JJ}}}]\ } ) &78   JJJJ) )     }ȱ}&OJJJ )  ($) JJ)0JJ)%NJJJJJJ)  `  O8}58}i|x>X?XDRAWRMSHAPEغ8 g RP g RPQ L犦  L犦   L犦 g``0``pp`@pѪժժժժf 6384):CH1287020(N16368,0:936:GN(#CND0:APT0İ32000:936ZN)#APTNZAPT0sN*#APTAPT1:PZPL(APT)~N,#31000N2#936:23:1:"PLEASE TYPE YOUR ANSWER..."N<#O%936:21:1::"CLUE";::": ";CLUE$:23:1:"PLEASE TYPE YOUR ANSWER..P5LOOP1(MCH(16384):CH1285020>M16368,0:936:RMpSOUND$"ON"ıdMz"SE",50,80:yMXLOOP1:16368,0Mb23:6:"HIT ANY KEY TO SEE YOUR SCORE";Ml23:4:(CS$,LOOP,1);:36:(CS$,LOOP,1);MvLOOPLOOP1:LOOP5LOOP1NCH(10L*L(A$)1LX246:LY132:1500:XLLX234:LY132:B$(A$,1):A$(A$,1):1500L ERASE1:LX246:LY132:A$B$:1500:LLOOP1:16368,0L24:9:"HIT ANY KEY TO CONTINUE";L24:7:(CS$,LOOP,1);:33:(CS$,LOOP,1); MLOOPLOOP1:LOOK"SE",20,0:+K CR$D$"OPEN MOMOPTS"AK D$"READ MOMOPTS"KK SEEDUK TIMEaK SOUND$lK G1NUMwK G3NUMK WHOSE$K D$"CLOSE MOMOPTS"K& KKLX246:LY132:A$"0":1500KKA$(COUNT1):ERASE1:4600LA$(COUNT):460:LY112:A$"SCORE":1500,JB232,T4:233,T32JLXJLS((A$,1))31:100LX,LY:1600gJ(A$)1ıvJI2(A$)JLXLX7:LS((A$,I,1))1:1600JI:J@LS33LXLX10:100LX,LY:1610JELS:99JJSOUND$"ON"ERASE0İ2000KTERASE0:59:0,0279,0:278,0278,159-I DRAW TIMERLIL1231:L2259:C114:C2104I5:L1,C1L2,C1:L1,C1L1,C2:L2,C1L2,C2:L1,C2L2,C2ICR$;D$;"BLOAD ]SMALL STANDARD,A";T9T8256I$3:0:1:232,T9:233,T8I.LX230:LY3:A$"TIMER":1500J8LX230 N) ---> ";:HLP$7H(HLP$"Y"HLP$"y")Č936:700DH"Y";:5`HCR$D$"APPEND MOMBTEMP"xHD$"WRITE MOMBTEMP"H(26)HD$"CLOSE MOMBTEMP"HCR$D$"RUN WRITEDATA"HHI6:210,0210,159:210,109279,109:0,159279,159:0,00,1"G^CR$D$"OPEN MOMBTEMP"$G`610@GaCR$D$"APPEND MOMBTEMP"XGbD$"WRITE MOMBTEMP"aGl"2"lGvHNDL$wGCOUNTGAPTGTIMEGD$"CLOSE MOMBTEMP"GBTBLī700H936:23:1:"WOULD YOU LIKE TO PLAY ANOTHER GAME?";:24:9:"(TYPE Y OR":(12):FP" SCORE FOR ";HNDL$:CR$:" NUMBER OF PUZZLES ATTEMPTED = ";APT:" NUMBER OF PUZZLES CORRECT = ";COUNT:" NUMBER OF SECONDS FOR PLAY = ";TIMEFSCR$D$"PR#0"FXBT1ī609FZCR$D$"OPEN MOMBTEMP"G\D$"DELETE MOMBTEMPCONDS FOR PLAY = ";TIME;:qE:16:4:"DO YOU WANT TO PRINT YOUR SCORE? ";:17:10:"(TYPE Y OR N) ---> ";:HLP$ED(HLP$"Y"HLP$"y")ī600EI936:10:1:"IS THE PRINTER TURNED ON? (Y OR N) ";:HLP$EL(HLP$"Y"HLP$"y")ī570 FNCR$D$"PR#1$;:70005D936:16303,0::1:1:I139:" ";:IQDI124:I:39:" ";:ImD24:1:I139:" ";:ID&I124:I:1:" ";:IE0:5:4:"NUMBER OF PUZZLES ATTEMPTED = ";APT;:8:4:"NUMBER OF PUZZLES CORRECT = ";COUNT;:11:4:"NUMBER OF SE CGUESS$GUESS$(C128):400FC,(C217C249)ĺ"YES";:9500:400kC6(C206C238)ĺ"NO";:9000:400{C@(7);:400CJCSOUND$"ON"İ2000C5C231,118DRW259,118DRWCDRWC(7);(7);(7);D936:21:1:"TIME'S UP, ";HNDLRW161022%BxJ1DLAY:C(16384)@BC128āE120:E:400NB16368,0]BCND2300mBC136160B(GUESS$)0400B(GUESS$)1GUESS$"":155BGUESS$(GUESS$,(GUESS$)1)B(8)" "(8);:400BC141İ10000:400C(C128);<30000AF4000!AKBT1ī105AM936:21:1:"WORD PUZZLES APPEAR ON THE SCREEN. TYPE";:22:1:"IN YOUR ANSWERS AS QUICKLY AS YOU CAN.";:5000AP23:1:"PLEASE TYPE YOUR NAME ---> ";HNDL$AUHNDL$(HNDL$,15):936:5000Ai5As9000 BuD.@(175)256(176)46&@368739@G$(1),PL(400)G@BT0:BL3k@T8(36874256):T936874T8256@D$(4):CR$(13):DCHAR$" "@COUNT0:ERASE0:GUESS$"":CS$"/-\!":APT0:BTBT1@936@ BT1İ3000@DLAY14(TIME44)@1000A                ,0`^_:ʽe^^e__l^" ަư8^_氠^LQ^P^i^_^Ѹ "^eP^_eQ_ ȱ^8e^^_ , l^ưȭ氩L8ˍ` c?FNEED FRONT SIDE]2E0:40200B] WHEN READY"]nA$:936]x41010ESOUND EFFECTS.RM FQP,0EQZLE) SIDE\JE0:402009\TE0ĺCR$;D$;"VERIFY \";FF$D\^E0ıU\h936:21:1}\r"PLEASE TURN THE DISKETTE OVER TO"\|"SIDE 2 (WHERE THE PUZZLES ARE KEPT)"\"AND PRESS WHEN YOU ARE READY."\A$:936\40010\E1:]( PL(IQ):PL(IQ)PL(JQ):PL(JQ)TZ%[+[>[ XDRAW SYMBOLM["SE",20,0T[ˆRh[Ĉ232,T4:233,T3v[̈XT0:YT0|[[!S96Ĺ232,T6:233,T5:"XDRAW",S96,XXT,YYT,XS,YS:232,T4:233,T3:[&"XDRAW",S,XXT,YYT,XS,YS[0 \@ NEED BACK (PUZ$;",R";IQZG$(IQ)ZIQ3Z$D$;"CLOSE \";FF$S;uT2(T1)2T1:T2(T2)256(T21)T1ZSuT5(T2256):T6T2256T5S@u232,T4:233,T3SDuFF$"LWELL":WHOSE$"P"FF$"USER"SNuD$;"BLOAD ]LWELL,A";T2SPuT7T2(43616)256(43617)TQu"a"XX$" z")OA$OA$((XX$)32):10840ZRI*XX$DCHAR$OA$OA$XX$:10840RN*(XX$"A"XX$"Z")OA$OA$XX$RX*I9Rb*R0u INIT ROUTINE FOR PUZZLE DISPLAYR1uBT1İ34000:R4uMX32R5uT12048R6uT3(T1256):T4T1256T3S:uQ)(GUESS$)0ı,Q)OG$"":I91(GUESS$)tQ)XX$(GUESS$,I9,1):(XX$"a"XX$"z")OG$OG$((XX$)32):10740Q)(XX$"A"XX$"Z")OG$OG$XX$Q)I9Q)GUESS$OG$:Q0*(ANSWER$)0ıQ:*OA$"":I91(ANSWER$)7RD*XX$(ANSWER$,I9,1):(XX$DEX1P)INDEX(OA$)ī10600@xp)) s0fa9@xp~((@xCp6 @xp`<p?''@xp??`p?pB@~px>X?&&@~pp|@@xp%% c?Fx@xpѪժժժժ C7$$@xCpf @xp`<p##@xp??`p?`O@~p0""@~p88Nc`:CS$"/-\!":16368,0A18:19:(CS$,LP,1);:21:(CS$,LP,1);LX(1)cLPLP1:LP5LP1CH(16384):CH128502018:20:CH$(CH128):CH$;16368,0:6:1:1::" MIND OVER MATTER ";:O 1:3:"PASSWORD: ";Y A$"" TEMP$:TEMP$(13)A$A$TEMP$:3020 A$"SECRET"ĺ(13);(4);"RUN CHANGEOPTS"  C1$:C1$"R"ı C1$:C1$"E"ı C1$:C1$"T"ıLP10: L1:16368,0< (24:9:"HIT ANY KEY TO CONTINUE";e 224:7:(CS$,L,1);:33:(CS$,L,1);x <LL1:L5L1 FCH(16384):CH1281330 P16368,0:936: LOC163841 LOC1,0:103,LOC(LOC256)256:104,(LOC256) 6 93΍̍mI 5??---??II -----5????wI57575757575IImmI 57mI 57mI 57mI 57mI 57mI 5??---??II mmI 57mI 57mI 5wmI5wm)>w-5?w5IImmII)>7mII)>7m m 57m m 57m m 5wm-m5?w-M->IIIImI 57mI 5wmI;-5?m).MI)>;.MI)>;.MI)>;.MI)>?---??II ----????.MI->;.MI)>;.MI-????.---;.>.>VIII --???-M ->;.MI)>;.MI)>;.MI)>?7m -->?;w---??VII----????.MI->;.MI)>;.MI-????.---?7m -?7mI)5III --???-M ->;.?---???NI->ۛ575757mI5??--?II mmI)>7m -?7m-??.-??. -?7m -?7mI)5III5575757575757---5???II mmII)>7-MI)5?;7-mI-5??7mm) 5;7m)-M5;?7m m 57mII)>۷IIIIM-MI5;7-mI5?7mm 57m)M5;7m m57mI-5?7mI)5?۷III --???-M ->;MI)>;.---???III-----5????75757---->???75757----5????III-----5????75757---->???757575III --???-M ->;.>.MI??;.M)-57mI 5;w---->???VIImmI 57mI 57mI 57----5????7mI 57mI 57mI 5III-I-5?w575757575-5?I ---5???wI57I5?-?75*>VI J)5?.5?.m????---??-VI)I)?--??-M ->;.MI)>;.---->????.MI)>;.MI)>;VIII----????.MI->;.MI);.---????.MI->;.MI)>;.---???III --???-M ->;.>.>.>.MI)>?---??II ----????.MI->;.MI)>;.MI)>;.MI)>;.-M ->;.MI)>?---5???-M ->;.MI)>?---??II --???-M ->;.MI)>?---->??NI)>ۛmI 5??---??II J:7->J:7->IJ:7->J:7->woJ >-M????----5????->II---5???*--->???JIIJI7-????.----????NI-7I --???-M ->;NIIII --???-M ->;NII5?--5??wI->ۛmI 5??---??II III5?-5??- 5;-M)>7----5????wI 575I-----5????757mI???7----?5*MI)>?---??II --???-M ->;.>. --????.mI->;.MI)>?---??II -----5????wII)>-?-?-7575II --???w--?----?--m)M۷IIJ 575----5????wI575II ?7-5?.o -->?JIJ:7->IIII5555555II --???-M)->?7m m57m)M5;7mm 57-mI5?;?---??II I 5?7-575757575*-->??VII- --???-M ->;.MI)>-?-?-?----5????m)>7m)>*---->????Nm)>*---->????Nm)>7m)>߷II II5*--5???7m57---???Nm5---???N)>VI))m 5;?7mm5??- 55m?m-->m)-?;VII -??7m)>7m-?7->?- m >7mI->?;.-- ->;?VII )?7-5?.RI 575757575w w575757575IRRIm)Mad0[8HVcx;f2o +h=`Jc)\ - j  < j  O v 3 ` p $ O | )I;M\xxxRI575757575*>Vmm)>7m)>߷JI      Ẋi(`^_:ʽe^^e__l^" ަư8^_氠^LQ^P^i^_^Ѹ "^eP^_eQ_ ȱ^8e^^_ , l^ưȭ氩L8ˍ`kJJJ} 88 ) eJJJJ)}AC )j)`JJ}}}]\ } ) &78 ,8 } i } JJJ )  ($) JJ)0JJ)%NJJJJJJ)  `  O8}58}i8M xwM 8M JJJi }JJJ}SOUND EFFECTS.RM FQP,0EQ,0`XDRAWRMSHAPEغ8 g RP g RPQ L犦  L犦   L犦   JJJJ) )     }ȱ}&O@xp--|30f@@xp0SEx,,@xCp6 II:5757757 5RII??MI;3MMM3M-M1niis--J w575w>.>.II *-3RI JIMMI MII@@@@@ MEMORY LANE =========== 4 MEMORY LANE =========== J*MI5;.MI5;.MI5;.MI5?;w---5?II*MI)>;mI5wm)>w-5?w5II*MII5;.M)M)>;;.M)M)>;;.M-m)>?????-m)-۷III*MI)>?-M-??w-5?--??-M ->;VIII*MI5;.MI5;.MI5?;w---5?wI)>---???MII*---5????NI)---->???III-???7-M)5;.MI5;.MI5;.MI5;VII J--???-M)5;.MI5;.MI5?;w---??VII* -???7-M)5;.MI5;.m -???7m-;.>MIIJ--->???-M 5;.MI5;.m ->???-m57-> * -???.m)757575II --->???.>.--???NI5---???VIIII:.>--->??w)>.>.>.-5?IJ---5????-M ->;.MI)>?---->??NI)>---???MII75757m-???7-M)5;.MI5;.MI5;.MI5;VII 55*>.>.>.>.>V 5-5?w)>.>.>.>-o 55757mI7m)7-5?7m;.M)۷II 5I5757575757575I** - -?????7m m 57m m 57m m 57m m 5IIII* 5;.MI5;.MI5?;w---5?II55757m--????.mI->;.MI)>;.MI)>?.---??IIIJ--???-M -757mII:?---??II III 575---5????-MI57mI 57mI 5??---->??VIIJ--???-M ->;.---->????.?---->???VIIII)->?-7m???.--757575IImI 57mI 5IIImmI 57mI 57-M -??--?w57575II-----5????wII)>-?-?-?->7----5????III--->?75757575757-->?I 5w5w5w5w5w5w5 --->?w 575757575-->?I J ?--???----;7->7->II----5????oII )?7-?RJ--->???-MA$)3A$"0"A$:16310/ ?B$B$A$:A$(Y%(I))M ?(A$)3A$"0"A$:16330z ?B$B$A$:A$(XS%(I)):(A$)2A$"0"A$ ?B$B$A$:A$(YS%(I)):(A$)2A$"0"A$ ?B$B$A$:A$(R%(I)):(A$)2A$"0"A$ ?B$B$A$:B$ ?I!@D$;"CLOSE \";FF(A$,(A$)1):16220R?A$"\?I2a?ZN016255cf?I1ZN:D$;"WRITE \";FF$;",R";PZMXIZAZCkp?""rz?I?ZS016400?I1ZS?D$;"WRITE \";FF$;",R";PZMXIZAZCZN?B$(S%(I))?(B$)3B$"0"B$:16290?A$(X%(I)) ?(0161952*?I1ZA:D$;"WRITE \";FF$;",R";PZMXIR.?A$(ANSWER$,(I1)141,14)}0?(A$,1)" "ĺ"_"(A$,(A$)1):161904?A$>?IC?ZC016225H?I1ZC:D$;"WRITE \";FF$;",R";PZMXIZAL?A$(CLUE$,(I1)141,14)N?(A$,1)" "ĺ"_"鲍ŠӍ             !! ! "        e^^e__l^" ަư8^_氠^LQ^P^i^_^Ѹ "^eP^_eQ_ ȱ^8e^^_ , l^ưȭ氩L8ˍ`qưȭ氩L8ˍ`q0,(A$)1)!ANSWER$ANSWER$A$)˂QI?˺D$;"CLOSE \";FF$E˱SEARCHSTRING SEARCH.RM R % lݠ { lݩ j݅H  L e8+%! hLc۠^_:ʽZZLE PZ$*˺D$;"OPEN \";FF$;",L16"D4˺D$;"READ \";FF$;",R";PZMXL>˄A$HZA((A$,1,3)):ZC((A$,4,3)):ZN((A$,7,3)):ZS((A$,10,3))RANSWER$""\˭ZA152120fˁQI1ZAp˺D$;"READ \";FF$;",R";PZMXQI z˄A$:(A$,1)"_"A$" "(A$Z1:IZ20051020 ~IZ18 ǯ"SEARCH",G1$,"1",PZ,IZH ǭPZ051125V PZPZ200a ǰ52000v ǺPZ;:5:ANSWER$ IZPZ1200:IZ20051075 ǭPR0ĺ(12);CR$;D$;"PR#0" ǭPR0ĺ:"PRESS RETURN TO CONTINUE.";:A$ DZ ˲ GET ANSWER FOR PU PRINT LIST OF PUZZLES/ ;ǰ49000:PR051007` =Ǻ::"TURN ON PRINTER AND PRESS RETURN";:A$u >Ǻ(13);D$;"PR#1" ?nj936:10:"LIST OF ";FF$;" PUZZLES:":: BIZ1 Lǯ"SEARCH",G0$,"1",PZ,IZ VǭPZ051070 `ǰ52000 jǺPZ;:5:ANSWER$ tIZP"SIDE 1 AND PRESS ."* &A$::5 044010> YNF A$j A$"Y"A$"y"A$"Y":"YES";: A$"N"A$"n"A$"N":"NO";: 48010 h936:12:"DO YOU WANT TO PRINT THE LIST OF":13:"PUZZLES?" |48000 A$"Y"PR1  8ı 936:12W *"PLEASE TURN THE DISKETTE OVER TO":"SIDE 2 AND PRESS ."a HA$:l R43010v E1: ૲ NEED FRONT SIDE E0:43200 E0ĺCR$;D$;"VERIFY FRONTEND" E0ı 936:12 "PLEASE TURN THE DISKETTE OVER TO":";FF$;",R1" quG1$6 su(G0$)200(G1$)20030070L tuD$;"CLOSE \";FF$ uu"PUZZLE FILE DIRECTORY IS CORRUPTED.":"TRY ANOTHER DISK.": vuD$;"CLOSE \";FF$ u NEED BACK (PUZZLE) SIDE E0:43200 E0ĺCR$;D$;"VERIFY \";FF$ E0(175)256(176)46& MX322D$(4)@CR$(13)O#FF$"USER"Z(30000d2936o<51000zF44000PD$;"RUN FRONTEND"0u INIT PUZZLE INDEXXu43000:D$;"OPEN \";FF$;",L256"buD$;"READ \";FF$;",R0"luG0$ nuD$;"READ \     NT(GUY)1):ERASE1:46003NA$(COUNT(GUY)):46009NMN232,T4:233,T3pN(A$)1LX246:LY122:1500:NLX234:LY122:B$(A$,1):A$(A$,1):1500N ERASE1:LX246:LY122:A$B$:1500:N\A$(COUNT(GUY))Nf4600NpOLOOP1:16368,0CR$D$"BLOAD ]SMALL STANDARD,A";T8256T9=M232,T9:233,T8~M(HNDL$(GUY))8LX221:LY54:A$(HNDL$(GUY),8):1500:4085MLY54:LX249(((HNDL$(GUY))2)7):A$HNDL$(GUY):1500M232,T4:233,T3MLX246:LY122:A$"0":1500MNA$(COU0,0:L CR$D$"OPEN MOMOPTS"4L D$"READ MOMOPTS">L SEEDHL TIMETL SOUND$_L G1NUMjL G3NUMvL WHOSE$L D$"CLOSE MOMOPTS"L& LL3:0:1:232,T4:233,T3LLX216:LY12:A$"PLAYER":1500LLX220:LY85:A$"SCORE":1500)M$214,0214,79:214,81214,159%KLKKLS((A$,1))31:100LX,LY:1600ZK(A$)1ıiKI2(A$)KLXLX7:LS((A$,I,1))1:1600KI:K@LS33LXLX10:100LX,LY:1610KELS:99KJSOUND$"ON"ERASE0İ2000KTERASE0:L"SE",2D$"CLOSE MOMBTEMP",JCR$D$"RUN WRITEDATA"8J:936J6:210,0210,159:0,159210,159:0,00,159:0,0210,0:278,0278,79:278,81278,159J214,79279,79:214,81279,81J214,36279,36J214,102279,102J214,0279,0:214,159279,159KJID$"CLOSE MOMBTEMP")IBTBLī700I936:23:1:"WOULD YOU LIKE TO PLAY ANOTHER GAME?";:24:9:"(TYPE Y OR N) ---> ";:HLP$I(HLP$"Y"HLP$"y")Č936:700I"Y";:5ICR$D$"APPEND MOMBTEMP"ID$"WRITE MOMBTEMP"I(26)JMBTEMP" H*D$"DELETE MOMBTEMP":H,CR$D$"OPEN MOMBTEMP"CH-560_H/CR$D$"APPEND MOMBTEMP"wH0D$"WRITE MOMBTEMP"H:"3"HDHNDL$(1)HNCOUNT(1)HXTRY(1)HZLIMIT1H]LIMIT1ī650HbJ2LIMIT:HNDL$(J)HlCOUNT(J)HvTRY(J)IN) ---> ";:HLP$6G(HLP$"Y"HLP$"y")Č936:500TG936:CR$D$"PR#1":(13)G!10:"GAME 3 SCORES":CR$:4:"PLAYER'S NAME";:30:"SCORE":CR$G$I1LIMIT:4:HNDL$(I);:30:COUNT(I):IG%CR$D$"PR#0"G&936:BT1ī559H(CR$D$"OPEN MONDL$(I);:30:COUNT(I);:490>F:HNDL$(I);:30:COUNT(I);:EFIF21:4:"DO YOU WANT TO PRINT YOUR SCORE?";:22:10:"(TYPE Y OR N) ---> ";:HLP$F(HLP$"Y"HLP$"y")ī550G936:10:7:"IS THE PRINTER TURNED ON?";:11:10:"(TYPE Y OR 4700:4E936:16303,0::1:1:I139:" ";:IPEI224:I:39:" ";:IlE24:1:I139:" ";:IEI224:I:1:" ";:IE:4:11:"SCORES FOR GAME 3";E7:5:"PLAYER'S NAME";:30:"SCORE";EI1LIMIT:I27:5:IGWNī480FHITAMOUNT0:936:21:1::"ANSWER";::" : ";ANSWER$;:6000:ERASE1:4700:100{D6ERASE1:4700:12000:9500:10500:130D^COUNT(GUY)G3NUMČ936:21:1:"CONGRATULATIONS ";HNDL$(GUY);:22:10:"YOU ARE THE WINNER!":7500:GWNGUY:Eh5000:ERASE1:CK1COUNT(GUY)COUNT(GUY)1:7000:4500:350:90ZCSOUND$"ON"Č936:(7);(7);(7);jCCND1ī300CAMOUNTAMOUNT1:AMOUNTLIMITAMOUNT0:CND1:ERASE1:4700:12000:9500:10500:130CERASE1:4700:12000:120PD,AMOUNTAMOUNT1:AMOUNTLIMCND0BU5000:AMOUNT0:110*BZAMOUNT0EBdCOUNT(GUY)G3NUMī400XBeAPTNZAPT0iBi12000:CND0|BkAPT0İ32000BnAPTAPT1:PZPL(APT):31000Bx936:22:1:"PLEASE TYPE YOUR ANSWER ... ";:23:1:"";GUESS$:10500:TRY(GUY)TRY(GUY)12C936A BT1İ3000 A15000*A10005A(30000A2936:21:1:"THE SCREEN TELLS YOU HOW MANY PUZZLES";:22:1:"YOU MUST SOLVE. THE FIRST PLAYER TO ";A723:1:"SOLVE THE PUZZLES IS THE WINNER.";:6000AA8000BFGUYBTURN(1):4000:ENTRY1:3@(175)256(176)46&@36873[@HNDL$(6),BTURN(6),COUNT(6),G$(1),PL(400),TRY(6)i@BT0:BL3@T8(36874256):T936874T8256@D$(4):CR$(13):DCHAR$" "@ERASE0:GUESS$"":CS$"/-\!":J16:COUNT(J)0:TRY(J)0:J:APT0:BTBT1A\";FF$;",R";PZMXZXyE0-ZZyE0ĄA$:310708Z\y31075}Z^yZA((A$,1,3)):ZC((A$,4,3)):ZN((A$,7,3)):ZS((A$,10,3))ZcyANSWER$""ZdyZA131090ZeyQI1ZAZfyD$;"READ \";FF$;",R";PZMXQIZhyA$:(A$,1)"_"A$" "(A$,(A$)1) [iyANSWEUGH ROOM FOR ICON TABLES.":"USE ICON EDITOR AND REDUCE TABLE SIZE."xYTu"TABLES ARE ";T781921;" BYTES TOO LARGE"::YXu33000Ybu34000Y{u3:0:1YuYy READ IN AND DISPLAY PUZZLE PZY"y31800YJyCR$;D$;"OPEN \";FF$;",L16"ZTyD$;"READ (T1)2T1:T2(T2)256(T21)T1=XuT5(T2256):T6T2256T5{X@u232,T4:233,T3XDuFF$"LWELL":WHOSE$"P"FF$"USER"XNuD$;"BLOAD ]LWELL,A";T2XPuT7T2(43616)256(43617)XQuT7819230040DYRu"NOT ENOER PLAYER'S NAME ---> ";HNDL$(J):HNDL$(J)(HNDL$(J),15)cW:(HNDL$(J))0ĺ(7);(7);(7);:15022jW:JpW:W0u INIT ROUTINE FOR PUZZLE DISPLAYW1uBT1İ34000:W4uMX32W5uT12048W6uT3(T1256):T4T1256T3W:uD$;"BLOAD ]ANF,A";T1!X;uT2E TO NTINUE";N624:70SESOUND EFFECTS.RM FQP,0EQ,0`^_:ʽe^^e__l^" ަư8^_氠^LQ^P^i^_^Ѹ "^eP^_eQ_ ȱ^8e^^_ , l^ưȭ氩L D$"CLOSE MOMSCORE"L :9P" BYTES WRITTEN...":"FOR "P" PLAYERS..." Y54:A$(HNDL$(GUY),8):1500:[VX/LY54:LX249(((HNDL$(GUY))2)7):A$HNDL$(GUY):1500aVb/V:936:10:7:"ENTER NUMBER OF PLAYERS ---> ";LIMIT$:LIMIT(LIMIT$)V:LIMIT6ī15000V:LIMIT0ī15000V:K10V:J1LIMIT:KK28W:K:1:"ENTA$OA$((XX$)32):10840=UI*XX$DCHAR$OA$OA$XX$:10840bUN*(XX$"A"XX$"Z")OA$OA$XX$jUX*I9pUb*U.ERASE1:12100:ENTRYENTRY1:ENTRYLIMITENTRY1U.GUYBTURN(ENTRY):12100:4700U.UD/232,T9:233,T8VN/(HNDL$(GUY))8LX221:LT)OG$"":I91(GUESS$)cT)XX$(GUESS$,I9,1):(XX$"a"XX$"z")OG$OG$((XX$)32):10740T)(XX$"A"XX$"Z")OG$OG$XX$T)I9T)GUESS$OG$:T0*(ANSWER$)0ıT:*OA$"":I91(ANSWER$)UD*XX$(ANSWER$,I9,1):(XX$"a"XX$"z")O(OA$)ī10600+S")KEY$"":I1INDEX(OA$)JS,)(OA$,I1,1)DCHAR$ī10560hS6)KEY$KEY$(OA$,I1,1):I1S@)INDEXI11:K1((GUESS$)(KEY$))1SJ)J11K1ST)KEY$(GUESS$,J1,(KEY$))CK1:10520S^)CK0:J1Sh)GUESS$"":KEY$"":T)(GUESS$)0ı)((SEED)LIMIT)1:RrSEEDSEED1:SEED10000SEED1000GR|K1J1dRBTURN(J)BTURN(K)ī8040kRKrRJxRR%936:21:1::"CLUE";::": ";CLUE$:"PLEASE TYPE YOUR ANSWER...";:23:1:"";GUESS$:R)10800:10700:CK0:INDEX1S)INDEXE YOUR SCORE";=Q`24:4:(CS$,LOOP,1);:36:(CS$,LOOP,1);\QjLOOPLOOP1:LOOP5LOOP1zQtCH(16384):CH1287520Q~16368,0:936:Q@BTURN(1)((SEED)LIMIT)1QJSEEDSEED1:SEED10000SEED1000QTLIMIT1ıQ^J2LIMITRhBTURN(Jz24:9:"HIT ANY KEY TO CONTINUE";SP24:7:(CS$,LOOP,1);:33:(CS$,LOOP,1);rPLOOPLOOP1:LOOP5LOOP1PCH(16384):CH1286020P16368,0:936:PXSOUND$"ON"ıPb"SE",50,80:PLLOOP1:16368,0QV24:6:"HIT ANY KEY TO SEN D$(4):R$(13)Td936::1:1::" MOMSCORE FILE INIT "x:4:5:"HOW MANY PLAYERS ON ROSTER? ";PR$D$"OPEN MOMSCORE":D$"DELETE MOMSCORE":D$"OPEN MOMSCORE"D$"WRITE MOMSCORE"I1PJ19:"0":J I :936?O22:4:"YOU NEED ";G3NUM;" CORRECT ANSWERS TO WIN";fO24:9:"HIT ANY KEY TO CONTINUE";O24:7:(CS$,LOOP,1);:33:(CS$,LOOP,1);OLOOPLOOP1:LOOP5LOOP1OCH(16384):CH1285020O16368,0:936:OpLOOP1:16368,0$P       @@@``@`pppp``xx||||xx``|~~~???~~~|`???@  ( $@h`+'bH"(@ "h `o ސdmiei mponȌojikn j*.k.j.iLE8jl.k8nklk8nj.i8nihJqLr oLHmi) of -llL-kkhɀ M lLɀ M ko hihL` *LHmh*l wLekL/e 8ei8fgjk80L;ig iȩLLjiLё` qȹragbfch h mp mimiHiih8h mimhihih mimiiih8 o8jp*0jLȌfj0LjjjjL.Ȉ*L6g*lJ*m,lPnik wnLki(Lkmdei pjfjHnhjl wLfkeikmLk8Lkmdei p**ʐLgJJmddeeeh) mee`fg 8 Ȱiij` ސdmiei pjjjLfj``pMl)pk) ol 9f p`` qȹragbfch hh Fhi h F`gfhJqLr        U*U**U*Uժժժ3fL̙L3f̙"DĈD"Ĉ"DĈ"Dɤ$I$wn];ݻ];wnݻn];wݻ;wn]ݩeh)8 .e .edh)Jbca L-ɠcba :L- qL- iiLZii`@@           p)ȱȱL:   `hL-))  A`_ ALZ@ h ALZ`ȱ` A ALZ aȱbȱc48bbaabmbama8cmcɀ! !!!!!!!!8ˍ`n| COMES HERE IF ERROR ON READING PUZZLE FILE;]B|EE(222)L]L|EE531900m]V|936:21:1:"(NEW PUZZLE)"][|QI11000:QI]`|ZS0:ZA0:ZC0:ZN0:ANSWER$"":CLUE$""]e|E1:]t|]|"ERROR: ";EE:]} WIPE PUZZLE FROM SCREEN] }0^ }I0A$:QN$QN$A$\yQI&\yZS1312503\yQI1ZS_\yD$;"READ \";FF$;",R";PZMXZAZCZNQI\yA$:S((A$,1,3)):X((A$,4,3)):Y((A$,7,3)):XS((A$,10,2)):YS((A$,12,2)):R((A$,14,2))\y35000\zQI\ zD$;"CLOSE \";FF$\z0\z-]8R$ANSWER$A$[jyQI"[ryCLUE$""2[wyZC131140?[|yQI1ZCe[yD$;"READ \";FF$;",R";PZMXZAQI[yA$:(A$,1)"_"A$" "(A$,(A$)1)[yCLUE$CLUE$A$[yQI[yQN$""[yZN131182[yQI1ZN[yD$;"READ \";FF$;",R";PZMXZAZCQI\yN?";:14:10:"(TYPE Y OR N) ---> ";:HLP$`HLP$"Y"İ400:"Y";:CR$D$"RUN GAME";GME$(IE1)uHLP$"N"ī5040"N";:CR$D$"RUN FRONTEND"pLOOP1:16368,0z22:9:"HIT ANY KEY TO CONTINUE";22:7:(CS$,LOOP,1);:33:(CS$,LOOPE (IN SECONDS)";:30:TIME;" ";L "9:4::"SOUND";:30:SOUND$;::" ";^ ,9:29:TEMP$p 6TEMP$R$360 @TEMP$"Q"610 JTEMP$" "ĺ(7);:300 TSOUND$"ON"Ė30:720::"OFF";:SOUND$"OFF"::300 ^SOUND$"ON":30::720:"ON";::" ";E$"P"ĺ"PLAYER'S OWN ";? WHOSE$"L"ĺ"LEARNING WELL'S";M 730:750_ 7:29:TEMP$q TEMP$R$280 TEMP$"Q"610 TEMP$" "ĺ(7);:220 TIMETIME30:TIME600TIME30 720:7:30::TIME;::" ";:220! 7:4:"GAME 2 TIM ";& x4:17::"OPTIONS";\ 7:4::"GAME 2 TIME (IN SECONDS)";:30:TIME;:} 9:4:"SOUND";:30:SOUND$; 11:4:"PUZZLES FOR GAME 1";:30:G1NUM; 13:4:"PUZZLES FOR GAME 3";:30:G3NUM; 15:4:"WHOSE PUZZLES?";:23:WHOS!NME$(59),SCR(9):300008 (175)256(176)46MD$(4):R$(13)eR$D$"OPEN MOMOPTS"{(D$"READ MOMOPTS"2SEED<TIMEFSOUND$KG1NUMLG3NUMaWHOSE$dD$"CLOSE MOMOPTS" n:2:1::" MIND OVER MATTER """"            !  HHHȱ ȱi hhhIȱ` - J| -Jhhh,00,0N,0I@$NPp 0 00O P,0HHHLIpP L9L")699@ H$699@ H$699630(90@6H90(90@6H90(90@6H90`6l0`-Z+VZ-V++6+6(6+6@(0(6(9$H$@$9$6+66H$@ $H@<$`")6V0V6V0V+`$l V$`ll66@66 6$H$H H$HV V$l+l0`0`$H(H+H0H6V0V6V0V+`$l V$`ll66@66 6$H$HV6l0`0`$`$`6l6l+l$lllU"  v49233,0:936:(6):(15)h x"WELCOME TO":::12:"MIND OVER MATTER":::14:"PUZZLE EDITOR.": z12:"PLEASE WAIT A MOMENT WHILE I GET READY." 44000:22000:30000:PM1152 49000:PZPF_ PZ0Č936:21:1:"THERE ARE NO FREE PUZZL13)" "Z T12048:T3(T1256):T4T1256T3:VX12:VY0:XL0:YL0:XH210:YH159::1:0:l ZV59813133 Z3:XL,YLXL,YHXH,YHXH,YLXL,YL dCS1:CL5:DV1:MX32:S%(MX),X%(MX),Y%(MX),XS%(MX),YS%(MX),R%(MX),V%(MX):D$(4):CR$(13) uWHOSE$"P"C(175)256(176)46-PM(228)214mM$(4,8),NV(4),LS(4),M1$(5,6),N1%(5),NC%(5),M2$(8,3),N2%(8)M3$(10,7),N3%(10)SC12:FZ$"DBFPJL"(25)"OI?IH8@"(17)"2H"(14)":"(26)(11)"2.159" CM$(27)"?"(8)(21)(11)(10)(" " "                         78>^}105I,79I105I,79I105I,79I105I,79I105I,79ID^}z^(}I79104:105I,1105I,158:105I,1105I,158:^2}^耲 INIT LIST OF PUZZLES^쀰40000^D$;"OPEN \";FF$;",L256"^IQ01^D$;"READ \";FF$;",R";IQ^G$(IQ)_IQ