//-----------------------------------------------
// Feel a little vague
// (C)Yax
//-----------------------------------------------

ResetGM();

TrackName     = {"Feel a little vague"}
Copyright     = {"Yax"}

r4
TrackSync;


// アルペジオ関数
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(40) CHO(0)
TR(2)  V(110) REV(40) CHO(0)
TR(3)  V(110) REV(60) CHO(30)
TR(4)  V(80)  REV(50) CHO(80)
TR(5)  V(100) REV(90) CHO(70)
TR(6)  V(90)  REV(30) CHO(55)
TR(16) V(98)  REV(90) CHO(80)
TR(7)  V(90)  REV(30) CHO(65)
TR(8)  V(111) REV(40) CHO(40)
TR(9)  V(110) REV(20) CHO(0)
TR(10) V(116) REV(50) CHO(0)


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

Tempo=(T)


// キー

INT KEY=-1


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




//------------------------------------
// Track 1 : 
//------------------------------------
TR(1) CH(1) P(64)
@34,90,1 v100
M.onNoteWave(5,90,!1)
PitchBend(0)
BR(2)

  o2 l8 q70

  [7 r1]
  r2 f+f+af+

  [2
   [10 g] bb >dd<bb
   [10 f+] aa >c+c+<aa
   [10 e] f+f+ gg bb
   :
   [10 f+] aa >c+c+< af+
  ]
  [8 f+]
  a1

 [2
  errerr>d&e< rerr ereg
  f+rrf+rr >c+&d< rf+rr f+r>c+<a
  grrgrr>g&b< rgrr grge
  arrarr>c+&e< rarr aef+a

  [8 e v(MML(v)-10) e v(MML(v)+10) ]
  [8 f+ v(MML(v)-10) f+ v(MML(v)+10) ]
  [8 g v(MML(v)-10) g v(MML(v)+10) ]
  [8 a v(MML(v)-10) a v(MML(v)+10) ]

  g1
  f+1
  bbbb bbaa
  bbbb bbf+f+

  e.g.b g2
  f+.a.>c+<a2
  bbbb bf+b>d<
  bbbb>dd<bb

  [2
   [10 g] bb >dd<bb
   [10 f+] aa >c+c+<aa
   [10 e] f+f+ gg bb
   :
   [10 f+] aa >c+c+< af+
  ]
  [8 f+]
  :
  a1
 ]
 [4 a] [4 >c+<]

  [2
   g2..e b.>f+32&g^32<b >c+32&d^32<b.g
   a4.>g+32&a4... e c+.<a.f+ a.f+.e
   g2..b >d.e.f+32&g16. d.<g.b
   :
   a4.>e2 f+ a.>c32&c+^32<a f+.e.c+<
  ]
  a.>c+.f+ e.f+.<a^1

  [8 r1]

  EP.onTime(80,127,!1) rf+f+f+ f+f+f+d

  [2
   [2
    [10 g] bb >dd<bb
    [10 f+] aa >c+c+<aa
    [10 e] f+f+ gg bb
    :
    [10 f+] aa >c+c+< af+
   ]
   [8 f+]
   :
   aa>c+c+ ee<aa
  ]
  a1


//------------------------------------
// Track 2 : 
//------------------------------------
TR(2) CH(2) P(44)
@1 v95

 o5 l8 q80

  y64,1; ARP(1,!4.,{gb>df+<}) ARP(!8,!2^8,{b>df+<}) y64,0;
  y64,1; ARP(1,!2,{a>c+ef+<}) >e2< y64,0;
  y64,1; ARP(1,!2,{f+a>c+e<}) >c+e4.< y64,0;
  y64,1; ARP(1,!2,{f+ab>d<}) y64,0; y64,1; ARP(1,!2,{f+a>c+e<}) y64,0;

  y64,1; ARP(1,!4.,{gb>df+<}) ARP(!8,!2^8,{b>df+<}) y64,0;
  y64,1; ARP(1,!4.,{a>c+ef+<}) >'a4.e4.'f+4< y64,0;
  y64,1; ARP(1,!2,{>c+ef+a<}) >f+a>c+<a< y64,0;
  y64,1; ARP(3,!1,{a>df+b<}) y64,0;

  [2
   ARP(0,!4.,{gb>df+<}) ARP(0,!4,{gb>df+<}) ARP(0,!4.,{gb>df+<})
   ARP(0,!4.,{gb>df+<}) ARP(0,!4.,{gb>d<}) ARP(0,!4,{gb>df+<})
   ARP(0,!2^8,{f+a>c+e<}) ARP(0,!4.,{f+a>c+e<})
   ARP(0,!4.,{f+a>c+e<}) ARP(0,!4.,{ef+a>c+<}) ARP(0,!4,{f+a>c+e<})
   ARP(0,!4.,{egb>d<}) ARP(0,!4,{egb>d<}) ARP(0,!4.,{egb>d<})
   ARP(0,!2,{egb>d<}) ARP(0,!2,{b>deg<})
   ARP(0,!2^8,{a>c+ef+<}) ARP(0,!4.,{a>c+ef+<})
   :
   y64,1; f+a>c+e af+ec+< y64,0;
  ]
  ARP(4,!1,{a>c+ef+a<})

 [2
  y64,1; ARP(0,!1,{egb>d<}) regb>d2< y64,0;
  y64,1; ARP(0,!1,{df+a>c+<})f+4.'a4.d4.'f+4 y64,0;
  y64,1; ARP(0,!1,{egb>d<}) rgb>dg2< y64,0;
  y64,1; ARP(0,!1,{f+a>c+e<}) r>'ae'f+c+ ec+<af+ y64,0;

  [4 ARP(0,!4,{degb}) e ] ARP(2,!2,{egb>d<})
  y64,1; ARP(1,!1,{df+a>c+<}) r>c+af+ dc+<af+ y64,0;
  [4 ARP(0,!4,{egb>d<}) e ] ARP(2,!2,{egb>d<})
  y64,1; ARP(0,!1,{f+a>c+e<}) rf+a>c+f+2< y64,0;

  ARP(0,!1,{gb>de<})
  ARP(0,!1,{f+a>c+e<})
  y64,1; ARP(0,!1,{ab>df+<}) >a2 f+2< y64,0
  ARP(0,!1,{gb>de<})
  ARP(0,!1,{f+a>c+e<})
  y64,1; ARP(0,!1,{ab>df+<}) >b2 >d2 << y64,0

  [2
   ARP(0,!4.,{gb>df+<}) ARP(0,!4,{gb>df+<}) ARP(0,!4.,{gb>df+<})
   ARP(0,!4.,{gb>df+<}) ARP(0,!4.,{gb>d<}) ARP(0,!4,{gb>df+<})
   ARP(0,!2^8,{f+a>c+e<}) ARP(0,!4.,{f+a>c+e<})
   ARP(0,!4.,{f+a>c+e<}) ARP(0,!4.,{ef+a>c+<}) ARP(0,!4,{f+a>c+e<})
   ARP(0,!4.,{egb>d<}) ARP(0,!4,{egb>d<}) ARP(0,!4.,{egb>d<})
   ARP(0,!2,{egb>d<}) ARP(0,!2,{b>deg<})
   ARP(0,!2^8,{a>c+ef+<}) ARP(0,!4.,{a>c+ef+<})
   :
   y64,1; f+a>c+e af+ec+< y64,0;
  ]
  :
  ARP(4,!1,{a>c+ef+a<})
 ]
 ARP(0,!4,{a>c+ef+a<}) v(MML(v)-60) [6 v(MML(v)+10) ARP(0,!8,{a>c+ef+<})]

 [2
  ARP(0,!1,{gb>de<})   ARP(0,!2,{gb>de<})ARP(0,!2,{egb>d<})
  ARP(0,!1,{a>c+ef+<}) ARP(0,!2,{a>c+ef+<})ARP(0,!2,{f+a>c+e<})
  ARP(0,!1,{b>deg<})   ARP(0,!2,{b>deg<})ARP(0,!2,{gb>de<})
  :
  ARP(0,!1,{a>c+ef+<}) ARP(0,!2,{a>c+ef+<})ARP(0,!2,{>c+ef+a<})
 ]
 ARP(0,!2..,{a>c+ef+<}) ARP(0,!8^1,{>c+ef+a<})

  y64,1; ARP(1,!4.,{gb>df+<}) ARP(!8,!2^8,{b>df+<}) y64,0;
  y64,1; ARP(1,!2,{a>c+ef+<}) >e2< y64,0;
  y64,1; ARP(1,!2,{f+a>c+e<}) >c+e4.< y64,0;
  y64,1; ARP(1,!2,{f+ab>d<}) y64,0; y64,1; ARP(1,!2,{f+a>c+e<}) y64,0;

  y64,1; ARP(1,!4.,{gb>df+<}) ARP(!8,!2^8,{b>df+<}) y64,0;
  y64,1; ARP(1,!4.,{a>c+ef+<}) >'a4.e4.'f+4< y64,0;
  y64,1; ARP(1,!2,{>c+ef+a<}) >f+a>c+<a< y64,0;
  y64,1; ARP(3,!1,{a>df+b<}) y64,0;

 r v(MML(v)-70) [5 v(MML(v)+10) ARP(0,!8,{f+ab>d<})] [2 v(MML(v)+10) ARP(0,!8,{f+b>ce<})]

 [2
  [2
   ARP(0,!4.,{gb>df+<}) ARP(0,!4,{gb>df+<}) ARP(0,!4.,{gb>df+<})
   ARP(0,!4.,{gb>df+<}) ARP(0,!4.,{gb>d<}) ARP(0,!4,{gb>df+<})
   ARP(0,!2^8,{f+a>c+e<}) ARP(0,!4.,{f+a>c+e<})
   ARP(0,!4.,{f+a>c+e<}) ARP(0,!4.,{ef+a>c+<}) ARP(0,!4,{f+a>c+e<})
   ARP(0,!4.,{egb>d<}) ARP(0,!4,{egb>d<}) ARP(0,!4.,{egb>d<})
   ARP(0,!2,{egb>d<}) ARP(0,!2,{b>deg<})
   ARP(0,!2^8,{a>c+ef+<}) ARP(0,!4.,{a>c+ef+<})
   :
   y64,1; f+a>c+e af+ec+< y64,0;
  ]
  :
  y64,1; 'f+c+'a>c+e l16 'af+'>c+'ec+'f+ e'ae'f+c+ <l8< y64,0;
 ]
 ARP(4,!1,{a>c+ef+a<}) r-8 >d24d+24e24<

 [2
  y64,1; ARP(1,!4.,{gb>df+<}) ARP(!8,!2^8,{b>df+<}) y64,0;
  y64,1; ARP(1,!2,{a>c+ef+<}) >e2< y64,0;
  y64,1; ARP(1,!2,{f+a>c+e<}) >c+e4.< y64,0;
  y64,1; ARP(1,!2,{f+ab>d<}) y64,0; y64,1; ARP(1,!2,{f+a>c+e<}) y64,0;
  y64,1; ARP(1,!4.,{gb>df+<}) ARP(!8,!2^8,{b>df+<}) y64,0;
  y64,1; ARP(1,!4.,{a>c+ef+<}) >'a4.e4.'f+4< y64,0;
  :
  y64,1; ARP(1,!2,{>c+ef+a<}) >f+a>c+<a< y64,0;
  y64,1; ARP(3,!1,{a>df+b<}) y64,0; r-8 >d24d+24e24<
 ]
 DANDO(T,TE,!1,!8)
 y64,1; ARP(1,!2,{>c+ef+a<}) v(MML(v)-10) >f+a>c+<a< v(MML(v)+8)y64,0;
 Tempo(70)
 y64,1; ARP(5,!1.,{a>df+b<}) r-1 v(MML(v)-17) >>c+4. v(MML(v)-12) d^2<< y64,0; 


