/*
■☆Rave the Scratching☆
　作成：さくらもどき

詳細
【推奨環境】ヘッドホン
【推奨音源】MP3，TWM2
【無断転用】可
【　編曲　】可
【ジャンル】Energetic Trance / Rave
作成環境
【   OS   】Windoows 7 Pro
【　音源　】TWM2、SoundFont
【出力環境】RH-300	（ヘッドホン）
		UA-101	（オーディオI/O）


◆ＭＥＭＯ
お久しぶりです、さくらもどきです。
久しぶりにサクラの掲示板の方に投稿させていただきます。
今回はEnergetic Trance + Raveという新ジャンル開拓です。
Energetic Tranceの前半、Raveの後半を楽しんで頂ければ幸いです。



なおこの曲は　爆　音　推　奨　で　す　！




未熟な曲ですが、楽しんで頂ければ幸いです！


◆MP3
今回も色々と遊んでいます。
声ネタを潤沢に盛り込みながらレイブっぽいハードな感じを目指しました
短いですが楽しんでいただければ嬉しいです！

*/

曲名{"☆Rave the Scratching☆"}
作者{"SakuraModki"}
ResetGS
CH(11) SysEx$ = f0,41,10,42,12,{40,1a,15,02},f7;
CH(12) SysEx$ = f0,41,10,42,12,{40,1b,15,02},f7;
拍子4,4
テンポ(155)
調#()
TimeKey((1:1:0),,0)

Key=3



Str PD={r32 y64,0 r32 y64,127 r-16}
Str PF={r32 y64,0 r-32}
Function R1(int){[(int)r*1]}
Function L1(int){Result=int*!1}
Int Cnt=1;

[16 TR=Cnt V=110 Cnt++]


//=============================================================================================
#rave1={
[
 a^ra rra^ rg^r ar`cr
 a^ra rra^ r`c^r brb-^
 a^ra rra^ rg^r ar`cr
:a^ra rra^ r`d^r `d+r`e^
]a^ra rra^ r`a^r `gr`e^
}

#rave2={
rra^  |r`e^r   |`d^`cb    |rc`cr
rra^  |r`e^r   |`d^`c`g   |^r`d^
rra^  |r`e^r   |`d^`cb    |re`ca
rr`c^ |r`g^c   |`a^``c`b  |^c`gr

rra^   |r`e^r   |`d^`cb    |rc`cg
rra^   |r`e^r   |`d^`c`g   |^r`d^
rra^   |r`e^r   |`d^`cb    |re`ca
`a^r`a|rg`a^   |r``a^c    |``gc``e^

}

#rave3={
[
 a^ra rra^ rg^r ar`cr
 r1
  a^ra rra^ rg^r ar`cr
:r1
]a^ra rra^ r`a^r `gr`e^
}

#rave4={
a^`e^  a`d^a  `c^ab   ^ab`c
rra^   ra^r    ga^a   ^r`c^
a^`e^  a`d^a  `c^ab   `e`db`c
rra^   ra^r    ga^a   ^r`c^
}

