Compucolor.org – Virtual Media

Listing of file='CLOCK.BAS;01' on disk='vmedia/chip_128-sector.ccvf'

10 PLOT 12,3,0,10
30 PLOT 27,4:PRINT "RUN CLOCK":PLOT 27,27,28,11,6,7
40 INPUT "ENTER HOURS, MINUTES, AND SECONDS TO UPDATE

 ";H,M,S
50 POKE 33209,S:POKE 33210,M:POKE 33211,H
60 PLOT 12:END