TR(22) CH(2)
Slur(3)
  o4 l8 q90

  v90
  g1
  a2 g2
  f+1
  b2 f+a>c+<a
  g1
  a2 f+2
  >c+2<a2
  b2 f+2

  [2
   g1 b1
   a1 f+1
   g1 e1
   f+1 'c+1a1'
  ]

 [2
  e4.g^2 <r b2..>
  d4.f+^2 <a2>c+2
  d4.g^2 r e4.<b2>
  c+4.a^2 <a2>c+2

  [8 g4]
  [8 f+4]
  [8 e4]
  [8 f+4]

  e4.g^2
  f+4.a2d
  d4.f+4.a4 f+2<b2>
  e4.g^2
  f+4.a2e
  a4.f+4.d4 <b1>

  [2
   g2d2 b2g2
   a1 f+2c+2
   g2d2 e2b2
   f+1 : 'c+2a2'e2
  ]
  :
  'c+1a1'
 ]
 c+&f+&a&>c+4&<a%f+4.

 [2
  y64,1; <g4b4>d4g4 e2<b2 y64,0;
  y64,1; f+4a4>c+4f+4 e2c+2 y64,0;
  y64,1; <g4b4>e4b4 g2d2 y64,0;
  :
  y64,1; <a4>c+4f+4a4 e2c+2 y64,0;
 ]
 y64,1; <a4>c+ef+ea y64,0; e^1

  g1
  a2 g2
  f+1
  b2 f+a>c+<a
  g1
  a2 f+2
  >c+2<a2
  'b1 f+1'

  <b4b4>c4f+4
  [4
   g2d2 b2g2
   a1 f+2c+2
   g2d2 e2b2
   f+1 : 'c+2a2'e2
  ]
  'c+1a1'

  [2
   g1    r-1 <g1>
   a2 g2 r-1 <a2r2>
   f+1   r-1 <f+1>
   b2 f+a>c+<a r-1 <b1>
   g1    r-1 <g1>
   a2 f+2 r-1 <a1>
   >c+2<a2 r-1 c+1
   :
   b2 f+2 r-1 <b1>
  ]
  b1. r-1. <b1.>




//------------------------------------
// Track 3 : 
//------------------------------------
TR(3) CH(3) P(84)
@105 v82
M.onNoteWave(10,50,!2)

 o7 l8 q90

 EP(100)
 r4. d4ef+g f+4.g16f+16e2
 r4. c+4.e4 d2.r4
 r4. d4ef+g f+4.f+16g16a2
 f+2>c+2<b2.r4

 [2
  rrd4g4f+4 d1
  rre4c+4a4 f+1
  rrd4a4f+4 a2b2
  rra4>c+4<b4 a1
 ]

  [16 r1]
  [8  r1]
  [16 r1]

  [16 r1]
  [8  r1]
  [16 r1]


  EP(60)
  [2
   [2 r4d4r4g4]
   [2 r4c+4r4f+4]
   [2 r4g4r4b4]
   :
   [2 r4f+4r4a4]
  ]
  r4f+4r4a 'f+^1a^1'

  EP(100)
  r4. d4ef+g f+4.g16f+16e2
  r4. c+4.e4 d2.r4
  r4. d4ef+g f+4.f+16g16a2
  f+2>c+2<b2.r4

  EP.onTime(30,80,!1)
  l16
  <<f+b>de <b>dea deab eab>d
  l8

  EP(100)
  [4
   rrd4g4f+4 d1
   rre4c+4a4 f+1
   rrd4a4f+4 a2b2
   rra4>c+4<b4 a1
  ]

  EP(100)
  r4. d4ef+g f+4.g16f+16e2
  r4. c+4.e4 d2.r4
  r4. d4ef+g f+4.f+16g16a2
  f+2>c+2<b2.r4
  r4. d4ef+g a4.g16f+16e2
  r4. a4.c+4 d2.r4
  r4. g4ef+g a4.a16b16>c+4<a4>
  c+2<a2 b1