#rave5={
a^`e^  a`d^a  `c^ab   ^ab`c
r1
a^`e^  a`d^a  `c^ab   `e`db`c
r1
}
#rave6={
`e`d`e^  a`d^a   `c^ab    ^ab`c
a`d`g^   g`eg`c >>c<bgd   c"bcg<
`e`d`e^  a`d^a   `c^ab    ^ab`c
>"gb`c^  "ge"gc  `cbgd    c"bcg<
}
Str RV={
#rave1 r-1 EP=0 r1 EP=127
#rave1
EP.T(127,50,!1*8)
#rave1
[8 r1]
[7 r1]EP=127
a^ra rra^ r`a^r `gr`e^

#rave2
#rave2
#rave1
#rave1
#rave3
[4#rave4]
[#rave5]
#rave1
#rave1
}

//-------------------------------------
TR=1 q100 @82 o5 l16 v120 V=127 P=50
RV

TR=2 q100 @56 o5 l16 v120 V=127 P=127-50
RV

//-------------------------------------

#BS={
[4 [4 rrff]][4 [4 rrff]]  r-1 EP=0 r1 EP=127
[4 [4 rrff]][4 [4 rrff]]  r-1 EP=0 r1 EP=127
[[4rrff][4rrgg][4rraa][4rr`c`c]]
[4rrff][4rrgg][4rraa][4rr`c`c]
[4rrff][4rrgg][4rraa] r1

[8 r1]

[[4rrff][4rrgg][4rraa][4rr`c`c]]
[[4rrff][4rrgg][4rraa][4rr`c`c]]
[[4rrff][4rrgg][4rraa][4rr`c`c]]
[[4rrff][4rrgg][4rraa][4rr`c`c]]

[8 r1]

[[4rraa][4rrgg][4rrff][4rrgg]]
[[4rraa][4rrgg][4rrff][4rrgg]]
[[4rraa][4rrgg][4rrff][4rrgg]]
[[4rraa][4rrgg][4rrff][4rrgg]]

[[4rraa][4rraa][4rraa][4rraa]]
[[4rraa][4rraa][4rraa][4rraa]]

}

TR=3 q90 @85 o2 l16 v120 V=110 REV=0
#BS
TR=4 q90 @81 o3 l16 v120 V=110 REV=0
#BS

//-------------------------------------
TR=5 q100 @86 o4 l16 v80 V=110 REV=80
[8 r1]
[8 r1]
[4
 `d0`c0g0""f1
 `e0`d0g0""g1
 `e0g0""a1
 `g0`c0g0"c1
]
[4 `d0`c0g0""f1]
[4 r1]
[8 r1]
[8 r1]
[4
 `d0`c0g0""f1
 `e0`d0g0""g1
: `e0g0""a1
 `g0`c0g0"c1
][r1]
[
 `e0`d0a0""a1
 `d0`c0g0""g1
 `e0`d0a0""f1
:`d0`c0g0""g1
]

//-------------------------------------
Str Synth1={
"f&ca^  |"f`e^"f   |`d^`cb    |"fc`cg
"g&da^  |"g`e^"g   |`d^`c`g   |^"g`d^
"a&ea^   |"a`e^"a   |`d^`cb    |"ae`ca
c&e`c^   |c`g^c     |`a^``c`b  |^c`gc

"f&ca^   |"f`e^"f   |`d^`cb    |"fc`cg
"g&da^	  |"g`e^"g   |`d^`c`g   |^"g`d^
"a&ea^   |"a`e^"a   |`d^`cb    |"ae`ca&
`a^c`a  |cg`a^     |c``a^c    |``gc``e^
}

Str Synth1_={
[4"f&ca^  |"f`e^"f   |`d^`cb    |"fc`cg]
[6 `d^`cb    |"fc`cg]
r1
}


