/*
■FixedTmp-0215+0526
　作成：さくらもどき
　 ______________________________ 
  [= ヘ ッ ド ホ ン 推 奨 で す =]
  
  
詳細
【推奨環境】ヘッドホン
【推奨音源】TWM2
【無断転用】可
【　編曲　】可
【ジャンル】Progressive Shuffle Pop

作成環境
【   OS   】WindoowsXP HomeEdition
【　音源　】TWM2、SoundFont
【出力環境】MDR-CD100	（ヘッドホン）
		RH-300	（ヘッドホン）
		HP-NC80	（ヘッドホン）
		UA-101	（オーディオI/O）

◆ＭＥＭＯ
　お久しぶりです、さくらもどきです。
　生存報告という感じで訳の分からない曲を投下してみます。
　
  今回は、変拍子というか変態リズムの曲を作ってみました。
  いや、作りましたというよりは『いつの間にか、できてました』の方が正しい（汗
　
  進行するにしたがってどんどん変態度がまして行きます。
  MetaTextで拍子を打ってあるので参考までにどうぞー
  
  かなりやっつけ仕事なのでフレーズ間の繋ぎがとんでもない事になってます。
　
*/





曲名{"FixedTmp-0215+0526"}
作者{"さくらもどき"}
ResetGS
拍子4,4
テンポ(180)
調#()

Key=5

Int Cnt=0;
[16 Cnt++ TR=Cnt V=127]

//=============================================================================================
Str Piano_Intro={
[
 "f0a0`c0`d1
 "g0g0b0`e1
:"e0g0b0`d1
 "a0a0`c0`d2
 "g0g0b0`e2
]"e0g+0b0`f1
v-20
 [a0`c0`e6 "a12 g0b0`e6  "g12 ]
v+20
}

Str Piano_MID={
q100 l4
 [3
  "f [a0`c0`e]
  "g  g0b0`d
  "e [g0b0`d]
  "a a0`c0`e
 ]

  "d [f0a0`c]
  "e g+0b0`d
  "a [a0`c0`e]
  "a a0`c0`e
l8
}

