'd ******* MEGAMIND **************Mn *** FOR C64,C16,+4 ************sx *** RON STOATE '88 ************yZ1:(778)23Z0(31)"SET FOR";:Z0 (56) 6355,255:56,59::" C16":280-Z0" +4"cKJ0:B65301:F65305:Z1" C64":B53281:F53280q"B,0:F,0,(5)" STAY COOL !"6BL2:SA828:LN2930@K01:L0BL:CX0:I015JA:A255"DATA ERROR IN LINE ";LN(L10):TCXCXA:SAL16I,A:ID^A:ACX"ERROR IN LINE ";LN(L10):bhL:BL26:SA14848:LN2970trZ0SA15872{|KLN3250:L02:M2$"":D0:I015:M1$(M1$)3"DATA NOT 3 FIGURES ERROR LINE";LN(L10): M2$M2$M1$:GC(0):C(M1$):DDC:I:M1:M1D"DATA ERROR LINE";LN(L10):LMU$(L)M2$:L}CX0:I19:A%(I),J%(I):CXCXA%(I)J%(I):CX1280 "DATA ERROR LINE 3290 ":1360P$"":R$"":CR$"":SP$"":CD$(19) I117:CR$CR$(29)::CR$CR$CR$:GC(0)-I123:CD$CD$(17)::GC(0)QI121:SP$SP$(32)::GC(0)kI19:R$R$(168):Q$(R$,7):T$(168)I114:P$P$(169):N$(P$,9):GC(0)&W$" : "0CH$"":CJ$"":"":(5)" MEGAMIND"(SP$,21)"MEGAMIND"+DRW3:CL10:1560:(156)>NK01:M$R$R$KXK1620jbI112:M$T$(SP$,16)T$:lK:RW7:CL14:1560:(5)vM$;"HOW MANY "M$;"MEGABLOBS ?"M$;"KEY 7/8/9 "DU$:DU$""660E$:E$"7"E$"8"E$"9"6700E(E$):C2C180:S2S180:1590:GC(0)?RW9:1560UM$;"COLUMNS ? "kM$;"KEY 4/5 "D$:D$"4"D$"5"720D(D$):P114:P29:D4P111:P212C3C1931:S3S1931:1640RW5:CL11:1560M$(31)" KEY SELECTION "M$(5) " Q QUIT "@ M$ " T TIME CHECK"aM$ " J JOYSTICK " M$ " K KEYBOARD "*M$(31)" USE JOY PORT2 "4M$ " OR CURSOR KEYS">M$(5)(32)(174)" CHOOSE BLOB"HM$(32)(175)" CHOOSE COLM ""RM$"RTN/ ENTER ROW "<\M$"FIRE : : "[fM$(31)"ANY KEY TO START"ppDU$:DU$""880zz2750RW3:CL6:1560I120:M$(30)(W$,P11)(W$,P2):RW4:CL31:1560M$(5)" RIGHT":M$(164)" BLOB "M$(165)" RIGHT":M$;" COLM"%RW9:1560O(158)M$;" RIGHT":M$(166)" BLOB "qM$(167)" WRONG":M$" COLM"(30):2250RW17:CL31:1560:(156):T$(168)M$Q$:I12:M$T$(SP$,5)T$:RW21:CL30:1560M$R$:M$T$(SP$,7)T$:M$R$;RW19:CL32:15607(5)M$"TIME":M$"CHECK"LRW0:CL12:1560m$(31);:I13:M$(P$,P1):y.GC(0)8C4C1921:S4S1921:I05:C4I,68:S4I,112I:B1280:Z1SD12,39:SD13,176LTI$"000000"V7`F20:C5C1932:S5S1932:C7C1972D3:S7S1972D3:C8C1970:S8S1970OjC9C112:V70:WV17tPL0:BPPL:SP0:V40:V50:R20:KV0:1880:1990:2160~A0:KJ1 1680:1180A$A(A$(0))A145M%(PL)M%(PL)1:1930A29PLPL1:1880A17M%(PL)M%(PL)1:19300A157PLPL1:1880@A132020dA$"Q"KV62 F21:2380:2410{A$"J"A$"":KJ1A$"T"KV222380:JV0GC(0):V71560 1150 I0D1:X(0)N%(I)((1)E1) CHN%(I)492:CH128CH160*(CH$CH$(CH)(CH1)(32)L2CJ$CJ$(CH2)(CH3)(32)R<XF^PdZjdnZ11480: =C64x8:B65301:F65305:S13072:C12048835,60:844,61:828:84965299,60:65298,0-B53281:F53280:S11024:C155296:SD54272`T024:SDT,0::SD5,39:SD6,176:SD24,1556334,(56334)254:1,(1)251: INT OFF,CHARAS IN8281,(1)4:56334,(56334)1: INT ON ETC53272,((53272)240)14"M$(CR$,CL):(CD$,RW1);,"6F@I1E:AA%(I):JJ%(I):B380IrJC2B,A:C21B,A:C240B,A:C241B,ATS2B,J:S21B,J1:S240B,J2:S241B,J3:I^hrI1D33:C3I,41:C31I,41:S3I,106:S31I,107| Z11790  JV(2)/ JV128A13? JV1A145N JV3A29] JV5A17m JV7A157 KV(198):KV37 KJ0:I09:1319I,0:   JV(56320) JV111A13 JV126A145 &JV119A29 0JV125A17!:JV123A157;!DKV(197):KV37 KJ0:I09:631I,0:A!NG!XY!bPLDPLD1h!lPL0PL0!vC5BP3,41:C5BP31,41:C5PL3,113:C5PL31,113:BPPL!!!M%(PL)0M%(PL)E!M%(PL)EM%(PL)1#"V1PL380R2:C6C5V1:S6S5V1:V2A%(M%(PL)):V3J%(M%(PL))^"I01:C6I,V2:S6I,V3I:C640I,V2:S640I,V32If":l""I0D1:M%(I)0:R%(I)0:S%(I)0::V50:CT0"""F10:I0D1:M%(I)0F11"" F10 2080# F11(5):2250:I1800:#(30):2250:GC(0):A#  **CHECK FOR CORRECT SOLUTION**K#*2380#4I0D1:M%(I)N%(I)R%(I)1:S%(I)1:CTCT1:2280#>I#HCTDF20:2410:#RI0D1:B0D1#\M%(B)N%(I)R%(I)0S%(B)0 2320#fB,I#p$zS7V4,32:S740V4,32:SPSP1:V4SP808$SP11F21:2380:2410:U$C7V4,113:C740V4,113r$S7V4,109:S740V4,108$Z1SD4,0:SD11,0:SD1,0:SD8,0$$ 1990:R2R21$$RW13:CL31:1560$M$" NO ":M$;"BLANKS"$$%R3200:R4360:SR0T%C8V4V5,113:C840V4V5,113:S8V4V5,101:S840V4V5,100^% 2350d% % R%(I)1:S%(B)1:R3500:R4660:SR24%$ C8V4V5,87:C840V4V5,87:S8V4V5,103:S840V4V5,102%. V913:V81:Z1 SD11,0%8 2770:V5V51&B &L &V RW22:CL32:1560A&` M$(5)(TI$,3,2)":"(TI$,2):G&j \&t RW0:CL12:1560z&~ I0D1:U(I)A%(N%(I)):& (31)M$CH$:M$CJ$& M$(SP$,16)& I0D1:C9I3,U(I):C9I31,U(I)& C940I3,U(I):C941I3,U(I):,' WV17:F31:F42:SR0:V80:V943:F21WV129:F33:F43S' Z1SD12,66:SD13,195:SD11,0y' 2770:2750:Z1SD4,0:SD11,0' B15:2720:I140::2650:I1200::B' GC(0)' RW12:CL31:1560:(5)' M$"ANOTHER":M$"GAME?":M$"Y/N( A$:A$"Y"A$"N"25501( A$"Y"(147):V71:G( RW13:CL31:1560h( (5)M$"ARE YOU":M$"SURE"( A$:A$"Y"A$"N"2590(( A$"N"A$"Y":2560(2 Z12630(< 62116(F 64738(P (Z RW4:CL31:1560(d F212700 )n M$(5)"*MEGA*":M$"*MIND*"/)x M$"YOUDID":M$"ITIN";SP:) 2710\) M$(129)"*NEVA*":M$"*MIND*"j) GC(0):) RW4:CL31:1560) M$(31)(N$,6):M$(28)(N$,6)) GC(0):) RW3:CL30:1560) I17:M$(28)N$:M$(31)N$::) ) Z02850%* KV8:SD4,WV:SD11,WV:R1V96Y* M3((MU$(K),RSR,3)):M4((MU$(K),RSR3,3))* SD1,M3:SD,100:SD8,M4:SD7,100* R:V802840* V81:RV916:2800* *" V802870*, KR3R4 80:1,K,2:2,K100,1::*6 I1223'+@ M3((MU$(2),I,3)):M4((MU$(2),I24,3))=+J F3,M3,8:F4,M4,8D+T IJ+^ P+h +r 160,000,185,000,208,153,000,056,200,208,247,185,000,209,153,000,1964+| 057,200,208,247,096,169,092,141,000,003,169,003,141,001,003,096,16261, 169,209,141,019,255,169,196,141,018,255,076,134,134,000,000,000,19167, , 000,000,007,015,025,029,062,060,000,000,224,240,152,184,124,060,1182, 063,055,024,031,015,007,000,000,252,236,024,248,240,224,000,000,1419- 000,000,002,006,039,055,061,045,000,000,064,096,228,236,188,180,1200c- 063,060,027,031,013,009,000,000,252,060,216,248,176,144,000,000,1299- 000,000,003,007,031,031,057,121,000,000,192,224,248,248,156,158,1476- 127,127,031,013,006,007,001,000,254,254,248,176,096,224,128,000,1692D. 000,000,001,003,007,013,025,057,000,000,128,192,224,176,152,156,1134. 063,063,060,115,119,127,063,000,252,252,060,206,238,254,252,000,2124. 000,000,013,031,063,103,103,127,000,000,176,248,252,230,230,254,1830%/ 122,060,031,015,015,007,001,000,094,060,248,240,240,224,128,000,1485p/ 000,000,006,015,031,063,063,121,000,000,096,240,248,252,252,158,1545/ 121,126,062,027,008,015,007,000,158,126,124,216,016,240,224,000,14700 000,000,001,007,031,029,057,057,000,000,128,224,248,184,156,156,1278Q0 063,062,029,011,007,007,001,000,252,124,184,208,224,224,128,000,15240& 000,000,113,123,063,063,025,009,000,000,142,222,252,252,152,144,156000 015,015,025,062,062,127,015,000,240,240,152,124,124,254,240,000,169521: 000,007,031,063,060,115,115,063,000,224,248,252,060,206,206,252,1902}1D 062,063,055,057,014,007,007,000,124,252,236,156,112,224,224,000,15931N 000,000,000,060,126,090,082,090,090,090,090,126,060,000,000,000,09042X 000,000,000,000,036,126,126,126,090,090,126,060,000,000,000,000,0780^2b 060,126,219,255,255,102,060,000,102,103,090,090,066,066,067,000,16612l 000,000,001,003,007,015,007,000,000,000,128,192,224,240,224,000,10412v 000,000,000,000,002,006,015,031,031,015,006,002,000,000,000,000,0108?3 024,060,126,024,024,126,060,024,000,036,102,255,255,102,036,000,12543 000,048,072,136,240,147,148,143,000,000,000,001,048,200,202,073,14583 000,096,136,012,200,041,042,197,000,000,002,003,002,186,074,189,1180 4 000,000,006,013,097,241,130,115,000,000,198,041,239,074,049,207,1410&4 o4 063,033,050,025,063,016,075,012,067,018,063,033,056,028,050,042,6944 010,008,012,010,015,012,018,015,044,018,037,015,031,012,025,010,2925 911,881,911,929,917,911,897,881,810,739,596,453,643,810,770,854,12913 5 ;5 053,064,097,068,034,072,067,076,068,080,056b5 084,070,088,044,092,071,096,1280