Telephone Ring

10 FOR J=1 TO 5
20 SOUND 0,66,10,5
30 SOUND 1,68,10,5
40 SOUND 2,120,2,4
50 FOR K=1 TO 500:NEXT K
60 FOR K=0 TO 3:S0UND K,0,0,0:NEXT,K
70 IF J=D THEN GOTO 90
80 FOR K=1 TO 750:NEXT K
90 NEXT J

Jackhammer

10 FOR BANG=1 TO 45
20 SOUND 0,84+RND(0)*3,2,10
30 FOR PAUSE=1 TO 40+RND(0)*50:NEXT PAUSE
40 NEXT BANG
50 END

Siren

10 FOR NUM=1 TO 12
20 FOR TONE=-60 TO 60 STEP 2
30 SOUND 0,ABS(TONE)+80,10,10
40 FOR WAIT=1 TO 8
50 NEXT WAIT
60 NEXT TONE
70 NEXT NUM
80 END 

Fill the Bottle

10 FOR DROP=150 TO 60 STEP-2
20 FOR FADE=30 TO 8 STEP-4
30 SOUND 0,DROP,10,FADE/2
40 NEXT FADE
50 FOR WAIT=1 TO 10:NEXT WAIT
60 SOUND 0,0,0,0
70 NEXT DROP
80 END

Jet Take Off

10 FOR L=1 TO 10
20 FOR J=0 TO 45
30 SOUND 0,J,8,J/3
40 NEXT J
50 FOR J=45 TO 0 STEP-1
60 SOUND 0,J,8,J/6
70 FOR K=1 TO 70+J*3:NEXT K
80 NEXT J:NEXT L:END