//-----------------------------------------------
// fate on around
// (C)Yax
//-----------------------------------------------

ResetGM();

TrackName     = {"fate on around"}
Copyright     = {"Yax"}

r2
TrackSync;

Include(bend.h)


// アルペジオ関数
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)
}

// ××ダンド関数
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)
}


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


// テンポ
INT T  = 120   // 通常のテンポ
INT TE = 85    // 最後のリタルダンド後のテンポ

Tempo=(T)


// キー
INT KEY=2

Key(KEY)                    // 全体のキー
TR(10) TrackKey(KEY * -1)   // リズムトラックはキーを元に戻す





//------------------------------------
// Track 1 : 
//------------------------------------
TR(1) CH(1) P(64)
@35 v105

 [8 r1]

 o2 l8
 q90
 f+1^1
 e1^1

 q70
 [8 f+ v(MML(v)-10)f+ v(MML(v)+10)]
 [8 e v(MML(v)-10)e v(MML(v)+10)]
 [8 f+ v(MML(v)-10)f+ v(MML(v)+10)]
 [4 e v(MML(v)-10)e v(MML(v)+10)]
 q90e2 q70 ee16e16>e<e
[2
 q70
 [2
  f+rrf+rra4 g+rrg+re4.
  f+rrf+rr>c+4< g+rrg+re4e
  f+rrf+rra4 g+rrg+re4.
  :
  f+rrf+rr>c+4< g+rrerb4g+
 ]
 f+rrf+rr>c+4< g+g+g+g+4g+ab

 [2
  [4 a v(MML(v)-10) a v(MML(v)+10)]
  [4 f+ v(MML(v)-10) f+ v(MML(v)+10)]
  :
  [4 g+ v(MML(v)-10) g+ v(MML(v)+10)]
  [3 e v(MML(v)-10) e v(MML(v)+10)] f+g+
 ]
 [4 b v(MML(v)-10) b v(MML(v)+10)]
 [4 e v(MML(v)-10) e v(MML(v)+10)]

 f+4.f+f+2 g+4.g+g+2
 a4.aa2 b4.bb4g+4
 [4 a v(MML(v)-10) a v(MML(v)+10)]
 [4 g+ v(MML(v)-10) g+ v(MML(v)+10)]
 :
 [8 f+ v(MML(v)-10)f+ v(MML(v)+10)]
 [8 e v(MML(v)-10)e v(MML(v)+10)]
]
 q90 f+1&!4.>f+1<
 r1r2.. q60e16e16
 q90
 f+1^1
 e1^1

 q70
 [8 f+ v(MML(v)-10)f+ v(MML(v)+10)]
 [8 e v(MML(v)-10)e v(MML(v)+10)]
 [8 f+ v(MML(v)-10)f+ v(MML(v)+10)]
 [4 e v(MML(v)-10)e v(MML(v)+10)]
 q90e2 q70 ee16e16>e<g+

 [2
  [2
   [4 a v(MML(v)-10) a v(MML(v)+10)]
   [4 f+ v(MML(v)-10) f+ v(MML(v)+10)]
   :
   [4 g+ v(MML(v)-10) g+ v(MML(v)+10)]
   [3 e v(MML(v)-10) e v(MML(v)+10)] f+g+
  ]
  [4 b v(MML(v)-10) b v(MML(v)+10)]
  :
  [3 e v(MML(v)-10) e v(MML(v)+10)] f+g+
 ]
 >[2 c+ v(MML(v)-10) c+ v(MML(v)+10)]< [2 f v(MML(v)-10) f v(MML(v)+10)] 

 f+4.f+f+2 g+4.g+g+2
 a4.aa2 b4.bb4g+4
 [4 a v(MML(v)-10) a v(MML(v)+10)]
 [3 g+ v(MML(v)-10) g+ v(MML(v)+10)] b e

 q99 f+1^1&!2>e1&!4<e1
 v(MML(v)-20)
 f+1^1
 e1^1
 v(MML(v)-20)
 EP.onTime(127,0,!1^1^1^1^1^1^1^1)
 [2
  f+1^1
  e1^1
 ]


//------------------------------------
// Track 2 : 
//------------------------------------
TR(2) CH(2) P(84)
@26,8,0 v81
Slur(3)

 o5 l16

 EP.onTime(10,127,!1^1^1^1)
 [5
  f+&c+&g+&c+& <a&>a&c+&<a& >g+&c+&<a&>f+& c+&<a&>g+&c+&<
  a&>a&c+&<a&> b&c+&<a&>a& c+&<a&>g+&c+& <a&>f+&c+&<a>
  e&<b&>f+&<b& g+&>g+&<b&g+&> a&<b&g+&>g+& <b&g+&>a&<b&
  g+&>b&<b&g+&> a&<b&g+&>g+&< b&g+&>f+&<b& g+&>g+&<b&g+>
 ]

