start tok64 d64-42icbS
0 POKE1,PEEK(1)OR20:SYS02240
stop tok64
(bastext 1.0)