/*
■☆1-Hour☆
作成：さくらもどき
詳細
【推奨環境】ヘッドホン
【推奨音源】TWM2(TWMをもっていない方はMP3でどうぞ。)
【無断転用】可
【 編曲 】可
【ジャンル】Trance
作成環境
【 OS 】WindoowsXP HomeEdition
【 音源 】TWM2、SoundFont
【出力環境】MDR-CD100 （ヘッドホン）
RH-300 （ヘッドホン）
HP-NC80 （ヘッドホン）
UA-20 （オーディオI/O）
◆ＭＥＭＯ
ＤＬありがとうございました。
今回も１発ネタっぽい感じですいません。
「この曲は１時間で、曲を作ってみようっ！」って思って作ってみた曲です。
全体的にショッパイですが（笑）、聞いていただければ幸いです
ちなみに今回のMP3はTWMを録音しただけです。
http://www.geocities.jp/dolls_rosebud/mp3/1hour.mp3
あとニコニコ動画に今回の作曲風景を録画したのをうｐしてあるので宜しければ見てやってください。
何かの参考になれば、と思います。
注：僕の酷い声がブツブツつぶやいてます（笑
◆動画からの変更点
・この投稿用コメント
・メロディの１小節目の後半を微妙に変更してます。
・最後にストリングスのフレーズを変更してます
*/
曲名{"1-Hour"}
作者{"SakuraModki"}
ResetGS
拍子4,4
テンポ( 155 )
調#()
Key = -2
Int Cnt=1;
[16 TR=Cnt V=100 Cnt++]
Function L1(int){Result=(!1 * int)} //数小節分の長さを返す
Function R1(int){[(int)r*1]} //数小節分の休符
Function X(int){Sub{[(int)r-1]?}} //数小節戻ってから再生(デバッグ用)
TimeKey((1:1:0),,0)
TimeKey((33:1:0),,3)
//=============================================================================================
#String={ v65
Sub{>
v_=-10
edc2"b2"a2e2
edc2g2f2e2
v_=0
<}
EP.T(127,95,L1(6),95,127,L1(2))
[
"f0f0"a0c1
"g0g0"b0d1
"e0e0"b0d1
"a0a0 c0e1
]
}
#String_2={ v65
Sub{>
v_=-10
edc2"b2"a2e2
ed"g2"b2c1
v_=0
<}
EP.T(127,95,L1(6),95,127,L1(2))
[
"f0f0"a0c1
"g0g0"b0d1
"e0e0"b0d1
"a0a0 c0e1
]
}
TR=1 q100 o5 l1 @49 P=40
[8 #String ]
#String_2
//=============================================================================================
TR=2 q100 o5 l1 @51 P=100
[8 #String ]
#String_2
//=============================================================================================
TR=3 q100 o3 l1 @80 P=64 v80
[9 [ fgea ] ]
//=============================================================================================
#Bass_0={
[
[4 "f^f^]
[4 "g^g^]
[4 "e^e^]
[4 "a^a^]
]
}
#Bass={
[
[4 ["f]f"f]
[4 ["g]g"g]
[4 ["e]e"e]
[4 ["a]a"a]
]
}
TR=4 q100 o3 l16 @35 P=64 v110
R1(8)
EP.T(50,127,L1(4))
#Bass_0
#Bass_0
[4 #Bass ]
//=============================================================================================
#SynthBass={
[
[ ""f"ff"f f""f"ff]
[ ""g"gg"g g""g"gg]
[ ""e"ee"e e""e"ee]
[ ""a"aa"a a""a"aa]
]
}
TR=5 q100 o4 l16 @40 P=64 v80
R1(8)
R1(8)
R1(8)
[4 #SynthBass]
//=============================================================================================
#Synth1_1={
"fa"f"f `d"f"f`e
"f"f`c"f `e`g"f`a
`a"g"g`e "g"g`d"g
"g`e"g"g `d"g`e"g
"ea"e"e `d"e"e`e
"e"e`a"e `d`e`a"e
`a"a"a`e "a"a`a"a
"a"a``e"a ``e``d`b`g
}
#Synth1_2={
"fa"f"f `d"f"f`e
"f"f`c"f `e`g"f`a
`a"g"g`e "g"g`d"g
"g`e"g"g `d"g`e"g
"ea"e"e `d"e"e`e
"e"e`a"e `d`e`a"e
`a"a"a`e "a"a`a"a
"a"a`e"a `a"a"a"a
}
TR=6 q40 o4 l16 @82,110,1 P=64 v110
R1(8)R1(8)
EP.T(0,127,L1(8))
#Synth1_1
#Synth1_2
[4
#Synth1_1
#Synth1_2
]
//=============================================================================================
#Synth2_1={
rarr `drr`e
rr`cr `e`gr`a
`arr`e rr`dr
r`err `dr`er
rarr `drr`e
rr`ar `d`e`ar
`arr`e rr`ar
rr``er ``e``d`b`g
}
#Synth2_2={
rarr `drr`e
rr`cr `e`gr`a
`arr`e rr`dr
r`err `dr`er
rarr `drr`e
rr`ar `d`e`ar
`arr`e rr`ar
rr`er `arrr
}
TR=7 q40 o5 l16 @82,90,1 P=64 v127
R1(8)
R1(4)EP.T( 50,127,L1(4) )
#Synth2_2
[4
#Synth2_1
#Synth2_2
]
UseKeyShift=off 調-()
TR=10 o3 l8 q40 @=27,90 V=100
//------------------------------------
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) ]
//=====================SFX系サウンド==============================
//_TR15====================================================
TR=15q100@=123,3v67o7 REV=127CHO=127BR(36)//ベントレンジに注意っ！
/*1-4*/
R1(8)
Sub{p.T(127,0,!1)
P.T(97,30,!1)
EP.T(97,97,!2,97,60,!2)
"c0c0g0`c1
}
R1(8)
R1(8)
R1(8)
/*5-8*/
R1(8)
R1(8)
Sub{p.T(127,0,!1)
P.T(97,30,!1)
EP.T(97,97,!2,97,60,!2)
"c0c0g0`c1
}
/*9-12*/
Sub{p.T(127,0,!1)
P.T(97,30,!1)
EP.T(97,97,!2,97,60,!2)
"c0c0g0`c1
}
//_TR16====================================================
TR=16q100@=123,1 v110 o7REV=127CHO=127BR(36)//ベントレンジに注意っ！
/*1-4*/
R1(8)
Sub{r-1
p.T(127,0,!1^1)
P.T(30,97,!1^2,97,30,!2)
EP.T(20,97,!2,97,97,!1,97,60,!2)
"c0c0g0`c1^1
}
R1(8)
Sub{r-1
p.T(0,20,!2,20,127,!1^2,127,0,!1)
P.T(30,97,!1^1,97,30,!1)
EP.T(20,127,!2,127,127,!1^2,127,60,!1)
"c0c0g0`c1^1^1
}
R1(8)
Sub{r-1
p.T(127,0,!1^1)
P.T(30,97,!1^2,97,30,!2)
EP.T(20,97,!2,97,97,!1,97,60,!2)
"c0c0g0`c1^1
}
R1(8)
/*5-8*/
R1(8)
R1(8)
Sub{r-1
p.T(0,20,!2,20,127,!1^2,127,0,!1)
P.T(30,97,!1^1,97,30,!1)
EP.T(20,127,!2,127,127,!1^2,127,60,!1)
"c0c0g0`c1^1^1
}
R1(8)
R1(8)
/*9-12*/
Sub{r-1
p.T(0,20,!2,20,127,!1^2,127,0,!1)
P.T(30,97,!1^1,97,30,!1)
EP.T(20,127,!2,127,127,!1^2,127,60,!1)
"c0c0g0`c1^1^1
}