[2
 l8 v(MML(v)-5)
 [4
  q40 <f+rr> q90 ARP(2,!8^2,{c+f+a})
  q40 <g+rr  q90 ARP(2,!8^2,{b>eg+})
  q40 <arr>  q90 ARP(2,!8^2,{c+f+a})
  :
  q40 <brr   q90 ARP(2,!8^2,{b>eg+})
 ]
 q40 <brr q90 ARP(2,!4,{b>eg+}) q70 [3 <ARP(1,!8,{b>eg+})]
 <
 [2
  [2 [3 q90 ARP(2,!4,{a>c+e<}) : q40<a>]]
  :
  [3 q90 ARP(2,!4,{g+>c+e<}) : q40<g+>]
  [3 q90 ARP(2,!4,{g+b>e<}) : q40<g+>]
 ]
 [3 q90 ARP(2,!4,{b>eg+<}) : q40<g+>]
 q90 ARP(!64,!2,{b>eg+<}) ARP(!8,!2,{g+b>eg+<}) 

 q80 [4 ARP(1,!4,{f+a>c+<}) ]
 q80 [4 ARP(1,!4,{g+b>e<}) ]
 q80 [4 ARP(1,!4,{a>c+e<}) ]
 q80 [4 ARP(1,!4,{b>df+<}) ]

 [3 q90 ARP(2,!4,{a>c+f+<}) : q40<a>]
 [3 q90 ARP(2,!4,{g+b>e<}) : q40<g+>]
 >
 l8 v(MML(v)+5)
 :
 l16
 f+&c+&g+&c+& <a&>a&c+&<a& >g+&c+&<a&>f+& c+&<a&>g+&c+&<
 a&>a&c+&<a&> b&c+&<a&>a& c+&<a&>g+&c+& <a&>f+&c+&<a>
 e&<b&>f+&<b& g+&>g+&<b&g+&> a&<b&g+&>g+& <b&g+&>a&<b&
 g+&>b&<b&g+&> a&<b&g+&>g+&< b&g+&>f+&<b& g+&>g+&<b&g+>
]

 l16
 [4
  f+&c+&g+&c+& <a&>a&c+&<a& >g+&c+&<a&>f+& c+&<a&>g+&c+&<
  a&>a&c+&<a&> b&c+&<a&>a& c+&<a&>g+&c+& <a&>f+&c+&<a>
  e&<b&>f+&<b& g+&>g+&<b&g+&> a&<b&g+&>g+& <b&g+&>a&<b&
  g+&>b&<b&g+&> a&<b&g+&>g+&< b&g+&>f+&<b& g+&>g+&<b&g+>
 ]

 < l8
 [4
  [2 [3 q90 ARP(2,!4,{a>c+e<}) : q40<a>]]
  :
  [3 q90 ARP(2,!4,{g+>c+e<}) : q40<g+>]
  [3 q90 ARP(2,!4,{g+b>e<}) : q40<g+>]
 ]
 [3 q90 ARP(2,!4,{b>eg+<}) : q40<g+>]
 q90 ARP(!64,!2,{b>df<}) ARP(!8,!2,{fb>df<}) 

 q80 [4 ARP(1,!4,{f+a>c+<}) ]
 q80 [4 ARP(1,!4,{g+b>e<}) ]
 q80 [4 ARP(1,!4,{a>c+e<}) ]
 q80 [4 ARP(1,!4,{b>df+<}) ]

 [3 q90 ARP(2,!4,{a>c+f+<}) : q40<a>]
 [3 q90 ARP(2,!4,{g+b>e<}) : q40<g+>]
 >
 l8 v(MML(v)+5)

 l16
 [4
  f+&c+&g+&c+& <a&>a&c+&<a& >g+&c+&<a&>f+& c+&<a&>g+&c+&<
  a&>a&c+&<a&> b&c+&<a&>a& c+&<a&>g+&c+& <a&>f+&c+&<a>
  e&<b&>f+&<b& g+&>g+&<b&g+&> a&<b&g+&>g+& <b&g+&>a&<b&
  g+&>b&<b&g+&> a&<b&g+&>g+&< b&g+&>f+&<b& g+&>g+&<b&g+>
 ]
 r-1^1 DANDO((T),(TE),!1^1,!8) r1r1
 <<
 ARP(!64,!1^1,{f+a>c+a>c+f+<<})



//------------------------------------
// Track 3 : 
//------------------------------------
TR(3) CH(3) P(44)
@9 v83
 Slur(3)

 o6 l8
 [4 r1]

 P(44)
 P.onNote(64,20,107,32,76)
 [2
  c+&e&f+&g+4&f+&g+&a4&g+a&b4&a&g+&f+
  <b&>e&f+&g+4&f+&g+&a4&g+&a&b&>c+&<b&a&g+
 ]
 r-1^1
 eg+ab4ab>c+4<b>c+d4c+<ba

 P(44)
 v(MML(v)-10)
 [8 '>c+<g+'e]
 [8 'bg+'e]
 [8 '>c+<g+'e]
 [4 'bg+'e]
 ARP(!32,!1,{eg+b>e<})

