CHECKERS
FILE INFORMATION
FILENAME(S): CHECKERS
FILE TYPE(S): PRG
FILE SIZE: 5K
FIRST SEEN: 2025-10-19 22:35:52
APPEARS ON: 1 disk(s)
FILE HASH
3a1b6956c9f4867f30ecebbfb2fc32aac8da799617218cfb4f7a56bde6b99c83
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| WARLOCK WAS HERE | CHECKERS | PRG | Radd Maxx | 9 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 24 08 01 00 8F 20 2D 2D 20 43 48 45 43 4B |..$.... -- CHECK|
00000010: 45 52 53 20 46 4F 52 20 43 4F 4D 4D 4F 44 4F 52 |ERS FOR COMMODOR|
00000020: 45 20 36 34 00 4B 08 05 00 8F 20 2D 2D 20 47 4F |E 64.K.... -- GO|
00000030: 20 49 4E 49 54 49 41 4C 49 5A 45 20 41 4E 44 20 | INITIALIZE AND |
00000040: 50 52 49 4E 54 20 42 4F 41 52 44 00 5A 08 0A 00 |PRINT BOARD.Z...|
00000050: 8D 31 39 30 30 3A 89 32 30 30 00 6C 08 14 00 A1 |.1900:.200.l....|
00000060: 41 24 3A 8B 41 24 B2 22 22 A7 32 30 00 72 08 16 |A$:.A$."".20.r..|
00000070: 00 8E 00 89 08 1D 00 8F 20 2D 2D 20 43 4F 4D 50 |........ -- COMP|
00000080: 55 54 45 52 20 53 43 41 4E 00 AD 08 1E 00 55 B2 |UTER SCAN.....U.|
00000090: 58 AA 41 3A 56 B2 59 AA 42 3A 8B 55 B3 30 B0 55 |X.A:V.Y.B:.U.0.U|
000000A0: B1 37 B0 56 B3 30 B0 56 B1 37 A7 38 30 00 C3 08 |.7.V.0.V.7.80...|
000000B0: 28 00 8B 53 28 55 2C 56 29 B2 30 A7 8D 39 30 3A |(..S(U,V).0..90:|
000000C0: 89 38 30 00 D4 08 32 00 8B 53 28 55 2C 56 29 B3 |.80...2..S(U,V).|
000000D0: 30 A7 38 30 00 F8 08 3C 00 55 B2 55 AA 41 3A 56 |0.80...<.U.U.A:V|
000000E0: B2 56 AA 42 3A 8B 55 B3 30 B0 55 B1 37 B0 56 B3 |.V.B:.U.0.U.7.V.|
000000F0: 30 B0 56 B1 37 A7 38 30 00 0A 09 46 00 8B 53 28 |0.V.7.80...F..S(|
00000100: 55 2C 56 29 B2 30 A7 8D 39 30 00 10 09 50 00 8E |U,V).0..90...P..|
00000110: 00 29 09 5A 00 8B 56 B2 30 AF 53 28 58 2C 59 29 |.).Z..V.0.S(X,Y)|
00000120: B2 AB 31 A7 51 B2 51 AA 32 00 3D 09 5F 00 8B B6 |..1.Q.Q.2.=._...|
00000130: 28 59 AB 56 29 B2 32 A7 51 B2 51 AA 35 00 4C 09 |(Y.V).2.Q.Q.5.L.|
00000140: 64 00 8B 59 B2 37 A7 51 B2 51 AB 32 00 5F 09 69 |d..Y.7.Q.Q.2._.i|
00000150: 00 8B 59 B2 30 B0 55 B2 37 A7 51 B2 51 AA 31 00 |..Y.0.U.7.Q.Q.1.|
00000160: 84 09 6E 00 81 43 B2 AB 31 A4 31 A9 32 3A 8B 55 |..n..C..1.1.2:.U|
00000170: AA 43 B3 30 B0 55 AA 43 B1 37 B0 56 AA 47 B3 30 |.C.0.U.C.7.V.G.0|
00000180: A7 31 33 30 00 A1 09 73 00 8B 53 28 55 AA 43 2C |.130...s..S(U.C,|
00000190: 56 AA 47 29 B3 30 A7 51 B2 51 AA 31 3A 89 31 33 |V.G).0.Q.Q.1:.13|
000001A0: 30 00 BC 09 78 00 8B 55 AB 43 B3 30 B0 55 AB 43 |0...x..U.C.0.U.C|
000001B0: B1 37 B0 56 AB 47 B1 37 A7 31 33 30 00 F1 09 7D |.7.V.G.7.130...}|
000001C0: 00 8B 53 28 55 AA 43 2C 56 AA 47 29 B1 30 AF 28 |..S(U.C,V.G).0.(|
000001D0: 53 28 55 AB 43 2C 56 AB 47 29 B2 30 B0 28 55 AB |S(U.C,V.G).0.(U.|
000001E0: 43 B2 58 AF 56 AB 47 B2 59 29 29 A7 51 B2 51 AB |C.X.V.G.Y)).Q.Q.|
000001F0: 32 00 23 0A 82 00 82 43 3A 8B 51 B1 52 28 30 29 |2.#....C:.Q.R(0)|
00000200: A7 52 28 30 29 B2 51 3A 52 28 31 29 B2 58 3A 52 |.R(0).Q:R(1).X:R|
00000210: 28 32 29 B2 59 3A 52 28 33 29 B2 55 3A 52 28 34 |(2).Y:R(3).U:R(4|
00000220: 29 B2 56 00 2D 0A 87 00 51 B2 30 3A 8E 00 52 0A |).V.-...Q.0:..R.|
00000230: 96 00 55 B2 58 AA 41 3A 56 B2 59 AA 42 3A 8B 55 |..U.X.A:V.Y.B:.U|
00000240: B3 30 B0 55 B1 37 B0 56 B3 30 B0 56 B1 37 A7 31 |.0.U.7.V.0.V.7.1|
00000250: 36 30 00 75 0A 9B 00 8B 53 28 55 2C 56 29 B2 30 |60.u....S(U,V).0|
00000260: AF 53 28 58 AA 41 AD 32 2C 59 AA 42 AD 32 29 B1 |.S(X.A.2,Y.B.2).|
00000270: 30 A7 8D 39 30 00 7B 0A A0 00 8E 00 95 0A C7 00 |0..90.{.........|
00000280: 8F 20 2D 2D 20 50 4C 41 59 45 52 20 4D 41 49 4E |. -- PLAYER MAIN|
00000290: 20 4C 4F 4F 50 00 9F 0A C8 00 8D 32 37 30 30 00 | LOOP......2700.|
000002A0: C8 0A DC 00 8B 43 31 B2 31 32 A7 44 24 B2 22 49 |.....C1.12.D$."I|
000002B0: 20 57 4F 4E 2C 20 54 4F 55 47 48 20 4C 55 43 4B | WON, TOUGH LUCK|
000002C0: 21 22 3A 89 31 36 30 30 00 F8 0A E6 00 8B 50 31 |!":.1600......P1|
000002D0: B2 31 32 A7 44 24 B2 22 59 4F 55 20 57 4F 4E 2C |.12.D$."YOU WON,|
000002E0: 20 43 4F 4E 47 52 41 54 55 4C 41 54 49 4F 4E 53 | CONGRATULATIONS|
000002F0: 21 22 3A 89 31 36 30 30 00 0C 0B F0 00 44 24 B2 |!":.1600.....D$.|
00000300: 54 24 3A 8D 31 38 30 30 3A 5A B2 30 00 34 0B FA |T$:.1800:Z.0.4..|
00000310: 00 46 31 B2 31 3A 46 32 B2 32 3A 4C 4F B2 53 55 |.F1.1:F2.2:LO.SU|
00000320: AA 28 32 32 AC 43 44 29 AA 31 3A 4C 31 B2 30 3A |.(22.CD).1:L1.0:|
00000330: 55 31 B2 30 00 4E 0B 04 01 4C 32 B2 4C 31 AB 31 |U1.0.N...L2.L1.1|
00000340: 3A 55 32 B2 55 31 AB 31 3A 4B 49 B2 36 33 00 6A |:U2.U1.1:KI.63.j|
00000350: 0B 0E 01 46 B2 30 3A A1 46 24 3A 8B 46 24 B3 B1 |...F.0:.F$:.F$..|
00000360: 22 22 A7 46 B2 C6 28 46 24 29 00 9D 0B 18 01 50 |"".F..(F$).....P|
00000370: 45 B2 C2 28 4C 4F 29 3A 97 4C 4F 2C 4B 49 3A 81 |E..(LO):.LO,KI:.|
00000380: 54 B2 31 A4 35 30 3A 82 3A 50 43 B2 C2 28 4C 4F |T.1.50:.:PC..(LO|
00000390: AA 44 49 29 3A 97 4C 4F AA 44 49 2C 31 00 C4 0B |.DI):.LO.DI,1...|
000003A0: 22 01 97 4C 4F 2C 31 36 30 3A 81 54 B2 31 A4 35 |"..LO,160:.T.1.5|
000003B0: 30 3A 82 3A 97 4C 4F 2C 50 45 3A 97 4C 4F AA 44 |0:.:.LO,PE:.LO.D|
000003C0: 49 2C 50 43 00 E5 0B 2C 01 8B 46 B2 31 35 37 A7 |I,PC...,..F.157.|
000003D0: 8B 4C 31 B1 30 A7 4C 31 B2 4C 31 AB 31 3A 4C 4F |.L1.0.L1.L1.1:LO|
000003E0: B2 4C 4F AB 33 00 F6 0B 40 01 8B 46 B2 31 39 A7 |.LO.3...@..F.19.|
000003F0: 99 22 93 22 3A 80 00 0A 0C 54 01 8B 46 B2 31 33 |.".":....T..F.13|
00000400: B0 46 B2 31 34 31 A7 34 39 30 00 18 0C 68 01 8B |.F.141.490...h..|
00000410: 46 B2 33 32 A7 36 39 30 00 36 0C 72 01 8B 46 B2 |F.32.690.6.r..F.|
00000420: 32 30 AF 5A B2 30 A7 32 35 30 3A 8F 20 4E 55 4C |20.Z.0.250:. NUL|
00000430: 4C 20 4D 4F 56 45 00 56 0C 90 01 8B 46 B2 32 39 |L MOVE.V....F.29|
00000440: A7 8B 4C 31 B3 37 A7 4C 31 B2 4C 31 AA 31 3A 4C |..L1.7.L1.L1.1:L|
00000450: 4F B2 4C 4F AA 33 00 7A 0C A4 01 8B 46 B2 31 34 |O.LO.3.z....F.14|
00000460: 35 A7 8B 55 31 B3 37 A7 55 31 B2 55 31 AA 31 3A |5..U1.7.U1.U1.1:|
00000470: 4C 4F B2 4C 4F AB 33 AC 43 44 00 9D 0C CC 01 8B |LO.LO.3.CD......|
00000480: 46 B2 31 37 A7 8B 55 31 B1 30 A7 55 31 B2 55 31 |F.17..U1.0.U1.U1|
00000490: AB 31 3A 4C 4F B2 4C 4F AA 33 AC 43 44 00 A6 0C |.1:LO.LO.3.CD...|
000004A0: E0 01 89 32 37 30 00 D6 0C EA 01 97 31 39 38 2C |...270......198,|
000004B0: 30 3A 52 31 28 46 31 29 B2 4C 31 3A 52 31 28 46 |0:R1(F1).L1:R1(F|
000004C0: 32 29 B2 55 31 3A 8B 4C 32 B2 4C 31 B0 55 32 B2 |2).U1:.L2.L1.U2.|
000004D0: 55 31 A7 36 33 30 00 F1 0C EB 01 8B 53 28 4C 31 |U1.630......S(L1|
000004E0: 2C 55 31 29 B2 30 AF 4B 49 B2 36 33 A7 31 30 34 |,U1).0.KI.63.104|
000004F0: 30 00 11 0D EC 01 8B 53 28 4C 31 2C 55 31 29 B2 |0......S(L1,U1).|
00000500: 34 B0 53 28 4C 31 2C 55 31 29 B3 30 A7 31 30 34 |4.S(L1,U1).0.104|
00000510: 30 00 21 0D ED 01 8B 4B 49 B3 B1 36 33 A7 35 30 |0.!....KI..63.50|
00000520: 39 00 52 0D EE 01 4C 4D B2 4C 31 AB 31 3A 55 50 |9.R...LM.L1.1:UP|
00000530: B2 55 31 AA 31 3A 8B 4C 31 B1 B2 31 AF 55 31 B3 |.U1.1:.L1..1.U1.|
00000540: B2 36 A7 8B 53 28 4C 4D 2C 55 50 29 B2 30 A7 35 |.6..S(LM,UP).0.5|
00000550: 30 39 00 7B 0D EF 01 4C 50 B2 4C 31 AA 31 3A 8B |09.{...LP.L1.1:.|
00000560: 4C 31 B3 B2 36 AF 55 31 B3 B2 36 A7 8B 53 28 4C |L1..6.U1..6..S(L|
00000570: 50 2C 55 50 29 B2 30 A7 35 30 39 00 8F 0D F0 01 |P,UP).0.509.....|
00000580: 8B 53 28 4C 31 2C 55 31 29 B2 31 A7 34 39 39 00 |.S(L1,U1).1.499.|
00000590: B8 0D F1 01 55 4D B2 55 31 AB 31 3A 8B 4C 31 B1 |....UM.U1.1:.L1.|
000005A0: B2 31 AF 55 31 B1 B2 31 A7 8B 53 28 4C 4D 2C 55 |.1.U1..1..S(LM,U|
000005B0: 4D 29 B2 30 A7 35 30 39 00 D9 0D F2 01 8B 4C 31 |M).0.509......L1|
000005C0: B3 B2 36 AF 55 31 B1 B2 31 A7 8B 53 28 4C 50 2C |..6.U1..1..S(LP,|
000005D0: 55 4D 29 B2 30 A7 35 30 39 00 09 0E F3 01 8B 4C |UM).0.509......L|
000005E0: 31 B1 B2 32 AF 55 31 B3 B2 35 A7 8B 53 28 4C 4D |1..2.U1..5..S(LM|
000005F0: 2C 55 50 29 B3 30 AF 53 28 4C 31 AB 32 2C 55 31 |,UP).0.S(L1.2,U1|
00000600: AA 32 29 B2 30 A7 35 30 39 00 39 0E F4 01 8B 4C |.2).0.509.9....L|
00000610: 31 B3 B2 35 AF 55 31 B3 B2 35 A7 8B 53 28 4C 50 |1..5.U1..5..S(LP|
00000620: 2C 55 50 29 B3 30 AF 53 28 4C 31 AA 32 2C 55 31 |,UP).0.S(L1.2,U1|
00000630: AA 32 29 B2 30 A7 35 30 39 00 4E 0E F5 01 8B 53 |.2).0.509.N....S|
00000640: 28 4C 31 2C 55 31 29 B2 31 A7 31 30 34 30 00 7E |(L1,U1).1.1040.~|
00000650: 0E F6 01 8B 4C 31 B1 B2 32 AF 55 31 B1 B2 32 A7 |....L1..2.U1..2.|
00000660: 8B 53 28 4C 4D 2C 55 4D 29 B3 30 AF 53 28 4C 31 |.S(LM,UM).0.S(L1|
00000670: AB 32 2C 55 31 AB 32 29 B2 30 A7 35 30 39 00 AE |.2,U1.2).0.509..|
00000680: 0E F7 01 8B 4C 31 B3 B2 35 AF 55 31 B1 B2 32 A7 |....L1..5.U1..2.|
00000690: 8B 53 28 4C 50 2C 55 4D 29 B3 30 AF 53 28 4C 31 |.S(LP,UM).0.S(L1|
000006A0: AA 32 2C 55 31 AB 32 29 B2 30 A7 35 30 39 00 C0 |.2,U1.2).0.509..|
000006B0: 0E F8 01 89 31 30 34 30 3A 8F 20 45 52 52 4F 52 |....1040:. ERROR|
000006C0: 00 EA 0E FD 01 4B 49 B2 30 3A 4C 32 B2 4C 31 3A |.....KI.0:L2.L1:|
000006D0: 55 32 B2 55 31 3A 8B 46 31 B2 31 A7 46 31 B2 33 |U2.U1:.F1.1.F1.3|
000006E0: 3A 46 32 B2 34 3A 89 32 37 30 00 27 0F 12 02 45 |:F2.4:.270.'...E|
000006F0: B2 52 31 28 31 29 3A 48 B2 52 31 28 32 29 3A 41 |.R1(1):H.R1(2):A|
00000700: B2 52 31 28 33 29 3A 42 B2 52 31 28 34 29 3A 8B |.R1(3):B.R1(4):.|
00000710: 53 28 45 2C 48 29 B2 34 B0 53 28 41 2C 42 29 B3 |S(E,H).4.S(A,B).|
00000720: B1 30 A7 31 30 34 30 00 43 0F 1C 02 8B B6 28 45 |.0.1040.C.....(E|
00000730: AB 41 29 B1 32 B0 B6 28 48 AB 42 29 B1 32 A7 31 |.A).2..(H.B).2.1|
00000740: 30 34 30 00 6D 0F 30 02 53 28 41 2C 42 29 B2 53 |040.m.0.S(A,B).S|
00000750: 28 45 2C 48 29 3A 53 28 45 2C 48 29 B2 30 3A 8B |(E,H):S(E,H).0:.|
00000760: B6 28 45 AB 41 29 B3 B1 32 A7 36 36 30 00 B4 0F |.(E.A)..2.660...|
00000770: 3A 02 53 28 28 45 AA 41 29 AD 32 2C 28 48 AA 42 |:.S((E.A).2,(H.B|
00000780: 29 AD 32 29 B2 30 3A 50 31 B2 50 31 AA 31 3A 46 |).2).0:P1.P1.1:F|
00000790: 32 B2 34 3A 46 31 B2 33 3A 5A B2 31 3A 52 31 28 |2.4:F1.3:Z.1:R1(|
000007A0: 31 29 B2 52 31 28 33 29 3A 52 31 28 32 29 B2 52 |1).R1(3):R1(2).R|
000007B0: 31 28 34 29 00 C6 0F 3F 02 8B 42 B2 37 A7 53 28 |1(4)...?..B.7.S(|
000007C0: 41 2C 42 29 B2 32 00 D6 0F 44 02 8D 32 37 30 30 |A,B).2...D..2700|
000007D0: 3A 4B 49 B2 33 35 00 16 10 45 02 4C 4D B2 4C 31 |:KI.35...E.LM.L1|
000007E0: AB 31 3A 55 50 B2 55 31 AA 31 3A 8B 4C 31 B1 B2 |.1:UP.U1.1:.L1..|
000007F0: 32 AF 55 31 B3 B2 35 A7 8B 53 28 4C 4D 2C 55 50 |2.U1..5..S(LM,UP|
00000800: 29 B3 30 AF 53 28 4C 31 AB 32 2C 55 31 AA 32 29 |).0.S(L1.2,U1.2)|
00000810: B2 30 A7 36 30 30 00 4E 10 46 02 4C 50 B2 4C 31 |.0.600.N.F.LP.L1|
00000820: AA 31 3A 8B 4C 31 B3 B2 35 AF 55 31 B3 B2 35 A7 |.1:.L1..5.U1..5.|
00000830: 8B 53 28 4C 50 2C 55 50 29 B3 30 AF 53 28 4C 31 |.S(LP,UP).0.S(L1|
00000840: AA 32 2C 55 31 AA 32 29 B2 30 A7 36 30 30 00 62 |.2,U1.2).0.600.b|
00000850: 10 47 02 8B 53 28 4C 31 2C 55 31 29 B2 31 A7 36 |.G..S(L1,U1).1.6|
00000860: 39 30 00 9A 10 48 02 55 4D B2 55 31 AB 31 3A 8B |90...H.UM.U1.1:.|
00000870: 4C 31 B1 B2 32 AF 55 31 B1 B2 32 A7 8B 53 28 4C |L1..2.U1..2..S(L|
00000880: 4D 2C 55 4D 29 B3 30 AF 53 28 4C 31 AB 32 2C 55 |M,UM).0.S(L1.2,U|
00000890: 31 AB 32 29 B2 30 A7 36 30 30 00 CA 10 49 02 8B |1.2).0.600...I..|
000008A0: 4C 31 B3 B2 35 AF 55 31 B1 B2 32 A7 8B 53 28 4C |L1..5.U1..2..S(L|
000008B0: 50 2C 55 4D 29 B3 30 AF 53 28 4C 31 AA 32 2C 55 |P,UM).0.S(L1.2,U|
000008C0: 31 AB 32 29 B2 30 A7 36 30 30 00 D3 10 4A 02 89 |1.2).0.600...J..|
000008D0: 36 39 30 00 E9 10 58 02 44 24 B2 41 4D 24 3A 8D |690...X.D$.AM$:.|
000008E0: 31 38 30 30 3A 89 32 37 30 00 01 11 76 02 41 31 |1800:.270...v.A1|
000008F0: B2 52 31 28 46 31 29 3A 42 31 B2 52 31 28 46 32 |.R1(F1):B1.R1(F2|
00000900: 29 00 2D 11 80 02 8B 53 28 41 31 2C 42 31 29 B3 |).-....S(A1,B1).|
00000910: B1 30 B0 B6 28 41 31 AB 41 29 B3 B1 32 B0 B6 28 |.0..(A1.A)..2..(|
00000920: 42 31 AB 42 29 B3 B1 32 A7 31 30 34 30 00 48 11 |B1.B)..2.1040.H.|
00000930: 8A 02 45 B2 41 3A 48 B2 42 3A 41 B2 41 31 3A 42 |..E.A:H.B:A.A1:B|
00000940: B2 42 31 3A 89 35 36 30 00 5A 11 94 02 8B 42 B2 |.B1:.560.Z....B.|
00000950: 37 A7 53 28 41 2C 42 29 B2 32 00 73 11 B2 02 8D |7.S(A,B).2.s....|
00000960: 32 37 30 30 3A 8F 20 55 50 44 41 54 45 20 42 4F |2700:. UPDATE BO|
00000970: 41 52 44 00 88 11 BB 02 8F 20 43 4F 4D 50 55 54 |ARD...... COMPUT|
00000980: 45 52 53 20 54 55 52 4E 00 99 11 BC 02 44 24 B2 |ERS TURN.....D$.|
00000990: 4D 54 24 3A 8D 31 38 30 30 00 BA 11 D0 02 52 4D |MT$:.1800.....RM|
000009A0: 28 30 29 B2 B5 28 2E 32 35 AA 28 37 AC BB 28 31 |(0)..(.25.(7..(1|
000009B0: 29 29 29 3A 81 49 B2 31 A4 37 00 F2 11 DA 02 52 |))):.I.1.7.....R|
000009C0: 4D B2 B5 28 2E 32 35 AA 28 37 AC BB 28 31 29 29 |M..(.25.(7..(1))|
000009D0: 29 3A 81 4A B2 30 A4 49 AB 31 3A 8B 52 4D 28 4A |):.J.0.I.1:.RM(J|
000009E0: 29 B2 52 4D A7 4A B2 49 AB 31 3A 82 4A 3A 89 37 |).RM.J.I.1:.J:.7|
000009F0: 33 30 00 05 12 E4 02 82 4A 3A 52 4D 28 49 29 B2 |30......J:RM(I).|
00000A00: 52 4D 3A 82 49 00 30 12 EE 02 81 58 49 B2 30 A4 |RM:.I.0....XI.0.|
00000A10: 37 3A 58 B2 52 4D 28 58 49 29 3A 81 59 B2 30 A4 |7:X.RM(XI):.Y.0.|
00000A20: 37 3A 8B 53 28 58 2C 59 29 B1 AB 31 A7 37 38 30 |7:.S(X,Y)..1.780|
00000A30: 00 54 12 F8 02 8B 53 28 58 2C 59 29 B2 AB 31 A7 |.T....S(X,Y)..1.|
00000A40: 81 41 B2 AB 31 A4 31 A9 32 3A 42 B2 47 3A 8D 33 |.A..1.1.2:B.G:.3|
00000A50: 30 3A 82 41 00 80 12 02 03 8B 53 28 58 2C 59 29 |0:.A......S(X,Y)|
00000A60: B2 AB 32 A7 81 41 B2 AB 31 A4 31 A9 32 3A 81 42 |..2..A..1.1.2:.B|
00000A70: B2 AB 31 A4 31 A9 32 3A 8D 33 30 3A 82 42 2C 41 |..1.1.2:.30:.B,A|
00000A80: 00 8A 12 0C 03 82 59 2C 58 49 00 AA 12 16 03 8B |......Y,XI......|
00000A90: 52 28 30 29 B2 AB 39 39 A7 50 31 B2 31 32 3A 89 |R(0)..99.P1.12:.|
00000AA0: 32 33 30 3A 8F 20 4C 4F 53 45 00 B7 12 20 03 52 |230:. LOSE... .R|
00000AB0: 28 30 29 B2 AB 39 39 00 D8 12 2A 03 8B 52 28 34 |(0)..99...*..R(4|
00000AC0: 29 B2 30 A7 53 28 52 28 33 29 2C 52 28 34 29 29 |).0.S(R(3),R(4))|
00000AD0: B2 AB 32 3A 89 38 33 30 00 F6 12 34 03 53 28 52 |..2:.830...4.S(R|
00000AE0: 28 33 29 2C 52 28 34 29 29 B2 53 28 52 28 31 29 |(3),R(4)).S(R(1)|
00000AF0: 2C 52 28 32 29 29 00 1E 13 3E 03 53 28 52 28 31 |,R(2))...>.S(R(1|
00000B00: 29 2C 52 28 32 29 29 B2 30 3A 8B B6 28 52 28 31 |),R(2)).0:..(R(1|
00000B10: 29 AB 52 28 33 29 29 B3 B1 32 A7 32 30 30 00 4B |).R(3))..2.200.K|
00000B20: 13 48 03 53 28 28 52 28 31 29 AA 52 28 33 29 29 |.H.S((R(1).R(3))|
00000B30: AD 32 2C 28 52 28 32 29 AA 52 28 34 29 29 AD 32 |.2,(R(2).R(4)).2|
00000B40: 29 B2 30 3A 43 31 B2 43 31 AA 31 00 7C 13 52 03 |).0:C1.C1.1.|.R.|
00000B50: 58 B2 52 28 33 29 3A 59 B2 52 28 34 29 3A 8B 53 |X.R(3):Y.R(4):.S|
00000B60: 28 58 2C 59 29 B2 AB 31 A7 42 B2 AB 32 3A 81 41 |(X,Y)..1.B..2:.A|
00000B70: B2 AB 32 A4 32 A9 34 3A 8D 31 35 30 00 A7 13 5C |..2.2.4:.150...\|
00000B80: 03 8B 53 28 58 2C 59 29 B2 AB 32 A7 81 41 B2 AB |..S(X,Y)..2..A..|
00000B90: 32 A4 32 A9 34 3A 81 42 B2 AB 32 A4 32 A9 34 3A |2.2.4:.B..2.2.4:|
00000BA0: 8D 31 35 30 3A 82 42 00 C7 13 66 03 82 41 3A 8B |.150:.B...f..A:.|
00000BB0: 52 28 30 29 B3 B1 AB 39 39 A7 52 28 30 29 B2 AB |R(0)...99.R(0)..|
00000BC0: 39 39 3A 89 38 31 30 00 D0 13 70 03 89 32 30 30 |99:.810...p..200|
00000BD0: 00 F1 13 10 04 44 24 B2 43 24 3A 8D 31 38 30 30 |.....D$.C$:.1800|
00000BE0: 3A 81 54 B2 31 A4 32 30 30 30 3A 82 3A 89 32 32 |:.T.1.2000:.:.22|
00000BF0: 30 00 07 14 40 06 8D 31 38 30 30 3A 81 49 B2 31 |0...@..1800:.I.1|
00000C00: A4 35 30 30 30 3A 82 00 2A 14 4A 06 44 24 B2 22 |.5000:..*.J.D$."|
00000C10: 57 41 4E 54 20 54 4F 20 50 4C 41 59 20 41 47 41 |WANT TO PLAY AGA|
00000C20: 49 4E 3F 22 3A 8D 31 38 30 30 00 3C 14 54 06 8D |IN?":.1800.<.T..|
00000C30: 32 30 3A 8B 41 24 B2 22 59 22 A7 8A 00 72 14 5E |20:.A$."Y"...r.^|
00000C40: 06 44 24 B2 22 54 48 41 4E 4B 53 20 46 4F 52 20 |.D$."THANKS FOR |
00000C50: 50 4C 41 59 49 4E 47 21 22 3A 8D 31 38 30 30 3A |PLAYING!":.1800:|
00000C60: 81 54 B2 31 A4 35 30 30 30 3A 82 3A 99 22 93 22 |.T.1.5000:.:."."|
00000C70: 3A 80 00 90 14 08 07 44 24 B2 22 20 20 20 20 20 |:......D$." |
00000C80: 20 20 20 22 AA 44 24 AA 22 20 20 20 20 20 20 22 | ".D$." "|
00000C90: 00 AA 14 12 07 99 22 13 22 3B 3A 81 49 B2 31 A4 |......".";:.I.1.|
00000CA0: 32 34 3A 99 22 11 22 3B 3A 82 00 B9 14 1C 07 99 |24:.".";:.......|
00000CB0: 52 54 24 3B 44 24 3B 3A 8E 00 D7 14 6C 07 99 22 |RT$;D$;:....l.."|
00000CC0: 93 11 11 11 22 3A 52 54 24 B2 22 1D 1D 1D 1D 1D |....":RT$.".....|
00000CD0: 1D 1D 1D 1D 1D 1D 22 00 01 15 8A 07 99 52 54 24 |......"......RT$|
00000CE0: 3B 22 12 20 92 A3 12 20 92 A3 12 20 92 A3 12 20 |;". ... ... ... |
00000CF0: 92 A3 12 20 92 A3 12 20 92 A3 12 20 92 A3 12 20 |... ... ... ... |
00000D00: 22 00 2E 15 94 07 99 22 92 22 3B 52 54 24 3B 22 |"......".";RT$;"|
00000D10: A5 12 20 92 20 12 20 92 20 12 20 92 20 12 20 92 |.. . . . . . . .|
00000D20: 20 12 20 92 20 12 20 92 20 12 20 92 A7 22 00 58 | . . . . . ..".X|
00000D30: 15 9E 07 99 52 54 24 3B 22 12 43 92 20 12 48 92 |....RT$;".C. .H.|
00000D40: 20 12 45 92 20 12 43 92 20 12 4B 92 20 12 45 92 | .E. .C. .K. .E.|
00000D50: 20 12 52 92 20 12 53 22 00 85 15 A8 07 99 22 92 | .R. .S"......".|
00000D60: 22 3B 52 54 24 3B 22 A5 12 20 92 20 12 20 92 20 |";RT$;".. . . . |
00000D70: 12 20 92 20 12 20 92 20 12 20 92 20 12 20 92 20 |. . . . . . . . |
00000D80: 12 20 92 A7 22 00 AF 15 B2 07 99 52 54 24 3B 22 |. .."......RT$;"|
00000D90: 12 20 92 A4 12 20 92 A4 12 20 92 A4 12 20 92 A4 |. ... ... ... ..|
00000DA0: 12 20 92 A4 12 20 92 A4 12 20 92 A4 12 20 22 00 |. ... ... ... ".|
00000DB0: CC 15 BC 07 85 22 11 11 11 1D 1D 1D 4E 41 4D 45 |....."......NAME|
00000DC0: 20 50 4C 45 41 53 45 22 3B 50 4C 24 00 F7 15 D0 | PLEASE";PL$....|
00000DD0: 07 99 22 11 11 11 11 11 1D 1D 1D 57 41 4E 54 20 |.."........WANT |
00000DE0: 49 4E 53 54 52 55 43 54 49 4F 4E 53 20 28 59 2F |INSTRUCTIONS (Y/|
00000DF0: 4E 29 22 3A 8D 32 30 00 09 16 E4 07 8B 41 24 B3 |N)":.20......A$.|
00000E00: B1 22 59 22 A7 32 33 30 30 00 14 16 EE 07 99 C7 |."Y".2300.......|
00000E10: 28 31 34 29 00 3A 16 F8 07 99 22 93 11 4D 4F 56 |(14).:...."..MOV|
00000E20: 45 20 46 4C 41 53 48 49 4E 47 20 12 3F 92 20 54 |E FLASHING .?. T|
00000E30: 4F 20 4D 41 4E 20 59 4F 55 22 00 5B 16 02 08 99 |O MAN YOU".[....|
00000E40: 22 57 41 4E 54 20 54 4F 20 4D 4F 56 45 2C 20 57 |"WANT TO MOVE, W|
00000E50: 49 54 48 20 43 55 52 53 4F 52 22 00 6D 16 0C 08 |ITH CURSOR".m...|
00000E60: 99 22 43 4F 4E 54 52 4F 4C 53 2E 11 22 00 8F 16 |."CONTROLS.."...|
00000E70: 16 08 99 22 50 52 45 53 53 20 54 48 45 20 43 41 |..."PRESS THE CA|
00000E80: 52 52 49 41 47 45 20 52 45 54 55 52 4E 2E 22 00 |RRIAGE RETURN.".|
00000E90: B1 16 20 08 99 22 54 48 45 4E 20 4D 4F 56 45 20 |.. .."THEN MOVE |
00000EA0: 54 48 45 20 46 4C 41 53 48 49 4E 47 20 12 40 92 |THE FLASHING .@.|
00000EB0: 22 00 D1 16 2A 08 99 22 54 4F 20 57 48 45 52 45 |"...*.."TO WHERE|
00000EC0: 20 59 4F 55 20 57 41 4E 54 20 54 4F 20 47 4F 2E | YOU WANT TO GO.|
00000ED0: 22 00 F0 16 34 08 99 22 50 52 45 53 53 20 43 41 |"...4.."PRESS CA|
00000EE0: 52 52 49 41 47 45 20 52 45 54 55 52 4E 2E 11 22 |RRIAGE RETURN.."|
00000EF0: 00 10 17 3E 08 99 22 49 46 20 59 4F 55 20 48 41 |...>.."IF YOU HA|
00000F00: 56 45 20 41 4E 4F 54 48 45 52 20 4D 4F 56 45 22 |VE ANOTHER MOVE"|
00000F10: 00 30 17 48 08 99 22 4D 4F 56 45 20 54 48 49 53 |.0.H.."MOVE THIS|
00000F20: 20 4D 41 4E 20 41 4E 44 20 46 4F 4C 4C 4F 57 22 | MAN AND FOLLOW"|
00000F30: 00 50 17 52 08 99 22 57 49 54 48 20 41 20 43 41 |.P.R.."WITH A CA|
00000F40: 52 52 49 41 47 45 20 52 45 54 55 52 4E 2E 11 22 |RRIAGE RETURN.."|
00000F50: 00 71 17 5C 08 99 22 49 46 20 59 4F 55 20 44 4F |.q.\.."IF YOU DO|
00000F60: 20 4E 4F 54 20 48 41 56 45 20 41 20 4D 4F 56 45 | NOT HAVE A MOVE|
00000F70: 22 00 90 17 66 08 99 22 50 52 45 53 53 20 53 50 |"...f.."PRESS SP|
00000F80: 41 43 45 20 42 41 52 20 54 4F 20 53 4B 49 50 22 |ACE BAR TO SKIP"|
00000F90: 00 B3 17 70 08 99 22 41 20 54 55 52 4E 2E 11 22 |...p.."A TURN.."|
00000FA0: 3A 99 22 48 4F 4D 45 20 45 4E 44 53 20 47 41 4D |:."HOME ENDS GAM|
00000FB0: 45 2E 22 00 DC 17 FC 08 53 43 B2 31 30 32 37 3A |E.".....SC.1027:|
00000FC0: 43 43 B2 38 30 3A 53 55 B2 53 43 3A 43 44 B2 43 |CC.80:SU.SC:CD.C|
00000FD0: 43 AD 32 3A 44 49 B2 35 34 32 37 32 00 03 18 24 |C.2:DI.54272...$|
00000FE0: 09 5A 31 B2 38 37 3A 5A 32 B2 31 30 32 3A 5A 33 |.Z1.87:Z2.102:Z3|
00000FF0: B2 38 31 3A 5A 34 B2 33 32 3A 52 43 B2 32 3A 42 |.81:Z4.32:RC.2:B|
00001000: 43 B2 30 00 37 18 2E 09 99 22 11 11 11 11 1D 1D |C.0.7...."......|
00001010: 1D 12 22 3B 50 4C 24 3B 22 92 20 44 4F 20 59 4F |..";PL$;". DO YO|
00001020: 55 20 57 49 53 48 20 52 45 44 20 4F 52 20 42 4C |U WISH RED OR BL|
00001030: 41 43 4B 3F 92 20 22 00 55 18 38 09 8D 32 30 3A |ACK?. ".U.8..20:|
00001040: 8B 41 24 B3 B1 22 52 22 AF 41 24 B3 B1 22 42 22 |.A$.."R".A$.."B"|
00001050: A7 32 33 36 30 00 84 18 42 09 8B 41 24 B2 22 42 |.2360...B..A$."B|
00001060: 22 A7 5A 31 B2 31 30 32 3A 5A 32 B2 38 37 3A 5A |".Z1.102:Z2.87:Z|
00001070: 33 B2 33 32 3A 5A 34 B2 38 31 3A 52 43 B2 30 3A |3.32:Z4.81:RC.0:|
00001080: 42 43 B2 32 00 AD 18 4C 09 41 B2 53 55 3A 42 B2 |BC.2...L.A.SU:B.|
00001090: 41 AA 28 33 AC 43 44 29 AA 33 3A 86 53 28 38 2C |A.(3.CD).3:.S(8,|
000010A0: 38 29 2C 52 31 28 34 29 2C 52 28 34 29 00 D8 18 |8),R1(4),R(4)...|
000010B0: 56 09 83 31 2C 34 2C 31 2C 34 2C 30 2C 34 2C 2D |V..1,4,1,4,0,4,-|
000010C0: 31 2C 34 2C 34 2C 31 2C 34 2C 30 2C 34 2C 2D 31 |1,4,4,1,4,0,4,-1|
000010D0: 2C 34 2C 2D 31 2C 31 35 00 F8 18 60 09 81 49 B2 |,4,-1,15...`..I.|
000010E0: 30 A4 37 3A 81 4A B2 30 A4 37 3A 87 58 3A 8B 58 |0.7:.J.0.7:.X:.X|
000010F0: B2 31 35 A7 32 34 32 30 00 0B 19 6A 09 53 28 49 |.15.2420...j.S(I|
00001100: 2C 4A 29 B2 58 3A 89 32 34 33 30 00 19 19 74 09 |,J).X:.2430...t.|
00001110: 8C 3A 87 53 28 49 2C 4A 29 00 22 19 7E 09 82 4A |.:.S(I,J).".~..J|
00001120: 2C 49 00 67 19 88 09 54 24 B2 22 59 4F 55 52 20 |,I.g...T$."YOUR |
00001130: 54 55 52 4E 22 3A 43 24 B2 22 12 54 52 59 20 41 |TURN":C$.".TRY A|
00001140: 47 41 49 4E 92 22 3A 4D 54 24 B2 22 4D 59 20 54 |GAIN.":MT$."MY T|
00001150: 55 52 4E 22 3A 41 4D 24 B2 22 41 4E 4F 54 48 45 |URN":AM$."ANOTHE|
00001160: 52 20 4D 4F 56 45 22 00 99 19 92 09 43 36 24 B2 |R MOVE".....C6$.|
00001170: 22 43 2D 36 34 22 3A 53 52 24 B2 22 1D 1D 1D 1D |"C-64":SR$."....|
00001180: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00001190: 1D 1D 1D 1D 1D 1D 1D 1D 22 00 AF 19 9C 09 97 35 |........"......5|
000011A0: 33 32 38 31 2C 31 35 3A 99 C7 28 31 34 32 29 00 |3281,15:..(142).|
000011B0: C1 19 A6 09 47 B2 AB 31 3A 52 28 30 29 B2 AB 39 |....G..1:R(0)..9|
000011C0: 39 00 F4 19 28 0A 99 22 93 22 3B 3A 52 54 24 B2 |9...(..".";:RT$.|
000011D0: 22 1D 1D 1D 22 3A 52 24 B2 C7 28 32 38 29 AA 22 |"...":R$..(28)."|
000011E0: 20 20 20 22 3A 42 24 B2 C7 28 31 34 34 29 AA 22 | ":B$..(144)."|
000011F0: 20 20 20 22 00 0C 1A 32 0A 81 49 B2 31 A4 34 3A | "...2..I.1.4:|
00001200: 81 4A B2 31 A4 33 3A 99 52 54 24 3B 00 2C 1A 3C |.J.1.3:.RT$;.,.<|
00001210: 0A 81 4C B2 31 A4 34 3A 99 22 12 22 3B 52 24 3B |..L.1.4:.".";R$;|
00001220: 42 24 3B 3A 82 3A 99 22 92 22 3A 82 00 3D 1A 46 |B$;:.:.".":..=.F|
00001230: 0A 81 4B B2 31 A4 33 3A 99 52 54 24 3B 00 58 1A |..K.1.3:.RT$;.X.|
00001240: 50 0A 81 4C B2 31 A4 34 3A 99 22 12 22 3B 42 24 |P..L.1.4:.".";B$|
00001250: 3B 52 24 3B 3A 82 3A 99 00 67 1A 5A 0A 82 4B 2C |;R$;:.:..g.Z..K,|
00001260: 49 3A 99 22 90 22 3B 00 9C 1A 64 0A 99 22 13 11 |I:.".";...d.."..|
00001270: 11 22 3B 53 52 24 3B 43 36 24 3B 22 20 22 3B 50 |.";SR$;C6$;" ";P|
00001280: 4C 24 3A 49 B2 53 55 AA 33 AC 43 44 AA 32 37 3A |L$:I.SU.3.CD.27:|
00001290: 4A B2 53 55 AA 33 AC 43 44 AA 33 32 00 BE 1A 78 |J.SU.3.CD.32...x|
000012A0: 0A 97 49 2C 5A 32 3A 97 49 AA 44 49 2C 52 43 3A |..I,Z2:.I.DI,RC:|
000012B0: 97 4A 2C 5A 31 3A 97 4A AA 44 49 2C 42 43 00 C4 |.J,Z1:.J.DI,BC..|
000012C0: 1A 82 0A 8E 00 D7 1A 8B 0A 8F 20 55 50 44 41 54 |.......... UPDAT|
000012D0: 45 20 42 4F 41 52 44 00 F7 1A 8C 0A 44 31 B2 53 |E BOARD.....D1.S|
000012E0: 55 AA 43 44 AA 31 3A 81 4A B2 37 A4 30 A9 AB 31 |U.CD.1:.J.7.0..1|
000012F0: 3A 81 49 B2 30 A4 37 00 1C 1B 96 0A 8B 53 28 49 |:.I.0.7......S(I|
00001300: 2C 4A 29 B2 30 A7 97 44 31 2C 31 36 30 3A 97 44 |,J).0..D1,160:.D|
00001310: 31 AA 44 49 2C 30 3A 89 32 38 35 30 00 41 1B A0 |1.DI,0:.2850.A..|
00001320: 0A 8B 53 28 49 2C 4A 29 B2 31 A7 97 44 31 2C 5A |..S(I,J).1..D1,Z|
00001330: 31 3A 97 44 31 AA 44 49 2C 52 43 3A 89 32 38 35 |1:.D1.DI,RC:.285|
00001340: 30 00 67 1B AA 0A 8B 53 28 49 2C 4A 29 B2 AB 31 |0.g....S(I,J)..1|
00001350: A7 97 44 31 2C 5A 32 3A 97 44 31 AA 44 49 2C 42 |..D1,Z2:.D1.DI,B|
00001360: 43 3A 89 32 38 35 30 00 8C 1B B4 0A 8B 53 28 49 |C:.2850......S(I|
00001370: 2C 4A 29 B2 32 A7 97 44 31 2C 5A 33 3A 97 44 31 |,J).2..D1,Z3:.D1|
00001380: AA 44 49 2C 52 43 3A 89 32 38 35 30 00 B2 1B BE |.DI,RC:.2850....|
00001390: 0A 8B 53 28 49 2C 4A 29 B2 AB 32 A7 97 44 31 2C |..S(I,J)..2..D1,|
000013A0: 5A 34 3A 97 44 31 AA 44 49 2C 42 43 3A 89 32 38 |Z4:.D1.DI,BC:.28|
000013B0: 35 30 00 CB 1B 22 0B 44 31 B2 44 31 AA 33 3A 82 |50...".D1.D1.3:.|
000013C0: 3A 44 31 B2 44 31 AA 39 36 3A 82 00 E1 1B 2C 0B |:D1.D1.96:....,.|
000013D0: 8F 20 2D 2D 20 55 50 44 41 54 45 20 53 43 4F 52 |. -- UPDATE SCOR|
000013E0: 45 00 FF 1B 36 0B 99 22 13 11 11 11 11 11 22 3B |E...6.."......";|
000013F0: 53 52 24 3B 43 31 3B 22 20 20 20 22 3B 50 31 00 |SR$;C1;" ";P1.|
00001400: 05 1C B8 0B 8E 00 00 00 |........ |
..$.... -- CHECKERS FOR COMMODORE 64.K..
.. -- GO INITIALIZE AND PRINT BOARD.Z...
.1900:.200.L....A$:.A$."".20.R..........
-- COMPUTER SCAN.....U.X.A:V.Y.B:.U.0.U
.7.V.0.V.7.80.C.(..S(U,V).0..90:.80.T.2.
.S(U,V).0.80...<.U.U.A:V.V.B:.U.0.U.7.V.
0.V.7.80...F..S(U,V).0..90...P...).Z..V.
0.S(X,Y)..1.Q.Q.2.=._...(Y.V).2.Q.Q.5.L.
D..Y.7.Q.Q.2._.I..Y.0.U.7.Q.Q.1...N..C..
1.1.2:.U.C.0.U.C.7.V.G.0.130...S..S(U.C,
V.G).0.Q.Q.1:.130...X..U.C.0.U.C.7.V.G.7
.130...}..S(U.C,V.G).0.(S(U.C,V.G).0.(U.
C.X.V.G.Y)).Q.Q.2.#....C:.Q.R(0).R(0).Q:
R(1).X:R(2).Y:R(3).U:R(4).V.-...Q.0:..R.
..U.X.A:V.Y.B:.U.0.U.7.V.0.V.7.160.U....
S(U,V).0.S(X.A.2,Y.B.2).0..90.{. .....G.
. -- PLAYER MAIN LOOP...H..2700.H....C1.
12.D$."I WON, TOUGH LUCK!":.1600......P1
.12.D$."YOU WON, CONGRATULATIONS!":.1600
.....D$.T$:.1800:Z.0.4...F1.1:F2.2:LO.SU
.(22.CD).1:L1.0:U1.0.N...L2.L1.1:U2.U1.1
:KI.63.J...F.0:.F$:.F$.."".F.F(F$).....P
E.B(LO):.LO,KI:.T.1.50:.:PC.B(LO.DI):.LO
.DI,1.D."..LO,160:.T.1.50:.:.LO,PE:.LO.D
I,PC...,..F.157..L1.0.L1.L1.1:LO.LO.3...
@..F.19..".":....T..F.13.F.141.490...H..
F.32.690.6.R..F.20.Z.0.250:. NULL MOVE.V
....F.29..L1.7.L1.L1.1:LO.LO.3.Z....F.14
5..U1.7.U1.U1.1:LO.LO.3.CD...L..F.17..U1
.0.U1.U1.1:LO.LO.3.CD......270.V....198,
0:R1(F1).L1:R1(F2).U1:.L2.L1.U2.U1.630..
....S(L1,U1).0.KI.63.1040......S(L1,U1).
4.S(L1,U1).0.1040.!....KI..63.509.R...LM
.L1.1:UP.U1.1:.L1..1.U1..6..S(LM,UP).0.5
09.{...LP.L1.1:.L1..6.U1..6..S(LP,UP).0.
509......S(L1,U1).1.499.....UM.U1.1:.L1.
.1.U1..1..S(LM,UM).0.509.Y....L1..6.U1..
1..S(LP,UM).0.509......L1..2.U1..5..S(LM
,UP).0.S(L1.2,U1.2).0.509.9....L1..5.U1.
.5..S(LP,UP).0.S(L1.2,U1.2).0.509.N....S
(L1,U1).1.1040.~....L1..2.U1..2..S(LM,UM
).0.S(L1.2,U1.2).0.509......L1..5.U1..2.
.S(LP,UM).0.S(L1.2,U1.2).0.509......1040
:. ERROR.....KI.0:L2.L1:U2.U1:.F1.1.F1.3
:F2.4:.270.'...E.R1(1):H.R1(2):A.R1(3):B
.R1(4):.S(E,H).4.S(A,B)..0.1040.C.....(E
.A).2..(H.B).2.1040.M.0.S(A,B).S(E,H):S(
E,H).0:..(E.A)..2.660...:.S((E.A).2,(H.B
).2).0:P1.P1.1:F2.4:F1.3:Z.1:R1(1).R1(3)
:R1(2).R1(4).F.?..B.7.S(A,B).2.V.D..2700
:KI.35...E.LM.L1.1:UP.U1.1:.L1..2.U1..5.
.S(LM,UP).0.S(L1.2,U1.2).0.600.N.F.LP.L1
.1:.L1..5.U1..5..S(LP,UP).0.S(L1.2,U1.2)
.0.600.B.G..S(L1,U1).1.690...H.UM.U1.1:.
L1..2.U1..2..S(LM,UM).0.S(L1.2,U1.2).0.6
00.J.I..L1..5.U1..2..S(LP,UM).0.S(L1.2,U
1.2).0.600.S.J..690...X.D$.AM$:.1800:.27
0...V.A1.R1(F1):B1.R1(F2).-....S(A1,B1).
.0..(A1.A)..2..(B1.B)..2.1040.H...E.A:H.
B:A.A1:B.B1:.560.Z....B.7.S(A,B).2.S....
2700:. UPDATE BOARD...... COMPUTERS TURN
.....D$.MT$:.1800...P.RM(0)..(.25.(7..(1
))):.I.1.7...Z.RM..(.25.(7..(1))):.J.0.I
.1:.RM(J).RM.J.I.1:.J:.730......J:RM(I).
RM:.I.0....XI.0.7:X.RM(XI):.Y.0.7:.S(X,Y
)..1.780.T....S(X,Y)..1..A..1.1.2:B.G:.3
0:.A......S(X,Y)..2..A..1.1.2:.B..1.1.2:
.30:.B,A......Y,XI......R(0)..99.P1.12:.
230:. LOSE... .R(0)..99.X.*..R(4).0.S(R(
3),R(4))..2:.830...4.S(R(3),R(4)).S(R(1)
,R(2))...>.S(R(1),R(2)).0:..(R(1).R(3)).
.2.200.K.H.S((R(1).R(3)).2,(R(2).R(4)).2
).0:C1.C1.1.|.R.X.R(3):Y.R(4):.S(X,Y)..1
.B..2:.A..2.2.4:.150...\..S(X,Y)..2..A..
2.2.4:.B..2.2.4:.150:.B.G.F..A:.R(0)...9
9.R(0)..99:.810.P.P..200.....D$.C$:.1800
:.T.1.2000:.:.220...@..1800:.I.1.5000:..
*.J.D$."WANT TO PLAY AGAIN?":.1800.<.T..
20:.A$."Y"...R.^.D$."THANKS FOR PLAYING!
":.1800:.T.1.5000:.:.".":......D$."
".D$." "......".";:.I.1.24:.".";
:.......RT$;D$;:..W.L.."....":RT$.".....
......"......RT$;". ... ... ... ... ...
... ... "......".";RT$;".. . . . . . . .
. . . . . ..".X....RT$;".C. .H. .E. .C.
.K. .E. .R. .S"......".";RT$;".. . . .
. . . . . . . . . .."......RT$;". ... ..
. ... ... ... ... ... ".L...."......NAME
PLEASE";PL$...P.."........WANT INSTRUCT
IONS (Y/N)":.20......A$.."Y".2300......G
(14).:...."..MOVE FLASHING .?. TO MAN YO
U".[...."WANT TO MOVE, WITH CURSOR".M...
."CONTROLS.."......"PRESS THE CARRIAGE R
ETURN."... .."THEN MOVE THE FLASHING .@.
".Q.*.."TO WHERE YOU WANT TO GO."...4.."
PRESS CARRIAGE RETURN.."...>.."IF YOU HA
VE ANOTHER MOVE".0.H.."MOVE THIS MAN AND
FOLLOW".P.R.."WITH A CARRIAGE RETURN.."
.Q.\.."IF YOU DO NOT HAVE A MOVE"...F.."
PRESS SPACE BAR TO SKIP"...P.."A TURN.."
:."HOME ENDS GAME.".....SC.1027:CC.80:SU
.SC:CD.CC.2:DI.54272...$.Z1.87:Z2.102:Z3
.81:Z4.32:RC.2:BC.0.7...."........";PL$;
". DO YOU WISH RED OR BLACK?. ".U.8..20:
.A$.."R".A$.."B".2360...B..A$."B".Z1.102
:Z2.87:Z3.32:Z4.81:RC.0:BC.2...L.A.SU:B.
A.(3.CD).3:.S(8,8),R1(4),R(4).X.V..1,4,1
,4,0,4,-1,4,4,1,4,0,4,-1,4,-1,15...`..I.
0.7:.J.0.7:.X:.X.15.2420...J.S(I,J).X:.2
430...T..:.S(I,J).".~..J,I.G...T$."YOUR
TURN":C$.".TRY AGAIN.":MT$."MY TURN":AM$
."ANOTHER MOVE".....C6$."C-64":SR$."....
........................"......53281,15:
.G(142).A...G..1:R(0)..99...(..".";:RT$.
"...":R$.G(28)." ":B$.G(144)." "...2
..I.1.4:.J.1.3:.RT$;.,.<..L.1.4:.".";R$;
B$;:.:.".":..=.F..K.1.3:.RT$;.X.P..L.1.4
:.".";B$;R$;:.:..G.Z..K,I:.".";...D.."..
.";SR$;C6$;" ";PL$:I.SU.3.CD.27:J.SU.3.C
D.32...X..I,Z2:.I.DI,RC:.J,Z1:.J.DI,BC.D
.....W.... UPDATE BOARD.....D1.SU.CD.1:.
J.7.0..1:.I.0.7......S(I,J).0..D1,160:.D
1.DI,0:.2850.A. ..S(I,J).1..D1,Z1:.D1.DI
,RC:.2850.G....S(I,J)..1..D1,Z2:.D1.DI,B
C:.2850......S(I,J).2..D1,Z3:.D1.DI,RC:.
2850......S(I,J)..2..D1,Z4:.D1.DI,BC:.28
50.K.".D1.D1.3:.:D1.D1.96:....,.. -- UPD
ATE SCORE...6.."......";SR$;C1;" ";P1.
........
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL