//-----------------------------------------------
// so suspicious
// (C)Yax
//-----------------------------------------------

TrackName     = {"so suspicious"}
Copyright     = {"Yax"}

ResetGM();
r4
TrackSync;


//------------------------------------------------
// アルペジオ関数
//  D - 1音あたりのずらし幅
//  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でリタルダンド、B>Eでアッチェラダンド)
//  B   - 開始時のテンポ(bpm)
//  E   - 終了時のテンポ(bpm)
//  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)
}

//------------------------------------------------
// 転調関数
//------------------------------------------------
// 転調
//  VAL - 転調幅
FUNCTION EDTRANS(VAL) {
  TrackKey(VAL)
}

// 転調を戻す
FUNCTION EDTRANS_REV() {
  TrackKey(0)        // 普通に戻すなら0で(Keyで指定したとこに戻る)
}


//------------------------------------------------
// 全体の調整
//------------------------------------------------
TR(1)  V(112) REV(25) CHO(20)
TR(2)  V(110) REV(40) CHO(50)
TR(3)  V(100) REV(60) CHO(10)
TR(4)  V(90)  REV(50) CHO(60)
TR(5)  V(105) REV(30) CHO(80)
TR(6)  V(110) REV(40) CHO(50)
TR(7)  V(110) REV(40) CHO(30)
TR(10) V(120) REV(25) CHO(0)


//------------------------------------------------
// テンポ
//------------------------------------------------
INT T = 142
Tempo=(T)


//------------------------------------------------
// キー
//------------------------------------------------
INT KEY=0

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



//------------------------------------------------
// MML
//------------------------------------------------

//------------------------------------
// Track 1 : 
//------------------------------------
TR(1) CH(1) P(64)
v100

 o2 l16 q70
 r1
 [3
  @34 e8e @38; >e< r @34 ere g8 @38; >gr< @34 f+8 @38; >f+r<
  @34 e8e @38; >e< r @34 ere g8 @38; >gr< @34 a8 @38; >ar<
  @34 e8e @38; >e< r @34 ere a8 @38; >ar< @34 b-8 @38; >b-r<
  :
  @34 g8g @38; >g< r @34 grg f+8f+ @38; >f+< @34 f8f @38; >f<
 ]
 @34 g8g @38; >g< r @34 grg f+8f+ @38; >f+< @34 f+8f+ @38; >f+<

 @34 f8f @38; >f< r @34 frf f8 @38; >fr< @34 d8 @38; >dr<
 @34 e8e @38; >e< r @34 ere e8...&!16.<b-64> q30 dd q70 >d<d+

 [2
  @34
  [2
   e8e8rr> @38 e< @34 e e8e8c8d8
   e8e8rr> @38 e< @34 e g8a+8a8g8
   e8e8rr> @38 e< @34 e e8e8c8d8
   e8e8rr> @38 e< @34 e e8g8f+8a8
   g8g8rr> @38 g< @34 g g8g8f+8a8
   g8g8rr> @38 g< @34 g g8a+8a8g+8
   g8g8rr> @38 g< @34 g g8g8f+8a8
   :
   g8g8rr> @38 g< @34 g g8b8a8g8
  ]
  g8g8rr> @38 g< @34 g g8> @38 g< @34 g f+8> @38f+< @34f+

  [2
   [4  @34 f8 > @38 f<r ]
   [4  @34 g8 > @38 g<r ]
   [4  @34 e8 > @38 e<r ]
   [4  @34 f8 > @38 f<r ]
  ]

  [2
   [4  @34 a8 > @38 a<r ]
   [4  @34 f8 > @38 f<r ]
   :
   [4  @34 g8 > @38 g<r ]
   [4  @34 e8 > @38 e<r ]
  ]
  [4  @34 b8 > @38 b<r ]
  [4  @34 e8 > @38 e<r ]

  @34
  q80 f4. q35 f> @38 q70 f< @34 arr > @38 arr< @34 ar
  q80 g4. q35 g> @38 q70 g< @34 drr > @38 drr< @34 dr
  q80 e4. q35 e> @38 q70 e< @34 grr > @38 grr< @34 gr
  q80 a4. q35 a> @38 q70 a< @34 err> @38 err< @34 g> @38g< @34

  q80 f4. q35 f> @38 q70 g< @34 arr > @38 arr< @34 ar
  q80 g4. q35 g> @38 q70 g< @34 brr > @38 brr< @34 br
  q80 a4. q35 a> @38 q70 a< @34 arr > @38 arr< @34 ar
  q70 >c4<e8> @38ee< @34 f8 > @38ff< @34g8 > @38gg< @34

  [4 fr >@38 f< @34 f]
  [4 dr> @38 d< @34 g]
  [4 er> @38 e< @34 e]
  [2 ar> @38 a< @34 a] [2 gr> @38 g< @34 g]

  [4 fr >@38 f< @34 f]
  [4 gr >@38 g< @34 g]
  [4 ar >@38 a< @34 a]
  a2.grf+f
 ]

 [3
  @34 e8e @38; >e< r @34 ere g8 @38; >gr< @34 f+8 @38; >f+r<
  @34 e8e @38; >e< r @34 ere g8 @38; >gr< @34 a8 @38; >ar<
  @34 e8e @38; >e< r @34 ere a8 @38; >ar< @34 b-8 @38; >b-r<
  :
  @34 g8g @38; >g< r @34 grg f+8f+ @38; >f+< @34 f8f @38; >f<
 ]
 @34 g8g @38; >g< r @34 grg f+8f+ @38; >f+< @34 f+8f+ @38; >f+<

 @34 f8f @38; >f< r @34 frf f8 @38; >fr< @34 d8 @38; >dr<
 @34 e8e @38; >e< r @34 ere e8...&!16.<b-64> dd>d<d+

 e > @38 e< @34 e4^16..&!8.<g64 r2