Str Piano_Swing={
q50 l8
[
 "f6"f12 [ f0a0`c6 "f12 ]
 "g6"g12 [ g0b0`d6 "g12 ]
:"e6"e12 [ g0b0`d6 "e12 ]
  a0`c0`e6 "a12 g0b0`e6  "g12 
]
  "e6"e12 [ g+0b0`d6 "e12 ]
  a0`c0`e6 "a12 g0b0`e6  "g12 
}



TR=1 q100 l8 @3 o4 v90 CHO=30 REV=100
v83
Piano_Intro

v100
[ Piano_Swing ]
  Piano_MID
  Sub{r-4 >>> [`c32b32g32d32<] <}
[ Piano_Swing ]
  Piano_MID

[
 "f0a0`c0`dr rr "f0a0`c0`dr rr
  [3 "g0g0b0`d12] [3 "g0g0b0`d4]
  "e0g0b0`dr rr "e0g0b0`dr rr
  [3 "a0a0`c0`d12][1 "a0a0`c0`d4]["g0g0b0`e4]
]


[
"f6 f0a0`c12 r6"f12 f0a0`c4
"a-0f0a-0`c16r. "a-0f0a-0`c16r.

"e6 g0b0`d12 r6"e12 g0b0`d4
"d0e0a0`c16r. "d0e0a0`c16r.
 
"d6 "a0d0f12 r6"d12 "a0d0f4
"g6 "b0e0g12 r6"g12 "b0e0g4
"g+6"b0e0g+12r6"g+12"b0e0g+4

"a0e0a0`c4
"a-0e-0g0b-4
"g0d0f+0a4
"f+0c+0f0g+4
]

[ Piano_Swing ]
  Piano_MID




//=============================================================================================
Str Aco_MID={
q.N(100,80,100,100,80)
eee	dc
dc"b	"ar
q.N(100,80,100,100,80)
eee	de
fed	er

q.N(100,80,100,100,80)
eee	dc
dc"b	"a"a6"b12

q.N(100,80,100,100,80)
cce	d"b6r12
q.N(100,80,100,100,80)
"a"a"a "ar
}

TR=2 q100 @49 o6 l4 CHO=127 v90
[8r1]
[4 [3r2.] r2 ] r-4. "b-16"b16c16c+16d16d+16
Aco_MID
[4 [3r2.] r2 ] r-4. "b-16"b16c16c+16d16d+16
Aco_MID
[8  [4r4] ]r-4 v+20 "e-16"e16"f16"f+16 v-20
"g"g"g "bc
gfe dc
fec gfd g+fe
`c12a12e12
b-12g12e-12
a12f+12d12
g+12f12c+12

"g"g"g "bc
gfb`cg
`cbg bgb `d^^

`c12a12e12
b-12g12e-12
a12f+12d12
g+12f12c+12

[4 [3r2.] r2 ] r-4. "b-16"b16c16c+16d16d+16
Aco_MID


//=============================================================================================
Str VN1={v_.N(30,0, 0,15,	10,0,	0,0,0,0)}
Str VN2={v_.N(30,0, 30,15,10,	10,0,	0,0,0,0)}

Str SwingMel={l8 q80
VN1 e6r12	e6e12 d6e12
VN2 g6d12 q100 c12d12c12 q80 "b6"a12
VN1 <g6a12 b6>c12 d6e12
VN1 f6c12 e6"b12

VN1 e6r12	e6e12 d6e12
VN2 g6d12 q100 c12d12c12 q80 "b6"a12
VN1 a6a12	g6g+12 a6e12
VN1 e^ "b^
v_=0
}

Str MIDMel={
v-10
[ r2.:r2]
c6"b12c6d12	Sub{e12}
[ r2.:r2]
f6e12d6e12	Sub{c12}
[ r2.:r2]
c6"b12c6d12
l4v+10
q.N(100,80,100,100,80)
cce	d"b6r12
q.N(100,80,100,100,80)
"a"a"a "ar
}

TR=3 q80 @41 o5 l8 CHO=127 REV=20 v110
Sub{<
v-20
q100 d2.d+16e16f16f+16
g1-8 g-16f16
e2`d2
`c2b2
>
c1g1g+2f4
}


[8r1]
v100
Sub{ r-2. r-2
a6b48b-48a48a-48	g6g+12 a6e12
e^ "b^
}

[SwingMel]
[8  r2.r2]
[SwingMel]
MIDMel 
l8 
Sub{r-4  d+16e16f16f+16}
g12r12c12	d12e12f12	g6e12 f6d12
[3 e12] g6b12	`c12b12g12	e6d12
g12r12c12	e12f12g12	b12g12e12 g12e12c12
[3 g12] `c6b12 b12`c12b12	g6e12

g12r12c12	d12e12f12	g6e12 f6d12
[3 e12] g6b12	`c12b12g12	e6d12
g12r12c12	e12f12g12	b12g12e12 g12e12c12
`c12b12g12	b12g12e12	g12e12c12 e12c12"a12

[2[5r4]]
[3[3r4]]
`c12a12e12
b-12g12e-12
a12f+12d12
g+12f12c+12

"g4"g4"g4 "b4c4
g4f4b4`c4g4
`c4b4g4 b4g4b4 `d4^4^4

`c12a12e12
b-12g12e-12
a12f+12d12
g+12f12c+12

[SwingMel]
[8  r2.r2]


//=============================================================================================
Str SwingBass={
[
fa`c	g6g12bg
:egb	a6`c12a
]
g+b`c	a6`c12a
}

Str SwingBass2={
[
f4f4r4
g4g4r4
:e2.	a2
]
g+2.	a12`a12`g6`c12a12
}


Str MID_BASS={
[3
 fa`c g6g12b
 egb  a6`c12a
]
 df`c g+e
 a`c`e ae
}

TR=4 q70 @35 o2 l4 CHO=100 REV=0 v127
[f1g1e1:a1]a2"a2//`c`e ae

[SwingBass2]
MID_BASS
[SwingBass]
MID_BASS

[
 f12r6 f6a12 `e6a12 `c6f12
 g6g12 b6`d12 b6`d12 b12b-12a12
 e12r6 e6g12 `d6g12  b6e12
 a6a12 `c6`g12 g6`g12 f12e12c12
]

[
f6r12 a6r12 `c6r12
f+6a12 c4

e6r12 g6r12  b6r12
p.T(0,64,!16)`d4 a6f12

d6d12   f6r12  a6r12
g6g12   b6r12 `e6r12
g+6g+12 g+6r12`e6r12

a4
a-4
g4
f+4
]

[SwingBass2]
MID_BASS


//=============================================================================================
Str Code_Intro= Piano_Intro

Str Code_Swing={
[
 "f0a0`c0`d2.
 "g0g0b0`e2.
:"e0g0b0`d2.
 "a0a0`c0`d2
]
 "e0g+0b0`d2.
 "a0a0`c0`d2
}

Str Code_MID={
[3
 "f0a0`c0`d2.
 "g0g0b0`e2
 "e0g0b0`d2.
 "a0a0`c0`d2
]
 "d0f0a0`c2.
 "e0g0b0`d2
 "a0a0`c0`d2.
 "a0a0`c0`d2
}

TR=5 q100 @53 o5 l4 REV=120 v40
Piano_Intro
[Code_Swing]
Code_MID
[Code_Swing]
Code_MID
[8 r1]
[
"f0f0a0`c2.
"a-0f0a-0`c2
"e0g0b0`d2.
"d0e0a0`c2

"d 0 a0d0f2.
"g 0"b0e0g2.
"g+0"b0e0g+2.

"a0e0a0`c4
"a-0e-0g0b-4
"g0d0f+0a4
"f+0c+0f0g+4
]


[Code_Swing]
Code_MID




//==============================================================

TR=6 q50 @82 o6 l16 v40 CHO=100 REV=110
[8r1]
[16 r1]
[4 r1^4]
[16 r1]
[4 r1^4] 
//Tempo=100
r2 c12d12e12 f12g12a12 
b^rr r2.
r2 b12g12e12 g12e12c12
g^rr r2.

r2 c12d12e12 f12g12a12 
b^rr r2.
r2 b12g12e12 g12e12c12
`c12b12g12	b12g12e12	g12e12c12 e12c12"a12





//=============================================================================================
UseKeyShift=off 調-()


Str SwingDrum={
 Sub{v90	f12g12a12 r6e12 v50 d12e12d12 r4		//リズムを崩す
     v110	f6r12	g6f12 v85 [`d6`c12] b12a12g12
 }
 [3
  Sub{v70	rra+6r12rr}
  Sub{v90	r6f+12r6f+12f+r}
  Sub{v90	r6d12d6d12d6 }
  v90		c6c12rrcr 
 ]
 Sub{v70	rra+6r12}
 Sub{v90	r6f+12r6f+12}
 Sub{v90	r6d12d6d12 }
 v110		c6c12c6c12
}

Str SwingDrum2={
 [3
  Sub{v60 [3 ```a+12] }
  Sub{v70	rra+6r12rr} 
  Sub{v90	r6f+12r6f+12rr}
  Sub{v90	r6d12d6d12d6 }
  v90		c6r12crrr 
 ]
 Sub{v60 [3 ```a+12] }
 Sub{v70	rra+6r12}
 Sub{v90	r6f+12r6f+12}
 Sub{v90	r6d12d6d12 }
 v120		c6c12c6r12
}

Str MID_DRUM={
[
 Sub{v60 rra+6r12 }
 Sub{v60 [2 r6f+12]}
 Sub{v70 `d+6v60[`d+24 v-30]v80`d+r`d+}
 Sub{v80 rrerer}
 v110 c6c12crcr

 Sub{v60 rra+6r12 }
 Sub{v60 [2 r6f+12]}
 Sub{v60 [3 ```a+12] }
 Sub{v80 r6e12r6e12}
 Sub{v70 `d+6v60[`d+24 v-30]v80`d+}
 v110 crcr
]
}

Str DrumIntro={
Sub{v110 `c+}
v_=0
Sub{v100 rr b12`c12g12 a6f12 }
Sub{v100 e6d12rrrr e12d12c12}
r1 v_-5

Sub{v110 `c+12 v50 `c+12 v110`c+12}
Sub{v100 rr b12`c12g12 a6f12 }
Sub{v100 e6}
r1 v_-5

Sub{v110 `c+}
Sub{v100 rr b12`c12g12 rr }
Sub{v100 ee rr ed e12e12f12 }
r1 v_-5

Sub{v110 `c+}
Sub{v100 rr f12a12b12 `c6`d12 }
Sub{v100 e6d12rrrr e12d12c12}
r1 v_-5

//-----
Sub{v110 EP=127 `c+ EP=0 r EP=127`c+r rr `c+}
Sub{v100 fr fa b`c f}
Sub{v100 er er rr e6d12}
r1

Sub{v110 `c+12 v50 `c+12 v110`c+12}
Sub{v100 rr b12`c12g12 a6f12 }
Sub{v100 e6}
r1

Sub{v110 `c+}
Sub{v100 rr b12`c12g12 rr }
Sub{v100 ee rr ed e12e12f12 }
r1

Sub{v127 `c+}
r1 v_=0
Sub{r-2 v110 g12a12`c24b24 a6f12}
}

Str SwingDrum3={
[
 Sub{v80 g+6f+12g+4g+4}
 Sub{v80 r4erer}
 v110 crcrcr
 Sub{v80 g+6f+12g+4}
 Sub{v80 `d+4`d+6`d+12}
 Sub{v80 d6e12d6r12}
 v110 c6c12cr
]

[3
 Sub{v80 r6`d+12v50`d+6v70`d+12}
 Sub{v80 f+6g+12g+4g+4}
 Sub{v70 a+4}
 v110  crcrcr
]


 Sub{v110 `c+4 `a0``f12``e12 r12 `g |`c+24`g24 }
 Sub{v90  f12g12a12 | d12e12d12 |f12g12a12 | d12e12d12 }
 v110 c4c4c4c4
}

TR=10 o3 l8 REV=60  CHO=40 @1
DrumIntro
[ [ SwingDrum2] Sub{v70 `c+} ]
Sub{r-2 v110 g12a12`c24b24 a6f12}
[4 MID_DRUM ]

Sub{r-2 v110 g12a12`c24b24 a6f12}
[ [ SwingDrum] Sub{v70 `c+} ]
Sub{r-2 v110 g12a12`c24b24 a6f12}
[4 MID_DRUM ] 

[4
Sub{v80 [4g+6f+12]}
Sub{v80 EP=127 `c+0`d+ EP=0rEP=127[3 v80`d+6 v50 `d+12] }
v110 cr r6c12 cr r6c12

Sub{v80 [4g+6f+12]}
Sub{v80 [3`d+12] v50 [`d+12]v80`d+12 [ v80`d+6 v50 `d+12] }
v110 cr r6c12 cr r6c12
]

Sub{r-4v80[6 d0e24 v+10]}
Sub{v120 `c+ }
[ SwingDrum3 ]

[ [ SwingDrum2] Sub{v70 `c+} ]
Sub{r-2 v110 g12a12`c24b24 a6f12}
[4 MID_DRUM ]

//===============================================================================================

TR=0
[
 [4 MetaText={"1/4"} r4;MetaText={"2/4"} r4;MetaText={"3/4"} r4;MetaText={"4/4"} r4; ]
]

[4
 [MetaText={"1/3"} r4;MetaText={"2/3"} r4;MetaText={"3/3"} r4;]
  MetaText={"1/5"} r4;MetaText={"2/5"} r4;MetaText={"3/5"} r4;MetaText={"4/5"} r4;MetaText={"5/5"} r4;
]

[
 [4
  MetaText={"1/5"} r4;MetaText={"2/5"} r4;MetaText={"3/5"} r4;MetaText={"4/5"} r4;MetaText={"5/5"} r4;
 ]
]

[4
 [MetaText={"1/3"} r4;MetaText={"2/3"} r4;MetaText={"3/3"} r4;]
  MetaText={"1/5"} r4;MetaText={"2/5"} r4;MetaText={"3/5"} r4;MetaText={"4/5"} r4;MetaText={"5/5"} r4;
]

[
 [4
  MetaText={"1/5"} r4;MetaText={"2/5"} r4;MetaText={"3/5"} r4;MetaText={"4/5"} r4;MetaText={"5/5"} r4;
 ]
]

[
 [4 MetaText={"1/4"} r4;MetaText={"2/4"} r4;MetaText={"3/4"} r4;MetaText={"4/4"} r4; ]
]

[
 [
  MetaText={"1/5"} r4;MetaText={"2/5"} r4;MetaText={"3/5"} r4;MetaText={"4/5"} r4;MetaText={"5/5"} r4;
 ]
 [3
  MetaText={"1/3"} r4;MetaText={"2/3"} r4;MetaText={"3/3"} r4;
 ]
 MetaText={"1/4"} r4;MetaText={"2/4"} r4;MetaText={"3/4"} r4;MetaText={"4/4"} r4; 
]

[4
 [MetaText={"1/3"} r4;MetaText={"2/3"} r4;MetaText={"3/3"} r4;]
  MetaText={"1/5"} r4;MetaText={"2/5"} r4;MetaText={"3/5"} r4;MetaText={"4/5"} r4;MetaText={"5/5"} r4;
]

[
 [4
  MetaText={"1/5"} r4;MetaText={"2/5"} r4;MetaText={"3/5"} r4;MetaText={"4/5"} r4;MetaText={"5/5"} r4;
 ]
]