//-----------------------------------------------
// funny street
// (C)Yax
//-----------------------------------------------

ResetGM();                 // GM音源リセット

//曲名
TrackName     = {"funny street"}

//著作権表示
Copyright     = {"Yax"}

r4
TrackSync;                 // 全てのトラックを同期



/*
 * アルペジオ記号用関数
 *  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)
}



// 全体の調整
TR(1)  V(110) REV(20) CHO(30)
TR(2)  V(110) REV(25) CHO(10)
TR(3)  V(115) REV(30) CHO(0)
TR(4)  V(127) REV(30) CHO(10)
TR(5)  V(110) REV(20) CHO(0)
TR(6)  V(110) REV(20) CHO(0)
TR(7)  V(110) REV(20) CHO(0)
TR(8)  V(110) REV(20) CHO(0)
TR(9)  V(110) REV(20) CHO(0)
TR(10) V(110) REV(25) CHO(0)


// テンポ
INT T  = 135   // 通常のテンポ

Tempo=(T)


// キー

INT KEY=0

Key(KEY)                    // 全体のキー
TR(10) TrackKey(KEY * -1)   // リズムトラックの調整用、Keyの符号を逆にしたものをセットしておく




//------------------------------------
// Track 1 : 
//------------------------------------
TR(1) CH(1) P(60)
@33 v105
M.onNoteWave(0,70,!4)

  o2 l12 q80
  r1r2.e6f+

  [2
   [2
    g+4b4g+4>c+6< b4ba4g+4f+4
    e4f+4g+4a6 b4ba4g+4>d4<
    g+4b4g+4>e6  d4dc+4<b4a4
   g+4a4b4>c+6< b4b>c+4d4f+4<
   ]

   a1r2rra^4 a1 >c+6c+12&!12e12c+6 c+6<a6e6
   a1r2rra^4 b1 g+2b4>c+<ba
  ]

  [2
   [2
    [2 f+4a6>d<f+6f+a6>d<]
    :
    [2 e4g+6>c+<e6eg+6>c+<]
   ]
   [2 e4g+6be6eg+6b]
  ]

  [2
   f+4g+6a4g+4a d4e6f+4e4f+
   e4f+6g+4f+4g+ : a4b6>c+4<b4a
  ]
  e6eg+f+e ag+f+bag+
  'd1b1'r2.e6f+


  [2
   g+4b4g+4>c+6< b4ba4g+4f+4
   e4f+4g+4a6 b4ba4g+4>d4<
   g+4b4g+4>e6  d4dc+4<b4a4
  g+4a4b4>c+6< b4b>c+4d4f+4<
  ]

  a1r2rra^4 a1 >c+6c+12&!12e12c+6 c+6<a6e6
  a1r2rra^4 b1 g+2b4>c+<ba

  [2
   [2
    [2 f+4a6>d<f+6f+a6>d<]
    :
    [2 e4g+6>c+<e6eg+6>c+<]
   ]
   [2 e4g+6be6eg+6b]
  ]

  [2
   f+4g+6a4g+4a d4e6f+4e4f+
   e4f+6g+4f+4g+ : a4b6>c+4<b4a
  ]
  e6eg+f+e ag+f+bag+
  'd1b1'r2.e6f+

  arrf+g+b a>c+<b>drd24d24 c+<a>a<l16g+baf+l12 erd24&!24e24 f+g+>d<
  g+rrbb24b24b ara>c+<b>a< f+>f+<f+24f+24ef+g+ af+ Div{ag+f+}6 df+
  a>c+<b>d24&!24e24dc+ <a&!12b6ag+f+ a>a<ag+f+e d4ef+g+
  l16 af+g+a l12b>c+e l16ag+f+e l12 f+&!12g+12e<
  a6>c+<f+4
  g+6be4

  [2
   [2
    [2 f+4a6>d<f+6f+a6>d<]
    :
    [2 e4g+6>c+<e6eg+6>c+<]
   ]
   [2 e4g+6be6eg+6b]
  ]

  [2
   f+4g+6a4g+4a d4e6f+4e4f+
   e4f+6g+4f+4g+ : a4b6>c+4<b4a
  ]
  e6eg+f+e ag+f+bag+
  'd1b1'r1

  f+rrr2g+ra


//------------------------------------
// Track 2 : 
//------------------------------------
TR(2) CH(2) P(70)
@3 v86

 o4 l12
 r1r1

  [2
   [2
    [2
     ARP(0,!2^6,{b>c+eg+<}')
     ARP(0,!12,{b>c+eg+<}')rr
     ARP(0,!12^1,{ab>df+<})
     :
     ARP(0,!2.^12,{ab>c+e<})r
     ARP(0,!2,{a>c+df+<})
     ARP(0,!12^2,{>c+df+a<})
    ]
    ARP(0,!2.^12,{b>c+eg+<})r
    ARP(0,!2.,{b>df+a<})
    ARP(0,!12^4,{ab>df+<})
   ]

   [2
    ARP(0,!1.,{a>df+<}) r6 ARP(0,!12^4,{a>df+<})
    :
    ARP(0,!1,{a>c+e<}) [6 ARP(0,!6,{a>c+e<})]
   ]
   ARP(0,!1,{b>eg+<}) ARP(0,!2,{b>eg+<}) ARP(0,!2,{b>eg+b<})
  ]

  [2
   ARP(0,!1,{b>df+a<}) r6 ARP(0,!12^4,{b>df+a<}) ARP(1,!2,{b>df+a<})
   ARP(0,!1,{a>c+eg+<}) r6 ARP(0,!12^4,{a>c+eg+<}) ARP(1,!4,{a>c+eg+<}) ARP(1,!4,{>c+eg+a<})
   ARP(0,!1,{b>df+a<}) r6 ARP(0,!12^4,{b>df+a<}) ARP(1,!2,{b>df+a<})
   ARP(0,!1,{>deg+b<}) ARP(0,!2,{>deg+b<}) ARP(0,!2,{>eg+b>d<})<
  ]

  ARP(0,!2^6,{>c+ef+a<}) ARP(0,!12,{>c+ef+a<})r ARP(0,!12,{>c+ef+a<})r
  ARP(0,!2^6,{b>df+a<}) ARP(0,!4^12,{b>df+a<})
  ARP(0,!2^6,{>df+g+b<}) ARP(0,!12,{>df+g+b<})r ARP(0,!12,{>df+g+b<})r
  ARP(0,!2^6,{>c+eg+b<}) ARP(0,!4^12,{>c+eg+b<})

  ARP(0,!2^6,{>c+ef+a<}) ARP(0,!12,{>c+ef+a<})r ARP(0,!12,{>c+ef+a<})r
  ARP(0,!2^6,{b>df+a<})  ARP(0,!4^12,{b>df+a<})
  ARP(0,!1,{b>c+eg+<}) 
  ARP(0,!1,{b>deg+<}) 

  ARP(0,!1^2,{ab>df+<})
  ARP(0,!2,{a>c+df+<})


  [2
    [2
     ARP(0,!2^6,{b>c+eg+<}')
     ARP(0,!12,{b>c+eg+<}')rr
     ARP(0,!12^1,{ab>df+<})
     :
     ARP(0,!2.^12,{ab>c+e<})r
     ARP(0,!2,{a>c+df+<})
     ARP(0,!12^2,{>c+df+a<})
    ]
    ARP(0,!2.^12,{b>c+eg+<})r
    ARP(0,!2.,{b>df+a<})
    ARP(0,!12^4,{ab>df+<})
  ]

  [2
   ARP(0,!1.,{a>df+<}) r6 ARP(0,!12^4,{a>df+<})
   :
   ARP(0,!1,{a>c+e<}) [6 ARP(0,!6,{a>c+e<})]
  ]
  ARP(0,!1,{b>eg+<}) ARP(0,!2,{b>eg+<}) ARP(0,!2,{b>eg+b<})

  [2
   ARP(0,!1,{b>df+a<}) r6 ARP(0,!12^4,{b>df+a<}) ARP(1,!2,{b>df+a<})
   ARP(0,!1,{a>c+eg+<}) r6 ARP(0,!12^4,{a>c+eg+<}) ARP(1,!4,{a>c+eg+<}) ARP(1,!4,{>c+eg+a<})
   ARP(0,!1,{b>df+a<}) r6 ARP(0,!12^4,{b>df+a<}) ARP(1,!2,{b>df+a<})
   ARP(0,!1,{>deg+b<}) ARP(0,!2,{>deg+b<}) ARP(0,!2,{>eg+b>d<})<
  ]

  ARP(0,!2^6,{>c+ef+a<}) ARP(0,!12,{>c+ef+a<})r ARP(0,!12,{>c+ef+a<})r
  ARP(0,!2^6,{b>df+a<}) ARP(0,!4^12,{b>df+a<})
  ARP(0,!2^6,{>df+g+b<}) ARP(0,!12,{>df+g+b<})r ARP(0,!12,{>df+g+b<})r
  ARP(0,!2^6,{>c+eg+b<}) ARP(0,!4^12,{>c+eg+b<})

  ARP(0,!2^6,{>c+ef+a<}) ARP(0,!12,{>c+ef+a<})r ARP(0,!12,{>c+ef+a<})r
  ARP(0,!2^6,{b>df+a<})  ARP(0,!4^12,{b>df+a<})
  ARP(0,!1,{b>c+eg+<}) 
  ARP(0,!1,{b>deg+<}) 

  ARP(0,!1^2,{ab>df+<})
  ARP(0,!2,{b>c+eg+<})

  'a>c+df+<'rrr2.r1
  'g+b>df+<'rrr2.r1
  'a>c+df+<'rrr2.r1
  'g+1b1>d1f+1<'
  'b2>d2f+2<'
  'b2>e2g+2<'

  [2
   ARP(0,!1,{b>df+a<}) r6 ARP(0,!12^4,{b>df+a<}) ARP(1,!2,{b>df+a<})
   ARP(0,!1,{a>c+eg+<}) r6 ARP(0,!12^4,{a>c+eg+<}) ARP(1,!4,{a>c+eg+<}) ARP(1,!4,{>c+eg+a<})
   ARP(0,!1,{b>df+a<}) r6 ARP(0,!12^4,{b>df+a<}) ARP(1,!2,{b>df+a<})
   ARP(0,!1,{>deg+b<}) ARP(0,!2,{>deg+b<}) ARP(0,!2,{>eg+b>d<})<
  ]

  ARP(0,!2^6,{>c+ef+a<}) ARP(0,!12,{>c+ef+a<})r ARP(0,!12,{>c+ef+a<})r
  ARP(0,!2^6,{b>df+a<}) ARP(0,!4^12,{b>df+a<})
  ARP(0,!2^6,{>df+g+b<}) ARP(0,!12,{>df+g+b<})r ARP(0,!12,{>df+g+b<})r
  ARP(0,!2^6,{>c+eg+b<}) ARP(0,!4^12,{>c+eg+b<})

  ARP(0,!2^6,{>c+ef+a<}) ARP(0,!12,{>c+ef+a<})r ARP(0,!12,{>c+ef+a<})r
  ARP(0,!2^6,{b>df+a<})  ARP(0,!4^12,{b>df+a<})
  ARP(0,!1,{b>c+eg+<}) 
  ARP(0,!1,{b>deg+<}) 

  ARP(0,!1^2,{ab>df+<})
  ARP(0,!2,{a>c+ef+<})

  ARP(0,!12,{a>c+f+>c+<})
  rrr2
  ARP(0,!12,{b>c+eab<})r ARP(0,!12,{a>c+f+>c+<<})


//------------------------------------
// Track 3 : 
//------------------------------------
TR(3) CH(3) P(66)
@3 v110

 o6 l12
 r1r1

  r2r4ef+g+ r-4 c+4
  g+48a24.r-e r'a6e6'g+f+g+f+ef+ed+
  'e6c+6'c+'e6c+6''ec+'rc+ d+ef+g+ag+f+ 'af+''af+'f+b'f+'a f+g+a
  a48b24.r-12er'bg+' rag+ f+g+ag+f+ 'g+6e6'r'g+e' ref f+g+ab>cd+
  'e<a>'r'e4<a4>'rrr'g+6c+6'r'f+4c+4'rred+c+<ba'g+4e4d4'

  r4r6'bf+'rr'bf+'rr'b^4f+^4''>c+<f+'r'b4f+4'ag+6f+
  c+4r-4e6f+ e4r-4g+6a >c48c+24.r-<a>r'c+<a>'r'c+<a>'r 'c+2<a2>'<bag+ag+f+
  ef+g+ r-4c+4 >c+<ba r-4 g+4 rr>'e<b>'rr'c+^4<f+^4>'rr<'bg+'r'bg+'r'bf+'ag+
  ag+f+'b6f+6'a f+>ed+c+d+e 'f+c+'g+f+'e<a>'d+c+< 'bf+'ag+'f+c+'ed+

  v(MML(v)-5)
  ARP(1,!1,{<a>df+}) 'd2<a2>''f+2d2'
  ARP(1,!1,{<a>c+e}) 'a6e6''g+6e6''f+6d6''e6c+6''f+6d6''g+6e6'
  ARP(1,!1,{<a>df+}) 'd2<a2>''f+2d2'
  ARP(1,!1,{<b>eg+}) 'b6g+6''a6f+6''g+6e6' ARP(6,!2,{eg+b>d<})

  v(MML(v)-5)
  [2
   r2rr'g+c+' rr'g+6c+6'r 'a2f+2'r4r
   r2rr'ae' rr'a6e6'r 'b2g+2'r4r
   rr'g+c+'rrr'g+6c+6'r rr'g+c+' rrr'a2f+2'r4
   rr'af+'rrr'a6f+6'r rr'af+' rrr'b2g+2'r4
  ]
  v(MML(v)+5)

  ARP(1,!1,{<a>df+}) 'd2<a2>''f+2d2'
  ARP(1,!1,{<a>c+e}) 'a6e6''g+6e6''f+6d6''e6c+6''f+6d6''g+6e6'
  ARP(1,!1,{<a>df+}) 'd2<a2>''f+2d2'
  ARP(1,!1,{<b>eg+}) 'b6g+6''a6f+6''g+6e6' ARP(6,!2,{eg+b>d<})
  v(MML(v)+5)

  'ad'g+f+'be'ag+>c48c+24.r-12<g+>rc+'c+<g+'ba rr'>e^4<a^4>''c+<f+>'rc+'c+<f+'ba
  'g+6e6'a6b6 'g+6e6'e6f+6 <ARP(4,!1,{f+a>c+})
  'ad'g+f+'be'ag+>c48c+24.r-12<g+>rc+'c+<g+'ba rr'>e^4<a^4>' 'ec+'ee'ec+'dc+<
  'b2.e2.'b>c+d <'b2g+2'>'d2<g+2'

  'ad'g+f+'be'ag+>c48c+24.r-12<g+>rc+'c+<g+'ba rr'>e^4<a^4>''c+<f+>'rc+'c+<f+'ba
  'g+6e6'a6b6 'g+6>c+6<'b6>d6< ARP(4,!1,{f+a>c+<})
  'ad'g+f+'be'ag+>c48c+24.r-12<g+>rc+'c+<g+'ba rr'>e^4<a^4>' 'ec+'de'ec+'dc+<
  'b2.e2.'b>c+<a 'b2g+2''b2g+2f+2'

  [2
   'a2f+2''f+4c+4''g+4e4' 'a2f+2''f+4d4''a4d4'
   'b2e2''g+4e4''b4e4' : '>c+2<g+2>'c+<babag+
  ]
  'b1g+1e1'
  <ARP(!12,!1.,{a>c+ef+a>c+})<r2


  r6'd<b>' edc+ 'af+'g+f+ef+g+ 'af+'r'af+'r'af+'r'af+'r'g+e'r'af+'r
  'g+6e6'f+ ff+g+ '>c+<c+'ba g+>dc+ 'e<b>'c+'e<b>'c+'e6<b6>' dc+<bag+f+
  'g+6e6'ab6arrg+rf+6e df+eg+f+ag+'b4f+4'a
  b>c+d 'e<b>'r'e<b>' r'e<b>'rrr'e<b>' rr'f+^4c+^4'edc+<bag+

  'ae'b24>c24c+edc+<'f+4^6c+4^6''g+4e4''a4e4''b^4e^4'bag+
  rr>'c+^2<a^2>'c+<b>c+ rr'e^4c+^4'c+4<bab
  'a4f+4'ab>c+'f+c+'edc+<b>c+ <'bg+'r>'f+d''f+4d4'c+<bab>c+d
  c+r'g+e''g+2e2'c+de dr'af+''a4f+4'g+f+edc+<b

  v(MML(v)-5)
  ARP(1,!1,{<a>df+}) 'd2<a2>''f+2d2'
  ARP(1,!1,{<a>c+e}) 'a6e6''g+6e6''f+6d6''e6c+6''f+6d6''g+6e6'
  ARP(1,!1,{<a>df+}) 'd2<a2>''f+2d2'
  ARP(1,!1,{<b>eg+}) 'b6g+6''a6f+6''g+6e6' ARP(6,!2,{eg+b>d<})
  v(MML(v)+5)

  'ad'g+f+'be'ag+>c48c+24.r-12<g+>rc+'c+<g+'ba rr'>e^4<a^4>''c+<f+>'rc+'c+<f+'ba
  'g+6e6'a6b6 'g+6e6'e6f+6 <ARP(4,!1,{f+a>c+})
  'ad'g+f+'be'ag+>c48c+24.r-12<g+>rc+'c+<g+'ba rr'>e^4<a^4>' 'ec+'ee'ec+'dc+<
  'b2.e2.'b>c+d <'b2g+2'>'d2<g+2'

  'ad'g+f+'be'ag+>c48c+24.r-12<g+>rc+'c+<g+'ba rr'>e^4<a^4>''c+<f+>'rc+'c+<f+'ba
  'g+6e6'a6b6 'g+6>c+6<'b6>d6< ARP(4,!1,{f+a>c+<})
  'ad'g+f+'be'ag+>c48c+24.r-12<g+>rc+'c+<g+'ba rr'>e^4<a^4>' 'ec+'de'ec+'dc+<
  'b2.e2.'b>c+<a 'b2g+2''b2g+2f+2'

  [2
   'a2f+2''f+4c+4''g+4e4' 'a2f+2''f+4d4''a4d4'
   'b2e2''g+4e4''b4e4' : '>c+2<g+2>'c+<babag+
  ]
  'b1g+1e1'
  <ARP(!12,!1,{a>c+ef+a>c+})<
  y64,1; ARP(4,!2,{f+a>c+e}) c+2 y64,0;
  <

  [7 r1]
  r2.ef+g+

  'ad'g+f+'be'ag+>c48c+24.r-12<g+>rc+'c+<g+'ba rr'>e^4<a^4' >c48c+24^48r-12<f+>rc+'c+<f+'ba
  'g+6e6'a6b6 'g+6e6'e6f+6 <ARP(4,!2,{f+a>c+}) EP.onTime(80,127,!2) f+g+abag+
  'ad'g+f+'be'ag+>c48c+24.r-12<g+>rc+'c+<g+'ba rr'>e^4<a^4>' 'ec+'ee'ec+'dc+<
  [2 'b4e4' : b>c+d<] b>dc+< 'b2g+2'>'d2<g+2'

  'ad'g+f+'be'ag+>c48c+24.r-12<g+>rc+'c+<g+'ba rr'>e^4<a^4>''c+<f+>'rc+'c+<f+'ba
  'g+6e6'a6b6 'g+6>c+6<'b6>d6< ARP(4,!4,{f+a>c+<}) EP.onTime(80,127,!2) >c+<ba>dc+<bag+f+
  'ad'g+f+'be'ag+>c48c+24.r-12<g+>rc+'c+<g+'ba rr'>e^4<a^4>' 'ec+'de'ec+'dc+<
  'b2.e2.'b>c+<a 'b2g+2''b2g+2f+2'

  [2
   'a2f+2''f+4c+4''g+4e4' 'a2f+2''f+4d4''a4d4'
   'b2e2''g+4e4''b4e4' : '>c+2<g+2>'c+<babag+
  ]
  'b1g+1e1'
  <ARP(!12,!1,{a>c+ef+a>c+})<
  y64,1; ARP(!48,!2,{f+a>c+d}) e2 y64,0;
  <

  v(MML(v)-14)
  ARP(3,!12,{c+f+g+})rrr2
  ARP(0,!12,{<b>eg+})r
  ARP(1,!12,{c+f+g+a})


//------------------------------------
// Track 4 : 
//------------------------------------
TR(4) CH(4) P(62)
@66,90,1 v120
M.onNoteWave(5,90,!2)

 r1r1

 o5 l12
  v(MML(v)-10)
  r1 r4c+4c+6<b6>c+6
  <g+2.^12r12a^2.^6r>
  r1 r4f+g+ab4bag+
  r6>c+^2^12r12<b^2.^6r

  r1 d8.c+8.<b8 a4ag+f+
  e1r1
  d6c+6f+6g+6f+6g+6 a2aaaag+a
  >e2.^6c+1r

  v(MML(v)+10)
  r4r6e24f24f+2 r6g+48&a24.rara6g+6f+6
  e2.^12re24d+26 c+1
  r4r6e24f24f+2 r6g+48&a24.rara6g+6a6
  g+2.^6a24a+24b2g+4^6r

  r6>c+< g+f+g+ >c+4^12r c+12&!12d4^12rd+rrd24&!24e6^12r24
  c+rc+c+<ag+ brg+arf+ g+ref+2^6r
  g+b>c+< g+f+g+ >c+4^12r d4^6rf+rre4d
  c+<bab4 ag+f+b4 bag+>c+<ba >dc+dc+4<

  a2^rarrf+2re6derf+
  c+6<b6>c+6 eeeedc+ <br>g+2.r
  f+4^6e4g+4f+rra^2ag+a
  bra6g+ra4g+f+edrg+^4c24&24c+6^4r24

  d4^12re24f24f+2 r6g+48&a24.rara6g+6f+6
  e2.^12re24d+26 c+1
  r4r6e24f24f+2 r6g+48&a24.rara6g+6a6
  g+2.^6a24a+24b4^6>c24c+24d2<

  v(MML(v)+5)
  f+edg+f+earaag+f+ r6>c+^4 c+16&!16e4..
  c+2.^6<b24a24 g+6f+6g+6a6g+6^12r
  f+edg+f+earaag+f+ r6>c+^4 < g+16&!16a4..
  g+2.^6 b24a24 g+6a6g+6a6g+6^12r

  f+edg+f+earaag+f+ r6>c+^4 c+16&!16e4..
  c+2.^6<b24a24 g+6f+6g+6f+6e6^12r
  f+edg+f+earaag+f+ r6>c+^4 < g+16&!16a4..
  b2.^6 b24a24 g+6a6g+6f+6e6^12r

  d4.r8c+6d6e6 f+4.r8a4.r8
  g+f+eg+2g+f+a b2e4.r8
  f+4.r8f+6e6d6 f+edf+2g+6a
  g+4g+f+eg+4g+f+e a4^12.g+24a24a+24b4^12r>c+
  v(MML(v)-5)

  d8&!8e2^8^6e24d24 c+2.r4<r96


  v(MML(v)-8)
  r1r4c32&c+8.r32<b8..r32>c+8r8<
  g+2..r8r1>
  r1r4e4d8..r32e8r8
  c+2.r6d24e24f+2.r4
  r1r4c32&c+8.r32<b8..r32>f+32&g+16.r8
  e2..r8r1
  r1r4e4d8..r32f+8r24e24d24
  c+2.r8r24f+24g+24a2.r4
  v(MML(v)+8)

  d4^12re24f24f+2 r6g+48&a24.rara6g+6f+6
  e2.^12re24d+26 c+1
  r4r6e24f24f+2 r6g+48&a24.rara6g+6a6
  g+2.^6a24a+24b4^6>c24c+24d2<

  v(MML(v)+5)
  f+edg+f+earaag+f+ r6>c+^4 c+16&!16e4..
  c+2.^6<b24a24 g+6f+6g+6a6g+6^12r
  f+edg+f+earaag+f+ r6>c+^4 < g+16&!16a4..
  g+2.^6 b24a24 g+6a6g+6a6g+6^12r

  f+edg+f+earaag+f+ r6>c+^4 c+16&!16e4..
  c+2.^6<b24a24 g+6f+6g+6f+6e6^12r
  f+edg+f+earaag+f+ r6>c+^4 < g+16&!16a4..
  b2.^6 b24a24 g+6a6g+6f+6e6^12r

  d4.r8c+6d6e6 f+4.r8a4.r8
  g+f+eg+2g+f+a b2e4.r8

  f+4.r8f+6e6d6 f+edf+2g+6a
  g+4g+f+eg+4g+f+e a4^12.g+24a24a+24b4^12r>c+
  v(MML(v)-5)

  d8&!8e2^8^6e24f24 f+2.r4<

 v(MML(v)-10)
 [7 r1]
 v(MML(v)+10)
 r1

  v(MML(v)+5)
  f+edg+f+earaag+f+ r6>c+^4 c+16&!16e4..
  c+2^6<b24>c+24dc+<b24a24 g+6f+6g+6a6g+6^12r
  f+edg+f+earaag+f+ r6>c+^4 < g+16&!16a4..
  g+4^6e^4 >Div{edc+}6< b24a24 g+6a6g+6a6g+6^12r

  f+edg+f+earaag+f+ r6>c+^4 e4. Div{dc+<b>}8
  c+4^6e4<b>Div{c+dc+}6<b24a24 g+6f+6g+6f+6e6^12r
  f+edg+f+earaag+f+ r6>c+^4 < g+16&!16a4..
  b2.Div{ag+f+}6 b24a24 g+6a6g+6f+6e6^12d24c+24

  d^4rc+24<b24> c+6d6e6 f+4.r8>c12&!12c+4<rb24a24
  bag+ b2g+ab b24&>c+4^6^24<e^4rd24e24

  f+^4rre24&f+12^24e6d6 ef+g+a4^6r b6a
  g+4g+f+eg+4g+ab a4^12.g+24a24a+24b4^12r>c+
  v(MML(v)-5)

  d8&!8e2^8^6e24d24 c+4^6<g+24f+24e4^6r

  f+rrr2erf+


//------------------------------------
// Track 5 : 
//------------------------------------
TR(5) CH(5) P(64)



//------------------------------------
// Track 6 : 
//------------------------------------
TR(6) CH(6) P(64)



//------------------------------------
// Track 7 : 
//------------------------------------
TR(7) CH(7) P(64)



//------------------------------------
// Track 8 : 
//------------------------------------
TR(8) CH(8) P(64)



//------------------------------------
// 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,}

l12
@33,90,1
Rhythm {

  v90 b4r6b4b12r6b12 r-1 v90 r4s4r4swr r-1 v100 j4j4j4j4 r-1 v70 [4 r6f12]
  v90 b4r6b4b24b24b12r12b12 r-1 v90 r4szw v70s24s24ssv90sgs r-1 v100 j4j4j4j4 r-1 v70 [4 r6f12]

  [2
   [2
     v90 brr rrr brr rrb r-1 v90 r4s4r4s4  r-1 v120 y4 v100 j4j4j4 r-1 v70 [4 r6f12]
     v90 rrb rrr brr rrr r-1 v90 r4s4r4ssz r-1 v100 j4j4j4j4 r-1 v70 [4 r6f12]
     v90 brr rrr brb rrb r-1 v90 r4s4r4s4  r-1 v100 j4j4j4j4 r-1 v70 [4 r6f12]
     v90 rrb rrr brr brr r-1 v90 r4s4r4sgs r-1 v100 j4j4j4j4 r-1 v70 [4 r6f12]
     v90 brr rrr brr rrb r-1 v90 r4s4r4s4  r-1 v100 j4j4j4j4 r-1 v70 [4 r6f12]
     v90 rrb rrr brr rrr r-1 v90 r4s4r4swz r-1 v100 j4j4j4j4 r-1 v70 [4 r6f12]
     v90 brr rrr brb rrb r-1 v90 r4s4r4s4  r-1 v100 j4j4j4j4 r-1 v70 [4 r6f12]
     v90 rrb rrr brb brb r-1 v90 r4s6v60s[2 v100sv70ss] r-1 v100 j4j4j4j4 r-1 v70 [4 r6f12]
   ]

   [2
     v90 brr rrb brr rrr r-1 v90 r2s4r4  r-1 v120 y4 v100 j4r4j4 r-1 v70 [2 c6f12r6f12]
     v90 brr rrb brr rrb r-1 v90 r2s4zaw r-1 v100 r4j4r4j4 r-1 v70 [2 c6f12r6f12]
     v90 brr rrb brr rrr r-1 v90 r2s4r4  r-1 v100 r4j4r4j4 r-1 v70 [2 c6f12r6f12]
     :
     v90 brr rbr brr rbr r-1 v90 r6s6rv65s24s24v90 aazzss r-1 v100 r4j4r4j4 r-1 v70 [2 c6f12r6f12]
   ]
   v90 brb rrb brb rbb r-1 v90 r6s6rv65s24s24v90 qszasz r-1 v100 r4j4r4j4 r-1 v70 [2 c6f12r6f12]
  ]

   [2
     v90 brb rrr brr rrb r-1 v90 r4s4r4s4    r-1 v120 y4 v100 j4j4j4 r-1 v70 [4 rfc]
     v90 brb rrr brb rrr r-1 v90 r4s4r4szs   r-1 v100 j4j4j4j4 r-1 v70 [4 rfc]
     v90 brb rrr brr rrb r-1 v90 r4s4r4s4    r-1 v100 j4j4j4j4 r-1 v70 [4 rfc]
     v90 brb rrr brb brr r-1 v90 r4s6srsrsgw r-1 v100 j4j4j4j4 r-1 v70 [4 rfc]
     v90 brb rrr brr rrb r-1 v90 r4s4r4s4    r-1 v100 j4j4j4j4 r-1 v70 [4 rfc]
     v90 brb rrr brb rrr r-1 v90 r4s4r4szs   r-1 v100 j4j4j4j4 r-1 v70 [4 rfc]
     v90 brb rrr brr rrb r-1 v90 r4s4r4s4    r-1 v100 j4j4j4j4 r-1 v70 [4 rfc]
     :
     v90 brb rrr brb brr r-1 v90 rssrss q24q24qaazz r-1 v100 j4j4j4j4 r-1 v70 [4 rfc]
   ]
   v90 brr brr brb brb r-1 v90 rssazsazsazs r-1 v100 j4j4j4j4 r-1 v70 [4 rfc]

   [2
     v90 brr rrr brb rrr r-1 v90 r4s4r4s4     r-1 v120 y4 v100 j4j4j4 r-1 v70 [4 rrf]
     v90 brr rrr brb rrr r-1 v90 r4s4r4srv70s r-1 v100 j4j4j4j4 r-1 v70 [4 rrf]
     v90 brr rrr brb rrr r-1 v90 r4s4r4s4     r-1 v100 j4j4j4j4 r-1 v70 [4 rrf]
     :
     v90 brr rrr brb rrr r-1 v90 r4s4r4sv70sv90z r-1 v100 j4j4j4j4 r-1 v70 [4 rrf]
   ]
   v90 brr rrr brr brr r-1 v90 r4s4[2 v100s24v70s24sv80s] r-1 v100 j4j4j4j4 r-1 v70 [4 rrf]

   v90 brr rrb brr rrb r-1 v120 e1 r-1 v100 r4j4r4j4
   v90 brr rrr rrr brr r-1 v100 d1 r-4 v70s24v80s24v90s'v100sv80w'


   [2
     v90 brr rrr brr rrb r-1 v90 r4s4r4s4  r-1 v120 y4 v100 j4j4j4 r-1 v70 [4 r6f12]
     v90 rrb rrr brr rrr r-1 v90 r4s4r4ssz r-1 v100 j4j4j4j4 r-1 v70 [4 r6f12]
     v90 brr rrr brb rrb r-1 v90 r4s4r4s4  r-1 v100 j4j4j4j4 r-1 v70 [4 r6f12]
     v90 rrb rrr brr brr r-1 v90 r4s4r4sgs r-1 v100 j4j4j4j4 r-1 v70 [4 r6f12]
     v90 brr rrr brr rrb r-1 v90 r4s4r4s4  r-1 v100 j4j4j4j4 r-1 v70 [4 r6f12]
     v90 rrb rrr brr rrr r-1 v90 r4s4r4swz r-1 v100 j4j4j4j4 r-1 v70 [4 r6f12]
     v90 brr rrr brb rrb r-1 v90 r4s4r4s4  r-1 v100 j4j4j4j4 r-1 v70 [4 r6f12]
     v90 rrb rrr brb brb r-1 v90 r4s6v60s[2 v100sv70ss] r-1 v100 j4j4j4j4 r-1 v70 [4 r6f12]
   ]

   [2
     v90 brr rrb brr rrr r-1 v90 r2s4r4  r-1 v120 y4 v100 j4r4j4 r-1 v70 [2 c6f12r6f12]
     v90 brr rrb brr rrb r-1 v90 r2s4zaw r-1 v100 r4j4r4j4 r-1 v70 [2 c6f12r6f12]
     v90 brr rrb brr rrr r-1 v90 r2s4r4  r-1 v100 r4j4r4j4 r-1 v70 [2 c6f12r6f12]
     :
     v90 brr rbr brr rbr r-1 v90 r6s6rv65s24s24v90 aazzss r-1 v100 r4j4r4j4 r-1 v70 [2 c6f12r6f12]
   ]
   v90 brb rrb brb rbb r-1 v90 r6s6rv65s24s24v90 qszasz r-1 v100 r4j4r4j4 r-1 v70 [2 c6f12r6f12]

   [2
     v90 brb rrr brr rrb r-1 v90 r4s4r4s4    r-1 v120 y4 v100 j4j4j4 r-1 v70 [4 rfc]
     v90 brb rrr brb rrr r-1 v90 r4s4r4szs   r-1 v100 j4j4j4j4 r-1 v70 [4 rfc]
     v90 brb rrr brr rrb r-1 v90 r4s4r4s4    r-1 v100 j4j4j4j4 r-1 v70 [4 rfc]
     v90 brb rrr brb brr r-1 v90 r4s6srsrsgw r-1 v100 j4j4j4j4 r-1 v70 [4 rfc]
     v90 brb rrr brr rrb r-1 v90 r4s4r4s4    r-1 v100 j4j4j4j4 r-1 v70 [4 rfc]
     v90 brb rrr brb rrr r-1 v90 r4s4r4szs   r-1 v100 j4j4j4j4 r-1 v70 [4 rfc]
     v90 brb rrr brr rrb r-1 v90 r4s4r4s4    r-1 v100 j4j4j4j4 r-1 v70 [4 rfc]
     :
     v90 brb rrr brb brr r-1 v90 rssrss q24q24qaazz r-1 v100 j4j4j4j4 r-1 v70 [4 rfc]
   ]
   v90 brr brr brb brb r-1 v90 rssazsazsazs r-1 v100 j4j4j4j4 r-1 v70 [4 rfc]

   [2
     v90 brr rrr brb rrr r-1 v90 r4s4r4s4     r-1 v120 y4 v100 j4j4j4 r-1 v70 [4 rrf]
     v90 brr rrr brb rrr r-1 v90 r4s4r4srv70s r-1 v100 j4j4j4j4 r-1 v70 [4 rrf]
     v90 brr rrr brb rrr r-1 v90 r4s4r4s4     r-1 v100 j4j4j4j4 r-1 v70 [4 rrf]
     :
     v90 brr rrr brb rrr r-1 v90 r4s4r4sv70sv90z r-1 v100 j4j4j4j4 r-1 v70 [4 rrf]
   ]
   v90 brr rrr brr brr r-1 v90 r4s4[2 v100s24v70s24sv80s] r-1 v100 j4j4j4j4 r-1 v70 [4 rrf]

   v90 brr rrb brr rrb r-1 v120 e1 r-1 v100 r4j4r4j4
   v90 brr rrr rrr brr r-1 v100 d1 r-4 v70s24v80s24v90s'v100sv80w'

   v90 brr rrr rrr rrb r-1 v80rrr rrs24s24 srr rsr r-1 v120 i4 v100j4r4j4
   v90 brr rrb brr rrr r-1 v60rsr srr r4 v90szw r-1 v100 r4j4r4j4
   v90 brr rrr rrr rrb r-1 v80rrg rrs24s24 rzr rs24s24r r-1 v100 r4j4r4j4
   v90 brr rrb brr rrr r-1 v90rrr srv70s24s24 v90zrr sw24g24s r-1 v100 r4j4r4j4
   v90 brr rrr rrr rrb r-1 v80rrr rrs24s24 srr rsv60s24s24 r-1 v100j4r4j4j4
   v90 brr rrb brr rrr r-1 v60rsr srs24s24 v90 azsazs24s24 l12 r-1 v100 r4j4r4j4
   v90 brr rrr brr rrb r-1 v90r2s4rrv70s24s24 r-1 v100 r4j4r4j4
   v90 brr brb brr bbb r-1 v90r4s4 [6 'sg'] r-1 v100 r4j4r4j4

   [2
     v90 brb rrr brr rrb r-1 v90 r4s4r4s4    r-1 v120 y4 v100 j4j4j4 r-1 v70 [4 rfc]
     v90 brb rrr brb rrr r-1 v90 r4s4r4szs   r-1 v100 j4j4j4j4 r-1 v70 [4 rfc]
     v90 brb rrr brr rrb r-1 v90 r4s4r4s4    r-1 v100 j4j4j4j4 r-1 v70 [4 rfc]
     v90 brb rrr brb brr r-1 v90 r4s6srsrsgw r-1 v100 j4j4j4j4 r-1 v70 [4 rfc]
     v90 brb rrr brr rrb r-1 v90 r4s4r4s4    r-1 v100 j4j4j4j4 r-1 v70 [4 rfc]
     v90 brb rrr brb rrr r-1 v90 r4s4r4szs   r-1 v100 j4j4j4j4 r-1 v70 [4 rfc]
     v90 brb rrr brr rrb r-1 v90 r4s4r4s4    r-1 v100 j4j4j4j4 r-1 v70 [4 rfc]
     :
     v90 brb rrr brb brr r-1 v90 rssrss q24q24qaazz r-1 v100 j4j4j4j4 r-1 v70 [4 rfc]
   ]
   v90 brr brr brb brb r-1 v90 rssazsazsazs r-1 v100 j4j4j4j4 r-1 v70 [4 rfc]

   [2
     v90 brr rrr brb rrr r-1 v90 r4s4r4s4     r-1 v120 y4 v100 j4j4j4 r-1 v70 [4 rrf]
     v90 brr rrr brb rrr r-1 v90 r4s4r4srv70s r-1 v100 j4j4j4j4 r-1 v70 [4 rrf]
     v90 brr rrr brb rrr r-1 v90 r4s4r4s4     r-1 v100 j4j4j4j4 r-1 v70 [4 rrf]
     :
     v90 brr rrr brb rrr r-1 v90 r4s4r4sv70sv90z r-1 v100 j4j4j4j4 r-1 v70 [4 rrf]
   ]
   v90 brr rrr brr brr r-1 v90 r4s4[2 v100s24v70s24sv80s] r-1 v100 j4j4j4j4 r-1 v70 [4 rrf]

   v90 brr rrb brr rrb r-1 v120 e1 r-1 v100 r4j4r4j4
   v90 brr rrr rrr brr r-1 v100 d1 r-4 v70s24v80s24v90s'v100sv80w'

   v90brb rrr b4 rrb r-1 v90 rrz24w24 q24q24qq a24a24az srv100s r-1 v120 e2.v90ir v110d
}

