サクラトップ > 掲示板トップ > 投稿フォーム
曲の投稿にはユーザー登録が必要です。 曲 名 作 者 名前: パスワード: 転 載 許可しない 全て許可 メール連絡すれば可 許可しない (ゲームのBGMなど使いたい場合、許可するかどうかを指定。 サクラ本体への収録はあらかじめご承諾ください。) ゲーム制作サイト「Rmake」への転載(およびMP3変換)を許可する ジャンル アニメ・ゲーム ポップス ハードロック・ヘヴィーメタル ヒップホップ クラシック 歌謡曲・演歌 J-POP ロック ブルース・カントリー ダンス・エレクトロニカ ワールド アニメ・ゲーム 日本の伝統音楽・芸能 オルタナティヴロック ソウル・R&B ジャズ・フュージョン ヒーリング・ニューエイジ キッズ・ファミリー 音 源 (パソコン内蔵音源、GS音源、GM音源など) 公開 公開する 削除する (公開を中止して削除するときには、この項目を変更します。) コメント ◆なんかのイベント戦闘・・・だと思います。 ◆なるべくVSCかTW-Music2でお願いしたいところです。 ◆だんだんと昔の曲を投稿することになりそうです。 ◆というわけで、聞いてくださ〜い♪ 曲データ(サクラから貼り付けます。) 曲名{"紅蓮の双眸 -忘れえぬ妄執-"} 作者{"MAR"} Int R = 2 ; //リピート回数指定 /* 本来のタイトルに、無駄なサブタイトルをつけるのがなかなか面白いです。 制作時間 約2〜3時間 url : http://roo.to/mbf/ */ ResetGS(); /*------------------------------------------------------------------------------------------*/ Function TM(ti){Time(ti:1:0)} TimeSignature(4,4);TM(0) Function SHOKI(S1,S2,S3,S3A,S4,S5,S6,S7,S8,S9){ TR=S1;CH=S2;@(S3,S3A);P=S4;REV=S5;CHO=S6;M=S7;V=S8} // TR CH @ MSB PAN REV CHO M V SHOKI( 1, 1, 61,000, 80, 60, 0, 0,127) EP(127) y66,0 y94,0 y64,0 SHOKI( 2, 2, 61,000, 48, 60, 0, 0,104) EP(127) y66,0 y94,0 y64,0 SHOKI( 3, 3, 12,000, 96,120, 0, 0,100) EP(127) y66,0 y94,0 y64,0 SHOKI( 4, 4, 33,000, 64, 60, 0, 0,125) EP(127) y66,0 y94,0 y64,0 SHOKI( 5, 5, 45,000, 32, 90, 0, 0,113) EP(127) y66,0 y94,0 y64,0 SHOKI( 6, 6, 15,000, 62,120, 0, 0,106) EP(127) y66,0 y94,0 y64,127 SHOKI( 7, 7, 41,000, 48, 80, 0, 0,110) EP(127) y66,0 y94,0 y64,0 SHOKI( 8, 8, 41,000, 64, 80, 0, 0,110) EP(127) y66,0 y94,0 y64,0 SHOKI( 9, 9, 50,000, 64, 80, 0, 0,099) EP(127) y66,0 y94,0 y64,0 SHOKI( 11, 11, 49,000, 64, 60, 0, 0,110) EP(127) y66,0 y94,0 y64,0 SHOKI( 12, 12,120,000, 64, 60, 0, 0,127) EP(127) y66,0 y94,0 y64,0 Function PA(W,X,Y,Z){Sub{[(W)P(Random(X,Y))r(Z)]};} Function HAM(STR SA){Sub{Key=(MML(Key)+12);SA;Key=(MML(Key)-12)}SA} Function HAM2(STR SA){Sub{Key=(MML(Key)-12);SA;Key=(MML(Key)+12)}SA} Function HAM3(STR SA){Sub{Key=(MML(Key)-12)SA;Key=(MML(Key)+12)}Sub{Key=(MML(Key)+12);SA;Key=(MML(Key)-12)}SA} Function MDL(Str W,Int X,Int Y,Int T){Int Z=MML(v);Sub{[(Y) r(X)Sub{v(MML(v)-T);W}]};v(Z)W} Int FIR={2} /*-----------------------------------------------------------------------------------------*/ TR(10) CH(10) TM(FIR-1) @1 REV(127) $a={t(01) v110 'n40n38'}; $b={t(02) v100 'n35n36'}; $c={t(00) v110 n55}; $d={t(00) v090 n55}; $e={t(00) v070 n55}; $f={t(03) v110 n50}; $g={t(02) v110 n48}; $h={t(01) v110 n47}; $i={t(02) v110 n45}; $j={t(01) v110 n43}; $k={t(00) v110 n41}; $x={t(00) v110 'n57n49'}; $y={t(00) v110 n42}; $z={t(00) v110 n46}; $w={v_(-20)}; //PlayFrom(49:1:0) TM(FIR); [(R) Rhythm{l8 [3xrrrrrrr]rrrrrrxr [3xrrrrrrr]rrrrrrxr xrrrrrrr rrrrrrrr xrrrrrrr rrrrrrrr [3r1]rrrrrrxr [xrrrrrrr [7r1]] [4xrrrrrrr rrrrrr:rr] xr [4xrrrrrrr :r1]rrrrrrxx } ] TM(FIR-1);Tempo(200);r2;p(0);V(127);Tempo(127);Rhythm{l48 rrrrrr rrrrrr fghijk kjihgf} TM(FIR); [(R) Rhythm{ [3r1]l48;r2.fghghihijijk [3r1]l48;r2.kjijihjhghgf l8 [rrrrrr'fghi'r rrrrrr'hijk'r] [3r1]l48;r2.kjijihjhghgf [23r1] l48;r2.fghghihijijk l8;w [4l8fghihijk kjihihgl24hgf] }v_(0) ] TM(FIR); [(R) V(120);REV(80);Rhythm{l8 [7brarrrar] brarbbl24arraaa l8 [4brbbrrar] [4brarbrar] l16 [16brrrarrr barrarbr] [8brrrarar bbarbrar] [4brrrrrrr brrrarrr brrrrrrr brrr:arbb] bbl24aba } ] TM(FIR); [(R) Rhythm{l8 [8ccrccccc] l12[8ccddee] [8cddcdd] l16 [16ccdeedce eddedcde] [8edccddee ddcdecde] [4l8ccddeedd cddl16eeddccddee] } ] /*Int i = 0;rr FOR(i=81;i<=126;i++){n(i)} */ Key(3) TR(12) TM(FIR-1) v120 t(0) q100 o5;p(64); r2EP.T(0,128,!2)'cc+dd+ef'2 [(R) [3r1]o6 r2EP.T(0,128,!2)'cc+dd+ef'2 [3r1]o6 r2EP.T(0,128,!2)'cc+dd+ef'2 [7r1]o5 r4EP.T(0,128,!2.)'cc+dd+ef'2. [[7r1]o6 r2EP.T(0,128,!2)'cc+dd+ef'2] [4r1o6 r2EP.T(0,128,!2)'cc+dd+ef'2] [4r1o5 r4EP.T(0,128,!2.)'cc+dd+ef'2.] ] TR(11) TM(FIR) y111,127 v60 t(0) q100 [(R) HAM2({o6;l16;v.Random(40) [[eg+d+g+dg+c+g+] [d+g+dg+c+g+cg+] [eg+d+g+dg+c+g+] ebfbf+bgb g+bgbf+bfb] [6f+bgbg+bgb] [fbf+bgbf+b] [egfgf+gfg] [eg+fg+f+g+fg+] [faf+agaf+a] [fa+f+a+ga+f+a+] [12>l16g+gfd+c+ccc+d+fg] }) [8r1] ] TR(8) TM(FIR) v100 t(0) q40 [(R) o6;l16 [32r1] MDL({l16q40 c"g+cd+c"g+cd+ cd+g+>cd+cdfdcd+cdgd d+dc+^^^^^ cv_(MML(v_)-10)]v_(0) [4v_(MML(v_)-10)]v_(0) ] Str BAS={ [(R) [ '"ace'^^^^^^^ ^^^^^^^^ '"a+eg'^^^^^^^ ^^^^^^^^ '"ace'^^^^^^^ ^^^^^^^^ '"g+"be'^^^^^^^ ^^^^^^^^]v_(-20) '"f+"bd'^^^^^^^ ^^^^^^^^ '"f+"bd+'^^^^^^^ ^^^^^^^^ '"f+"bc+'^^^^^^^ ^^^^^^^^ '"d+"gc'^^^^^^^ ^^^^^^^^ '"e"g"a+'^^^^^^^ ^^^^^^^^ '"g"a+d+'^^^^^^^ ^^^^^^^^ '"acd+'^^^^^^^ ^^^^^^^^ '"bd+g'^^^^^^^ ^^^^^^^^v_(0) '"f"g+c'^^^^^^^ ^^^^^^^^ ^^^^^^^^ ^^^^^^^^ '"g"bd'^^^^^^^ ^^^^^^^^ ^^^^^^^^ ^^^^^^^^ '"g"bd+'^^^^^^^ ^^^^^^^^ ^^^^^^^^ ^^^^^^^^ '"g"bd'^^^^^^^ ^^^^^^^^ ^^^^^^^^ ^^^^^^^^ ['"f"g+c'^^^^^^^ ^^^^^^^^ ^^^^^^^^ ^^^^^^^^ '"g"bd'^^^^^^^ ^^^^^^^^ ^^^^^^^^ ^^^^^^^^ '"acd+'^^^^^^^ ^^^^^^^^ ^^^^^^^^ ^^^^^^^^: '"a+dg'^^^^^^^ ^^^^^^^^ '"a+df+'^^^^^^^ ^^^^^^^^] '"bdg'^^^^^^^ ^^^^^^^^ '"bdf+'^^^^^^^ ^^^^^^^^ '"acd+'^^^^^^^ ^^^^^^^^ ^^^^^^^^ ^^^^^^^^ '"g"a+d'^^^^^^^ ^^^^^^^^ ^^^^^^^^ ^^^^^^^^ '"f"g+c'^^^^^^^ ^^^^^^^^ ^^^^^^^^ ^^^^^^^^ '"d+"g"a+'^^^^^^^ ^^^^^^^^ ^^^^^^^^ ^^^^^^^^ ] } TR(2) TM(FIR) v120 t(0) l16 q100 o4;BAS TR(9) TM(FIR) v120 t(0) l16 q100 o4;BAS TR(1) TM(FIR) v127 t(0) l16 q100 [(R) Tempo(127);HAM({o4; e^^^^^^^ g^^f^^d^ e^^^^^^^ a+^^g^^d^ e^^^^^^^ f^^g^^a^ g+^^^^^^^ d^^^f^^^ e^^^^^^^ g^^f^^d^ e^^^^^^^ a+^^g^^d^ e^^^^^^^ f^^g^^a^ g+^^^^^^^ a^^^a+^^^ b^^^^^^^ ^^^^f+^^^ >d+^^^^^^^ ^^^^c^^^< b^^^^^^^ ^^^^a+^^^ g^^^^^^^ ^^^^f^^^ e^^^^^^^ f^^^d^f^ e^^^^^f^ ^^^^g^^^ g+^^^^^a^ ^^^^b^^^ a+^^^^^b^ ^^^^f+^^^ f^^^^^^^ ^^^^g^^^ g+^^^^^^^ >c^^^^^^^v_(-10) d^^^^^^^ ^^^^e^^^ f^^^^^^^ d^^^^^^^ d+^^^^^^^ ^^^^f^^^ g^^^^^^^ d+^^^^^^^ d^^^^^^^ ^^^^c^^^v_(0) c^^^ d^^^^^^^ ^^^^^^^^ v_(-20) c^^^^^^^ ^^^^d+^^^ c^^^^^^^ この曲は自作のオリジナル曲であるか、または、作曲者の死後50年以上経過した著作権に問題がない曲であることを確認しましたか? いいえ。よく分かりません はい。著作権に問題ありません (←選択)