//------------------------------------
// Track 4 : 
//------------------------------------
TR(4) CH(4) P(64)
@49 v65
M.onNoteWave(3,50,!1)

  o4 l8 q99

  v65
  r1r1r1r2. l32 f+gg+a a+b-b>c l8
  'd1<a1d1>' r-1 <<d1>>
  'e1c+1<e1>' r-1 <<e1>>
  'c+1<a1e1>' r-1 <<a1>>
  'd1<b1f+1>'  r-1 <<b1>>

  ARP(0,!1^1,{<db>de}) r-1 g2b2       r-1^1 <<d1^1>>
  ARP(0,!1^1,{<c+f+a>c+}) r-1 f+2e2   r-1^1 <<c+1^1>>
  ARP(0,!1^1,{<db>de}) r-1 g2e2       r-1^1 <<e1^1>>
  ARP(0,!1^1,{<c+a>c+e}) r-1 a2>c+2<  r-1^1 <<a1^1>>

  ARP(0,!1^1,{<db>deg}) r-1 b2e2      r-1^1 <<d1^1>>
  ARP(0,!1^1,{<c+f+a>c+f+}) r-1 a2>c+2< r-1^1 <<c+1^1>>
  ARP(0,!1^1,{<db>deg}) r-1 b2e2      r-1^1 <<d1^1>>
  ARP(0,!1^1,{<c+a>c+e}) r-1 'f+1a1'  r-1^1 <<e1^1>>

 [8 r1]

 [2
  q99
  <b.>e.g b1>d2<       r-1^1 <<b1^1>>
  <a.>c+.d a2 f+2>c+2< r-1^1 <c+1^1>
  e.g.b>d1 e2<         r-1^1 <<g1^1>>
  d.f+.a>c+2  >c+<adf+ <a>c+da< r-1^1 <<a1 f+1>>

  [2
   '<e1g1>'  r-1 rr v(MML(v)-30) [3 '>ge<'r  v(MML(v)+10)]
   '<f+1a1>' r-1 rr v(MML(v)-30) [3 '>af+<'r v(MML(v)+10)]
   '<f+1b1>' r-1 rr v(MML(v)-30) [3 '>bf+<'r v(MML(v)+10)]
   :
   '<f+1d1>' r-1 [2 '>bf+<'r] [2 '>b>d<<'r]
  ]
  '<f+1d1> >d1<b1'

  ARP(0,!1^1,{<db>de}) r-1 g2b2       r-1^1 <<d1^1>>
  ARP(0,!1^1,{<c+f+a>c+}) r-1 f+2e2   r-1^1 <<c+1^1>>
  ARP(0,!1^1,{<db>de}) r-1 g2e2       r-1^1 <<e1^1>>
  ARP(0,!1^1,{<c+a>c+e}) r-1 a2>c+2<  r-1^1 <<a1^1>>

  ARP(0,!1^1,{<db>deg}) r-1 b2e2      r-1^1 <<d1^1>>
  ARP(0,!1^1,{<c+f+a>c+f+}) r-1 a2>c+2< r-1^1 <<c+1^1>>
  ARP(0,!1^1,{<db>deg}) r-1 b2e2      r-1^1 <<d1^1>>
  ARP(0,!1^1,{<c+a>c+e}) r-1 'f+1a1'  r-1^1 <<e1^1>>
 :
  e2 g2 b2>d2<     r-1^1 <<b1^1>>
  c+2 f+2 a2>c+2<   r-1^1 <c+1^1>
  e2g2 b2>d2<       r-1^1 <<g1^1>>
  f+2a2>c+2 af+c+<a r-1^1 <<a1 f+1>>
 ]

  [2
   '<e1<b1>>' '<g1d1>'
   '<f+1c+1>' '<a1e1>'
   '<e1<b1>>' '<g1d1>'
   :
   '<f+1c+1>' '<a1e1>'
  ]
  '<f+2..c+2..>' '<a^1f+^1e^1>' 

  r1r1r1r2. < l32 f+gg+a a+b-b>c l8
  'd1<a1d1>' r-1 <<d1>>
  'e1c+1<e1>' r-1 <<e1>>
  'c+1<a1e1>' r-1 <<a1>>
  'd1<b1f+1>'  r-1 <<b1>>
  r1

  [2
   ARP(0,!1^1,{<db>de}) r-1 g2b2       r-1^1 <<d1^1>>
   ARP(0,!1^1,{<c+f+a>c+}) r-1 f+2e2   r-1^1 <<c+1^1>>
   ARP(0,!1^1,{<db>de}) r-1 g2e2       r-1^1 <<e1^1>>
   ARP(0,!1^1,{<c+a>c+e}) r-1 a2>c+2<  r-1^1 <<a1^1>>

   ARP(0,!1^1,{<db>deg}) r-1 b2e2      r-1^1 <<d1^1>>
   ARP(0,!1^1,{<c+f+a>c+f+}) r-1 a2>c+2< r-1^1 <<c+1^1>>
   ARP(0,!1^1,{<db>deg}) r-1 b2e2      r-1^1 <<d1^1>>
   :
   ARP(0,!1^1,{<c+a>c+e}) r-1 'f+2a2'c+2  r-1^1 <<e1^1>>
  ]
  ARP(0,!1^1,{<c+a>c+e}) r-1 'f+1a1'  r-1^1 <<e1^1>>

  EP(100)
  [4
   'd1<a1d1>' r-1 <<d1>>
   'e1c+1<e1>' r-1 <<e1>>
   'c+1<a1e1>' r-1 <<a1>>
   :
   'd1<b1f+1>'  r-1 <<b1>>
  ]
  'd1.<b1.a1.f+1.>'  r-1. <<b1. r-1 EP.onTime(100,50,!1)




