0 REM SINSPEED1=$01. SINSPEED2=$00
5 AD=8192
10 FORT=0TO2*(null)STEP(2*(null))/256
20 E=25+(SIN(T*5)*25)
25 POKEAD+N,E:POKEAD+256+N,E
30 N=N+1:NEXT:N=512
40 FORT=0TO2*(null)STEP(2*(null))/256
50 E=38+(SIN(T*6)*30)
55 POKEAD+N,E:POKEAD+256+N,E
60 N=N+1:NEXT