/* ■☆Revive Wind☆ 　作成：さくらもどき 詳細 【推奨環境】ヘッドホン 【推奨音源】MP3，TWM2 【無断転用】可 【　編曲　】可 【ジャンル】Easy Listening 作成環境 【 OS 】WindoowsXP HomeEdition 【　音源　】TWM2、SoundFont 【出力環境】MDR-CD100 （ヘッドホン） RH-300 （ヘッドホン） HP-NC80 （ヘッドホン） UA-101 （オーディオI/O） ◆ＭＥＭＯ 　DLありがとうございます。 皆さんご無事でしょうか、実家が福島なのでそこそこアレな状態ですけど大丈夫です。 テレビを点けても地震関連の暗いニュースばかりで気分も滅入ってくるので 爽やかで前向きになれるような３拍子のイージーリスニングを作ってみました。 ピアノと弦楽のサウンドを楽しんで少しでも明るい気分になって頂ければ、と思います。 イメージとしては、優しい風と力強い大地。 　よみがえれ〜って感じ。 奇跡とか魔法とか。 そんなので元に戻ったらそれって素敵ですよね。 ◆MP3 　http://www.geocities.jp/dolls_rosebud/mp3/ReviveWind.mp3 　今回はMP3もそこそこ生っぽくなるように色々と打ち込みを頑張ってます。 　ちなみに音色は（http://freesf2.com/index.html）のサウンドフォントを使わせていただきました。 MP3に直す際に色々凝ってみたので宜しければ感想など頂ければ。 　ミックスの際に音が潰れちゃったりしててちょっと残念なのですが・・・ */ TimeBase = 480; System.ControllerShift(0); TimeSignature = 3,4 //---------------------------------------- Track(0); Channel(16) //Meta & SysEx Time( 1:1: 0) TrackName={"Revive Wind"}; Time( 1:1: 0) Copyright={"(C) 2011 SakuraModki"}; Time( 1:1: 0) MetaText={""}; Time( 1:1: 0) Tempo = 115; KeyFlag=(); Function L1(int){Result=(!2. * int)}//数小節分の長さを返す Function R1(int){[(int)r*2.]} //数小節分の休符 Function X(int){Sub{[(int)r-2.]?}} //数小節戻ってから再生(デバッグ用) Str PD={r32 y64,0 r32 y64,127 r-16} Str PF={r32 y64,0 r-32} Key=0 //---------------------------------------- //_Track1.Piano1d Track(1); q100 @1,16 l8 o6 v80 REV=60 CHO=0 V=127 < /* 1 */ R1(1) v-30 a2. v+10 a2. v+10 g2. v+10 `c2b4 a2. a^ ^g `cb g^ ^r rr `c^b^g^ /* 2 */ v_.T(-20,10,!2,0,-20,!4) "f"acfgf v_.T(-40,0,!2,0,-40,!4) "g"bc"b"g"d v_.T(-20,10,!2,0,-20,!4) "g"bdgfe v_.T(-20,10,!2,0,-20,!4) "aagfec v_.T(-20,10,!2,0,-20,!4) "a0egb`cbg v_.T(-20,10,!2,0,-20,!4) "g"befg"b v_.T(-20,10,!2,0,-20,!4) r"gcdef v_.T(-20,10,!2) `c0g^>>v127 v_=0 "b0"g^c0"g^ /* 3 */ d0"g^ ^^ ^^ v100 c^ ^^ v120 "g0"d^ d0"g^ ^^ ^^ t.N(15,30)e0c^ ^^ t0 "b^ d^ ^^ ^^ c^ ^g `cb g^ ^g fe v127 d0"g^ e0c^ "b0"g^ /* 4 */ d0"g^ ^^ ^^ c^ ^^ "g^ d^ ^^ ^^ e^ ^^ "b^ t.N(20,40) g0c^ ^^ ^^t0 f^ e^ "b^ c0"gr rr rr rr rr c0"g16r16 "b0"g16r16 /* 5-8 */ q25 << v95 [4 [ "a0d0er16"a0d0e "a0d0e "a0d0e16 "a0d0e "a0d0e ] [ "g0c0dr16"g0c0d "g0c0d "g0c0d16 "g0c0d "g0c0d ] :[ "g0"b-0cr16"g0"b-0c "g0"b-0c "g0"b-0c16 "g0"b-0c "g0"b-0c ] [ "g0d0er16"g0d0e "g0c0e "g0c0e16 "g0c0e "g0c0e ] ] v100 "a0d0er16"a0d0e "a0d0e "a0d0e16 "a0d0e "a0d0e v127 a0d0er16a0d0e a0d0e a0d0e16 a0d0e a0d0e `c0a0e e16g16 a16b16 `c0a0e e16a16b16`c16 [`d0b0g16]r16`d0b0g16r16`d0b0g16`d0`e0g16r16> b0g `c0g /* 9-10*/ q100 << Sub{v127 a0`c0`e } [3 v_.T(-30,10,!2.) r v115 [5 a0`c0`e ] v_.T(-30,10,!2.) r v115 [5 g0 a0`d ] v_.T(-30,10,!2.) r v115 [5 e0 a0`d ] v_.T(-30,10,!2.) r v115 [5 a0`c0`e ] ] v100 [6 "d0f0a0`e v80] v100 [6 "e0g0b0`d v80] v100 [6 "c0g0`d0`e v80] v_=0 v127>> c0g rc0b rc0`cr /* 11 */ d0"g^ ^^ ^^ v100 c^ ^^ v120 "g0"d^ d0"g^ ^^ ^^ t.N(15,30)e0c^ ^^ t0 "b^ d^ ^^ ^^ c^ ^g `cb g^ ^g fe v127 d0"g^ e0c^ "b0"g^ /* 12 */ d0"g^ ^^ ^^ c^ ^^ "g^ d^ ^^ ^^ e^ ^^ "b^ t.N(20,40) g0c^ ^^ ^^t0 f^ e^ "b^ c0"g^ ^^ ^^ c+ /* 13 */ v127 ""a0"d0"e2.^2.^2.^2. v.T(60,127,!1.) ""a0"d0"e. ""a0"d0"e16 [4 ""a0"d0"e ] ""g0"c0"d. ""g0"c0"d16 [""g0"c0"d ] v127 CHO=127 "b0"gc0"g [ /* 14 */ d0"g^ ^^ ^^ v100 c^ ^^ v120 "g0"d^ d0"g^ ^^ ^^ t.N(15,30)e0c^ ^^ t0 "b^ d^ ^^ ^^ c^ ^g `cb g^ ^g fe v127 d0"g^ e0c^ "b0"g^ /* 15 */ d0"g^ ^^ ^^ c^ ^^ "g^ d^ ^^ ^^ e^ ^^ "b^ t.N(20,40) g0c^ ^^ ^^t0 f^ e^ "b^ : c0"gr rr rr rr rr "b-16"b16c16c+16 ] c0"g.c0"g16 [4 c0"g] c0"g.c0"g16 [ c0"g] c0"g^ Channel(16) //Meta & SysEx Time( 1:1: 0) TrackName={"TRACK(1):Piano Right"} //---------------------------------------- //_Track101.Piano1d TR=101 o4 q100 CH=1 l8 /* 1 */ v100 R1(1) PD f2. PD g2. PD e2. PD a2g4 PD f2. PD g2. v_.T(10,0,!8,-40,0,!4.,0,-40,!4) PD "e"beb`de v_.T(10,0,!8,-40,0,!4.,0,-40,!4) PD a`c`eag^ v_=0 /* 2 */ PD "f2. PD "g2. PD "e2. PD "a2. PD "d2. PD "g2. PD c2. PD c^"b^"g^ /* 3 */ v+10 [ v_.T(10,0,!8,-40,0,!4.,0,-40,!4) PD "fcf`cbg v_.T(10,0,!8,-40,0,!4.,0,-40,!4) PD "gdg`c`d`g v_.T(10,0,!8,-40,0,!4.,0,-40,!4) PD "eegb`d`e v_.T(10,0,!8,-40,0,!4.,0,-40,!4) PD "aea`g`f`e ] /* 4 */ v_.T(10,0,!8,-40,0,!4.,0,-40,!4) PD "fcf`cbg v_.T(10,0,!8,-40,0,!4.,0,-40,!4) PD "gdg`c`d`g v_.T(10,0,!8,-40,0,!4.,0,-40,!4) PD "eegb`d`e v_.T(10,0,!8,-40,0,!4.,0,-40,!4) PD "aea`g`f`e v_.T(10,0,!8,-40,0,!4.,0,-40,!4) PD "d"adab`d v_.T(10,0,!8,-40,0,!4.,0,-40,!4) PD "gg`d`g`a`b v_.T(10,0,!8,-40,0,!4.,0,-40,!4) PD "c0"g "b16c16 g16b16b `c0`g `c0`f v_=0 PD "c16 "g c16 g `c16 `g16 q25 PF "c0c "c0c /* 5-8 */ q25 v110 [4 [ "f"f "fr16"f16 "f"f] [ "e"e "er16"e16 "e"e] :[ "d"d "dr16"d16 "d"d] [ "c"c "cr16"c16 "c"c] ] v127 ["f"f "fr16"f16 "f"f] "f"f "f"f "f"f "g16"g"g |"g16"g | "a"a /* 9 - 10 */ v110 q100 [3 v_.T(-30,10,!2.)[6 "f] v_.T(-30,10,!2.)[6 "g] v_.T(-30,10,!2.)[6 "e] v_.T(-30,10,!2.)[6 "a] ] v_.T(-30,10,!2.)[6 "d] v_.T(-30,10,!2.)[6 "g] v_.T(-30,10,!2.)[6 c] v_=0 "cr"c^ rr /* 11 */ v+10 [ v_.T(10,0,!8,-40,0,!4.,0,-40,!4) PD "fcf`cbg v_.T(10,0,!8,-40,0,!4.,0,-40,!4) PD "gdg`c`d`g v_.T(10,0,!8,-40,0,!4.,0,-40,!4) PD "eegb`d`e v_.T(10,0,!8,-40,0,!4.,0,-40,!4) PD "aea`g`f`e ] /* 12 */ v_.T(10,0,!8,-40,0,!4.,0,-40,!4) PD "fcf`cbg v_.T(10,0,!8,-40,0,!4.,0,-40,!4) PD "gdg`c`d`g v_.T(10,0,!8,-40,0,!4.,0,-40,!4) PD "eegb`d`e v_.T(10,0,!8,-40,0,!4.,0,-40,!4) PD "aea`g`f`e v_.T(10,0,!8,-40,0,!4.,0,-40,!4) PD "d"adab`d v_.T(10,0,!8,-40,0,!4.,0,-40,!4) PD "gg`d`g`a`b v_.T(10,0,!8,-40,0,!4.,0,-40,!4) PD "a0ae ab `d`e v_=0 PD "a0a2. /* 13 */ PD ""f0"f2.^2.^2.^2. v.T(30,110,!1.) PF "f."f16[4 "f] PF "g."g16[ "g] v127["g] /* 14 - 17 */ [ < [3 v100 [6 "f0f v80] v100 [6 "g0g v80] v100 [6 "e0e v80] v100 [6 "a0a v80] ] v100 [6 "d0d v80] v100 [6 "g0g v80] : v100 [6 "c0c v80] v100 [6 "c0c v80] > ] "c0c."c0c16 [4 "c0c] "c0c."c0c16 [ "c0c] "c0c^ Channel(16) //Meta & SysEx Time( 1:1: 0) TrackName={"TRACK(101):Piano Left"} //---------------------------------------- //_Track2.Violin TR=2 o5 @41 l8 q100 P=79 v100 REV=60 CHO=0 V=127 /* 1 */ EP.T(127,127,!2,127,77,!4) rrr"b.c. EP.T(47,120,!2.) d^ ^^ ^^ EP.T(120,60,!2,60,100,!4) c^ ^^ "g^ EP.T(47,120,!2.) d^ ^^ ^^ EP.T(120,60,!2,60,100,!4) e^ ^^ "b^ EP.T(47,120,!2.) d^ ^^ ^^ EP.T(120,40,!4.,70,100,!4.) c^ ^g `cb EP.T(47,120,!2.) g^ ^g fe EP.T(120,60,!2,60,120,!4) d^ e^ "b^ /* 2 */ EP.T(47,127,!2.) d^ ^^ ^^ EP.T(120,60,!2,60,120,!4) c^ ^^ "g^ EP.T(47,120,!2.) d^ ^^ ^^ EP.T(120,60,!2,60,120,!4) e^ ^^ "b^ EP.T(47,120,!2.) g^ ^^ ^^ EP.T(120,60,!2,60,120,!4) f^ e^ "b^ EP.T(47,120,!2.,120,50,!2) c^ ^^ ^^ ^^ ^^ rr /* 3 */ v80 rr rr rr EP.T(127,127,!2,127,77,!4) rr rr "g^8-64"b-64 EP.T(47,120,!2.) "b^ ^^ ^^ EP.T(120,60,!2,60,120,!4) c^ ^^ ^^ d^ ^^ ^^ "g^ ^^ ^^8-64e-64 e^ ^g fe d^ e^ "b^8-64d-64 d^ ^^ ^^ "g^ ^^ ^r "g^ "b^ d^8-64"a-64 "a^ ^^ ^^ g^ ^^ ^^ f^ e^ "b^ c^ ^^ ^^ v127 "a-16"a16 r16"b-16 "b16r16 c16g16 `c16r16b16r16 /* 5 */ R1(8) /* 6 */ v100 EP.T(47,120,!2.) e^ ^^ ^^ a^ ^^ v120 a-16g16g-32f32e32e-32v100 d^ ^^ ^^ g^ ^^ ab `c^ ^^ ^^ l16 > g^^f rerd cr"b-r < >"bcr"b"bcr"b"bcr"b"bcr"b"bcr"b e^rd g^^f rerd cr"b-r < >"bcr"b"bcr"b"bcr"b"bcr"b"bcr"b e^rd v120 EP.T(120,60,!2,60,100,!4) d^ ^^ ^^ EP.T(120,60,!2,60,100,!4) c^ ^^ "g^ EP.T(47,120,!2.) d^ ^^ ^^ EP.T(120,60,!2,60,100,!4) e^ ^^ "b^ EP.T(47,120,!2.) d^ ^^ ^^ EP.T(120,40,!4.,70,100,!4.) c^ ^g `cb EP.T(47,120,!2.) g^ ^g fe EP.T(120,60,!2,60,120,!4) d^ e^ "b^ /* 10 */ EP.T(47,127,!2.) d^ ^^ ^^ EP.T(120,60,!2,60,120,!4) c^ ^^ "g^ EP.T(47,120,!2.) d^ ^^ ^^ EP.T(120,60,!2,60,120,!4) e^ ^^ "b^ EP.T(47,120,!2.) g^ ^^ ^^ EP.T(120,60,!2,60,120,!4) f^ e^ "b^ EP.T(47,120,!2.,120,50,!2) c^ ^^ ^ EP.T(47,120,!2.) d^ ^^ ^^ EP.T(47,120,!2.) c^ ^^ ^^ EP.T(47,120,!2.) "g^ ^^ ^^ EP.T(120,60,!2,60,120,!4) e^ ^^ "b^ d^ ^^ ^^ c^^ "b^^ g^^edc d^ e^ "b^ d^ ^^ ^^ c^ ^^ ^^ "g^ ^^ ^^ e^ ^^ "b^ g^ ^^ ^^ f^ e^ "b^ c^ ^^ ^^ c^ ^^ v120 < "b-16"b16c16c+16 /* 15 */ EP.T(47,120,!2.) d^ ^^ ^^ EP.T(120,60,!2,60,100,!4) c^ ^^ "g^ EP.T(47,120,!2.) d^ ^^ ^^ EP.T(120,60,!2,60,100,!4) e^ ^^ "b^ EP.T(47,120,!2.) d^ ^^ ^^ EP.T(120,40,!4.,70,100,!4.) c^ ^g `cb EP.T(47,120,!2.) g^ ^g fe EP.T(120,60,!2,60,120,!4) d^ e^ "b^ /* 2 */ EP.T(47,127,!2.) d^ ^^ ^^ EP.T(120,60,!2,60,120,!4) c^ ^^ "g^ EP.T(47,120,!2.) d^ ^^ ^^ EP.T(120,60,!2,60,120,!4) e^ ^^ "b^ EP.T(47,120,!2.) g^ ^^ ^^ EP.T(120,60,!2,60,120,!4) f^ e^ "b^ EP.T(47,120,!2.,120,50,!2 , 50,120,!2.) c^ ^^ ^^ ^^ ^^ Channel(16) //Meta & SysEx Time( 1:1: 0) TrackName={"TRACK(2):Violin"} //---------------------------------------- //_Track3.Strings1 TR=3 o4 @49 l8 q50 v55 REV=0 CHO=0 V=127 r2. /* 1 - 2 */ R1(16) /* 3 - 4 */ v.T(50,70,L1(16)) [3 [6 "f0f0a0`e] [6 "g0g0b0`d] [6 "e0g0b0`g] [6 "a0a0b0`e] ] [6 "d0f0a0`e] [6 "e0g0b0`d] [6 "c0g0`d0`e] [6 "c0a0`c0`e] /* 5 - 8 */ q99 v80 [4 EP.T(90,127,!1.) "f0f0a0`d0`e1. "e0e0g0`c0`d1. :EP.T(127,100,!1.) "d0d0f0b-0`c1. EP.T(100,127,!1.) "c0c0g0`d0`e1. ] v100 EP.T(90,127,!1.) "f0f0a0`d0`e2. "f0f0`d0`e0`a2. "f0f0`e0`a0``c2. v80 "g0g0`g0`a0`b0``d4.r4. /* 9 - 10 */ q50 [3 v100 [6 "f0f0a0`e v80] v100 [6 "g0g0b0`d v80] v100 [6 "e0g0b0`g v80] v100 [6 "a0a0b0`e v80] ] v100 [6 "d0f0a0`e v80] v100 [6 "g0g0b0`d v80] v100 [6 "c0g0`d0`e v80] r2. /* 11 - 12 */ [3 v100 [6 "f0f0a0`e v80] v100 [6 "g0g0b0`d v80] v100 [6 "e0g0b0`g v80] v100 [6 "a0a0b0`e v80] ] v100 [6 "d0f0a0`e v80] v100 [6 "g0g0b0`d v80] v100 [6 "a0g0`d0`e v80] v100 [6 "a0a0`c+0`e v80] /* 13 */ q100 EP.T(127,0,L1(4)) ""f0"f0a0`d0`e2.^2.^2.^2. EP.T(60,127,!1.) q50 v90 > "f0"a0d0e. "a0d0e16 [4 "a0d0e ] ""g0"g0c0d. "g0c0d16 [4 "g0c0d ] < v50 EP=90 > /* 11 - 12 */ [3 v90 "f0f0a0`e. v60 "f0f0a0`e16 [4 "f0f0a0`e ] v90 "g0g0b0`d. v60 "g0g0b0`d16[4 "g0g0b0`d ] v90 "e0g0b0`g. v60 "e0g0b0`g16[4 "e0g0b0`g ] v90 "a0a0b0`e. v60 "a0a0b0`e16[4 "a0a0b0`e ] ] v90 "d0f0a0`e. v60 "d0f0a0`e16 [4 "d0f0a0`e ] v90 "g0g0b0`d. v60 "g0g0b0`d16 [4 "g0g0b0`d ] v90 "c0g0`d0`e. v60 "c0g0`d0`e16[4 "c0g0`d0`e ] v90 "c0g0`d0`c. v60 "c0g0`d0`c16[4 "c0g0`d0`c ] /* 13 - 14 */ [3 v90 "f0f0a0`e. v60 "f0f0a0`e16 [4 "f0f0a0`e ] v90 "g0g0b0`d. v60 "g0g0b0`d16[4 "g0g0b0`d ] v90 "e0g0b0`g. v60 "e0g0b0`g16[4 "e0g0b0`g ] v90 "a0a0b0`e. v60 "a0a0b0`e16[4 "a0a0b0`e ] ] v90 "d0f0a0`e. v60 "d0f0a0`e16 [4 "d0f0a0`e ] v90 "g0g0b0`d. v60 "g0g0b0`d16 [4 "g0g0b0`d ] v90 "c0g0`d0`e. v60 "c0g0`d0`e16[4 "c0g0`d0`e ] q100 EP.T(40,127,!2.,127,50,!2,50,0,!4) v90 "c0g0`c1. Channel(16) //Meta & SysEx Time( 1:1: 0) TrackName={"TRACK(3):Strings1"} //============================================================================================= //---------------------------------------- //_Track4.Cello TR=4 o4 @43 l8 q100 P=49 V=127 REV=40 CHO=10 R1(1) /* 1 - 2 */ R1(16) /* 3 */ R1(8) Sub{r-2. } /* 4 */ v100 EP.T(60,127,!2) f^ ^^ ^^ v90 g^ ^^ ^^ e^ g^ b^ a^ ^^ a-16a16b-16b16 `c^ ^^ `e^ `g^ `f^ b^ `c^ ^^ ^^ > "a-16"a16 r16"b-16 "b16r16 c16g16 `c16r16b16r16 /* 5 - 8 */ EP.W(80,127,!4) [4 v100 e^ ^^ ^^ a^ ^^ v120 a-16g16g-32f32e32e-32v100 d^ ^^ ^^ g^ ^^ :ab `c^ ^^ ^^ b-^ ^^ b16b-16a16a-16 g^ ^^ ^^ c^ ^^ d^ ]de f^ ^^ ^^ g^ ^^ ^^ v120 l16 `creg ab`cr eab`c `d`dr`d r`d`er rrrr /* 9 */g^ ^b-16b16 `cb g^^gfe d^ e^ "b^ < /* 10 */ EP.T(60,127,!2) f^ ^^ ^^ v90 g^ ^^ ^^ e^ g^ b^ a^ ^^ a-16a16b-16b16 `c^ ^^ `e^ `g^ `f^ b^ `c^ ^^ ^^ v80 rr rr16 c16c+16d16d+16e16 v70 /* 11 */ EP.T(60,127,!2) f^ ^^ ^^ g^ ^^ ^^ e^ g^ b^ a^ ^^ a-16a16b-16b16 `c^ ^^ b^ >g^ ^b-16b16 `cb g^^gfe d^ e^ "b^ < /* 12 */ EP.T(60,127,!2) f^ ^^ ^^ v90 g^ ^^ ^^ e^ g^ b^ a^ ^^ a-16a16b-16b16 `c^ ^^ `e^ `g^ `f^ b^ `c^ ^^ ^^ `c+^ ^^ ^^ /* 13 */ Sub{`d^ ^^ ^^} v70 c^ ^^ ^^ "f^ ^^ ^^ EP.T(60,127,!2) v90 "g^ c^ "b^ v60 "g^ ^^ ^^ v70 "f^ ^^ ^^ v80 "g^ ^^ ^^ [ /* 14 */l8 v70 EP.T(60,127,!2) f^ ^^ ^^ g^ ^^ ^^ e^ g^ b^ a^ ^^ a-16a16b-16b16 `c^ ^^ b^ >g^ ^b-16b16 `cb g^^gfe d^ e^ "b^ < /* 10 */ EP.T(60,127,!2) f^ ^^ ^^ v80 g^ ^^ ^^ e^ g^ b^ a^ ^^ a-16a16b-16b16 `c^ ^^ `e^ `g^ `f^ b^ `c^ ^^ ^^ ^^ ^^ rr v70 ] Channel(16) //Meta & SysEx Time( 1:1: 0) TrackName={"TRACK(4):Cello"} //---------------------------------------- //_Track5.Vibraphone TR=5 o7 @12 l4 q100 REV=127 v32 CHO=0 V=127 R1(1) /* 1 - 12 */ R1(8*12) /* 13 */ Sub{<[4 ef`c]>} [4 ef`c]　//ちょっとだけ出てくる