//------------------------------------
// Track 5 : 
//------------------------------------
TR(5) CH(5) P(64)
@5 v90

 o5 l16 q99

 EP(50)
 P.onNote(0,127,32,96,64)
 [2
  [4 db>dg< v(MML(v)-15)]  v(MML(v)+60)
  [4 ea>c+a< v(MML(v)-15)]  v(MML(v)+60)
  [4 f+a>c+a< v(MML(v)-15)]  v(MML(v)+60)
  [4 f+a>db< v(MML(v)-15)]  v(MML(v)+60)
 ]

  EP(100)
  l8 <

  [2
   [8 '>gd<'b]
   [8 '>ae<' >c+<]
   [8 '>bg<' >e<]
   :
   [8 '>af+<' >c+<]
  ]
  [4 '>af+<' >c+<]
  a.>c+.f+a2

 [2
  EP(90)
  [2
   rrd4.  g4. e1
   rrc+4. a4. f+1
   rrd4.  b4. g1
   rre4.  >c+4.< a1
  ]

  EP(80)
  [2
   l16 <
   [4 ARP(!32,!8.,{b>eg>d<<}) v(MML(v)-15)] v(MML(v)+60) r4 >
   [4 ARP(!32,!8.,{c+f+a>e<}) v(MML(v)-15)] v(MML(v)+60) r4
   l8
   rf+a>d4<baf+ d4<ab>df+4.
  ]

  EP(100)
  <
  [2
   [8 '>gd<'b]
   [8 '>ae<' >c+<]
   [8 '>bg<' >e<]
   :
   [8 '>af+<' >c+<]
  ]
  [4 '>af+<' >c+<]
  a.>c+.f+a2
 ]

 [4
  d.g.b>d.<b.g^2d2
  :
  f+.a.>c+ e.c+.<a^2e2
 ]
 f+.a.>c+ e.c+.<a^1

 EP(50)
 l16
 [2
  [4 db>dg< v(MML(v)-15)]  v(MML(v)+60)
  [4 ea>c+a< v(MML(v)-15)]  v(MML(v)+60)
  [4 f+a>c+a< v(MML(v)-15)]  v(MML(v)+60)
  [4 f+a>db< v(MML(v)-15)]  v(MML(v)+60)
 ]
  EP(100)
  l16 <
  EP.onTime(40,90,!1)
  <f+b>de <b>dea deab eab>d<

  l8
  EP(100)
  [4
   [8 '>gd<'b]
   [8 '>ae<' >c+<]
   [8 '>bg<' >e<]
   :
   [8 '>af+<' >c+<]
  ]
  [4 '>af+<' >c+<]
  a.>c+.f+a2

  EP(50)
  l16
  [4
   [4 db>dg< v(MML(v)-15)]  v(MML(v)+60)
   [4 ea>c+a< v(MML(v)-15)]  v(MML(v)+60)
   [4 f+a>c+a< v(MML(v)-15)]  v(MML(v)+60)
   [4 f+a>db< v(MML(v)-15)]  v(MML(v)+60)
  ]




//------------------------------------
// Track 6 : 
//------------------------------------
TR(6) CH(6) P(10)
@30 v100
BR(2)
PitchBend(0)
FineTune(68)
M.onNoteWave(20,90,!1.)

 [8 r1]
 [16 r1]

 [16 r1]
 [8 r1]
 [16 r1]

 [16 r1]
 [8 r1]
 [15 r1]

 o5 l16
 r2.. q70 b>c+

  q90 c+8&!8d4^16..&!16c+64 c+32&d8^32 c+8.d8
  f&f+8 e8.d8<b4^16..&!16a64 q70 ab> q90
  c&!16c+4.^32.&!32c64 q80 c+8.<b8.>c+8< q90
  a4....&!16g64 q70 f32&f+16. ef+ gf+ga q90
  a+&b4^32.&!32.a+64 >f&f+4^32.&!32f64 d4
  g+&a4^32.&!32g64 f+4.d4
  d+&!16e4.^32.&!32d64 q80 e8.f+8.f+32&g. q90
  f+4^16..&!32e64 c+4^16..&!32<b64 q70 a8 b>c+ q90

  c+&!16d8^32.&!32c+64 q70 d<b>c+d q90 d+&!e8^32.&!32d+64 q70 ec+de
  q80 f&!32f+16..&!32f64 g+&!32a16..&!32g+64 g8 f32&f+8&f32 d8^32.&!32c64< b8>
  q90 c&!16c+4^32.&!32c64 d+&e4^32.&d+64 c+4
  g&!16a4^32.&!32g+64 e4....&!32d+64 q70 ef+ q90
  q80 f+&!32g4^32.&!32f+64 q70 ef+ q80 f+&!32g4^32.&!32f+64 q70 ef+ 
  q80 g8.a+32&b8&a+32 a8 q70 gef+g e.f+.g
  q90 g+&!16a4.^32.&!32g+64 q80 a8e>c+8<e
  q99 >d8&!8e2.....&!16.c+64


