#10 Article 94 Posted at 1987/10/28 21:32:58 by DATTYA (MAP519) [MML]

Subject: MTテーマⅠ

100 '
110 '     うる星やつらミュージック・ツアーより
120 '         「ミュージック・ツアー テーマⅠ」
130 '
140 '            西村コージ 作曲
150 '
160 '      PC9801+FM音源ボード使用
170 '
1000 CLEAR &H800:PLAY ALLOC 255,255,255,255,255,255:PLAY "T144V13L4O5@71","T144V10L4O4@58","T144V08L4O5@04","T144V15S13L4O6","T144V15S13L4O6","T144V15S13L4O6"
1010 PLAY "R1R1","GRRG8G8RRR8G8R8G8","D8R8R2D8C+8R2R8C+8R8C+8",">F+8R8R2F+8E8R2R8E8R8E8",">C+8R8R2C+8<B8R2R8B8R8B8","A8R8R2A8G+8R2R8G+8R8G+8"
1020 PLAY "R1R1","GRRRG8G4G8G8G4G8","<B8R8R2.G16R16G4G8A16R16A4A8","D8R8R2.C16R16C4C8D16R16D4D8","A8R8R2.A16R16A4A8B16R16B4B8","F+8R8R2.F16R16F4F8G16R16G4G8"
1030 PLAY "R1R1","GRRG8G8RRG16G16G8R8G8",">D8R8R2D8C+8R2C+16C+16C+8R8C+8",">F+8R8R2F+8E8R2E16E16E8R8E8",">C+8R8R2C+8<B8R2B16B16B8R8B8","A8R8R2A8G+8R2G+16G+16G+8R8G+8"
1040 PLAY "R1R1","R4.G8R8G8RGRGG","R4.<B8R8B8R4G2A4A4","R4.D8R8D8R4C2D4D4","R4.A8R8A8R4A2B4B4","R4.F+8R8F+8R4F2G4G4"
1050 PLAY ">D2<F+8G8A4B4.A4.B8>C+8E4.D8D2F+8D8E2R4","RGRGRGRGRGRGRGRG",">D4.D8R8D8<D8E8F+4.F+8R8F+8C+8F+8G4.G8R8G8D8G8A4.A8R8A8B8>C+8","<D1C+1D1E1","<A1A1B1>C+1<","<F+1F+1G1G1"
1060 PLAY "D2<F+8A4>D8C+2R8C+8D8E8F+4E4E4D4F+8D8E2D8E8","RGRGRGRGRGRGRGRG","D4.D8R8D8<D8E8F+4.F+8R8F+8C+8F+8G4.G8R8G8G8F+8E4.E8R8A8E8A8","D1C+1D1E1","A1A1B1B2>C+2<","F+1F+1G1G1"
1070 PLAY "F+2E4F+8D2R8C4D8<B2.R4.G8A8B8>C+8D4E4","RGRGRGRGRGRGRGRG",">D4.D8R8C+8R8C+8<B4.B8R8A8>D8<F+8G4.G8R8G8R8F+8E4.E8R8A8E8A8","D2E2D2E2D1E1","A2A+2A2>C2<B2B1>C+2<","F+1F+2G2F+1G1"
1080 PLAY "D2<F+8G8A4B4.A4.B8>C+8E4.D8D4<A4>A2F+8D8E4","RGRGRGRGRGRGRGRG",">D4.D8R8D8<D8E8F+4.F+8R8F+8C+8F+8G4.G8R8D8G8F+8E4.E8R8E8B8E8","D1C+1D1E1","A1A1B1B1","F+1F+1G1G1"
1090 PLAY "<A2R4A4>A2F+8D8E4<A4.>E8E8<A8>E8D1R8","RGRGRGRGRGRGRGRG","A4.A8R8A8E8A8E4.E8R8E8B8E8A4.A8R8A8E8A8D4.D8R8A4.","E1E1E1D1",">C+1<B1>C+1<A1","G1G1G1F+1"
1100 PLAY "R1R1","G4G4R8G4G4R4.G4G4","A+8R8A8R4A8R8G2R8G4A4",">D+8R8D8R4D8R8C2R8C4D4",">>C8R8<B8R4B8R8A2R8A4B4",">G+8R8G8R4G8R8F2R8F4G4"
1110 PLAY "R1R1","G4G4R8G4G4R4.G4G4","A+8R8A8R4A8R8G2R8G4A4","D+8R8D8R4D8R8C2R8C4D4",">C8R8<B8R4B8R8A2R8A4B4","G+8R8G8R4G8R8F2R8F4G4"
1120 PLAY "D2<F+8G8A4B4.A4.B8>C+8E4.D8D2F+8D8E2R4","RGRGRGRGRGRGRGRG",">D4.D8R8D8<D8E8F+4.F+8R8F+8C+8F+8G4.G8R8G8D8G8A4.A8R8A8B8>C+8","<D1C+1D1E1","<A1A1B1>C+1<","<F+1F+1G1G1"
1130 PLAY "D2<F+8A4>D8C+2R8C+8D8E8F+4E4E4D4F+8D8E2D8E8","RGRGRGRGRGRGRGRG","D4.D8R8D8<D8E8F+4.F+8R8F+8C+8F+8G4.G8R8G8G8F+8E4.E8R8A8E8A8","D1C+1D1E1","A1A1B1B2>C+2<","F+1F+1G1G1"
1140 PLAY "F+2E4F+8D2R8C4D8<B2.R4.G8A8B8>C+8D4E4","RGRGRGRGRGRGRGRG",">D4.D8R8C+8R8C+8<B4.B8R8A8>D8<F+8G4.G8R8G8R8F+8E4.E8R8A8E8A8","D2E2D2E2D1E1","A2A+2A2>C2<B2B1>C+2<","F+1F+2G2F+1G1"
1150 PLAY "D2<F+8G8A4B4.A4.B8>C+8E4.D8D4<A4>A2F+8D8E4","RGRGRGRGRGRGRGRG",">D4.D8R8D8<D8E8F+4.F+8R8F+8C+8F+8G4.G8R8D8G8F+8E4.E8R8E8B8E8","D1C+1D1E1","A1A1B1B1","F+1F+1G1G1"
1160 PLAY "<A2R4A4>A2F+8D8E4<A4.>E8E8<A8>E8D8","RGRGRGRGRGRG","A4.A8R8A8E8A8E4.E8R8E8B8E8A4.A8R8A4.","E1E1E1",">C+1<B1>C+1<","G1G1G1"
1170 PLAY "R1@58O3R4E16E16R8E8E8E16E16R8","RGRGRGRG","A8B8B4B4R8B8>D8E8<R4.","D1D1","A1B1","F+1F+1"
1180 PLAY "R1@59O6R4A8A8R4.A8","RGRGRGRG","A8B8B4B4R8B8>D8E8<R4.","D1D1","A1B1","F+1F+1"
1190 PLAY "R1@58O3R4E16E16R4E16E16R8E8","RGRGRGRG","A8B8B4B4R8B8>D8E8<R4.","D1D1","A1B1","F+1F+1"
1200 PLAY "R1@59O6R4A8A8R8A8A8A8","RGRGRGRG","A8B8B4B4R8B8>D8E8<R4.","D1D1","A1B1","F+1F+1"
1210 PLAY "R1@58O3R4E16E16E16E16E8B16B16B16B16B8","RGRGRGRG","A8B8B4B4R8B8>D8E8<R4.","D1D1","A1B1","F+1F+1"
1220 PLAY "R1@59O6R4A8A8R4.A8","RGRGRGRG","A8B8B4B4R8B8>D8E8<R4.","D1D1","A1B1","F+1F+1"
1230 PLAY "R1@58O3R4E16E16E16E16E8B16B16B16B16B8","RGRGRGRG","A8B8B4B4R8B8>D8E8<R4.","D1D1","A1B1","F+1F+1"
1240 PLAY "R1@59O6R4A8A8R8A8A8A8@71O5","RGRGRGRG","A8B8B4B4R8B8>D8E8<R4.","D1D1","A1B1","F+1F+1"
1250 PLAY "A2F+8D8E4<A2R4A4>A2F+8D8E4<A2R4A4>","RGRGRGRGRGRGRGRG","E4.E8R8E8B8E8A4.A8R8A8E8A8E4.E8R8E8B8E8A4.A8R8A8G8F+8","E1E1E1E1","B1>C+1<B1>C+1<","G1G1G1G1"
1260 PLAY "A2F+8D8E4<A4.>E8E8<A8>E8D1R8","RGRGRGRGRGRG","E4.E8R8E8B8E8A4.A8R8A8E8A8D4.D8R8D8A8D8","E1E1D1","B1>C+1<A1","G1G1F+1"
1270 PLAY "R1","R8G16R16G16R16G16R16G16G16R8G16G16R8","R8B16R16B16R16B16R16B16B16R8B16B16R8","R8E16R16E16R16E16R16E16E16R8E16E16R8","R8>C+16R16C+16R16C+16R16C+16C+16R8C+16C+16R8<","R8A16R16A16R16A16R16A16A16R8A16A16R8"
1280 GOTO 1250
..