Multiple names: SINNERS         , SINNERS

00000000: 01 08 27 08 F4 01 8F 2A  2A 53 49 4E 4E 45 52 53  |..'....**SINNERS|
00000010: 20 42 59 20 4D 41 43 20  4F 47 4C 45 53 42 59 20  | BY MAC OGLESBY |
00000020: 4F 4E 20 32 2F 37 38 00  49 08 FE 01 8F 2A 2A 46  |ON 2/78.I....**F|
00000030: 52 4F 4D 20 43 41 4C 43  55 4C 41 54 4F 52 53 2F  |ROM CALCULATORS/|
00000040: 43 4F 4D 50 55 54 45 52  53 00 60 08 E8 03 8F 2A  |COMPUTERS.`....*|
00000050: 2A 2A 49 4E 49 54 49 41  4C 49 5A 41 54 49 4F 4E  |**INITIALIZATION|
00000060: 00 83 08 4C 04 86 44 28  36 2C 36 29 2C 50 28 31  |...L..D(6,6),P(1|
00000070: 32 2C 36 29 2C 4D 28 34  29 2C 52 28 34 29 2C 43  |2,6),M(4),R(4),C|
00000080: 28 34 29 00 94 08 51 04  86 48 28 32 2C 33 29 2C  |(4)...Q..H(2,3),|
00000090: 55 28 34 29 00 B2 08 56  04 81 4A B2 31 A4 34 3A  |U(4)...V..J.1.4:|
000000A0: 87 4D 28 4A 29 2C 52 28  4A 29 2C 43 28 4A 29 3A  |.M(J),R(J),C(J):|
000000B0: 82 4A 00 D5 08 60 04 83  38 35 2C 2D 31 2C 30 2C  |.J...`..85,-1,0,|
000000C0: 38 32 2C 30 2C 31 2C 36  38 2C 31 2C 30 2C 37 36  |82,0,1,68,1,0,76|
000000D0: 2C 30 2C 2D 31 00 01 09  6A 04 81 4A B2 31 A4 35  |,0,-1...j..J.1.5|
000000E0: 3A 81 4B B2 31 A4 35 3A  44 28 4A 2C 4B 29 B2 36  |:.K.1.5:D(J,K).6|
000000F0: 34 AA 28 4A AB 31 29 AC  35 AA 4B 3A 82 4B 3A 82  |4.(J.1).5.K:.K:.|
00000100: 4A 00 13 09 74 04 81 49  B2 31 A4 32 3A 81 4A B2  |J...t..I.1.2:.J.|
00000110: 31 A4 33 00 2B 09 7E 04  3A 48 28 49 2C 4A 29 B2  |1.3.+.~.:H(I,J).|
00000120: 31 AA B5 28 35 AC BB 28  31 29 29 00 39 09 88 04  |1..(5..(1)).9...|
00000130: 3A 81 4B B2 31 A4 4A AB  31 00 5A 09 92 04 3A 3A  |:.K.1.J.1.Z...::|
00000140: 3A 8B 4B B3 4A A7 8B 20  48 28 49 2C 4A 29 B2 48  |:.K.J.. H(I,J).H|
00000150: 28 49 2C 4B 29 A7 31 31  35 30 00 62 09 9C 04 3A  |(I,K).1150.b...:|
00000160: 82 4B 00 6C 09 A6 04 82  4A 3A 82 49 00 8F 09 B0  |.K.l....J:.I....|
00000170: 04 81 4A B2 31 A4 33 3A  44 28 48 28 31 2C 4A 29  |..J.1.3:D(H(1,J)|
00000180: 2C 48 28 32 2C 4A 29 29  B2 36 36 36 3A 82 4A 00  |,H(2,J)).666:.J.|
00000190: AD 09 BA 04 53 31 24 B2  22 12 AC 41 BB 11 9D 9D  |....S1$."..A....|
000001A0: 9D 20 DD 20 11 9D 9D 9D  20 3D 20 92 22 00 CB 09  |. . .... = ."...|
000001B0: BF 04 53 32 24 B2 22 12  AC 5A BB 11 9D 9D 9D 20  |..S2$."..Z..... |
000001C0: DD 20 11 9D 9D 9D 20 3D  20 92 22 00 E7 09 C4 04  |. .... = .".....|
000001D0: 46 44 24 B2 22 DB B2 DB  11 9D 9D 9D B0 D1 AE 11  |FD$."...........|
000001E0: 9D 9D 9D 23 23 23 22 00  1D 0A CE 04 99 22 93 1D  |...###"......"..|
000001F0: 1D 1D 1D 1D 1D 1D 1D 1D  1D 1D 1D 1D 22 3B 53 31  |............";S1|
00000200: 24 3B 22 1D 1D 91 91 22  3B 46 44 24 3B 22 1D 1D  |$;"....";FD$;"..|
00000210: 91 91 22 3B 53 32 24 3B  22 11 11 11 22 00 43 0A  |..";S2$;"...".C.|
00000220: D8 04 99 22 57 45 4C 43  4F 4D 45 20 54 4F 20 20  |..."WELCOME TO  |
00000230: 11 11 11 11 11 53 20 49  20 4E 20 4E 20 45 20 52  |.....S I N N E R|
00000240: 20 53 22 00 75 0A E2 04  99 22 11 11 11 11 11 57  | S".u....".....W|
00000250: 41 4E 54 20 49 4E 53 54  52 55 43 54 49 4F 4E 53  |ANT INSTRUCTIONS|
00000260: 20 28 59 45 53 20 4F 52  20 4E 4F 29 3F 22 3B 3A  | (YES OR NO)?";:|
00000270: 8D 36 30 30 30 00 8A 0A  EC 04 8B 42 24 B2 22 59  |.6000......B$."Y|
00000280: 45 53 22 A7 20 8D 39 30  30 30 00 AB 0A D0 07 8F  |ES". .9000......|
00000290: 2A 2A 2A 47 45 4E 45 52  41 54 45 20 43 4F 4D 50  |***GENERATE COMP|
000002A0: 55 54 45 52 27 53 20 4D  4F 56 45 00 B4 0A 34 08  |UTER'S MOVE...4.|
000002B0: 4D 4F B2 30 00 C6 0A 3E  08 81 4A B2 31 A4 35 3A  |MO.0...>..J.1.5:|
000002C0: 81 4B B2 31 A4 35 00 DD  0A 48 08 3A 8B 44 28 4A  |.K.1.5...H.:.D(J|
000002D0: 2C 4B 29 B3 B1 36 36 36  A7 32 31 38 30 00 E8 0A  |,K)..666.2180...|
000002E0: 52 08 81 4C B2 31 A4 34  00 1C 0B 5C 08 3A 3A 8B  |R..L.1.4...\.::.|
000002F0: 44 28 4A AA 52 28 4C 29  2C 4B AA 43 28 4C 29 29  |D(J.R(L),K.C(L))|
00000300: B3 36 35 B0 44 28 4A AA  52 28 4C 29 2C 4B AA 43  |.65.D(J.R(L),K.C|
00000310: 28 4C 29 29 B1 38 39 A7  32 31 37 30 00 3F 0B 66  |(L)).89.2170.?.f|
00000320: 08 3A 3A 3A 4D 4F B2 4D  4F AA 31 3A 50 28 4D 4F  |.:::MO.MO.1:P(MO|
00000330: 2C 31 29 B2 4A 3A 50 28  4D 4F 2C 32 29 B2 4B 00  |,1).J:P(MO,2).K.|
00000340: 64 0B 70 08 3A 3A 3A 50  28 4D 4F 2C 33 29 B2 4A  |d.p.:::P(MO,3).J|
00000350: AA 52 28 4C 29 3A 50 28  4D 4F 2C 34 29 B2 4B AA  |.R(L):P(MO,4).K.|
00000360: 43 28 4C 29 00 6C 0B 7A  08 3A 82 4C 00 76 0B 84  |C(L).l.z.:.L.v..|
00000370: 08 82 4B 3A 82 4A 00 85  0B 8E 08 8B 4D 4F B1 30  |..K:.J......MO.0|
00000380: A7 32 33 30 30 00 A9 0B  98 08 8D 38 30 30 30 3A  |.2300......8000:|
00000390: 99 22 54 48 45 20 42 41  44 44 49 45 53 20 43 41  |."THE BADDIES CA|
000003A0: 4E 27 54 20 4D 4F 56 45  22 00 C6 0B A2 08 99 22  |N'T MOVE"......"|
000003B0: 54 48 45 20 53 49 4E 4E  45 52 53 20 4C 4F 53 45  |THE SINNERS LOSE|
000003C0: 21 21 21 22 3A 80 00 D2  0B FC 08 53 43 B2 53 43  |!!!":......SC.SC|
000003D0: AA 31 00 E8 0B 06 09 81  49 B2 31 A4 33 3A 81 4A  |.1......I.1.3:.J|
000003E0: B2 4D 4F A4 31 A9 AB 31  00 FC 0B 10 09 3A 54 39  |.MO.1..1.....:T9|
000003F0: B2 31 AA B5 28 4A AC BB  28 31 29 29 00 1A 0C 15  |.1..(J..(1))....|
00000400: 09 3A 3A 54 45 4D 50 B2  44 28 50 28 54 39 2C 33  |.::TEMP.D(P(T9,3|
00000410: 29 2C 50 28 54 39 2C 34  29 29 00 36 0C 1A 09 3A  |),P(T9,4)).6...:|
00000420: 3A 44 28 50 28 54 39 2C  31 29 2C 50 28 54 39 2C  |:D(P(T9,1),P(T9,|
00000430: 32 29 29 B2 33 32 00 53  0C 24 09 3A 3A 44 28 50  |2)).32.S.$.::D(P|
00000440: 28 54 39 2C 33 29 2C 50  28 54 39 2C 34 29 29 B2  |(T9,3),P(T9,4)).|
00000450: 36 36 36 00 63 0C 2E 09  3A 3A 8B 49 B3 33 A7 32  |666.c...::.I.3.2|
00000460: 34 30 30 00 8F 0C 38 09  3A 3A 8D 38 30 30 30 3A  |400...8.::.8000:|
00000470: 99 22 54 48 45 20 53 49  4E 4E 45 52 53 20 41 52  |."THE SINNERS AR|
00000480: 45 20 57 49 4E 4E 45 52  53 21 21 21 22 3A 80 00  |E WINNERS!!!":..|
00000490: 9B 0C 60 09 3A 81 4B B2  31 A4 35 00 AA 0C 6A 09  |..`.:.K.1.5...j.|
000004A0: 3A 52 39 B2 30 3A 43 39  B2 30 00 B6 0C 74 09 3A  |:R9.0:C9.0...t.:|
000004B0: 81 4C B2 31 A4 35 00 DB  0C 7E 09 3A 3A 8B 44 28  |.L.1.5...~.::.D(|
000004C0: 4B 2C 4C 29 B2 36 36 36  A7 52 39 B2 52 39 AA 31  |K,L).666.R9.R9.1|
000004D0: 3A 8B 52 39 B1 49 A7 32  35 30 30 00 00 0D 88 09  |:.R9.I.2500.....|
000004E0: 3A 3A 8B 44 28 4C 2C 4B  29 B2 36 36 36 A7 43 39  |::.D(L,K).666.C9|
000004F0: B2 43 39 AA 31 3A 8B 43  39 B1 49 A7 32 35 30 30  |.C9.1:.C9.I.2500|
00000500: 00 08 0D 92 09 3A 82 4C  00 22 0D 9C 09 3A 82 4B  |.....:.L."...:.K|
00000510: 3A 8D 38 30 30 30 3A 8B  53 43 B3 32 32 A7 33 30  |:.8000:.SC.22.30|
00000520: 30 30 00 3E 0D A6 09 3A  99 22 4E 4F 20 4D 4F 52  |00.>...:."NO MOR|
00000530: 45 20 53 49 4E 4E 45 52  53 21 21 22 3A 80 00 5A  |E SINNERS!!":..Z|
00000540: 0D C4 09 3A 44 28 50 28  54 39 2C 31 29 2C 50 28  |...:D(P(T9,1),P(|
00000550: 54 39 2C 32 29 29 B2 36  36 36 00 77 0D CE 09 3A  |T9,2)).666.w...:|
00000560: 44 28 50 28 54 39 2C 33  29 2C 50 28 54 39 2C 34  |D(P(T9,3),P(T9,4|
00000570: 29 29 B2 54 45 4D 50 00  87 0D D8 09 3A 8B 54 39  |)).TEMP.....:.T9|
00000580: B2 4A A7 32 35 36 30 00  A7 0D E2 09 3A 3A 81 4A  |.J.2560.....::.J|
00000590: 30 B2 31 A4 34 3A 55 28  4A 30 29 B2 50 28 4A 2C  |0.1.4:U(J0).P(J,|
000005A0: 4A 30 29 3A 82 4A 30 00  CA 0D EC 09 3A 3A 81 4A  |J0):.J0.....::.J|
000005B0: 30 B2 31 A4 34 3A 50 28  4A 2C 4A 30 29 B2 50 28  |0.1.4:P(J,J0).P(|
000005C0: 54 39 2C 4A 30 29 3A 82  4A 30 00 EB 0D F6 09 3A  |T9,J0):.J0.....:|
000005D0: 3A 81 4A 30 B2 31 A4 34  3A 50 28 54 39 2C 4A 30  |:.J0.1.4:P(T9,J0|
000005E0: 29 B2 55 28 4A 30 29 3A  82 4A 30 00 F5 0D 00 0A  |).U(J0):.J0.....|
000005F0: 82 4A 3A 82 49 00 0B 0E  B8 0B 8F 2A 2A 2A 50 4C  |.J:.I......***PL|
00000600: 41 59 45 52 27 53 20 4D  4F 56 45 00 23 0E 1C 0C  |AYER'S MOVE.#...|
00000610: 99 22 53 49 4E 4E 45 52  27 53 20 4D 4F 56 45 3F  |."SINNER'S MOVE?|
00000620: 20 22 3B 00 2D 0E 26 0C  8D 36 30 30 30 00 40 0E  | ";.-.&..6000.@.|
00000630: 30 0C 8B C6 28 41 24 29  B2 31 33 A7 33 32 30 30  |0...(A$).13.3200|
00000640: 00 59 0E 3A 0C 3A 99 41  24 3B 3A 42 24 B2 42 24  |.Y.:.:.A$;:B$.B$|
00000650: AA 41 24 3A 89 33 31 31  30 00 77 0E 80 0C 8B 42  |.A$:.3110.w....B|
00000660: 24 B2 22 49 22 A7 8D 39  30 30 30 3A 8D 38 30 30  |$."I"..9000:.800|
00000670: 30 3A 89 33 31 30 30 00  95 0E 8A 0C 8B 42 24 B2  |0:.3100......B$.|
00000680: 22 48 22 A7 8D 38 30 30  30 3A 8D 37 30 30 30 3A  |"H"..8000:.7000:|
00000690: 89 33 31 30 30 00 C3 0E  94 0C 8B 42 24 B2 22 52  |.3100......B$."R|
000006A0: 22 A7 8D 38 30 30 30 3A  99 22 54 48 45 20 53 49  |"..8000:."THE SI|
000006B0: 4E 4E 45 52 53 20 47 49  56 45 20 55 50 21 21 21  |NNERS GIVE UP!!!|
000006C0: 22 3A 80 00 DB 0E 9E 0C  8B 42 24 B2 22 42 22 A7  |":.......B$."B".|
000006D0: 8D 38 30 30 30 3A 89 33  31 30 30 00 EE 0E B2 0C  |.8000:.3100.....|
000006E0: 8B C3 28 42 24 29 B3 B1  32 A7 33 35 30 30 00 00  |..(B$)..2.3500..|
000006F0: 0F BC 0C 53 52 B2 C6 28  C8 28 42 24 2C 31 29 29  |...SR..(.(B$,1))|
00000700: 00 13 0F E4 0C 3A 81 4A  B2 31 A4 35 3A 81 4B B2  |.....:.J.1.5:.K.|
00000710: 31 A4 35 00 32 0F EE 0C  3A 3A 8B 44 28 4A 2C 4B  |1.5.2...::.D(J,K|
00000720: 29 B2 53 52 A7 52 B2 4A  3A 43 B2 4B 3A 89 33 33  |).SR.R.J:C.K:.33|
00000730: 36 30 00 3D 0F F8 0C 3A  82 4B 3A 82 4A 00 47 0F  |60.=...:.K:.J.G.|
00000740: 02 0D 89 33 35 30 30 00  59 0F 20 0D 44 52 B2 C6  |...3500.Y. .DR..|
00000750: 28 C9 28 42 24 2C 31 29  29 00 64 0F 48 0D 81 4A  |(.(B$,1)).d.H..J|
00000760: B2 31 A4 34 00 78 0F 52  0D 3A 8B 44 52 B3 B1 4D  |.1.4.x.R.:.DR..M|
00000770: 28 4A 29 A7 33 34 35 30  00 99 0F 5C 0D 3A 3A 8B  |(J).3450...\.::.|
00000780: 44 28 52 AA 52 28 4A 29  2C 43 AA 43 28 4A 29 29  |D(R.R(J),C.C(J))|
00000790: B3 B1 33 32 A7 33 35 30  30 00 C7 0F 66 0D 3A 3A  |..32.3500...f.::|
000007A0: 44 28 52 AA 52 28 4A 29  2C 43 AA 43 28 4A 29 29  |D(R.R(J),C.C(J))|
000007B0: B2 44 28 52 2C 43 29 3A  44 28 52 2C 43 29 B2 33  |.D(R,C):D(R,C).3|
000007C0: 32 3A 89 32 30 30 30 00  CE 0F 7A 0D 82 4A 00 ED  |2:.2000...z..J..|
000007D0: 0F AC 0D 99 3A 99 22 53  4F 4D 45 54 48 49 4E 47  |....:."SOMETHING|
000007E0: 20 49 53 20 57 52 4F 4E  47 2E 2E 2E 22 00 08 10  | IS WRONG..."...|
000007F0: B6 0D 99 22 20 20 20 54  59 50 45 20 48 20 46 4F  |..."   TYPE H FO|
00000800: 52 20 48 45 4C 50 2E 22  00 2B 10 C0 0D 99 22 20  |R HELP.".+...." |
00000810: 20 20 54 59 50 45 20 49  20 46 4F 52 20 49 4E 53  |  TYPE I FOR INS|
00000820: 54 52 55 43 54 49 4F 4E  53 2E 22 00 4E 10 CA 0D  |TRUCTIONS.".N...|
00000830: 99 22 20 20 20 54 59 50  45 20 42 20 54 4F 20 53  |."   TYPE B TO S|
00000840: 45 45 20 54 48 45 20 42  4F 41 52 44 2E 22 00 58  |EE THE BOARD.".X|
00000850: 10 D4 0D 89 33 31 30 30  00 73 10 70 17 8F 2A 2A  |....3100.s.p..**|
00000860: 2A 47 45 54 20 50 4C 41  59 45 52 27 53 20 49 4E  |*GET PLAYER'S IN|
00000870: 50 55 54 00 7D 10 7A 17  42 24 B2 22 22 00 91 10  |PUT.}.z.B$.""...|
00000880: D4 17 A1 41 24 3A 8B 41  24 B2 22 22 A7 36 31 30  |...A$:.A$."".610|
00000890: 30 00 A2 10 DE 17 8B C6  28 41 24 29 B2 31 33 A7  |0.......(A$).13.|
000008A0: 20 8E 00 BB 10 E8 17 3A  99 41 24 3B 3A 42 24 B2  | ......:.A$;:B$.|
000008B0: 42 24 AA 41 24 3A 89 36  31 30 30 00 D0 10 58 1B  |B$.A$:.6100...X.|
000008C0: 8F 2A 2A 2A 48 45 4C 50  20 52 4F 55 54 49 4E 45  |.***HELP ROUTINE|
000008D0: 00 E5 10 BC 1B 99 22 4C  45 47 41 4C 20 4D 4F 56  |......"LEGAL MOV|
000008E0: 45 53 3A 22 3B 00 F7 10  C6 1B 81 4A B2 31 A4 35  |ES:";......J.1.5|
000008F0: 3A 81 4B B2 31 A4 35 00  16 11 D0 1B 3A 8B 44 28  |:.K.1.5.....:.D(|
00000900: 4A 2C 4B 29 B3 36 35 B0  44 28 4A 2C 4B 29 B1 38  |J,K).65.D(J,K).8|
00000910: 39 A7 37 31 36 30 00 23  11 DA 1B 3A 3A 81 4C B2  |9.7160.#...::.L.|
00000920: 31 A4 34 00 56 11 E4 1B  3A 3A 8B 44 28 4A AA 52  |1.4.V...::.D(J.R|
00000930: 28 4C 29 2C 4B AA 43 28  4C 29 29 B2 33 32 A7 99  |(L),K.C(L)).32..|
00000940: 22 20 22 3B C7 28 44 28  4A 2C 4B 29 29 3B C7 28  |" ";.(D(J,K));.(|
00000950: 4D 28 4C 29 29 3B 00 5F  11 EE 1B 3A 3A 82 4C 00  |M(L));._...::.L.|
00000960: 6A 11 F8 1B 3A 82 4B 3A  82 4A 00 70 11 02 1C 99  |j...:.K:.J.p....|
00000970: 00 76 11 20 1C 8E 00 96  11 40 1F 8F 2A 2A 2A 50  |.v. .....@..***P|
00000980: 52 49 4E 54 20 54 48 45  20 42 4F 41 52 44 20 52  |RINT THE BOARD R|
00000990: 4F 55 54 49 4E 45 00 A0  11 A4 1F 99 22 93 22 3B  |OUTINE......".";|
000009A0: 00 BA 11 AE 1F 81 4A B2  31 A4 35 3A 99 22 1D 1D  |......J.1.5:."..|
000009B0: 1D 1D 1D 1D 1D 1D 1D 1D  22 3B 00 C6 11 B8 1F 3A  |........";.....:|
000009C0: 81 4B B2 31 A4 35 00 E5  11 BD 1F 3A 3A 8B 44 28  |.K.1.5.....::.D(|
000009D0: 4A 2C 4B 29 B3 39 30 A7  4C 52 24 B2 C7 28 44 28  |J,K).90.LR$..(D(|
000009E0: 4A 2C 4B 29 29 00 FD 11  C2 1F 3A 3A 8B 44 28 4A  |J,K)).....::.D(J|
000009F0: 2C 4B 29 B2 36 36 36 A7  99 46 44 24 3B 00 37 12  |,K).666..FD$;.7.|
00000A00: CC 1F 3A 3A 8B 44 28 4A  2C 4B 29 B1 36 34 AF 20  |..::.D(J,K).64. |
00000A10: 44 28 4A 2C 4B 29 B3 39  30 A7 99 22 12 AC 22 3B  |D(J,K).90.."..";|
00000A20: 4C 52 24 3B 22 BB 11 9D  9D 9D 20 DD 20 11 9D 9D  |LR$;"..... . ...|
00000A30: 9D 20 3D 20 92 22 3B 00  52 12 D6 1F 3A 3A 8B 44  |. = .";.R...::.D|
00000A40: 28 4A 2C 4B 29 B2 33 32  A7 99 22 1D 1D 1D 11 11  |(J,K).32..".....|
00000A50: 22 3B 00 66 12 E0 1F 3A  3A 8B 4B B3 35 A7 99 22  |";.f...::.K.5.."|
00000A60: 1D 1D 91 91 22 3B 00 6E  12 EA 1F 3A 82 4B 00 78  |....";.n...:.K.x|
00000A70: 12 F4 1F 3A 99 22 11 22  00 81 12 FE 1F 82 4A 3A  |...:."."......J:|
00000A80: 8E 00 96 12 28 23 8F 2A  2A 2A 49 4E 53 54 52 55  |....(#.***INSTRU|
00000A90: 43 54 49 4F 4E 53 00 CF  12 8C 23 99 22 93 54 48  |CTIONS....#.".TH|
00000AA0: 52 45 45 20 4F 46 20 54  48 45 20 42 41 44 44 49  |REE OF THE BADDI|
00000AB0: 45 53 20 2D 4F 52 20 44  45 56 49 4C 53 20 2D 20  |ES -OR DEVILS - |
00000AC0: 28 4D 4F 56 45 44 20 42  59 20 50 45 54 29 22 00  |(MOVED BY PET)".|
00000AD0: F8 12 96 23 99 22 50 4C  41 59 20 41 47 41 49 4E  |...#."PLAY AGAIN|
00000AE0: 53 54 20 41 20 47 52 4F  55 50 20 4F 46 20 43 4F  |ST A GROUP OF CO|
00000AF0: 4E 44 45 4D 4E 45 44 22  00 19 13 A0 23 99 22 53  |NDEMNED"....#."S|
00000B00: 49 4E 4E 45 52 53 20 28  4D 4F 56 45 44 20 42 59  |INNERS (MOVED BY|
00000B10: 20 59 4F 55 21 21 21 29  22 00 1F 13 AA 23 99 00  | YOU!!!)"....#..|
00000B20: 47 13 B4 23 99 22 54 48  45 20 50 4C 41 59 49 4E  |G..#."THE PLAYIN|
00000B30: 47 20 46 49 45 4C 44 20  48 41 53 20 32 35 20 53  |G FIELD HAS 25 S|
00000B40: 50 41 43 45 53 2C 22 00  64 13 BE 23 99 22 35 20  |PACES,".d..#."5 |
00000B50: 52 4F 57 53 20 41 4E 44  20 35 20 43 4F 4C 55 4D  |ROWS AND 5 COLUM|
00000B60: 4E 53 2E 22 00 6A 13 C8  23 99 00 95 13 D2 23 99  |NS.".j..#.....#.|
00000B70: 22 41 20 53 49 4E 4E 45  52 20 4D 41 59 20 4D 4F  |"A SINNER MAY MO|
00000B80: 56 45 20 49 4E 54 4F 20  41 4E 59 20 41 44 4A 41  |VE INTO ANY ADJA|
00000B90: 43 45 4E 54 22 00 C0 13  DC 23 99 22 45 4D 50 54  |CENT"....#."EMPT|
00000BA0: 59 20 53 50 41 43 45 2E  20 41 20 42 41 44 44 49  |Y SPACE. A BADDI|
00000BB0: 45 20 4D 4F 56 45 53 20  49 4E 54 4F 20 41 4E 22  |E MOVES INTO AN"|
00000BC0: 00 EF 13 E6 23 99 22 41  44 4A 41 43 45 4E 54 20  |....#."ADJACENT |
00000BD0: 53 50 41 43 45 20 57 48  49 43 48 20 43 4F 4E 54  |SPACE WHICH CONT|
00000BE0: 41 49 4E 53 20 41 20 53  49 4E 4E 45 52 2C 22 00  |AINS A SINNER,".|
00000BF0: 1B 14 F0 23 99 22 57 48  4F 20 49 53 20 54 48 45  |...#."WHO IS THE|
00000C00: 52 45 42 59 20 43 41 50  54 55 52 45 44 20 41 4E  |REBY CAPTURED AN|
00000C10: 44 20 52 45 4D 4F 56 45  44 2E 22 00 45 14 FA 23  |D REMOVED.".E..#|
00000C20: 99 22 54 48 45 52 45 20  41 52 45 20 4E 4F 20 44  |."THERE ARE NO D|
00000C30: 49 41 47 4F 4E 41 4C 20  4D 4F 56 45 53 20 41 4E  |IAGONAL MOVES AN|
00000C40: 44 20 4E 4F 22 00 53 14  04 24 99 22 4A 55 4D 50  |D NO".S..$."JUMP|
00000C50: 53 2E 22 00 59 14 0E 24  99 00 87 14 18 24 99 22  |S.".Y..$.....$."|
00000C60: 54 48 45 20 53 49 4E 4E  45 52 53 20 57 49 4E 20  |THE SINNERS WIN |
00000C70: 49 46 20 41 4C 4C 20 54  48 45 20 42 41 44 44 49  |IF ALL THE BADDI|
00000C80: 45 53 20 41 52 45 22 00  B4 14 22 24 99 22 49 4E  |ES ARE"..."$."IN|
00000C90: 20 41 20 4C 49 4E 45 20  48 4F 52 49 5A 4F 4E 54  | A LINE HORIZONT|
00000CA0: 41 4C 4C 59 20 4F 52 20  56 45 52 54 49 43 41 4C  |ALLY OR VERTICAL|
00000CB0: 4C 59 2E 22 00 DF 14 2C  24 99 22 54 48 45 20 53  |LY."...,$."THE S|
00000CC0: 49 4E 4E 45 52 53 20 4C  4F 53 45 20 49 46 20 54  |INNERS LOSE IF T|
00000CD0: 48 45 20 42 41 44 44 49  45 53 2C 20 41 54 22 00  |HE BADDIES, AT".|
00000CE0: 0A 15 36 24 99 22 54 48  45 49 52 20 54 55 52 4E  |..6$."THEIR TURN|
00000CF0: 2C 20 43 41 4E 27 54 20  43 41 50 54 55 52 45 20  |, CAN'T CAPTURE |
00000D00: 41 20 53 49 4E 4E 45 52  2E 22 00 14 15 40 24 99  |A SINNER."...@$.|
00000D10: 3A 99 3A 99 00 36 15 4A  24 99 22 50 52 45 53 53  |:.:..6.J$."PRESS|
00000D20: 20 52 45 54 55 52 4E 20  54 4F 20 43 4F 4E 54 49  | RETURN TO CONTI|
00000D30: 4E 55 45 2E 22 3B 00 40  15 54 24 8D 36 30 30 30  |NUE.";.@.T$.6000|
00000D40: 00 4E 15 5E 24 99 22 93  20 20 55 22 3A 99 00 5D  |.N.^$.".  U":..]|
00000D50: 15 68 24 99 22 4C 20 2B  20 52 22 3A 99 00 6A 15  |.h$."L + R":..j.|
00000D60: 72 24 99 22 20 20 44 22  3A 99 00 70 15 7C 24 99  |r$."  D":..p.|$.|
00000D70: 00 9B 15 86 24 99 22 54  4F 20 4D 4F 56 45 20 41  |....$."TO MOVE A|
00000D80: 20 53 49 4E 4E 45 52 2C  20 54 59 50 45 20 54 57  | SINNER, TYPE TW|
00000D90: 4F 20 4C 45 54 54 45 52  53 3A 22 00 C3 15 90 24  |O LETTERS:"....$|
00000DA0: 99 22 54 48 45 20 46 49  52 53 54 20 4C 45 54 54  |."THE FIRST LETT|
00000DB0: 45 52 20 4E 41 4D 45 53  20 54 48 45 20 53 49 4E  |ER NAMES THE SIN|
00000DC0: 4E 45 52 00 06 16 9A 24  99 22 41 4E 44 20 54 48  |NER....$."AND TH|
00000DD0: 45 20 53 45 43 4F 4E 44  20 4C 45 54 54 45 52 20  |E SECOND LETTER |
00000DE0: 54 45 4C 4C 53 20 54 48  45 20 44 49 52 45 43 54  |TELLS THE DIRECT|
00000DF0: 2D 20 49 4F 4E 20 59 4F  55 20 57 41 4E 54 20 54  |- ION YOU WANT T|
00000E00: 4F 20 47 4F 2E 22 00 0C  16 A4 24 99 00 32 16 AE  |O GO."....$..2..|
00000E10: 24 99 22 46 4F 52 20 45  58 41 4D 50 4C 45 2C 20  |$."FOR EXAMPLE, |
00000E20: 4A 55 20 4D 45 41 4E 53  20 53 49 4E 4E 45 52 20  |JU MEANS SINNER |
00000E30: 4A 22 00 4C 16 B8 24 99  22 57 41 4E 54 53 20 54  |J".L..$."WANTS T|
00000E40: 4F 20 4D 4F 56 45 20 55  50 5E 2E 22 00 52 16 C2  |O MOVE UP^.".R..|
00000E50: 24 99 00 75 16 CC 24 99  22 41 4C 53 4F 2C 20 59  |$..u..$."ALSO, Y|
00000E60: 4F 55 20 4D 41 59 20 57  41 4E 54 20 54 4F 20 54  |OU MAY WANT TO T|
00000E70: 59 50 45 3A 22 00 A0 16  D6 24 99 22 20 20 52 20  |YPE:"....$."  R |
00000E80: 57 48 45 4E 20 59 4F 55  20 57 41 4E 54 20 54 4F  |WHEN YOU WANT TO|
00000E90: 20 53 54 4F 50 20 54 48  45 20 47 41 4D 45 2E 22  | STOP THE GAME."|
00000EA0: 00 C2 16 E0 24 99 22 20  20 49 20 46 4F 52 20 54  |....$."  I FOR T|
00000EB0: 48 45 53 45 20 49 4E 53  54 52 55 43 54 49 4F 4E  |HESE INSTRUCTION|
00000EC0: 53 22 00 E7 16 EA 24 99  22 20 20 48 20 46 4F 52  |S"....$."  H FOR|
00000ED0: 20 41 20 4C 49 53 54 20  4F 46 20 4C 45 47 41 4C  | A LIST OF LEGAL|
00000EE0: 20 4D 4F 56 45 53 22 00  04 17 F4 24 99 22 20 20  | MOVES"....$."  |
00000EF0: 42 20 54 4F 20 53 45 45  20 54 48 45 20 42 4F 41  |B TO SEE THE BOA|
00000F00: 52 44 2E 22 00 0C 17 FE  24 99 3A 99 00 31 17 08  |RD."....$.:..1..|
00000F10: 25 99 22 48 49 54 20 52  45 54 55 52 4E 20 54 4F  |%."HIT RETURN TO|
00000F20: 20 53 54 41 52 54 20 54  48 45 20 47 41 4D 45 2E  | START THE GAME.|
00000F30: 22 00 5A 17 12 25 99 22  54 48 45 52 45 20 57 49  |".Z..%."THERE WI|
00000F40: 4C 4C 20 54 48 45 4E 20  42 45 20 41 20 53 48 4F  |LL THEN BE A SHO|
00000F50: 52 54 20 50 41 55 53 45  2E 22 00 64 17 1C 25 8D  |RT PAUSE.".d..%.|
00000F60: 36 30 30 30 00 6A 17 26  25 8E 00 00 00 0A        |6000.j.&%.....  |

..'....**SINNERS BY MAC OGLESBY ON 2/78.
I....**FROM CALCULATORS/COMPUTERS.`....*
**INITIALIZATION...L..D(6,6),P(12,6),M(4
),R(4),C(4)...Q..H(2,3),U(4)...V..J.1.4:
.M(J),R(J),C(J):.J.U.`..85,-1,0,82,0,1,6
8,1,0,76,0,-1...J..J.1.5:.K.1.5:D(J,K).6
4.(J.1).5.K:.K:.J...T..I.1.2:.J.1.3.+.~.
:H(I,J).1..(5..(1)).9...:.K.1.J.1.Z...::
:.K.J.. H(I,J).H(I,K).1150.B...:.K.L....
J:.I......J.1.3:D(H(1,J),H(2,J)).666:.J.
....S1$."..A..... . .... = .".K...S2$.".
.Z..... . .... = ."...D.FD$."........Q..
...###"...N.."..............";S1$;"...."
;FD$;"....";S2$;"...".C.X.."WELCOME TO  
.....S I N N E R S".U....".....WANT INST
RUCTIONS (YES OR NO)?";:.6000......B$."Y
ES". .9000...P..***GENERATE COMPUTER'S M
OVE...4.MO.0.F.>..J.1.5:.K.1.5...H.:.D(J
,K)..666.2180...R..L.1.4...\.::.D(J.R(L)
,K.C(L)).65.D(J.R(L),K.C(L)).89.2170.?.F
.:::MO.MO.1:P(MO,1).J:P(MO,2).K.D.P.:::P
(MO,3).J.R(L):P(MO,4).K.C(L).L.Z.:.L.V..
..K:.J......MO.0.2300......8000:."THE BA
DDIES CAN'T MOVE".F...."THE SINNERS LOSE
!!!":..R...SC.SC.1......I.1.3:.J.MO.1..1
.....:T9.1..(J..(1)).....::TEMP.D(P(T9,3
),P(T9,4)).6...::D(P(T9,1),P(T9,2)).32.S
.$.::D(P(T9,3),P(T9,4)).666.C...::.I.3.2
400...8.::.8000:."THE SINNERS ARE WINNER
S!!!":....`.:.K.1.5...J.:R9.0:C9.0...T.:
.L.1.5...~.::.D(K,L).666.R9.R9.1:.R9.I.2
500.....::.D(L,K).666.C9.C9.1:.C9.I.2500
.....:.L."...:.K:.8000:.SC.22.3000.>...:
."NO MORE SINNERS!!":..Z.D.:D(P(T9,1),P(
T9,2)).666.W.N.:D(P(T9,3),P(T9,4)).TEMP.
..X.:.T9.J.2560.....::.J0.1.4:U(J0).P(J,
J0):.J0.J...::.J0.1.4:P(J,J0).P(T9,J0):.
J0.....::.J0.1.4:P(T9,J0).U(J0):.J0.....
.J:.I......***PLAYER'S MOVE.#...."SINNER
'S MOVE? ";.-.&..6000.@.0..F(A$).13.3200
.Y.:.:.A$;:B$.B$.A$:.3110.W....B$."I"..9
000:.8000:.3100......B$."H"..8000:.7000:
.3100.C....B$."R"..8000:."THE SINNERS GI
VE UP!!!":.......B$."B"..8000:.3100.....
.C(B$)..2.3500.....SR.F(H(B$,1)).....:.J
.1.5:.K.1.5.2...::.D(J,K).SR.R.J:C.K:.33
60.=...:.K:.J.G....3500.Y. .DR.F(I(B$,1)
).D.H..J.1.4.X.R.:.DR..M(J).3450...\.::.
D(R.R(J),C.C(J))..32.3500.G.F.::D(R.R(J)
,C.C(J)).D(R,C):D(R,C).32:.2000.N.Z..J..
....:."SOMETHING IS WRONG..."......"   T
YPE H FOR HELP.".+...."   TYPE I FOR INS
TRUCTIONS.".N.J.."   TYPE B TO SEE THE B
OARD.".X.T..3100.S.P..***GET PLAYER'S IN
PUT.}.Z.B$.""...T..A$:.A$."".6100......F
(A$).13. ......:.A$;:B$.B$.A$:.6100.P.X.
.***HELP ROUTINE......"LEGAL MOVES:";...
F..J.1.5:.K.1.5...P.:.D(J,K).65.D(J,K).8
9.7160.#.Z.::.L.1.4.V...::.D(J.R(L),K.C(
L)).32.." ";G(D(J,K));G(M(L));._...::.L.
J...:.K:.J.P.....V. .....@..***PRINT THE
 BOARD ROUTINE. ....".";......J.1.5:."..