TR(26) CH(16) P(64)
@81 v70
BR(2)
PitchBend(0)
FineTune(60)
M.onNoteWave(20,90,!1)
r16.

 [8 r1]
 [16 r1]

 [16 r1]
 [8 r1]
 [16 r1]

 [16 r1]
 [8 r1]
 [15 r1]

 o5 l16
 r2.. q70 b>c+

  q90 c+8&!8d4^16..&!16c+64 c+32&d8^32 c+8.d8
  f&f+8 e8.d8<b4^16..&!16a64 q70 ab> q90
  c&!16c+4.^32.&!32c64 q80 c+8.<b8.>c+8< q90
  a4....&!16g64 q70 f32&f+16. ef+ gf+ga q90
  a+&b4^32.&!32.a+64 >f&f+4^32.&!32f64 d4
  g+&a4^32.&!32g64 f+4.d4
  d+&!16e4.^32.&!32d64 q80 e8.f+8.f+32&g. q90
  f+4^16..&!32e64 c+4^16..&!32<b64 q70 a8 b>c+ q90

  c+&!16d8^32.&!32c+64 q70 d<b>c+d q90 d+&!e8^32.&!32d+64 q70 ec+de
  q80 f&!32f+16..&!32f64 g+&!32a16..&!32g+64 g8 f32&f+8&f32 d8^32.&!32c64< b8>
  q90 c&!16c+4^32.&!32c64 d+&e4^32.&d+64 c+4
  g&!16a4^32.&!32g+64 e4....&!32d+64 q70 ef+ q90
  q80 f+&!32g4^32.&!32f+64 q70 ef+ q80 f+&!32g4^32.&!32f+64 q70 ef+ 
  q80 g8.a+32&b8&a+32 a8 q70 gef+g e.f+.g
  q90 g+&!16a4.^32.&!32g+64 q80 a8e>c+8<e
  q99 >d8&!8e2.....&!16.c+64

//------------------------------------
// Track 7 : 
//------------------------------------
TR(7) CH(7) P(117)
@30 v98
BR(2)
PitchBend(0)
FineTune(60)
M.onNoteWave(20,90,!1^4)
r64

 [8 r1]
 [16 r1]

 [16 r1]
 [8 r1]
 [16 r1]

 [16 r1]
 [8 r1]
 [15 r1]

 o5 l16
 r2.. q70 b>c+

  q90 c+8&!8d4^16..&!16c+64 c+32&d8^32 c+8.d8
  f&f+8 e8.d8<b4^16..&!16a64 q70 ab> q90
  c&!16c+4.^32.&!32c64 q80 c+8.<b8.>c+8< q90
  a4....&!16g64 q70 f32&f+16. ef+ gf+ga q90
  a+&b4^32.&!32.a+64 >f&f+4^32.&!32f64 d4
  g+&a4^32.&!32g64 f+4.d4
  d+&!16e4.^32.&!32d64 q80 e8.f+8.f+32&g. q90
  f+4^16..&!32e64 c+4^16..&!32<b64 q70 a8 b>c+ q90

  c+&!16d8^32.&!32c+64 q70 d<b>c+d q90 d+&!e8^32.&!32d+64 q70 ec+de
  q80 f&!32f+16..&!32f64 g+&!32a16..&!32g+64 g8 f32&f+8&f32 d8^32.&!32c64< b8>
  q90 c&!16c+4^32.&!32c64 d+&e4^32.&d+64 c+4
  g&!16a4^32.&!32g+64 e4....&!32d+64 q70 ef+ q90
  q80 f+&!32g4^32.&!32f+64 q70 ef+ q80 f+&!32g4^32.&!32f+64 q70 ef+ 
  q80 g8.a+32&b8&a+32 a8 q70 gef+g e.f+.g
  q90 g+&!16a4.^32.&!32g+64 q80 a8e>c+8<e
  q99 >d8&!8e2.....&!16.c+64



