サクラトップ > 掲示板トップ > 投稿フォーム
曲の投稿にはユーザー登録が必要です。 曲 名 作 者 名前: パスワード: 転 載 メール連絡すれば可 全て許可 メール連絡すれば可 許可しない (ゲームのBGMなど使いたい場合、許可するかどうかを指定。 サクラ本体への収録はあらかじめご承諾ください。) ゲーム制作サイト「Rmake」への転載(およびMP3変換)を許可する ジャンル ダンス・エレクトロニカ ポップス ハードロック・ヘヴィーメタル ヒップホップ クラシック 歌謡曲・演歌 J-POP ロック ブルース・カントリー ダンス・エレクトロニカ ワールド アニメ・ゲーム 日本の伝統音楽・芸能 オルタナティヴロック ソウル・R&B ジャズ・フュージョン ヒーリング・ニューエイジ キッズ・ファミリー 音 源 (パソコン内蔵音源、GS音源、GM音源など) 公開 公開する 削除する (公開を中止して削除するときには、この項目を変更します。) コメント これまた古い曲のリメイク。これはわりかし自信作です。『Instrumental5』のトランスアレンジでもあります。 曲データ(サクラから貼り付けます。) TrackName = {"東洋風幻想曲(改)"} Copyright = {"騎士王321"} MetaText = {"あぁ、なんと懐かしい。 この曲はサクラ初めて間もないころに作った曲のリミックスです。 (Instrumental5のリミックスでもあります。) 今もそのときも全然幻想曲にならなかったけど 題名は無視して聞いてみてくださいな。"} テンポ 135 拍子 4,4 KeyFlag+(fcgdae); TrackSync; Include(delay.h);Include(groove.h);Include(unison.h); System.MeasureShift(1);ResetGS;TrackSync; Function Tune442(){Int I;For(I=1; I<=16;I ++){CH(I)FineTune(72) DataLSB($03) RPN(127,127,0)} CH 1} Tune442()//ほんの少しチューニングが高くなる、はず。。。 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; //CH(13) SysEx$ = f0,41,10,42,12,{40,1c,15,02},f7; //CH(14) SysEx$ = f0,41,10,42,12,{40,1d,15,02},f7; Key(2);//←面白がって変えちゃだめですよ。 CuePoint={"TwmParam(64,120,2);"} //ReverbTime,DepthLevel,HighDump //-------------------------------------------------------------------------------------------------- STR RS04 = {[4 r*1]} STR RS08 = {[8 r*1]} //================================================================================================== STR PF01 = {TempoChange(128,144,!1^1^1^1);EP.T(80,127,!2); [2 [2 `f^,237ab^^`c^]`g^,237ab^^`c^:`a^,237ab^^`c^]`f4,97r4} STR PF02 = {v120[2 [2 [2 `f^,237ab^^`c^]`g^,237ab^^`c^:`a^,237ab^^`c^] :`f8 v-10 `c16^32`g+32`a8`g8 v+10]`f2,97} STR PF03 = {f^rf^rdef4r8f8g^fg^^a^a8^16g32a32g4 f^^^rrdef4r8f8g^fg^^a16^32b+32`c^ra^rgr f^^^rrdef4r8f8g^fg^^a^a8^16g32a32g4 f^^^rrdef4r8f8g^fg^^a^g^rf^rer} STR PF04 = {/*Sub{v100<[2 [2 [2 `f^,237ab^^`c^]`g^,237ab^^`c^:`a^,237ab^^`c^]:`f^r`g^r`fr]`^r`c^rfr>}*/ [2 [2 [2 `f^,237ab^^`c^]`g^,237ab^^`c^:`a^,237ab^^`c^]:`e32`f8^32`g^r`fr]`f^r`c^rfr} STR PF05 = {[8 r-1]TempoChange(144,136,3072);[8 r*1]Tempo(136); [2 [2 [2 `f^,237ab^^`c^]`g^,237ab^^`c^:`a^,237ab^^`c^]:`e32`f8^32`g^r`fr]`f^r`c^rfr TempoChange(136,144,6144);} STR PF06 = {EP.T(127,0,3072);[2 [2 [2 `f^,237ab^^`c^]`g^,237ab^^`c^:`a^,237ab^^`c^]:`e32`f8^32`g^r`fr]`f^r`c^rfr} STR PF07 = {EP(127);q239[2 o6 `d^`ca`cagagfdfdc"ac<[3 a^^`c^^g^]a^^g^^f^g^^f^^e^:f8^16e32,,100f32,,100e4]f2} STR PF08 = {EP.T(127,32,3072);[2 o6 `d^`ca`cagagfdfdc"ac<[3 a^r`c^rg^]a^^g^^f^g^^f^^e^:f4e4]f2} トラック1 V(127) REV(64) CHO(32) M(0) q137 P(64) l16 @1 PF01 PF02 RS08 RS08 RS08 RS08 PF03 PF03 PF04 PF04 RS08 RS08 RS08 RS08 RS08 RS08 PF05 PF02 PF02 PF06 Key(-5);RS08 Key(-4);RS08 Key(-3);RS08 Key(0);RS08 Key(2);PF07 PF07 PF08 RS08 //-------------------------------------------------------------------------------------------------- トラック2 V(120) REV(100) CHO(64) M(10) q137 P(64) l16 BR(12) p%(8) @3 PF01 PF02 RS08 RS08 RS08 RS08 PF03 PF03 PF04 PF04 RS08 RS08 RS08 RS08 RS08 RS08 PF05 PF02 PF02 PF06 Key(-5);RS08 Key(-4);RS08 Key(-3);RS08 Key(0);RS08 Key(2);PF07 PF07 PF08 RS08 //-------------------------------------------------------------------------------------------------- STR BA01 = {EP(127)[2 [2 dd,35`dd`c`ddc "b^`d"b`c`d"b"b+ cc,35`ecg`ede:[2 ff,35`f]fe]"ff`ff"aac`c]} STR BA02 = {EP.T(127,0,6144);[2 [2 dd,35`dd`c`ddc "b^`d"b`c`d"b"b+ cc,35`ecg`ede:[2 ff,35`f]fe]"ff`ff"aac`c]} STR BA03 = {[2 [2 dd,35`dd`c`ddc "b^`d"b`c`d"b"b+ cc,35`ecg`ede:[2 ff,35`f]fe]"ff`ff"aac`c]} STR BA04 = {EP.T(32,127,3072);[2 [2 dd,35`dd`c`ddc "b^`d"b`c`d"b"b+ cc,35`ecg`ede:[2 ff,35`f]fe]"ff`ff"aac`c]} トラック3 V(127) REV(0) CHO(48) M(0) q96 P(64) o3 l16 v120 @82,1 RS04 BA03 BA03 BA03 BA03 BA03 BA03 BA03 BA03 BA03 BA03 BA03 BA03 BA03 BA02 BA03 RS08 BA04 BA01 BA01 Key(7);BA01 Key(8);BA01 Key(-3);BA01 Key(0);BA01 Key(2); BA01 BA01 BA02 BA03 //-------------------------------------------------------------------------------------------------- トラック4 V(100) REV(0) CHO(64) M(20) q95 P(64) o2 l16 v125 @40 RS04 BA03 BA03 BA03 BA03 BA03 BA03 BA03 BA03 BA03 BA03 BA03 BA03 BA03 BA02 BA03 RS08 BA04 BA01 BA01 Key(7);BA01 Key(8);BA01 Key(-3);BA01 Key(0);BA01 Key(2);BA01 BA01 BA02 BA03 //-------------------------------------------------------------------------------------------------- STR CO01 = {EP(127)/*MidiDelay({*/[2 [2 [2 'dfa`d'r16]'dfa`d'[2 '"bfa`d'r16]'"bfa`d' 'ceg`c'r16'ceg`d'r16'ceg`e'[2 'fa`c`f'r16]:'fa`c`e']:'fa`c`g']'fa`c`f'/*},2,!16^32)*/} STR CO02 = {EP.T(127,0,6144);[2 [2 [2 'dfa`d'r16]'dfa`d'[2 '"bfa`d'r16]'"bfa`d' 'ceg`c'r16'ceg`d'r16'ceg`e'[2 'fa`c`f'r16]:'fa`c`e']:'fa`c`g']'fa`c`f'} STR CO03 = {[2 [2 [2 'dfa`d'r16]'dfa`d'[2 '"bfa`d'r16]'"bfa`d' 'ceg`c'r16'ceg`d'r16'ceg`e'[2 'fa`c`f'r16]:'fa`c`e']:'fa`c`g']'fa`c`f'} STR CO04 = {EP.T(32,127,3072);[2 [2 [2 'dfa`d'r16]'dfa`d'[2 '"bfa`d'r16]'"bfa`d' 'ceg`c'r16'ceg`d'r16'ceg`e'[2 'fa`c`f'r16]:'fa`c`e']:'fa`c`g']'fa`c`f'} トラック5 V(80) REV(48) CHO(80) M(20) q89 P.N(32,32,96);l8 o4 @82,110 [28 r*1]EP.T(32,127,3072);[28 r-1] RS04 RS08 RS08 RS08 CO03 CO03 CO03 CO03 CO03 CO03 RS08 RS08 CO04 CO03 CO02 CO03 RS08 RS08 RS08 CO04 Key(7);CO01 Key(-4);CO01 Key(9);CO01 Key(0);CO01 Key(2);RS08 RS08 RS08 RS08 //-------------------------------------------------------------------------------------------------- STR AS01 = {EP.T(80,127,!2);v85 Sub{o4 d"bcfd"bc"f} Sub{o4 a^ ga^^^^ } Sub{o5 d^^ c^ dg c} o5 f^ef4e4f^ea,,80} STR AS02 = {Sub{o4 [2 d"bcfd"bc"f]} Sub{o4 [2 a^ ga^^^^ ]} Sub{o5 [2 d^^ c^ dg c]} o5 f^ef4e4f^ef f^ef4g4f^ea,,80} STR AS03 = {Sub{o4 [2 d"bcfd"bc"f]} Sub{o4 [2 a^ ga^^^^ ]} Sub{o5 [2 d^^ c^ dg c]} o5 f^ef4e4f^ef f^ef4g4f^ef} STR AS04 = {EP.T(127,0,3072); Sub{o4 [2 d"bcfd"bc"f]} Sub{o4 [2 a^ ga^^^^ ]} Sub{o5 [2 d^^ c^ dg c]} o5 f^ef4e4f^ef f^ef4g4f^ef} トラック6 V(90) REV(32) CHO(32) M(10) q98 P(32) l2 @53 AS01 AS02 AS02 AS02 AS02 AS03 RS08 RS08 RS08 RS08 AS02 AS02 AS02 AS02 AS02 AS03 RS08 RS08 RS08 RS08 Key(-5);RS08 Key(-4);RS08 Key(-3);RS08 Key(0);RS08 Key(2);AS02 AS02 AS02 AS02 AS04 RS08 //-------------------------------------------------------------------------------------------------- トラック7 V(90) REV(32) CHO(32) M(10) q99 P(96) l2 @53,32 AS01 AS02 AS02 AS02 AS02 AS03 RS08 RS08 RS08 RS08 AS02 AS02 AS02 AS02 AS02 AS03 RS08 RS08 RS08 RS08 Key(-5);RS08 Key(-4);RS08 Key(-3);RS08 Key(0);RS08 Key(2);AS02 AS02 AS02 AS02 AS04 RS08 //-------------------------------------------------------------------------------------------------- STR SS01 = {[6 r*1]EP.T(0,0,!1,96,112,!8,112,96,!8,96,127,!2);M.T(0,0,!1,0,0,!8,0,16,!8,16,64,!2^4); '"c1^1,,120"g1^1,,120f1^1,,120'r-1 REV.T(0,120,!1);r1 q68 REV(80) o6 M(0)} STR SS02 = {/*Sub{v120<[2 [2 r8^16[2 d32][3 d%32]r8^16[2 "b32][3 "b%32] r8^16[2 c32][3 c%32]:r8^16[2 f32][3 f%32]]r8^16[2 "f32][3 "f%32]]>v100} Sub{>[2 [7 r8^16[2 d32][3 d%32]]r8^16[2 f32][3 f%32]]<}Sub{[8 [2 r8^16[2 a32][3 a%32]]]}*/ Sub{v100[2 [7 r8d8c8"a8]:r8d8c8f8]c"acdfdfa} Sub{o6 v100[2 [7 r8d8c8"a8]:r8d8c8f8]c"acdfdfa} o7 v120[2 [7 rrddcc"a"a]:rrddccff]c"acdfdfa o5} STR SS03 = {/*Sub{v120<[2 [2 r8^16[2 d32][3 d%32]r8^16[2 "b32][3 "b%32] r8^16[2 c32][3 c%32]:r8^16[2 f32][3 f%32]]r8^16[2 "f32][3 "f%32]]>v100} Sub{>[2 [7 r8^16[2 d32][3 d%32]]r8^16[2 f32][3 f%32]]<}Sub{[8 [2 r8^16[2 a32][3 a%32]]]}*/ Sub{v100[2 [7 r8d8c8"a8]:r8d8c8f8]c"a"g"f"g"f"d"c} Sub{o6 v100[2 [7 r8d8c8"a8]:r8d8c8f8]c"a"g"f"g"f"d"c} o7 v120[2 [7 rrddcc"a"a]:rrddccff]c"a"g"f"g"f"d"c o5} STR SS04 = {EP.T(0,127,6144); Sub{v100[2 [7 r8d8c8"a8]:r8d8c8f8]c"acdfdfa} Sub{o6 v100[2 [7 r8d8c8"a8]:r8d8c8f8]c"acdfdfa} o7 v120[2 [7 rrddcc"a"a]:rrddccff]c"acdfdfa o5} STR SS05 = {EP(127)Sub{o5 v110[2 f^^d^^f^g^^f^^g^a^^g^^f^f4e4 f^^d^^f^g^^f^^g^:a^^`c^^a^g^^f^^e^]a^^`c^^`d4`c8a8g8} o6 v125[2 `fff`ddd`ff`ggg`fff`gg`aaa`ggg`ff`ffff`eeee `fff`ddd`ff`ggg`fff`gg:`aaa``c`c`c`aa`ggg`fff`ee] `aaa``c`c`c``d`d`d`d``c`c`aa`gg} STR SS06 = {Sub{o5 v120 q103[2 f^^d^^f^g^^f^^g^a^^g^^f^f4e4: f^^d^^f^g^^f^^g^a^^`d^^a^g^^f^^e^]`c^^a^^`c^`d^^`f^^`d^`c^^a^^g^f2,98} o6 v125[2 `fff`ddd`ff`ggg`fff`gg`aaa`ggg`ff`ffff`eeee: `fff`ddd`ff`ggg`fff`gg`aaa``d`d`d`aa`ggg`fff`ee] ``c`c`c`aaa``c`c``d`d`d``f`f`f``d`d``c`c`c`aaa`gg`f,798`cagfa`c`f} STR SS07 = {EP.T(127,0,6144); Sub{v100[2 [7 r8d8c8"a8]:r8d8c8f8]c"acdfdfa} Sub{o6 v100[2 [7 r8d8c8"a8]:r8d8c8f8]c"acdfdfa} o7 v120[2 [7 rrddcc"a"a]:rrddccff]c"acdfdfa o5} STR SS08 = {r-2 TempoChange(144,136,!2);r2 o5 v120'd8`d8``d8'} トラック8 V(100) REV(0) CHO(64) q98 P(0) l16 BR(12) p%(-8) @49 RS04 SS01 SS02 SS03 SS02 SS03 RS08 RS08 SS04 SS03 SS05 SS06 SS07 SS03 RS08 RS08 RS08 SS01 SS02 SS03 Key(-5);SS05 Key(-4);SS06 Key(-3);SS05 Key(0);SS06 Key(2);RS08 RS08 RS08 SS04 SS03 SS03 SS08 //-------------------------------------------------------------------------------------------------- トラック9 V(100) REV(0) CHO(64) q98 P(127) l16 BR(12) p%(8) @49 RS04 SS01 SS02 SS03 SS02 SS03 RS08 RS08 SS04 SS03 SS05 SS06 SS07 SS03 RS08 RS08 RS08 SS01 SS02 SS03 Key(-5);SS05 Key(-4);SS06 Key(-3);SS05 Key(0);SS06 Key(2);RS08 RS08 RS08 SS04 SS03 SS03 SS08 //-------------------------------------------------------------------------------------------------- STR SQ01 = {q.T(0,139,3072);[8 [2 P.T(0,127,!4,127,0,!4);r2]][8 r-1][8 [2 cdagcagd]]} STR SQ02 = {EP(127);q.T(139,39,3072);[8 [2 P.T(0,127,!4,127,0,!4);r2]][8 r-1][8 [2 cdagcagd]]} STR SQ03 = {q.T(39,139,3072);[8 [2 P.T(0,127,!4,127,0,!4);r2]][8 r-1][8 [2 cdagcagd]]} STR SQ04 = {q.T(139,9,3072);[8 [2 P.T(0,127,!4,127,0,!4);r2]][8 r-1][8 [2 cdagcagd]]} トラック13 V(127) REV(0) CHO(0) M(0) o6 l16 v85 @5 [36 r*1]EP.T(127,0,3072);[36 r-1] RS04 RS08 SQ01 SQ02 SQ03 SQ02 RS08 RS08 RS08 RS08 SQ02 SQ03 SQ02 SQ03 SQ02 SQ03 RS08 SQ01 SQ02 SQ03 Key(7);SQ02 Key(8);SQ03 Key(9);SQ02 Key(0);SQ03 Key(2);SQ02 SQ03 SQ02 SQ03 SQ04 RS08 //-------------------------------------------------------------------------------------------------- STR LB01 = {EP(127)[2 d,,125"bcf4e4d,,125"bc"f4"a4]} STR LB02 = {EP.T(127,0,6144);[2 d,,125"bcf4e4d,,125"bc"f4"a4]} STR LB03 = {[2 d,,125"bcf4e4d,,125"bc"f4"a4]} STR LB04 = {EP.T(0,127,3072);[2 d,,125"bcf4e4d,,125"bc"f4"a4]} トラック14 V(100) REV(0) CHO(64) M(10) q98 P(64) l2 o3 v120 /*BR(12) p%(-512)*/ @81,8 RS04 RS08 LB01 LB01 LB01 LB01 LB01 LB01 LB01 LB01 LB01 LB01 LB01 LB01 LB02 LB03 RS08 LB04 LB01 LB01 Key(-5);LB01 Key(-4);LB01 Key(-3);LB01 Key(0);LB01 Key(2);LB01 LB01 LB02 LB03 RS08 //-------------------------------------------------------------------------------------------------- STR CC01 = {[7 r*1 EP(32)]EP.T(32,127,!2^4);'c1g1'} トラック15 V(127) REV(0) CHO(0) M(0) q105 P(0) o9 v125 @126,7 RS04 RS08 RS08 CC01 RS08 CC01 RS08 RS08 RS08 CC01 RS08 RS08 RS08 RS08 RS08 RS08 RS08 CC01 RS08 CC01 CC01 CC01 CC01 CC01 RS08 RS08 RS08 RS08 RS08 CC01 //-------------------------------------------------------------------------------------------------- トラック16 V(127) REV(0) CHO(0) M(0) q105 P(127) o9 v125 @126,7 RS04 RS08 RS08 CC01 RS08 CC01 RS08 RS08 RS08 CC01 RS08 RS08 RS08 RS08 RS08 RS08 RS08 CC01 RS08 CC01 CC01 CC01 CC01 CC01 RS08 RS08 RS08 RS08 RS08 CC01 //-------------------------------------------------------------------------------------------------- KeyFlag-();Key(0); STR BD01 = {[7 [4 '"a,,100c']][2 '"a,,100c']r-16[2 '"a32,,100c32'] '"a%32c%32''"a%32,,100c%32''"a%32,,100c%32,,100''"a8c8''"a8,,100c8'} STR BD02 = {[8 [4 '"a,,100c']]} STR BD03 = {[7 [4 r*4]EP(127)][2 '"a,,100c']r-16[2 '"a32,,100c32'] '"a%32c%32''"a%32,,100c%32''"a%32,,100c%32,,100''"a8c8''"a8,,100c8'} STR BD04 = {EP.T(127,32,3072);[8 [4 '"a,,100c']]} トラック10//B.D. V(127) REV(0) CHO(80) M(0) q11 P(64) BR(12) p%(3000) o3 v120 @25,90,1 RS04 BD01 BD02 BD02 BD02 BD01 BD02 BD02 BD02 BD01 BD02 BD02 BD02 BD02 BD02 BD04 RS08 BD03 BD02 BD02 BD02 BD02 BD02 BD01 BD02 BD02 BD02 BD02 BD02 BD01 EP(0);BD01 //-------------------------------------------------------------------------------------------------- STR SD01 = {Sub{[7 r1]r2r-16[2 "e32,,100]"e%32,,120[2 "e%32,,100]"e8,,120"e8,,100} Sub{[7 r1]r2r-16[2 e32,,100]e%32,,120[2 e%32,,100]e8,,120e8,,100} [4 r1][3 rdrd]rdr-16d32d32d%32[2 d%32,,100]d8d8,,100} STR SD02 = {[8 [2 rd]]} STR SD03 = {Sub{[7 r1]r2r-16[2 "e32,,100]"e%32,,120[2 "e%32,,100]"e8,,120"e8,,100} Sub{[7 r1]r2r-16[2 e32,,100]e%32,,120[2 e%32,,100]e8,,120e8,,100} [7 rdrd]rdr-16d32d32d%32[2 d%32,,100]d8d8,,100} STR SD04 = {Sub{[7 r1]r2r-16[2 "e32,,100]"e%32,,120[2 "e%32,,100]"e8,,120"e8,,100} Sub{[7 r1]r2r-16[2 e32,,100]e%32,,120[2 e%32,,100]e8,,120e8,,100} [4 r1]EP.T(32,127,!1^1^2^4^16);[3 rdrd]rdr-16d32d32d%32[2 d%32,,100]d8d8,,100} トラック11//S.D. V(125) REV(64) CHO(0) M(0) q12 P(64) BR(12) p%(1000) o3 v125 @27,7 RS04 SD01 SD02 SD02 SD02 SD03 RS08 SD02 SD02 SD03 SD02 SD02 SD02 SD02 RS08 RS08 RS08 SD04 SD02 SD02 SD02 SD02 SD02 SD03 SD02 SD02 SD02 SD02 SD02 SD03 //-------------------------------------------------------------------------------------------------- STR HS01 = {[3 r1]r2^4a+4} STR HS02 = {[3 [4 r8f+g+,,100]][3 r8f+g+,,100]r8[3 f+%16][4 [4 r8f+g+,,100]]} STR HS03 = {Sub{'`c+,,125`e,,125'} [3 [4 r8f+g+,,100]][3 r8f+g+,,100]r8[3 f+%16][4 [4 r8f+g+,,100]]} STR HS04 = {Sub{r-4 a+8,,100[3 f+%16,,80]`c+4}[7 r1]r2^4a+4} STR HS05 = {v125 P.N(64,16,80,48,112);Tempo(144) MidiDelay({'`c+`e'},4,!4)} トラック12 V(127) REV(80) CHO(0) M(0) q13 P(64) BR(12) p%(-4000) o3 l16 v120 @26 HS01 HS02 HS03 HS02 HS03 HS02 HS03 HS02 HS03 HS02 HS03 HS02 HS03 HS02 HS02 HS02 HS04 HS02 HS03 HS02 HS03 HS03 HS03 HS03 HS03 HS02 HS02 HS02 HS02 HS02 HS05 //================================================================================================== //Solo(1)//トラックソロ。複数トラックで指定可能 //Mute(1)//トラックミュート。 この曲は自作のオリジナル曲であるか、または、作曲者の死後50年以上経過した著作権に問題がない曲であることを確認しましたか? いいえ。よく分かりません はい。著作権に問題ありません (←選択)