//------------------------------------
// Track 2 : 
//------------------------------------
TR(2) CH(2) P(32)
@28 v80
 Slur(0)

 r1
 o5 l16
  [2
   q60 'e8<b8>'< q20 ee ee> q60 'e8<b8>' <q20 ee> q60 'd8<a8>' q20 <ee> q60 'd+8<a+8>'
   q60 'e8<b8>'< q20 ee ee> q60 'e8<b8>' <q20 ee> q60 'g8d8' q20 <ee> q60 'a8e8'
   q60 'e8<b8>'< q20 ee ee> q60 'e8<b8>' <q20 ee> q60 'g8<d8>' q20 <ee> q60 'a8e8'
   :
   q60 'g8d8'< q20 ee ee> q60 'g8d8' <q20 ee> q60 'f+8c+8' q20 <ee> q60 'f8c8'
  ]
  q60 'g8d8'< q20 ee ee> q60 'g8d8' <q20 ee> q60 'a8e8' q20 <ee> q60 'b-8f8'

  q60 'e8<b8>'< q20 ee ee> q60 'e8<b8>' <q20 ee> q60 'd8<a8>' q20 <ee> q60 'd+8<a+8>'
  q60 'e8<b8>'< q20 ee ee> q60 'e8<b8>' <q20 ee> q60 'g8d8' q20 <ee> q60 'a8e8'
  q60 'e8<b8>'< q20 ee ee> q60 'e8<b8>' <q20 ee> q60 'g8<d8>' q20 <ee> q60 'a8e8'
  q60 'g8d8'< q20 ee ee> q60 'g8d8' <q20 ee> q60 'f+8c+8' q20 <ee> q60 'e8<b8>'
  q60 'f8c8'< q20 ee ee> q60 'f8c8' <q20 ee> q60 'd8<a8>' q20 <ee> q60 'd+8<a+8>'
  q60 'e8<b8>'< q20 ee eeee>  q80 <b4> r-4 e8...&!8<b64 q20 rree>

 [2
  [2
   [3 q20 <e8> q60'e8<b8>' q20 <e8> q40'e<b>''e<b>']
   q20 <e8> q60'd8<a8>' q20 <e8> q40'd+<a+>''d+<a+>'
   [2 q20 <e8> q60'g8d8' q20 <e8> q40'gd''gd']
   q20 <e8> q60'a8e8' q20 <e8> q40'ae''ae'  q20 <e8> q60'a+8f8' q20 <e8> q40'a+f''a+f'
   [3 q20 <e8> q60'g8d8' q20 <e8> q40'gd''gd']
   q20 <e8> q60'f+8c+8' q20 <e8> q40'fc''fc'
   [2 q20 <e8> q60'g8d8' q20 <e8> q40'gd''gd']
   q20 <e8> q60'a8e8' q20 <e8> q40'ae''ae'
   q20 <e8> q60'a+8f8' q20 <e8> q40'a+ef''a+f'
  ]

  l8
  [2
   [4 q20 <f> 'fc']
   [4 q20 <g> 'gd']
   [4 q20 <e> 'e<b>']
   [4 q20 <f> 'fc']
  ]

  [2
   [4 q20 <a> 'ae']
   [4 q20 c '>c<g']
   :
   [4 q20 <g> 'ge']
   [4 q20 <e> 'e<b>']
  ]
  [4 q20 <b> 'bf+']
  [4 q20 <b> 'bg+']

  Slur(3)
  q50
  [2
   <a.&>c.&f&a.&f.&c
   <b.&>d.&g&b.&g.&d
   :
   <g.&b.&>d&g.&d.&<b>
   <a.&>c.&e&a.&e.&c
  ]
  c.&e.&a&>c.&<a.&e
  <b.&>e.&g+&e.&g+.&b

  l16
  [4 q30 <ff> 'fc'c]
  [4 q30 <dd> 'gd'd]
  [4 q30 <ee> 'e<b>'<b>]
  [2 q30 <aa> 'ae'e] [2 q30 <gg> 'gd'd]
  [4 q30 <ff> 'fc'c]
  [4 q30 <gg> 'gd'd]
  [4 q30 <ee> 'ae'e]
  q80 c8.&e8.&a8&e4. q30 <ee>
  Slur(0)
 ]

  [2
   q60 'e8<b8>'< q20 ee ee> q60 'e8<b8>' <q20 ee> q60 'd8<a8>' q20 <ee> q60 'd+8<a+8>'
   q60 'e8<b8>'< q20 ee ee> q60 'e8<b8>' <q20 ee> q60 'g8d8' q20 <ee> q60 'a8e8'
   q60 'e8<b8>'< q20 ee ee> q60 'e8<b8>' <q20 ee> q60 'g8<d8>' q20 <ee> q60 'a8e8'
   :
   q60 'g8d8'< q20 ee ee> q60 'g8d8' <q20 ee> q60 'f+8c+8' q20 <ee> q60 'f8c8'
  ]
  q60 'g8d8'< q20 ee ee> q60 'g8d8' <q20 ee> q60 'a8e8' q20 <ee> q60 'b-8f8'

  q60 'e8<b8>'< q20 ee ee> q60 'e8<b8>' <q20 ee> q60 'd8<a8>' q20 <ee> q60 'd+8<a+8>'
  q60 'e8<b8>'< q20 ee ee> q60 'e8<b8>' <q20 ee> q60 'g8d8' q20 <ee> q60 'a8e8'
  q60 'e8<b8>'< q20 ee ee> q60 'e8<b8>' <q20 ee> q60 'g8<d8>' q20 <ee> q60 'a8e8'
  q60 'g8d8'< q20 ee ee> q60 'g8d8' <q20 ee> q60 'f+8c+8' q20 <ee> q60 'e8<b8>'
  q60 'f8c8'< q20 ee ee> q60 'f8c8' <q20 ee> q60 'd8<a8>' q20 <ee> q60 'd+8<a+8>'
  q60 'e8<b8>'< q20 ee eeee>  q80 <b4> r-4 e8...&!8<b64 q20 rree>

  [2 'e<gb>'] q80 'e4.<g4.b4.>' r-4 PitchBend.onTime(0,-8192,!4)r4 r2