//------------------------------------
// Track 8 : 
//------------------------------------
TR(8) CH(8) P(64)
@72 v75
M.onNoteWave(0,50,!1)

 o5 l8

 [8 r1]
 [16 r1]

 [2
  [2
   rddc+d4c+d r dc+def+ga
   f+4c+c+2e f+4c+c+2r
   rddc+d4c+d r dc+def+gb
   a4f+f+2b : >c+4<aa^2
  ]
  >c+2<a2

  b4.bb4f+4
  a2f+2
  b2..>c+
  d2..<f+16a16
  b4.bb4>f+4
  e2c+2
  <b2..>c+
  d2. f+g r-4 v(MML(v)-10) de v(MML(v)+10)

  [2
   aaaa4bra^4g4f+4g4 r-1^1 v(MML(v)-10) f+f+f+f+4grf+^4e4d4e4 v(MML(v)+10)
   aaaa4>c+r<a2.ref+ r-1^1 v(MML(v)-10) f+f+f+f+4arf+2.rc+d v(MML(v)+10)
   gggg4gf+eg2b2     r-1^1 v(MML(v)-10) eeee4ed<b>e2g2 v(MML(v)+10)
   :
   aaaa4agf+a2.f+g   r-1^1 v(MML(v)-10) eeee4edc+e2.de v(MML(v)+10)
  ]
  :
  >c+c+c+c+4c+<ba>c+2..r< r-1^1 v(MML(v)-10) aaaa4agf+a2..r < v(MML(v)+10)
 ]
 >c+c+c+c+4c+<ba>c+1< r-1^1 v(MML(v)-10) aaaa4agf+a1 v(MML(v)+10)

 [16 r1]
 [8 r1]
 r2. f+g r-4 v(MML(v)-10) de v(MML(v)+10)

 [2
  [2
   aaaa4bra^4g4f+4g4 r-1^1 v(MML(v)-10) f+f+f+f+4grf+^4e4d4e4 v(MML(v)+10)
   aaaa4>c+r<a2.ref+ r-1^1 v(MML(v)-10) f+f+f+f+4arf+2.rc+d v(MML(v)+10)
   gggg4gf+eg2b2     r-1^1 v(MML(v)-10) eeee4ed<b>e2g2 v(MML(v)+10)
   :
   aaaa4agf+a2.f+g   r-1^1 v(MML(v)-10) eeee4edc+e2.de v(MML(v)+10)
  ]
  :
  >c+c+c+c+4c+<ba>c+2.<ag r-1^1 v(MML(v)-10) aaaa4agf+a2.f+e v(MML(v)+10)
 ]
 >c+c+c+c+4c+<ba>c+1< r-1^1 v(MML(v)-10) aaaa4agf+a1 v(MML(v)+10)


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



//------------------------------------
// Track 10 : ドラム系
//------------------------------------
TR(10) CH(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,}

