5 REM  ERROR
10 S=54272:FOR I=0 TO 24:POKE S+I,0:NEXT I:POKE S+24,15
20 POKE S+1,8:POKE S+0,0:REM LOW FREQUENCY NOTE
30 POKE S+5,0:POKE S+6,240
40 POKE S+4,65:REM PULSE WAVE ON
50 FOR PW=1 TO 15
60 POKE S+3,PW:POKE S+2,0:REM SWEEP HIGH BYTE OF PULSE WIDTH
70 FOR T=1 TO 40:NEXT T
80 NEXT PW
90 POKE S+4,64:REM PULSE OFF