[2
 P.onNote(64,20,107,32,76)
 v(MML(v)-10)
 [4
  <[4 ARP(!32,!4,{f+a>c+f+a<}) v(MML(v)-10)] v(MML(v)+40)>
  r1r1r1
 ]

 [2
  rc+&f+&a&>c+2<
  rc+&f+&a&>c+2<
  rc+&e&g+&b2
  r<b&>e&g+&b2
 ]
 v(MML(v)+10)
 [6 r4>c+4<][2 r4b4]
 rc+&f+&a&>c+2<
 rc+&e&g+&b2
 v(MML(v)+10)
 :
 c+&e&f+&g+4&f+&g+&a4&g+a&b4&a&g+&f+
 <b&>e&f+&g+4&f+&g+&a4&g+&a&b&>c+&<b&a&g+
 r-1^1
 eg+ab4ab>c+4<b>c+d4c+<ba
 v(MML(v)-10)
]

 P.onNote(64,20,107,32,76)
 [2
  c+&e&f+&g+4&f+&g+&a4&g+a&b4&a&g+&f+
  <b&>e&f+&g+4&f+&g+&a4&g+&a&b&>c+&<b&a&g+
 ]
 r-1^1
 eg+ab4ab>c+4<b>c+d4c+<ba

 P(44)
 v(MML(v)-10)
 [8 '>c+<g+'e]
 [8 'bg+'e]
 [8 '>c+<g+'e]
 [4 'bg+'e]
 ARP(!32,!1,{eg+b>e<})

 P.onNote(64,20,107,32,76)
 [2
  rc+&f+&a&>c+2<
  rc+&f+&a&>c+2<
  rc+&e&g+&b2
  r<b&>e&g+&b2
 ]

 v(MML(v)-10)
 [2
  [4 '>c+<f+'c+]
  [4 '>c+<a'c+]
  :
  [4 '>c+<g+'e]
  [4 'bg+'e]
 ]
 [4 'bg+'e]
 [4 'bf'd]
 v(MML(v)+20)

 v(MML(v)-10)
 [6 r4>c+4<][2 r4b4]
 rc+&f+&a&>c+2<
 rc+&e&g+&b2
 v(MML(v)+10)

[2
 [2
  c+&e&f+&g+4&f+&g+&a4&g+a&b4&a&g+&f+
  <b&>e&f+&g+4&f+&g+&a4&g+&a&b&>c+&<b&a&g+
 ]
 r-1^1
 eg+ab4ab>c+4<b>c+d4c+<ba
]

 v(MML(v)-10)
 ARP(!32,!1^1,{ef+b>c+<})
 


//------------------------------------
// Track 4 : 
//------------------------------------
TR(4) CH(4) P(64)
@49 v62

 [4 r1]

 o4 l8 q98
 [2
  'f+1c+1' 'a1f+1'
  'g+1e1' 'e1<b1>'
 ]
 r-1^1^1^1
 >>'e1^1^1^1a1^1^1^1'<<

 'a1^1c+1^1>>f+1^1<<'
 'a1^1e1^1>>e1^1<<'
 'a1^1c+1^1>>f+1^1<a1^1<'
 'a1^1e1^1>>g+1^1<b1^1<'

 v(MML(v)-15)
 c+1<b1a1b1>
 c+1<b1>c+1e1
 >
 q80
 [2
  [4 '>c+4<a4'] [4 '>c+4<g+4']
  [4 '>c+4<a4'] [4 'b4g+4']
 ]

[2
 v(MML(v)+15)
 q99
 [2
  'e1c+1' r-2 a2
  'f+1c+1' r-2 a2
  :
  'e1c+1' r-2 g+2
  'e1<b1>' r-2 g+2
 ]
 'g+1c+1' r-2 e2
 'e1<b1>' r-2 g+2

 >>a1g+1e1f+1<< r-1^1^1^1
 'a1f+1c+1'
 'g+1e1<b1>'
 '>c+1<a1f+1'
 'b1f+1d1'
 :
 [4 'f+4c+4<a4>']
 [4 'g+4e4<b4>']

 'a1^1c+1^1>>f+1^1<a1^1<'
 'a1^1e1^1>>g+1^1<b1^1<'

 v(MML(v)-15)
 q80
 [2
  [4 '>c+4<a4'] [4 '>c+4<g+4']
  [4 '>c+4<a4'] [4 'b4g+4']
 ]
 [2
  [4 '>ac+4<a4'] [4 '>ac+4<g+4']
  [4 '>ac+4<a4'] [4 '>g+<b4g+4']
 ]
]

 [4 'f+4c+4<a4>']
 [4 'g+4e4<b4>']

 v(MML(v)-10)
 'f+1^1c+1^<a1^1>>c+1^1<'
 v(MML(v)-10)
 'g+1^1e1^1<b1^1>>e1^1<'
 v(MML(v)+20)

 'f+1c+1' 'a1f+1'
 'g+1e1' 'e1<b1>'

 'f+1c+1' 'a1f+1'
 'g+1e1' 'e1<b1>'
 r-1^1^1^1
 >>'e1^1^1^1c+1^1^1^1'<<

 'f+1c+1' 'a1f+1'
 'g+1e1' 'e1<b1>'
 r-1^1^1^1
 >>'e1^1^1a1^1^1'<<g+1

 q99
 [2
  [2
   'e1c+1' r-2 a2
   'f+1c+1' r-2 a2 r-1^1 >>c+1e1<<
   :
   'e1c+1' r-2 g+2
   'e1<b1>' r-2 g+2 r-1^1 >>e1<b1<
  ]
  :
  'g+1c+1' r-2 e2
  'e1<b1>' r-2 g+2 r-1^1 >>d1e1<<
 ]
 '>>d1<<g+1e1<b1>'
 '>>c+1<<b1f1c+1'

 >>'a1c+1''g+1e1''e1<a1>''f+1d1'<< r-1^1^1^1
 'a1f+1c+1'
 'g+1e1<b1>'
 '>c+1<a1f+1'
 'b1f+1d1'

 [4 'f+4c+4<a4>'] r-1 >>f+1<<
 [4 'g+4e4<b4>']  r-1 >>e1<<

 'a1^1c+1^1>>f+1^1<a1^1<'
 'a1^1e1^1>>g+1^1<b1^1<'
 '<c+1>a1^1c+1^1>>f+1^1<a1^1<'
 '<e1>a1^1e1^1>>g+1^1<b1^1<'

 v(MML(v)-8)
 'a1^1c+1^1'
 'g+1^1e1^1'
 'f+1^1c+1^1'
 'g+1^1e1^1'

 v(MML(v)-10)
 q90
 'f+1.c+1.<f+1.>'



