10 GOSUB650:GOSUB220:PAUSE30
20 GOSUB100:PAUSE30
30 FORI=1TO4:GOSUB380:NEXT
35 PAUSE60
40 FORI=1TO2:GOSUB500:GOSUB540:GOSUB500:GOSUB550:NEXT
50 GOSUB420
99 END
100 PLAY"T3Y0M1V1:T3Y0M1V1:M0
110 FORI=1TO4
120 PLAY"O0G3BGB:O1C5#C:T3
130 NEXT
140 PLAY"GBGBGBGBGBGB:C#CC#CC#C:O2G9G7M1
150 PLAY"GBGB:C#C:T2G5GGM0T3
160 PLAY"GBGBGBGBGBGB:C#CC#CC#C:#F9T2#F8
170 PLAY"GBGB:C#C:DT8O2
180 PLAY"GBGBGBGBGBGBGBGB:C#CC#CC#CC#C:F
190 PLAY"GB:C:T3E2RC1
200 PLAY"GBGBGBGBGBGBGB:#CC#CC#CC#C:T7E8
210 RETURN
220 PLAY"T3Y3M1V5:T3Y0M1V2:T4M1
230 PLAY"O3E4D1:O1G1#FED:O2G2D0DD
240 PLAY"V10D5V5:G#FED:G2D0DD
250 PLAY"R3O2B1O3C:G#FED:G2D0DD
260 PLAY"ED#CD:G#FED:G2D0DD
270 PLAY"A4G1:O2#DDCO1#A:#A2#D0#D#D
280 PLAY"V10G5V5:O2#DDCO1#A:#A2#D0#D#D
290 PLAY"R3G1A:O2#DDCO1#A:#A2#D0#D#D
300 PLAY"#BBAG:O2#DDCO1:A:#D2C0CC
310 PLAY"O4EDDE:O3G#FED:G2D0DD
320 PLAY"EDDE:G#FED:G2D0DD
330 PLAY"O3EDDE:O2G#FED:G2D0DD
340 PLAY"T4O2EDEM0V13:G3FEDY2:G2D0DDO1M0
350 PLAY"#F7:O5F#DO4BFBF#DO3BBF#DO2B:B7
360 PLAY":BF#DO1B
370 RETURN
380 PLAY"T3Y2M1V3:T3Y2M1V3
390 FORI=1TO4:PLAY"O4C3O3#G1#A3O4#D1:O3#G3#D1G3#A1":NEXT
400 PAUSE30:PLAY"::T1O3G1#GG#GR3#D1EFRA1BO4D#F":RETURN
420 PLAY"T5Y2M0V8O3:T5Y0M1V2O0
430 PLAY"#A4#A2T4#G1#AT5:E2E0EEE2E0EE
440 PLAY"#B2#GT4#A1FRDT5:EEEEEEE2E0EE
450 PLAY"#A4#G1#A#G:E2E0EEEEEEEE
460 PLAY"G6G4:G2G0GGG2G0GGGGGGGG
470 PLAY"G6G4:G2G0GGG2G0GGGGGGGG
480 PLAY"G:G4":RETURN
500 PLAY"T2Y0M1V5:T2Y0M1V5
510 PLAY"O3E4GC5O2G4A:O1C4C1C4C1G4G1G4G1
520 PLAY"M0V8O3E9:E4E1#C4#C1O0A4A1O1E4E1
530 PLAY"F4AD5O2A4O3D:D4D1D4D1A4A1A4A1":RETURN
540 PLAY"V8F7V5#D5D:#G4#G1F4F1D4D1O0B4B1":RETURN
550 PLAY"V10F7V5:O1#G1O0B3BBB1
560 PLAY"#D5D:O1#G1O0B3BBB1
570 PLAY"V0G1GV5#F0FE#DD:O1#D4#D1
580 PLAY"R6#A4A:B4B1D4D1B4B1
590 PLAY"V10G7V5:C4C1G4G1
600 PLAY"O2#A5O3C:O0#A4#A1O1G4G1
610 PLAY"V10G7V5:O0#G4#G1O1G4G1
620 PLAY"#G5#A:O0G4G1O1#D4#D1
630 PLAY"V10#B7R3B3R1G4:F1C3CCC1R3GR1G4
640 RETURN
650 PLAY"T1Y3M0V15:T1Y0M0V15
660 PLAY"O1C1#CD#CC3:O0A1#AB#AA3
670 PLAY"O2A1#ABO3C:O1C1#CDE
680 PLAY"E1#DD#CC3:O3#C1CO2B#AA3
690 PLAY"C1#CD#DEF#F:A1#ABO3C#CD#D
700 PLAY"G#FFE#DD#CC:E#DD#CCO2B#AAR5R3":RETURN
800 END
