1 REM ********************************
2 POKE &6038,&02,&00,&34,&12,&5F,&59,&65,&10,&DB,&DF,&4E,&00,&2F,&05,&37
10 "A" CLS:WAIT 0:PRINT "SOUND"
20 X=&6038:Y=X+1:Z=X+11
30 POKE Y,255
40 FOR I=0 TO 255 STEP 5
50 POKE Z,I
60 CALL X
70 NEXT I
80 END