//------------------------------------
// Track 5 : 
//------------------------------------
TR(5) CH(5) P(14)
@31,90,0 v55
FineTune(68)
M.onNoteWave(0,60,!1^1)
Slur(0)

 l8
 [7 r1]
 q50
 r2..<e16e16>

 o4
 q90 'f+1^2..c+1^2..<a1^2..>' q50<f+16f+16>
 q90 'g+1^2.e1^2.<b1^2.>' < BendEx(!4,!16,{o4b},{o3b})b4>

 [2
  q80 'f+c+<a>' q50<[8 'f+16c+16']> [2 q80 'f+c+<a>'< q50'f+16c+16'>]
  q50<[2 'f+16c+16']>q80 'f+c+<a>' q60<[6 'f+16c+16']> [2 q80 'f+c+<a>'< q50'f+16c+16'>]
  :
  q80 'g+e<b>' q50<[8 'g+16e16']> [2 q80 'g+e<b>'< q50'g+16e16'>]
  q50<[2 'g+16e16']>q80 'g+e<b>' q60<[6 'g+16e16']> [2 q80 'g+e<b>'< q50'g+16e16'>]
 ]
 q80 'e<bg+>' q50<[8 'g+16e16']> [2 q80 'e<bg+>'< q50'g+16e16'>]
 q90 'g+2..e2..<b2..>' q50<[2 'g+16e16']>

