MMLの勉強8

前回作ったロードランナー＋αの曲をリズムを変えてMMLにしてみました。
ベースはロードランナーで、
メロディは
シティコネクション→アイスクライマー→マリオUSA→ファンタジーゾーン
と流れていくだけでなく、
サブメロディはメロディに追いかけるように
シティコネクション→アイスクライマー→マリオUSA
と流れています。

タイトルは「ロードランナーカノン」です。
ちなみに今知り合いが作成中の
D言語で作るロードランナーのBGMに使用しています。
http://www.nicovideo.jp/watch/sm2584707

$Lode1 = C.C16R>G<C.C16R>G<C.C16R>ERF16R16F#16G.<D.D16R>G<D.D16R>G<D.D16R>F#RG16R16G#16A.;
$Lode2 = G.G16RDG.G16RDG.G16R>BR<C16R16C#16D.<C.C16R>G<C.C16R>G<C16R16C#R16C#R16C#4R4;
$Lode3 = <E.E16RC#D.D16R>B<C.C16R>BRG16R16G#16A.G.G16RDG.G16RD<C16R16CR16CR16C4R4;
$Lode4 = G.G16RDG.G16RDG.G16R>BR<C16R16C#16D.<C.C16R>G<C.C16R>GG#16R16G#R16G#R16G4R4<;
$Lode5 = G.G16RDG.G16RDG.G16R>BR<C16R16C#16D.<C.C16R>G<C.C16R>G<C16R16CR16CR16C4R4;
$Lode6 = F.F16RCF.F16RCG.G16R>BR<C16R16C#16D.<C.C16R>G<C.C16R>G<C16R16CR16CR16C4R4;

$City1 = C2R8E4D8F2R8E8>B<C8.>A2<D4E4>A2R8<D8>B8A8
         G2R8<D4E8G2R8D8.E8.G2R8ERAG8.D2R8G8E8D8;
$City2 = C2R8E4D8F2R8E8>B<C8.>A2<D4E4G2R8F8E8F8
         E8>B8<EDC#8D8>A8<D8>B8<C8>E8A8B8G8A8B8<C8D8E8>A4.B4.<C2.R4>;
$City3 = C2R8E4D8F2R8E8>B<C8.>A2<D4E4>A2R8<D8>B8A8
         G2R8<D4E8G2R8D8.E8.G2R8ERAG8.D2R2>;
$Ice1 = GRERF8.GR8<C>B<C>B<CR>GRERF8.GR8<C>B<C>B<CR>
        ARFRG8.AR8<DC#DC#DR>ARFRG8.AR8<DC#DC#DR>;
$Ice2 = BRGRA8.BR8<FEFEFR>BRGRA8.BR8<FEFEFR
        EC>GR<EC>GR<FD>AR<FD>AR<F#D>BR<F#D>BR<GDC>BA#AG#R;
$Ice3 = BRGRA8.BR8<FEFEFR>BRGRA8.BR8<FEFEFRER4R>BR<CRC#RF8RER4R8ER2R;
$USA1 = R8E8.R8RG8.AR8<CR2R>ARGREC8.DRERDRERD8.>AR8<
        D8&D24>A24<D24>A24<D24>A24<D24>A24<D24>A24
        <D24>A24<D24>A24<D24>A24<D24>A24<D24R12;
$USA2 = D8.RERD8ERD8.ER8A4GRAGRE8RDRCR
        E8&E24>G24<E24>G24<E24>G24<E24>G24<E24>G24
        <E24>G24<E24>G24<E24>G24<E24>G24<E24R12R8R8GR8DR8>BR8AR8GR<;
$USA3 = D8.RERD8ERD8.ER8A4GRAGRE8RDRCRC4R4>F#RGRG#RA8R<CR4R8CR2R;
$Fzone = E4D4CR>GAR8<C8ERERDDRC4.R>A8<D8.ER8>A8<D8.ER8>A8<D8.E4.R
         >AR<DE8.F2R8F8G8A8<C4>A4<CR>AR<D#DRC1&CR1>;

$CHf = V4 @n64 @E1,0,18,0,1 ;
$CHp = V2 @n64 @E1,0,18,0,1 ;
$SD = V10 @n120 @E1,0,18,0,1 ;
$OH = V4 @n32 @E1,0,64,0,10 ;
$Drum0 = $CHfC R $CHpC R $OHC8 $SDC R16R $CHfC R $CHpC R;
$Drum1 = $Drum0 $Drum0 $CHfC R $CHpC R $OHC 8 $SDC R16R 
         $CHfC R16RR8 $OHC8 $SDC R16R $CHfC R $CHpC R;
$Drum2 = $Drum0 $Drum0 $CHfC R $CHpC R $OHC16 $CHfC R $CHpC R $OHC16
         $CHfC R $CHpC R $OHC8 R16 $CHpC R $SDC R16R $CHfC R16R;


メロディ;
T160@3@W25O6L16V8@E1,0,80,8,0
/:
R1R1R1R1R1R1R1R1
$City1$City2
$Ice1$Ice2$Ice1$Ice2<
$USA1$USA2$USA1$USA3
$Fzone$Fzone
:/;

サブメロディ;
T160@3O5L16V6@E1,0,80,8,0
/:
R1R1R1R1R1R1R1R1
R1R1R1R1R1R1R1R1R1R1R1R1R1R1R1R8D#8.D#R8D#8.D#R8D8
$City1$City3
$Ice1$Ice2$Ice1$Ice3
$USA1$USA2$USA1$USA3
:/;


ベース;
T160@2O4L8V15@E1,1,0,127,0
/:
$Lode1$Lode2
$Lode1$Lode2$Lode1$Lode3
$Lode1$Lode4$Lode1$Lode4
$Lode1$Lode2$Lode1$Lode5
$Lode1$Lode2$Lode1$Lode6
:/

ドラム;
T160@4O6L32V3
/:18
$Drum1$Drum1$Drum1$Drum2
:/