5 ' Звук бомбы
10 FOR I=0 TO 13:READ V
20 SOUND I,V:NEXT
40 FOR I=50 TO 200:SOUND O,I
60 A=5^5:NEXT       
80 SOUND 12,100:SOUND 13,9
90 SOUND 7,&B10011111:END
100 DATA 50,0,0,0,0,0
110 DATA 30            
120 DATA &B10111110
130 DATA 10,0,16    
140 DATA 0,0,0