start tok64 d64-NF8kyb 10 FORi=49152TO49168:READa:POKEi,a:NEXT 20 z=30:REM hast. 0=fort 30 FORi=49169TO49169+z:POKEi,234:NEXT 40 POKEi,76:POKEi+1,9:POKEi+2,192 60 s=54272:FORi=sTOs+24:POKEi,0:NEXT 70 POKEs+5,9:POKEs+6,255:POKEs+24,15 80 PRINT"{clear}{down}{right}press space" 90 GETa$:IFa$<>" "THEN90 95 POKE49153,33:REM wave form 100 POKE56325,1:SYS49152 110 DATA169,17,162,0,160,0,141,4,212,232,140,0,212,200,142,1,212 stop tok64 (bastext 1.0)