........";.F...:.K.1.5.....::.D(J,K).90.
LR$.G(D(J,K))...B.::.D(J,K).666..FD$;.7.
L.::.D(J,K).64. D(J,K).90.."..";LR$;"...
.. . .... = .";.R.V.::.D(J,K).32..".....
";.F...::.K.5.."....";.N...:.K.X...:."."
......J:....(#.***INSTRUCTIONS.O..#.".TH
REE OF THE BADDIES -OR DEVILS - (MOVED B
Y PET)"....#."PLAY AGAINST A GROUP OF CO
NDEMNED"... #."SINNERS (MOVED BY YOU!!!)
"....#..G..#."THE PLAYING FIELD HAS 25 S
PACES,".D..#."5 ROWS AND 5 COLUMNS.".J.H
#....R#."A SINNER MAY MOVE INTO ANY ADJA
CENT"....#."EMPTY SPACE. A BADDIE MOVES 
INTO AN"....#."ADJACENT SPACE WHICH CONT
AINS A SINNER,"....#."WHO IS THEREBY CAP
TURED AND REMOVED.".E..#."THERE ARE NO D
IAGONAL MOVES AND NO".S..$."JUMPS.".Y..$
.....$."THE SINNERS WIN IF ALL THE BADDI
ES ARE"..."$."IN A LINE HORIZONTALLY OR 
VERTICALLY."...,$."THE SINNERS LOSE IF T
HE BADDIES, AT"...6$."THEIR TURN, CAN'T 
CAPTURE A SINNER."...@$.:.:..6.J$."PRESS
 RETURN TO CONTINUE.";.@.T$.6000.N.^$.".
  U":..].H$."L + R":..J.R$."  D":..P.|$.
....$."TO MOVE A SINNER, TYPE TWO LETTER
S:".C..$."THE FIRST LETTER NAMES THE SIN
NER....$."AND THE SECOND LETTER TELLS TH
E DIRECT- ION YOU WANT TO GO."....$..2..
$."FOR EXAMPLE, JU MEANS SINNER J".L..$.
"WANTS TO MOVE UP^.".R.B$..U.L$."ALSO, Y
OU MAY WANT TO TYPE:". .V$."  R WHEN YOU
 WANT TO STOP THE GAME.".B..$."  I FOR T
HESE INSTRUCTIONS"....$."  H FOR A LIST 
OF LEGAL MOVES"....$."  B TO SEE THE BOA
RD."....$.:..1..%."HIT RETURN TO START T
HE GAME.".Z..%."THERE WILL THEN BE A SHO
RT PAUSE.".D..%.6000.J.&%.....

×

C64 Image

> CLICK IMAGE PREVIEW FOR FULL MODAL