[2
 v(MML(v)-10)
 q40
 'f+c+'rr'f+c+'rr'a4c+4' 'g+c+'rr'g+c+'r'e4.c+4.'
 'f+c+'rr'f+c+'rr'>c+4<f+4' 'g+c+'rr'g+c+'r'e4c+4'e
 'f+c+'rr'f+c+'rr'a4c+4' 'g+c+'rr'g+c+'r'e4.c+4.'
 'f+c+'rr'f+c+'rr'>c+4<f+4' 'g+c+'rr'ec+'r'b4g+4' q30 e16e16
 v(MML(v)+10)
 q90 'a2..>c+2..<' q30 e16e16 q90 'b2..g+2..' q30 e16e16
 q90 'a2..f+2..'   q30 e16e16 q90 'b2..>e2..<' q30 e16e16
 q90 'a2..>c+2..<' q30 e16e16 q90 'b2..g+2..' q30 e16e16
 q90 'a2..>c+2..<' q30 e16e16 q90 'b2>e2<' q50 [4 'e8<g+8>']

 [2
  q45 [5 '<a>e'] q30[2'<a16>e16'] q80 'a4e4>c+4<'
  q45 '<a>f+' q30[2 '<a16>f+16'] q45 [4 '<a>f+']q80 'a4f+4>c+4<'
  :
  q45 [5 'c+g+'] q30[2'c+16g+16'] q80 'g+4>c+4e4<'
  q45 '<g+>e' q30[2 '<g+16>e16'] q45 [4 '<g+>e']q80 'e4g+4>c+4<'
 ]
 q45 [5 '<b>g+'] q30[2'<b16>g+16'] q80 'g+4b4>d4<'
 q90 'g+2e2<b2>' q40 [4 'e<b>']

 q90
 'f+1c+1'
 'e1c+1'
 'e1<a1>'
 'f+2.d2.' q45 'd<b>' q35 [2 'd<b16>']

 q70'aec+' q40 [10 'c+16<a16>'] q80'a4e4c+4'
 q70'g+eb' q40 [10 '<b16g+16>'] q80'g+4>e4<b4'
 :
 q80 'f+c+<a>' q50<[8 'f+16c+16']> [2 q80 'f+c+<a>'< q50'f+16c+16'>]
 q50<[2 'f+16c+16']>q80 'f+c+<a>' q60<[6 'f+16c+16']> [2 q80 'f+c+<a>'< q50'f+16c+16'>]
 q80 'g+e<b>' q50<[8 'g+16e16']> [2 q80 'g+e<b>'< q50'g+16e16'>]
 q50<[2 'g+16e16']>q80 'g+e<b>' q60<[6 'g+16e16']> [2 q80 'g+e<b>'< q50'g+16e16'>]
]

 q60 'f+4c+4<a4>' r2.
 r1
 r1
 q50
 r2..<e16e16>

 q90 'f+1^2..c+1^2..<a1^2..>' q50<f+16f+16>
 q90 'g+1^2.e1^2.<b1^2.>' < BendEx(!4,!16,{o4b},{o3b})b4>

 [2
  q80 'f+c+<a>' q50<[8 'f+16c+16']> [2 q80 'f+c+<a>'< q50'f+16c+16'>]
  q50<[2 'f+16c+16']>q80 'f+c+<a>' q60<[6 'f+16c+16']> [2 q80 'f+c+<a>'< q50'f+16c+16'>]
  :
  q80 'g+e<b>' q50<[8 'g+16e16']> [2 q80 'g+e<b>'< q50'g+16e16'>]
  q50<[2 'g+16e16']>q80 'g+e<b>' q60<[6 'g+16e16']> [2 q80 'g+e<b>'< q50'g+16e16'>]
 ]
 q80 'e<bg+>' q50<[8 'g+16e16']> [2 q80 'e<bg+>'< q50'g+16e16'>]
 q90 'g+2..e2..<b2..>' q50<[2 'g+16e16']>

 [2
  [2
   [3 q45 '<a>e' q30[2'<a16>e16']] q80 'a4e4>c+4<'
   [3 q45 '<a>f+' q30[2 '<a16>f+16']] q80 'a4f+4>c+4<'
   :
   [3 q45 'c+g+' q30[2'c+16g+16']] q80 'g+4>c+4e4<'
   [3 q45 '<g+>e' q30[2 '<g+16>e16']] q80 'e4g+4>c+4<'
  ]:
  [3 q45 '<b>g+' q30[2'<b16>g+16']] q80 'g+4b4>d4<'
  q90 'g+2e2<b2>' q40 'e<b>' [6 q30 'e16<b16>']
 ]
 q30[12 '<b16>g+16'] q80 'g+b>e<' q30[2 '<b16>g+16']
 q90 'f2c+2<a2>' q40 'c+<a>' [4 q30 'c+16<a16>'] q40 'c+<a>'

 q90
 'f+1c+1'
 'e2..c+2..' q40<e16e16>q90
 'e1<a1>'
 'f+2.d2.' q45 'd<b>' q35 [2 'd<b16>']

 q70'aec+' q40 [10 'c+16<a16>'] q80'a4e4c+4'
 q70'g+eb' q40 [10 '<b16g+16>'] q80'g+4>e4<b4'

 EP.onTime(127,0,!1^1)
 q90 'f+1^1c+1^1<a1^1>'


//------------------------------------
// Track 6 : 
//------------------------------------
TR(6) CH(6) P(117)
@31,90,0 v40
FineTune(60)
M.onNoteWave(0,60,!1^1)
Slur(0)

 r64
 l8
 [7 r1]
 q50
 r2..<e16e16>

 o4
 q90 'f+1^2..c+1^2..<a1^2..>' q50<f+16f+16>
 q90 'g+1^2.e1^2.<b1^2.>' < BendEx(!4,!16,{o4b},{o3b})b4>

 [2
  q80 'f+c+<a>' q50<[8 'f+16c+16']> [2 q80 'f+c+<a>'< q50'f+16c+16'>]
  q50<[2 'f+16c+16']>q80 'f+c+<a>' q60<[6 'f+16c+16']> [2 q80 'f+c+<a>'< q50'f+16c+16'>]
  :
  q80 'g+e<b>' q50<[8 'g+16e16']> [2 q80 'g+e<b>'< q50'g+16e16'>]
  q50<[2 'g+16e16']>q80 'g+e<b>' q60<[6 'g+16e16']> [2 q80 'g+e<b>'< q50'g+16e16'>]
 ]
 q80 'e<bg+>' q50<[8 'g+16e16']> [2 q80 'e<bg+>'< q50'g+16e16'>]
 q90 'g+2..e2..<b2..>' q50<[2 'g+16e16']>

