CLOCK.KL.C64

FILE INFORMATION

FILENAME(S): CLOCK.KL.C64

FILE TYPE(S): PRG

FILE SIZE: 1.4K

FIRST SEEN: 2025-12-01 02:26:39

APPEARS ON: 1 disk(s)

FILE HASH

45c54bc28a2e6bed309f2330a9cafbbaa3e7e65f12e874128c4e24f6155bbf0a

FOUND ON DISKS (1 DISKS)

DISK TITLE	FILENAME	FILE TYPE	COLLECTION	TRACK	SECTOR	ACTIONS
TONSOFT	CLOCK.KL.C64	PRG	hedning, shine	11	0	DOWNLOAD FILE

FILE CONTENT & ANALYSIS

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

00000000: 01 08 29 08 0A 00 41 B2  30 3A 81 49 B2 34 39 31  |..)...A.0:.I.491|
00000010: 35 32 A4 34 39 32 39 36  3A 87 4A 3A 97 49 2C 4A  |52.49296:.J:.I,J|
00000020: 3A 41 B2 41 AA 4A 3A 82  49 00 55 08 14 00 8B 41  |:A.A.J:.I.U....A|
00000030: B3 B1 31 36 38 33 34 A7  99 22 45 52 52 4F 52 20  |..16834.."ERROR |
00000040: 49 4E 20 44 41 54 41 20  53 54 41 54 45 4D 45 4E  |IN DATA STATEMEN|
00000050: 54 53 22 3A 80 00 6E 08  1E 00 99 22 93 11 12 43  |TS":..n...."...C|
00000060: 4C 4F 43 4B 20 46 4F 52  20 43 36 34 92 22 00 92  |LOCK FOR C64."..|
00000070: 08 28 00 99 3A 99 22 54  4F 20 53 45 54 20 54 48  |.(..:."TO SET TH|
00000080: 45 20 43 4C 4F 43 4B 20  2D 20 52 55 4E 20 32 30  |E CLOCK - RUN 20|
00000090: 30 22 00 C0 08 32 00 99  22 54 4F 20 43 48 41 4E  |0"...2.."TO CHAN|
000000A0: 47 45 20 54 48 45 20 43  4F 4C 4F 52 20 2D 20 50  |GE THE COLOR - P|
000000B0: 4F 4B 45 20 34 39 32 36  33 2C 43 4F 4C 4F 52 22  |OKE 49263,COLOR"|
000000C0: 00 EA 08 3C 00 99 22 54  4F 20 42 4C 41 4E 4B 20  |...<.."TO BLANK |
000000D0: 43 4C 4F 43 4B 20 44 49  53 50 4C 41 59 20 2D 20  |CLOCK DISPLAY - |
000000E0: 53 59 53 20 34 39 31 35  32 22 00 11 09 46 00 99  |SYS 49152"...F..|
000000F0: 22 54 4F 20 41 43 54 49  56 41 54 45 20 44 49 53  |"TO ACTIVATE DIS|
00000100: 50 4C 41 59 20 2D 20 53  59 53 20 34 39 31 35 35  |PLAY - SYS 49155|
00000110: 22 00 1D 09 50 00 9E 20  34 39 31 35 35 00 23 09  |"...P.. 49155.#.|
00000120: 5A 00 80 00 61 09 64 00  83 37 36 2C 33 30 2C 31  |Z...a.d..76,30,1|
00000130: 39 32 2C 31 32 30 2C 31  37 33 2C 32 30 2C 33 2C  |92,120,173,20,3,|
00000140: 31 34 31 2C 32 38 2C 31  39 32 2C 31 36 39 2C 34  |141,28,192,169,4|
00000150: 35 2C 31 34 31 2C 32 30  2C 33 2C 31 37 33 2C 32  |5,141,20,3,173,2|
00000160: 31 00 A0 09 6E 00 83 33  2C 31 34 31 2C 32 39 2C  |1...n..3,141,29,|
00000170: 31 39 32 2C 31 36 39 2C  31 39 32 2C 31 34 31 2C  |192,169,192,141,|
00000180: 32 31 2C 33 2C 38 38 2C  39 36 2C 34 39 2C 32 33  |21,3,88,96,49,23|
00000190: 34 2C 31 32 30 2C 31 37  33 2C 32 38 2C 31 39 32  |4,120,173,28,192|
000001A0: 00 DD 09 78 00 83 31 34  31 2C 32 30 2C 33 2C 31  |...x..141,20,3,1|
000001B0: 37 33 2C 32 39 2C 31 39  32 2C 31 34 31 2C 32 31  |73,29,192,141,21|
000001C0: 2C 33 2C 38 38 2C 39 36  2C 31 37 33 2C 32 34 2C  |,3,88,96,173,24,|
000001D0: 32 30 38 2C 34 31 2C 32  34 30 2C 37 34 00 1E 0A  |208,41,240,74...|
000001E0: 82 00 83 37 34 2C 31 33  33 2C 32 35 34 2C 31 36  |...74,133,254,16|
000001F0: 39 2C 30 2C 31 33 33 2C  32 35 33 2C 31 36 30 2C  |9,0,133,253,160,|
00000200: 30 2C 31 37 33 2C 31 31  2C 32 32 30 2C 37 32 2C  |0,173,11,220,72,|
00000210: 34 31 2C 31 32 37 2C 31  36 32 2C 31 38 36 00 61  |41,127,162,186.a|
00000220: 0A 8C 00 83 33 32 2C 31  32 30 2C 31 39 32 2C 31  |....32,120,192,1|
00000230: 37 33 2C 31 30 2C 32 32  30 2C 33 32 2C 31 32 30  |73,10,220,32,120|
00000240: 2C 31 39 32 2C 31 37 33  2C 39 2C 32 32 30 2C 31  |,192,173,9,220,1|
00000250: 36 32 2C 31 37 34 2C 33  32 2C 31 32 30 2C 31 39  |62,174,32,120,19|
00000260: 32 00 A2 0A 96 00 83 31  37 33 2C 38 2C 32 32 30  |2......173,8,220|
00000270: 2C 33 32 2C 31 33 37 2C  31 39 32 2C 31 30 34 2C  |,32,137,192,104,|
00000280: 31 36 2C 33 2C 31 36 39  2C 31 34 34 2C 34 34 2C  |16,3,169,144,44,|
00000290: 31 36 39 2C 31 32 39 2C  33 32 2C 31 34 31 2C 31  |169,129,32,141,1|
000002A0: 39 32 00 E7 0A A0 00 83  31 36 39 2C 31 34 31 2C  |92......169,141,|
000002B0: 31 34 35 2C 32 35 33 2C  31 36 39 2C 32 31 36 2C  |145,253,169,216,|
000002C0: 31 33 33 2C 32 35 34 2C  31 36 39 2C 31 2C 31 34  |133,254,169,1,14|
000002D0: 35 2C 32 35 33 2C 31 33  36 2C 31 36 2C 32 35 31  |5,253,136,16,251|
000002E0: 2C 31 30 38 2C 32 38 00  28 0B AA 00 83 31 39 32  |,108,28.(....192|
000002F0: 2C 37 32 2C 33 32 2C 31  33 33 2C 31 39 32 2C 31  |,72,32,133,192,1|
00000300: 30 34 2C 33 32 2C 31 33  37 2C 31 39 32 2C 31 33  |04,32,137,192,13|
00000310: 38 2C 33 32 2C 31 34 31  2C 31 39 32 2C 39 36 2C  |8,32,141,192,96,|
00000320: 37 34 2C 37 34 2C 37 34  00 4B 0B B4 00 83 37 34  |74,74,74.K....74|
00000330: 2C 34 31 2C 31 35 2C 39  2C 31 37 36 2C 31 34 35  |,41,15,9,176,145|
00000340: 2C 32 35 33 2C 32 30 30  2C 39 36 00 67 0B C8 00  |,253,200,96.g...|
00000350: 8F 20 43 4C 4F 43 4B 20  53 45 54 54 49 4E 47 20  |. CLOCK SETTING |
00000360: 52 4F 55 54 49 4E 45 00  82 0B D2 00 99 22 93 11  |ROUTINE......"..|
00000370: 12 53 45 54 20 54 48 45  20 43 4C 4F 43 4B 20 22  |.SET THE CLOCK "|
00000380: 3A 99 00 B2 0B DC 00 97  35 36 33 33 35 2C C2 28  |:.......56335,.(|
00000390: 35 36 33 33 35 29 AF 31  32 37 3A 8F 20 53 45 54  |56335).127:. SET|
000003A0: 20 54 49 4D 45 20 4F 46  20 44 41 59 20 43 4C 4F  | TIME OF DAY CLO|
000003B0: 43 4B 00 C6 0B E6 00 85  20 22 41 4D 20 4F 52 20  |CK...... "AM OR |
000003C0: 50 4D 22 3B 41 24 00 E1  0B F0 00 41 B2 31 32 38  |PM";A$.....A.128|
000003D0: 3A 8B C8 28 41 24 2C 31  29 B2 22 41 22 A7 41 B2  |:..(A$,1)."A".A.|
000003E0: 30 00 08 0C FA 00 85 22  48 4F 55 52 22 3B 20 41  |0......"HOUR"; A|
000003F0: 24 3A 8B C3 28 41 24 29  B1 32 A7 99 22 45 52 52  |$:..(A$).2.."ERR|
00000400: 4F 52 22 3A 89 32 35 30  00 25 0C 04 01 8D 35 30  |OR":.250.%....50|
00000410: 30 3A 8B 4E B1 31 38 A7  99 22 45 52 52 4F 52 22  |0:.N.18.."ERROR"|
00000420: 3A 89 32 35 30 00 40 0C  0E 01 97 35 36 33 33 31  |:.250.@....56331|
00000430: 2C 41 AA 4E 3A 8F 20 53  45 54 20 48 4F 55 52 53  |,A.N:. SET HOURS|
00000440: 00 69 0C 18 01 85 22 4D  49 4E 55 54 45 53 22 3B  |.i...."MINUTES";|
00000450: 41 24 3A 8B C3 28 41 24  29 B1 32 A7 99 22 45 52  |A$:..(A$).2.."ER|
00000460: 52 4F 52 22 3A 89 32 38  30 00 86 0C 22 01 8D 35  |ROR":.280..."..5|
00000470: 30 30 3A 8B 4E B1 38 39  A7 99 22 45 52 52 4F 52  |00:.N.89.."ERROR|
00000480: 22 3A 89 32 38 30 00 A1  0C 2C 01 97 35 36 33 33  |":.280...,..5633|
00000490: 30 2C 4E 3A 8F 20 53 45  54 20 4D 49 4E 55 54 45  |0,N:. SET MINUTE|
000004A0: 53 00 CA 0C 36 01 85 22  53 45 43 4F 4E 44 53 22  |S...6.."SECONDS"|
000004B0: 3B 41 24 3A 8B C3 28 41  24 29 B1 32 A7 99 22 45  |;A$:..(A$).2.."E|
000004C0: 52 52 4F 52 22 3A 89 33  31 30 00 E7 0C 40 01 8D  |RROR":.310...@..|
000004D0: 35 30 30 3A 8B 4E B1 38  39 A7 99 22 45 52 52 4F  |500:.N.89.."ERRO|
000004E0: 52 22 3A 89 33 31 30 00  02 0D 4A 01 97 35 36 33  |R":.310...J..563|
000004F0: 32 39 2C 4E 3A 8F 20 53  45 54 20 53 45 43 4F 4E  |29,N:. SET SECON|
00000500: 44 53 00 30 0D 54 01 99  22 57 48 45 4E 20 59 4F  |DS.0.T.."WHEN YO|
00000510: 55 20 41 52 45 20 52 45  41 44 59 20 54 4F 20 53  |U ARE READY TO S|
00000520: 54 41 52 54 20 54 48 45  20 43 4C 4F 43 4B 2C 22  |TART THE CLOCK,"|
00000530: 00 46 0D 5E 01 99 22 50  52 45 53 53 20 41 4E 59  |.F.^.."PRESS ANY|
00000540: 20 4B 45 59 2E 22 00 59  0D 68 01 A1 41 24 3A 8B  | KEY.".Y.h..A$:.|
00000550: 41 24 B2 22 22 A7 33 36  30 00 74 0D 72 01 97 35  |A$."".360.t.r..5|
00000560: 36 33 32 38 2C 30 3A 8F  20 53 54 41 52 54 20 43  |6328,0:. START C|
00000570: 4C 4F 43 4B 00 7A 0D 7C  01 80 00 90 0D F4 01 8B  |LOCK.z.|........|
00000580: C3 28 41 24 29 B2 31 A7  54 B2 30 3A 89 35 32 30  |.(A$).1.T.0:.520|
00000590: 00 A1 0D FE 01 54 B2 C5  28 C8 28 41 24 2C 31 29  |.....T..(.(A$,1)|
000005A0: 29 00 B2 0D 08 02 55 B2  C5 28 C9 28 41 24 2C 31  |).....U..(.(A$,1|
000005B0: 29 29 00 C1 0D 12 02 4E  B2 31 36 AC 54 AA 55 3A  |)).....N.16.T.U:|
000005C0: 8E 00 00 00                                       |....            |

..)...A.0:.I.49152.49296:.J:.I,J:A.A.J:.
I.U....A..16834.."ERROR IN DATA STATEMEN
TS":..N...."...CLOCK FOR C64."...(..:."T
O SET THE CLOCK - RUN 200"...2.."TO CHAN
GE THE COLOR - POKE 49263,COLOR"...<.."T
O BLANK CLOCK DISPLAY - SYS 49152"...F..
"TO ACTIVATE DISPLAY - SYS 49155"...P.. 
49155.#.Z...A.D..76,30,192,120,173,20,3,
141,28,192,169,45,141,20,3,173,21. .N..3
,141,29,192,169,192,141,21,3,88,96,49,23
4,120,173,28,192...X..141,20,3,173,29,19
2,141,21,3,88,96,173,24,208,41,240,74...
...74,133,254,169,0,133,253,160,0,173,11
,220,72,41,127,162,186.A....32,120,192,1
73,10,220,32,120,192,173,9,220,162,174,3
2,120,192......173,8,220,32,137,192,104,
16,3,169,144,44,169,129,32,141,192... ..
169,141,145,253,169,216,133,254,169,1,14
5,253,136,16,251,108,28.(....192,72,32,1
33,192,104,32,137,192,138,32,141,192,96,
74,74,74.K....74,41,15,9,176,145,253,200
,96.G.H.. CLOCK SETTING ROUTINE...R.."..
.SET THE CLOCK ":.......56335,B(56335).1
27:. SET TIME OF DAY CLOCK.F.... "AM OR 
PM";A$.....A.128:.H(A$,1)."A".A.0......"
HOUR"; A$:.C(A$).2.."ERROR":.250.%....50
0:.N.18.."ERROR":.250.@....56331,A.N:. S
ET HOURS.I...."MINUTES";A$:.C(A$).2.."ER
ROR":.280..."..500:.N.89.."ERROR":.280..
.,..56330,N:. SET MINUTES.J.6.."SECONDS"
;A$:.C(A$).2.."ERROR":.310...@..500:.N.8
9.."ERROR":.310...J..56329,N:. SET SECON
DS.0.T.."WHEN YOU ARE READY TO START THE
 CLOCK,".F.^.."PRESS ANY KEY.".Y.H..A$:.
A$."".360.T.R..56328,0:. START CLOCK.Z.|
........C(A$).1.T.0:.520.....T.E(H(A$,1)
).....U.E(I(A$,1)).A...N.16.T.U:....

Visualization:

Width: Skip load address (+2) Invert

> CLICK IMAGE PREVIEW FOR FULL MODAL