//------------------------------------
// Track 3 : 
//------------------------------------
TR(3) CH(3) P(64)
@16 v80

 r1

 o6 l16 q70
 [4 r1]

  P.onNote(64,1,127,32,96)
  [4
   egf+f d<b>cd+ ef+gb a+ag+g  ea+ag agf+g f+ef+e d<b>cd+
  ]
  fgaf gfed fedc edcd <b>ege g<beg> 'e2<b2>'

 [2
  [2
   r1r2. 'e<b>'f+ga
   r1r2. 'e<b>'gaa+
   r1r2. 'e<b>'gaa+
   r1r2 'e<b>'ab>c< bagf+
  ]

  [2
   [4 <f>fa>c<]
   [4 <g>dgb]
   [4 <e>gb>d<]
   :
   [4 <a>fa>c<]
  ]
  [4 <f>fa>c<]

  [2
   [4 <a>ea>c<]
   [4 <f>fa>c<]
   [4 <g>dgb]
   [4 <e>eg+b]
  ]

  l8
  [2
   rafc<a>cfa
   rbgd<b>dgb
   :
   rgd<bgb>dg
   raec<a>cea
  ]
  raec<a>cea
  <b>deg+ l16 deg+b eg+be

  [2
   fafc rcfa <a>cfa >c<afc
   gbgd rdgb dgb>d gd<bg
   :
   ege<br b>eg egb>d ed<bg
   >c<aec bgec bgd<b> bgeg
  ]
  eaecr cea ea>cd edc<a
  >c8.<b8.a8 e2
 ]

  [6
   egf+f d<b>cd+ ef+gb a+ag+g  ea+ag agf+g f+ef+e d<b>cd+
  ]
  fgaf gfed fedc edcd <b>ege g<beg> 'e2<b2>'





