4d:"*** COMMODORE 64 WESTMINSTER CHIMES ***":unS50000: START OF ML CODE...S MAY BE CHANGED (SEE LINE 170)x 300:SUM0: I0 249: X:SUMSUMX: SI,X: SUM36332 "CHECKSUM ERROR IN ML CODE DATA":# C52102464: START OF CONSTANTS & VARIABLES...DO NOT CHANGE CP SUM0: I0 57: X:SUMSUMX: CI,X: SUM2392 "CHECKSUM ERROR IN CONSTANT DATA": C1,(S103)256: C,S103256(C1): RELOCATE ADJUSTMENT 200: S: SET TIME AND ENABLE CHIMES! :" THIS PROGRAM IS NO LONGER NEEDED.":= CLOCK SETTING ROUTINEu " ENTER 24-HOUR TIME (HHMMSS)";T$: (T$)6 210 I1 3:T(I)10((T$,II1,1))((T$,II,1)): T(4)3:T(1)23T(2)59T(3)59210: T(4)FOR .3 SECOND LAG& F0:T(1)11 F128:T(1)T(1)12: ADJUST FOR AM/PMh I1 3:H(T(I)10):LT(I)10H:T(I)16HL::T(1)T(1) F C56587: C4,(C4) 127: READY TOD CLOCK #2 FOR WRITE  I0 3: CI,T(I1)::: SET AND START CLOCK , PROGRAM DESCRIPTION ROUTINE' 6" THIS PROGRAM SETS UP A BACKGROUND"S @" ROUTINE TO CHIME THE QUARTER HOURS."~ J" MOST PROGRAMS WILL BE UNDISTURBED." T" THE CHIMES MAY BE AFFECTED BY PROGRAMS" ^" THAT TAMPER WITH THE INTERRUPT SERVICE" h" VECTOR, CHANGE TIME-OF-DAY CLOCK #2,"8 r" OR USE THE SOUND CHIP. PRESS RUN/STOP"c |" AND RESTORE TO DISABLE THE CHIMES." " SYS"S"WILL ENABLE THEM AGAIN."::  ML CODE (250 BYTES)  120,173,192,207,141,20,3,173,193,207,141,21,3,24,8,173 15,221,9,128,141,15,221,173,11,221,10,8,74,72,201,16\ 144,2,233,6,168,173,10,221,174,8,221,162,3,221,214,207 144,3,202,208,248,104,144,19,248,105,0,216,201,18,144,11 208,7,40,176,9,169,146,144,5,169,1,10,40,106,141,11$ 221,189,214,207,141,10,221,169,0,141,9,221,141,8,221,40P. 176,15,141,250,207,88,96,173,13,221,41,4,240,44,56,1768 157,224,3,240,1,168,140,253,207,188,222,207,140,252,207,188B 226,207,140,255,207,162,24,157,0,212,202,16,250,142,250,207L 141,251,207,169,15,141,24,212,208,23,173,250,207,240,88,206WV 254,207,208,83,169,20,141,4,212,173,251,207,208,63,238,252` 207,172,252,207,204,255,207,240,49,190,230,207,189,204,207,141j 1,212,189,209,207,141,0,212,189,194,207,141,15,212,189,199"t 207,141,14,212,174,251,207,189,218,207,141,254,207,189,220,207`~ 141,5,212,169,21,141,4,212,208,13,238,251,207,162,4,206 253,207,16,200,238,250,207,76,49,234 TABLES OF CONSTANTS (58 BYTES) 103,192,12,16,18,21,8,143,195,209,31,97,59,79,89,100  39,167,158,96,83,20,0,69,48,21,60,120,9,11,8,0^ 16,0,20,8,20,16,1,3,2,0,1,2,3,1,3,1,2,0,0,2,3,1,3,2,1,0 NO DATA NEEDED FOR VARIABLES (6 BYTES) CONSTANTS & VARIABLES WILL BE SAFELY TUCKED ABOVE DOS WEDGE ML CODE (LESS THAN PAGE) CAN BE PLACED IN ANY SAFE LOCATION