CLOCK

FILE INFORMATION

FILENAME(S): CLOCK

FILE TYPE(S): PRG

FILE SIZE: 1.2K

FIRST SEEN: 2025-11-30 21:25:25

APPEARS ON: 1 disk(s)

FILE HASH

43c94b667265563aa8be64a657cf8691e81d73e5bd28ec346001e33d00eabb9c

FOUND ON DISKS (1 DISKS)

DISK TITLE	FILENAME	FILE TYPE	COLLECTION	TRACK	SECTOR	ACTIONS
C64UTIL	CLOCK	PRG	DuncanTwain	5	8	DOWNLOAD FILE

FILE CONTENT & ANALYSIS

> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)

00000000: 01 08 0C 08 0A 00 8D 20  39 30 30 30 00 33 08 14  |....... 9000.3..|
00000010: 00 99 22 93 11 11 2A 2A  54 49 4D 45 53 20 57 41  |.."...**TIMES WA|
00000020: 49 54 53 20 46 4F 52 20  4E 4F 20 4D 41 4E 20 20  |ITS FOR NO MAN  |
00000030: 2A 2A 11 00 4F 08 1E 00  99 22 43 4C 4F 43 4B 20  |**..O...."CLOCK |
00000040: 49 4E 53 54 52 55 43 54  49 4F 4E 53 3A 11 22 00  |INSTRUCTIONS:.".|
00000050: 6F 08 28 00 99 22 53 59  53 20 38 33 32 20 3A 20  |o.(.."SYS 832 : |
00000060: 54 55 52 4E 20 4F 4E 20  44 49 53 50 4C 41 59 00  |TURN ON DISPLAY.|
00000070: 90 08 32 00 99 22 53 59  53 20 39 39 34 3A 20 20  |..2.."SYS 994:  |
00000080: 54 55 52 4E 20 4F 46 46  20 44 49 53 50 4C 41 59  |TURN OFF DISPLAY|
00000090: 00 B0 08 3C 00 99 22 50  4F 4B 45 20 39 38 32 2C  |...<.."POKE 982,|
000000A0: 4E 3A 20 43 48 41 4E 47  45 20 43 4F 4C 4F 55 52  |N: CHANGE COLOUR|
000000B0: 00 B6 08 46 00 80 00 CB  08 28 23 43 48 B2 30 3A  |...F.....(#CH.0:|
000000C0: 81 49 B2 38 33 32 A4 31  30 30 38 00 E1 08 32 23  |.I.832.1008...2#|
000000D0: 87 41 3A 97 49 2C 41 3A  43 48 B2 43 48 AA 41 3A  |.A:.I,A:CH.CH.A:|
000000E0: 82 00 06 09 3C 23 8B 43  48 AB 31 35 36 30 35 A7  |....<#.CH.15605.|
000000F0: 99 22 57 48 4F 41 2E 2E  2E 44 41 54 41 20 45 52  |."WHOA...DATA ER|
00000100: 52 4F 52 22 3A 90 00 38  09 46 23 85 22 93 11 11  |ROR":..8.F#."...|
00000110: 11 11 11 49 53 20 49 54  20 41 4D 20 4F 52 20 50  |...IS IT AM OR P|
00000120: 4D 22 3B 41 24 3A 85 22  11 41 4E 44 20 54 48 45  |M";A$:.".AND THE|
00000130: 20 48 4F 55 52 22 3B 48  00 7A 09 50 23 99 22 11  | HOUR";H.z.P#.".|
00000140: 11 45 4E 54 45 52 20 54  48 45 20 4E 45 58 54 20  |.ENTER THE NEXT |
00000150: 4D 49 4E 55 54 45 3B 22  3A 99 22 50 52 45 53 53  |MINUTE;":."PRESS|
00000160: 20 27 52 45 54 55 52 4E  27 20 54 4F 20 53 54 41  | 'RETURN' TO STA|
00000170: 52 54 20 43 4C 4F 43 4B  3A 11 00 98 09 5A 23 8B  |RT CLOCK:....Z#.|
00000180: 48 B1 31 32 A7 50 24 B2  22 50 22 3A 48 B2 48 AB  |H.12.P$."P":H.H.|
00000190: 31 32 3A 89 39 30 35 30  00 A7 09 64 23 8B 48 B1  |12:.9050...d#.H.|
000001A0: 39 A7 48 B2 48 AA 36 00  C0 09 6E 23 8B C8 28 41  |9.H.H.6...n#..(A|
000001B0: 24 2C 31 29 B2 22 50 22  A7 48 B2 48 AA 31 32 38  |$,1)."P".H.H.128|
000001C0: 00 DA 09 78 23 43 B2 35  36 33 32 38 3A 97 43 AA  |...x#C.56328:.C.|
000001D0: 33 2C 48 3A 97 43 AA 31  2C 30 00 EF 09 82 23 85  |3,H:.C.1,0....#.|
000001E0: 4D 3A 4D B2 4D AA B5 28  4D AD 31 30 29 AC 36 00  |M:M.M..(M.10).6.|
000001F0: 21 0A 8C 23 97 43 AA 32  2C 4D 3A 97 43 2C 30 3A  |!..#.C.2,M:.C,0:|
00000200: 9E 38 33 32 3A 99 22 11  11 49 46 20 4E 4F 54 20  |.832:."..IF NOT |
00000210: 4F 4B 2C 20 50 52 45 53  53 20 41 4E 59 20 4B 45  |OK, PRESS ANY KE|
00000220: 59 00 49 0A 96 23 81 49  B2 31 A4 31 30 30 30 3A  |Y.I..#.I.1.1000:|
00000230: 8B C2 28 31 39 38 29 A7  97 31 39 38 2C 30 3A 9E  |..(198)..198,0:.|
00000240: 39 39 34 3A 89 39 30 33  30 00 51 0A A0 23 82 3A  |994:.9030.Q..#.:|
00000250: 8E 00 86 0A F0 23 83 31  32 30 2C 31 37 33 2C 32  |.....#.120,173,2|
00000260: 30 2C 33 2C 31 36 32 2C  38 39 2C 31 34 31 2C 32  |0,3,162,89,141,2|
00000270: 32 34 2C 33 2C 31 34 32  2C 32 30 2C 33 2C 31 37  |24,3,142,20,3,17|
00000280: 33 2C 32 31 2C 33 00 BC  0A FA 23 83 31 36 32 2C  |3,21,3....#.162,|
00000290: 33 2C 31 34 31 2C 32 32  35 2C 33 2C 31 34 32 2C  |3,141,225,3,142,|
000002A0: 32 31 2C 33 2C 38 38 2C  39 36 2C 31 37 33 2C 31  |21,3,88,96,173,1|
000002B0: 31 2C 32 32 30 2C 31 37  30 2C 34 31 00 F6 0A 04  |1,220,170,41....|
000002C0: 24 83 31 35 2C 32 34 2C  31 30 35 2C 34 38 2C 31  |$.15,24,105,48,1|
000002D0: 34 31 2C 36 37 2C 34 2C  31 33 38 2C 31 36 2C 34  |41,67,4,138,16,4|
000002E0: 2C 31 36 32 2C 31 36 2C  31 36 2C 32 2C 31 36 32  |,162,16,16,2,162|
000002F0: 2C 31 2C 31 34 32 00 2E  0B 0E 24 83 37 37 2C 34  |,1,142....$.77,4|
00000300: 2C 31 36 32 2C 33 32 2C  34 31 2C 31 36 2C 32 34  |,162,32,41,16,24|
00000310: 30 2C 32 2C 31 36 32 2C  34 39 2C 31 34 32 2C 36  |0,2,162,49,142,6|
00000320: 36 2C 34 2C 31 37 33 2C  31 30 2C 32 32 30 00 67  |6,4,173,10,220.g|
00000330: 0B 18 24 83 31 37 30 2C  34 31 2C 31 35 2C 31 30  |..$.170,41,15,10|
00000340: 35 2C 34 38 2C 31 34 31  2C 37 30 2C 34 2C 31 33  |5,48,141,70,4,13|
00000350: 38 2C 37 34 2C 37 34 2C  37 34 2C 37 34 2C 32 34  |8,74,74,74,74,24|
00000360: 2C 31 30 35 2C 34 38 00  A0 0B 22 24 83 31 34 31  |,105,48..."$.141|
00000370: 2C 36 39 2C 34 2C 31 37  33 2C 39 2C 32 32 30 2C  |,69,4,173,9,220,|
00000380: 31 37 30 2C 34 31 2C 31  35 2C 31 30 35 2C 34 38  |170,41,15,105,48|
00000390: 2C 31 34 31 2C 37 33 2C  34 2C 31 33 38 2C 37 34  |,141,73,4,138,74|
000003A0: 00 D9 0B 2C 24 83 37 34  2C 37 34 2C 37 34 2C 32  |...,$.74,74,74,2|
000003B0: 34 2C 31 30 35 2C 34 38  2C 31 34 31 2C 37 32 2C  |4,105,48,141,72,|
000003C0: 34 2C 31 37 33 2C 38 2C  32 32 30 2C 31 30 35 2C  |4,173,8,220,105,|
000003D0: 34 38 2C 31 34 31 2C 37  35 00 10 0C 36 24 83 34  |48,141,75...6$.4|
000003E0: 2C 31 36 39 2C 33 32 2C  31 34 31 2C 36 35 2C 34  |,169,32,141,65,4|
000003F0: 2C 31 34 31 2C 37 36 2C  34 2C 31 34 31 2C 37 39  |,141,76,4,141,79|
00000400: 2C 34 2C 31 36 32 2C 31  35 2C 31 35 37 2C 32 34  |,4,162,15,157,24|
00000410: 00 4A 0C 40 24 83 34 2C  32 30 32 2C 32 30 38 2C  |.J.@$.4,202,208,|
00000420: 32 35 30 2C 31 36 39 2C  35 38 2C 31 34 31 2C 36  |250,169,58,141,6|
00000430: 38 2C 34 2C 31 34 31 2C  37 31 2C 34 2C 31 36 39  |8,4,141,71,4,169|
00000440: 2C 34 36 2C 31 34 31 2C  37 34 00 8C 0C 4A 24 83  |,46,141,74...J$.|
00000450: 34 2C 31 36 39 2C 31 33  2C 31 34 31 2C 37 38 2C  |4,169,13,141,78,|
00000460: 34 2C 31 36 39 2C 31 2C  31 36 32 2C 31 33 2C 31  |4,169,1,162,13,1|
00000470: 35 37 2C 36 35 2C 32 31  36 2C 32 30 32 2C 32 30  |57,65,216,202,20|
00000480: 38 2C 32 35 30 2C 37 36  2C 30 2C 30 00 C1 0C 54  |8,250,76,0,0...T|
00000490: 24 83 31 32 30 2C 31 37  33 2C 32 32 34 2C 33 2C  |$.120,173,224,3,|
000004A0: 31 34 31 2C 32 30 2C 33  2C 31 37 33 2C 32 32 35  |141,20,3,173,225|
000004B0: 2C 33 2C 31 34 31 2C 32  31 2C 33 2C 38 38 2C 39  |,3,141,21,3,88,9|
000004C0: 36 00 D8 0C 5E 24 8F 20  42 59 20 49 41 4E 20 41  |6...^$. BY IAN A|
000004D0: 44 41 4D 20 31 39 38 33  00 00 00 34 2C 31 36 32  |DAM 1983...4,162|
000004E0: 2C 31 36 2C 31 36 2C 32  2C 31 36 32 2C 31 2C 31  |,16,16,2,162,1,1|
000004F0: 34 32 00 2E 0B 0E                                 |42....          |

....... 9000.3...."...**TIMES WAITS FOR 
NO MAN  **..O...."CLOCK INSTRUCTIONS:.".
O.(.."SYS 832 : TURN ON DISPLAY...2.."SY
S 994:  TURN OFF DISPLAY...<.."POKE 982,
N: CHANGE COLOUR...F...K.(#CH.0:.I.832.1
008...2#.A:.I,A:CH.CH.A:....<#.CH.15605.
."WHOA...DATA ERROR":..8.F#."......IS IT
 AM OR PM";A$:.".AND THE HOUR";H.Z.P#.".
.ENTER THE NEXT MINUTE;":."PRESS 'RETURN
' TO START CLOCK:....Z#.H.12.P$."P":H.H.
12:.9050...D#.H.9.H.H.6...N#.H(A$,1)."P"
.H.H.128.Z.X#C.56328:.C.3,H:.C.1,0....#.
M:M.M..(M.10).6.!..#.C.2,M:.C,0:.832:.".
.IF NOT OK, PRESS ANY KEY.I..#.I.1.1000:
.B(198)..198,0:.994:.9030.Q. #.:.....#.1
20,173,20,3,162,89,141,224,3,142,20,3,17
3,21,3....#.162,3,141,225,3,142,21,3,88,
96,173,11,220,170,41....$.15,24,105,48,1
41,67,4,138,16,4,162,16,16,2,162,1,142..
..$.77,4,162,32,41,16,240,2,162,49,142,6
6,4,173,10,220.G..$.170,41,15,105,48,141
,70,4,138,74,74,74,74,24,105,48. ."$.141
,69,4,173,9,220,170,41,15,105,48,141,73,
4,138,74.Y.,$.74,74,74,24,105,48,141,72,
4,173,8,220,105,48,141,75...6$.4,169,32,
141,65,4,141,76,4,141,79,4,162,15,157,24
.J.@$.4,202,208,250,169,58,141,68,4,141,
71,4,169,46,141,74...J$.4,169,13,141,78,
4,169,1,162,13,157,65,216,202,208,250,76
,0,0.A.T$.120,173,224,3,141,20,3,173,225
,3,141,21,3,88,96.X.^$. BY IAN ADAM 1983
...4,162,16,16,2,162,1,142....

Visualization:

Width: Skip load address (+2) Invert

> CLICK IMAGE PREVIEW FOR FULL MODAL