[2
 v(MML(v)-10)
 q40
 'f+c+'rr'f+c+'rr'a4c+4' 'g+c+'rr'g+c+'r'e4.c+4.'
 'f+c+'rr'f+c+'rr'>c+4<f+4' 'g+c+'rr'g+c+'r'e4c+4'e
 'f+c+'rr'f+c+'rr'a4c+4' 'g+c+'rr'g+c+'r'e4.c+4.'
 'f+c+'rr'f+c+'rr'>c+4<f+4' 'g+c+'rr'ec+'r'b4g+4' q30 e16e16
 v(MML(v)+10)
 q90 'a2..>c+2..<' q30 e16e16 q90 'b2..g+2..' q30 e16e16
 q90 'a2..f+2..'   q30 e16e16 q90 'b2..>e2..<' q30 e16e16
 q90 'a2..>c+2..<' q30 e16e16 q90 'b2..g+2..' q30 e16e16
 q90 'a2..>c+2..<' q30 e16e16 q90 'b2>e2<' q50 [4 '>e8<g+8']

 [2
  q45 [5 '<a>e'] q30[2'<a16>e16'] q80 'a4e4>c+4<'
  q45 '<a>f+' q30[2 '<a16>f+16'] q45 [4 '<a>f+']q80 'a4f+4>c+4<'
  :
  q45 [5 'c+g+'] q30[2'c+16g+16'] q80 'g+4>c+4e4<'
  q45 '<g+>e' q30[2 '<g+16>e16'] q45 [4 '<g+>e']q80 'e4g+4>c+4<'
 ]
 q45 [5 '<b>g+'] q30[2'<b16>g+16'] q80 'g+4b4>d4<'
 q90 'g+2e2<b2>' q40 [4 'e<b>']

 q90
 'f+1c+1'
 'e1c+1'
 'e1<a1>'
 'f+2.d2.' q45 'd<b>' q35 [2 'd<b16>']

 q70'aec+' q40 [10 'c+16<a16>'] q80'a4e4c+4'
 q70'g+eb' q40 [10 '<b16g+16>'] q80'g+4>e4<b4'
 :
 q80 'f+c+<a>' q50<[8 'f+16c+16']> [2 q80 'f+c+<a>'< q50'f+16c+16'>]
 q50<[2 'f+16c+16']>q80 'f+c+<a>' q60<[6 'f+16c+16']> [2 q80 'f+c+<a>'< q50'f+16c+16'>]
 q80 'g+e<b>' q50<[8 'g+16e16']> [2 q80 'g+e<b>'< q50'g+16e16'>]
 q50<[2 'g+16e16']>q80 'g+e<b>' q60<[6 'g+16e16']> [2 q80 'g+e<b>'< q50'g+16e16'>]
]

 q60 'f+4c+4<a4>' r2.
 r1
 r1
 q50
 r2..<e16e16>

 q90 'f+1^2..c+1^2..<a1^2..>' q50<f+16f+16>
 q90 'g+1^2.e1^2.<b1^2.>' < BendEx(!4,!16,{o4b},{o3b})b4>

 [2
  q80 'f+c+<a>' q50<[8 'f+16c+16']> [2 q80 'f+c+<a>'< q50'f+16c+16'>]
  q50<[2 'f+16c+16']>q80 'f+c+<a>' q60<[6 'f+16c+16']> [2 q80 'f+c+<a>'< q50'f+16c+16'>]
  :
  q80 'g+e<b>' q50<[8 'g+16e16']> [2 q80 'g+e<b>'< q50'g+16e16'>]
  q50<[2 'g+16e16']>q80 'g+e<b>' q60<[6 'g+16e16']> [2 q80 'g+e<b>'< q50'g+16e16'>]
 ]
 q80 'e<bg+>' q50<[8 'g+16e16']> [2 q80 'e<bg+>'< q50'g+16e16'>]
 q90 'g+2..e2..<b2..>' q50<[2 'g+16e16']>

 [2
  [2
   [3 q45 '<a>e' q30[2'<a16>e16']] q80 'a4e4>c+4<'
   [3 q45 '<a>f+' q30[2 '<a16>f+16']] q80 'a4f+4>c+4<'
   :
   [3 q45 'c+g+' q30[2'c+16g+16']] q80 'g+4>c+4e4<'
   [3 q45 '<g+>e' q30[2 '<g+16>e16']] q80 'e4g+4>c+4<'
  ]:
  [3 q45 '<b>g+' q30[2'<b16>g+16']] q80 'g+4b4>d4<'
  q90 'g+2e2<b2>' q40 'e<b>' [6 q30 'e16<b16>']
 ]
 q30[12 '<b16>g+16'] q80 'g+b>e<' q30[2 '<b16>g+16']
 q90 'f2c+2<a2>' q40 'c+<a>' [4 q30 'c+16<a16>'] q40 'c+<a>'

 q90
 'f+1c+1'
 'e2..c+2..' q40<e16e16>q90
 'e1<a1>'
 'f+2.d2.' q45 'd<b>' q35 [2 'd<b16>']

 q70'aec+' q40 [10 'c+16<a16>'] q80'a4e4c+4'
 q70'g+eb' q40 [10 '<b16g+16>'] q80'g+4>e4<b4'

 EP.onTime(127,0,!1^1)
 q90 'f+1^1c+1^1<a1^1>'


//------------------------------------
// Track 7 : 
//------------------------------------
TR(7) CH(7) P(64)
@82,110,5 v72
M.onNoteWave(0,50,!1.)

 o5 l8 q90
 [16 r1]

 [4 r1]

