10 FOR S%=1 TO 15:SOUND 800,.1:SOUND 200,.5:SOUND 800,.3:SOUND 900,.1:NEXT