//------------------------------------
// Track 4 : 
//------------------------------------
TR(4) CH(4) P(96)
@31,91,0 v50
BR(2)
M.onNoteWave(10,70,!1)

 o4 l16
 r2.. q30 [2 'e<b>']

 [3
  q80'e2..<b2..>'q30 [2 'e<b>']
  q80'g2..d2..'q30 [2 'e<b>']
  q80'a2..e2..'q30 [2 'e<b>']
  q80'g4.d4.'q30 [2 'e<b>'] q80'f+4.c+4.'q30 [2 'e<b>']
 ]
 q80'f2..c2..' q30 [2 'e<b>']
 q80'e4.<b4.>' q30 [2 'e<b>'] q80 'e4.<b4.>'r8 r-4. PitchBend.onTime(0,-8000,!4.) r4.
 PitchBend(0)

 [2
  [2
   [8 q40'e8<b8>' q25'e<b>''e<b>']
   [8 q40'e8<b8>' q25'e<b>''e<b>']
   [8 q40'g8d8'   q25'gd''gd']
   [8 q40'g8d8'   q25'gd''gd']
  ]

  [2
   q80 'f2..c2..' q30 <aa>
   q80 'g4.d4.' q30 <bb> q80 'd4.<b4.>' q30 <bb>
   q80 'e2..<b2..>' q30 <gg>
   :
   q80 'a4.e4.' q30 <aa> q80 'g4.d4.' q30 <bb>
  ]
  q80 'f2..c2..' q30 <ff>

  [2
   q80 'a4.e4.' q30 <aa> q80 'e4.<b4.>' q30 <aa>
   q80 'f4.c4.' q30 <ff> q80 'd4.<a4.>' q30 <ff>
   :
   q80 'g4.d4.' q30 <gg> q80 'd4.<a4.>' q30 <gg>
   q80 'e4.<b4.>' q30 <ee> q80 'g4.e4.' q30 <ee>
  ]
  q80 'b4.f+4.' q30 <gg> q80 'f+4.c+4.' q30 <gg>
  q80 'g+1d+1'

  [2
   q80 'f1c1'
   q80 'g1d1'
   :
   q80 'e1<b1>'
   q80 'c1<a1>'
  ]
  q80 'e1c1'
  q80 'g+1e1'

  [2
   q80 'f8c8' q45 [14 'fc']
   q80 'g8d8' q45 [14 'gd']
   :
   q80 'e8<b8>' q45 [14 'e<b>']
   q80 'a4.e4.' q45 [2 'ae'] q80 'g4.d4.' q45 [2 'gf']
  ]
  q80 'a8e8' q45 [14 'ae']
  q80 'e1<a1e1>'
 ]

 [3
  q80'e2..<b2..>'q30 [2 'e<b>']
  q80'g2..d2..'q30 [2 'e<b>']
  q80'a2..e2..'q30 [2 'e<b>']
  q80'g4.d4.'q30 [2 'e<b>'] q80'f+4.c+4.'q30 [2 'e<b>']
 ]
 q80'f2..c2..' q30 [2 'e<b>']
 q80'e4.<b4.>' q30 [2 'e<b>'] q80 'e4.<b4.>'r8 r-4. PitchBend.onTime(0,-8000,!4.) r4.
 PitchBend(0)

 q60 [2 'deg<b>'] 
 v(MML(v)-10)
 q80 'd4.e4.g4.<b4.>' r-4 PitchBend.onTime(0,-8192,!4)r4 r2