[2
 v(MML(v)-10)
 rrrc+f+g+4.a4g+e4<br> c+^2 rc+.c+.<b1>
 rrrc+f+g+4.a4g+e4br a^2 >rc+.c+.<b1
 rrrc+f+g+4.a4g+e4<br> c+^2 rc+.c+.<b^2g+ab>
 rrrc+f+g+4.a4g+e4br a^2 >rc+.c+.<b2r v(MML(v)+5) bag+ v(MML(v)+5)

 a2rag+f+ a2f+4a4
 g+2rg+f+e g+2rbag+
 a2rag+f+ a2b4>c+4<
 b2>d2 c+2r< v(MML(v)-5) bag+

 f+2.c+4 g+2b4.g+
 a2>c+4.<a b2.g+4
 a2f+4.a b2g+4.e
 f+1
 v(MML(v)+5)
 r1r1r1
 :
]
 [11 r1]
 r2rbag+

 a2rag+f+ a2f+4a4
 g+2rg+f+e g+2rbag+
 a2rag+f+ a2b4>c+4<
 b2>d2 c+2r< v(MML(v)-5) bag+

 a2rag+f+ a2b4>c+4<
 g+2rg+ab g+2rbag+
 a2rag+f+ a2b4>c+4<
 >d2f+2 f2r< v(MML(v)-5) bag+

 f+2.c+4 g+2b4.g+
 a2>c+4.<a b2.g+4
 a2f+4.a b2g+4.e

 f+1^1



//------------------------------------
// Track 8 : 
//------------------------------------
TR(8) CH(8) P(64)
@76 v90
M.onNoteWave(10,90,!1)
Slur(0)

 [84 r1]

 [4 r1]

 o6 q99 l8
 '<a1>c+1' r-8 d32d+32e16
 '<a1>c+1' r-1 f+4..g32g+32 a2
 '<b1>e1'  r-1 g+2..g+32g32f+32f32
 '<g+1>' r-1 e4..d32c+32<b2>

 v(MML(v)+10)
 v(MML(v)-10) 'c+1^f+1^1' v(MML(v)+10) r-1^1 a2....a32 g+4..f+32f32 e2
 v(MML(v)-10) 'g+1^1e1^1' v(MML(v)+10) r-1^1 c+2..<b>c+2e2
 v(MML(v)-10) 'a1^f+1^1'  v(MML(v)+10) r-1^1 c+2..d16e16f+2 a8&!8>c+4.<
 v(MML(v)-10) 'g+1e1' v(MML(v)+10) r-1 b2..>c+16d16<
 q180 v(MML(v)-10) 'b1g+1' v(MML(v)+10) r-1 > c+8&!8e2.. <
 r-2 EP.onTime(127,0,!1.) r2



//------------------------------------
// Track 9 : 
//------------------------------------
TR(9) CH(9) P(64)



