DAME
FILE INFORMATION
FILENAME(S): DAME
FILE TYPE(S): PRG
FILE SIZE: 5.1K
FIRST SEEN: 2025-12-02 22:47:16
APPEARS ON: 1 disk(s)
FILE HASH
cc62eb59e040a6704d56ae4032a721d32e478d0eb2d647381db7777e5f12e955
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| SPIELE 1 | DAME | PRG | swasti, charly | 16 | 19 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 28 08 01 00 8F 20 2D 2D 20 43 48 45 43 4B |..(.... -- CHECK| 00000010: 45 52 53 20 46 4F 52 20 54 48 45 20 43 4F 4D 4D |ERS FOR THE COMM| 00000020: 4F 44 4F 52 45 20 36 34 00 4D 08 05 00 8F 20 2D |ODORE 64.M.... -| 00000030: 2D 20 47 4F 20 49 4E 49 41 4C 49 5A 45 20 41 4E |- GO INIALIZE AN| 00000040: 44 20 50 52 49 4E 54 20 42 4F 41 52 44 00 5C 08 |D PRINT BOARD.\.| 00000050: 0A 00 8D 31 39 30 30 3A 89 32 30 30 00 6E 08 14 |...1900:.200.n..| 00000060: 00 A1 41 24 3A 8B 41 24 B2 22 22 A7 32 30 00 74 |..A$:.A$."".20.t| 00000070: 08 16 00 8E 00 8C 08 1D 00 8F 20 2D 2D 20 43 4F |.......... -- CO| 00000080: 4D 50 55 54 45 52 53 20 53 43 41 4E 00 B0 08 1E |MPUTERS SCAN....| 00000090: 00 55 B2 58 AA 41 3A 56 B2 59 AA 42 3A 8B 55 B3 |.U.X.A:V.Y.B:.U.| 000000A0: 30 B0 55 B1 37 B0 56 B3 30 B0 56 B1 37 A7 38 30 |0.U.7.V.0.V.7.80| 000000B0: 00 C6 08 28 00 8B 53 28 55 2C 56 29 B2 30 A7 8D |...(..S(U,V).0..| 000000C0: 39 30 3A 89 38 30 00 D7 08 32 00 8B 53 28 55 2C |90:.80...2..S(U,| 000000D0: 56 29 B3 30 A7 38 30 00 FC 08 3C 00 55 B2 55 AA |V).0.80...<.U.U.| 000000E0: 41 3A 56 B2 56 AA 42 3A 3A 8B 55 B3 30 B0 56 B3 |A:V.V.B::.U.0.V.| 000000F0: 30 B0 55 B1 37 B0 56 B1 37 A7 38 30 00 0E 09 46 |0.U.7.V.7.80...F| 00000100: 00 8B 53 28 55 2C 56 29 B2 30 A7 8D 39 30 00 14 |..S(U,V).0..90..| 00000110: 09 50 00 8E 00 2D 09 5A 00 8B 56 B2 30 AF 53 28 |.P...-.Z..V.0.S(| 00000120: 58 2C 59 29 B2 AB 31 A7 51 B2 51 AA 32 00 41 09 |X,Y)..1.Q.Q.2.A.| 00000130: 5F 00 8B B6 28 59 AB 56 29 B2 32 A7 51 B2 51 AA |_...(Y.V).2.Q.Q.| 00000140: 35 00 50 09 64 00 8B 59 B2 37 A7 51 B2 51 AB 32 |5.P.d..Y.7.Q.Q.2| 00000150: 00 63 09 69 00 8B 59 B2 30 B0 55 B2 37 A7 51 B2 |.c.i..Y.0.U.7.Q.| 00000160: 51 AA 31 00 88 09 6E 00 81 43 B2 AB 31 A4 31 A9 |Q.1...n..C..1.1.| 00000170: 32 3A 8B 55 AA 43 B3 30 B0 55 AA 43 B1 37 B0 56 |2:.U.C.0.U.C.7.V| 00000180: AA 47 B3 30 A7 31 33 30 00 A5 09 73 00 8B 53 28 |.G.0.130...s..S(| 00000190: 55 AA 43 2C 56 AA 47 29 B3 30 A7 51 B2 51 AA 31 |U.C,V.G).0.Q.Q.1| 000001A0: 3A 89 31 33 30 00 C0 09 78 00 8B 55 AB 43 B3 30 |:.130...x..U.C.0| 000001B0: B0 55 AB 43 B1 37 B0 56 AB 47 B1 37 A7 31 33 30 |.U.C.7.V.G.7.130| 000001C0: 00 F5 09 7D 00 8B 53 28 55 AA 43 2C 56 AA 47 29 |...}..S(U.C,V.G)| 000001D0: B1 30 AF 28 53 28 55 AB 43 2C 56 AB 47 29 B2 30 |.0.(S(U.C,V.G).0| 000001E0: B0 28 55 AB 43 B2 58 AF 56 AB 47 B2 59 29 29 A7 |.(U.C.X.V.G.Y)).| 000001F0: 51 B2 51 AB 32 00 27 0A 82 00 82 43 3A 8B 51 B1 |Q.Q.2.'....C:.Q.| 00000200: 52 28 30 29 A7 52 28 30 29 B2 51 3A 52 28 31 29 |R(0).R(0).Q:R(1)| 00000210: B2 58 3A 52 28 32 29 B2 59 3A 52 28 33 29 B2 55 |.X:R(2).Y:R(3).U| 00000220: 3A 52 28 34 29 B2 56 00 31 0A 87 00 51 B2 30 3A |:R(4).V.1...Q.0:| 00000230: 8E 00 56 0A 96 00 55 B2 58 AA 41 3A 56 B2 59 AA |..V...U.X.A:V.Y.| 00000240: 42 3A 8B 55 B3 30 B0 55 B1 37 B0 56 B3 30 B0 56 |B:.U.0.U.7.V.0.V| 00000250: B1 37 A7 31 36 30 00 79 0A 9B 00 8B 53 28 55 2C |.7.160.y....S(U,| 00000260: 56 29 B2 30 AF 53 28 58 AA 41 AD 32 2C 59 AA 42 |V).0.S(X.A.2,Y.B| 00000270: AD 32 29 B1 30 A7 8D 39 30 00 7F 0A A0 00 8E 00 |.2).0..90.......| 00000280: 99 0A C7 00 8F 20 2D 2D 20 50 4C 41 59 45 52 20 |..... -- PLAYER | 00000290: 4D 41 49 4E 20 4C 4F 4F 50 00 A3 0A C8 00 8D 32 |MAIN LOOP......2| 000002A0: 37 30 30 00 CA 0A DC 00 8B 43 31 B2 31 32 A7 44 |700......C1.12.D| 000002B0: 24 B2 22 49 20 57 4F 4E 20 54 4F 55 47 48 20 4C |$."I WON TOUGH L| 000002C0: 55 43 4B 22 3A 89 31 36 30 30 00 F8 0A E6 00 8B |UCK":.1600......| 000002D0: 50 31 B2 31 32 A7 44 24 B2 22 59 4F 55 20 57 4F |P1.12.D$."YOU WO| 000002E0: 4E 20 43 4F 4E 47 52 41 54 55 4C 41 54 49 4F 4E |N CONGRATULATION| 000002F0: 53 22 3A 89 31 36 30 30 00 0C 0B F0 00 44 24 B2 |S":.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 E6 0B 2C 01 8B 20 46 B2 31 35 37 |I,PC...,.. F.157| 000003D0: A7 8B 4C 31 B1 30 A7 4C 31 B2 4C 31 AB 31 3A 4C |..L1.0.L1.L1.1:L| 000003E0: 4F B2 4C 4F AB 33 00 F7 0B 40 01 8B 46 B2 31 39 |O.LO.3...@..F.19| 000003F0: A7 99 22 93 22 3A 80 00 0B 0C 54 01 8B 46 B2 31 |..".":....T..F.1| 00000400: 33 B0 46 B2 31 34 31 A7 34 39 30 00 19 0C 68 01 |3.F.141.490...h.| 00000410: 8B 46 B2 33 32 A7 36 39 30 00 3A 0C 72 01 8B 46 |.F.32.690.:.r..F| 00000420: B2 32 30 AF 5A B2 30 A7 32 35 30 3A 8F 20 2D 2D |.20.Z.0.250:. --| 00000430: 20 4E 55 4C 4C 20 4D 4F 56 45 00 5A 0C 90 01 8B | NULL MOVE.Z....| 00000440: 46 B2 32 39 A7 8B 4C 31 B3 37 A7 4C 31 B2 4C 31 |F.29..L1.7.L1.L1| 00000450: AA 31 3A 4C 4F B2 4C 4F AA 33 00 7E 0C A4 01 8B |.1:LO.LO.3.~....| 00000460: 46 B2 31 34 35 A7 8B 55 31 B3 37 A7 55 31 B2 55 |F.145..U1.7.U1.U| 00000470: 31 AA 31 3A 4C 4F B2 4C 4F AB 33 AC 43 44 00 A1 |1.1:LO.LO.3.CD..| 00000480: 0C CC 01 8B 46 B2 31 37 A7 8B 55 31 B1 30 A7 55 |....F.17..U1.0.U| 00000490: 31 B2 55 31 AB 31 3A 4C 4F B2 4C 4F AA 33 AC 43 |1.U1.1:LO.LO.3.C| 000004A0: 44 00 AA 0C E0 01 89 32 37 30 00 DB 0C EA 01 97 |D......270......| 000004B0: 31 39 38 2C 30 3A 52 31 28 46 31 29 B2 4C 31 3A |198,0:R1(F1).L1:| 000004C0: 3A 52 31 28 46 32 29 B2 55 31 3A 8B 4C 32 B2 4C |:R1(F2).U1:.L2.L| 000004D0: 31 B0 55 32 B2 55 31 A7 36 33 30 00 F6 0C EB 01 |1.U2.U1.630.....| 000004E0: 8B 53 28 4C 31 2C 55 31 29 B2 30 AF 4B 49 B2 36 |.S(L1,U1).0.KI.6| 000004F0: 33 A7 31 30 34 30 00 16 0D EC 01 8B 53 28 4C 31 |3.1040......S(L1| 00000500: 2C 55 31 29 B2 34 B0 53 28 4C 31 2C 55 31 29 B3 |,U1).4.S(L1,U1).| 00000510: 30 A7 31 30 34 30 00 26 0D ED 01 8B 4B 49 B3 B1 |0.1040.&....KI..| 00000520: 36 33 A7 35 30 39 00 57 0D EE 01 4C 4D B2 4C 31 |63.509.W...LM.L1| 00000530: AB 31 3A 55 50 B2 55 31 AA 31 3A 8B 4C 31 B1 B2 |.1:UP.U1.1:.L1..| 00000540: 31 AF 55 31 B3 B2 36 A7 8B 53 28 4C 4D 2C 55 50 |1.U1..6..S(LM,UP| 00000550: 29 B2 30 A7 35 30 39 00 80 0D EF 01 4C 50 B2 4C |).0.509.....LP.L| 00000560: 31 AA 31 3A 8B 4C 31 B3 B2 36 AF 55 31 B3 B2 36 |1.1:.L1..6.U1..6| 00000570: A7 8B 53 28 4C 50 2C 55 50 29 B2 30 A7 35 30 39 |..S(LP,UP).0.509| 00000580: 00 94 0D F0 01 8B 53 28 4C 31 2C 55 31 29 B2 31 |......S(L1,U1).1| 00000590: A7 34 39 39 00 BD 0D F1 01 55 4D B2 55 31 AB 31 |.499.....UM.U1.1| 000005A0: 3A 8B 4C 31 B1 B2 31 AF 55 31 B1 B2 31 A7 8B 53 |:.L1..1.U1..1..S| 000005B0: 28 4C 4D 2C 55 4D 29 B2 30 A7 35 30 39 00 DE 0D |(LM,UM).0.509...| 000005C0: F2 01 8B 4C 31 B3 B2 36 AF 55 31 B1 B2 31 A7 8B |...L1..6.U1..1..| 000005D0: 53 28 4C 50 2C 55 4D 29 B2 30 A7 35 30 39 00 0E |S(LP,UM).0.509..| 000005E0: 0E F3 01 8B 4C 31 B1 B2 32 AF 55 31 B3 B2 35 A7 |....L1..2.U1..5.| 000005F0: 8B 53 28 4C 4D 2C 55 50 29 B3 30 AF 53 28 4C 31 |.S(LM,UP).0.S(L1| 00000600: AB 32 2C 55 31 AA 32 29 B2 30 A7 35 30 39 00 3E |.2,U1.2).0.509.>| 00000610: 0E F4 01 8B 4C 31 B3 B2 35 AF 55 31 B3 B2 35 A7 |....L1..5.U1..5.| 00000620: 8B 53 28 4C 50 2C 55 50 29 B3 30 AF 53 28 4C 31 |.S(LP,UP).0.S(L1| 00000630: AA 32 2C 55 31 AA 32 29 B2 30 A7 35 30 39 00 53 |.2,U1.2).0.509.S| 00000640: 0E F5 01 8B 53 28 4C 31 2C 55 31 29 B2 31 A7 31 |....S(L1,U1).1.1| 00000650: 30 34 30 00 83 0E F6 01 8B 4C 31 B1 B2 32 AF 55 |040......L1..2.U| 00000660: 31 B1 B2 32 A7 8B 53 28 4C 4D 2C 55 4D 29 B3 30 |1..2..S(LM,UM).0| 00000670: AF 53 28 4C 31 AB 32 2C 55 31 AB 32 29 B2 30 A7 |.S(L1.2,U1.2).0.| 00000680: 35 30 39 00 B3 0E F7 01 8B 4C 31 B3 B2 35 AF 55 |509......L1..5.U| 00000690: 31 B1 B2 32 A7 8B 53 28 4C 50 2C 55 4D 29 B3 30 |1..2..S(LP,UM).0| 000006A0: AF 53 28 4C 31 AA 32 2C 55 31 AB 32 29 B2 30 A7 |.S(L1.2,U1.2).0.| 000006B0: 35 30 39 00 C9 0E F8 01 89 31 30 34 30 3A 20 8F |509......1040: .| 000006C0: 20 2D 2D 20 45 52 52 4F 52 00 F3 0E FD 01 4B 49 | -- ERROR.....KI| 000006D0: B2 30 3A 4C 32 B2 4C 31 3A 55 32 B2 55 31 3A 8B |.0:L2.L1:U2.U1:.| 000006E0: 46 31 B2 31 A7 46 31 B2 33 3A 46 32 B2 34 3A 89 |F1.1.F1.3:F2.4:.| 000006F0: 32 37 30 00 30 0F 12 02 45 B2 52 31 28 31 29 3A |270.0...E.R1(1):| 00000700: 48 B2 52 31 28 32 29 3A 41 B2 52 31 28 33 29 3A |H.R1(2):A.R1(3):| 00000710: 42 B2 52 31 28 34 29 3A 8B 53 28 45 2C 48 29 B2 |B.R1(4):.S(E,H).| 00000720: 34 B0 53 28 41 2C 42 29 B3 B1 30 A7 31 30 34 30 |4.S(A,B)..0.1040| 00000730: 00 4C 0F 1C 02 8B B6 28 45 AB 41 29 B1 32 B0 B6 |.L.....(E.A).2..| 00000740: 28 48 AB 42 29 B1 32 A7 31 30 34 30 00 76 0F 30 |(H.B).2.1040.v.0| 00000750: 02 53 28 41 2C 42 29 B2 53 28 45 2C 48 29 3A 53 |.S(A,B).S(E,H):S| 00000760: 28 45 2C 48 29 B2 30 3A 8B B6 28 45 AB 41 29 B3 |(E,H).0:..(E.A).| 00000770: B1 32 A7 36 36 30 00 BD 0F 3A 02 53 28 28 45 AA |.2.660...:.S((E.| 00000780: 41 29 AD 32 2C 28 48 AA 42 29 AD 32 29 B2 30 3A |A).2,(H.B).2).0:| 00000790: 50 31 B2 50 31 AA 31 3A 46 32 B2 34 3A 46 31 B2 |P1.P1.1:F2.4:F1.| 000007A0: 33 3A 5A B2 31 3A 52 31 28 31 29 B2 52 31 28 33 |3:Z.1:R1(1).R1(3| 000007B0: 29 3A 52 31 28 32 29 B2 52 31 28 34 29 00 CF 0F |):R1(2).R1(4)...| 000007C0: 3F 02 8B 42 B2 37 A7 53 28 41 2C 42 29 B2 32 00 |?..B.7.S(A,B).2.| 000007D0: DF 0F 44 02 8D 32 37 30 30 3A 4B 49 B2 33 35 00 |..D..2700:KI.35.| 000007E0: 1F 10 45 02 4C 4D B2 4C 31 AB 31 3A 55 50 B2 55 |..E.LM.L1.1:UP.U| 000007F0: 31 AA 31 3A 8B 4C 31 B1 B2 32 AF 55 31 B3 B2 35 |1.1:.L1..2.U1..5| 00000800: A7 8B 53 28 4C 4D 2C 55 50 29 B3 30 AF 53 28 4C |..S(LM,UP).0.S(L| 00000810: 31 AB 32 2C 55 31 AA 32 29 B2 30 A7 36 30 30 00 |1.2,U1.2).0.600.| 00000820: 57 10 46 02 4C 50 B2 4C 31 AA 31 3A 8B 4C 31 B3 |W.F.LP.L1.1:.L1.| 00000830: B2 35 AF 55 31 B3 B2 35 A7 8B 53 28 4C 50 2C 55 |.5.U1..5..S(LP,U| 00000840: 50 29 B3 30 AF 53 28 4C 31 AA 32 2C 55 31 AA 32 |P).0.S(L1.2,U1.2| 00000850: 29 B2 30 A7 36 30 30 00 6B 10 47 02 8B 53 28 4C |).0.600.k.G..S(L| 00000860: 31 2C 55 31 29 B2 31 A7 36 39 30 00 A3 10 48 02 |1,U1).1.690...H.| 00000870: 55 4D B2 55 31 AB 31 3A 8B 4C 31 B1 B2 32 AF 55 |UM.U1.1:.L1..2.U| 00000880: 31 B1 B2 32 A7 8B 53 28 4C 4D 2C 55 4D 29 B3 30 |1..2..S(LM,UM).0| 00000890: AF 53 28 4C 31 AB 32 2C 55 31 AB 32 29 B2 30 A7 |.S(L1.2,U1.2).0.| 000008A0: 36 30 30 00 D3 10 49 02 8B 4C 31 B3 B2 35 AF 55 |600...I..L1..5.U| 000008B0: 31 B1 B2 32 A7 8B 53 28 4C 50 2C 55 4D 29 B3 30 |1..2..S(LP,UM).0| 000008C0: AF 53 28 4C 31 AA 32 2C 55 31 AB 32 29 B2 30 A7 |.S(L1.2,U1.2).0.| 000008D0: 36 30 30 00 DC 10 4A 02 89 36 39 30 00 F2 10 58 |600...J..690...X| 000008E0: 02 44 24 B2 41 4D 24 3A 8D 31 38 30 30 3A 89 32 |.D$.AM$:.1800:.2| 000008F0: 37 30 00 0A 11 76 02 41 31 B2 52 31 28 46 31 29 |70...v.A1.R1(F1)| 00000900: 3A 42 31 B2 52 31 28 46 32 29 00 36 11 80 02 8B |:B1.R1(F2).6....| 00000910: 53 28 41 31 2C 42 31 29 B3 B1 30 B0 B6 28 41 31 |S(A1,B1)..0..(A1| 00000920: AB 41 29 B3 B1 32 B0 B6 28 42 31 AB 42 29 B3 B1 |.A)..2..(B1.B)..| 00000930: 32 A7 31 30 34 30 00 51 11 8A 02 45 B2 41 3A 48 |2.1040.Q...E.A:H| 00000940: B2 42 3A 41 B2 41 31 3A 42 B2 42 31 3A 89 35 36 |.B:A.A1:B.B1:.56| 00000950: 30 00 63 11 94 02 8B 42 B2 37 A7 53 28 41 2C 42 |0.c....B.7.S(A,B| 00000960: 29 B2 32 00 7F 11 B2 02 8D 32 37 30 30 3A 8F 20 |).2......2700:. | 00000970: 2D 2D 20 55 50 44 41 54 45 20 42 4F 41 52 44 00 |-- UPDATE BOARD.| 00000980: 97 11 BB 02 8F 20 2D 2D 20 43 4F 4D 50 55 54 45 |..... -- COMPUTE| 00000990: 52 53 20 54 55 52 4E 00 A8 11 BC 02 44 24 B2 4D |RS TURN.....D$.M| 000009A0: 54 24 3A 8D 31 38 30 30 00 C9 11 D0 02 52 4D 28 |T$:.1800.....RM(| 000009B0: 30 29 B2 B5 28 2E 32 35 AA 28 37 AC BB 28 31 29 |0)..(.25.(7..(1)| 000009C0: 29 29 3A 81 49 B2 31 A4 37 00 01 12 DA 02 52 4D |)):.I.1.7.....RM| 000009D0: B2 B5 28 2E 32 35 AA 28 37 AC BB 28 31 29 29 29 |..(.25.(7..(1)))| 000009E0: 3A 81 4A B2 30 A4 49 AB 31 3A 8B 52 4D 28 4A 29 |:.J.0.I.1:.RM(J)| 000009F0: B2 52 4D A7 4A B2 49 AB 31 3A 82 4A 3A 89 37 33 |.RM.J.I.1:.J:.73| 00000A00: 30 00 14 12 E4 02 82 4A 3A 52 4D 28 49 29 B2 52 |0......J:RM(I).R| 00000A10: 4D 3A 82 49 00 3F 12 EE 02 81 58 49 B2 30 A4 37 |M:.I.?....XI.0.7| 00000A20: 3A 58 B2 52 4D 28 58 49 29 3A 81 59 B2 30 A4 37 |:X.RM(XI):.Y.0.7| 00000A30: 3A 8B 53 28 58 2C 59 29 B1 AB 31 A7 37 38 30 00 |:.S(X,Y)..1.780.| 00000A40: 63 12 F8 02 8B 53 28 58 2C 59 29 B2 AB 31 A7 81 |c....S(X,Y)..1..| 00000A50: 41 B2 AB 31 A4 31 A9 32 3A 42 B2 47 3A 8D 33 30 |A..1.1.2:B.G:.30| 00000A60: 3A 82 41 00 8F 12 02 03 8B 53 28 58 2C 59 29 B2 |:.A......S(X,Y).| 00000A70: AB 32 A7 81 41 B2 AB 31 A4 31 A9 32 3A 81 42 B2 |.2..A..1.1.2:.B.| 00000A80: AB 31 A4 31 A9 32 3A 8D 33 30 3A 82 42 2C 41 00 |.1.1.2:.30:.B,A.| 00000A90: 99 12 0C 03 82 59 2C 58 49 00 BE 12 16 03 8B 52 |.....Y,XI......R| 00000AA0: 28 30 29 B2 AB 39 39 A7 50 31 B2 31 32 3A 89 32 |(0)..99.P1.12:.2| 00000AB0: 33 30 3A 20 8F 20 2D 2D 20 4C 4F 4F 53 45 00 CB |30: . -- LOOSE..| 00000AC0: 12 20 03 52 28 30 29 B2 AB 39 39 00 EC 12 2A 03 |. .R(0)..99...*.| 00000AD0: 8B 52 28 34 29 B2 30 A7 53 28 52 28 33 29 2C 52 |.R(4).0.S(R(3),R| 00000AE0: 28 34 29 29 B2 AB 32 3A 89 38 33 30 00 0A 13 34 |(4))..2:.830...4| 00000AF0: 03 53 28 52 28 33 29 2C 52 28 34 29 29 B2 53 28 |.S(R(3),R(4)).S(| 00000B00: 52 28 31 29 2C 52 28 32 29 29 00 32 13 3E 03 53 |R(1),R(2)).2.>.S| 00000B10: 28 52 28 31 29 2C 52 28 32 29 29 B2 30 3A 8B B6 |(R(1),R(2)).0:..| 00000B20: 28 52 28 31 29 AB 52 28 33 29 29 B3 B1 32 A7 32 |(R(1).R(3))..2.2| 00000B30: 30 30 00 5F 13 48 03 53 28 28 52 28 31 29 AA 52 |00._.H.S((R(1).R| 00000B40: 28 33 29 29 AD 32 2C 28 52 28 32 29 AA 52 28 34 |(3)).2,(R(2).R(4| 00000B50: 29 29 AD 32 29 B2 30 3A 43 31 B2 43 31 AA 31 00 |)).2).0:C1.C1.1.| 00000B60: 90 13 52 03 58 B2 52 28 33 29 3A 59 B2 52 28 34 |..R.X.R(3):Y.R(4| 00000B70: 29 3A 8B 53 28 58 2C 59 29 B2 AB 31 A7 42 B2 AB |):.S(X,Y)..1.B..| 00000B80: 32 3A 81 41 B2 AB 32 A4 32 A9 34 3A 8D 31 35 30 |2:.A..2.2.4:.150| 00000B90: 00 BB 13 5C 03 8B 53 28 58 2C 59 29 B2 AB 32 A7 |...\..S(X,Y)..2.| 00000BA0: 81 41 B2 AB 32 A4 32 A9 34 3A 81 42 B2 AB 32 A4 |.A..2.2.4:.B..2.| 00000BB0: 32 A9 34 3A 8D 31 35 30 3A 82 42 00 DB 13 66 03 |2.4:.150:.B...f.| 00000BC0: 82 41 3A 8B 52 28 30 29 B3 B1 AB 39 39 A7 52 28 |.A:.R(0)...99.R(| 00000BD0: 30 29 B2 AB 39 39 3A 89 38 31 30 00 E4 13 70 03 |0)..99:.810...p.| 00000BE0: 89 32 30 30 00 05 14 10 04 44 24 B2 43 24 3A 8D |.200.....D$.C$:.| 00000BF0: 31 38 30 30 3A 81 54 B2 31 A4 32 30 30 30 3A 82 |1800:.T.1.2000:.| 00000C00: 3A 89 32 32 30 00 1B 14 40 06 8D 31 38 30 30 3A |:.220...@..1800:| 00000C10: 81 49 B2 31 A4 35 30 30 30 3A 82 00 3D 14 4A 06 |.I.1.5000:..=.J.| 00000C20: 44 24 B2 22 57 41 4E 54 20 54 4F 20 50 4C 41 59 |D$."WANT TO PLAY| 00000C30: 20 41 47 41 49 4E 22 3A 8D 31 38 30 30 00 50 14 | AGAIN":.1800.P.| 00000C40: 54 06 8D 32 30 3A 8B 41 24 B2 22 59 22 A7 20 8A |T..20:.A$."Y". .| 00000C50: 00 77 14 5E 06 99 22 93 11 11 11 11 11 1D 1D 1D |.w.^..".........| 00000C60: 1D 1D 54 48 41 4E 4B 53 20 46 4F 52 20 50 4C 41 |..THANKS FOR PLA| 00000C70: 59 49 4E 47 22 3A 80 00 94 14 08 07 44 24 B2 22 |YING":......D$."| 00000C80: 20 20 20 20 20 20 20 20 22 AA 44 24 AA 22 20 20 | ".D$." | 00000C90: 20 20 20 22 00 AE 14 12 07 99 22 13 22 3B 3A 81 | "......".";:.| 00000CA0: 49 B2 31 A4 32 34 3A 99 22 11 22 3B 3A 82 00 BD |I.1.24:.".";:...| 00000CB0: 14 1C 07 99 52 54 24 3B 44 24 3B 3A 8E 00 DC 14 |....RT$;D$;:....| 00000CC0: 6C 07 99 22 93 9E 11 11 11 22 3A 52 54 24 B2 22 |l..".....":RT$."| 00000CD0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 22 00 F3 14 6D |..........."...m| 00000CE0: 07 97 35 33 32 38 30 2C 30 3A 97 35 33 32 38 31 |..53280,0:.53281| 00000CF0: 2C 31 31 00 1D 15 8A 07 99 52 54 24 3B 22 12 20 |,11......RT$;". | 00000D00: 92 23 12 20 92 23 12 20 92 23 12 20 92 23 12 20 |.#. .#. .#. .#. | 00000D10: 92 23 12 20 92 23 12 20 92 23 12 20 22 00 4A 15 |.#. .#. .#. ".J.| 00000D20: 94 07 99 22 92 22 3B 52 54 24 3B 22 25 12 20 92 |...".";RT$;"%. .| 00000D30: 20 12 20 92 20 12 20 92 20 12 20 92 20 12 20 92 | . . . . . . . .| 00000D40: 20 12 20 92 20 12 20 92 27 22 00 74 15 9E 07 99 | . . . .'".t....| 00000D50: 52 54 24 3B 22 12 43 92 20 12 48 92 20 12 45 92 |RT$;".C. .H. .E.| 00000D60: 20 12 43 92 20 12 4B 92 20 12 45 92 20 12 52 92 | .C. .K. .E. .R.| 00000D70: 20 12 53 22 00 A1 15 A8 07 99 22 92 22 3B 52 54 | .S"......".";RT| 00000D80: 24 3B 22 25 12 20 92 20 12 20 92 20 12 20 92 20 |$;"%. . . . . . | 00000D90: 12 20 92 20 12 20 92 20 12 20 92 20 12 20 92 27 |. . . . . . . .'| 00000DA0: 22 00 CB 15 B2 07 99 52 54 24 3B 22 12 20 92 24 |"......RT$;". .$| 00000DB0: 12 20 92 24 12 20 92 24 12 20 92 24 12 20 92 24 |. .$. .$. .$. .$| 00000DC0: 12 20 92 24 12 20 92 24 12 20 22 00 E8 15 BC 07 |. .$. .$. ".....| 00000DD0: 85 22 11 11 11 1D 1D 1D 4E 41 4D 45 20 50 4C 45 |."......NAME PLE| 00000DE0: 41 53 45 22 3B 50 4C 24 00 14 16 D0 07 99 22 11 |ASE";PL$......".| 00000DF0: 11 11 11 11 1D 1D 1D 57 41 4E 54 20 49 4E 53 54 |.......WANT INST| 00000E00: 52 55 43 54 49 4F 4E 53 20 28 59 2F 4E 29 3F 22 |RUCTIONS (Y/N)?"| 00000E10: 3A 8D 32 30 00 26 16 E4 07 8B 41 24 B3 B1 22 59 |:.20.&....A$.."Y| 00000E20: 22 A7 32 33 30 30 00 31 16 EE 07 99 C7 28 31 34 |".2300.1.....(14| 00000E30: 29 00 5A 16 F8 07 99 22 93 11 1D 1D 1D CD 4F 56 |).Z...."......OV| 00000E40: 45 20 46 4C 41 53 48 49 4E 47 20 12 3F 92 20 54 |E FLASHING .?. T| 00000E50: 4F 20 4D 41 4E 20 59 4F 55 22 00 7E 16 02 08 99 |O MAN YOU".~....| 00000E60: 22 1D 1D 1D 57 41 4E 54 20 54 4F 20 4D 4F 56 45 |"...WANT TO MOVE| 00000E70: 20 28 57 49 54 48 20 C3 D5 D2 D3 CF D2 22 00 94 | (WITH ......"..| 00000E80: 16 0C 08 99 22 1D 1D 1D C3 CF CE D4 D2 CF CC D3 |...."...........| 00000E90: 29 2E 11 22 00 B9 16 16 08 99 22 1D 1D 1D D0 52 |).."......"....R| 00000EA0: 45 53 53 20 54 48 45 20 C3 C1 D2 D2 C9 C1 C7 C5 |ESS THE ........| 00000EB0: A0 D2 C5 D4 D5 D2 CE 2E 22 00 DE 16 20 08 99 22 |........"... .."| 00000EC0: 1D 1D 1D D4 48 45 4E 20 4D 4F 56 45 20 54 48 45 |....HEN MOVE THE| 00000ED0: 20 46 4C 41 53 48 49 4E 47 20 12 40 92 22 00 01 | FLASHING .@."..| 00000EE0: 17 2A 08 99 22 1D 1D 1D 54 4F 20 57 48 45 52 45 |.*.."...TO WHERE| 00000EF0: 20 59 4F 55 20 57 41 4E 54 20 54 4F 20 47 4F 2E | YOU WANT TO GO.| 00000F00: 22 00 27 17 34 08 99 22 1D 1D 1D D0 52 45 53 53 |".'.4.."....RESS| 00000F10: 20 54 48 45 20 C3 C1 D2 D2 C9 C1 C7 C5 A0 D2 C5 | THE ...........| 00000F20: D4 D5 D2 CE 2E 11 22 00 4A 17 3E 08 99 22 1D 1D |......".J.>.."..| 00000F30: 1D C9 46 20 59 4F 55 20 48 41 44 20 41 4E 4F 54 |..F YOU HAD ANOT| 00000F40: 48 45 52 20 4D 4F 56 45 2C 22 00 6D 17 48 08 99 |HER MOVE,".m.H..| 00000F50: 22 1D 1D 1D 4D 4F 56 45 20 54 48 49 53 20 4D 41 |"...MOVE THIS MA| 00000F60: 4E 20 41 4E 44 20 46 4F 4C 4C 4F 57 22 00 90 17 |N AND FOLLOW"...| 00000F70: 52 08 99 22 1D 1D 1D 57 49 54 48 20 41 20 C3 C1 |R.."...WITH A ..| 00000F80: D2 D2 C9 C1 C7 C5 A0 D2 C5 D4 D5 D2 CE 2E 11 22 |..............."| 00000F90: 00 B5 17 5C 08 99 22 1D 1D 1D C9 46 20 59 4F 55 |...\.."....F YOU| 00000FA0: 20 44 4F 20 4E 4F 54 20 48 41 56 45 20 41 20 4D | DO NOT HAVE A M| 00000FB0: 4F 56 45 2C 22 00 D7 17 66 08 99 22 1D 1D 1D 50 |OVE,"...f.."...P| 00000FC0: 52 45 53 53 20 D3 D0 C1 C3 C5 A0 C2 C1 D2 20 54 |RESS ......... T| 00000FD0: 4F 20 53 4B 49 50 22 00 04 18 70 08 99 22 1D 1D |O SKIP"...p.."..| 00000FE0: 1D 41 20 54 55 52 4E 2E 11 22 3A 99 22 1D 1D 1D |.A TURN..":."...| 00000FF0: C8 4F 4D 45 20 45 4E 44 53 20 54 48 45 20 47 41 |.OME ENDS THE GA| 00001000: 4D 45 2E 22 00 2D 18 FC 08 53 43 B2 31 30 32 37 |ME.".-...SC.1027| 00001010: 3A 43 43 B2 38 30 3A 53 55 B2 53 43 3A 43 44 B2 |:CC.80:SU.SC:CD.| 00001020: 43 43 AD 32 3A 44 49 B2 35 34 32 37 32 00 54 18 |CC.2:DI.54272.T.| 00001030: 24 09 5A 31 B2 38 37 3A 5A 32 B2 31 30 32 3A 5A |$.Z1.87:Z2.102:Z| 00001040: 33 B2 38 31 3A 5A 34 B2 33 32 3A 52 43 B2 32 3A |3.81:Z4.32:RC.2:| 00001050: 42 43 B2 30 00 88 18 2E 09 99 22 11 11 11 11 1D |BC.0......".....| 00001060: 1D 1D 12 22 3B 50 4C 24 3B 22 92 20 44 4F 20 59 |...";PL$;". DO Y| 00001070: 4F 55 20 57 49 53 48 20 52 45 44 20 4F 52 20 42 |OU WISH RED OR B| 00001080: 4C 41 43 4B 3F 92 20 22 00 A6 18 38 09 8D 32 30 |LACK?. "...8..20| 00001090: 3A 8B 41 24 B3 B1 22 52 22 AF 41 24 B3 B1 22 42 |:.A$.."R".A$.."B| 000010A0: 22 A7 32 33 36 30 00 D5 18 42 09 8B 41 24 B2 22 |".2360...B..A$."| 000010B0: 42 22 A7 5A 31 B2 31 30 32 3A 5A 32 B2 38 37 3A |B".Z1.102:Z2.87:| 000010C0: 5A 33 B2 33 32 3A 5A 34 B2 38 31 3A 52 43 B2 30 |Z3.32:Z4.81:RC.0| 000010D0: 3A 42 43 B2 32 00 FE 18 4C 09 41 B2 53 55 3A 42 |:BC.2...L.A.SU:B| 000010E0: B2 41 AA 28 33 AC 43 44 29 AA 33 3A 86 53 28 38 |.A.(3.CD).3:.S(8| 000010F0: 2C 38 29 2C 52 31 28 34 29 2C 52 28 34 29 00 29 |,8),R1(4),R(4).)| 00001100: 19 56 09 83 31 2C 34 2C 31 2C 34 2C 30 2C 34 2C |.V..1,4,1,4,0,4,| 00001110: 2D 31 2C 34 2C 34 2C 31 2C 34 2C 30 2C 34 2C 2D |-1,4,4,1,4,0,4,-| 00001120: 31 2C 34 2C 2D 31 2C 31 35 00 49 19 60 09 81 49 |1,4,-1,15.I.`..I| 00001130: B2 30 A4 37 3A 81 4A B2 30 A4 37 3A 87 58 3A 8B |.0.7:.J.0.7:.X:.| 00001140: 58 B2 31 35 A7 32 34 32 30 00 5C 19 6A 09 53 28 |X.15.2420.\.j.S(| 00001150: 49 2C 4A 29 B2 58 3A 89 32 34 33 30 00 6A 19 74 |I,J).X:.2430.j.t| 00001160: 09 8C 3A 87 53 28 49 2C 4A 29 00 73 19 7E 09 82 |..:.S(I,J).s.~..| 00001170: 4A 2C 49 00 B8 19 88 09 54 24 B2 22 59 4F 55 52 |J,I.....T$."YOUR| 00001180: 20 54 55 52 4E 22 3A 43 24 B2 22 12 54 52 59 20 | TURN":C$.".TRY | 00001190: 41 47 41 49 4E 92 22 3A 4D 54 24 B2 22 4D 59 20 |AGAIN.":MT$."MY | 000011A0: 54 55 52 4E 22 3A 41 4D 24 B2 22 41 4E 4F 54 48 |TURN":AM$."ANOTH| 000011B0: 45 52 20 4D 4F 56 45 22 00 EA 19 92 09 43 36 24 |ER MOVE".....C6$| 000011C0: B2 22 43 2D 36 34 22 3A 53 52 24 B2 22 1D 1D 1D |."C-64":SR$."...| 000011D0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................| 000011E0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 22 00 00 1A 9C 09 97 |........."......| 000011F0: 35 33 32 38 31 2C 31 35 3A 99 C7 28 31 34 32 29 |53281,15:..(142)| 00001200: 00 12 1A A6 09 47 B2 AB 31 3A 52 28 30 29 B2 AB |.....G..1:R(0)..| 00001210: 39 39 00 45 1A 28 0A 99 22 93 22 3B 3A 52 54 24 |99.E.(..".";:RT$| 00001220: B2 22 1D 1D 1D 22 3A 52 24 B2 C7 28 32 38 29 AA |."...":R$..(28).| 00001230: 22 20 20 20 22 3A 42 24 B2 C7 28 31 34 34 29 AA |" ":B$..(144).| 00001240: 22 20 20 20 22 00 5D 1A 32 0A 81 49 B2 31 A4 34 |" ".].2..I.1.4| 00001250: 3A 81 4A B2 31 A4 33 3A 99 52 54 24 3B 00 7D 1A |:.J.1.3:.RT$;.}.| 00001260: 3C 0A 81 4C B2 31 A4 34 3A 99 22 12 22 3B 52 24 |<..L.1.4:.".";R$| 00001270: 3B 42 24 3B 3A 82 3A 99 22 92 22 3A 82 00 8E 1A |;B$;:.:.".":....| 00001280: 46 0A 81 4B B2 31 A4 33 3A 99 52 54 24 3B 00 A9 |F..K.1.3:.RT$;..| 00001290: 1A 50 0A 81 4C B2 31 A4 34 3A 99 22 12 22 3B 42 |.P..L.1.4:.".";B| 000012A0: 24 3B 52 24 3B 3A 82 3A 99 00 B8 1A 5A 0A 82 4B |$;R$;:.:....Z..K| 000012B0: 2C 49 3A 99 22 90 22 3B 00 ED 1A 64 0A 99 22 13 |,I:.".";...d..".| 000012C0: 11 11 22 3B 53 52 24 3B 43 36 24 3B 22 20 22 3B |..";SR$;C6$;" ";| 000012D0: 50 4C 24 3A 49 B2 53 55 AA 33 AC 43 44 AA 32 37 |PL$:I.SU.3.CD.27| 000012E0: 3A 4A B2 53 55 AA 33 AC 43 44 AA 33 32 00 0F 1B |:J.SU.3.CD.32...| 000012F0: 78 0A 97 49 2C 5A 32 3A 97 49 AA 44 49 2C 52 43 |x..I,Z2:.I.DI,RC| 00001300: 3A 97 4A 2C 5A 31 3A 97 4A AA 44 49 2C 42 43 00 |:.J,Z1:.J.DI,BC.| 00001310: 15 1B 82 0A 8E 00 2B 1B 8B 0A 8F 20 2D 2D 20 55 |......+.... -- U| 00001320: 50 44 41 54 45 20 42 4F 41 52 44 00 4B 1B 8C 0A |PDATE BOARD.K...| 00001330: 44 31 B2 53 55 AA 43 44 AA 31 3A 81 4A B2 37 A4 |D1.SU.CD.1:.J.7.| 00001340: 30 A9 AB 31 3A 81 49 B2 30 A4 37 00 70 1B 96 0A |0..1:.I.0.7.p...| 00001350: 8B 53 28 49 2C 4A 29 B2 30 A7 97 44 31 2C 31 36 |.S(I,J).0..D1,16| 00001360: 30 3A 97 44 31 AA 44 49 2C 30 3A 89 32 38 35 30 |0:.D1.DI,0:.2850| 00001370: 00 95 1B A0 0A 8B 53 28 49 2C 4A 29 B2 31 A7 97 |......S(I,J).1..| 00001380: 44 31 2C 5A 31 3A 97 44 31 AA 44 49 2C 52 43 3A |D1,Z1:.D1.DI,RC:| 00001390: 89 32 38 35 30 00 BB 1B AA 0A 8B 53 28 49 2C 4A |.2850......S(I,J| 000013A0: 29 B2 AB 31 A7 97 44 31 2C 5A 32 3A 97 44 31 AA |)..1..D1,Z2:.D1.| 000013B0: 44 49 2C 42 43 3A 89 32 38 35 30 00 E0 1B B4 0A |DI,BC:.2850.....| 000013C0: 8B 53 28 49 2C 4A 29 B2 32 A7 97 44 31 2C 5A 33 |.S(I,J).2..D1,Z3| 000013D0: 3A 97 44 31 AA 44 49 2C 52 43 3A 89 32 38 35 30 |:.D1.DI,RC:.2850| 000013E0: 00 06 1C BE 0A 8B 53 28 49 2C 4A 29 B2 AB 32 A7 |......S(I,J)..2.| 000013F0: 97 44 31 2C 5A 34 3A 97 44 31 AA 44 49 2C 42 43 |.D1,Z4:.D1.DI,BC| 00001400: 3A 89 32 38 35 30 00 1F 1C 22 0B 44 31 B2 44 31 |:.2850...".D1.D1| 00001410: AA 33 3A 82 3A 44 31 B2 44 31 AA 39 36 3A 82 00 |.3:.:D1.D1.96:..| 00001420: 35 1C 2C 0B 8F 20 2D 2D 20 55 50 44 41 54 45 20 |5.,.. -- UPDATE | 00001430: 53 43 4F 52 45 00 53 1C 36 0B 99 22 13 11 11 11 |SCORE.S.6.."....| 00001440: 11 11 22 3B 53 52 24 3B 43 31 3B 22 20 20 20 22 |..";SR$;C1;" "| 00001450: 3B 50 31 00 59 1C B8 0B 8E 00 00 00 31 |;P1.Y.......1 |
..(.... -- CHECKERS FOR THE COMMODORE 64
.M.... -- GO INIALIZE AND PRINT BOARD.\.
...1900:.200.N....A$:.A$."".20.T........
.. -- COMPUTERS SCAN.....U.X.A:V.Y.B:.U.
0.U.7.V.0.V.7.80.F.(..S(U,V).0..90:.80.W
.2..S(U,V).0.80...<.U.U.A:V.V.B::.U.0.V.
0.U.7.V.7.80...F..S(U,V).0..90...P...-.Z
..V.0.S(X,Y)..1.Q.Q.2.A._...(Y.V).2.Q.Q.
5.P.D..Y.7.Q.Q.2.C.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.1...Q.0:
..V...U.X.A:V.Y.B:.U.0.U.7.V.0.V.7.160.Y
....S(U,V).0.S(X.A.2,Y.B.2).0..90.. ...
..G.. -- PLAYER MAIN LOOP...H..2700.J...
.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.:.R..F.20.Z.0.250:. -- NULL MO
VE.Z....F.29..L1.7.L1.L1.1:LO.LO.3.~....
F.145..U1.7.U1.U1.1:LO.LO.3.CD...L..F.17
..U1.0.U1.U1.1:LO.LO.3.CD......270......
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.W
...LM.L1.1:UP.U1.1:.L1..1.U1..6..S(LM,UP
).0.509.....LP.L1.1:.L1..6.U1..6..S(LP,U
P).0.509......S(L1,U1).1.499.....UM.U1.1
:.L1..1.U1..1..S(LM,UM).0.509......L1..6
.U1..1..S(LP,UM).0.509......L1..2.U1..5.
.S(LM,UP).0.S(L1.2,U1.2).0.509.>....L1..
5.U1..5..S(LP,UP).0.S(L1.2,U1.2).0.509.S
....S(L1,U1).1.1040......L1..2.U1..2..S(
LM,UM).0.S(L1.2,U1.2).0.509......L1..5.U
1..2..S(LP,UM).0.S(L1.2,U1.2).0.509.I...
.1040: . -- ERROR.....KI.0:L2.L1:U2.U1:.
F1.1.F1.3:F2.4:.270.0...E.R1(1):H.R1(2):
A.R1(3):B.R1(4):.S(E,H).4.S(A,B)..0.1040
.L.....(E.A).2..(H.B).2.1040.V.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).O.?..B.7.S(A,B).2.
..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.
W.F.LP.L1.1:.L1..5.U1..5..S(LP,UP).0.S(L
1.2,U1.2).0.600.K.G..S(L1,U1).1.690...H.
UM.U1.1:.L1..2.U1..2..S(LM,UM).0.S(L1.2,
U1.2).0.600.S.I..L1..5.U1..2..S(LP,UM).0
.S(L1.2,U1.2).0.600...J..690...X.D$.AM$:
.1800:.270...V.A1.R1(F1):B1.R1(F2).6....
S(A1,B1)..0..(A1.A)..2..(B1.B)..2.1040.Q
...E.A:H.B:A.A1:B.B1:.560.C....B.7.S(A,B
).2.....2700:. -- UPDATE BOARD...... --
COMPUTERS TURN.....D$.MT$:.1800.I.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:.73
0......J:RM(I).RM:.I.?....XI.0.7:X.RM(XI
):.Y.0.7:.S(X,Y)..1.780.C....S(X,Y)..1..
A..1.1.2:B.G:.30:.A......S(X,Y)..2..A..1
.1.2:.B..1.1.2:.30:.B,A......Y,XI......R
(0)..99.P1.12:.230: . -- LOOSE.K. .R(0).
.99...*..R(4).0.S(R(3),R(4))..2:.830...4
.S(R(3),R(4)).S(R(1),R(2)).2.>.S(R(1),R(
2)).0:..(R(1).R(3))..2.200._.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...F..A:.R(0)...99.R(0)..99:.810...P.
.200.....D$.C$:.1800:.T.1.2000:.:.220...
@..1800:.I.1.5000:..=.J.D$."WANT TO PLAY
AGAIN":.1800.P.T..20:.A$."Y". ..W.^..".
..........THANKS FOR PLAYING":......D$."
".D$." "......".";:.I.1.24:.
".";:.......RT$;D$;:....L..".....":RT$."
..........."...M..53280,0:.53281,11.....
.RT$;". .#. .#. .#. .#. .#. .#. .#. ".J.
...".";RT$;"%. . . . . . . . . . . . . .
'".T....RT$;".C. .H. .E. .C. .K. .E. .R.
.S"......".";RT$;"%. . . . . . . . . .
. . . .'".K....RT$;". .$. .$. .$. .$. .$
. .$. .$. "......"......NAME PLEASE";PL$
...P.."........WANT INSTRUCTIONS (Y/N)?"
:.20.&....A$.."Y".2300.1....G(14).Z...."
.....MOVE FLASHING .?. TO MAN YOU".~....
"...WANT TO MOVE (WITH CURSOR"......"...
CONTROLS).."......"...PRESS THE CARRIAGE
RETURN."... .."...THEN MOVE THE FLASHIN
G .@."...*.."...TO WHERE YOU WANT TO GO.
".'.4.."...PRESS THE CARRIAGE RETURN..".
J.>.."...IF YOU HAD ANOTHER MOVE,".M.H..
"...MOVE THIS MAN AND FOLLOW"...R.."...W
ITH A CARRIAGE RETURN.."...\.."...IF YOU
DO NOT HAVE A MOVE,".W.F.."...PRESS SPA
CE BAR TO SKIP"...P.."...A TURN..":."...
HOME ENDS THE GAME.".-...SC.1027:CC.80:S
U.SC:CD.CC.2:DI.54272.T.$.Z1.87:Z2.102:Z
3.81:Z4.32:RC.2:BC.0......"........";PL$
;". DO YOU WISH RED OR BLACK?. "...8..20
:.A$.."R".A$.."B".2360.U.B..A$."B".Z1.10
2: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).).V..1,4,
1,4,0,4,-1,4,4,1,4,0,4,-1,4,-1,15.I.`..I
.0.7:.J.0.7:.X:.X.15.2420.\.J.S(I,J).X:.
2430.J.T..:.S(I,J).S.~..J,I.....T$."YOUR
TURN":C$.".TRY AGAIN.":MT$."MY TURN":AM
$."ANOTHER MOVE".....C6$."C-64":SR$."...
........................."......53281,15
:.G(142).....G..1:R(0)..99.E.(..".";: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$;...P..L.1.
4:.".";B$;R$;:.:....Z..K,I:.".";...D..".
..";SR$;C6$;" ";PL$:I.SU.3.CD.27:J.SU.3.
CD.32...X..I,Z2:.I.DI,RC:.J,Z1:.J.DI,BC.
......+.... -- UPDATE BOARD.K...D1.SU.CD
.1:.J.7.0..1:.I.0.7.P....S(I,J).0..D1,16
0:.D1.DI,0:.2850... ..S(I,J).1..D1,Z1:.D
1.DI,RC:.2850......S(I,J)..1..D1,Z2:.D1.
DI,BC:.2850......S(I,J).2..D1,Z3:.D1.DI,
RC:.2850......S(I,J)..2..D1,Z4:.D1.DI,BC
:.2850...".D1.D1.3:.:D1.D1.96:..5.,.. --
UPDATE SCORE.S.6.."......";SR$;C1;" "
;P1.Y.......1
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL