start tok64 d64-PtwT6z
5 PRINT"{clear}"
10 IFl=0THENl=1:LOAD"a c 1",8,1
20 SYS4096
stop tok64
(bastext 1.0)