//------------------------------------
// Track 5 : 
//------------------------------------
TR(5) CH(5) P(60)
@19 v92
M.onNoteWave(0,50,!1)
 r1

 o7
 [4 r1]

 l16
 r4.c+16d32d+32 e4..f32f+32
 g2 b2
 a8ag ef+ga a+agf+ def+e
 d8.c+8.d8 e4..f32f+32

 'g4..e4..'a32a+32 'b2g2'
 '>d8.<a8.' '>c+8.<g+8.' 'b8g8' 'a4e4' 'f+4d4'
 'g2e2' 'b8.g8.' 'a8.f+8.' 'f+8d8'
 'g4..e4..'a32a+32 'b2g2'
 'a4..f4..'g32f+32 'f2c2'
 'e2<b2>' l48 edc<b agfe dc<ba>> l16 r4

 l8
[2
 v(MML(v)-10)
 [2
  rr'ge'rr'f+d'r 'g^2e^2'r2 rr'b-g'b-16a16 'b-g'a16g16af+ 'g4.e4.''e4.<b4.>''f+4d4'
  rr'gd'rr'f+c+'r'g^2d^2'r4. g16a16 'b-g'>c16c+16 'c<g'b-16a16 b-gaf+ 'g4.d4.''b-^2g^2' 
 ]

 [2
  rr'fc'r r'fc'rr
  'gd'rr'gd' rr'g4d4'
  rr'ge'r r'ge'rr
  :
  'ae'rr'ae' rr'a4e4'
 ]
 'af'rr'af' rr'a4f4'

 v(MML(v)+10)
 [2
  'ae'c16e16'ae'e c'a4e4'e
  'fc'<a16>c16'fc'c f'a4f4'c
  :
  'gd'<b16>d16'gd'<b> d'g4d4'd
  'g+e'<b16>e16'g+e'<b>e'b4g+4'e
 ]
 'f+d'<b16>d16'f+d'<b> d'f+4a4'd
 'g+e'<b16>e16'g+e'<b>e'b4g+4'e

 'f2c2' 'a2f2'
 'gd'g16f16gefde<b>
 'd2<b2>' 'g4.d4.'f16d16
 'e2c2' 'c2<a2>'
 'f2c2' 'a2f2'
 'gd'g16f16gefdeg
 'a2e2''b4.g4.'a16b16
 '>c1<g+1'

  'a4.f4.''f4.c4.''a4f4'
  'b4.g4.''g4.d4.''d4<b4>'
  'e4.<b4.''b4.g4.' >'d4<b4>'
  'c4.<g4.>''e4.c4.''g4e4'
  'a4.f4.''f4.c4.''a4f4'
  'b4.g4.''g4.d4.''b4g4'
  'a4.>c4.<''e4.a4.''a4>c4<'
  :
  'a2.e2.'r4
 ]
 'a2.e2.'rg32g+32a32a+32

 l16
 'b4.g4.'>cc+ 'd2<b2>'
 'e8c8'dc <b>dc<b >d<b>c<abgaf+
 'g8.e8.''a8.''b8' 'g8.e8.''f+8.d8.''e8c8'
 'g4.e4.' f+g 'e4.c4.' g32g+32a32a+32

 'b4.g4.'>cc+ 'd4<b4>' <b>cc+d+
 'e8c8'dc 'd8<b8>'c<b '>c<a'bab agf+g
 'e.c.'f+.g 'f+.d.'g.a 'g.e.'a.b ab>c+d
 'e8.c8.''d8.<b8.>''c8<a8' 'b4.g4.'a32g32f32e32

 ef+ga bagf+ agf+e dcc+d
 e<b>f+<b>g<b>a<b> 'b8.g8.''a8.f+8.''g8e8'
 'a4f+4' 'a.f+.''a.f+.''af+' 'b.g.''b.g.''bg' 'g.e.''g.e.''ge'
 'a8.f+8.''g8.e8.''a8f+8' 'b4.g4.'a24g+24g24

 'f4.d4.'ef 'd4.<b4.>'cd
 'e2<b2>' l48 >edc< bag fed c<ba gfe dc<b>>r8
 l8

 'e8.<g8.b8.>' v(MML(v)-10) q99 l48 dc<b agf edc< b



