CHESS CLOCK
FILE INFORMATION
FILENAME(S): CHESS CLOCK
FILE TYPE(S): PRG
FILE SIZE: 3.1K
FIRST SEEN: 2025-11-30 21:23:00
APPEARS ON: 1 disk(s)
FILE HASH
569bf00c4bb8a39956f503251e24236fdc9ecd6f6122435e8bc2da74e2fd36ec
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| C64 HULP 54 1 | CHESS CLOCK | PRG | DuncanTwain | 1 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 24 08 01 00 8F 20 2A 2A 2A 2A 2A 2A 2A 2A |..$.... ********|
00000010: 43 48 45 53 53 20 43 4C 4F 43 4B 2A 2A 2A 2A 2A |CHESS CLOCK*****|
00000020: 2A 2A 2A 2A 00 47 08 02 00 8F 20 2A 2A 2A 2A 2A |****.G.... *****|
00000030: 42 59 20 47 45 4F 52 47 45 20 43 41 52 54 45 52 |BY GEORGE CARTER|
00000040: 2A 2A 2A 2A 2A 2A 2A 00 6A 08 03 00 8F 20 2A 2A |*******.j.... **|
00000050: 53 45 54 20 56 41 52 49 41 42 4C 45 53 20 41 4E |SET VARIABLES AN|
00000060: 44 20 53 43 52 45 45 4E 2A 2A 00 9F 08 06 00 99 |D SCREEN**......|
00000070: C7 28 31 34 37 29 3A 97 35 33 32 38 30 2C 36 3A |.(147):.53280,6:|
00000080: 86 59 24 28 32 35 29 3A 86 44 24 28 33 30 29 3A |.Y$(25):.D$(30):|
00000090: 97 36 35 30 2C 36 34 3A 86 46 24 28 31 35 29 00 |.650,64:.F$(15).|
000000A0: E3 08 08 00 48 24 B2 22 48 4F 55 52 27 53 22 3A |....H$."HOUR'S":|
000000B0: 4D 24 B2 22 4D 49 4E 55 54 45 27 53 22 3A 53 24 |M$."MINUTE'S":S$|
000000C0: B2 22 53 45 43 4F 4E 44 27 53 22 3A 81 43 B2 30 |."SECOND'S":.C.0|
000000D0: A4 31 34 3A 87 4E 3A 46 24 28 43 29 B2 C7 28 4E |.14:.N:F$(C)..(N|
000000E0: 29 3A 82 00 08 09 0A 00 56 B2 35 34 32 37 32 3A |):......V.54272:|
000000F0: 97 56 AA 31 2C 31 33 30 3A 97 56 AA 35 2C 39 3A |.V.1,130:.V.5,9:|
00000100: 97 56 AA 31 35 2C 33 30 00 38 09 0C 00 59 24 28 |.V.15,30.8...Y$(|
00000110: 30 29 B2 46 24 28 31 31 29 3A 81 43 B2 31 A4 32 |0).F$(11):.C.1.2|
00000120: 34 3A 59 24 28 43 29 B2 59 24 28 43 AB 31 29 AA |4:Y$(C).Y$(C.1).|
00000130: 46 24 28 31 32 29 3A 82 00 70 09 0E 00 81 43 B2 |F$(12):..p....C.|
00000140: 31 A4 31 30 3A 4C 24 28 43 29 B2 4C 24 28 43 AB |1.10:L$(C).L$(C.|
00000150: 31 29 AA 46 24 28 31 33 29 3A 52 24 28 43 29 B2 |1).F$(13):R$(C).|
00000160: 52 24 28 43 AB 31 29 AA 46 24 28 31 34 29 3A 82 |R$(C.1).F$(14):.|
00000170: 00 A4 09 10 00 81 43 B2 31 A4 39 3A 44 24 28 43 |......C.1.9:D$(C|
00000180: 29 B2 44 24 28 43 AB 31 29 AA 46 24 28 36 29 3A |).D$(C.1).F$(6):|
00000190: 82 3A 44 24 28 30 29 B2 46 24 28 31 32 29 AA 4C |.:D$(0).F$(12).L|
000001A0: 24 28 36 29 00 D7 09 12 00 81 43 B2 31 31 A4 33 |$(6)......C.11.3|
000001B0: 30 3A 44 24 28 43 29 B2 44 24 28 43 AB 31 29 AA |0:D$(C).D$(C.1).|
000001C0: 46 24 28 38 29 AA 44 24 28 31 29 AA 46 24 28 39 |F$(8).D$(1).F$(9|
000001D0: 29 3A 82 3A 43 B2 30 00 EB 09 14 00 87 4E 3A 8B |):.:C.0......N:.|
000001E0: 4E B2 AB 31 AF 43 B2 39 A7 32 36 00 FF 09 16 00 |N..1.C.9.26.....|
000001F0: 8B 4E B2 AB 31 A7 43 B2 43 AA 31 3A 89 32 30 00 |.N..1.C.C.1:.20.|
00000200: 19 0A 18 00 4E 24 28 43 29 B2 4E 24 28 43 29 AA |....N$(C).N$(C).|
00000210: 44 24 28 4E 29 3A 89 32 30 00 38 0A 1A 00 81 43 |D$(N):.20.8....C|
00000220: B2 32 A4 36 3A 87 41 28 43 29 3A 82 3A 4C 24 B2 |.2.6:.A(C):.:L$.|
00000230: 22 30 30 30 30 30 30 22 00 82 0A 1C 00 99 59 24 |"000000"......Y$|
00000240: 28 38 29 3B 52 24 28 31 29 3B 46 24 28 38 29 3B |(8);R$(1);F$(8);|
00000250: 46 24 28 32 29 3B 48 24 3B 52 24 28 33 29 3B 44 |F$(2);H$;R$(3);D|
00000260: 24 28 32 29 3B 4D 24 3B 44 24 28 33 29 3B 52 24 |$(2);M$;D$(3);R$|
00000270: 28 33 29 3B 44 24 28 32 29 3B 53 24 3B 44 24 28 |(3);D$(2);S$;D$(|
00000280: 33 29 00 B6 0A 1E 00 99 59 24 28 31 38 29 3B 46 |3)......Y$(18);F|
00000290: 24 28 38 29 3B 22 54 49 4D 45 20 4C 49 4D 49 54 |$(8);"TIME LIMIT|
000002A0: 22 3B 52 24 28 32 29 3B 46 24 28 31 30 29 3B 44 |";R$(2);F$(10);D|
000002B0: 24 28 32 36 29 3B 00 D9 0A 20 00 99 52 24 28 32 |$(26);... ..R$(2|
000002C0: 29 3B 46 24 28 32 29 3B 46 24 28 38 29 3B 22 4D |);F$(2);F$(8);"M|
000002D0: 4F 56 45 53 20 46 4F 52 22 00 1B 0B 22 00 99 48 |OVES FOR"..."..H|
000002E0: 24 3B 52 24 28 32 29 3B 22 3D 30 22 3B 52 24 28 |$;R$(2);"=0";R$(|
000002F0: 34 29 3B 46 24 28 30 29 3B 22 43 48 45 53 53 20 |4);F$(0);"CHESS |
00000300: 20 43 4C 4F 43 4B 22 3B 46 24 28 32 29 3B 52 24 | CLOCK";F$(2);R$|
00000310: 28 34 29 3B 22 57 48 49 54 45 22 00 51 0B 24 00 |(4);"WHITE".Q.$.|
00000320: 99 4D 24 3B 22 3D 30 30 22 3B 52 24 28 31 29 3B |.M$;"=00";R$(1);|
00000330: 46 24 28 31 30 29 3B 44 24 28 32 36 29 3B 46 24 |F$(10);D$(26);F$|
00000340: 28 32 29 3B 52 24 28 32 29 3B 22 42 4C 41 43 4B |(2);R$(2);"BLACK|
00000350: 22 00 5F 0B 26 00 99 53 24 3B 22 3D 30 30 22 00 |"._.&..S$;"=00".|
00000360: 92 0B 28 00 99 52 24 28 35 29 3B 46 24 28 38 29 |..(..R$(5);F$(8)|
00000370: 3B 22 20 48 49 54 20 53 50 41 43 45 20 42 41 52 |;" HIT SPACE BAR|
00000380: 20 41 46 54 45 52 20 45 41 43 48 20 4D 4F 56 45 | AFTER EACH MOVE|
00000390: 20 22 00 C3 0B 2A 00 99 22 48 49 54 27 46 31 27 | "...*.."HIT'F1'|
000003A0: 53 54 41 52 54 20 4F 52 20 45 58 49 54 2E 27 46 |START OR EXIT.'F|
000003B0: 33 27 53 45 54 2F 41 4C 54 45 52 20 4C 49 4D 49 |3'SET/ALTER LIMI|
000003C0: 54 22 3B 00 F1 0B 2C 00 99 22 27 46 35 27 50 41 |T";...,.."'F5'PA|
000003D0: 55 53 45 2F 43 4F 4E 54 49 4E 55 45 2E 27 46 37 |USE/CONTINUE.'F7|
000003E0: 2F 46 31 27 53 50 45 45 44 20 43 48 45 53 53 22 |/F1'SPEED CHESS"|
000003F0: 3B 00 1B 0C 2E 00 99 46 24 28 30 29 3B 59 24 28 |;......F$(0);Y$(|
00000400: 36 29 3B 52 24 28 38 29 3B 44 24 28 31 31 29 3B |6);R$(8);D$(11);|
00000410: A6 31 35 29 3B 44 24 28 31 31 29 00 47 0C 30 00 |.15);D$(11).G.0.|
00000420: 99 46 24 28 31 30 29 3B 59 24 28 31 36 29 3B 52 |.F$(10);Y$(16);R|
00000430: 24 28 38 29 3B 44 24 28 31 31 29 3B A6 31 35 29 |$(8);D$(11);.15)|
00000440: 3B 44 24 28 31 31 29 00 50 0C 32 00 8D 31 30 34 |;D$(11).P.2..104|
00000450: 00 6E 0C 34 00 8F 20 2A 2A 43 4C 4F 43 4B 20 41 |.n.4.. **CLOCK A|
00000460: 4E 44 20 4B 45 59 20 43 48 45 43 4B 2A 2A 00 A2 |ND KEY CHECK**..|
00000470: 0C 36 00 54 24 B2 54 49 24 3A 81 43 B2 32 A4 36 |.6.T$.TI$:.C.2.6|
00000480: 3A 99 59 24 28 54 29 3B A3 41 28 43 29 29 3B 4E |:.Y$(T);.A(C));N|
00000490: 24 28 C5 28 CA 28 54 24 2C 43 2C 31 29 29 29 3A |$(.(.(T$,C,1))):|
000004A0: 82 43 00 B3 0C 38 00 8B 54 24 B2 B1 4C 24 A7 8D |.C...8..T$..L$..|
000004B0: 31 33 36 00 BB 0C 3A 00 A1 41 24 00 CE 0C 3C 00 |136...:..A$...<.|
000004C0: 8B 41 24 B2 44 24 28 31 29 A7 8D 31 31 32 00 E9 |.A$.D$(1)..112..|
000004D0: 0C 3E 00 8B 41 24 B2 46 24 28 31 29 A7 8D 38 30 |.>..A$.F$(1)..80|
000004E0: 3A 8D 31 30 34 3A 89 35 34 00 FF 0C 40 00 8B 41 |:.104:.54...@..A|
000004F0: 24 B2 46 24 28 33 29 A7 8D 38 30 3A 89 35 34 00 |$.F$(3)..80:.54.|
00000500: 11 0D 42 00 8B 41 24 B2 46 24 28 35 29 A7 8D 37 |..B..A$.F$(5)..7|
00000510: 34 00 2D 0D 44 00 8B 41 24 B2 46 24 28 37 29 A7 |4.-.D..A$.F$(7).|
00000520: 8D 38 30 3A 8D 31 30 34 3A 89 31 32 30 00 3C 0D |.80:.104:.120.<.|
00000530: 46 00 8B 54 24 B2 B1 4C 24 A7 35 38 00 44 0D 48 |F..T$..L$.58.D.H|
00000540: 00 89 35 34 00 60 0D 4A 00 8F 2A 2A 2A 2A 50 41 |..54.`.J..****PA|
00000550: 55 53 45 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |USE*************|
00000560: 00 7B 0D 4C 00 A1 41 24 3A 8B 41 24 B2 46 24 28 |.{.L..A$:.A$.F$(|
00000570: 35 29 A7 54 49 24 B2 54 24 3A 8E 00 84 0D 4E 00 |5).TI$.T$:....N.|
00000580: 89 20 37 36 00 9F 0D 50 00 8F 20 2A 2A 54 49 4D |. 76...P.. **TIM|
00000590: 45 20 4C 49 4D 49 54 20 49 4E 50 55 54 2A 2A 00 |E LIMIT INPUT**.|
000005A0: D0 0D 52 00 99 59 24 28 31 37 29 3B A3 31 31 29 |..R..Y$(17);.11)|
000005B0: 3B 46 24 28 30 29 3B 22 5F 54 59 50 45 20 49 4E |;F$(0);"_TYPE IN|
000005C0: 20 4E 45 57 20 54 49 4D 45 20 4C 49 4D 49 54 22 | NEW TIME LIMIT"|
000005D0: 00 F0 0D 54 00 4C 24 B2 22 30 22 3A 50 24 B2 59 |...T.L$."0":P$.Y|
000005E0: 24 28 31 39 29 AA 52 24 28 39 29 3A 57 B2 35 33 |$(19).R$(9):W.53|
000005F0: 00 2B 0E 56 00 57 24 28 30 29 B2 46 24 28 31 32 |.+.V.W$(0).F$(12|
00000600: 29 3A 57 24 28 31 29 B2 52 24 28 31 29 3A 57 24 |):W$(1).R$(1):W$|
00000610: 28 32 29 B2 57 24 28 30 29 AA 4C 24 28 31 29 3A |(2).W$(0).L$(1):|
00000620: 57 24 28 33 29 B2 57 24 28 31 29 00 45 0E 58 00 |W$(3).W$(1).E.X.|
00000630: 81 43 B2 30 A4 34 3A 8B 57 B2 35 33 A7 57 B2 35 |.C.0.4:.W.53.W.5|
00000640: 37 3A 89 39 32 00 54 0E 5A 00 8B 57 B2 35 37 A7 |7:.92.T.Z..W.57.|
00000650: 57 B2 35 33 00 89 0E 5C 00 A1 41 24 3A 8B 41 24 |W.53...\..A$:.A$|
00000660: B2 22 22 A7 99 50 24 3B 46 24 28 31 30 29 3B 44 |.""..P$;F$(10);D|
00000670: 24 28 31 31 29 3B 4C 24 28 31 29 3B 46 24 28 30 |$(11);L$(1);F$(0|
00000680: 29 3B 22 3F 22 3A 89 39 32 00 A2 0E 5E 00 8B C6 |);"?":.92...^...|
00000690: 28 41 24 29 B3 34 38 B0 C6 28 41 24 29 B1 57 A7 |(A$).48..(A$).W.|
000006A0: 39 32 00 CA 0E 60 00 99 50 24 3B 46 24 28 32 29 |92...`..P$;F$(2)|
000006B0: 3B 41 24 3A 4C 24 B2 4C 24 AA 41 24 3A 50 24 B2 |;A$:L$.L$.A$:P$.|
000006C0: 50 24 AA 57 24 28 43 29 3A 82 00 05 0F 62 00 99 |P$.W$(C):....b..|
000006D0: 59 24 28 31 37 29 3B A3 31 31 29 3B 46 24 28 30 |Y$(17);.11);F$(0|
000006E0: 29 3B 22 50 52 45 53 53 27 46 31 27 54 4F 20 53 |);"PRESS'F1'TO S|
000006F0: 54 41 52 54 2F 43 4F 4E 54 49 4E 55 45 2E 22 3B |TART/CONTINUE.";|
00000700: 46 24 28 54 29 00 1C 0F 64 00 A1 41 24 3A 8B 41 |F$(T)...d..A$:.A|
00000710: 24 B3 B1 46 24 28 31 29 A7 31 30 30 00 4D 0F 66 |$..F$(1).100.M.f|
00000720: 00 99 59 24 28 31 37 29 3B A3 31 31 29 3B 44 24 |..Y$(17);.11);D$|
00000730: 28 39 29 3B 44 24 28 39 29 3B 44 24 28 39 29 3A |(9);D$(9);D$(9):|
00000740: 54 49 24 B2 54 24 3A 8D 31 33 36 3A 8E 00 66 0F |TI$.T$:.136:..f.|
00000750: 68 00 8F 20 2A 2A 2A 53 45 54 20 4E 45 57 20 47 |h.. ***SET NEW G|
00000760: 41 4D 45 2A 2A 2A 00 A9 0F 6A 00 81 20 43 B2 31 |AME***...j.. C.1|
00000770: 39 A4 32 30 3A 99 46 24 28 32 29 3B 59 24 28 43 |9.20:.F$(2);Y$(C|
00000780: 29 3B A3 33 36 29 3B 22 30 20 20 22 3B 46 24 28 |);.36);"0 ";F$(|
00000790: 31 30 29 3A 82 3A 4D 28 30 29 B2 30 3A 4D 28 31 |10):.:M(0).0:M(1|
000007A0: 30 29 B2 30 3A 54 B2 31 30 00 E0 0F 6C 00 81 58 |0).0:T.10...l..X|
000007B0: B2 31 A4 32 3A 81 43 B2 32 A4 36 3A 99 59 24 28 |.1.2:.C.2.6:.Y$(|
000007C0: 54 29 3B A3 41 28 43 29 29 3B 4E 24 28 30 29 3A |T);.A(C));N$(0):|
000007D0: 82 43 3A 54 B2 30 3A 99 46 24 28 54 29 3A 82 58 |.C:T.0:.F$(T):.X|
000007E0: 00 0C 10 6E 00 54 24 28 30 29 B2 22 30 30 30 30 |...n.T$(0)."0000|
000007F0: 30 30 22 3A 54 24 28 31 30 29 B2 54 24 28 30 29 |00":T$(10).T$(0)|
00000800: 3A 54 49 24 B2 54 24 28 30 29 3A 8E 00 26 10 70 |:TI$.T$(0):..&.p|
00000810: 00 8F 20 2A 2A 2A 43 48 41 4E 47 45 20 50 4C 41 |.. ***CHANGE PLA|
00000820: 59 45 52 2A 2A 2A 00 3F 10 72 00 54 24 28 54 29 |YER***.?.r.T$(T)|
00000830: B2 54 24 3A 4D 28 54 29 B2 4D 28 54 29 AA 31 00 |.T$:M(T).M(T).1.|
00000840: 77 10 74 00 8B 54 B2 30 A7 54 B2 31 30 3A 54 49 |w.t..T.0.T.10:TI|
00000850: 24 B2 54 24 28 54 29 3A 99 46 24 28 32 29 3B 59 |$.T$(T):.F$(2);Y|
00000860: 24 28 31 39 29 3B A3 33 35 29 3B 4D 28 30 29 3B |$(19);.35);M(0);|
00000870: 46 24 28 54 29 3A 8E 00 B0 10 76 00 8B 54 B2 31 |F$(T):....v..T.1|
00000880: 30 A7 54 B2 30 3A 54 49 24 B2 54 24 28 54 29 3A |0.T.0:TI$.T$(T):|
00000890: 99 46 24 28 32 29 3B 59 24 28 32 30 29 3B A3 33 |.F$(2);Y$(20);.3|
000008A0: 35 29 3B 4D 28 31 30 29 3B 46 24 28 54 29 3A 8E |5);M(10);F$(T):.|
000008B0: 00 C9 10 78 00 8F 20 20 2A 2A 2A 53 50 45 45 44 |...x.. ***SPEED|
000008C0: 20 43 48 45 53 53 2A 2A 2A 00 DA 10 7A 00 54 49 | CHESS***...z.TI|
000008D0: 24 B2 22 30 30 30 30 30 30 22 00 13 11 7C 00 54 |$."000000"...|.T|
000008E0: 24 B2 54 49 24 3A 81 20 43 B2 34 A4 36 3A 99 20 |$.TI$:. C.4.6:. |
000008F0: 59 24 28 54 29 3B A3 41 28 43 29 29 3B 4E 24 28 |Y$(T);.A(C));N$(|
00000900: C5 28 CA 28 54 24 2C 43 2C 31 29 29 29 3A 82 3A |.(.(T$,C,1))):.:|
00000910: A1 41 24 00 2B 11 7E 00 8B 41 24 B2 46 24 28 31 |.A$.+.~..A$.F$(1|
00000920: 29 A7 54 24 B2 4C 24 3A 89 35 38 00 3D 11 80 00 |).T$.L$:.58.=...|
00000930: 8B 41 24 B2 46 24 28 35 29 A7 8D 37 34 00 4F 11 |.A$.F$(5)..74.O.|
00000940: 82 00 8B 41 24 B2 46 24 28 33 29 A7 8D 38 30 00 |...A$.F$(3)..80.|
00000950: 6A 11 84 00 8B 54 24 B2 B1 4C 24 A7 8D 31 33 36 |j....T$..L$..136|
00000960: 3A 8D 31 31 32 3A 89 31 32 32 00 73 11 86 00 89 |:.112:.122.s....|
00000970: 31 32 34 00 88 11 88 00 8F 20 20 20 20 2A 2A 2A |124...... ***|
00000980: 53 4F 55 4E 44 2A 2A 2A 00 BA 11 8A 00 97 56 AA |SOUND***......V.|
00000990: 32 34 2C 31 35 3A 97 56 AA 34 2C 32 31 3A 81 43 |24,15:.V.4,21:.C|
000009A0: B2 31 A4 32 35 30 3A 82 3A 97 56 AA 34 2C 32 30 |.1.250:.:.V.4,20|
000009B0: 3A 97 56 AA 32 34 2C 30 3A 8E 00 D1 11 8C 00 8F |:.V.24,0:.......|
000009C0: 20 20 2A 2A 2A 43 48 52 24 20 44 41 54 41 2A 2A | ***CHR$ DATA**|
000009D0: 2A 00 0A 12 8E 00 83 35 2C 31 33 33 2C 31 35 35 |*......5,133,155|
000009E0: 2C 31 33 34 2C 36 33 2C 31 33 35 2C 33 32 2C 31 |,134,63,135,32,1|
000009F0: 33 36 2C 31 38 2C 31 34 36 2C 31 34 34 2C 31 39 |36,18,146,144,19|
00000A00: 2C 31 37 2C 31 35 37 2C 32 39 00 22 12 90 00 8F |,17,157,29."....|
00000A10: 20 20 2A 2A 2A 44 49 47 49 54 20 44 41 54 41 2A | ***DIGIT DATA*|
00000A20: 2A 2A 00 5E 12 92 00 83 31 36 2C 2C 31 31 2C 34 |**.^....16,,11,4|
00000A30: 2C 31 31 2C 2C 31 31 2C 34 2C 31 31 2C 2C 31 31 |,11,,11,4,11,,11|
00000A40: 2C 34 2C 31 31 2C 2C 31 31 2C 34 2C 31 31 2C 2C |,4,11,,11,4,11,,|
00000A50: 31 31 2C 34 2C 31 31 2C 2C 31 36 2C 2D 31 00 9D |11,4,11,,16,-1..|
00000A60: 12 94 00 83 32 2C 31 32 2C 32 2C 2C 33 2C 31 31 |....2,12,2,,3,11|
00000A70: 2C 32 2C 2C 33 2C 31 31 2C 32 2C 2C 33 2C 31 31 |,2,,3,11,2,,3,11|
00000A80: 2C 32 2C 2C 33 2C 31 32 2C 31 2C 2C 33 2C 31 32 |,2,,3,12,1,,3,12|
00000A90: 2C 31 2C 2C 33 2C 31 32 2C 31 2C 2D 31 00 C8 12 |,1,,3,12,1,-1...|
00000AA0: 96 00 83 31 36 2C 2C 34 2C 31 32 2C 2C 34 2C 31 |...16,,4,12,,4,1|
00000AB0: 32 2C 2C 31 36 2C 2C 31 32 2C 34 2C 2C 31 32 2C |2,,16,,12,4,,12,|
00000AC0: 34 2C 2C 31 36 2C 2D 31 00 FD 12 98 00 83 31 35 |4,,16,-1......15|
00000AD0: 2C 31 2C 2C 34 2C 31 31 2C 31 2C 2C 34 2C 31 31 |,1,,4,11,1,,4,11|
00000AE0: 2C 31 2C 2C 31 2C 31 34 2C 31 2C 2C 34 2C 31 32 |,1,,1,14,1,,4,12|
00000AF0: 2C 2C 34 2C 31 32 2C 2C 31 36 2C 2D 31 00 31 13 |,,4,12,,16,-1.1.|
00000B00: 9A 00 83 31 32 2C 34 2C 2C 31 32 2C 34 2C 2C 31 |...12,4,,12,4,,1|
00000B10: 32 2C 34 2C 2C 31 32 2C 32 2C 31 31 2C 31 2C 2C |2,4,,12,2,11,1,,|
00000B20: 31 36 2C 2C 34 2C 31 32 2C 2C 34 2C 31 32 2C 2D |16,,4,12,,4,12,-|
00000B30: 31 00 60 13 9C 00 83 31 35 2C 31 2C 2C 31 31 2C |1.`....15,1,,11,|
00000B40: 35 2C 2C 31 31 2C 35 2C 2C 31 35 2C 31 2C 2C 34 |5,,11,5,,15,1,,4|
00000B50: 2C 31 32 2C 2C 34 2C 31 32 2C 2C 31 36 2C 2D 31 |,12,,4,12,,16,-1|
00000B60: 00 95 13 9E 00 83 31 35 2C 31 2C 2C 31 31 2C 33 |......15,1,,11,3|
00000B70: 2C 31 31 2C 31 2C 2C 31 31 2C 35 2C 2C 31 31 2C |,11,1,,11,5,,11,|
00000B80: 35 2C 2C 31 36 2C 2C 31 31 2C 33 2C 31 32 2C 2C |5,,16,,11,3,12,,|
00000B90: 31 36 2C 2D 31 00 CF 13 A0 00 83 31 36 2C 2C 31 |16,-1......16,,1|
00000BA0: 31 2C 34 2C 31 31 2C 2C 33 2C 31 33 2C 2C 33 2C |1,4,11,,3,13,,3,|
00000BB0: 31 31 2C 32 2C 2C 33 2C 31 31 2C 32 2C 2C 33 2C |11,2,,3,11,2,,3,|
00000BC0: 31 31 2C 32 2C 2C 33 2C 31 31 2C 32 2C 2D 31 00 |11,2,,3,11,2,-1.|
00000BD0: 12 14 A2 00 83 31 2C 31 34 2C 31 2C 2C 31 2C 31 |.....1,14,1,,1,1|
00000BE0: 31 2C 32 2C 31 31 2C 31 2C 2C 31 2C 31 31 2C 32 |1,2,11,1,,1,11,2|
00000BF0: 2C 31 31 2C 31 2C 2C 31 36 2C 2C 31 31 2C 34 2C |,11,1,,16,,11,4,|
00000C00: 31 31 2C 2C 31 31 2C 34 2C 31 31 2C 2C 31 36 2C |11,,11,4,11,,16,|
00000C10: 2D 31 00 53 14 A4 00 83 31 2C 31 34 2C 31 2C 2C |-1.S....1,14,1,,|
00000C20: 31 2C 31 31 2C 32 2C 31 31 2C 31 2C 2C 31 2C 31 |1,11,2,11,1,,1,1|
00000C30: 31 2C 32 2C 31 31 2C 31 2C 2C 31 2C 31 35 2C 2C |1,2,11,1,,1,15,,|
00000C40: 34 2C 31 32 2C 2C 34 2C 31 32 2C 2C 34 2C 31 32 |4,12,,4,12,,4,12|
00000C50: 2C 2D 31 00 66 14 A6 00 83 31 2C 31 30 2C 31 37 |,-1.f....1,10,17|
00000C60: 2C 32 36 2C 33 33 00 6C 14 A8 00 80 00 00 00 |,26,33.l....... |
..$.... ********CHESS CLOCK*********.G..
.. *****BY GEORGE CARTER*******.J.... **
SET VARIABLES AND SCREEN**......G(147):.
53280,6:.Y$(25):.D$(30):.650,64:.F$(15).
....H$."HOUR'S":M$."MINUTE'S":S$."SECOND
'S":.C.0.14:.N:F$(C).G(N):......V.54272:
.V.1,130:.V.5,9:.V.15,30.8...Y$(0).F$(11
):.C.1.24:Y$(C).Y$(C.1).F$(12):..P....C.
1.10:L$(C).L$(C.1).F$(13):R$(C).R$(C.1).
F$(14):.......C.1.9:D$(C).D$(C.1).F$(6):
.:D$(0).F$(12).L$(6).W....C.11.30:D$(C).
D$(C.1).F$(8).D$(1).F$(9):.:C.0......N:.
N..1.C.9.26......N..1.C.C.1:.20.....N$(C
).N$(C).D$(N):.20.8....C.2.6:.A(C):.:L$.
"000000"......Y$(8);R$(1);F$(8);F$(2);H$
;R$(3);D$(2);M$;D$(3);R$(3);D$(2);S$;D$(
3)......Y$(18);F$(8);"TIME LIMIT";R$(2);
F$(10);D$(26);.Y. ..R$(2);F$(2);F$(8);"M
OVES FOR"..."..H$;R$(2);"=0";R$(4);F$(0)
;"CHESS CLOCK";F$(2);R$(4);"WHITE".Q.$.
.M$;"=00";R$(1);F$(10);D$(26);F$(2);R$(2
);"BLACK"._.&..S$;"=00"...(..R$(5);F$(8)
;" HIT SPACE BAR AFTER EACH MOVE ".C.*..
"HIT'F1'START OR EXIT.'F3'SET/ALTER LIMI
T";...,.."'F5'PAUSE/CONTINUE.'F7/F1'SPEE
D CHESS";......F$(0);Y$(6);R$(8);D$(11);
.15);D$(11).G.0..F$(10);Y$(16);R$(8);D$(
11);.15);D$(11).P.2..104.N.4.. **CLOCK A
ND KEY CHECK**...6.T$.TI$:.C.2.6:.Y$(T);
.A(C));N$(E(J(T$,C,1))):.C...8..T$..L$..
136...:..A$.N.<..A$.D$(1)..112...>..A$.F
$(1)..80:.104:.54...@..A$.F$(3)..80:.54.
..B..A$.F$(5)..74.-.D..A$.F$(7)..80:.104
:.120.<.F..T$..L$.58.D.H..54.`.J..****PA
USE*************.{.L..A$:.A$.F$(5).TI$.T
$:....N.. 76...P.. **TIME LIMIT INPUT**.
P.R..Y$(17);.11);F$(0);"_TYPE IN NEW TIM
E LIMIT"...T.L$."0":P$.Y$(19).R$(9):W.53
.+.V.W$(0).F$(12):W$(1).R$(1):W$(2).W$(0
).L$(1):W$(3).W$(1).E.X..C.0.4:.W.53.W.5
7:.92.T.Z..W.57.W.53...\..A$:.A$.""..P$;
F$(10);D$(11);L$(1);F$(0);"?":.92...^..F
(A$).48.F(A$).W.92.J.`..P$;F$(2);A$:L$.L
$.A$:P$.P$.W$(C):....B..Y$(17);.11);F$(0
);"PRESS'F1'TO START/CONTINUE.";F$(T)...
D..A$:.A$..F$(1).100.M.F..Y$(17);.11);D$
(9);D$(9);D$(9):TI$.T$:.136:..F.H.. ***S
ET NEW GAME***...J.. C.19.20:.F$(2);Y$(C
);.36);"0 ";F$(10):.:M(0).0:M(10).0:T.1
0...L..X.1.2:.C.2.6:.Y$(T);.A(C));N$(0):
.C:T.0:.F$(T):.X...N.T$(0)."000000":T$(1
0).T$(0):TI$.T$(0):..&.P.. ***CHANGE PLA
YER***.?.R.T$(T).T$:M(T).M(T).1.W.T..T.0
.T.10:TI$.T$(T):.F$(2);Y$(19);.35);M(0);
F$(T):....V..T.10.T.0:TI$.T$(T):.F$(2);Y
$(20);.35);M(10);F$(T):..I.X.. ***SPEED
CHESS***.Z.Z.TI$."000000"...|.T$.TI$:.
C.4.6:. Y$(T);.A(C));N$(E(J(T$,C,1))):.:
.A$.+.~..A$.F$(1).T$.L$:.58.=....A$.F$(5
)..74.O....A$.F$(3)..80.J....T$..L$..136
:.112:.122.S....124...... ***SOUND***
......V.24,15:.V.4,21:.C.1.250:.:.V.4,20
:.V.24,0:..Q.... ***CHR$ DATA***......5
,133,155,134,63,135,32,136,18,146,144,19
,17,157,29.".... ***DIGIT DATA***.^....
16,,11,4,11,,11,4,11,,11,4,11,,11,4,11,,
11,4,11,,16,-1......2,12,2,,3,11,2,,3,11
,2,,3,11,2,,3,12,1,,3,12,1,,3,12,1,-1.H.
...16,,4,12,,4,12,,16,,12,4,,12,4,,16,-1
......15,1,,4,11,1,,4,11,1,,1,14,1,,4,12
,,4,12,,16,-1.1....12,4,,12,4,,12,4,,12,
2,11,1,,16,,4,12,,4,12,-1.`....15,1,,11,
5,,11,5,,15,1,,4,12,,4,12,,16,-1......15
,1,,11,3,11,1,,11,5,,11,5,,16,,11,3,12,,
16,-1.O. ..16,,11,4,11,,3,13,,3,11,2,,3,
11,2,,3,11,2,,3,11,2,-1......1,14,1,,1,1
1,2,11,1,,1,11,2,11,1,,16,,11,4,11,,11,4
,11,,16,-1.S....1,14,1,,1,11,2,11,1,,1,1
1,2,11,1,,1,15,,4,12,,4,12,,4,12,-1.F...
.1,10,17,26,33.L.......
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL