/*

行き当たりばったりで曲作るとこうなります。


多分この曲をいじくることはもうないと思う、でもこんだけ作っといてお蔵入りもなんか惜しいということで、
申し訳ないですが、途中がけの状態で投稿してしまいます。すみません。フェードアウトします・・・


*/

TrackName={"Big Ben"}
Copyright={"R*3"}

System.MeasureShift(1) // 小節数のシフト設定
ResetGM();             // GM音源用リセット
Time(1:1:0); TrackSync;// トラックの同期

Tempo=136 
Include(groove.h);
Include(gs.h);


Str Pad1={
Sub{ o3 l1 e^fd  e^fd  e^fd  e^fd  } 
Sub{ o5 l1 e^fd  e^fd  e^fd  e^fd  }
Sub{ o5 l1 g^^a  g^^a  g^^a  g^^a  }
     o5 l1 b^`c^  b^`c^  b^`c^  b^`c^  }
     
Str Pad2={
Sub{ o3 l1 f^^g  a^^c     f^^g  a^^c  } 
Sub{ o5 l1 f^^g  a^^^c    f^^g  a^^c  } 
Sub{ o5 l1 `c^^b e^fa     g^ab  e^^a  }
     o5 l1 a^`e^ `c`d`^c  ^`f^`e^`c^`d  }
     

TR=1 @90 V.T(30,80,!1+1) q99 P=64   BR=1 p62 REV=127 [2 Pad1 ] [2Pad2]   Pad2 EP.T(127,0,!1+1+1+1+1+1+1 +1+1+1+1+1+1+1+1) Pad2 








Str Airpad1={
Sub{ o6 v127 l1 ega`d  b^`ca } 
Sub{ o6 v90  l1 b^`c^ `d`e`d^  } 
     o6 v80  l1 cdf^   gdfd   }
     
Str Airpad2={
Sub{ o6 v127 l1 f^^g  a^fg } 
Sub{ o6 v90  l1 ag`d^   ^`d^b  } 
     o6 v80  l1 c^"a"b   c^bd   }

TR=3 @103  q99 P=64  BR=1 p64 r1+1+1+1 +1+1+1+1 V.T(10,40,!1+1+1+1 +1+1+1+1) REV=80 [3 Airpad1 ] [4Airpad2]    [3Airpad2]  EP.T(127,0,!1+1+1+1+1+1+1) Airpad2







Str Square1={ l16 o6 q20
Sub{ l16 o5 [16ev-40ev+40] }
Sub{ l16 o5 [16av-40av+40] }
Sub{ l16 o4      dv-40dv+40bv-40bv+40  av-40av+40dv-40dv+40  av-40av+40bv-40bv+40  av-40av+40dv-40dv+40  }
     l16 o6 v-20 ev-40ev+40gv-40gv+40  dv-40dv+40av-40av+40  gv-40gv+40dv-40dv+40  ev-40ev+40av-40av+40  v+20
}

TR=4 @5 BR=1 p64 V.T(0,100,!1+1+1+1+1+1+1+1 +1+1+1+1+1+1+1+1  +1+1+1+1+1+1+1+1) REV=15 P=0   Sub{ r8.+4. v40[96 Square1 ] }  Sub{ r8. v80[96 Square1 ] }   v100 [88 Square1 ]  EP.T(127,0,!1+1+1+1+1+1+1) [8 Square1 ]
TR=5 @5 BR=1 p63 V.T(0,100,!1+1+1+1+1+1+1+1 +1+1+1+1+1+1+1+1  +1+1+1+1+1+1+1+1) REV=15 P=127 Sub{ r4.+4. v20[96 Square1 ] }  Sub{ r4. v60[96 Square1 ] }   v100 [88 Square1 ]  EP.T(127,0,!1+1+1+1+1+1+1) [8 Square1 ]










TR=10 BR=1 p127 l16 Swing16(6) REV=2 @25 P=64

V.T(0,127,!1+1+1+1 +1+1+1+1 +1+1+1+1 +1+1+1+1 +1+1+1+1 +1+1+1+1 +1+1+1+1 +1+1+1+1)

Sub{ l16 [128 v70n44rv127n42r v70n44v50n44v127n42v50n31 ]}

Sub{
[32 v100
n82rn82n82 n82rn82n82 n82r'n82n37'n82 n82v40n37v100'n82n37'n82
n82rn82n82 n82rn82n82 n82r'n82n37'n82 'n82v70n37'v40n37v100'n82n37'v40 n37
 ] }



r1+1+1+1 +1+1+1+1 +1+1+1+1 +1+1+1+1  +1+1+1+1 +1+1+1+1

Sub{ l32 v127 [48   rrrr rrrr v127'n39v30v30n55'rrr rrrr    rrrr v20'n39n55'v30'n39n55'v40'n39v30n55'v50'n39v30n55' v127'n39v30v30n55'rrr rrrr ]}

r1+1+1+1 +1+1r1 l32 v0 Swing16(0) [32 'n36n35n27n33'v+4]

l16 Swing16(6) 

n49,0
[12
'n36n35n27n33'rrr   rrrr    rr'n36n35n27n33'r   r'n36n35n27n33'rr
'n36n35n27n33'r'n36n35n27n33'r   rrrr    rr'n36n35n27n33'r   :r'n36n35n27n33'rr] r'n36n35n27n33'rr


v127 n49,0
r1+1+1+1 l16v0 [28'n36n35n27n33''n36n35n27n33'v+4]
Swing16(0) l32 'n36n35n27n33''n36n35n27n33''n36n35n27n33''n36n35n27n33'l16 'n36n35n27n33''n36n35n27n33'l12'n36n35n27n33''n36n35n27n33''n36n35n27n33' 


Swing16(6) 
Sub{ l4  v127 n49 v70 n49 v50 n49 v30 n49 v10 n49 }
Sub{ l4  v127 [30 'n36n35n27n33' 'n36n35n27n33' ] 'n36n35n27n33'rrr Sub{ l4  v127 n49 v70 n49 v50 n49 v30 n49 v10 n49 }
         v127 [16 'n36n35n27n33' 'n36n35n27n33' ] EP.T(127,0,!1+1+1+1+1+1+1)[14'n36n35n27n33' 'n36n35n27n33' ]'n36n35n27n33'rrr  }
Sub{ l16 v100 [64  v100n42v70n42v127n46v20n42  v100n42rv127n46n42 ]}
Sub{ l32 v127 [32   rrrr rrrr v127'n39v50n40v30n55'rrr rrrr    rrrr v20'n39n55n40'v30'n39n55n40'v40'n39v30n40n55'v50'n39v30n40n55' v127'n39v50n40v30n55'rrr rrrr ]}
              [32  v80 n82rn82v60n82  v80 n82rn82v60n82  v80 n82rn82v60n82  v80 n82n82rn82 ]

















TR=6 @126,7 o10  REV=127 l2 Sub{ v127 d^ v80c^ v50d^ v20 c^ }
 r1+1+1+1 +1+1+1+1 +1+1+1+1 +1+1+1+1
 r1+1+1+1 +1+1+1+1 r1+1+1+1 r1+1r1 REV=40 EP.T(0,127,!1) V=127 v127 'dg'1
 r1+1+1+1 +1+1+1+1 r1+1+1+1 r1+1r1 REV=40 EP.T(0,127,!1) V=127 v127 'r'1

 r1+1+1+1 r1+1REV=40 EP.T(0,127,!1+1) V=127 v127 'dg'1+1
 r1+1+1+1 r1+1REV=40 EP.T(0,127,!1+1) V=127 v127 'dg'1+1

 r1+1+1+1 +1+1+1+1
 r1+1+1+1 r1+1REV=40 EP.T(0,127,!1+1) V=127 v127 Sub{'dg'1+1} r1+1
 
 TR=8 @127 q100 o8
 r1+1+1+1 +1+1+1+1 +1+1+1+1 +1+1+1+1
 r1+1+1+1 +1+1+1+1 +1+1+1+1 +1+1+1+1
 r1+1+1+1 +1+1+1+1 +1+1+1+1 +1+1+1+1
 r1+1+1+1 +1+1+1+1 r1+1+1+1  V.T(0,127,!1+1+1+1,100,0,!1+1+1)
 P.T(20,107,!2,107,20,!2,20,107,!2,107,20,!2,20,107,!2,107,20,!2,20,107,!2,107,20,!2,20,107,!2,107,20,!2,20,107,!2,107,20,!2,20,107,!2)
 BR=5 p.T(0,127,!1+1+1+1)c1+1+1+1 +1+1+1
 
 
 
 
 
 
 
 
 
 
 

Str Bass1={ o3 l16 
frfr rfrr fr"fr r"frr    frfr rfrr frr"f r"fr"f   frfr rfrr fr"fr r"frr    grgr rgrr grre rere
arar rarr ar"ar r"arr    arar rarr arr"a r"ar"a   arar rarr ar"ar r"arr    crcr r`crr `crrc rcrc

frfr rfrr fr"fr r"frr    frfr rfrr frr`f r`fr`f   frfr rfrr fr"fr r"frr    grgr rgrr grre rere
arar rarr ar"ar r"arr    arar rarr arr"a r"ar"a   arar rarr ar"ar r"arr    `cr`cr r`crr `crrc rcrc


frfr rfrr fr"fr r"frr    frfr rfrr frr"f r"fr"f   frfr rfrr fr"fr r"frr    grgr rgrr grre rere
arar rarr ar"ar r"arr    arar rarr arr"a r"ar"a   arar rarr ar"ar r"arr    crcr r`crr `crrc rcrc

r1+1+1+1 +1+1+1+1



frfr rfrr fr"fr r"frr    frfr rfrr frr"f r"fr"f   frfr rfrr fr"fr r"frr    grgr rgrr grre rere
arar rarr ar"ar r"arr    arar rarr arr"a r"ar"a   arar rarr ar"ar r"arr    crcr r`crr `crrc rcrc

frfr rfrr fr"fr r"frr    frfr rfrr frr`f r`fr`f   frfr rfrr fr"fr r"frr    grgr rgrr grre rere
arar rarr ar"ar r"arr    arar rarr arr"a r"ar"a   arar rarr ar"ar r"arr    `cr`cr r`crr `crrc rcrc


frfr rfrr fr"fr r"frr    frfr rfrr frr"f r"fr"f   frfr rfrr fr"fr r"frr    grgr rgrr grre rere
arar rarr ar"ar r"arr    arar rarr arr"a r"ar"a   arar rarr ar"ar r"arr    crcr r`crr `crrc rcrc
EP.T(127,0,!1+1+1+1+1+1+1)
frfr rfrr fr"fr r"frr    frfr rfrr frr`f r`fr`f   frfr rfrr fr"fr r"frr    grgr rgrr grre rere
arar rarr ar"ar r"arr    arar rarr arr"a r"ar"a   arar rarr ar"ar r"arr    `cr`cr r`crr `crrc rcrc

}




TR=14 @40 REV=5 v127 V=90
r1+1+1+1 +1+1+1+1 +1+1+1+1 +1+1+1+1   r1+1+1+1 +1+1+1+1 +1+1+1+1 +1+1+1+1 Sub{ r4 v30 Bass1 }  Sub{ r8 v50 Bass1 } v127 Bass1

TR=15 @39,1 REV=5 v127 V=127
r1+1+1+1 +1+1+1+1 +1+1+1+1 +1+1+1+1   r1+1+1+1 +1+1+1+1 +1+1+1+1 +1+1+1+1 Sub{ r4 v30 Bass1 }  Sub{ r8 v50 Bass1 } v127 Bass1




Str SidechainBass1={ o3 l16 



[4r1+1+1+1 +1+1+1+1]

Sub{ o3 v70
f1+1+1g1a1+1+1c1
f1+1+1g1a1+1+1c1
f1+1+1g1a1+1+1c1
f1+1+1g1a1+1+1c1 }

o2 v127
f1+1+1g1a1+1+1c1
f1+1+1g1a1+1+1c1
f1+1+1g1a1+1+1c1
V.T(127,0,!1+1+1+1+1+1+1)f1+1+1g1a1+1+1c1 
 }






TR=16 @88 REV=5 v127 V=127 P=64 q100 
r1+1+1+1 +1+1+1+1 +1+1+1+1 +1+1+1+1   r1+1+1+1 +1+1+1+1 +1+1+1+1 +1+1+1+1  

Sub{ [256  EP.T(0,127,!8.) r4] }
SidechainBass1









TR=7 @51
r1+1+1+1 +1+1+1+1 +1+1+1+1 +1+1+1+1   r1+1+1+1 +1+1+1+1 +1+1+1+1 r1+1+1 V.T(0,127,!1) q99 Sub{v127 o2 a2g2 [4f1+1+1g1a1+1+1c1]}  o3 a2g2 [3f1+1+1g1a1+1+1c1]V.T(127,0,!1+1+1+1+1)f1+1+1g1a1+1+1V.T(0,127,!1)c1











Str Saw1={ [4
""e""e 'cea'""e  'cea'r""e'cea'    ""e""e 'cea'""e  'cea'r""e'cea'
""e""e 'ceb'""e  'ceb'r""e'ceb'    ""e""e 'cgb'""e  'cgb'r""e'cgb'
""f""f '"af`c'""f '"af`c'r""f'"af`c'  ""f""f '"af`c'""f '"af`c'r""f'"af`c'
""d""d '"b`cf'""d '"b`cf'r""d'"b`cf'  ""d""d '"a`df'""d '"a`df'r""d'"a`df'  ]     }


Str Saw2={  
""f""f 'cea'""f  'cea'r""f'cea'    ""f""f 'cea'""f  'cea'r""f'cea'
""f""f 'ceb'""f  'ceb'r""f'ceb'    ""f""f 'cgb'""f  'cgb'r""f'cgb'
""f""f '"af`c'""f '"af`c'r""f'"af`c'  ""f""f '"af`c'""f '"af`c'r""f'"af`c'
""f""g '"b`cf'""g '"b`cf'r""g'"b`cf'  ""g""g '"a`df'""g '"a`df'r""g'"a`df' 

""a""a 'cea'""a  'cea'r""a'cea'    ""a""a 'cea'""a  'cea'r""a'cea'
""a""a 'ceb'""a  'ceb'r""a'ceb'    ""a""a 'cgb'""a  'cgb'r""a'cgb'
""a""a '"af`c'""a '"af`c'r""a'"af`c'  ""a""a '"af`c'""a '"af`c'r""a'"af`c'
""a"c '"b`df'"c '"b`df'r"c'"b`df'  "c"c '"a`df'"c '"a`df'r"c'"a`df'  

[3
""f""f 'cea`e'""f  'cea`e'r""f'cea`e'    ""f""f 'cea`e'""f  'cea`e'r""f'cea`e'
""f""f 'ceb`d'""f  'ceb'r""f'ceb`d'    ""f""f 'cgb`d'""f  'cgb`d'r""f'cgb`d'
""f""f '"acf`c'""f '"acf`c'r""f'"af`c'  ""f""f '"acf`c'""f '"acf`c'r""f'"acf`c'
""f""g '"bd`df'""g '"bd`df'r""g'"bd`df'  ""g""g '"ad`df'""g '"ad`df'r""g'"ad`df' 

""a""a 'cea`e'""a  'cea`e'r""a'cea`e'    ""a""a 'cea`e'""a  'cea`e'r""a'cea`e'
""a""a 'ceb`d'""a  'ceb`d'r""a'ceb`d'    ""a""a 'cgb`g'""a  'cgb`g'r""a'cgb`g'
""a""a '"af`c`g'""a '"af`c`g'r""a'"af`c`g'  ""a""a '"afb`g'""a '"afb`g'r""a'"af`c`g'
""a"c '"b`df'"c '"b`df'r"c'"b`df'  "c"c '"a`df'"c '"a`df'r"c'"a`df'  ]   




[2
""f""f 'cea'""f  'cea'r""f'cea'    ""f""f 'cea'""f  'cea'r""f'cea'
""f""f 'ceb'""f  'ceb'r""f'ceb'    ""f""f 'cgb'""f  'cgb'r""f'cgb'
""f""f '"af`c'""f '"af`c'r""f'"af`c'  ""f""f '"af`c'""f '"af`c'r""f'"af`c'
""f""g '"b`cf'""g '"b`cf'r""g'"b`cf'  ""g""g '"a`df'""g '"a`df'r""g'"a`df' 

""a""a 'cea'""a  'cea'r""a'cea'    ""a""a 'cea'""a  'cea'r""a'cea'
""a""a 'ceb'""a  'ceb'r""a'ceb'    ""a""a 'cgb'""a  'cgb'r""a'cgb'
""a""a '"af`c'""a '"af`c'r""a'"af`c'  ""a""a '"af`c'""a '"af`c'r""a'"af`c'
""a"c '"b`df'"c '"b`df'r"c'"b`df'  "c"c '"a`df'"c '"a`df'r"c'"a`df'  ]

[2
""f""f 'cea`e'""f  'cea`e'r""f'cea`e'    ""f""f 'cea`e'""f  'cea`e'r""f'cea`e'
""f""f 'ceb`d'""f  'ceb'r""f'ceb`d'    ""f""f 'cgb`d'""f  'cgb`d'r""f'cgb`d'
""f""f '"acf`c'""f '"acf`c'r""f'"af`c'  ""f""f '"acf`c'""f '"acf`c'r""f'"acf`c'
""f""g '"bd`df'""g '"bd`df'r""g'"bd`df'  ""g""g '"ad`df'""g '"ad`df'r""g'"ad`df' 

""a""a 'cea`e'""a  'cea`e'r""a'cea`e'    ""a""a 'cea`e'""a  'cea`e'r""a'cea`e'
""a""a 'ceb`d'""a  'ceb`d'r""a'ceb`d'    ""a""a 'cgb`g'""a  'cgb`g'r""a'cgb`g'
""a""a '"af`c`g'""a '"af`c`g'r""a'"af`c`g'  ""a""a '"afb`g'""a '"afb`g'r""a'"af`c`g'
""a"c '"b`df'"c '"b`df'r"c'"b`df'  "c"c '"a`df'"c '"a`df'r"c'"a`df' :EP.T(127,0,!1+1+1+1+1+1)  ]  }




TR=11 @82,8 q50 o6 l16 P=0   BR=1 p58 REV=40 r1+1+1+1+1+1+1+1 r1+1+1+1+1+1+1+1 
V.T(0 ,70 ,!1+1+1+1 +1+1+1+1 +1+1+1+1 ) Sub{ v65 r4+8 Saw1}  Sub{ v95 r8 Saw1} v127 Saw1 
V.T(70,100,!1+1+1+1 +1+1+1+1 +1+1+1+1 ) Sub{ v65 r4+8 Saw2}  Sub{ v95 r8 Saw2} v127 Saw2 

TR=12 @82,8 q50 o6 l16 P=127 BR=1 p70 REV=40 r1+1+1+1+1+1+1+1 r1+1+1+1+1+1+1+1
V.T(0 ,70 ,!1+1+1+1 +1+1+1+1 +1+1+1+1 ) Sub{ v50 r2   Saw1}  Sub{ v80 r4 Saw1} v127 Saw1 
V.T(70,100,!1+1+1+1 +1+1+1+1 +1+1+1+1 ) Sub{ v50 r2   Saw2}  Sub{ v80 r4 Saw2} v127 Saw2 

TR=13 @40        l16 P=64  BR=1 p64 REV=40 r1+1+1+1+1+1+1+1 q.T(5,5,!1+1+1+1 +1+1+1+1 +1+1+1+1 +1+1+1+1 +1+1+1+1 +1+1+1+1) o6 V.T(0,100,!1+1+1+1 +1+1+1+1,100,0,!1+1+1+1 +1+1+1+1 +1+1+1+1 +1+1+1+1) 
Sub{ v50 r2 Saw1} Sub{ v65 r4. Saw1}  Sub{ v80 r4 Saw1}  Sub{ v95 r8 Saw1} v127 Saw1