10 REM Bosse Gidmark <455>    1985-07-29 11.12.55
20 ! ---------------------------------------------------------
30 ! Program: TIME.BAS
40 ! L{gger ut klocka i ABC802 i WIDTH 80.
50 ! Av Bosse Gidmark <455>
60 ! ---------------------------------------------------------
70 A=PEEK(65494) : B=PEEK(65495)
80 POKE 64000,243,229,197,213,245,33,60,120,229,58,243,255,245,17,239,255,1,68,250,26
90 POKE 64020,198,178,159,198,20,205,55,250,26,19,205,55,250,10,3,119,35,167,32,244
100 POKE 64040,209,225,58,243,255,186,32,216,241,209,193,225,195,A,B,54,47,52,214,10
110 POKE 64060,48,251,35,198,58,119,35,201,45,45,32,46,46,0
120 POKE 65494,0,250
130 END