> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 48 08 01 00 8F 2A 2A 52 45 56 49 53 49 4F |..H....**REVISIO|
00000010: 4E 20 4F 46 20 54 48 45 20 56 49 43 20 32 30 20 |N OF THE VIC 20 |
00000020: 50 52 4F 47 52 41 4D 20 46 52 4F 4D 20 54 48 45 |PROGRAM FROM THE|
00000030: 20 54 4F 52 4F 4E 54 4F 20 50 45 54 20 55 53 45 | TORONTO PET USE|
00000040: 52 53 20 47 52 4F 55 50 00 90 08 02 00 8F 2A 2A |RS GROUP......**|
00000050: 43 4F 4E 56 45 52 54 45 44 20 54 4F 20 54 48 45 |CONVERTED TO THE|
00000060: 20 43 4F 4D 4D 4F 44 4F 52 45 20 36 34 20 42 59 | COMMODORE 64 BY|
00000070: 20 52 4F 47 45 52 20 44 20 42 55 52 47 45 2C 23 | ROGER D BURGE,#|
00000080: 32 36 36 37 2C 54 50 55 47 2C 43 41 4E 41 44 41 |2667,TPUG,CANADA|
00000090: 00 AD 08 05 00 97 35 33 32 38 31 2C 31 3A 97 35 |......53281,1:.5|
000000A0: 33 32 38 30 2C 31 3A 8D 32 30 30 30 30 00 D2 08 |3280,1:.20000...|
000000B0: 0A 00 99 22 93 22 3A 81 54 B2 31 A4 31 30 3A 99 |...".":.T.1.10:.|
000000C0: 22 90 22 C9 28 C4 28 54 29 2C 32 29 22 11 22 3A |".".(.(T),2)".":|
000000D0: 82 54 00 ED 08 13 00 43 48 B2 C2 28 36 34 38 29 |.T.....CH..(648)|
000000E0: AC 32 35 36 3A 43 4F B2 35 35 32 39 36 00 08 09 |.256:CO.55296...|
000000F0: 14 00 43 4F B2 43 4F AA 34 33 3A 43 48 B2 43 48 |..CO.CO.43:CH.CH|
00000100: AA 34 33 3A 50 4F B2 31 00 30 09 1E 00 81 54 B2 |.43:PO.1.0....T.|
00000110: 43 4F A4 43 4F AA 37 36 33 A9 38 30 3A 81 4C B2 |CO.CO.763.80:.L.|
00000120: 30 A4 31 33 3A 97 54 AA 4C 2C 2E 3A 82 4C 2C 54 |0.13:.T.L,.:.L,T|
00000130: 00 7A 09 63 00 99 22 13 11 11 11 11 11 11 11 11 |.z.c..".........|
00000140: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 12 95 |................|
00000150: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4D | M|
00000160: 41 53 54 45 52 4D 49 4E 44 20 20 20 20 20 20 20 |ASTERMIND |
00000170: 20 20 20 20 20 20 20 20 13 22 00 9A 09 64 00 81 | ."...d..|
00000180: 54 B2 31 A4 36 3A 43 4E 28 54 29 B2 B5 28 BB 28 |T.1.6:CN(T)..(.(|
00000190: 31 29 AC 36 29 AA 33 3A 82 54 00 B0 09 69 00 81 |1).6).3:.T...i..|
000001A0: 54 B2 31 A4 36 3A 4D 4E 28 54 29 B2 30 3A 82 54 |T.1.6:MN(T).0:.T|
000001B0: 00 C0 09 6E 00 A1 41 24 3A 41 B2 C5 28 41 24 29 |...n..A$:A..(A$)|
000001C0: 00 D3 09 78 00 8B 20 41 24 B2 C7 28 31 33 29 A7 |...x.. A$..(13).|
000001D0: 35 30 30 00 E4 09 7C 00 8B 20 41 24 B2 22 2E 22 |500...|.. A$."."|
000001E0: A7 32 31 32 00 F5 09 7F 00 8B 20 41 24 B2 22 2C |.212...... A$.",|
000001F0: 22 A7 33 31 32 00 11 0A 82 00 8B 20 41 24 B2 22 |".312...... A$."|
00000200: 20 22 20 B0 20 41 24 B2 22 1D 22 20 A7 20 31 38 | " . A$."." . 18|
00000210: 30 00 22 0A 85 00 8B 20 41 24 B2 22 85 22 A7 34 |0.".... A$.".".4|
00000220: 30 30 00 34 0A 86 00 8B 20 41 24 B2 22 8C 22 A7 |00.4.... A$.".".|
00000230: 39 30 30 30 00 52 0A 87 00 8B 20 41 24 B2 C7 28 |9000.R.... A$..(|
00000240: 32 30 29 20 B0 20 41 24 B2 22 9D 22 20 A7 20 32 |20) . A$."." . 2|
00000250: 30 30 00 79 0A 8C 00 97 43 48 AB 31 AA 50 4F 2C |00.y....CH.1.PO,|
00000260: 31 36 30 3A 81 54 B2 31 A4 37 3A 82 54 3A 97 43 |160:.T.1.7:.T:.C|
00000270: 48 AB 31 AA 50 4F 2C 38 31 00 8F 0A 96 00 8B 20 |H.1.PO,81...... |
00000280: 41 B3 33 20 B0 20 41 B1 38 20 A7 20 31 31 30 00 |A.3 . A.8 . 110.|
00000290: 9C 0A A0 00 4D 4E 28 50 4F 29 B2 41 00 AE 0A AA |....MN(PO).A....|
000002A0: 00 97 20 43 4F AB 31 AA 50 4F 2C 41 AB 31 00 C8 |.. CO.1.PO,A.1..|
000002B0: 0A B4 00 50 4F B2 50 4F AA 31 3A 8B 20 50 4F B2 |...PO.PO.1:. PO.|
000002C0: 37 20 A7 20 50 4F B2 31 00 D1 0A BE 00 89 31 31 |7 . PO.1......11|
000002D0: 30 00 EB 0A C8 00 50 4F B2 50 4F AB 31 3A 8B 20 |0.....PO.PO.1:. |
000002E0: 50 4F B2 30 20 A7 20 50 4F B2 36 00 F4 0A D2 00 |PO.0 . PO.6.....|
000002F0: 89 31 31 30 00 08 0B D4 00 54 B2 50 4F AA 31 3A |.110.....T.PO.1:|
00000300: 8B 54 B2 37 A7 54 B2 31 00 2C 0B D6 00 8F 20 49 |.T.7.T.1.,.... I|
00000310: 46 20 4D 4E 28 50 4F 29 3C 31 20 4F 52 20 4D 4E |F MN(PO)<1 OR MN|
00000320: 28 54 29 3C 31 54 48 45 4E 31 31 30 00 44 0B D8 |(T)<1THEN110.D..|
00000330: 00 8B 4D 4E 28 50 4F 29 B2 30 20 A7 4D 4E 28 50 |..MN(PO).0 .MN(P|
00000340: 4F 29 B2 31 00 5A 0B DA 00 8B 4D 4E 28 54 29 B2 |O).1.Z....MN(T).|
00000350: 30 20 A7 4D 4E 28 54 29 B2 31 00 8C 0B DC 00 54 |0 .MN(T).1.....T|
00000360: B2 4D 4E 28 50 4F 29 3A 4D 4E 28 50 4F 29 B2 4D |.MN(PO):MN(PO).M|
00000370: 4E 28 50 4F AA 31 29 3A 8B 50 4F AA 31 B2 37 A7 |N(PO.1):.PO.1.7.|
00000380: 4D 4E 28 50 4F 29 B2 4D 4E 28 31 29 00 AB 0B E6 |MN(PO).MN(1)....|
00000390: 00 4D 4E 28 50 4F AA 31 29 B2 54 3A 8B 50 4F AA |.MN(PO.1).T:.PO.|
000003A0: 31 B2 37 A7 4D 4E 28 31 29 B2 54 00 C3 0B F0 00 |1.7.MN(1).T.....|
000003B0: 97 43 4F AB 31 AA 50 4F 2C 28 4D 4E 28 50 4F 29 |.CO.1.PO,(MN(PO)|
000003C0: 29 AB 31 00 CE 0B FA 00 54 B2 50 4F AA 31 00 DE |).1.....T.PO.1..|
000003D0: 0B 04 01 8B 20 54 B2 37 20 A7 20 54 B2 31 00 F4 |.... T.7 . T.1..|
000003E0: 0B 0E 01 97 43 4F AB 31 AA 54 2C 28 4D 4E 28 54 |....CO.1.T,(MN(T|
000003F0: 29 29 AB 31 00 FE 0B 18 01 89 20 31 31 30 00 12 |)).1...... 110..|
00000400: 0C 38 01 54 B2 50 4F AB 31 3A 8B 54 B2 30 A7 54 |.8.T.PO.1:.T.0.T|
00000410: B2 36 00 36 0C 3A 01 8F 20 49 46 20 4D 4E 28 50 |.6.6.:.. IF MN(P|
00000420: 4F 29 3C 31 20 4F 52 20 4D 4E 28 54 29 3C 31 54 |O)<1 OR MN(T)<1T|
00000430: 48 45 4E 31 31 30 00 4E 0C 3C 01 8B 4D 4E 28 50 |HEN110.N.<..MN(P|
00000440: 4F 29 B2 30 20 A7 4D 4E 28 50 4F 29 B2 31 00 64 |O).0 .MN(PO).1.d|
00000450: 0C 3E 01 8B 4D 4E 28 54 29 B2 30 20 A7 4D 4E 28 |.>..MN(T).0 .MN(|
00000460: 54 29 B2 31 00 96 0C 40 01 54 B2 4D 4E 28 50 4F |T).1...@.T.MN(PO|
00000470: 29 3A 4D 4E 28 50 4F 29 B2 4D 4E 28 50 4F AB 31 |):MN(PO).MN(PO.1|
00000480: 29 3A 8B 50 4F AB 31 B2 30 A7 4D 4E 28 50 4F 29 |):.PO.1.0.MN(PO)|
00000490: B2 4D 4E 28 36 29 00 B5 0C 4A 01 4D 4E 28 50 4F |.MN(6)...J.MN(PO|
000004A0: AB 31 29 B2 54 3A 8B 50 4F AB 31 B2 30 A7 4D 4E |.1).T:.PO.1.0.MN|
000004B0: 28 36 29 B2 54 00 CD 0C 54 01 97 43 4F AB 31 AA |(6).T...T..CO.1.|
000004C0: 50 4F 2C 28 4D 4E 28 50 4F 29 29 AB 31 00 D8 0C |PO,(MN(PO)).1...|
000004D0: 5E 01 54 B2 50 4F AB 31 00 E8 0C 68 01 8B 20 54 |^.T.PO.1...h.. T|
000004E0: B2 30 20 A7 20 54 B2 36 00 FE 0C 72 01 97 43 4F |.0 . T.6...r..CO|
000004F0: AB 31 AA 54 2C 28 4D 4E 28 54 29 29 AB 31 00 08 |.1.T,(MN(T)).1..|
00000500: 0D 7C 01 89 20 31 31 30 00 21 0D 90 01 81 54 B2 |.|.. 110.!....T.|
00000510: 31 A4 36 3A 8B 52 28 54 29 B3 33 20 A7 20 31 31 |1.6:.R(T).3 . 11|
00000520: 30 00 28 0D 94 01 82 54 00 5C 0D 9A 01 81 20 54 |0.(....T.\.... T|
00000530: B2 31 A4 36 3A 97 43 48 AB 31 AA 54 2C 38 31 3A |.1.6:.CH.1.T,81:|
00000540: 97 43 4F AB 31 AA 54 2C 52 28 54 29 AB 31 3A 4D |.CO.1.T,R(T).1:M|
00000550: 4E 28 54 29 B2 52 28 54 29 3A 82 54 00 65 0D AE |N(T).R(T):.T.e..|
00000560: 01 89 31 31 30 00 7F 0D F4 01 81 54 B2 31 A4 36 |..110......T.1.6|
00000570: 3A 8B 4D 4E 28 54 29 B3 33 20 A7 20 31 31 30 00 |:.MN(T).3 . 110.|
00000580: 8E 0D FB 01 52 28 54 29 B2 4D 4E 28 54 29 00 95 |....R(T).MN(T)..|
00000590: 0D FE 01 82 54 00 A3 0D 03 02 42 4C B2 30 3A 57 |....T.....BL.0:W|
000005A0: 48 B2 30 00 BD 0D 08 02 81 54 B2 31 A4 36 3A 43 |H.0......T.1.6:C|
000005B0: 58 28 54 29 B2 43 4E 28 54 29 3A 82 54 00 C8 0D |X(T).CN(T):.T...|
000005C0: 12 02 81 54 B2 31 A4 36 00 F2 0D 1C 02 8B 20 4D |...T.1.6...... M|
000005D0: 4E 28 54 29 B2 43 58 28 54 29 A7 42 4C B2 42 4C |N(T).CX(T).BL.BL|
000005E0: AA 31 3A 43 58 28 54 29 B2 39 3A 4D 4E 28 54 29 |.1:CX(T).9:MN(T)|
000005F0: B2 39 00 FA 0D 26 02 82 20 54 00 05 0E 30 02 81 |.9...&.. T...0..|
00000600: 54 B2 31 A4 36 00 10 0E 3A 02 81 4C B2 31 A4 36 |T.1.6...:..L.1.6|
00000610: 00 22 0E 3F 02 8B 20 4D 4E 28 54 29 B2 39 A7 36 |.".?.. MN(T).9.6|
00000620: 30 30 00 49 0E 44 02 8B 20 4D 4E 28 54 29 B2 43 |00.I.D.. MN(T).C|
00000630: 58 28 4C 29 A7 57 48 B2 57 48 AA 31 3A 43 58 28 |X(L).WH.WH.1:CX(|
00000640: 4C 29 B2 39 3A 89 36 30 30 00 50 0E 4E 02 82 4C |L).9:.600.P.N..L|
00000650: 00 57 0E 58 02 82 54 00 68 0E 62 02 8B 20 42 4C |.W.X..T.h.b.. BL|
00000660: B2 30 20 A7 20 36 35 30 00 82 0E 6C 02 81 54 B2 |.0 . 650...l..T.|
00000670: 31 A4 42 4C 3A 97 43 48 AA 37 AA 54 2C 38 31 3A |1.BL:.CH.7.T,81:|
00000680: 82 54 00 93 0E 8A 02 8B 20 57 48 B2 30 20 A7 20 |.T...... WH.0 . |
00000690: 37 30 30 00 B0 0E 94 02 81 54 B2 31 A4 57 48 3A |700......T.1.WH:|
000006A0: 97 43 48 AA 37 AA 42 4C AA 54 2C 38 37 3A 82 54 |.CH.7.BL.T,87:.T|
000006B0: 00 CB 0E BC 02 43 48 B2 43 48 AA 38 30 3A 43 4F |.....CH.CH.80:CO|
000006C0: B2 43 4F AA 38 30 3A 50 4F B2 31 00 DB 0E C1 02 |.CO.80:PO.1.....|
000006D0: 8B 20 42 4C B2 36 A7 39 30 35 30 00 EE 0E C6 02 |. BL.6.9050.....|
000006E0: 8B 20 43 48 B1 31 38 32 34 A7 39 30 30 30 00 F8 |. CH.1824.9000..|
000006F0: 0E D0 02 89 20 31 30 35 00 09 0F BD 07 42 49 4C |.... 105.....BIL|
00000700: 4C 20 4B 52 49 45 47 45 52 00 39 0F 28 23 99 22 |L KRIEGER.9.(#."|
00000710: 13 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
00000720: 11 11 11 11 11 12 98 59 4F 55 20 4C 4F 53 45 2E |.......YOU LOSE.|
00000730: 22 3A 46 B2 31 30 30 30 30 00 70 0F 32 23 99 22 |":F.10000.p.2#."|
00000740: 90 54 48 45 20 53 4F 4C 55 54 49 4F 4E 20 49 53 |.THE SOLUTION IS|
00000750: 3A 20 22 3B 3A 81 54 B2 31 A4 36 3A 97 36 34 36 |: ";:.T.1.6:.646|
00000760: 2C 43 4E 28 54 29 AB 31 3A 99 22 D1 22 3B 3A 82 |,CN(T).1:.".";:.|
00000770: 00 7A 0F 3C 23 89 39 35 30 30 00 AB 0F 5A 23 99 |.z.<#.9500...Z#.|
00000780: 22 13 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |"...............|
00000790: 11 11 11 11 11 11 1F 12 59 4F 55 20 47 4F 54 20 |........YOU GOT |
000007A0: 49 54 21 22 3A 46 B2 35 30 30 30 00 F4 0F 1C 25 |IT!":F.5000....%|
000007B0: 5A 5A B2 28 5A 5A AA 31 29 AF 31 35 3A 97 36 34 |ZZ.(ZZ.1).15:.64|
000007C0: 36 2C 5A 5A 3A 99 22 13 12 50 4C 41 59 20 41 47 |6,ZZ:."..PLAY AG|
000007D0: 41 49 4E 3F 20 28 59 2F 4E 29 22 3A 81 54 B2 2E |AIN? (Y/N)":.T..|
000007E0: A4 39 3A 82 3A A1 41 24 3A 8B 41 24 B2 22 22 A7 |.9:.:.A$:.A$."".|
000007F0: 39 35 30 30 00 03 10 1D 25 8B 41 24 B2 22 59 22 |9500....%.A$."Y"|
00000800: A7 31 30 00 0E 10 1E 25 99 22 93 22 3A 80 00 2B |.10....%.".":..+|
00000810: 10 10 27 81 54 B2 31 20 A4 20 36 3A 97 38 31 34 |..'.T.1 . 6:.814|
00000820: 35 AA 54 AB 31 2C 38 31 3A 82 54 00 40 10 15 27 |5.T.1,81:.T.@..'|
00000830: 81 54 B2 31 A4 36 3A 52 28 54 29 B2 30 3A 82 54 |.T.1.6:R(T).0:.T|
00000840: 00 52 10 1A 27 81 54 B2 31 A4 46 3A 82 54 3A 89 |.R..'.T.1.F:.T:.|
00000850: 31 30 00 86 10 20 4E 99 22 95 12 93 20 20 20 20 |10... N."... |
00000860: 20 20 20 20 20 20 20 20 20 20 20 4D 41 53 54 45 | MASTE|
00000870: 52 4D 49 4E 44 20 20 20 20 20 20 20 20 20 20 20 |RMIND |
00000880: 20 20 20 20 90 22 00 B4 10 25 4E 99 22 54 48 45 | ."...%N."THE|
00000890: 20 4F 42 4A 45 43 54 20 4F 46 20 54 48 45 20 47 | OBJECT OF THE G|
000008A0: 41 4D 45 20 49 53 20 54 4F 20 47 55 45 53 53 20 |AME IS TO GUESS |
000008B0: 54 48 45 22 00 CF 10 2F 4E 99 22 43 4F 4C 4F 52 |THE".../N."COLOR|
000008C0: 53 20 54 48 45 20 56 49 43 20 48 41 53 22 3B 00 |S THE VIC HAS";.|
000008D0: E8 10 34 4E 99 22 20 43 48 4F 53 45 4E 20 41 4E |..4N." CHOSEN AN|
000008E0: 44 20 54 48 45 20 22 3B 00 03 11 39 4E 99 22 53 |D THE ";...9N."S|
000008F0: 49 58 20 20 20 50 4F 53 49 54 49 4F 4E 53 20 49 |IX POSITIONS I|
00000900: 4E 22 3B 00 1B 11 3E 4E 99 22 20 20 57 48 49 43 |N";...>N." WHIC|
00000910: 48 20 54 48 45 59 20 47 4F 2E 22 00 32 11 48 4E |H THEY GO.".2.HN|
00000920: 99 22 11 54 48 45 20 43 4F 4C 4F 52 53 20 41 52 |.".THE COLORS AR|
00000930: 45 22 00 67 11 4D 4E 99 22 1C 52 45 44 20 9F 43 |E".g.MN.".RED .C|
00000940: 59 41 4E 20 9C 50 55 52 50 4C 45 20 1E 47 52 45 |YAN .PURPLE .GRE|
00000950: 45 4E 20 1F 42 4C 55 45 20 90 41 4E 44 20 9E 59 |EN .BLUE .AND .Y|
00000960: 45 4C 4C 4F 57 90 22 00 AD 11 4E 4E 99 22 11 55 |ELLOW."...NN.".U|
00000970: 53 45 20 54 48 45 20 4B 45 59 53 20 33 2D 38 20 |SE THE KEYS 3-8 |
00000980: 28 52 45 44 20 2D 20 59 45 4C 4C 4F 57 29 20 54 |(RED - YELLOW) T|
00000990: 4F 20 45 4E 54 45 52 54 48 45 20 43 4F 4C 4F 52 |O ENTERTHE COLOR|
000009A0: 20 59 4F 55 20 44 45 53 49 52 45 2E 22 00 E6 11 | YOU DESIRE."...|
000009B0: 4F 4E 99 22 11 48 49 54 20 12 52 45 54 55 52 4E |ON.".HIT .RETURN|
000009C0: 92 20 57 48 45 4E 20 59 4F 55 27 56 45 20 46 49 |. WHEN YOU'VE FI|
000009D0: 4E 49 53 48 45 44 20 59 4F 55 52 20 20 20 20 47 |NISHED YOUR G|
000009E0: 55 45 53 53 2E 22 00 26 12 50 4E 99 22 11 41 20 |UESS.".&.PN.".A |
000009F0: D1 20 4D 45 41 4E 53 20 59 4F 55 20 48 41 56 45 |. MEANS YOU HAVE|
00000A00: 20 41 20 52 49 47 48 54 20 43 4F 4C 4F 52 20 49 | A RIGHT COLOR I|
00000A10: 4E 20 54 48 45 20 52 49 47 48 54 20 50 4F 53 49 |N THE RIGHT POSI|
00000A20: 54 49 4F 4E 2E 22 00 66 12 51 4E 99 22 11 41 20 |TION.".f.QN.".A |
00000A30: D7 20 4D 45 41 4E 53 20 59 4F 55 20 48 41 56 45 |. MEANS YOU HAVE|
00000A40: 20 41 20 52 49 47 48 54 20 43 4F 4C 4F 52 20 49 | A RIGHT COLOR I|
00000A50: 4E 20 54 48 45 20 57 52 4F 4E 47 20 50 4F 53 49 |N THE WRONG POSI|
00000A60: 54 49 4F 4E 2E 22 00 89 12 57 4E 99 22 11 11 1F |TION."...WN."...|
00000A70: 50 52 45 53 53 20 12 52 45 54 55 52 4E 92 20 54 |PRESS .RETURN. T|
00000A80: 4F 20 43 4F 4E 54 2E 90 22 00 AB 12 58 4E A1 20 |O CONT.."...XN. |
00000A90: 41 24 3A 8B 20 41 24 B2 C7 28 31 33 29 A7 8D 32 |A$:. A$..(13)..2|
00000AA0: 31 30 30 30 3A 89 32 30 30 35 38 00 B7 12 59 4E |1000:.20058...YN|
00000AB0: 89 20 32 30 30 35 36 00 05 13 5A 4E 99 22 20 55 |. 20056...ZN." U|
00000AC0: 53 45 20 54 48 45 20 12 53 50 41 43 45 92 20 41 |SE THE .SPACE. A|
00000AD0: 4E 44 20 12 43 52 53 52 20 52 49 47 48 54 92 20 |ND .CRSR RIGHT. |
00000AE0: 54 4F 20 4D 4F 56 45 20 20 20 11 52 49 47 48 54 |TO MOVE .RIGHT|
00000AF0: 2E 20 54 48 45 20 12 44 45 4C 45 54 45 92 20 41 |. THE .DELETE. A|
00000B00: 4E 44 20 22 3B 00 52 13 5B 4E 99 22 12 43 52 53 |ND ";.R.[N.".CRS|
00000B10: 52 20 4C 45 46 54 92 20 54 4F 20 20 4D 4F 56 45 |R LEFT. TO MOVE|
00000B20: 11 4C 45 46 54 2E 20 54 48 45 20 12 3C 92 20 49 |.LEFT. THE .<. I|
00000B30: 53 20 55 53 45 44 20 46 4F 52 20 45 58 43 48 41 |S USED FOR EXCHA|
00000B40: 4E 47 49 4E 47 20 57 49 54 48 20 11 54 48 45 20 |NGING WITH .THE |
00000B50: 22 3B 00 A1 13 5C 4E 99 22 20 44 4F 54 20 54 4F |";...\N." DOT TO|
00000B60: 20 54 48 45 20 4C 45 46 54 20 4F 46 20 54 48 45 | THE LEFT OF THE|
00000B70: 20 43 55 52 53 4F 52 20 41 4E 44 20 20 11 54 48 | CURSOR AND .TH|
00000B80: 45 20 12 3E 92 20 54 4F 20 45 58 43 48 41 4E 47 |E .>. TO EXCHANG|
00000B90: 45 20 57 49 54 48 20 54 48 45 20 44 4F 54 20 22 |E WITH THE DOT "|
00000BA0: 3B 00 C8 13 61 4E 99 22 20 54 4F 20 54 48 45 20 |;...aN." TO THE |
00000BB0: 20 11 52 49 47 48 54 20 20 4F 46 20 54 48 45 20 | .RIGHT OF THE |
00000BC0: 43 55 52 53 4F 52 2E 22 00 FB 13 66 4E 99 22 11 |CURSOR."...fN.".|
00000BD0: 50 52 45 53 53 49 4E 47 20 12 46 31 92 20 57 49 |PRESSING .F1. WI|
00000BE0: 4C 4C 20 52 45 43 41 4C 4C 20 59 4F 55 52 20 4C |LL RECALL YOUR L|
00000BF0: 41 53 54 20 47 55 45 53 53 2E 22 00 28 14 68 4E |AST GUESS.".(.hN|
00000C00: 99 22 11 50 52 45 53 53 49 4E 47 20 12 46 38 92 |.".PRESSING .F8.|
00000C10: 20 57 49 4C 4C 20 46 4F 52 46 45 49 54 20 54 48 | WILL FORFEIT TH|
00000C20: 45 20 47 41 4D 45 2E 22 00 4C 14 6A 4E 99 22 11 |E GAME.".L.jN.".|
00000C30: 11 11 1F 50 52 45 53 53 20 12 52 45 54 55 52 4E |...PRESS .RETURN|
00000C40: 92 20 54 4F 20 50 4C 41 59 2E 90 22 00 62 14 6B |. TO PLAY..".b.k|
00000C50: 4E A1 20 41 24 3A 8B 41 24 B2 C7 28 31 33 29 A7 |N. A$:.A$..(13).|
00000C60: 20 8E 00 6E 14 70 4E 89 20 32 30 30 37 35 00 A4 | ..n.pN. 20075..|
00000C70: 14 08 52 99 22 93 95 12 20 20 20 20 20 20 20 20 |..R."... |
00000C80: 20 20 20 20 20 20 20 4D 41 53 54 45 52 4D 49 4E | MASTERMIN|
00000C90: 44 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |D |
00000CA0: 90 22 3A 8E 00 00 00 |.":.... |
..H....**REVISION OF THE VIC 20 PROGRAM
FROM THE TORONTO PET USERS GROUP......**
CONVERTED TO THE COMMODORE 64 BY ROGER D
BURGE,#2667,TPUG,CANADA......53281,1:.5
3280,1:.20000.R....".":.T.1.10:."."I(D(T
),2)".":.T.....CH.B(648).256:CO.55296...
..CO.CO.43:CH.CH.43:PO.1.0....T.CO.CO.76
3.80:.L.0.13:.T.L,.:.L,T.Z.C..".........
................ MASTERMIN
D ."...D..T.1.6:CN(T)..(.(
1).6).3:.T...I..T.1.6:MN(T).0:.T...N..A$
:A.E(A$).S.X.. A$.G(13).500...|.. A$."."
.212..... A$.",".312...... A$." " . A$.
"." . 180.".... A$.".".400.4.... A$.".".
9000.R.... A$.G(20) . A$."." . 200.Y....
CH.1.PO,160:.T.1.7:.T:.CH.1.PO,81......
A.3 . A.8 . 110... .MN(PO).A...... CO.1.
PO,A.1.H...PO.PO.1:. PO.7 . PO.1.Q....11
0...H.PO.PO.1:. PO.0 . PO.6...R..110...T
.T.PO.1:.T.7.T.1.,.V.. IF MN(PO)<1 OR MN
(T)<1THEN110.D.X..MN(PO).0 .MN(PO).1.Z.Z
..MN(T).0 .MN(T).1.....T.MN(PO):MN(PO).M
N(PO.1):.PO.1.7.MN(PO).MN(1).....MN(PO.1
).T:.PO.1.7.MN(1).T.C....CO.1.PO,(MN(PO)
).1.N...T.PO.1...... T.7 . T.1......CO.1
.T,(MN(T)).1...... 110...8.T.PO.1:.T.0.T
.6.6.:.. IF MN(PO)<1 OR MN(T)<1THEN110.N
.<..MN(PO).0 .MN(PO).1.D.>..MN(T).0 .MN(
T).1...@.T.MN(PO):MN(PO).MN(PO.1):.PO.1.
0.MN(PO).MN(6)...J.MN(PO.1).T:.PO.1.0.MN
(6).T.M.T..CO.1.PO,(MN(PO)).1.X.^.T.PO.1
...H.. T.0 . T.6...R..CO.1.T,(MN(T)).1..
.|.. 110.!....T.1.6:.R(T).3 . 110.(....T
.\.... T.1.6:.CH.1.T,81:.CO.1.T,R(T).1:M
N(T).R(T):.T.E....110.....T.1.6:.MN(T).
3 . 110.....R(T).MN(T)......T.....BL.0:W
H.0......T.1.6:CX(T).CN(T):.T.H....T.1.6
...... MN(T).CX(T).BL.BL.1:CX(T).9:MN(T)
.9...&.. T...0..T.1.6...:..L.1.6.".?.. M
N(T).9.600.I.D.. MN(T).CX(L).WH.WH.1:CX(
L).9:.600.P.N..L.W.X..T.H.B.. BL.0 . 650
...L..T.1.BL:.CH.7.T,81:.T...... WH.0 .
700......T.1.WH:.CH.7.BL.T,87:.T.K...CH.
CH.80:CO.CO.80:PO.1...A.. BL.6.9050...F.
. CH.1824.9000...P.. 105.....BILL KRIEGE
R.9.(#.".......................YOU LOSE.
":F.10000.P.2#.".THE SOLUTION IS: ";:.T.
1.6:.646,CN(T).1:."Q";:..Z.<#.9500...Z#.
".......................YOU GOT IT!":F.5
000....%ZZ.(ZZ.1).15:.646,ZZ:."..PLAY AG
AIN? (Y/N)":.T...9:.:.A$:.A$."".9500....
%.A$."Y".10....%.".":..+..'.T.1 . 6:.814
5.T.1,81:.T.@..'.T.1.6:R(T).0:.T.R..'.T.
1.F:.T:.10... N."... MASTE
RMIND ."...%N."THE OBJECT
OF THE GAME IS TO GUESS THE".O./N."COLOR
S THE VIC HAS";...4N." CHOSEN AND THE ";
...9N."SIX POSITIONS IN";...>N." WHIC
H THEY GO.".2.HN.".THE COLORS ARE".G.MN.
".RED .CYAN .PURPLE .GREEN .BLUE .AND .Y
ELLOW."...NN.".USE THE KEYS 3-8 (RED - Y
ELLOW) TO ENTERTHE COLOR YOU DESIRE."...
ON.".HIT .RETURN. WHEN YOU'VE FINISHED Y
OUR GUESS.".&.PN.".A Q MEANS YOU HAVE
A RIGHT COLOR IN THE RIGHT POSITION.".F
.QN.".A W MEANS YOU HAVE A RIGHT COLOR I
N THE WRONG POSITION."...WN."...PRESS .R
ETURN. TO CONT.."...XN. A$:. A$.G(13)..2
1000:.20058...YN. 20056...ZN." USE THE .
SPACE. AND .CRSR RIGHT. TO MOVE .RIGHT
. THE .DELETE. AND ";.R.[N.".CRSR LEFT.
TO MOVE.LEFT. THE .<. IS USED FOR EXCHA
NGING WITH .THE ";...\N." DOT TO THE LEF
T OF THE CURSOR AND .THE .>. TO EXCHANG
E WITH THE DOT ";.H.AN." TO THE .RIGHT
OF THE CURSOR."...FN.".PRESSING .F1. WI
LL RECALL YOUR LAST GUESS.".(.HN.".PRESS
ING .F8. WILL FORFEIT THE GAME.".L.JN.".
...PRESS .RETURN. TO PLAY..".B.KN. A$:.A
$.G(13). ..N.PN. 20075....R."...
MASTERMIND .":....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL