/*
  DOS/Vプログラミングリファレンス FM音源 サンプル曲 「Toy Train」

  以下「TTRAIN.ASM」より引用
;*****                                          *****
;*****  Ｔｏｙ　Ｔｒａｉｎ　スコア              *****
;*****                                          *****
;*****  Composed by Takeaki.Sugimoto            *****
;*****                                          *****
;*****  (C)  Copyright  1995/2  TechnoBrain.    *****
;*****                                          *****
*/
#WAV10 5,79bcaa99dcbb579b899afdb931000011
$SND3=/* Bell    */@10-5@E1,0,51,0,1 v7 q15 ns12;
$SND4=/* Marinba */@2@E1,0,20,0,0   v14 q10 ns0;
$SND5=/* Base    */@1@E1,2,9,100,21 v10  q8;
$SND7=/* Flute   */@0@E1,9,13,83,7   v9 q16;
$SND8=/* Back1   */@2@E1,6,12,90,15  v9 q10;
$SND9=/* Back2   */@3@E1,1,44,0,12   v4 q12 @w36;
$SND0=/* Trumpet */@2@E1,13,21,80,7  v5 q14;
$C=@4@n125@e1,0,20,0,7 v14 c/* バスドラム   */;
$D=@4@n110@e1,0,28,0,9  v8 d/* スネアドラム */;
$E=@0     @e1,0,20,0,8 v13 e/* タムタム    */;
$F=@4 @n40@e1,1,10,0,0  v7 f/* ハイハット(クローズ) */;
$G=@4  @n0@e1,1,80,0,0  v6 g/* シンバル (トップ) */;
$RP=16; $ST=r4.o5 v6; T136

/***** トラック０ (パーカッション) *****/
$ST @d125 l8 $F$F$F$F$C$E$D$D /:$RP
  /: /:12 $C$D :/ $D$Dr$D$D4$C$D16$D16 :/
  /:4 $C$D :/ $C$D$D$C$D$D$C$D
  /:4 $C$D :/ $G4$G4$C$E$E$E
  /:4 $C$D :/ $C$D$D$C$D$D$C$D
  /:4 $C$D :/ $C$D$D$C$D$D$C$D16$D16
:/;

/***** トラック１ (メロディ) *****/
$ST r1 /:$RP $SND3  < 
  /:
    l8 c>eg<c&c2  l4 r>eg<c
    d.>ab8b+  b8b<c/d.
  :/
  d8 $SND4 c8d8
  /:
    e.c-c-8e8c-8  c8c>ba.<
    d.>aa8<d8>a8  b8b<cd.
  :/  >
:/;

/***** トラック２ (ベース１) *****/
$ST r1 /:$RP $SND5  >>
  /:
    l8 /:8 cb+ :/
    /:4 d<d> :/  bb4/a4g4.
  :/
  <c4d4.
  /:
    /:4 >e<e :/  cc-c>baba4
    /:4 d<d> :/  bab<cc-cd4
  :/  <
:/;

/***** トラック４ (サブ・メロディ) *****/
$ST r1 /:$RP $SND7
  /:
    l8 c>eg<c&c2  l4 r>eg<c
    d.>ab8b+  b8b<cd.
  :/
  $SND0 <
  /:
    e.c-c-8e8c-8  c8c>ba.<
    d.>aa8<d8>a8  b8b<cd.
  :/  >
:/;

/***** トラック５ (バッキング１) *****/
$ST r1 /:$RP $SND8
  /:
    <c8c4>g8&g2  r4e4g4<c4
    d8d4>a8&a2  b8b4/a4g4.
  :/
  <c4d4. $SND9
  /:
    e2&e8f8e8d8  c4.>b4.a4<
    d2&d8/e8d8c8  >b4.a4.g4<
  :/
  >a8<d8>a8  b8b4<c4d4.>
:/;

/***** トラック６ (バッキング２) *****/
$ST r1 /:$RP $SND8  >
  /:
    <c8c4>g8&g2  r4e4g4<c4
    d8d4>a8&a2  b8b4/a4g4.
  :/
  <c4d4. $SND9
  /:
    g2&g8a8g8f8  e4.d4.c4
    f2&f8/g8f8e8  d4.c4.c-4
  :/
  c8f8c8  d8d4e4f4.
:/

/*********************************************************
  by nika ◆nika/si95E (http://dic.nicovideo.jp/u/200584)
 *********************************************************/