Str Synth={
[8 r1]
[8 r1]
[8 r1]
EP.T(40,127,!1*8)
Synth1
Synth1_ Sub{[4r-1]EP.T(127,50,!1*3,50,127,!1)}

Synth1
Synth1
#rave1
#rave1
[8 r1]
[4 #rave4]
[#rave6]
#rave1 EP.T(127,0,!1*8)
#rave1
}
//-------------------------------------
TR=6 q100 @82 o5 l16 v110 V=127  Slur(0) P=40
Synth

TR=7 q100 @88 o4 l16 v110 V=127  Slur(3) P=128-40 r32
Synth

UseKeyShift=off 調-()
Str DRUMS={
[4
 Sub{v80 [4a+4]}
 v127 [4 c4]
]


[3 
 Sub{v80 [4a+4]}
 Sub{[4 v90f+v80f+v120f+v80f+] }
 v127 [4 c4]
]
[4c8.][c8]

[4 
 Sub{v80 [4a+4]}
 Sub{[4 v90f+v80f+v120f+v80f+] }
 v127 [4 c4]
]

[3
 Sub{v80 [4a+4]}
 Sub{[4 v90f+v80f+v120f+v80f+] }
 v127 [4 c4]
]
Sub{ [3r-1]		[4 [d][3dr]]	[16d]		}

[4c8.][c8]
//Break
Sub{`c+}
[8 r1]Sub{r-1`c+1`c+}
[8 r1]Sub{`c+}
[8 r1]

Sub{`c+}
[7
 v127 [4 c4]
][4c8.][c8]

Sub{`c+}
[7
 Sub{v80 [4a+4]}
 Sub{[4 v90f+v80f+v120f+v80f+] }
 v127 [4 c4]
][4c8.][c8]

Sub{`c+}
[7
 Sub{v80 [4a+4]}
 Sub{[4 v90f+v80f+v120f+v80f+] }
 v127 [4 c4]
][4c8.][c8]

Sub{`c+}
[6
 Sub{v80 [4a+4]}
 Sub{[4 v90f+v80f+v120f+v80f+] }
 v127 [4 c4]
]Sub{`c+}[r1]

Sub{`c+}
[8r1]

Sub{`c+}
[7
 Sub{v80 [4a+4]}
 Sub{[4 v90f+v80f+v120f+v80f+] }
 v127 [4 c4]
][4c8.][c8]

Sub{`c+}
[7
 Sub{v80 [4a+4]}
 Sub{[4 v90f+v80f+v120f+v80f+] }
 v127 [4 c4]
]Sub{ [3r-1]	Sub{`c+} [4 [d][3dr]]Sub{`c+}	[16d]		}
r1

Sub{`c+}
[7
 Sub{v80 [4a+4]}
 Sub{[4 v90f+v80f+v120f+v80f+] }
 v127 [4 c4]
][4c8.][c8]

Sub{`c+}
[7
 Sub{v80 [4a+4]}
 Sub{[4 v90f+v80f+v120f+v80f+] }
 v127 [4 c4]
]Sub{ [3r-1]		[4 [d][3dr]]	[16d]		}
[4c8.][c8]

Sub{`c+}
[7
 Sub{v80 [4a+4]}
 Sub{[4 v90f+v80f+v120f+v80f+] }
 v127 [4 c4]
]Sub{`c+}[4c8.][c8]

Sub{`c+}
[7
 Sub{v80 [4a+4]}
 Sub{[4 v90f+v80f+v120f+v80f+] }
 v127 [4 c4]
][4c8.][c8]
Sub{`c+}
}
//-----------------------------------
TR=10 o3 l16 q40 @27,90 V=127 REV=0
DRUMS
TR=11 o3 l16 q40 @12,7 V=127 REV=0
DRUMS
TR=12 o3 l16 q40 @12,7 V=127 REV=0 p.W(120,0,!16)
DRUMS
/*
//------------------------------------
R1(8)
R1(8)
Sub{v70 [8 [ rf+g+f+ ]]}
R1(8)

Sub{v90 [8 [ rf+g+f+ ]]}
R1(8)
Sub{r-4.v110 c16c16cc}
Sub{v40 [8 r-1] [64 d16 v+1][(64-8) d16] }
Sub{v100[8 r-1] `c+1[3r1] `c+1r1 [3`c+2]r2  }
//------------------------------------
Sub{
 Sub{v127 `c+}
R1(16)
 Sub{v127 `c+}
}

[4
Sub{v90 [8 [ rf+g+f+ ]]}
Sub{v100[8 r2.d+4] }
Sub{v127[16 r4c+4] }
v120 [31 c4] r-8c16c16cc
]
Sub{v40 [8 r-1] [64 d16 v+1][64 d16]}
Sub{v100[8 r-1] `c+1[3r1] `c+1r1 [3`c+2]r2  }
//------------------------------------
[ R1(8) ]

Sub{v90 [8 [ rf+g+f+ ]] }
Sub{v60[32 r`d+] }
Sub{v100[8 r2.d+4] }
Sub{v127[16 r4c+4] }
v120 [31 c4] r-8c16c16cc

R1(8)
Sub{v40 [8 r-1] [64 d16 v+1][64 d16]}
Sub{v100[8 r-1] `c+1[3r1] `c+1r1 [4 `c+2]  }
//------------------------------------
[3
Sub{v90 [8 [ rf+g+f+ ]]}
Sub{v100[8 r2.d+4] }
Sub{v127[16 r4c+4] }
v120 [31 c4] r-8c16c16cc
]
R1(8)
Sub{v40 [8 r-1] [64 d16 v+1][64 d16]}
Sub{v100[8 r-1] `c+1[3r1] `c+1r1 [3`c+2]r2  }
*/