//------------------------------------
// Track 6 : 
//------------------------------------
TR(6) CH(6) P(68)
@62 v110
M.onNoteWave(0,30,!1)
 r1

 o5 l16 q80
 v(MML(v)-10)
 [2 'e<b>''e<b>'rrrr] r4
 [2 'gd''gd'rrrr] r4
 [2 'ae''ae'rrrr] r4
 [2 'gd''gd'rrrr] r4

 [2
  [2 'e<b>''e<b>'rrrr] r4
  [2 'gd''gd'rrrr] r4
  [2 'ae''ae'rrrr] r4
  [2 'gd''gd'rrrr] r4
 ]
 [3 'fc''fc'rr : rr] 
 'e<b>'rrr [2 'e<b>'] r'e<b>' 'e4<b4>'r4
 v(MML(v)+10)

 [2
  [8 r1]
  [8 r1]

  [2
   'f4.c4.'cf 'a2f2'
   'b4.g4.'ba 'g2d2'
   :
   'e2<b2>' 'd2<a2>'
   'e2c2' 'g2e2'
  ]
  'e4.g4.'ga 'g4b4''g4e4'
  'a2.f2.'r4

  [2
   'e4.c4.'fg 'a8.e8.'r 'e4c4'
   'f4.c4.'fg 'a2f2'
   :
   'g4.d4.'fe 'd8.<b8.>'r 'g4d4'
   'e4.<b4.>'dc< 'b2g+2'>
  ]
  'f+4.d4.'f+g 'a8.f+8.'r'>c8.<a8.'r
  'b1g+1'

  f2..e16e-16 d2 d8rc8r<b8>
  d2 g4.f+16f16 e2 e8rd8re8
  f2..f16f+16 g2 g8re8rg8
  a4.gf e2
  g+2 e2

  [2
   rr'fc'r r4 'fc'rr'fc'rr'fc'r
   rr'gd''gd' r4 'gd'rr'gd'rr'gd'r
   :
   rr'ge'r r4 'ge'rr'ge'rr'ge'r
   rr'ae''ae' r4 'ae'rr'ae'rr'ae'r
  ]
  rr'ae'r r4 'ae'rr'ae'rr'ae''ae'
  v(MML(v)-10)
  'e2c2'r2
  v(MML(v)+10)
 ]

 [3
  [2 'e<b>''e<b>'rrrr] r4
  [2 'gd''gd'rrrr] r4
  [2 'ae''ae'rrrr] r4
  [2 'gd''gd'rrrr] r4
 ]
 [3 'fc''fc'rr : rr] 
 'e<b>'rrr [2 'e<b>'] r'e<b>' 'e4<b4>'r4

 [2 'd<bg>'] l8 'd<bg>'



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

 r1
?
 o5 l8
 [4
  e r2.d
 ]

 [8
  e r2.d
 ]
 fr2.d
 er2..
 
 [2
  [8 r1]
  [8 r1]
  [8 r1]
  [8 r1]
  [8 r1]
  [8 r1]
 ]
 r-8 d

 [12
  e r2.d
 ]
 fr2.d
 er2..

 e16e16 e




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

