20 GOSUB 370:GOSUB 120
30 GOSUB 40:END
40 A$="M5000S11":B$="M5000S1":C$="M5000S1"
70 PLAY A$,B$,C$
80 A$="T150L4O4":B$="T150L4O4":C$="T150L4O4"
110 PLAY A$,B$,C$
120 A$="R8L8F+GAB.F#16AF+g":B$="O3L8DF+f+af+f+c+aa"
125 C$="O3L8R8aar8aaR8ee"
130 PLAY A$,B$,C$
140 A$="L8O4E4R8R8gabO5D.c+16":B$="O3L8AEEc+EEAee"
145 C$="O3L8R8c+c+r8c+c+R8c+c+"
150 PLAY A$,B$,C$
160 A$="O4L8BO5c+O4aa4R8R8f+g":B$="O3L8Df+f+Af+f+Df+f+"
165 C$="O3L8R8AAR8AAR8AA"
170 PLAY A$,B$,C$
180 A$="O4L8AB.f+16Af+GE4R8R8GA":B$="O3L8Af+f+c+c+c+Ac+c+c+c+c+"
185 C$="O3L8R8AAR8AAR8AAR8AA"
190 PLAY A$,B$,C$
200 A$="O4L8BO5c+.O4A16O5D4R8D4R8":B$="O3L8Ac+c+Df+f+af+f+"
210 PLAY A$,B$,C$
215 C$="O3L8R8EER8AAR8AA"
220 A$="O4L8R8R8f+B4AAGEC+R8R8R8EO5c+4O4B"
223 B$="O3L8Df+f+Af+f+c+c+c+Ac+c+c+c+c+Ac+c+"
226 C$="O3L8R8AAR8AAR8EER8EER8EER8EE"
230 PLAY A$,B$,C$
240 A$="O4L8BAf+D4R8DR8A":B$="O3L8Df+f+Af+f+Df+f+"
245 C$="O3L8R8AAR8AAR8AA"
250 PLAY A$,B$,C$
260 A$="O5L16Dc+edc+O4Bbag+abaL8O5c+4R8cO4Ba"
265 B$="O3L8Af+f+c+c+c+Ac+c+c+c+c+":C$="O3L8R8AAR8EER8EER8EE"
270 PLAY A$,B$,C$
280 A$="O4L8gf+ebaf+D4R8":B$="O3L8Ac+c+Df+f+Af+f+"
285 C$="O3L8R8EER8AAR8AA"
290 PLAY A$,B$,C$
300 A$="O4L8R8R8f+B4aagec+4R8":B$="O3L8Df+f+Af+f+c+c+c+Ac+c+"
305 C$="O3L8R8AAR8AAR8EER8EE"
310 PLAY A$,B$,C$
320 A$="O4L8R8R8EO5c+4O4BBAf+D4R8DR8AL16O5Dc+edc+O4B"
323 B$="O3L8Ac+c+ac+c+df+f+af+f+df+f+f+f+f+"
326 C$="O3L8R8EER8EER8AAR8AAR8AAR8AA"
330 PLAY A$,B$,C$
340 A$="O4L16a+bO5c+O4bgf+L8E4R8R8d+egO3BO4c+E4R8R4R8D2"
343 B$="O3L8Gbbgbbac+c+Ac+c+Dc+c+Dc+c+A2"
346 C$="O3L8R8DDR8DDR8EER8EER8EER8EEf+2"
350 PLAY A$,B$,C$
360 RETURN
370 A$="M5000S3":B$="M1000S3":C$="M1000S3"
400 PLAY A$,B$,C$
410 A$="T150L4O4":B$="T150L4O4":C$="T150L4O4"
440 PLAY A$,B$,C$
450 RETURN