3 OF A KIND.C

00000000: 01 08 37 08 00 00 8F 2A  2A 43 4F 4E 56 45 52 54  |..7....**CONVERT|
00000010: 45 44 20 54 4F 20 54 48  45 20 43 36 34 20 41 4E  |ED TO THE C64 AN|
00000020: 44 20 42 59 20 52 4F 47  45 52 44 20 42 55 52 47  |D BY ROGERD BURG|
00000030: 45 2C 23 32 36 36 37 00  5D 08 01 00 8F 2A 2A 54  |E,#2667.]....**T|
00000040: 4F 52 4F 4E 54 4F 20 50  45 54 20 55 53 45 52 53  |ORONTO PET USERS|
00000050: 20 47 52 4F 55 50 2C 43  41 4E 41 44 41 00 81 08  | GROUP,CANADA...|
00000060: 0A 00 89 39 30 30 30 3A  8F 20 4D 2E 20 52 49 43  |...9000:. M. RIC|
00000070: 48 54 45 52 20 39 30 30  36 34 20 4D 41 59 20 38  |HTER 90064 MAY 8|
00000080: 31 00 96 08 64 00 8F 20  53 45 54 20 55 50 20 44  |1...d.. SET UP D|
00000090: 49 53 50 4C 41 59 00 CC  08 6E 00 55 B2 4E 57 28  |ISPLAY...n.U.NW(|
000000A0: 33 29 3A 50 24 B2 4E 24  3A 59 24 B2 4E 24 3A 57  |3):P$.N$:Y$.N$:W|
000000B0: 24 B2 57 30 24 3A 99 22  93 20 23 20 57 4F 52 44  |$.W0$:.". # WORD|
000000C0: 20 20 20 20 59 4F 55 20  20 43 36 34 00 E7 08 78  |    YOU  C64...x|
000000D0: 00 99 22 20 C4 20 C4 C4  C4 C4 20 20 20 20 C4 C4  |.." . ....    ..|
000000E0: C4 C4 20 C4 C4 C4 C4 00  07 09 82 00 81 49 B2 31  |.. ..........I.1|
000000F0: A4 39 3A 99 49 3B 57 24  28 49 29 22 11 22 3A 82  |.9:.I;W$(I)".":.|
00000100: 49 3A 89 35 39 30 30 00  1C 09 E8 03 55 B2 31 3A  |I:.5900.....U.1:|
00000110: 8F 20 56 49 43 27 53 20  50 4C 41 59 00 35 09 F2  |. VIC'S PLAY.5..|
00000120: 03 81 49 B2 30 A4 33 3A  8B 50 25 28 31 2C 49 29  |..I.0.3:.P%(1,I)|
00000130: B1 30 A7 82 49 00 49 09  FC 03 49 B2 49 AB 31 3A  |.0..I.I...I.I.1:|
00000140: 8B 49 B3 31 89 31 35 30  30 00 80 09 1A 04 81 4A  |.I.1.1500......J|
00000150: B2 30 A4 49 AB 31 3A 81  4B B2 4A AA 31 A4 49 3A  |.0.I.1:.K.J.1.I:|
00000160: 56 B2 50 25 28 31 2C 49  29 AA 50 25 28 31 2C 4A  |V.P%(1,I).P%(1,J|
00000170: 29 3A 8B 56 B1 31 34 B0  56 B3 36 89 31 31 30 30  |):.V.14.V.6.1100|
00000180: 00 9B 09 24 04 58 B2 A5  4E 28 31 35 AB 56 29 3A  |...$.X..N(15.V):|
00000190: 8B A5 57 28 58 29 89 31  39 30 30 00 AA 09 4C 04  |..W(X).1900...L.|
000001A0: 8B 56 B3 31 35 89 31 32  30 30 00 C5 09 56 04 58  |.V.15.1200...V.X|
000001B0: B2 A5 4E 28 32 34 AB 56  29 3A 8B A5 57 28 58 29  |..N(24.V):..W(X)|
000001C0: 89 31 39 30 30 00 CF 09  B0 04 82 4B 3A 82 4A 00  |.1900......K:.J.|
000001D0: E5 09 DC 05 8F 20 43 48  45 43 4B 20 46 4F 52 20  |..... CHECK FOR |
000001E0: 42 4C 4F 43 4B 00 FC 09  E6 05 81 49 B2 30 A4 33  |BLOCK......I.0.3|
000001F0: 3A 8B 50 25 28 30 2C 49  29 A7 82 49 00 10 0A F0  |:.P%(0,I)..I....|
00000200: 05 49 B2 49 AB 31 3A 8B  49 B3 31 89 31 38 30 30  |.I.I.1:.I.1.1800|
00000210: 00 47 0A FA 05 81 4A B2  30 A4 49 AB 31 3A 81 4B  |.G....J.0.I.1:.K|
00000220: B2 4A AA 31 A4 49 3A 56  B2 50 25 28 30 2C 49 29  |.J.1.I:V.P%(0,I)|
00000230: AA 50 25 28 30 2C 4A 29  3A 8B 56 B1 31 34 B0 56  |.P%(0,J):.V.14.V|
00000240: B3 36 89 31 36 30 30 00  62 0A 04 06 58 B2 A5 4E  |.6.1600.b...X..N|
00000250: 28 31 35 AB 56 29 3A 8B  A5 57 28 58 29 89 31 39  |(15.V):..W(X).19|
00000260: 30 30 00 71 0A 40 06 8B  56 B3 31 35 89 31 37 30  |00.q.@..V.15.170|
00000270: 30 00 8C 0A 4A 06 58 B2  A5 4E 28 32 34 AB 56 29  |0...J.X..N(24.V)|
00000280: 3A 8B A5 57 28 58 29 89  31 39 30 30 00 96 0A A4  |:..W(X).1900....|
00000290: 06 82 4B 3A 82 4A 00 AC  0A 08 07 8F 20 4E 4F 20  |..K:.J...... NO |
000002A0: 4F 42 56 49 4F 55 53 20  50 4C 41 59 00 CC 0A 3A  |OBVIOUS PLAY...:|
000002B0: 07 58 B2 31 AA B5 28 39  AC BB 28 31 29 29 3A 8B  |.X.1..(9..(1)):.|
000002C0: A5 57 28 58 29 B2 30 89  31 38 35 30 00 EF 0A 6C  |.W(X).0.1850...l|
000002D0: 07 4A B2 30 3A 4B B2 30  3A 99 22 59 4F 55 52 20  |.J.0:K.0:."YOUR |
000002E0: 36 34 20 50 4C 41 59 53  22 58 3A 54 B2 54 49 00  |64 PLAYS"X:T.TI.|
000002F0: 01 0B 76 07 8B 54 49 AB  54 B3 33 30 89 31 39 31  |..v..TI.T.30.191|
00000300: 30 00 0B 0B 80 07 89 35  30 30 30 00 1F 0B D0 07  |0......5000.....|
00000310: 55 B2 30 3A 8F 20 59 4F  55 52 20 50 4C 41 59 00  |U.0:. YOUR PLAY.|
00000320: 3B 0B DA 07 99 22 57 48  49 43 48 20 23 3F 20 20  |;...."WHICH #?  |
00000330: 20 20 20 22 42 34 24 44  34 24 3B 00 6E 0B E4 07  |   "B4$D4$;.n...|
00000340: 8D 34 30 30 30 3A 58 B2  C5 28 43 24 29 3A 8B 58  |.4000:X..(C$):.X|
00000350: B3 31 B0 C5 28 CA 28 57  24 2C 28 58 AB 28 58 B2  |.1..(.(W$,(X.(X.|
00000360: 2E 29 29 2C 31 29 29 B2  30 89 32 30 32 30 00 7B  |.)),1)).0.2020.{|
00000370: 0B F8 07 99 58 3A 89 35  30 30 30 00 96 0B D8 0E  |....X:.5000.....|
00000380: 8D 34 30 30 30 3A 8B 43  24 B2 22 59 22 B0 43 24  |.4000:.C$."Y".C$|
00000390: B2 22 4E 22 A7 8E 00 A0  0B E2 0E 89 33 38 30 30  |."N"........3800|
000003A0: 00 BF 0B 96 0F 99 22 11  12 48 49 54 20 41 20 4B  |......"..HIT A K|
000003B0: 45 59 20 54 4F 20 43 4F  4E 54 49 4E 55 45 22 00  |EY TO CONTINUE".|
000003C0: D3 0B A0 0F A1 43 24 3A  8B 43 24 B1 22 22 89 34  |.....C$:.C$."".4|
000003D0: 30 30 30 00 E7 0B AA 0F  A1 43 24 3A 8B 43 24 B2  |000......C$:.C$.|
000003E0: 22 22 89 34 30 31 30 00  ED 0B B4 0F 8E 00 0C 0C  |"".4010.........|
000003F0: 88 13 8F 20 50 55 54 20  57 4F 52 44 20 49 4E 20  |... PUT WORD IN |
00000400: 52 49 47 48 54 20 43 4F  4C 55 4D 4E 00 37 0C 92  |RIGHT COLUMN.7..|
00000410: 13 99 C8 28 4C 24 2C 32  AC 58 29 3A 99 42 37 24  |...(L$,2.X):.B7$|
00000420: 57 24 28 58 29 3B 3A 59  24 B2 44 35 24 AA 22 20  |W$(X);:Y$.D5$." |
00000430: 22 AA 57 24 28 58 29 00  4E 0C 9C 13 81 49 B2 30  |".W$(X).N....I.0|
00000440: A4 33 3A 8B 50 25 28 55  2C 49 29 A7 82 49 00 6C  |.3:.P%(U,I)..I.l|
00000450: 0C A6 13 49 B2 49 3A 50  25 28 55 2C 49 29 B2 A5  |...I.I:P%(U,I)..|
00000460: 57 28 58 29 3A 56 B2 31  AA 32 AC 58 00 95 0C B0  |W(X):V.1.2.X....|
00000470: 13 8B 56 B3 31 38 A7 81  4A B2 56 A4 31 38 3A 99  |..V.18..J.V.18:.|
00000480: 44 34 24 42 34 24 22 11  22 44 34 24 57 24 28 58  |D4$B4$"."D4$W$(X|
00000490: 29 3B 3A 82 4A 00 B4 0C  C4 13 57 24 B2 C8 28 57  |);:.J.....W$..(W|
000004A0: 24 2C 58 AB 31 29 AA 22  30 22 AA CA 28 57 24 2C  |$,X.1)."0"..(W$,|
000004B0: 58 AA 31 29 00 D2 0C EC  13 56 B2 34 AA 35 AC 55  |X.1).....V.4.5.U|
000004C0: 3A 81 4A B2 31 A4 56 3A  99 22 20 22 59 24 3B 3A  |:.J.1.V:." "Y$;:|
000004D0: 82 4A 00 FA 0C F6 13 56  B2 33 AA 32 AC 49 3A 81  |.J.....V.3.2.I:.|
000004E0: 4A B2 31 38 A4 56 A9 AB  31 3A 99 44 34 24 42 34  |J.18.V..1:.D4$B4|
000004F0: 24 22 91 22 59 24 3B 3A  82 4A 00 10 0D 50 14 8F  |$"."Y$;:.J...P..|
00000500: 20 43 48 45 43 4B 20 46  4F 52 20 41 20 57 49 4E  | CHECK FOR A WIN|
00000510: 00 24 0D 5A 14 8B 50 25  28 55 2C 32 29 B2 30 89  |.$.Z..P%(U,2).0.|
00000520: 35 39 30 30 00 3B 0D 64  14 56 B2 50 25 28 55 2C  |5900.;.d.V.P%(U,|
00000530: 49 29 3A 81 4A B2 30 A4  49 AB 32 00 6E 0D 6E 14  |I):.J.0.I.2.n.n.|
00000540: 81 4B B2 4A AA 31 A4 49  AB 31 3A 57 B2 56 AA 50  |.K.J.1.I.1:W.V.P|
00000550: 25 28 55 2C 4A 29 AA 50  25 28 55 2C 4B 29 3A 8B  |%(U,J).P%(U,K):.|
00000560: 57 B2 31 35 B0 57 B2 32  34 89 35 33 30 30 00 82  |W.15.W.24.5300..|
00000570: 0D 78 14 82 4B 3A 82 4A  3A 8B 49 B3 34 89 35 39  |.x..K:.J:.I.4.59|
00000580: 30 30 00 A8 0D 82 14 58  24 B2 22 54 49 45 20 47  |00.....X$."TIE G|
00000590: 41 4D 45 22 3A 4E 57 28  32 29 B2 4E 57 28 32 29  |AME":NW(2).NW(2)|
000005A0: AA 31 3A 89 35 35 35 30  00 AE 0D B4 14 8F 00 BE  |.1:.5550........|
000005B0: 0D 7C 15 8F 20 47 41 4D  45 20 45 4E 44 53 00 F3  |.|.. GAME ENDS..|
000005C0: 0D 86 15 4E 57 28 55 29  B2 4E 57 28 55 29 AA 31  |...NW(U).NW(U).1|
000005D0: 3A 58 24 B2 22 59 4F 55  20 57 49 4E 21 22 3A 8B  |:X$."YOU WIN!":.|
000005E0: 55 A7 58 24 B2 22 59 4F  55 52 20 36 34 20 57 49  |U.X$."YOUR 64 WI|
000005F0: 4E 53 22 00 11 0E AE 15  99 4C 24 42 4C 24 3A 99  |NS"......L$BL$:.|
00000600: 22 12 20 22 58 24 22 20  92 20 22 3B 3A 54 B2 54  |". "X$" . ";:T.T|
00000610: 49 00 23 0E B3 15 8B 54  49 AB 54 B3 36 30 89 35  |I.#....TI.T.60.5|
00000620: 35 35 35 00 4A 0E B8 15  99 22 20 20 41 4E 4F 54  |555.J...."  ANOT|
00000630: 48 45 52 3F 20 22 3B 3A  8D 33 38 30 30 3A 8B 43  |HER? ";:.3800:.C|
00000640: 24 B2 22 4E 22 89 36 30  30 30 00 74 0E C2 15 99  |$."N".6000.t....|
00000650: 43 24 3A 81 49 B2 30 A4  34 3A 50 25 28 30 2C 49  |C$:.I.0.4:P%(0,I|
00000660: 29 B2 30 3A 50 25 28 31  2C 49 29 B2 30 3A 82 3A  |).0:P%(1,I).0:.:|
00000670: 89 31 30 30 00 8E 0E 0C  17 99 4C 24 42 4C 24 3A  |.100......L$BL$:|
00000680: 91 31 AA 55 89 31 30 30  30 2C 32 30 30 30 00 9B  |.1.U.1000,2000..|
00000690: 0E 70 17 8F 20 57 52 41  50 55 50 00 B4 0E 7A 17  |.p.. WRAPUP...z.|
000006A0: 99 22 93 11 11 49 4E 20  54 48 49 53 20 53 45 52  |."...IN THIS SER|
000006B0: 49 45 53 2C 00 C9 0E 84  17 99 22 11 59 4F 55 20  |IES,......".YOU |
000006C0: 57 4F 4E 22 4E 57 28 30  29 00 E2 0E 8E 17 99 22  |WON"NW(0)......"|
000006D0: 11 59 4F 55 52 20 36 34  20 57 4F 4E 22 4E 57 28  |.YOUR 64 WON"NW(|
000006E0: 31 29 00 10 0F 98 17 99  22 11 41 4E 44 20 59 4F  |1)......".AND YO|
000006F0: 55 20 48 41 44 22 4E 57  28 32 29 22 54 49 45 22  |U HAD"NW(2)"TIE"|
00000700: 3B 3A 8B 4E 57 28 32 29  B3 B1 31 A7 99 22 53 22  |;:.NW(2)..1.."S"|
00000710: 00 29 0F A2 17 99 22 11  50 4C 41 59 20 41 47 41  |.)....".PLAY AGA|
00000720: 49 4E 3F 20 28 59 2F 4E  29 00 3D 0F A7 17 A1 41  |IN? (Y/N).=....A|
00000730: 24 3A 8B 41 24 B2 22 22  A7 36 30 35 35 00 4B 0F  |$:.A$."".6055.K.|
00000740: AC 17 8B 41 24 B2 22 59  22 A7 8A 00 5E 0F B1 17  |...A$."Y"...^...|
00000750: 8B 41 24 B2 22 4E 22 A7  99 22 93 22 3A 80 00 68  |.A$."N"..".":..h|
00000760: 0F B6 17 89 36 30 35 35  00 8B 0F 28 23 8F 20 47  |....6055...(#. G|
00000770: 41 4D 45 20 53 4F 55 52  43 45 3A 20 44 41 56 49  |AME SOURCE: DAVI|
00000780: 44 20 53 49 4C 56 45 52  4D 41 4E 00 BF 0F 32 23  |D SILVERMAN...2#|
00000790: 4E 24 B2 22 30 30 30 30  30 30 30 30 30 22 3A 42  |N$."000000000":B|
000007A0: 34 24 B2 22 20 20 20 20  22 3A 44 35 24 B2 22 9D  |4$."    ":D5$.".|
000007B0: 9D 9D 9D 9D 22 3A 44 34  24 B2 22 9D 9D 9D 9D 00  |....":D4$.".....|
000007C0: F9 0F 3C 23 4C 24 B2 22  20 20 20 20 20 20 20 20  |..<#L$."        |
000007D0: 20 20 20 20 20 20 91 91  22 3A 42 37 24 B2 22 20  |      ..":B7$." |
000007E0: 20 20 20 20 20 20 22 3A  97 35 33 32 38 31 2C 33  |      ":.53281,3|
000007F0: 3A 97 35 33 32 38 30 2C  33 00 38 10 46 23 86 50  |:.53280,3.8.F#.P|
00000800: 25 28 31 2C 34 29 2C 4E  57 28 34 29 3A 4C 24 B2  |%(1,4),NW(4):L$.|
00000810: 22 13 11 11 11 11 11 11  11 11 11 11 11 11 11 11  |"...............|
00000820: 11 11 11 11 11 11 22 3A  4E 57 28 34 29 B2 33 AC  |......":NW(4).3.|
00000830: BB 28 AB 31 AD 54 49 29  00 64 10 5A 23 96 A5 57  |.(.1.TI).d.Z#..W|
00000840: 28 49 29 B2 C5 28 CA 28  57 24 2C 49 2C 31 29 29  |(I)..(.(W$,I,1))|
00000850: 3A 96 A5 4E 28 49 29 B2  C5 28 CA 28 4E 24 2C 49  |:..N(I)..(.(N$,I|
00000860: 2C 31 29 29 00 90 10 64  23 81 4A B2 30 A4 4E 57  |,1))...d#.J.0.NW|
00000870: 28 34 29 3A 87 57 30 24  3A 81 49 B2 31 A4 39 3A  |(4):.W0$:.I.1.9:|
00000880: 87 57 24 28 49 29 3A 82  49 3A 87 4E 24 3A 82 4A  |.W$(I):.I:.N$:.J|
00000890: 00 A3 10 8C 23 8F 20 49  4E 53 54 52 55 43 54 49  |....#. INSTRUCTI|
000008A0: 4F 4E 53 00 C8 10 96 23  99 22 93 11 12 90 20 54  |ONS....#.".... T|
000008B0: 48 52 45 45 20 4F 46 20  41 20 4B 49 4E 44 20 11  |HREE OF A KIND .|
000008C0: 11 22 C7 28 31 34 32 29  00 02 11 A0 23 99 22 59  |.".(142)....#."Y|
000008D0: 4F 55 52 20 36 34 20 57  49 4C 4C 20 47 49 56 45  |OUR 64 WILL GIVE|
000008E0: 20 59 4F 55 20 41 20 20  20 4C 49 53 54 20 4F 46  | YOU A   LIST OF|
000008F0: 20 39 20 20 20 20 20 57  4F 52 44 53 2C 20 46 52  | 9     WORDS, FR|
00000900: 4F 4D 00 31 11 AA 23 99  22 57 48 49 43 48 20 59  |OM.1..#."WHICH Y|
00000910: 4F 55 20 41 4E 44 20 59  4F 55 52 20 36 34 20 50  |OU AND YOUR 64 P|
00000920: 49 43 4B 20 41 4C 54 45  52 4E 41 54 45 4C 59 2E  |ICK ALTERNATELY.|
00000930: 11 00 5F 11 B4 23 99 22  54 48 45 20 4F 42 4A 45  |.._..#."THE OBJE|
00000940: 43 54 20 49 53 20 54 4F  20 47 45 54 20 20 54 48  |CT IS TO GET  TH|
00000950: 52 45 45 20 57 4F 52 44  53 20 57 48 49 43 48 00  |REE WORDS WHICH.|
00000960: 85 11 BE 23 99 22 43 4F  4E 54 41 49 4E 20 54 48  |...#."CONTAIN TH|
00000970: 45 20 53 41 4D 45 20 4C  45 54 54 45 52 2E 22 3A  |E SAME LETTER.":|
00000980: 8D 33 39 39 30 00 C6 11  C8 23 99 22 93 11 46 4F  |.3990....#."..FO|
00000990: 52 20 45 58 41 4D 50 4C  45 2C 20 49 46 20 59 4F  |R EXAMPLE, IF YO|
000009A0: 55 20 20 20 47 45 54 3A  22 3A 99 22 11 20 20 4D  |U   GET:":.".  M|
000009B0: 41 12 53 92 54 20 20 12  53 92 4B 49 50 20 20 12  |A.S.T  .S.KIP  .|
000009C0: 53 92 4C 4F 57 90 00 F4  11 D2 23 99 22 11 59 4F  |S.LOW.....#.".YO|
000009D0: 55 20 57 4F 55 4C 44 20  57 49 4E 2C 20 53 49 4E  |U WOULD WIN, SIN|
000009E0: 43 45 20 20 45 41 43 48  20 48 41 53 20 41 4E 20  |CE  EACH HAS AN |
000009F0: 27 53 27 2E 00 09 12 DC  23 81 49 B2 30 A4 32 3A  |'S'.....#.I.0.2:|
00000A00: 4E 57 28 49 29 B2 30 3A  82 00 2D 12 F0 23 99 22  |NW(I).0:..-..#."|
00000A10: 11 12 20 57 49 4C 4C 20  59 4F 55 20 47 4F 20 46  |.. WILL YOU GO F|
00000A20: 49 52 53 54 3F 20 22 3A  8D 33 38 30 30 00 56 12  |IRST? ":.3800.V.|
00000A30: FA 23 4E 57 28 33 29 B2  AB 28 43 24 B2 22 59 22  |.#NW(3)..(C$."Y"|
00000A40: 29 3A 4E 57 28 34 29 B2  B5 28 33 AC BB 28 31 29  |):NW(4)..(3..(1)|
00000A50: 29 3A 89 31 30 30 00 9C  12 10 27 83 39 37 33 36  |):.100....'.9736|
00000A60: 34 32 35 38 31 2C 46 49  52 45 2C 48 4F 53 45 2C  |42581,FIRE,HOSE,|
00000A70: 4D 41 53 54 2C 50 4C 4F  57 2C 50 52 41 59 2C 52  |MAST,PLOW,PRAY,R|
00000A80: 4F 43 4B 2C 53 4B 49 50  2C 57 41 4B 45 2C 57 49  |OCK,SKIP,WAKE,WI|
00000A90: 4E 44 2C 39 36 33 35 37  34 32 38 31 00 E2 12 1A  |ND,963574281....|
00000AA0: 27 83 33 36 31 34 39 32  38 35 37 2C 43 41 53 4B  |'.361492857,CASK|
00000AB0: 2C 43 52 4F 50 2C 44 52  55 4D 2C 4C 4F 41 4E 2C  |,CROP,DRUM,LOAN,|
00000AC0: 4D 49 4E 54 2C 50 45 4E  44 2C 52 41 54 45 2C 53  |MINT,PEND,RATE,S|
00000AD0: 4F 4D 45 2C 54 49 50 53  2C 33 36 31 34 38 32 39  |OME,TIPS,3614829|
00000AE0: 37 35 00 28 13 24 27 83  31 33 37 32 39 34 35 38  |75.(.$'.13729458|
00000AF0: 36 2C 42 55 4E 54 2C 47  49 52 4C 2C 48 41 49 4C  |6,BUNT,GIRL,HAIL|
00000B00: 2C 48 4F 4D 45 2C 4D 4F  41 4E 2C 52 4F 57 53 2C  |,HOME,MOAN,ROWS,|
00000B10: 53 49 4E 45 2C 54 45 41  52 2C 54 48 55 53 2C 31  |SINE,TEAR,THUS,1|
00000B20: 34 32 36 37 39 33 38 35  00 64 13 74 27 8F 20 46  |42679385.d.t'. F|
00000B30: 49 52 53 54 20 4E 55 4D  42 45 52 20 49 53 20 22  |IRST NUMBER IS "|
00000B40: 4D 41 47 49 43 20 53 51  55 41 52 45 22 2C 20 53  |MAGIC SQUARE", S|
00000B50: 45 43 4F 4E 44 20 49 53  20 49 54 53 20 49 4E 56  |ECOND IS ITS INV|
00000B60: 45 52 53 45 00 00 00                              |ERSE...         |

..7....**CONVERTED TO THE C64 AND BY ROG
ERD BURGE,#2667.]....**TORONTO PET USERS
 GROUP,CANADA......9000:. M. RICHTER 900
64 MAY 81...D.. SET UP DISPLAY.L.N.U.NW(
3):P$.N$:Y$.N$:W$.W0$:.". # WORD    YOU 
 C64...X.." D DDDD    DDDD DDDD......I.1
.9:.I;W$(I)".":.I:.5900.....U.1:. VIC'S 
PLAY.5....I.0.3:.P%(1,I).0..I.I...I.I.1:
.I.1.1500......J.0.I.1:.K.J.1.I:V.P%(1,I
).P%(1,J):.V.14.V.6.1100...$.X..N(15.V):
..W(X).1900...L..V.15.1200.E.V.X..N(24.V
):..W(X).1900.O....K:.J...... CHECK FOR 
BLOCK......I.0.3:.P%(0,I)..I.....I.I.1:.
I.1.1800.G....J.0.I.1:.K.J.1.I:V.P%(0,I)
.P%(0,J):.V.14.V.6.1600.B...X..N(15.V):.
.W(X).1900.Q.@..V.15.1700...J.X..N(24.V)
:..W(X).1900......K:.J...... NO OBVIOUS 
PLAY.L.:.X.1..(9..(1)):..W(X).0.1850...L
.J.0:K.0:."YOUR 64 PLAYS"X:T.TI...V..TI.
T.30.1910......5000...P.U.0:. YOUR PLAY.
;.Z.."WHICH #?     "B4$D4$;.N....4000:X.
E(C$):.X.1.E(J(W$,(X.(X..)),1)).0.2020.{
....X:.5000...X..4000:.C$."Y".C$."N"... 
....3800......"..HIT A KEY TO CONTINUE".
S. ..C$:.C$."".4000......C$:.C$."".4010.
........... PUT WORD IN RIGHT COLUMN.7..
..H(L$,2.X):.B7$W$(X);:Y$.D5$." ".W$(X).
N....I.0.3:.P%(U,I)..I.L...I.I:P%(U,I)..
W(X):V.1.2.X......V.18..J.V.18:.D4$B4$".
"D4$W$(X);:.J...D.W$.H(W$,X.1)."0".J(W$,
X.1).R...V.4.5.U:.J.1.V:." "Y$;:.J.....V
.3.2.I:.J.18.V..1:.D4$B4$"."Y$;:.J...P..
 CHECK FOR A WIN.$.Z..P%(U,2).0.5900.;.D
.V.P%(U,I):.J.0.I.2.N.N..K.J.1.I.1:W.V.P
%(U,J).P%(U,K):.W.15.W.24.5300...X..K:.J
:.I.4.5900.....X$."TIE GAME":NW(2).NW(2)
.1:.5550.........|.. GAME ENDS.....NW(U)
.NW(U).1:X$."YOU WIN!":.U.X$."YOUR 64 WI
NS"......L$BL$:.". "X$" . ";:T.TI.#....T
I.T.60.5555.J...."  ANOTHER? ";:.3800:.C
$."N".6000.T.B..C$:.I.0.4:P%(0,I).0:P%(1
,I).0:.:.100......L$BL$:.1.U.1000,2000..
.P.. WRAPUP...Z.."...IN THIS SERIES,.I..
..".YOU WON"NW(0)......".YOUR 64 WON"NW(
1)......".AND YOU HAD"NW(2)"TIE";:.NW(2)
..1.."S".)....".PLAY AGAIN? (Y/N).=....A
$:.A$."".6055.K....A$."Y"...^....A$."N".
.".":..H....6055...(#. GAME SOURCE: DAVI
D SILVERMAN...2#N$."000000000":B4$."    
":D5$.".....":D4$.".......<#L$."        
      ..":B7$."       ":.53281,3:.53280,
3.8.F#.P%(1,4),NW(4):L$."...............
......":NW(4).3..(.1.TI).D.Z#..W(I).E(J(
W$,I,1)):..N(I).E(J(N$,I,1))...D#.J.0.NW
(4):.W0$:.I.1.9:.W$(I):.I:.N$:.J....#. I
NSTRUCTIONS.H..#.".... THREE OF A KIND .
."G(142)... #."YOUR 64 WILL GIVE YOU A  
 LIST OF 9     WORDS, FROM.1..#."WHICH Y
OU AND YOUR 64 PICK ALTERNATELY..._..#."
THE OBJECT IS TO GET  THREE WORDS WHICH.
...#."CONTAIN THE SAME LETTER.":.3990.F.
H#."..FOR EXAMPLE, IF YOU   GET:":.".  M
A.S.T  .S.KIP  .S.LOW....R#.".YOU WOULD 
WIN, SINCE  EACH HAS AN 'S'.....#.I.0.2:
NW(I).0:..-..#.".. WILL YOU GO FIRST? ":
.3800.V..#NW(3)..(C$."Y"):NW(4)..(3..(1)
):.100....'.973642581,FIRE,HOSE,MAST,PLO
W,PRAY,ROCK,SKIP,WAKE,WIND,963574281....
'.361492857,CASK,CROP,DRUM,LOAN,MINT,PEN
D,RATE,SOME,TIPS,361482975.(.$'.13729458
6,BUNT,GIRL,HAIL,HOME,MOAN,ROWS,SINE,TEA
R,THUS,142679385.D.T'. FIRST NUMBER IS "
MAGIC SQUARE", SECOND IS ITS INVERSE...

×

C64 Image

> CLICK IMAGE PREVIEW FOR FULL MODAL