/* ■MP3　http://rrr3.6.ql.bz/music/cyber_city.mp3

推奨音源　MP3 >>>>> TW-Music2 >>> GS > GM > XG　(MP3メインで作ってるのでMP3を推奨！)



お久しぶりはじめましてこんにちは。R*3です。


今回の曲はさくらもどきさんの☆CyberCity -Euphoric World Fragmented-☆のリミックスです。

原曲をさらにトランスっぽくしてみましたがどうでしょうか。
もともとのもつ良い雰囲気を壊していなければいいのですが・・・


あ、例のごとくイントロが三分近くあるので飛ばしてもらってかまわないです。笑



R*3　http://rrr3.6.ql.bz/


*/

TrackName={"Cyber City (R*3 Mix)"}
Copyright={"原曲：さくらもどき　編曲：R*3"}





ResetGS;TrackSync
KeyFlag-(eab)
Tempo=135


CH(11) SysEx$ = f0,41,10,42,12,{40,1a,15,02},f7;




//******** Bass


Str LB01={ l1  v127 c1+1+1+1 }
Str LB02={ l1  v127 c1+1<g1+1a1+1e1+1> }

Str MB01={ l16 v127 [4 "crcr crrc rcrc crcc  ]  }
Str MB02={ l16 v127 ["crcr crrc rcrc crcc]<["grgr grrg rgrg grgg]["arar arra rara araa]["erer erre rere eree]>  }

Str HB01={ l16 v127 [4 [4"cccc] ]}
Str HB02={ l16 v127 [8"cccc]<[8"gggg][8"aaaa][8"eeee]> }



//_ TR-01 Low Bass
TR=1 @40,16 q100 o3 REV=2 V=127 CHO=40 r1Sub{ [256 [4EP.T(0,0,!16,0,127,!8) r4 ] ]}
//Intro
[10 r1+1+1+1 ] 

[8 LB01 ]
V.T(127,0,!1+1+1+1 +1+1+1+1 +1+1+1+1 +1+1+1+1)
[2 LB01 ]

[72 r1 ]
V=127
[6 LB02 ]

LB01

[8 LB01 ]

V.T(127,0,!1+1+1+1 +1+1+1+1 +1+1+1+1)
 [4 LB01 ]











 
//_ TR-02 Mid Bass
TR=2 @39 o4 q80 REV=17 V=90 p58 r1
//Intro
V.T(0,90,!1+1+1+1 +1+1+1+1 +1+1+1+1 +1+1+1+1) [10 MB01 ]

[8 MB01 ]
V.T(90,10,!1+1+1+1 +1+1+1+1)
[2 MB01 ]
 
[56 r1 ]
V=90
[8 MB02 ]

MB01

[8 MB01 ]
V.T(90,0,!1+1+1+1 +1+1+1+1 +1+1+1+1)
[4 MB01]














//_ TR-03 High Bass
TR=3 @88 o4 REV=30 V=100  r1Sub{ [128 [4 EP.T(0,127,!8) r4 ] ]}
V.T(30,100,!1+1+1+1 +1+1+1+1 +1+1+1+1 +1+1+1+1) [10 HB01 ]

[8 HB01 ]
V.T(90,10,!1+1+1+1 +1+1+1+1)
[2 HB01 ]
 
[56 r1 ]
V=90
[8 HB02 ]

HB01

[8 HB01 ]
V.T(90,0,!1+1+1+1 +1+1+1+1 +1+1+1+1 +1+1+1)
[4 HB01]



















//******** Poly Synth


Str PS01={ l16 [ "cr'"ge'""c '"ge'r""c'"ge'     ""cr'"ge'""c '"ge'""c'"ge'r ]
               [ "cr'"gd'""c '"gd'r""c'"gd'     ""cr'"gd'""c '"gd'""c'"gd'r ]
		   [ "cr'"ac'""c '"ac'r""c'"ac'     ""cr'"ac'""c '"ac'""c'"ac'r ]
		   [ "cr'"bd'""c '"bd'r""c'"bd'     ""cr'"bd'""c '"bd'""c'"bd'r ] }

Str PS02={ l16 [  "cr'"ge' ""c '"ge'r ""c'"ge'      ""cr'"ge' ""c '"ge' ""c'"ge'r ]
               [ ""gr'"gd'"""g '"gd'r"""g'"gd'     """gr'"gd'"""g '"gd'"""g'"gd'r ]
		   [ ""ar'"ac'"""a '"ac'r"""a'"ac'     """ar'"ac'"""a '"ac'"""a'"ac'r ]
		   [ ""er'"bd'"""e '"bd'r"""e'"bd'     """er'"bd'"""e '"bd'"""e'"bd'r ] }

Str PS03={ l16 [4 "cr'"ge'""c '"ge'r""c'"ge'     ""cr'"ge'""c '"ge'""c'"ge'r ]  }


Str PS00={
[48 r1 ]

V.T(0,20,!1+1+1+1 +1+1+1+1,20,70,!1+1+1+1 +1+1+1+1)
[4 PS01 ]
V.T(70,0,!1+1+1+1 +1+1+1+1)
PS01

[32 r1 ]
V.T(10,70,!1+1+1+1 +1+1+1+1 +1+1+1+1 +1+1+1+1)
[2 PS02 ]
[7 PS02 ]
V.T(70,20,!1+1+1+1 +1+1+1+1)
PS02

V.T(20,70,!1+1+1+1)
PS03 

[2 PS01 ]

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

[2 PS01]


}


Str PS0={
[48 r1 ]

V.T(0,20,!1+1+1+1 +1+1+1+1,20,70,!1+1+1+1 +1+1+1+1)
[4 PS01 ]
V.T(70,0,!1+1+1+1 +1+1+1+1)
PS01

[32 r1 ]
V.T(10,70,!1+1+1+1 +1+1+1+1 +1+1+1+1 +1+1+1+1)
[2 PS02 ]
[7 PS02 ]
V.T(70,20,!1+1+1+1 +1+1+1+1)
PS02

V.T(20,70,!1+1+1+1)
PS03 

[2 PS01 ]

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

[2 PS01]


}



//_ TR-04 Left Poly Synth
TR=4 @82,90,1 REV=40 p64 P=64 o6 v127 r1 [48 r1 ]

V.T(0,40,!1+1+1+1 +1+1+1+1,40,100,!1+1+1+1 +1+1+1+1)
[4 PS01 ]
V.T(100,0,!1+1+1+1 +1+1+1+1)
PS01

[32 r1 ]
V.T(60,110,!1+1+1+1 +1+1+1+1 +1+1+1+1 +1+1+1+1)
[2 PS02 ]
[7 PS02 ]
V.T(110,50,!1+1+1+1 +1+1+1+1)
PS02

V.T(50,110,!1+1+1+1)
PS03 

[2 PS01 ]

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

[2 PS01]










//_ TR-05 Delay Poly Synth
TR=5 @82,90,1  REV=110 p64 P=64 o6 V=60 r4.  r1
Sub{ r1    v20   PS0  } 
Sub{ r2+4. v40   PS0  }
Sub{ r2    v60   PS0  } 
Sub{ r4.   v80   PS0  } 
           v127  PS00















//******** Pad


Str Pd01={
Sub{ l4 o6 e^^^ f^^^ ^^^^ ^^^^ e^^g ^^f^ g^^^ ^^^^ d^^^^^^^ c^^^ ^^^^ ^^^^ "b^^^ ^^^^ c^^^}
Sub{ l4 o6 c^^^ ^^"b^ ^^^^ c^^^ ^^^e ^^^^ c^^^<b^^^ ^^^^ a^^^ g^^^ f^^^ ^g^^ f^^^ ^^^^ a^g^}
Sub{ l4 o5 g^^^ ^^^^ e^^^ ^^^^ f^^^ ^^^^ ^^^^ c^^^ ^^^d e^^^ ^^^^ ^^^d ^^^^ ^^^^ c^^^ ^^^^}
Sub{ l1 o4 c1+1+1+1 +1+1+1+1 +1+1+1+1+1+1+1+1  }
     l1 o3 c1+1+1+1 +1+1+1+1 +1+1+1+1+1+1+1+1                                                          }

Str Pd02={
Sub{ l4 o6 e^^^ f^^^ ^^^^ ^^^^ e^^g ^^f^ g^^^ ^^^^ d^^^^^^^ c^^^ ^^^^ ^^^^ "b^^^ ^^^^ c^^^}
Sub{ l4 o6 c^^^ ^^"b^ ^^^^ c^^^ ^^^e ^^^^ c^^^<b^^^ ^^^^ a^^^ g^^^ f^^^ ^g^^ f^^^ ^^^^ a^g^}
Sub{ l4 o5 g^^^ ^^^^ e^^^ ^^^^ f^^^ ^^^^ ^^^^ c^^^ ^^^d e^^^ ^^^^ ^^^d ^^^^ ^^^^ c^^^ ^^^^}
Sub{ l1 o3 [`c^g^a^e^]     }
     l1 o2 [`c^g^a^e^]                                                         }
     
     

//_ TR-06 Pad

TR=6 @90 r1 q100 REV=127 
[40 r1 ]

V.T(10,70,!1+1+1+1 +1+1+1+1 +1+1+1)

[2 Pd01 ]
V.T(70 , 60,!1+1+1+1 +1+1+1+1 +1+1+1+1 +1+1+1+1)
Pd01

V.T(60 , 110,!1+1+1+1 )
Pd01

Pd02 

//Main
V=80

[5 Pd02 ]



Sub{ l4 o6 e^^^ f^^^  ^^^^ ^^^^}
Sub{ l4 o6 c^^^ ^^"b^ ^^^^ c^^^}
Sub{ l4 o5 g^^^ ^^^^ e^^^ ^^^^}
Sub{ l1 o4 c1+1+1+1  }
     l1 o3 c1+1+1+1     
     
Pd01
V.T(80,0,!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)

[Pd01]













//******** Main Lead


Str ML01={ l8 d&e^&"b ^&d^&e  &"b^^"b  ^&"a&"g&"a  d&e^&"b ^&d&e&b  &g^^&b  ^&a&g&f&
              d&e^&"b ^&d&e&g ^^&f&e  ^&"g&"a&"b     "b^^&"g ^^&"b&d&e&d&"b&"g^&"f^^ }
//_ TR-07 Main Lead
TR=7 @82,1 V=127 v127 REV=70 CHO=120 o6 q100 r1
[103 r1 ]V.T(0,127,!1)d1
[10 ML01 ]

V.T(127,0,!1+1+1+1 +1+1+1+1 +1+1+1+1 +1+1+1+1)
[2 ML01]


//_ TR-08 Delay Lead
TR=8 @82,1  V=80 v127 REV=110 CHO=80 o6 q100 r4. r1 Sub{ [256 P.T(30,90,!2,90,30,!2) r1 ] }
[104 r1 ]  
[10 ML01 ]

V.T(80,0,!1+1+1+1 +1+1+1+1 +1+1+1+1 +1+1+1+1)
[2 ML01]














//******** Porta Square & Koto SQ


Str KT01={ l8  rceb geb`c}
Str SQ01={ l16 Sub{ r4. v55 [8 "crcdfgb`c  "crcdfg`cg] }  Sub{ r8. v80 [8 "crcdfgb`c  "crcdfg`cg ] }  v127 [8 "crcdfgb`c  "crcdfg`cg ]  }

//_ TR-09 Porta Square & Koto SQ
TR=9 @108 r1 o6 REV=40

[32 r1 ]

[7 r1 ]
  Sub{ r2. v40 KT01 } Sub{ r2 v60 KT01 } Sub{ r4 v80 KT01 } v100 KT01

[8 r1 ]
P=107
@81,1
V.T(30,60,!1+1+1+1 +1+1+1+1)
[4 SQ01 ]

V.T(60,30,!1+1+1+1 +1+1+1+1)
SQ01

[48 r1 ]

V.T(20,60,!1+1+1+1 +1+1+1+1 +1+1+1+1 +1+1+1+1)
[2 SQ01 ]


[6 SQ01 ]
Sub{ r4. v55 [4 ["crcdfgb`c ]] }  Sub{ r8. v80 [4 ["crcdfgb`c ]] }  v127 [4 ["crcdfgb`c ]] 

[4 SQ01 ]
V.T(60,20,!1+1+1+1 +1+1+1+1 +1+1+1+1 +1+1+1+1)
[ SQ01 ]














//******** Drums

//_ TR-10 Main Drums
TR=10 REV=2 @27,90 r1

//Intro
Sub{ l2  v100 n49 v60n49v30n49v15n49}
Sub{ l4  v127 [16 n36 n36 n36: n36 ] }
Sub{ l4  v70  [16 n35 n35 n35: n35 ] }
Sub{ l4  v110 [16 n33 n33 n33: n33 ] }
Sub{ l4  v127 [16 n32 n32 n32: n32 ] }

Sub{ l16 v100 [16 [4 v50n42n42v110n42n42] ] }
Sub{ l16 v120 [16 [4 v120n8n8v50n8n8]]}

[2r1+1+1+1]
Sub{ l4  v127 [8  r  n39 : r  n39 ] l32 rrv10[6n39v+15]v127 l8n39REV=50v100n39REV=3 }
Sub{ l4  v127 [8  r  n15 : r  n15 ] l32 rrv10[6n15v+15]v127 l8n15v100'n15v60n55' }
[2r1+1+1+1]


Sub{ l2  v127 n49 v60n49v30n49v15n49}
Sub{ l4  v127 [16 n36 n36 n36 n36 ]Sub{ l2 v100 n49 v50n49v30n49v15n49} v127 n36 }
Sub{ l4  v70  [16 n35 n35 n35 n35 ] n35 }
Sub{ l4  v110 [16 n33 n33 n33 n33 ] n33 }
Sub{ l4  v127 [16 n32 n32 n32 n32 ] n32 }

Sub{ l16 v100 [24 [4 v50n42n42v110n42n42] ] }
Sub{ l16 v120 [24 [4 v120n8n8v50n8n8]]}

Sub{ l4  v127 [24  r  n39  r  n39 ]  }
     l4  v127 [24  r  n15  r  n15 ]  

     

//A

Sub{ l2  v127 Sub{v127 n49 v60n49v30n49v15n49} [8r1]  Sub{v127 n49 v60n49v30n49v15n49} [16r1]  Sub{v127 n49 v60n49v30n49v15n49} [16r1] Sub{v127 n49 v60n49v30n49v15n49} [8r1] }
Sub{ l4  v127 [7 n36 n36 n36 n36 ]n36n36rr [15 n36 n36 n36 n36]l16 n36n36rn36 rn36n36r v20[8 n36 v+11] l4 v127 [15 n36 n36 n36 n36]  l16 v5 [8 n36 v+15] n36n36n36n36 rn36rv80n36v127n36}
Sub{ l4  v70  [7 n35 n35 n35 n35 ]n35n35rr [15 n35 n35 n35 n35]l16 n35n35rn35 rn35n35r v0 [8 n35 v+8 ] l4 v70  [15 n35 n35 n35 n35]  l16 v5 [8 n35 v+8 ] n35n35n35n35 rn35rv40n35v70n35}
Sub{ l4  v110 [7 n33 n33 n33 n33 ]n33n33rr [15 n33 n33 n33 n33]l16 n33n33rn33 rn33n33r v10[8 n33 v+11] l4 v110 [15 n33 n33 n33 n33]  l16 v5 [8 n33 v+12] n33n33n33n33 rn33rv700n33v110n33}
Sub{ l4  v127 [7 n32 n32 n32 n32 ]n32n32rr [15 n32 n32 n32 n32]l16 n32n32rn32 rn32n32r v20[8 n32 v+11] l4 v127 [15 n32 n32 n32 n32]  l16 v5 [8 n32 v+15] n32n32n32n32 rn32rv80n32v127n32}

Sub{ l4  v127 [48  r  n39  r  n39 ]  }
Sub{ l4  v127 [48  r  n15  r  n15 ]  }

Sub{ l16 v120 [48 [4 v50n8n8 v127n8n8] ] }
     l16 v120 [40 [4 v60n44n44 v110n46v80n42] ]  V.T(127,20,!1+1+1+1 +1+1+1+1)[8 [4 v60n44n44 v110n46v80n42] ] 
     

//Break
l2  V=127 Sub{v80 n49 v60n49v30n49v15n49} 
[48 r1 ]

Sub{ l16 v30 [32 n36 n36 n36 n36 v+1][56 n36  n36 v+1] n36rrr rrrr }
Sub{ l16 v30 [32 n32 n32 n32 n32 v+1][56 n32  n32 v+1] n32rrr rrrr }
Sub{ l16 v20 [32 n33 n33 n33 n33 v+1][56 n33  n33 v+1] n33rrr rrrr }
     l16 v10 [32 n35 n35 n35 n35 ]   [56 n35  n35 v+1] n35rrr rrrr r2





//Main1
Sub{ l2  v127 Sub{v127 n49 v60n49v30n49v15n49} [16r1]  Sub{v127 n49 v60n49v30n49v15n49} [16r1] Sub{v127 n49 v60n49v30n49v15n49} [8r1] }
Sub{ l4  v127 [15 n36 n36 n36 n36 ]n36rrl16 v50[4n36v+10] v127 l4 [15 n36 n36 n36 n36]n36rrr v127 [12 n36 n36 n36 n36]n36rrr rrrr rrrr  l16 v5 [8 n36 v+15] n36n36n36n36 rn36rv80n36v127n36}
Sub{ l4  v70  [15 n35 n35 n35 n35 ]n35rrl16 v0 [4n35v+10] v70  l4 [15 n35 n35 n35 n35]n35rrr v70  [12 n35 n35 n35 n35]n35rrr rrrr rrrr  l16 v5 [8 n35 v+8 ] n35n35n35n35 rn35rv40n35v70n35}
Sub{ l4  v110 [15 n33 n33 n33 n33 ]n33rrl16 v40[4n33v+10] v110 l4 [15 n33 n33 n33 n33]n35rrr v110 [12 n33 n33 n33 n33]n33rrr rrrr rrrr  l16 v5 [8 n33 v+12] n33n33n33n33 rn33rv700n33v110n33}
Sub{ l4  v127 [15 n32 n32 n32 n32 ]n32rrl16 v50[4n32v+10] v127 l4 [15 n32 n32 n32 n32]n35rrr v127 [12 n32 n32 n32 n32]n32rrr rrrr rrrr  l16 v5 [8 n32 v+15] n32n32n32n32 rn32rv80n32v127n32}

Sub{ l4  v127 [48  r  n39  r  n39 ]  }
Sub{ l4  v127 [48  r  n15  r  n15 ]  }

Sub{ l16 v120 [52 [4 v50n8n8 v127n8n8] ] }
     l16 v120 [51 [4 v60n44n44 v110n46v80n42] ]  Sub{ [4 v60n44n44 v110n46v80n42]  } l16 v10 [10 n36 v+10 ]l24 n36n36n36 l16n36n36n36n36
     

// End

Sub{ l2   Sub{v127 n49 v60n49v30n49v15n49} [16r1]  Sub{v127 n49 v60n49v30n49v15n49} [16r1] Sub{v127 n49 v60n49v30n49v15n49} [8r1] }
Sub{ l4  v127 [15 n36 n36 n36 n36 ]n36rrr r[15 n36 n36 n36: n36]l16 n36n36rn36 rn36n36r v20[8 n36 v+11] l4 v127 n36r[16 n36 n36: n36 n36] }
Sub{ l4  v70  [15 n35 n35 n35 n35 ]n35rrr r[15 n35 n35 n35: n35]l16 n35n35rn35 rn35n35r v0 [8 n35 v+8 ] l4 v70  n35r[16 n35 n35: n35 n35] }
Sub{ l4  v110 [15 n33 n33 n33 n33 ]n33rrr r[15 n33 n33 n33: n33]l16 n33n33rn33 rn33n33r v10[8 n33 v+11] l4 v110 n33r[16 n33 n33: n33 n33] }
Sub{ l4  v127 [15 n32 n32 n32 n32 ]n32rrr r[15 n32 n32 n32: n32]l16 n32n32rn32 rn32n32r v20[8 n32 v+11] l4 v127 n32r[16 n32 n32: n32 n32] }

Sub{ l4  v127 [48  r  n39 : r  n39 ] l32 rrv10[6n39v+15]v127 l8n39REV=50v100n39}
Sub{ l4  v127 [48  r  n15 : r  n15 ] l32 rrv10[6n15v+15]v127 l8n15v100n15 }

Sub{ l16 v120 [24 [4 v50n8n8 v127n8n8] ] v50[16 [4 n8n8 v+70n8n8v-71] ] v+70[8 [4 rr n8n8v-1] ] }
     l16 v120 [24 [4 v60n44n44 v110n46v80n42] ]  [16 [4 n44n44 v+50n46v-30n42v-21] ]v+50  [8 [4 rr n46rv-1] ] 
     
     
     
     
     
     
     
     
     
     
     
     
//_ TR-11 Drums Loop
TR=11 REV=20 @27,90 BR=3 p127 r1 

//Intro
p.T(0,0,!1+1+1+1 +1+1+1+1 , 0,127,!1+1+1+1 +1+1+1+1 )
V.T(0,0,!1+1+1+1 , 0,127,!1+1+1+1 +1+1+1+1 +1+1+1+1 )

Sub{ l16 v110 [16 [4 n6n6n10r] ] }
Sub{ l16 v70  [16 [4 n82n70n69n82 ] ] }
     l16 v100 [16 v80n44rv100n46'n42n37'  v40 n44v60n44v100'n46v70n37'v60n44   v80n44n37v100n46n44  v60n44n44v100'n46n37'v90n42 ]


//A
[4
Sub{ l16 v110 [16 [4 n6n6n10r] ] }
Sub{ l16 v70  [16 [4 n82n70n69n82 ] ] }
     l16 v100 [16 v80n44rv100n46'n42n37'  v40 n44v60n44v100'n46v70n37'v60n44   v80n44n37v100n46n44  v60n44n44v100'n46n37'v90n42 ]
]


p.T(127,0,!1+1+1+1 +1+1+1+1)
V.T(127,90,!1+1+1+1,90,0,!1+1+1+1)
Sub{ l16 v110 [8 [4 n6n6n10r] ] }
Sub{ l16 v70  [8 [4 n82n70n69n82 ] ] }
     l16 v100 [8 v80n44rv100n46'n42n37'  v40 n44v60n44v100'n46v70n37'v60n44   v80n44n37v100n46n44  v60n44n44v100'n46n37'v90n42 ]




[48 r1 ]


p.T(1,127,!1+1+1+1 +1+1+1+1 +1+1+1+1 +1+1+1+1)
V.T(1,127,!1+1+1+1 +1+1+1+1 +1+1+1+1)
Sub{ l16 v110 [16 [4 n6n6n10r] ] }
Sub{ l16 v70  [16 [4 n82n70n69n82 ] ] }
     l16 v100 [16 v80n44rv100n46'n42n37'  v40 n44v60n44v100'n46v70n37'v60n44   v80n44n37v100n46n44  v60n44n44v100'n46n37'v90n42 ]



[3
Sub{ l16 v110 [16 [4 n6n6n10r] ] }
Sub{ l16 v70  [16 [4 n82n70n69n82 ] ] }
     l16 v100 [16 v80n44rv100n46'n42n37'  v40 n44v60n44v100'n46v70n37'v60n44   v80n44n37v100n46n44  v60n44n44v100'n46n37'v90n42 ]
]

Sub{ l16 v110 [4 [4 n6n6n10r] ] }
Sub{ l16 v70  [4 [4 n82n70n69n82 ] ] }
     l16 v100 [4 v80n44rv100n46'n42n37'  v40 n44v60n44v100'n46v70n37'v60n44   v80n44n37v100n46n44  v60n44n44v100'n46n37'v90n42 ]


[2
Sub{ l16 v110 [16 [4 n6n6n10r] ] }
Sub{ l16 v70  [16 [4 n82n70n69n82 ] ] }
     l16 v100 [16 v80n44rv100n46'n42n37'  v40 n44v60n44v100'n46v70n37'v60n44   v80n44n37v100n46n44  v60n44n44v100'n46n37'v90n42 ]
]



p.T(127,1,!1+1+1+1 +1+1+1+1 +1+1+1+1 +1+1+1+1)
V.T(127,1,!1+1+1+1 +1+1+1+1 +1+1+1+1 +1+1+1+1)
Sub{ l16 v110 [16 [4 n6n6n10r] ] }
Sub{ l16 v70  [16 [4 n82n70n69n82 ] ] }
     l16 v100 [16 v80n44rv100n46'n42n37'  v40 n44v60n44v100'n46v70n37'v60n44   v80n44n37v100n46n44  v60n44n44v100'n46n37'v90n42 ]















//******** Sub Pluck

Str SP01={ l16 `dr"c`e  r"cbr "c`dr"c  `e"c`b"c }


Str SP02={
V=5 [16 SP01 ]
V.T(5,50,!1+1+1+1 +1+1+1+1 +1+1+1+1 +1+1+1+1) [24 SP01 ]

//A
[32 SP01 ]


//B
[8 SP01 ]

//Break In
V.T(50,0,!1+1+1+1 +1+1+1+1)
[8 SP01 ]




[32 SP01 ]
V.T(0,20,!1+1+1+1 +1+1+1+1 +1+1+1+1 +1+1+1+1)
[32 SP01 ]

[48 SP01 ]
V.T(20,60,!1+1+1+1)
[4 SP01 ]


[32 SP01 ]
V.T(60,0,!1+1+1+1 +1+1+1+1 +1+1+1+1 +1+1+1+1)
[16 SP01 ]}


Str SP03={
[16 SP01 ]
 [24 SP01 ]

//A
[32 SP01 ]


//B
[8 SP01 ]

//Break In

[8 SP01 ]
[32 SP01 ]
[32 SP01 ]
[48 SP01 ]
[4 SP01 ]
[32 SP01 ]
[16 SP01 ]

}





//_ TR-12 Sub Pluck
TR=12 @39,1 REV=60 V=90  r1

//Intro
V=15 [16 SP01 ]
V.T(15,80,!1+1+1+1 +1+1+1+1 +1+1+1+1 +1+1+1+1) [24 SP01 ]

//A
[32 SP01 ]


//B
[8 SP01 ]

//Break In
V.T(80,10,!1+1+1+1 +1+1+1+1)
[8 SP01 ]




[32 SP01 ]
V.T(10,50,!1+1+1+1 +1+1+1+1 +1+1+1+1 +1+1+1+1)
[32 SP01 ]

[48 SP01 ]
V.T(50,95,!1+1+1+1)
[4 SP01 ]


[32 SP01 ]
V.T(95,10,!1+1+1+1 +1+1+1+1 +1+1+1+1 +1+1+1+1)
[16 SP01 ]






















//_ TR-13 Delay Pluck
TR=13 @39,1 P.onNote(127,0) REV=110 r4 V=50  r1

Sub{ v80 r4  SP03 }   v127  SP02 















//******** Delay FM Square


Str FS01={ l16 r2 rrrr rrv100egv127`e`dbg v100 `e`dbg v80 `e`dbg v60 `e`dbg v40    `e`dbg v30 `e`dbg v20 `e`dbg v10 `e`dbg r1}

Str FS02={ l16 r2 rrrr rrv100egv127`e`dbg v100 `e`dbg v80 `e`dbg v60 `e`dbg v40    `e`dbg v30 `e`dbg v20 `e`dbg v10 `e`dbg r1
               r2 rrrr rrv100ebv127`e`dg`cv100 `e`dg`cv80 `e`dg`cv60 `e`dg`cv40    `e`dg`cv30 `e`dg`cv20 `e`dg`cv10 `e`dg`cr1
               r2 rrrr rrv100dgv127`e`dg`cv100 `e`dg`cv80 `e`dg`cv60 `e`dg`cv40    `e`dg`cv30 `e`dg`cv20 `e`dg`cv10 `e`dg`cr1
               r2 rrrr rrv100ebv127`e`dg`cv100 `e`dg`cv80 `e`dg`cv60 `e`dg`cv40    `e`dg`cv30 `e`dg`cv20 `e`dg`cv10 `e`dg`cr1}
		   
Str FS00={ l16 r2 rrrr rrv100egv127`e`dbg v100 `e`dbg v80 `e`dbg v60 `e`dbg v40    `e`dbg v30 `e`dbg v20 `e`dbg v10 `e`dbg r1
               r2 rrrr rrv100eav127`e`dba v100 `e`dba v80 `e`dba v60 `e`dba v40    `e`dba v30 `e`dba v20 `e`dba v10 `e`dba r1 }

//_ TR-14 Delay FM Square
TR=14 @6,8 REV=90 V=127 q70 CHO=80  r1

[4 r1+1+1+1 ]
FS01 r1 +1+1+1
[FS00]

[8 r1 ]

[ FS02 ]
FS00

[80 r1 ]

[2 FS02 ]
FS01 

[2 FS02 ]

FS01 r1+1 +1+1+1+1+1+1+1+1   FS01















//******** SE

//_ TR-15 Rev Cym
TR=15 @126,7 o10 r1 q100
[31 r1 ]
v127 g1

[15r1]
 g1


[39 r1 ]
g1

[31 r1 ]
g1

[15r1]
 g1

[15r1]
 g1

[63r1][4r1]
 g1


[31 r1 ]

g1













//_ TR-16 SE
TR=16 @127 BR=2 r2 P=64 REV=100 q100 p.T(64,64,!4,64,127,!4) V.T(0,0,!4,50,127,!4) `c2 

p64 P.T(0,127,!1,127,0,!1,0,127,!1,127,0,!1,0,127,!1,127,0,!1,0,64,!2)
p.T(127,0,!1+1+1+1 +1+1+1) V.T(40,0,!1+1+1+1 +1+1+1+1 +1+1+1)
```c1+1+1+1 +1+1+1 p64 V.T(0,50,!1,50,0,!1+1+1)``c1+1+1+1 
r1+1+1+1+1+1+1+1 +1+1+1+1+1+1+1+1 +1+1+1+1 p64 V.T(0,80,!1,80,0,!1+1+1)``c1+1+1+1 
 r1+1+1
 p.T(64,64,!4,64,127,!4) V.T(100,127,!4,127,0,!2) `c2 p64 P.T(0,127,!1,127,0,!1,0,127,!1,127,0,!1,0,127,!1,127,0,!1,0,64,!2)
p.T(0,127,!1+2,127,0,!1+1+1+1+1) V.T(30,100,!1.,100,0,!1+1+1+1 +1+1+1+1 ) Sub{ [24 EP.T(30,70,!8,127,100,!8) r4 ]  }
Sub{```c1+1+1+1+1+1+1}  
r1. 

//A 

r1+1+1+1 +1+1 v127  @120 EP=127 [3 p.T(64,64,!8,64,127,!8) V.T(0,0,!8,127,127,!8) 'cg'4 v-20 ] REV=60 @31 l16 p64 V.T(30,127,!1) v127 o4 rcrc ccrc rcrc cccc rcrc



[16 r1 ]
Sub{ r-1 r-1 @127,0 V.T(0,90,!1+1,90,0,!1+1+1) P.T(0,127,!2.,127,0,!2.,0,127,!2.,127,0,!2.,0,127,!2.,127,0,!2.,0,64,!2) o8 q100 REV=100 c1+1+1+1+1}

[16 r1 ]
Sub{ r-1 r-1 @127,0  Sub{ [24 EP.T(30,70,!8,127,100,!8) r4 ]  } V.T(0,110,!1+1,110,0,!1+1+1+1)o6 q100 REV=100 c1+1+1+1+1+1}

[56 r1 ]

[16 r1 ]
Sub{ r-1 r-1 @127,0 V.T(0,90,!1+1,90,0,!1+1+1) P.T(0,127,!2.,127,0,!2.,0,127,!2.,127,0,!2.,0,127,!2.,127,0,!2.,0,64,!2) o6 q100 REV=100 c1+1+1+1+1}

[16 r1 ]
Sub{ r-1 r-1 @127,0  Sub{ [24 EP.T(30,70,!8,127,100,!8) r4 ]  } V.T(0,110,!1+1,110,0,!1+1+1+1)o6 q100 REV=100 c1+1+1+1+1+1}

[16 r1 ]
Sub{ r-1 r-1 @127,0 V.T(0,90,!1+1,90,0,!1+1+1) P.T(0,127,!2.,127,0,!2.,0,127,!2.,127,0,!2.,0,127,!2.,127,0,!2.,0,64,!2) o6 q100 REV=100 c1+1+1+1+1}

[16 r1 ]
Sub{ r-1 r-1 @127,0  Sub{ [16 EP.T(30,70,!8,127,100,!8) r4 ]  } V.T(0,110,!1+1,110,0,!1+1+1+1)o6 q100 REV=100 c1+1+1+1+1+1}

[4 r1 ]
Sub{ r-1 r-1 @127,0 V.T(0,90,!1+1,90,0,!1+1+1) P.T(0,127,!2.,127,0,!2.,0,127,!2.,127,0,!2.,0,127,!2.,127,0,!2.,0,64,!2) o8 q100 REV=100 c1+1+1+1+1}


[16 r1 ]
Sub{ r-1 r-1 @127,0 V.T(0,90,!1+1,90,0,!1+1+1) P.T(0,127,!2.,127,0,!2.,0,127,!2.,127,0,!2.,0,127,!2.,127,0,!2.,0,64,!2) o8 q100 REV=100 c1+1+1+1+1}

[16 r1 ]
Sub{ r-1 r-1 @127,0  Sub{ [24 EP.T(30,70,!8,127,100,!8) r4 ]  } V.T(0,110,!1+1,110,0,!1+1+1+1)o6 q100 REV=100 c1+1+1+1+1+1}
















//_****** Time Keeper

TR=0

//_Intro SE

r1


//_Intro1
Lyric={"Intro 1"}
r1+1+1+1 +1+1+1+1
r1+1+1+1 +1+1+1+1


//_Intro2
Lyric={"Intro 2"}
r1+1+1+1 +1+1+1+1 
r1+1+1+1 +1+1+1+1 


//_Intro Break
Lyric={"Intro Break"}
r1+1+1+1 +1+1+1+1 



//_A
Lyric={"A"}

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


//_A+
Lyric={"A+"}

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


//_B
Lyric={"B"}

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


//_Break In
Lyric={"Break In"}

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


//_Break 
Lyric={"Break"}

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


//_Lead In
Lyric={"Lead In"}

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


//_Poly Synth In
Lyric={"Poly Synth In"}

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


//_Bass In
Lyric={"Bass In"}

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


//_Main1
Lyric={"Main 1"}

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


//_Main2
Lyric={"Main 2"}

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


//_Main3
Lyric={"Main 3"}

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


//_Main End
Lyric={"Main End"}

r1+1+1+1 


//_ End1
Lyric={"End 1"}

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


//_ End2
Lyric={"End 2"}

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


//_ Stop
Lyric={"Stop"}