//-----------------------------------------------
// Reminiscence...
// (C)Yax
//-----------------------------------------------

ResetGM();                 // GM音源用リセット

//曲名
TrackName     = {"Reminiscence..."}

//著作権表示
Copyright     = {"Yax"}

r4
TrackSync;                 // 全てのトラックを同期


Include(delay.h)


/*
 * アルペジオ記号用関数
 *  D : ずれ幅
 *  L : 全体長
 *  S : 構成音
 */
Function ARP(Int D, Int L, Str S) {
  Int LNG = L
  Int STP = 0
  Int TEMP = 0
  Str X = ""
  Str RS = ""
  Str NS = ""
  Int J = 0
  Array NAR = ()

  For(Int I = 1; I <= 100; I++ ){
    X = MID(S,I,1)
    J = ASC(X)

    IF (X == "") {
      EXIT
    }

    IF ( J >= 97 ) {
      IF ( J <= 103 ) {
        IF ( NS != "" ) {
	    NS = Replace(NS,{@-},{-@},off)
	    NS = Replace(NS,{@+},{+@},off)
	    NS = Replace(NS,{@#},{#@},off)
	    NS = Replace(NS,{@*},{*@},off)
          NAR = (NAR,NS)
	    NS = ""
        }
	  X = X + "@"
	}
    }
    NS = NS + X
  }
  IF ( NS != "" ) {
    NS = Replace(NS,{@-},{-@},off)
    NS = Replace(NS,{@+},{+@},off)
    NS = Replace(NS,{@#},{#@},off)
    NS = Replace(NS,{@+},{*@},off)
    NAR = (NAR,NS)
    NS = ""
  }

  For(Int I=0;I<SizeOf(NAR);I++){
    TEMP = L - STP
    RS = "r%" + #STR(STP)
    NS = Replace(NAR(I), {@}, {%}+#STR(TEMP),off)
    Sub{ RS NS }
    STP = STP+D
  }
  r%(L)
}

/*
 * ××ダンド関数
 * B : 開始時のテンポ
 * E : 終了時のテンポ
 * LEN : 開始〜終了までの長さ
 * STP : 変換タイミング(音長)
 */
Function DANDO(B, E, LEN, STP) {
  Int _STEP = 24
  Int _DIFF = 0
  Int _CNT = 0
  Int _TMP = 0
  Int _LAP = 0

  IF( STP != 0 ) {
    _STEP = STP
  }

  _CNT = LEN/_STEP
  _DIFF = (E - B)/_CNT

  _TMP = B
  Tempo = %(B)

  For(Int I = 1; I < _CNT; I++ ){
    r%(_STEP)
    _TMP = _TMP + _DIFF
    Tempo = %(_TMP)
    _LAP = _LAP + _STEP
  }

  r%(LEN-_LAP)
  Tempo = %(E)
  r-%(LEN)
}



// テンポ
INT T=100
Tempo(T)


// 全体の調整
TR(1)  V(110) REV(60) CHO(70)
TR(2)  V(110) REV(45) CHO(40)
TR(3)  V(110) REV(40) CHO(40)
TR(4)  V(110) REV(40) CHO(10)
TR(5)  V(110) REV(40) CHO(10)
TR(6)  V(100) REV(30) CHO(70)
TR(7)  V(110) REV(90) CHO(30)
TR(8)  V(104) REV(50) CHO(90)
TR(9)  V(104) REV(50) CHO(90)
TR(10) V(110) REV(80) CHO(50)



// キー

INT KEY=-1

Key(KEY)                    // 全体のキー
TR(10) TrackKey(KEY * -1)   // リズムトラックの調整用、Keyの符号を逆にしたものをセットしておく



//------------------------------------
// Track 1 : 
//------------------------------------
TR(1) CH(1) P(64)
Slur(0)
M.onNoteWave(10,70,!2)

@36 o2 l8 v90 q90

 g1^4 a&!8b f+2.a&!8>c+<bagf+ e1e&!8gb4 f+2.f+4&!4a2
 b2>c+&!8d<b2g4 a2.c+4&!4f+4e&!8f+ g2.g+2. a2.>c+4&!4e2<

[2
 q90
 [2
  g4.g4f+ g4.gf+e
  f+4.f+4e f+4. f+ef+
  g4.g4d g4.ef+g
  a4.a4b>c+4<bagf+
 ]

 q85
 grg ggg grg ggg
 f+rf+ f+f+f+ f+rf+ f+f+f+
 ere eee ere eee
 f+rf+ f+f+f+ f+rf+ f+f+f+
 grg ggg grg ggg
 f+rf+ f+f+f+ f+rf+ f+f+f+
 grg ggg grg ggg
 ara aaa >c+c+c+ c+<ba

 v(MML(v)+10)
 [2
  ggg g>c16&!16d16<g ggg >d<gb
  f+f+f+ f+b16&!16>c+16<f+ f+f+f af+>c+<
  ggg g>c16&!16d16<g ggg >d<gb
  f+f+f+ f+>c+<f+ aa>c+ c+f+g16&16a16<
 ]

 eee eee eef+ ggg
 f+f+f+ f+f+a bbb bba
 ggg ggg aaa aaa
 'b1.<b1.>'
]

 q99 v(MML(v)-10)
 'g1.>g1.<'
 'f+1.>f+1.<'
 'e1.>e1.<'
 'd1^4.>d1^4.<' e16&!16f+16
 q90
 [4 g4.]
 [4 a4.]
 [4 b4.]
 >c+16&16d+1^4..< r-1. b2. b2.

 q85 v(MML(v)+10)
 grg ggg grg ggg
 f+rf+ f+f+f+ f+rf+ f+f+f+
 ere eee ere eee
 f+rf+ f+f+f+ f+rf+ f+f+f+
 grg ggg grg ggg
 f+rf+ f+f+f+ f+rf+ f+f+f+
 grg ggg grg ggg
 ara aaa >c+c+c+ c+<ba

 v(MML(v)+10)
 [4
  ggg g>c16&!16d16<g ggg >d<gb
  f+f+f+ f+b16&!16>c+16<f+ f+f+f af+>c+<
  ggg g>c16&!16d16<g ggg >d<gb
  f+f+f+ f+>c+<f+ aa>c+ c+f+g16&16a16<
 ]

 eee eee eef+ ggg
 f+f+f+ f+f+a bbb bba
 ggg ggg aaa aaa
 'b1.<b1.>'

 v(MML(v)-20)
 EP.onNoteWave(90,127,!4)
 g1.
 f+1.
 v(MML(v)-5)
 e1.
 f+2.
 v(MML(v)-5)
 c+1.r2.


//------------------------------------
// Track 2 : 
//------------------------------------
TR(2) CH(2) P(44)

@26,8,0
o3 l8 v77
Slur(3)

 [2
  [2 g&>d&f+&b&f+&d<]
  [2 f+&>c+&f+&a&f+&c+<]
  [2 g&b&>d&f+&d&<b]
  :
  a&>c+&f+&a&f+&c+ <f+&a&>c+&<a&>c+&f+<
 ]
 f+&a&>c+&e&c+&<a ARP(3,!2.,{f+b>c+ea})

[2
 [2
  [2 g&>d&f+&b&f+&d<]
  [2 f+&>c+&f+&a&f+&c+<]
  [2 g&b&>d&f+&d&<b]
  :
  a&>c+&f+&a&f+&c+ <f+&a&>c+&<a&>c+&f+<
 ]
 f+&a&>c+&e&c+&<a ARP(3,!2.,{f+b>c+ea})

 [2
  <d&g&b&>d2&d&<b&>d&<b&g
  c+&f+&a&>c+2&c+&<a&>f+&c+&<a
  e&g&b&>d2&d&<b&>d&<b&g
  f+&a&>c+&f+4. : < ARP(2,!4.,{a>c+f+}) < ARP(1,!4.,{f+a>c+})
 ]
 < ARP(4,!2.,{df+a>c+f+<}) >

 v(MML(v)-17)
 [4
  [4 q90 ARP(1,!8,{gb>d<})   q90 ARP(1,!8,{gb>d<})   q55 ARP(0,!16,{gb}) ARP(0,!16,{gb})]
  [4 q90 ARP(1,!8,{f+a>c+<}) q90 ARP(1,!8,{f+a>c+<}) q55 ARP(0,!16,{f+a})ARP(0,!16,{f+a})]
 ]
 v(MML(v)+17) q90

 <g&b&>d&g4. <b&>d&g&d4.
 <f+&a&>c+&f+4. <f+&b&>d&f+4.
 v(MML(v)-17)
 [2 q90 ARP(1,!8,{gb>d<})   q90 ARP(1,!8,{gb>d<})   q55 ARP(0,!16,{gb}) ARP(0,!16,{gb})]
 [2 q90 ARP(1,!8,{f+a>c+<}) q90 ARP(1,!8,{f+a>c+<}) q55 ARP(0,!16,{f+a})ARP(0,!16,{f+a})]
 v(MML(v)+17) q90
 << ARP(4,!1.,{g>dgb})<
]

 >>>
 v(MML(v)-30)
 y64,1; [4 bdg] y64,0; 
 y64,1; [4 ac+f+] y64,0; 
 y64,1; [4 g<b>e] y64,0; 
 y64,1; [3 f+<a>d] <a>f+a y64,0; 
 <
 v(MML(v)+10)
 q80
 ARP(1,!2.,{b>dg<}) ARP(0,!4.,{b>dg<}) ARP(0,!4,{b>dg<})ARP(0,!8,{b>dg<})>
 ARP(1,!2.,{c+f+a}) ARP(0,!4.,{c+f+a}) ARP(0,!4,{c+f+a})ARP(0,!8,{c+f+a})<
 ARP(1,!4.,{b>d+f+<})ARP(0,!4,{b>d+f+<})ARP(0,!8,{b>d+f+<})
 ARP(1,!4,{b>d+f+<})ARP(0,!8,{b>d+f+<}) q70 [3 ARP(0,!8,{f+b>d+<})]
 q90
 ARP(1,!1.,{b>d+f+<})
 v(MML(v)+20)

 >
 [2
  <d&g&b&>d2&d&<b&>d&<b&g
  c+&f+&a&>c+2&c+&<a&>f+&c+&<a
  e&g&b&>d2&d&<b&>d&<b&g
  f+&a&>c+&f+4. : < ARP(2,!4.,{a>c+f+}) < ARP(1,!4.,{f+a>c+})
 ]
 < ARP(4,!2.,{df+a>c+f+<}) >

 v(MML(v)-17)
 [8
  [4 q90 ARP(1,!8,{gb>d<})   q90 ARP(1,!8,{gb>d<})   q55 ARP(0,!16,{gb}) ARP(0,!16,{gb})]
  [4 q90 ARP(1,!8,{f+a>c+<}) q90 ARP(1,!8,{f+a>c+<}) q55 ARP(0,!16,{f+a})ARP(0,!16,{f+a})]
 ]
 v(MML(v)+17) q90

 <g&b&>d&g4. <b&>d&g&d4.
 <f+&a&>c+&f+4. <f+&b&>d&f+4.
 v(MML(v)-17)
 [2 q90 ARP(1,!8,{gb>d<})   q90 ARP(1,!8,{gb>d<})   q55 ARP(0,!16,{gb}) ARP(0,!16,{gb})]
 [2 q90 ARP(1,!8,{f+a>c+<}) q90 ARP(1,!8,{f+a>c+<}) q55 ARP(0,!16,{f+a})ARP(0,!16,{f+a})]
 v(MML(v)+17) q90
 < ARP(4,!1.,{g>dg}) <<

 [2 g&>d&f+&b&f+&d<]
 [2 f+&>c+&f+&a&f+&c+<]
 DANDO(%(T),%(T-13),!1.,!8)
 [2 g&b&>d&f+&d&<b]
 DANDO(%(T-13),%(T-33),!2^8,!8)
 f+&a&>c+&e&c+&
 Tempo=%(T-60)
 e <
 ARP(3,!2.^1.,{f+b>c+ea})



//------------------------------------
// Track 3 : 
//------------------------------------
TR(3) CH(3) P(84)

@27 o4 l8 v68
Slur(3) q99

 [2
  ARP(!8,!1.,{db>df+<})   r-1. <b1.>
  ARP(!8,!1.,{c+a>c+f+<}) r-1. <a1.>
  ARP(!8,!1.,{db>dg<})    r-1. <g1.>
  ARP(!8,!1.,{c+a>c+f+<}) r-1. <a1.>
 ]

[2
 v(MML(v)-5) <
 [3
  d&b&>d&f+2&f+&d&g&f+&d<
  c+&a&>c+&f+2&f+&c+&g&f+&c+<
 ]

 d&a&>f+&a4.&g4.&b4.
 c+&f+a&>c+&<f+&a ARP(!8,!2.,{b>c+ea}) <

 [2
  ARP(0,!4.,{dgb})ARP(0,!4,{dgb})ARP(0,!8,{dgb}) ARP(0,!4.,{dgb})ARP(0,!4.,{dgb})
  ARP(0,!4.,{c+f+a})ARP(0,!4,{c+f+a})ARP(0,!8,{c+f+a}) ARP(0,!4.,{c+f+a})ARP(0,!4.,{c+f+a})
  ARP(0,!4.,{egb})ARP(0,!4,{egb})ARP(0,!8,{egb}) ARP(0,!4.,{egb})ARP(0,!4.,{egb})
  ARP(0,!4.,{c+f+a})ARP(0,!4,{c+f+a})ARP(0,!8,{c+f+a}) : f+&a&>c+< a&>c+&f+<
 ]
 ARP(0,!2.,{c+f+a})

 v(MML(v)+5)
 [4
  [2 ARP(0,!4,{dgb})ARP(0,!8,{dgb})<g>ARP(0,!8,{dgb})ARP(0,!8,{dgb})]
  [2 ARP(0,!4,{c+f+a})ARP(0,!8,{c+f+a})<f+>ARP(0,!8,{c+f+a})ARP(0,!8,{c+f+a})]
 ]

 ARP(0,!4,{dgb})<g>ARP(0,!8,{dgb})ARP(0,!8,{dgb})<g>
 ARP(0,!4,{dgb})<g>ARP(0,!8,{dgb})ARP(0,!8,{dgb})ARP(0,!8,{dgb})
 ARP(0,!4,{c+f+a})<f+>ARP(0,!8,{c+f+a})ARP(0,!8,{c+f+a})<f+>
 ARP(0,!4,{df+b})<g>ARP(0,!8,{df+b})ARP(0,!8,{df+b})ARP(0,!8,{df+b})
 [2 ARP(0,!8,{<b>dg})<g> ARP(0,!8,{<b>dg})]
 [3 ARP(0,!8,{c+f+a})] ARP(1,!4.,{c+f+a})
 :
 < ARP(4,!1.,{gb>db})
]
 < ARP(4,!4.{gb>db})
 b&>d&f+&d&f+&b&f+&b&>d<

 g&b&>d&<g&b&>d&<g&b&>d&<g&b&>d<
 f+&a&>c+&<f+&a&>c+&<f+&a&>c+&<f+&a&>c+<
 e&g&b&e&g&b&e&g&b&e&g&b
 d&f+&a&d&f+&a&d&f+&a&f+&a&>d<
 g&b&>d&<g&b&>d&<g&b&>d&<g&b&>d<
 a&>c+&e&<a&>c+&e&<a&>c+&e&<a&>c+&e<
 b&>d+&f+&<b&>d+&f+&<b&>d+&f+&<b&>d+&f+<
 b&>d+&f+&<b&>d+&<b ARP(3,!2.,{b>d+f+b}) <

 v(MML(v)-5)
 [4
  ARP(0,!4.,{dgb})ARP(0,!4,{dgb})ARP(0,!8,{dgb}) ARP(0,!4.,{dgb})ARP(0,!4.,{dgb})
  ARP(0,!4.,{c+f+a})ARP(0,!4,{c+f+a})ARP(0,!8,{c+f+a}) ARP(0,!4.,{c+f+a})ARP(0,!4.,{c+f+a})
  ARP(0,!4.,{egb})ARP(0,!4,{egb})ARP(0,!8,{egb}) ARP(0,!4.,{egb})ARP(0,!4.,{egb})
  ARP(0,!4.,{c+f+a})ARP(0,!4,{c+f+a})ARP(0,!8,{c+f+a}) : f+&a&>c+< a&>c+&f+<
 ]
 ARP(0,!2.,{c+f+a})

 v(MML(v)+5)
 [4
  [2 ARP(0,!4,{dgb})ARP(0,!8,{dgb})<g>ARP(0,!8,{dgb})ARP(0,!8,{dgb})]
  [2 ARP(0,!4,{c+f+a})ARP(0,!8,{c+f+a})<f+>ARP(0,!8,{c+f+a})ARP(0,!8,{c+f+a})]
 ]

 ARP(0,!4,{dgb})<g>ARP(0,!8,{dgb})ARP(0,!8,{dgb})<g>
 ARP(0,!4,{dgb})<g>ARP(0,!8,{dgb})ARP(0,!8,{dgb})ARP(0,!8,{dgb})
 ARP(0,!4,{c+f+a})<f+>ARP(0,!8,{c+f+a})ARP(0,!8,{c+f+a})<f+>
 ARP(0,!4,{df+b})<g>ARP(0,!8,{df+b})ARP(0,!8,{df+b})ARP(0,!8,{df+b})
 [2 ARP(0,!8,{<b>dg})<g> ARP(0,!8,{<b>dg})]
 [3 ARP(0,!8,{c+f+a})] ARP(1,!4.,{c+f+a})
 < ARP(4,!1.,{gb>db})

 v(MML(v)-10)
 ARP(!8,!1.,{db>df+<})   r-1. <b1.>
 ARP(!8,!1.,{c+a>c+f+<}) r-1. <a1.>
 ARP(!8,!1.,{db>dg<})    r-1. <g1.>
 ARP(!8,!2.,{c+a>c+f+<}) r-2. <a2.>
 v(MML(v)-10)
> ARP(1,!2.^1.,{g>c+<}) r-2.^1. <g2.^1.>



//------------------------------------
// Track 4 : 
//------------------------------------
TR(4) CH(4) P(68)
@76 
M.onNoteWave(0,80,!1)
Slur(0)
BR(2)

 o6 l8 q96 v70
 d16&!16e2.^4.. g16&!16a8. f+2^8g16g+16 a2.
 f16&!16g2^16 a8 b2>c16&16d8. c+2.<a2^8c+16d16
 d16&!16e2.^4^16 g16&!16a8.g+16g16 f+2. e63&d63& c+2^8..
 d2.e.d.ef+g a1 r2

[2
 v80
 [2
  f32&f+4^16.f+4e f+4.g16&!16a4^16
  f32&f+4^16.f+4e f+2.
  :
  f32&f+4^16.f+4e f+4.a16&!16b4^16
  a4.af+e f+2.
 ]
 g4.g4f+g4.>c16&!16d4^16
 c+2.<a2.

 [2
  d16&!16e2.^16 eeede
  f32&f+2.^16. g32&a16.aag : f+
  g2.e4.ede
  f32&f+2^8.. e32&d32&c+2^16 c+16d16
 ]
 a
 b2.g4.>c8&!8d4
 c+2^8d16d+16e2.

 v(MML(v)+10)
 [2
  e16&!16f+4^16 f+ed f+4.f+ed
  c+4.c+de c+4.<a4.>
  :
  e16&!16f+4^16 f+ed f+4.f+ed
  c+4.g32&a4^16.f+4.c+4.
 ]
 <b4.b>c+d edc+f+ed
 c+2^8f+16g16a2.

 <b2.^8 b>c+dc+<b
 a2^8f+b2^8b16>c+16
 d2e4 c+2^8<a
 b1^4r4
 v(MML(v)-10)
]

 [16 r2.]

 [2
  d16&!16e2.^16 eeede
  f32&f+2.^16. g32&a16.aag : f+
  g2.e4.ede
  f32&f+2^8.. e32&d32&c+2^16 c+16d16
 ]
 a
 b2.g4.>c8&!8d4
 c+2^8d16d+16e2.

 v(MML(v)+10)
 [2
  [2
   e16&!16f+4^16 f+ed f+4.f+ed
   c+4.c+de c+4.<a4.>
   :
   e16&!16f+4^16 f+ed f+4.f+ed
   c+4.g32&a4^16.f+4.c+4.
  ]
  :
  e16&!16f+4^16 f+ed f+4.f+ef+
  g16&!16a4^16af+ef+4.c+4.
 ]
 <b4.b>c+d edc+f+ed
 c+2^8f+16g16a2.

 <b2.^8 b>c+dc+<b
 a2^8f+b2^8b16>c+16
 d2e4 c+2^8<a
 b1^4r4

 v(MML(v)-12)
 d16&!16e2^8. d16&!16e4^16 e4d16e16 f+2^8.e32d32c+2.
 d2^8d16c+16 d16&!16e2^16d16e16 f+16&!16a2^8^32g+64g64
 EP.onTime(127,0,!1)
 f+2.



//------------------------------------
// Track 5 : 
//------------------------------------
TR(5) CH(5) P(60)
@72
v55
M.onNoteWave(20,80,!2.)

 [8 r2.]
 
 o6 l8 q95
 [8 r2.]

[2
 [7 r2.]
 r2^8<b16&!16>c+16
 d4.d4c+d4.e4.
 c+4.c+4<b>c+2.
 e4.e4c+d4.a4.
 a2.f+2.

 [8 r2.]
 g4.gf+e g4.gf+g
 a4.>c+4.<a4.f+ed
 e4.g4.e4.a4.
 a2.>c+2.

 v(MML(v)+10)
 [2
  d4.dc+<b >d4.dc+<b
  a4.ab>c+< a4. f+4.>
  :
  d4.dc+<b >d4.dc+<b
  a2^8b>c+4.e4.
 ]
 <g2.b2.
 a2.b16&!16>c+2^8.<

 g2.e4.g4.
 f+2.d2.
 g2.a2.
 EP.onTime(127,20,!1.)
 'f+1^4>d1^4'r4<
 EP(127)
 v(MML(v)-10)
]

 [16 r2.]

 [8 r2.]
 g4.gf+e g4.gf+g
 a4.>c+4.<a4.f+ed
 e4.g4.e4.a4.
 a2.>c+2.

 v(MML(v)+10)
 [2
  [2
   d4.dc+<b >d4.dc+<b
   a4.ab>c+< a4. f+4.>
   :
   d4.dc+<b >d4.dc+<b
   a2^8b>c+4.e4.
  ]
  :
  d4.dc+<b >d4.dc+d
  e4. ec+<b>c+4.<a4>d16e16
 ]
 <g2.b2.
 a2.b16&!16>c+2^8.<

 g2.e4.g4.
 f+2.d2.
 g2.a2.
 EP.onTime(127,20,!1.)
 'f+1^4>d1^4'r4<
 EP(127)
 v(MML(v)-10)




//------------------------------------
// Track 6 : 
//------------------------------------
TR(6) CH(6) P(64)
@49 o5 v80
M.onNoteWave(10,80,!1.)

 [8 r2.]

 q98
 EP.onNoteWave(80,127,!2.)
 'e1.d1.<b1.>'
 'f+1.e1.c+1.'
 'e1.d1.<b1.>'
 'd2.<b2.>''c+2.<a2.>'

[2
  >>
  EP.onNoteWave(30,80,!1.^1.)
  a1.^1.^1.^1. 
 <

  EP.onNoteWave(60,97,!2.)
  'd1.<a1.>'
  'c+1.<a1.>'
  'd1.<b1.>'
  'e2.<b2.>''f+2.c+2.'

 l8 <
 [2
  EP.onTime(30,105,!2.) q70 [6 'gd']  q95 'g2.d2.' r-4.b4.
  EP.onTime(30,105,!2.) q70 [6 'f+c+'] q95 'f+2.c+2.' r-4.a4.
  EP.onTime(30,105,!2.) q70 [6 'ge']  q95 'g2.e2.' r-4.d4.
  EP.onTime(30,105,!2.) q70 [6 'f+c+'] q95 'a2.c+2.' r-4.>c+4.<
 ]

 q99
 EP.onTime(40,106,!2.)
 [2
  'g1.d1.<g1.>'    
  'f+1.c+1.<f+1.>' 
  r-1.^1.
  v(MML(v)-5) >>f+1.^1.<< v(MML(v)+5)
 ]
 EP.onTime(45,110,!2.)
 [2
  'g1.d1.<g1.>'    
  'f+1.c+1.<f+1.>' 
  r-1.^1.
  v(MML(v)-5) >'>f+1.^1.a1.^1.'<< v(MML(v)+5)
 ]

 EP.onTime(45,115,!2.)
 '<g2.>d2.g2.>d2.<'
 '<g2.>d2.g2.b2.'
 '<a2.>c+2.f+2.a2.'
 '<b2.>d2.f+2b2.'
 '<g2.>d2.g2.'
 '<a2.>c+2.f+2.'
 EP.onTime(115,20,!1.)
 '<f+1.b1.>d1.f+1.'
]

 [7 r2.]
 r2
 q150 l16
 EP.onTime(60,110,!4)
 rdef+
 q99 l8
 EP.onTime(85,109,!2.)
 'g1.d1.<b1.>'
 'f+1.d1.<a1.>'
 'f+1^8d+1^8<b1^8>' q80 [3 'f+d+<b>'] q99
 EP.onTime(110,20,!1.)
 'b1.f+1.d+1.'

 l8
 [2
  EP.onTime(30,105,!2.) q70 [6 'gd']  q95 'g2.d2.' r-4.b4.
  EP.onTime(30,105,!2.) q70 [6 'f+c+'] q95 'f+2.c+2.' r-4.a4.
  EP.onTime(30,105,!2.) q70 [6 'ge']  q95 'g2.e2.' r-4.d4.
  EP.onTime(30,105,!2.) q70 [6 'f+c+'] q95 'a2.c+2.' r-4.>c+4.<
 ]

 q99
 EP.onTime(40,106,!2.)
 [2
  'g1.d1.<g1.>'    
  'f+1.c+1.<f+1.>' 
  r-1.^1.
  v(MML(v)-5) >>f+1.^1.<< v(MML(v)+5)
 ]
 EP.onTime(45,110,!2.)
 [4
  'g1.d1.<g1.>'    
  'f+1.c+1.<f+1.>' 
  r-1.^1.
  v(MML(v)-5) >'>f+1.^1.a1.^1.'<< v(MML(v)+5)
 ]
 EP.onTime(45,110,!2.)
 'g1.d1.<g1.>'    
 'f+1.c+1.<f+1.>' 
 r-1.^1.
 v(MML(v)-5) >'>f+1.^1.a1.^1.'<< v(MML(v)+5)
 r-1.^1.
 v(MML(v)-10) >>d1.c+1.<< v(MML(v)+10)
 'g1.d1.<g1.>'    
 'f+1.c+1.<f+1.>' 
 r-1.^1.
 v(MML(v)-5) >'>f+1.^1.a1.^1.'<< v(MML(v)+5)
 r-1.^1.
 v(MML(v)-10) >b1.>c+1.<< v(MML(v)+10)

 EP.onTime(45,115,!2.)
 '<g2.>d2.g2.>d2.<'
 '<g2.>d2.g2.b2.'
 '<a2.>c+2.f+2.a2.'
 '<b2.>d2.f+2b2.'
 '<g2.>d2.g2.'
 '<a2.>c+2.f+2.'
 EP.onTime(115,20,!1.)
 '<f+1.b1.>d1.f+1.'

 EP.onNoteWave(20,60,!2.) >
 'g1.d1.'
 'a1.c+1.'
 'g1.e1.'
 'a1.f+1.'
 r-2.
 EP.onTime(60,10,!2.)
 c+2.




//------------------------------------
// Track 7 : 
//------------------------------------
TR(7) CH(7) P(64)
@11

l16 v100

 [16 r2.]

 [16 r2.]
 [16 r2.]
 [16 r2.]
 [8  r2.]

 P.onNote(96,32,127,1)
 EP(50)
 o6
 [2
  MidiDelay({gb>df+8.<},8,!8.)
  r4.r2. r1.r1.r1.
 ]

[2
 EP(60)
 l4
 [2
  r.MidiDelay({d4.<b4.>g4.},4,!8.)
  r.MidiDelay({c+4.<a4.>f+4.},4,!8.)
  r.MidiDelay({<b4.g4.>d4.},4,!8.)
  :
  MidiDelay({c+4.<a4.>c+4.f+4.},4,!8.)
 ]
 MidiDelay({c+4.d4.e4.a4.},4,!8.)

:
 >
 EP(45)
 l8
 [4
  [3 rdd16d16] d [4 d16]
  [3 rc+c+16c+16]  c+ [4 c+16]
 ]
 <

 EP(50)
 l16
 MidiDelay({gb>df+8.<},8,!8.)
 r4.r2.
 MidiDelay({f+a>c+e8.<},8,!8.)
 r4.r2.
 MidiDelay({egb>d8.<},8,!8.)
 r4.
 MidiDelay({f+a>c+e8.<},8,!8.)
 r4.
 MidiDelay({f+b>df+8.<},8,!8.)
 r4.r2.

 [8 r2.]
 [8 r2.]
]

 >
 EP(45)
 l8
 [8
  [3 rdd16d16] d [4 d16]
  [3 rc+c+16c+16]  c+ [4 c+16]
 ]
 <

 EP(50)
 l16
 MidiDelay({gb>df+8.<},8,!8.)
 r4.r2.
 MidiDelay({f+a>c+e8.<},8,!8.)
 r4.r2.
 MidiDelay({egb>d8.<},8,!8.)
 r4.
 MidiDelay({f+a>c+e8.<},8,!8.)
 r4.
 MidiDelay({f+b>df+8.<},8,!8.)
 r4.r2.

 EP(32)
 l16 >
 MidiDelay({gb>df+8.<},8,!8.)
 r4.r2.
 MidiDelay({f+a>c+f+8.<},8,!8.)
 r4.r2.
 MidiDelay({gb>dg8.<},8,!8.)
 r4.r2.
 MidiDelay({f+a>c+f+8.<},8,!8.)
 r4.
 l32
 MidiDelay({f+b>c+ea8.<},5,!16.)



//------------------------------------
// Track 8 : 
//------------------------------------
TR(8) CH(8) P(30)
@23 v80
FineTune(74)
M.onNoteWave(10,90,!1)

 [16 r2.]

 [16 r2.]
 [16 r2.]
 [16 r2.]
 [8  r2.]

 [16 r2.]
 [16 r2.]
 [8  r2.]

 [15 r2.]

 o6 l16
 r2^8
 ga

 l8
 b2.^8 >d16d16 d dc+<b
 a2^8f+ b2^8b16a16
 g2.^8 f+ec+de
 f+2^8.e32d32 c+2.
 l16
 d4.ef+gf+gab8agf+8 e8f+8g8
 a4.g8a8b8>c+4^16c+32<b32a4.
 b2^8g24a24b24>c+2^8<a24b24>c+24
 d+2.f+2.
 EP.onTime(127,0,!1.)
 g1.




//------------------------------------
// Track 9 : 
//------------------------------------
TR(9) CH(9) P(97)
@23 v80
FineTune(54)
M.onNoteWave(10,90,!2.)

 [16 r2.]

 [16 r2.]
 [16 r2.]
 [16 r2.]
 [8  r2.]

 [16 r2.]
 [16 r2.]
 [8  r2.]

 [15 r2.]

 o5 l16
 r2^8
 r64
 ga

 l8
 b2.^8 >d16d16 d dc+<b
 a2^8f+ b2^8b16a16
 g2.^8 f+ec+de
 f+2^8.e32d32 c+2.
 l16
 d4.ef+gf+gab8agf+8 e8f+8g8
 a4.g8a8b8>c+4^16c+32<b32a4.
 b2^8g24a24b24>c+2^8<a24b24>c+24
 d+2.f+2.
 EP.onTime(127,0,!1.)
 g1.



//------------------------------------
// Track 10 : ドラム系
//------------------------------------
Track(10) Channel(10)
// マクロ定義
// b = bass / s = Snare
$b{n36,} $s{n38,} $S{n37,}
// h = HH Close / f = HH foot close / o = HH Open
$c{n42,} $f{n44,} $o{n46,}
// e = Crash / j = Ride / t = Ride Bell / d = China / i = Splash / y = Crash2 / u = Ride2
$e{n49,} $j{n51,} $t{n53,} $d{n52,} $i{n55,} $y{n57,} $u{n59,}
// q = High Tom / a = High-Middle / z = Low-Middle / w = Low / x = Floor high / g = Floor low
$q{n50,} $a{n48,} $z{n47,} $w{n45,} $x{n43,} $g{n41,}
// p = Crap / k = Cowbell / m = Tambourine / n = ?? / j = ??
$p{n39,} $k{n56,} $m{n54,} $n{n75,}


//@1,90,1
@33,90,1
l8
Rhythm {
  
  [15 r2.]
 r2
  v70 r8 [3 c24]

 [2
  [2
   [2
    v90 brr rrb brr rrr r-1. r2. rrr v80sv50sv30s r-1. v80 o2.c2r8 v70 [3 c24]
    :
    v90 brr rrb brr rrr r-1. v90 r2. rrr's4v50w4' v70g r-1. v80 o2.c2r8 v70 [3 c24]
   ]
   :
   v90 brr rrb brr rrr r-1. v90 r2. rrrsv80s v70s16s16 r-1. v80 o2.c2.
  ]
  v90 brr rrb brb rrb r-1. v80 r4. s4 v50s rrv70ssv80s v70s16s16 r-1. v80 o2.c2.

  [2
   v90 brbrrr brbrrr r-1. v90 r4.s4.r4.s4. r-1. v100 e4 v80c [3 v90cv20cv75c]
   v90 brbrrr brbrrr r-1. v90 r4.s4.r4.s4v70s r-1. [4 v90cv20cv75c]
   v90 brbrrr brbrrr r-1. v90 r4.s4.r4.s4. r-1. [4 v90cv20cv75c]
   :
   v90 brbrrr brbrbb16b16 r-1. v90 r4.s4.rv75z4 v90 sss r-1. [4 v90cv20cv75c]
  ] 
  v90 brbrrr brbrbb16b16 r-1. [2 v65rsv85s16s16] l16r[3 q24]aaz zzwwss l8 r-1. [4 v90cv20cv75c]

  [2
   v90 brbrrb brbrrb r-1. v90 r4.s4.r4.s4. r-1. v100 y4 v80c [3 v90cv75cc]
   v90 brbrrb brbrrb r-1. v90 r4.s4.rv70sr v90s4v80s r-1. [4 v90cv75cc]
   v90 brbrrb brbrrb r-1. v90 r4.s4.r4.s4. r-1. v100 e4 v80c [3 v90cv75cc]
   :
   v90 brbrrb brbrrb r-1. v90 r4.s4.rv70sr v90 [3 a24]l16zzssl8 r-1. [4 v90cv75cc]
  ] 
  v90 brbbrb brrbrr r-1. v90 rs4 s4 v60s 'sg'v70'sg'v80'sg'v90'sg'v100'sg'v80s16s16 r-1. [4 v90cv75cc]

  v90 brbrrr brbrrb r-1. [2 r4.v90s4v40s] r-1. v100 e4 v80c [3 v90cv75cc]
  v90 brbrrr brbrrb r-1. r4.v90s4v40s rv70sr v90s4v80s r-1. [4 v90cv75cc]
  v90 brbrrb brrbrb r-1. rv90sv60s16s16 v80'az''zw''w16g16'w16 l16 v90 r[3 s24]azs azs64s32.al24zwg l8
  :
  v90 brrrrr rrrrrr r-1. v120 e1.
 ]
// v90 brrrrr brrbrr r-1. r2. r4.l24 v40sv50sv60sv70sv75sv80sv85sv90ss l8 r-1. v120 e2^8 v60[3 j24] v80 d2.
 v90 brrrrr rrrrrr r-1. v120 e2^8 v60[3 j24] v80 d2.

 [4 r2.]
 r2.r2.
 r4.v80 rrb16b16
 v90 a.z.w. [3 s24]s16 r-2. r64 z.w.g. rr32.

 v90 brbrrr brbrrr r-1. v90 r4.S4.r4.s4.    r-1. v100 e4 v60c [3 v90cv60cv30c]
 v90 brbrrr brbrrr r-1. v90 r4.S4.r4.s4v70s r-1. [4 v90cv60cv30c]
 v90 brbrrr brbrrr r-1. v90 r4.S4.r4.s4.    r-1. [4 v90cv60cv30c]
 v90 brbrrr brrbrr r-1. rv40s4v90s4v55s r4.l24 v40wv50sv60sv70zv75sv80sv85wv90ss l8 r-1. v120 e2^8 v60[3 j24] v80 d2.

  [2
   v90 brbrrr brbrrr r-1. v90 r4.s4.r4.s4. r-1. v100 e4 v80c [3 v90cv20cv75c]
   v90 brbrrr brbrrr r-1. v90 r4.s4.r4.s4v70s r-1. [4 v90cv20cv75c]
   v90 brbrrr brbrrr r-1. v90 r4.s4.r4.s4. r-1. [4 v90cv20cv75c]
   :
   v90 brbrrr brbrbb16b16 r-1. v90 r4.s4.rv75z4 v90 sss r-1. [4 v90cv20cv75c]
  ] 
  v90 brbrrr brbrbb16b16 r-1. [2 v65rsv85s16s16] l16r[3 q24]aaz zzwwss l8 r-1. [4 v90cv20cv75c]

  [2
   v90 brbrrb brbrrb r-1. v90 r4.s4.r4.s4. r-1. v100 y4 v80c [3 v90cv75cc]
   v90 brbrrb brbrbb16b16 r-1. v90 r4.s4.rv70sr v90s4v80s r-1. [4 v90cv75cc]
   v90 brbrrb brbrrb r-1. v90 r4.s4.r4.s4. r-1. v100 e4 v80c [3 v90cv75cc]
   :
   v90 brbrrb16b16 brb[6 b16] r-1. v90 r4.s4.rv70sr v90 [3 a24]l16zzssl8 r-1. [4 v90cv75cc]
  ] 
  v90 brbbrb16b16 [2 bbb16b16] r-1. rv60sv90s16s16 l16rssgss wq24q24q24azz sszzwg l8 r-1. [4 v90cv75cc]

  [2
   v90 brb16v60b16rr16b16v90b brbrb16v65b16v90b r-1. v90 r4.s4.r4.s4v80s r-1. v100 y4 v80c [3 v90cv75cc]
   v90 brb16v60b16rr16b16v90b brb16v60b16r[2 v86b16v65b16] r-1. rv65s16v50s16r v90s4.rv70sr v90s4v67s16s16 r-1. [4 v90cv75cc]
   v90 brb16v60b16rr16b16v90b brbrb16v65b16v90b r-1. v90 r4.s4.r4.s4v65s16s16 r-1. v100 e4 v80c [3 v90cv75cc]
   :
   v90 brb16v60b16rr16b16v90b brb16v60b16[3 v85b16v65b16] r-1. rs80sv60s16s16v90s4.rv70s16s16r v90 [3 s24]l16qaz24w24g24 l8 r-1. [4 v90cv75cc]
  ] 
  [12 v90b16v65b16] r-1. v90 rsv64s16v50s16 v90s4 v60[3s24] 'sg'v70'sg'v80'sg'v90'sg'v100'sg'v80s16s16 r-1. [4 v90cv75cc]

  v90 brbrbb brbrbb16b16 r-1. [2 r4.v90s4v50s] r-1. v100 e4 v80c [3 v90cv75cc]
  v90 brbrbb brbbbb16b16  r-1. r4.v90s4v40s rv70sr v90s4v80s16s16 r-1. [4 v90cv75cc]
  v90 [4 bbb16b16] r-1. rv90s16s16v60s16s16 v80'az''zw''w16g16'w16 l16 v90 r[3 s24]zas qas64s32.al24zwg l8
  v90 brrrrr rrrrrr r-1. v120 e1.
}