サクラトップ > 掲示板トップ > 投稿フォーム
曲の投稿にはユーザー登録が必要です。 曲 名 作 者 名前: パスワード: 転 載 メール連絡すれば可 全て許可 メール連絡すれば可 許可しない (ゲームのBGMなど使いたい場合、許可するかどうかを指定。 サクラ本体への収録はあらかじめご承諾ください。) ゲーム制作サイト「Rmake」への転載(およびMP3変換)を許可する ジャンル ロック ポップス ハードロック・ヘヴィーメタル ヒップホップ クラシック 歌謡曲・演歌 J-POP ロック ブルース・カントリー ダンス・エレクトロニカ ワールド アニメ・ゲーム 日本の伝統音楽・芸能 オルタナティヴロック ソウル・R&B ジャズ・フュージョン ヒーリング・ニューエイジ キッズ・ファミリー 音 源 (パソコン内蔵音源、GS音源、GM音源など) 公開 公開する 削除する (公開を中止して削除するときには、この項目を変更します。) コメント ええと、未完成曲だけ上げる滝之上です。 プログレ、かつポップな曲を作ろうとして失敗・・・ ちなみに新世界っても大阪の新世界ではありませぬ(汗 曲データ(サクラから貼り付けます。) TrackName = {"新世界へ"} Copyright = {"滝之上"} MetaText = {"/* 楽器の音色とかはかなりシンプルにしました。 が、曲自体はめっちゃ複雑です。 ほんとに突然、変拍子が出てくるとか、 長調の和音に短音階を使ったり、またその逆も。 とにかくジェットコースターに乗ってるような かなりのスピードで曲は展開していくので テンション高めで聞いてみてください d(・∀・)/♪\(・∀・)b 遠近法を使ってみたつもり↑*/"} テンポ 185 拍子 4,4 KeyFlag-(bea); TrackSync; Include(delay.h);Include(groove.h);Include(unison.h); System.MeasureShift(1);ResetGS;TrackSync; Function Tune444(){Int I;For(I=1; I<=16;I ++){CH(I)FineTune(72) DataLSB($03) RPN(127,127,0)} CH 1} Tune444() 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; CuePoint={"TwmParam(120,120,0)"} //================================================================================================== STR RS08 = {[8 r*1]} STR RS10 = {[10 r*1]} STR RS11 = {[11 r*1]} STR RS14 = {[14 r*1]r2} STR RS16 = {[16 r*1]} //--キーボードは二つ使います------------------------------------------------------------------------ STR PF01 = {l4^8'"f"a''c8e8'r8'eg''df''gb''d4f4' '"b+,99e,99f+,99a,99' v+10""a8 q289[2 ""a%16""b%14"d-%14"e%14"g-%14>]v-10 q89<<'e8,109a8,109''d1f1b1' '"f"a''"g8e8'r8'eg''df''gb''`d4`f4''`d+2^4`f+2^4'r8'`d+8`f+8''`d-2^4`f2^4`a2^4' q289 v+10 l32 `e`dbag-ed"b q89 v-10 l4^8} STR PF02 = {'"f"a''c8e8'r8'eg''df''gb''d4f4' '"b+,99e,99f+,99a,99' v+10""a8 q289[2 ""a%16""b%14"d-%14"e%14"g-%14>]v-10 q89<<'e8,109a8,109''d1f1b1' '"f"a''"g8e8'r8'eg''df''gb''`d4`f4''`d+2^4`f+2^4'r8'`d+8`f+8'q99 l1^1^2^8^16 M.onNoteWave(0,127,!1^1);EP.T(127,127,!1,127,32,!1^2^4);'`d-`f`a'r16 M(0)EP(127)} STR PF03 = {r-4 fgb`c`e`f`g`b l4 q99[2 v70 t.N(0,4,8,12,16);'c1e+1g1b+1`d1''"b1^2f1^2g1^2b1^2`c+1^2'v90 '"aegb`c'r'"fca`c`e'r'"ggb`d`f'r8: Sub{'"f1^1^2`c1^1^2`g1^1^2'}Sub{a+1^1^8a2}`e+1^1^8`e4,109`d4,109] '"f1^2^8a+1^2^8`c1^2^8`e+1^2^8`g1^2^8''"f+1^2b1^2`d-1^2`f1^2`a1^2''"g4^8b+4^8`d4^8`f4^8`b+4^8'r8} STR PF04 = {o5 l8 v90 q99 Sub{c1^1"b1^1^1^1^1 c1^1"b1^1^1^1^1^2,99} Sub{e1^1^1^1^1^2d-1^2 e1^1^1^1^1^2d-1^1,99} Sub{g1^1g-1^2c1^1f1^2 g1^1g-1^2c1^1e1^1,99} Sub{b1^1^1^2g1^1a1^2 b1^1^1^2g1^1^1^1,99} [14 r1]v127 `e12`c12b12g12f12f+12 l1 v95} STR PF05 = {[14 r1]r4}//ただの休み STR PF06 = {Sub{o3 [2 ag`cb ag`c:b2e2]c} Sub{o4 [2 eded- gfe:d-]e+} Sub{ gfba bb+ba2g2 gfba bb+b^} o5 v120 q109[2 g1f4^8a+32,129b4^16^32f4g1a2g6a6b6 `c1b+2b+6`c6`d6:`d32,129`e8^32`d8^16b2^8a2b4^8a+16,129a16,129]`e2^4`e4`e+1} STR PF16 = {Sub{o3 [2 ag`cb ag`c:b2e2]`c+} Sub{o4 [2 eded- gfe:d-]g} Sub{ gfba bb+ba2g2 gfba bb+ba+} o5 v120 q109[2 g1f4^8a+32,129b4^16^32f4g1a2g6a6b6 `c1b+2b+6`c6`d6:`d32,129`e8^32`d8^16b2^8a2b4^8a+16,129a16,129]`e2^4`e4`e+1} STR PF07 = {[15 r1]EP.T(0,127,!2^4);'"g1,,125"b1,,125e+1,,125g1,,125'} STR PF17 = {[14 r1]KeyFlag+(fcg);r1^1 v100 <"a12"b12c12e12f12b24,189b+24,159>KeyFlag-(bea);} STR PF08 = {RS08 EP.T(0,127,!1);'d-1^1f1^1a1^1`c1^1'} STR PF09 = {KeyFlag+(fcg);l8 v120[2 c"bec^"bf"bc"be"bf"bc"bc"be"bf"bg"bgage^c"b"a: c"bec^"bf"bc"be"bf"bc"be+"bf"bg"bb"bbaga^ge"b] c"bec^"bf"bc"be"bf"bc"bc"be"bf"bb"b'c2,,90e2,,80b2''c2,,90f2,,80a+2' KeyFlag-(bea);} STR PF10 = {l1 KeyFlag+(cfg);v80<[2 'dfa`c''dfgb''cegb''cefa':'dfa`c''efgb''de+gb''f2a2`c2`e2''e2g-2b2`d2'] 'dfa`c''efgb''fgb`c''cfa+`c' KeyFlag-(bea);} トラック1 V(127) REV(80) CHO(64) M(0) q89 P(64) BR(12) l4^8 v100 o6 @82,90,1 r1 RS08 PF01 PF02 RS14 PF05 PF07 PF01 PF02 PF05 PF17 PF09 //--第二キーボード---------------------------------------------------------------------------------- トラック2 V(110) REV(32) CHO(32) M(20) q99 P(64) l32 o4 q299 @49,90,1 RS08 RS08 RS11 PF03 PF04 PF06 RS08 PF08 PF04 PF16 PF10 //--エレキギター------------------------------------------------------------------------------------ STR GT01 = {@31,8 t.N(0,1,2,3);[2 '"fca`e''"f8,28c8,28a8,28`e8,28'[2 '"fca`e'][2 '"f16,28c16,28a16,28`e16,28'] '"gfb`d''"g8,28f8,28b8,28`d8,28'[2 '"gfb`d'][2 '"g16,28f16,28b16,28`d16,28']: '"b+f+b`e''"b+8,28f+8,28b8,28`e8,28'[2 '"b+f+b`e'][2 '"b+16,28f+16,28b16,28`e16,28'] '"ba`c`f''"b8,28a8,28`c8,28`f8,28'[2 '"ba`c`f'][2 '"b16,28a16,28`c16,28`f16,28']] '"b+f+b-`e''"b+8,28f+8,28b-8,28`e8,28'[2 '"b+f+b-`e'][2 '"b+16,28f+16,28b-16,28`e16,28'] 'd-a`c`f''d-8,28a8,28`c8,28`f8,28'[2 'd-a`c`f'][2 'd-16,28a16,28`c16,28`f16,28']} STR GT02 = {t.N(0,1,2,3);[2 '"fca`e''"f8,28c8,28a8,28`e8,28'[2 '"fca`e'][2 '"f16,28c16,28a16,28`e16,28'] '"gfb`d''"g8,28f8,28b8,28`d8,28'[2 '"gfb`d'][2 '"g16,28f16,28b16,28`d16,28']: '"b+f+b`e''"b+8,28f+8,28b8,28`e8,28'[2 '"b+f+b`e'][2 '"b+16,28f+16,28b16,28`e16,28'] '"ba`c`f''"b8,28a8,28`c8,28`f8,28'[2 '"ba`c`f'][2 '"b16,28a16,28`c16,28`f16,28']] '"b+f+b-`e''"b+8,28f+8,28b-8,28`e8,28'[2 '"b+f+b-`e'][2 '"b+16,28f+16,28b-16,28`e16,28'] 'd-a`c`f''d-8,28a8,28`c8,28`f8,28'[2 'd-a`c`f'][2 'd-16,28a16,28`c16,28`f16,28'] M.onNoteWave(0,127,!1^1);'d-1^1a1^1,,,2`c1^1,,,4`f1^1,,,6'M(0) t(0)} STR GT03 = {M.onNoteWave(0,0,!4,0,64,!4);@26,32 r-4 o5 r4 l8[2 v127 q197 b+`cb+g2r8^16a+16b4a,97gagecec"b v100 q97 '"e4"a4,,,2c4,,,4'r[2 '"e16,28"a16,28,,2c16,28,,4']'"f4"a4,,,2e4,,,4'r[2 '"f16,28"a16,28,,2e16,28,,4'] '"g4"b4,,,2f4,,,4'[2 '"g16,28"b16,28,,2f16,28,,4']: EP.T(127,127,!1,127,32,!1^2)'"f1^1^2"a+1^1^2,77,,2e+1^1^2,77,,4g1^1^2,,,6'r8 EP(127)] '"f1^2^8"a+1^2^8,77,,2e+1^2^8,77,,4g1^2^8,,,6''"f+1^2"b1^2,,,4f1^2,,,8a1^2,,,12' '"g4^8d4^8,,,4f4^8,,,8b+4^8,,,12'r8} STR GT04 = {v127 q197 l8 @26,32[2 [4 "gdeb][3 "bfg-`d-][4 "geb`d]:[3 "fd-a`c]][3 "bgb:`e]`d-`e`d-bg} STR GT05 = {t.N(0,1,2,3);o4 l2^4 v80 q77[2 '"acfb'[3 '"a12c12f12b12']'"gdfb+'[3 '"g12d12f12b+12'] '"geb`c'[3 '"g12e12b12`c12']'"ad-fb'[3 '"a12d-12f12b12'] '"aeg`c'[3 '"a12e12g12`c12']'"gfb+`d'[3 '"g12f12b+12`d12'] 'cgb`e'[3 'c12g12b12`e12']:q47 '"b4d-4a4`c4'[3 '"b12d-12a12`c12']'"b4e4g4`d-4'[3 '"b12e12g12`d-12']q77 ]'c2^4g2^4b2^4`e+2^4'[3 'c12g12b12`e+12'] l4 v100 q97} STR GT06 = {@31,8 l2^4^8 v100 o4 KeyFlag+(fcg);t.N(0,1,2,3,4);[2 '"adf`c`e'[2 '"a16,28d16,28f16,28`c16,28`e16,28'] '"beg`c`e'[2 '"b16,28e16,28g16,28`c16,28`e16,28'] '"bea`c`f'[2 '"b16,28e16,28a16,28`c16,28`f16,28'] '"aea`c`f'[2 '"a16,28e16,28a16,28`c16,28`f16,28']: '"adf`c`e'[2 '"a16,28d16,28f16,28`c16,28`e16,28'] '"beg`c`e'[2 '"b16,28e16,28g16,28`c16,28`e16,28'] '"be+gb`d'[2 '"b16,28e+16,28g16,28`d16,28`e+16,28'] [2 '"a4^8e4^8a4^8`c4^8`f4^8'[2 '"a16,28e16,28a16,28`c16,28`f16,28']Key(-2);]Key(0);] '"adf`c`e'[2 '"a16,28d16,28f16,28`c16,28`e16,28'] '"beg`c`e'[2 '"b16,28e16,28g16,28`c16,28`e16,28'] 'cfb`e`g'[2 'c16,28f16,28b16,28`e16,28`g16,28'] 'c1f1a+1`c1`f1' KeyFlag-(bea);} トラック5 V(125) REV(16) CHO(48) M(0) q97 P(32) o4 v100 @31,8 r1 [2 GT01]GT02 GT03 GT04 GT05 GT01 GT02 GT04 GT05 GT06 //--普通のエレキベースで問題ないでしょう------------------------------------------------------------ STR BA01 = {[2 ffgff`cfa ggbgg`dga+>[2 "b+"b+f+]"b+d+:[2 "b+"b+f+]"b+d+:[2 d^^`d^^d^ d^`d`e^^`d^ c^^g^e"g"g- "f^ca^^g^: d^^`d^^dd+ e^^`e^^e16f16e f-^^"f-^^"f-^ "f^ce^g-b`d] d^^`d^^dd+ e^^`e^^e"b "fcef^efb a+gfc"a+"g"f^ KeyFlag-(bea);} トラック8 V(120) REV(0) CHO(32) M(0) q96 P(96) o2 l8 v127 M.onNoteWave(0,0,!1,0,64,!1); @39,1 r1 [2 BA01]BA02 BA03 BA04 BA05 BA01 BA02 BA04 BA15 BA06 //--珍しくアコースティックなドラムです。------------------------------------------------------------ KeyFlag-(); STR DR01 = {a+4,,100a+4,,80f+,,100[3 g+,,80]a+4,,120} STR DR02 = {Sub{[2 [3 [4 c4,,127]][3 c4,,127]c8,,127c8,,120]} [7 [4 f+8,,100g+8,,50]]a+4,,100a+4,,80f+,,100[3 g+,,80]a+4,,120} STR DR03 = {Sub{[2 [3 [4 c4,,127]][3 c4,,127]c8,,127c8,,120]} Sub{[2 '`c+4,,125`e4,,125'r1^1^2^4:v60r2[2 '`c+4`e4'v+20]v100]} [7 [4 f+8,,100g+8,,50]]a+4,,100a+4,,80f+,,100[3 g+,,80]a+4,,120} STR DR04 = {Sub{[2 [3 [4 c4,,127]][3 c4,,127]c8,,127c8,,120][2 c4,,120r4][3 c4,,127][2 c8,,127]} Sub{[2 '`c+1,,125`e1,,125'[3 r*1]][2 '`c+1,,125`e1,,125']} [7 [4 f+8,,100g+8,,50]]a+4,,100a+4,,80f+,,100[3 g+,,80]a+4,,120[8 a+4,,100] r-2'`c+4`e4'a+4,,120} STR DR05 = {Sub{[2 v127 Sub{'`c+4`e4,,100'}[2 c4c4r4c8c8,,100]c4c4,,100 [3 'c4`c+4`e4,,100':r4]r8c8:Sub{'c4`c+4`e4,,100'}[2 c4,,100][2 c4c4r4c8c8,,100]] Sub{'c4`c+4`e4,,100'}[2 c4,,100][3 c4c4r4c8c8,,100]v100} l4 v120[2 [2 `d+`d+,,90`d+,,100`d+,,90]`d+,,120`d+,,90r1^1: [2 `d+`d+,,90`d+,,100:`d+,,90][3 `d+12 v-20]] [3 `d+`d+,,90`d+,,100`d+,,90]l16 v100} STR DR06 = {Sub{Sub{'`c+`e'}[2 [4 c4,,127r4][3 c4,,127r4]] Sub{'`c+`e'} [8 c4,,127][6 c4,,127][8 c4,,127][3 c4,,127]r4^8c16,,127c16[3 c3,,127]} [4 [7 f+8,,100g+8,,50][2 f+,,100g+,,50] [5 f+8,,100g+8,,50]:[2 f+,,100g+,,50]][3 f+8,,100g+8,,50]} STR DR07 = {Sub{[16 c4,,120r4c4,,100r4]} Sub{[16 `d+4,,120`d+4,,100`d+4,,120`d+4,,100]} [16 [2 f+4,,100[3 f+12,,110]]]} STR DR08 = {Sub{v127 [3 '`c+1`e1'r1][2 '`c+2`e2'][4 '`c+4`e4'] [3 '`c+1`e1'r1][4 '`c+4`e4'][2 '`c+2`e2']} Sub{[16 [4 c4,,120]]} [16 [4 r8f+8,,120]]} トラック10 V(105) REV(0) CHO(80) M(0) q12 P(64) l16 o3 BR(12) p%(-2000) @33,90,1 DR01 DR02 DR03 DR04 DR05 DR06 DR07 DR03 DR04 DR06 DR07 DR08 //-------------------------------------------------------------------------------------------------- STR SD01 = {Sub{[2 '`c+4,,125`e4,,125'r1^1^2^4:v60r2[2 '`c+4`e4'v+20]v100]} [8 r4'"e4d+4e4,,120'r'"e,,80d+,,80e,,100'r8'"e4,,80d+4,,80e4,,120']} STR SD02 = {Sub{[2 '`c+4,,125`e4,,125'r2^4[3 r*1]][2 '`c+4,,125`e4,,125'r2^4]} [8 r4'"e4d+4e4,,120'r'"e,,80d+,,80e,,100'r8'"e4,,80d+4,,80e4,,120'] [3 '"e8,,60d+8,,60e8,,80''"e8d+8e8,,120':'"e8,,60d+8,,60e8,,80'] r4'"e4d+4e4,,120'`d,,127`c,,120b,,110g,,100Sub{'`c+4`e4'}b8,,110g8,,110} STR SD03 = {[2 Sub{'`c+,,125`e,,100'}[2 r2'"e4,,80d+4,,80e4,,120'r4]r4'"e4,,80d+4,,80e4,,120' v120[3 '`c+8`e8,,100'`d`cb:agf]r'`c+4^8`e4^8,,100'r4[2 r2'"e4,,80d+4,,80e4,,120'r4]] r2'"e4,,80d+4,,80e4,,120'[4 '"e,,80d+,,80e,,100']} STR SD04 = {Sub{'`c+`e'}[2 r1^1^1^2]Sub{'`c+`e'}[2 r1^1^1^2] v50[8 '"ed+e'v+10]v100} STR SD05 = {[15 r2'"e4,,80d+4,,80e4,,100'r4]v90[4 '"e12d+12e12'v-10[2 '"e12d+12e12']v+20]} STR SD06 = {Sub{v127 '`c+1`e1'[3 r1]'`c+1`e1'r1[3 '`c+2`e2']'`c+4`e4'[3 '`c+12`e12'] '`c+1`e1'[3 r1]'`c+1`e1'r1'`c+4`e4'r2'`c+4`e4'[2 '`c+2`e2']} [16 [2 r4'"e4d+4e4,,120']]} トラック11 V(120) REV(32) CHO(0) M(0) q14 P(64) l16 o3 BR(12) p%(-6000) @25,90,1 r1 RS08 SD01 SD02 SD03 SD04 SD05 SD01 SD02 SD04 SD05 SD06 //================================================================================================== //Solo(1)//トラックソロ。複数トラックで指定可能 //Mute(1)//トラックミュート。 この曲は自作のオリジナル曲であるか、または、作曲者の死後50年以上経過した著作権に問題がない曲であることを確認しましたか? いいえ。よく分かりません はい。著作権に問題ありません (←選択)