//------------------------------------
// Track 10 : ドラム系
//------------------------------------
TR(10) CH(10)
// マクロ定義
// b = bass / s = Snare
$b{n36,} $s{n38,}
// 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
l8
Rhythm {

 [7 r1]
 v110 r2.. b r-8 v90 w16w16

 v110 b1 r-1 v120 e2.. v100g64w16.. r-1 y2.. v90[3 d24]
 v110 b1 r-1 v100 j1 r-1 v110 [2 'a.z.''z.w.' : w16g16] w r-8 s32s16.
 v110 b1 r-1 v120 e2.. v100g64w32.w16 r-1 y2.. v90[3 d24]
 v110 b2b4b4 r-1 v100 j1 r-1 v110 'a.z.''z.w.' s32s32s16 l16 v80rsv90ss v100ssv110ss l8

 [2
  v110 bbr4rbr4      r-1 v110 rrs4rrs4 r-1 v127 e v70j [3 v100j v70j]
  v110 bbr4rb16b16rb r-1 v110 rrs4rrs4 r-1 [4 v100j v70j]
  :
  v110 bbr4rbr4      r-1 v110 rrs4rrs4 r-1 [4 v100j v70j]
  v110 bbr4bb16b16rb16b16 r-1 v110 rrs4rrss r-1 [3 v100j v70j] v100d4
 ]
 v110 bbr4rbr4 r-1 v110 rrs4rrss16s16 r-1 [3 v100j v70j] v100i4
 v110 b2rbrb r-1 v110 rrrs16s16 l16 azsa zwsg l8 r-1 v120 e r-8 y r4. r2

[2
 [2
  [2
   v110 brrbrrrb r-1 v110 rrrrrrs4 r-1 v127 y v60c [3 v90c v60c]
   v110 brrbrbrr r-1 v110 rrrrrrs4 r-1 [4 v90c v60c]
   v110 brrbrrrb r-1 v110 rrrrrrs4 r-1 [4 v90c v60c]
   :
   v110 brrbrbrb r-1 v110 rrrrrrsw16g16 r-1 [4 v90c v60c]
  ]
  :
  v110 brrbrbrb r-1 v110 rrrrrss16s16w16w16 r-1 [4 v90c v60c]
 ]
 v110 brrbbbrb r-1 v110 rrs4rsss16s16 r-1 v90c v60c v100d4 v110 i2

 [2
  v110 brrrbbrr r-1 v110 rrs4rrs4 r-1 v127 e v80c [3 v100c v80c]
  v110 brrrbbrr r-1 v110 rrs4rrs4 r-1 [4 v100c v80c]
  v110 brrrbbrr r-1 v110 rrs4rrs4 r-1 [4 v100c v80c]
  :
  v110 brrrbbrr r-1 v110 rrs4rr'sw's16s16 r-1 [3 v100c v80c] v70o4
 ]
 v110 brrrbbrr r-1 v110 rrs4r16s.s16s16w16g16 r-1 [3 v100c v80c] v70o4

 v110 brrbrrrb r-1 v110 rrrrs4rr r-1 v127 y v70j [3 v90j v70j]
 v110 bbrbrbrb r-1 v110 rrrrs4rv80s r-1 [4 v90j v70j]
 v110 brrbrrrb r-1 v110 rrrrs4rr r-1 [4 v90j v70j]
 v110 brrrbbrr r-1 v110 rrs4rv100sv110sv90s16s16 r-1 [3 v90j v70j] v90i4

 v110 brrrbbrr r-1 v110 rrs4rrss16s16 r-1 v127 y v80j [3 v100j v80j]
 v110 brbrbrbr r-1 v110 l16 ra32a32az zzss q32q32azw s64s32.swg l8 r-1 v127 d1
 :
 v110 bbr4rbr4      r-1 v110 rrs4rrs4 r-1 v127 e v70j [3 v100j v70j]
 v110 bbr4rb16b16rb r-1 v110 rrs4rrs4 r-1 [4 v100j v70j]
 v110 bbr4rbr4      r-1 v110 rrs4rrs4 r-1 [4 v100j v70j]
 v110 bbr4bb16b16rb16b16 r-1 v110 rrs4rss16s16w16g16 r-1 [3 v100j v70j] v100d4
]

 v110 b1 r-1 v127 e1 r-1 v127 y1
 r1r1
 v110 r2..b16b16 r-8 v80 [3 d24]

 v110 b1 r-1 v120 e2.. v100g64w32.w16 r-1 y2.. v90[3 d24]
 v110 b1 r-1 v100 j1 r-1 v110 [2 'a.z.''z.w.' : w16g16] w r-8 s32s16.
 v110 b1 r-1 v120 e2. v100 g16w32w32 g64w32.w16 r-1 y2.. v90[3 d24]
 v110 b2b4b4 r-1 v100 j1 r-1 v110 'a.z.''z.w.' s32s32s16 l16 v80rsv90ss v100ssv110ss l8

 [2
  v110 bbr4rbr4      r-1 v110 rrs4rrs4 r-1 v127 e v70j [3 v100j v70j]
  v110 bbr4rb16b16rb r-1 v110 rrs4rrs4 r-1 [4 v100j v70j]
  :
  v110 bbr4rbr4      r-1 v110 rrs4rrs4 r-1 [4 v100j v70j]
  v110 bbr4bb16b16rb16b16 r-1 v110 rrs4rrss r-1 [3 v100j v70j] v100d4
 ]
 v110 bbr4rbr4 r-1 v110 rrs4rrss16s16 r-1 [3 v100j v70j] v100i4
 v110 b2rbrb r-1 v110 rrrs16s16 l16 gv90[3 s24]z v100ss v110wg l8 r-1 v120 e r-8 y r4. r2

 [2
  [2
   v110 bbrrbbrr r-1 v110 rrs4rrs4 r-1 v127 e v80c [3 v100c v80c]
   v110 bbrrbbrr r-1 v110 rrs4rrs4 r-1 [4 v100c v80c]
   v110 bbrrbbrr r-1 v110 rrs4rrs4 r-1 [4 v100c v80c]
   :
   v110 bbrrbbrr r-1 v110 rrs4rr'sw's16s16 r-1 [3 v100c v80c] v70o4
  ]
  :
  v110 bbrrbbrr r-1 v110 rrs4r16s.s16s16w16g16 r-1 [3 v100c v80c] v70o4
 ]
 v110 bbrrbbrr r-1 v110 rrs4r16s.s16s16w16g16 r-1 [3 v100c v80c] v70o4

 v110 brrbrrrb r-1 v110 rrrrs4rr r-1 v127 y v70j [3 v90j v70j]
 v110 bbrbrbrb r-1 v110 rrrrs4rv80s r-1 [4 v90j v70j]
 v110 brrbrrrb r-1 v110 rrrrs4rr r-1 [4 v90j v70j]
 v110 brrrbbrr r-1 v110 rrs4rv100sv110sv90[3 s24] r-1 [3 v90j v70j] v90i4

 v110 brrrbbrr r-1 v110 rrs4rrss16s16 r-1 v127 y v80j [3 v100j v80j]
 v110 brbrbrbr r-1 v110 l16 ra32a32az zzss q32q32azw s64s32.swg l8 r-1 v127 d1

 v110 b2.. v80 b r-1 v127 e1 r-1 v127 y1
 v90 b4.b4.rb r-8 v100 [3 d24]
 v100 b2.. v80 b r-1 v100 j1
 v100 b4.b4.rb16b16
 v110 b1 r-1 v120 e1 r-1 v120 y1
 v90 r2..b r-8 [3 d24]
 v90 b1 r-1 v80 j1
 r2 l32 v40eyv50ey v60eyv70ey v80eyv90ey eyv100ey
 v90 b1 r-1 v110 e1 r-1 y1
 

}