@33,90,1
l8
Rhythm {

  [7 r1]
  v80brrr v90brbr  r-1 rv60'sw'v70'sw'v80'sw' v90'sw' v100 l16 ss qqab l8 r-1 v100 i1

  [2
   [2
    v80 brrr bbrr r-1 v100 rrs4rrs4 r-1 v127 e v80c [3 v100c v80c]
    v80 brrr bbrr r-1 v100 rrs4rrs4 r-1 [4 v100c v80c]
    :
    v80 brrr bbrr r-1 v100 rrs4rrs4 r-1 [4 v100c v80c]
    v80 brrr bbrb16b16 r-1 v100 rrs4rrs16s. r-1 [4 v100c v80c]
   ]
   :
   v80 brrr bbrr r-1 v100 rrs4rrs4 r-1 [4 v100c v80c]
   v80 brrb rbrb16b16 r-1 v100 rrs4 l16 sszz aass l8 r-1 [4 v100c v80c]
  ]
  v80 bbrb brbr r-1 v100 rrs4 l16 ssqq aazz l8 r-1 v100c v80c v90d v80c f4f4
  v80 brrr rrbv100s16s16 r-1 v127 y4r2v100j4

   [2
    v80 brrb rrrb r-1 v100 rrrr rrs4 r-1 v127 e4 [3 v100c4 ]
    v80 rbrr brrb r-1 v100 rrrr rrs4 r-1 [4 v100c4 ]
    v80 brrb rrrb r-1 v100 rrrr rrs4 r-1 [4 v100c4 ]
    :
    v80 rbrr brrr r-1 v100 rrrr rs4s r-1 [4 v100c4 ]
   ]
   v80 rbrr brrr r-1 v100 rrrr rss16s16s r-1 [4 v100c4 ]

   [2
    v80 brrr bbrr r-1 v100 rrs4 rrs4 r-1 v127 e v80c [3 v100c v80c]
    v80 brrr bbrr r-1 v100 rrs4 rrs4 r-1 [4 v100c v80c]
    v80 brrr bbrr r-1 v100 rrs4 rrs4 r-1 [4 v100c v80c]
    :
    v80 brrr bbrb r-1 v100 rrs4 rrs16s. r-1 [4 v100c v80c]
   ]
   v80 brrb rbrb r-1 v100 rrs4 s16s.s16s16a16z16 r-1 [4 v100c v80c]

 [2
   v80 brrb brrr r-1 v100 rrr4 rrs4 r-1 v127 y4  [3 v100 j4 ]
   v80 brrb brrr r-1 v100 rrr4 rs4s16s16 r-1 v127 e4 [3 v100j4]
   v80 brrr bbrr r-1 v100 rrs4 rrs4 r-1 v110 d v80j  [3 v100 j v80j ]
   v80 brrb brbr r-1 v100 rrs4 rs l16 qqaz l8 r-1 [4 v100 j v80j ]

   v80 b.b.b rbrr r-1 v100 rrrr rrs4 r-1 v127 y4  [3 v100 j4 ]
   v80 brrb brrr r-1 v100 r.s.r rsss16s16 r-1 v127 e4 [3 v100j4]
   v80 bbrr bbrr r-1 v100 rrs4 rrs4 r-1 v110 d v80j  [3 v100 j v80j ]
   v80 bbrb rbrb16b16 r-1 v100 rrs4 s16s. s16s. r-1 [4 v100 j v80j ]

  [2
   [2
    v80 brrr bbrr r-1 v100 rrs4rrs4 r-1 v127 e v80c [3 v100c v80c]
    v80 brrr bbrr r-1 v100 rrs4rrs4 r-1 [4 v100c v80c]
    :
    v80 brrr bbrr r-1 v100 rrs4rrs4 r-1 [4 v100c v80c]
    v80 brrr bbrb16b16 r-1 v100 rrs4rrs16s. r-1 [4 v100c v80c]
   ]
   :
   v80 brrr bbrr r-1 v100 rrs4rrs4 r-1 [4 v100c v80c]
   v80 brrb rbrb16b16 r-1 v100 rrs4 l16 sszz aass l8 r-1 [4 v100c v80c]
  ]
  :
  v80 bbrb brbr r-1 v100 rrs4 l16 ssqq aazz l8 r-1 v100c v80c v90d v80c f4f4
  v80 brrr rrbv100s16s16 r-1 v127 y4r2v100j4

   [2
    v80 brrb rrrb r-1 v100 rrSr rrs4 r-1 v127 e4 [3 v100c4 ]
    v80 rbrr brrb r-1 v100 rrSr rrs4 r-1 [4 v100c4 ]
    v80 brrb rrrb r-1 v100 rrSr rrs4 r-1 [4 v100c4 ]
    :
    v80 rbrr brrr r-1 v100 rrSr rs4s r-1 [4 v100c4 ]
   ]
   v80 rbrr brrr r-1 v100 rrSr rss16s16s r-1 [4 v100c4 ]

   [2
    v80 brrr bbrr r-1 v100 rrs4 rrs4 r-1 v127 e v80c [3 v100c v80c]
    v80 brrr bbrr r-1 v100 rrs4 rrs4 r-1 [4 v100c v80c]
    v80 brrr bbrr r-1 v100 rrs4 rrs4 r-1 [4 v100c v80c]
    :
    v80 brrr bbrb r-1 v100 rrs4 rrs16s. r-1 [4 v100c v80c]
   ]
   v80 brrb rbrb r-1 v100 rrs4 s16s.s16s16a16z16 r-1 [4 v100c v80c]
 ]
 v80 bbrb rbrb r-1 v100 rrs4 l16 ssrr zzss l8 r-1 v100c v80c v100d v80c fcfc
 v80 brbr brbr r-1 v100 l16 qasa qsqa saqs qass l8 r-1 v100 f4f4f4f4

 [2
  [2
   v80 bbrr bbrr r-1 v100 rrs4rrrs r-1 v127 e v80c [3 v100c v80c]
   v80 rbrr bbrr r-1 v100 rrs4rrs4 r-1 [4 v100c v80 : c] o
   :
   v80 bbrr bbrr r-1 v100 rrs4rrrs r-1 [4 v100c v80c]
   v80 rbrr bbrr r-1 v100 rrs4rrss16s16 r-1 [4 v100c v80c]
  ]
  :
  v80 bbrr bbrr r-1 v100 rrs4rrrs r-1 [4 v100c v80c]
  v80 rbrr brbr r-1 v100 rrss16s16 l16 zzss aass l8 r-1 [4 v100c v80c]
 ]
 v80 bbbr brbr r-1 v100 rrl16 sszz qqaa zzrr l8 r-1 v100 d4 f4f4fv127 'ey'
 v80 rbbr brbr r-1 v100 crcr crc16c16 v80o
 
 v80 brrr rrrr r-1 v120 i1
 [6 r1]
 v80 rrrr brrr r-1 v110 rrrr d2
 v80 brbr r.b16r.b16 r-1 r v60'sw'v75'sw'v90'sw' v100 l16 sqar szwr l8 r-1 v80 f4f4f4f4

 [2
  [2
   [2
    v80 brrr bbrr r-1 v100 rrs4rrs4 r-1 v127 e v80c [3 v100c v80c]
    v80 brrr bbrb r-1 v100 rrs4rrs4 r-1 [4 v100c v80c]
    :
    v80 brrr bbrr r-1 v100 rrs4rrs4 r-1 [4 v100c v80c]
    v80 brrr bb16b16rb16b16 r-1 v100 rrs4rrs16s. r-1 [4 v100c v80c]
   ]
   :
   v80 brrr bbrr r-1 v100 rrs4rrs4 r-1 [4 v100c v80c]
   v80 brrb rbrb16b16 r-1 v100 rrs4 l16 sszz aass l8 r-1 [4 v100c v80c]
  ]
  :
  v80 brrr bb16b16rr r-1 v100 rrs4rrss16s16 r-1 [4 v100c v80c]
  v80 brrb rbrb16b16 r-1 v100 l16 qass azss qqaa zzss l8 r-1 [4 v100c v80c]
 ]
 v80 bb16b16r.b16 brbr r-1 v100 rrss l16 ssqq aazz l8 r-1 v100c v80c v90d v80c f4f4
 v80 brrr rrrr r-1 v127 y4r2v100j4

}