@27,90,0
l8
Rhythm {

  v80 rrrr rrbr r-1 v90 rrrr rrr16s16s16s16 r-1 [4 v90c v75c16c16]

  v80 brrr rrrb r-1 [4 v90c v75c16c16] r-1 v127 e1
  v80 brrr brrb r-1 [4 v90c v75c16c16]
  v80 brrr rrrb r-1 [4 v90c v75c16c16]
  v80 brbr brbr r-1 v90 ssss l16 [2 v100s v80sss] l8r-1 [3 v90c v75c16c16] c16c16 v90 o

  [2
   v80 brbr brbr r-1 v90 rrs4 rrs4       r-1 [4 v90c v75c16c16] r-1 v127 e1
   v80 brbr brbr r-1 v90 rrs4 rrs.v70s16 r-1 [4 v90c v75c16c16]
   v80 brbr brbr r-1 v90 rrs4 rrs4       r-1 [4 v90c v75c16c16]
   :
   v80 brbr brbr r-1 v90 rrs4 rr v80 S v70s16s16  r-1 [4 v90c v75c16c16]
  ]
  v80 brbr brbr r-1 r v70s16s16 v90s.v70s16 l16 ss v100qq aazz l8 r-1 [4 v90c v75c16c16]

  v80 brbr brbr r-1 v90 rrs4 rrs.v70s16 r-1 [4 v90c v75c16c16] r-1 v127 e1
  v80 brbr brrr r-1 v90 l16 rrss rsss r4. ss l8 r-1 v80o v60f ff ffff

 [2
  [2
   [2
    v80 brbr brbr r-1 v90 rrs4 rrs4       r-1 [4 v90c v70o] r-1 v127 e1
    v80 brbr brbr r-1 v90 rrs4 rrs.v70s16 r-1 [4 v90c v70o]
    v80 brbr brbr r-1 v90 rrs4 rrs4       r-1 [4 v90c v70o]
    :
    v80 brbr brbr r-1 v90 rrs4 rr v80 S v70s16s16  r-1 [4 v90c v70o]
   ]
   :
   v80 brbr brbr r-1 l16 rv70srs v90s8v70ss rv90sv60ss v90 aazz l8 r-1 [4 v90c v70o]
  ]
  v80 brbr brbr r-1 v90 rS l16 ssrs qazw azss l8 r-1 [4 v90c v70o]

  [2
   [2
    v80 brbr brbr r-1 v90 rrs.v60s16 r16s.v90s4 r-1 [4 v90c16v60c16 v70o] r-1 v127 e1
    v80 brbr brbr r-1 v90 rrs.v60s16 r16ss16v90sv60s16s16 r-1 [4 v90c16v60c16 v70o]
    v80 brbr brbr r-1 v90 rrs.v60s16 r16s.v90s4 r-1 [4 v90c16v60c16 v70o]
    :
    v80 brbr brbr r-1 v90 rrS.v60s16 r16ss16v90Sv70s16s16 r-1 [4 v90c16v60c16 v70o]
   ]
   :
   v80 brbr brbr r-1 v90 rrS.v60s16 r16ss16v90Sv70s16s16 r-1 [4 v90c16v60c16 v70o]
  ]
  v80 brbr brbr r-1 v90 l16 aass zzss aazz wwss l8 r-1 [4 v90c16v60c16 v70o]

  [2
   v80 brrb b.b.b r-1 v90 rrrr rrs4 r-1 v90 frfr frfr r-1 v127 y4 v100 j4j4j4
   v80 brrb b.b.b r-1 v90 rrrr rrs4 r-1 v90 frfr frfr r-1 v100 j4j4j4j4
   v80 brrb b.b.b r-1 v90 rrrr rrs4 r-1 v90 frfr frfr r-1 v100 j4j4j4j4
   :
   v80 brrb b.b.b r-1 v90 rrrr rrSs16s16 r-1 v90 frfr frfr r-1 v100 j4j4j4j4
  ]
  v80 brbrbrbr r-1 l16 v90 rrss rqaz aazz ssss l8 r-1 v90 frfr frfr r-1 v90 d4 v100 j4j4j4

  [2
   v80 brbr brbr    r-1 v90 rrs4 rrs.v80s16   r-1 [4 v90c v70o] r-1 v127 e1
   v80 brbr brb.b16 r-1 v90 rrs4 rrsv80s16s16 r-1 [4 v90c v70o]
   v80 brbr brbr    r-1 v90 rrs4 rrs.v80s16   r-1 [4 v90c v70o]
   :
   v80 brbr brb.b16 r-1 v90 rrs.v70s16 rr v80 S v80s16s16  r-1 [4 v90c v70o]
  ]
  v80 brrr brbr r-1 r2 l16 v70 rv90sv60ss v90 aazz l8 r-1 v127 e2 v70 ffff
 ]

  [3
   v80 brbr brbr r-1 v90 rrs4 rrs4       r-1 [4 v90c v75c16c16] r-1 v127 e1
   v80 brbr brbr r-1 v90 rrs4 rrs.v70s16 r-1 [4 v90c v75c16c16]
   v80 brbr brbr r-1 v90 rrs4 rrs4       r-1 [4 v90c v75c16c16]
   :
   v80 brbr brb.b16 r-1 v90 rrs4 rr v80 S v70s16s16  r-1 [4 v90c v75c16c16]
  ]
  v80 brbr brbr r-1 r v70s16s16 v90s.v70s16 l16 ss v100qq aazz l8 r-1 [4 v90c v75c16c16]

  v80 brbr brbr r-1 v90 rrs4 rrs.v70s16 r-1 [4 v90c v75c16c16] r-1 v127 e1
  v80 brb.b16 brrr r-1 v90 l16 rrss rsss r4. ss l8 r-1 v80o v60f ff ffff

  v80 bb2.. r-1 v80 [2 's16z16'] v90 S4 r2r8 r-1 r v127 d4 r2.

}