00000000: 01 08 2A 08 0A 00 41 B2 30 3A 81 20 49 B2 34 39 |..*...A.0:. I.49|
00000010: 31 35 32 A4 34 39 32 39 36 3A 87 4A 3A 97 49 2C |152.49296:.J:.I,|
00000020: 4A 3A 41 B2 41 AA 4A 3A 82 49 00 57 08 14 00 8B |J:A.A.J:.I.W....|
00000030: 20 41 B3 B1 31 36 38 33 34 A7 99 22 45 52 52 4F | A..16834.."ERRO|
00000040: 52 20 49 4E 20 44 41 54 41 20 53 54 41 54 45 4D |R IN DATA STATEM|
00000050: 45 4E 54 53 22 3A 80 00 6E 08 1E 00 99 22 93 11 |ENTS":..n...."..|
00000060: 12 43 4C 4F 43 4B 20 46 4F 52 20 43 36 34 00 92 |.CLOCK 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 BF 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 34 39 32 36 33 2C 43 4F 4C 4F 52 22 00 |OKE49263,COLOR".|
000000C0: E8 08 3C 00 99 22 54 4F 20 42 4C 41 4E 4B 20 43 |..<.."TO BLANK C|
000000D0: 4C 4F 43 4B 20 44 49 53 50 4C 41 59 20 2D 20 53 |LOCK DISPLAY - S|
000000E0: 59 53 34 39 31 35 32 22 00 0F 09 46 00 99 22 54 |YS49152"...F.."T|
000000F0: 4F 20 41 43 54 49 56 41 54 45 20 44 49 53 50 4C |O ACTIVATE DISPL|
00000100: 41 59 20 2D 20 53 59 53 20 34 39 31 35 35 22 00 |AY - SYS 49155".|
00000110: 1A 09 50 00 9E 34 39 31 35 35 00 20 09 5A 00 80 |..P..49155. .Z..|
00000120: 00 5F 09 64 00 83 20 37 36 2C 33 30 2C 31 39 32 |._.d.. 76,30,192|
00000130: 2C 31 32 30 2C 31 37 33 2C 32 30 2C 33 2C 31 34 |,120,173,20,3,14|
00000140: 31 2C 32 38 2C 31 39 32 2C 31 36 39 2C 34 35 2C |1,28,192,169,45,|
00000150: 31 34 31 2C 32 30 2C 33 2C 31 37 33 2C 32 31 00 |141,20,3,173,21.|
00000160: 9F 09 6E 00 83 20 33 2C 31 34 31 2C 32 39 2C 31 |..n.. 3,141,29,1|
00000170: 39 32 2C 31 36 39 2C 31 39 32 2C 31 34 31 2C 32 |92,169,192,141,2|
00000180: 31 2C 33 2C 38 38 2C 39 36 2C 34 39 2C 32 33 34 |1,3,88,96,49,234|
00000190: 2C 31 32 30 2C 31 37 33 2C 32 38 2C 31 39 32 00 |,120,173,28,192.|
000001A0: DD 09 78 00 83 20 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 1F 0A |208,41,240,74...|
000001E0: 82 00 83 20 37 34 2C 31 33 33 2C 32 35 34 2C 31 |... 74,133,254,1|
000001F0: 36 39 2C 30 2C 31 33 33 2C 32 35 33 2C 31 36 30 |69,0,133,253,160|
00000200: 2C 30 2C 31 37 33 2C 31 31 2C 32 32 30 2C 37 32 |,0,173,11,220,72|
00000210: 2C 34 31 2C 31 32 37 2C 31 36 32 2C 31 38 36 00 |,41,127,162,186.|
00000220: 63 0A 8C 00 83 20 33 32 2C 31 32 30 2C 31 39 32 |c.... 32,120,192|
00000230: 2C 31 37 33 2C 31 30 2C 32 32 30 2C 33 32 2C 31 |,173,10,220,32,1|
00000240: 32 30 2C 31 39 32 2C 31 37 33 2C 39 2C 32 32 30 |20,192,173,9,220|
00000250: 2C 31 36 32 2C 31 37 34 2C 33 32 2C 31 32 30 2C |,162,174,32,120,|
00000260: 31 39 32 00 A5 0A 96 00 83 20 31 37 33 2C 38 2C |192...... 173,8,|
00000270: 32 32 30 2C 33 32 2C 31 33 37 2C 31 39 32 2C 31 |220,32,137,192,1|
00000280: 30 34 2C 31 36 2C 33 2C 31 36 39 2C 31 34 34 2C |04,16,3,169,144,|
00000290: 34 34 2C 31 36 39 2C 31 32 39 2C 33 32 2C 31 34 |44,169,129,32,14|
000002A0: 31 2C 31 39 32 00 EB 0A A0 00 83 20 31 36 39 2C |1,192...... 169,|
000002B0: 31 34 31 2C 31 34 35 2C 32 35 33 2C 31 36 39 2C |141,145,253,169,|
000002C0: 32 31 36 2C 31 33 33 2C 32 35 34 2C 31 36 39 2C |216,133,254,169,|
000002D0: 31 2C 31 34 35 2C 32 35 33 2C 31 33 36 2C 31 36 |1,145,253,136,16|
000002E0: 2C 32 35 31 2C 31 30 38 2C 32 38 00 2D 0B AA 00 |,251,108,28.-...|
000002F0: 83 20 31 39 32 2C 37 32 2C 33 32 2C 31 33 33 2C |. 192,72,32,133,|
00000300: 31 39 32 2C 31 30 34 2C 33 32 2C 31 33 37 2C 31 |192,104,32,137,1|
00000310: 39 32 2C 31 33 38 2C 33 32 2C 31 34 31 2C 31 39 |92,138,32,141,19|
00000320: 32 2C 39 36 2C 37 34 2C 37 34 2C 37 34 00 51 0B |2,96,74,74,74.Q.|
00000330: B4 00 83 20 37 34 2C 34 31 2C 31 35 2C 39 2C 31 |... 74,41,15,9,1|
00000340: 37 36 2C 31 34 35 2C 32 35 33 2C 32 30 30 2C 39 |76,145,253,200,9|
00000350: 36 00 6D 0B C8 00 8F 20 43 4C 4F 43 4B 20 53 45 |6.m.... CLOCK SE|
00000360: 54 54 49 4E 47 20 52 4F 55 54 49 4E 45 00 88 0B |TTING ROUTINE...|
00000370: D2 00 99 22 93 11 12 53 45 54 20 54 48 45 20 43 |..."...SET THE C|
00000380: 4C 4F 43 4B 20 22 3A 99 00 B8 0B DC 00 97 35 36 |LOCK ":.......56|
00000390: 33 33 35 2C C2 28 35 36 33 33 35 29 AF 31 32 37 |335,.(56335).127|
000003A0: 3A 8F 20 53 45 54 20 54 49 4D 45 20 4F 46 20 44 |:. SET TIME OF D|
000003B0: 41 59 20 43 4C 4F 43 4B 00 CC 0B E6 00 85 20 22 |AY CLOCK...... "|
000003C0: 41 4D 20 4F 52 20 50 4D 22 3B 41 24 00 E8 0B F0 |AM OR PM";A$....|
000003D0: 00 41 B2 31 32 38 3A 8B 20 C8 28 41 24 2C 31 29 |.A.128:. .(A$,1)|
000003E0: B2 22 41 22 A7 41 B2 30 00 0E 0C FA 00 85 22 48 |."A".A.0......"H|
000003F0: 4F 55 52 22 3B 41 24 3A 8B C3 28 41 24 29 B1 32 |OUR";A$:..(A$).2|
00000400: A7 99 22 45 52 52 4F 52 22 3A 89 32 35 30 00 2B |.."ERROR":.250.+|
00000410: 0C 04 01 8D 35 30 30 3A 8B 4E B1 31 38 A7 99 22 |....500:.N.18.."|
00000420: 45 52 52 4F 52 22 3A 89 32 35 30 00 46 0C 0E 01 |ERROR":.250.F...|
00000430: 97 35 36 33 33 31 2C 41 AA 4E 3A 8F 20 53 45 54 |.56331,A.N:. SET|
00000440: 20 48 4F 55 52 53 00 6F 0C 18 01 85 22 4D 49 4E | HOURS.o...."MIN|
00000450: 55 54 45 53 22 3B 41 24 3A 8B C3 28 41 24 29 B1 |UTES";A$:..(A$).|
00000460: 32 A7 99 22 45 52 52 4F 52 22 3A 89 32 38 30 00 |2.."ERROR":.280.|
00000470: 8C 0C 22 01 8D 35 30 30 3A 8B 4E B1 38 39 A7 99 |.."..500:.N.89..|
00000480: 22 45 52 52 4F 52 22 3A 89 32 38 30 00 A7 0C 2C |"ERROR":.280...,|
00000490: 01 97 35 36 33 33 30 2C 4E 3A 8F 20 53 45 54 20 |..56330,N:. SET |
000004A0: 4D 49 4E 55 54 45 53 00 D0 0C 36 01 85 22 53 45 |MINUTES...6.."SE|
000004B0: 43 4F 4E 44 53 22 3B 41 24 3A 8B C3 28 41 24 29 |CONDS";A$:..(A$)|
000004C0: B1 32 A7 99 22 45 52 52 4F 52 22 3A 89 33 31 30 |.2.."ERROR":.310|
000004D0: 00 ED 0C 40 01 8D 35 30 30 3A 8B 4E B1 38 39 A7 |...@..500:.N.89.|
000004E0: 99 22 45 52 52 4F 52 22 3A 89 33 31 30 00 08 0D |."ERROR":.310...|
000004F0: 4A 01 97 35 36 33 32 39 2C 4E 3A 8F 20 53 45 54 |J..56329,N:. SET|
00000500: 20 53 45 43 4F 4E 44 53 00 36 0D 54 01 99 22 57 | SECONDS.6.T.."W|
00000510: 48 45 4E 20 59 4F 55 20 41 52 45 20 52 45 41 44 |HEN YOU ARE READ|
00000520: 59 20 54 4F 20 53 54 41 52 54 20 54 48 45 20 43 |Y TO START THE C|
00000530: 4C 4F 43 4B 2C 22 00 4C 0D 5E 01 99 22 50 52 45 |LOCK,".L.^.."PRE|
00000540: 53 53 20 41 4E 59 20 4B 45 59 2E 22 00 5F 0D 68 |SS ANY KEY."._.h|
00000550: 01 A1 41 24 3A 8B 41 24 B2 22 22 A7 33 36 30 00 |..A$:.A$."".360.|
00000560: 7A 0D 72 01 97 35 36 33 32 38 2C 30 3A 8F 20 53 |z.r..56328,0:. S|
00000570: 54 41 52 54 20 43 4C 4F 43 4B 00 80 0D 7C 01 80 |TART CLOCK...|..|
00000580: 00 97 0D F4 01 8B 20 C3 28 41 24 29 B2 31 A7 54 |...... .(A$).1.T|
00000590: B2 30 3A 89 35 32 30 00 A8 0D FE 01 54 B2 C5 28 |.0:.520.....T..(|
000005A0: C8 28 41 24 2C 31 29 29 00 B9 0D 08 02 55 B2 C5 |.(A$,1)).....U..|
000005B0: 28 C9 28 41 24 2C 31 29 29 00 C8 0D 12 02 4E B2 |(.(A$,1)).....N.|
000005C0: 31 36 AC 54 AA 55 3A 8E 00 00 00 |16.T.U:.... |
..*...A.0:. I.49152.49296:.J:.I,J:A.A.J:
.I.W.... A..16834.."ERROR IN DATA STATEM
ENTS":..N...."...CLOCK FOR C64...(..:."T
O SET THE CLOCK - RUN 200"...2.."TO CHAN
GE THE COLOR - POKE49263,COLOR"...<.."TO
BLANK CLOCK DISPLAY - SYS49152"...F.."T
O ACTIVATE DISPLAY - SYS 49155"...P..491
55. .Z..._.D.. 76,30,192,120,173,20,3,14
1,28,192,169,45,141,20,3,173,21...N.. 3,
141,29,192,169,192,141,21,3,88,96,49,234
,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,1
1,220,72,41,127,162,186.C.... 32,120,192
,173,10,220,32,120,192,173,9,220,162,174
,32,120,192...... 173,8,220,32,137,192,1
04,16,3,169,144,44,169,129,32,141,192...
.. 169,141,145,253,169,216,133,254,169,
1,145,253,136,16,251,108,28.-.... 192,72
,32,133,192,104,32,137,192,138,32,141,19
2,96,74,74,74.Q.... 74,41,15,9,176,145,2
53,200,96.M.H.. CLOCK SETTING ROUTINE...
R.."...SET THE CLOCK ":.......56335,B(56
335).127:. SET TIME OF DAY CLOCK.L.... "
AM OR PM";A$.....A.128:. H(A$,1)."A".A.0
......"HOUR";A$:.C(A$).2.."ERROR":.250.+
....500:.N.18.."ERROR":.250.F....56331,A
.N:. SET HOURS.O...."MINUTES";A$:.C(A$).
2.."ERROR":.280..."..500:.N.89.."ERROR":
.280...,..56330,N:. SET MINUTES.P.6.."SE
CONDS";A$:.C(A$).2.."ERROR":.310...@..50
0:.N.89.."ERROR":.310...J..56329,N:. SET
SECONDS.6.T.."WHEN YOU ARE READY TO STA
RT THE CLOCK,".L.^.."PRESS ANY KEY."._.H
..A$:.A$."".360.Z.R..56328,0:. START CLO
CK...|........ C(A$).1.T.0:.520.....T.E(
H(A$,1)).....U.E(I(A$,1)).H...N.16.T.U:.
...