サクラトップ > 掲示板トップ > 投稿フォーム

サクラ曲掲示板 Part 5 - 投稿フォーム - 663

曲の投稿にはユーザー登録が必要です。

曲　名

作　者名前: パスワード:

転　載
（ゲームのBGMなど使いたい場合、許可するかどうかを指定。
サクラ本体への収録はあらかじめご承諾ください。）
ゲーム制作サイト「Rmake」への転載(およびMP3変換)を許可する

ジャンル

音　源
（パソコン内蔵音源、GS音源、GM音源など）

公開
（公開を中止して削除するときには、この項目を変更します。）

コメント
◆ラストダンジョン戦闘的ノリな感じでいきました。 ◆なるべくVSCかTW-Music2でお願いしたいところです。 ◆結構丁寧に作りました。といっても制作時間が。 ◆というわけで、聞いてくださ～い♪ ◆MP3→http://www5f.biglobe.ne.jp/~marsweb/emion.mp3

曲データ（サクラから貼り付けます。）
曲名{"EMION -before the end of the story-"} 作者{"MAR"} Int R = 2 ; /* 通常戦闘ではないかと・・・。どんなところで使えるんでしょうね。制作時間　約3～4時間 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, 81,000, 72, 90, 0, 0,100) EP(127) SHOKI( 2, 2, 82,000, 64, 90, 0, 0,100) EP(127) SHOKI( 3, 3, 81,000, 56, 90, 0, 0,100) EP(127) SHOKI( 4, 4, 5,000, 32,120, 0, 0,100) EP(127) SHOKI( 5, 5, 17,000, 40,120, 0, 0,110) EP(127) SHOKI( 6, 6, 50,000, 72, 90, 0, 0,100) EP(127) SHOKI( 7, 7, 37,000, 64, 90, 0, 0,110) EP(127) SHOKI( 8, 8, 57,000, 64, 90, 0, 0,120) EP(127) SHOKI( 9, 9, 49,000, 64, 90, 0, 0,110) EP(127) SHOKI( 11, 11, 61,000, 80, 90, 0, 0,110) EP(127) SHOKI( 12, 12, 33,000, 64, 90, 0, 0,110) EP(127) SHOKI( 13, 13,120,000, 64, 0, 0, 0,127) EP(127) 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) l16 @1 V(100) $a={t(2) v100 n38}; $b={t(0) v090 'n35n36'}; $c={t(1) v085 n42}; $d={t(2) v085 n46}; $e={t(0) v090 n55}; $f={t(3) v110 n50}; $g={t(2) v110 n48}; $h={t(1) v110 n47}; $i={t(2) v110 n45}; $j={t(1) v110 n43}; $k={t(0) v110 n41}; $w={t(2) v100 n57}; $x={t(0) v100 n49}; TM(FIR); [(R) Rhythm{ l24 [4r1][4r1] r-4kjihgf [4r1]l48 r-4fghghihijijk [4r1] r-4kjijihihghgf [4r1] r-4kjihgffghijk [4r1]l24 r-4kjihgf [6r1]l32 r-2fghghi hijk kjihgf [4r1]l48 r-4kjihgffghijk} ] TM(FIR); [(R) Rhythm{l16 [8erererer][8errrerrr] [8erererrr][8erererer] [8erererer][8erererer] [4errrrrer errrerer] ererrrrr errrerrr errrrrer erererer [4errrerer errrerer] [16ererere:r]r} ] TM(FIR); [(R) Rhythm{l16 wr-16 [4r1][4r1] [8r1]r-8xrwr-16 [4r1]r-8wrxr-16 [4r1]wr-16 [6r1]r-8l32wwwwl16xr-16 [12r1]} ] TM(FIR); [(R) Rhythm{l16 [4drccdccc drccdccc] drrrccrr drrrrrrr rrrrdrrr drccddcc drrrdrcc drrrdrcc drrrdccc dcccdddc [4drrrdccc drrrrrrr] [4drccdccc drrrdrcc] [8drccdccc drccdrrc] [4drrrdccc drrrrrrr] [dccccrrr drrrdrcc] [4drrrdccc drrcdrcc] [8dcdcdcdc drdcdcd:r]r} ] TM(FIR); [(R) Rhythm{l16 [15rrar]rrra [8rrrrar:rr]ar [4r1] [7rrrrarrr] rrrrarl24aaal16 [15rrar]rraa [15rrar]raar [8rrrrarrr] [7rrar]raar [8rrrrarrr] [[15rrar]r:raa]aar} ] TM(FIR); [(R) Rhythm{l16 [7brrrbbrr] brrrbrl24bbbl16 [4brrrrrrr bbrrrr:rr]l24rbbl16 [4brrrrrrr bbrrrrrr] [7brrrbbrr] brrrbrbb [7brrrbbrr] brrrbrl24bbrl16 [8brrrbrrr brbrrrrr] [4brrr:bbrr]bbl24bbbl16 [4brrrrrrr bbrrrrrr] [[7brrrbbrr] brrrbrl24bbbl16]} ] /*Int i = 0;rr FOR(i=81;i<=126;i++){n(i)} */ //PlayFrom(44:1:0) Key(2) TR(13) o5 TM(FIR) t(0) l16 q100 [(R) [29r1];r2;v127 EP.T(60,127,!2)'cc+dd+eff+gg+aa+b'2 [12r1] ] Str D ={"g"bd } Str D2={"g"bd+} Str E ={"a ce } Str F ={"a cf } Str F3={"a d+f+} Str F2={"a cf+} Str G ={"b dg } Str G2={"b dg+} Str B ={ d gb } TR(11) o4 TM(FIR) t(0) l16 q100 [(R) l2;@61;o4;v90 ['E''F''F2''D'] l16;@5;o6;v60 v.Random(30) "aeae"e"aea "ad+ad+"d+"ad+a "adad"d"ada "ac+ac+"c+"ac+a "adad"d"ada "af+af+"f+"af+a "ad+ad+"d+"ad+a "abab"b"aba l2;@61;o4;v90; v.Random(0) 'E''F''F3''D' 'G''G2''B''F2' 'ce''df+' 'd+f+''"bd+' 'd+g''d+g+' 'egb''"a+d+f+' [4'E''F''F2''D'] '"bd+f+''"bd+g' '"bd+g+''"bd+a' 'd+g+a+''d+g+b' 'd+g+`c''d+g+`c+' '"fcf''"g+cg+''"ada''"af+a' '"ace''"beg' '"bdg''cfa' 'cea''"bdg' '"acf''"g+"be'[ '"ace'^'"g"bd'^ '"acf'^'"g"be'^] ] TR(9) o7 TM(FIR) v110 t(0) l16 q100 r-1;@56 ['ce']rr['cf']rr['cf+']rr['db']rr [(R) o5;@49;v80 "acecaece "acfcafcf "acf+caf+cf+ "g+ce"cg+ece "acecaece "acfcafcf "acf+caf+cf+ "g+ce"cg+ece q50;@41;v100 aerarrar ad+rarrar adrarrar ac+rarrar defarrar def+arrar d+ef+arrar q200l32"bdef+l24ab>f+l32ed<bagf+dr l16;q50 cea>cec<ae dea>ded<ae df+b>df+d<bf+ "bd"bf+"bbaf+ ge"begbge g+e"beg+bg+e abdbebab agf+ed+ef+g cea>cec<ae dea>ded<ae d+f+b>d+f+d+<bf+ "bd"bf+"bbaf+ ge"begbge g+e"beg+bg+e abdbebab agf+ed+ef+g q100;@49;v80[ "acecaece "acfcafcf "acf+caf+cf+ "g+ce"cg+ece "acecaece "acfcafcf "acf+caf+cf+ "g+ce"cg+ece] [4r1] q50;@41;v100 'fa'rr'f+a'rr'da'r 'ga'rr'f+a'rr'ea'r 'da'rr'ea'rr'fa'r 'ea'rr'da'rr'ea'r q100;@49;v80 cdefga`ca bagfedc"a defgab`db `cbagfed"b efgab>cec dc<bagfec debagaba g+ag+fedc"b [[4aece] [4gd"bd] [4fc"ac] [gab>dgd<bg]] ] Str BAS={ r-1 e^^^f^^^ f+^^^b^^^ [(R) "a^^e^^c^ "a^^f^^c^ "a^^f+^^c^ crdedcr"b "a^^e^^c^ "a^^f^^c^ "a^^f+^^c^ f+cedcdeg e^cd^fgf d+^cd^fgf d^cd^fgd c+^"ac+^dec+ d^ad^efg f^df^efg f+^ef+^gg+g b^ab^aga c^^e^^c^ d^^f^^d^ d+^^f^^d+^ "b^^d+^^"b^ g^^b^^g^ g+^^b^^g+^ b^^a^^g^ f+ed+"bgf+ed+ c^^e^^c^ d^^f+^^d^ d+^^f+^^d+^ "b^^d+^^"b^ g^^b^^g^ g+^^b^^g+^ b^^a^^g^ f+ed+"bgf+ed+ [ "a^^e^^c^ "a^^f^^c^ "a^^f+^^c^ crdedcr"b "a^^e^^c^ "a^^f^^c^ "a^^f+^^c^ f+cedcdeg] "b^^d+^^"b^ d+^^g^^d+^ c+^^g+^^c+^ d+^^a^^d+^ c^^g+^^c^ c+^^g+^^c+^ f^^g+^^f^ d+c+cg+gfd+c f^^c^^f^ g+^^c^^g+^ d^^"a^^d^ TempoChange(130,120,!4.) f+^^"a^^ TempoChange(120,80,!16) f+^ TempoChange(120,130,!1) "a^ce^cde "b^df^"bde d^fa^def c^de^cde e^de^fed c"acdedc"a "b^^c^^d^ edcdedc"b [ "a^^"b^^d^ e^^c^^"b^ "g^^"b^^c^ d^^"b^^"g^ "a^^c^^e^ f^^d^^"b^ c^^e^^c^ :<b^^a^^g^>] "b^^c^^d^ ] } TR(7) o3 TM(FIR) v110 t(0) l16 q100 BAS TR(12) o3 TM(FIR) v100 t(0) l16 q100 BAS TR(8) o4 TM(FIR) v90 t(0) l16 q100 r-1;p(64) HAM({['ce']rr['cf']rr['cf+']rredcd}) p(64) [(R) "acrercrd ^ecdec"bd e^fdcdef+ gar`c^bag agrercde fedcdefe cdre^fga gagfefgg+ p.T(64,64,!8,64,32,!16) a^^rrrrr rrrrrrrr [11r1]p(64)[ "acrercrd ^ecdec"bd e^fdcdef+ gar`c^bag agrercde fedcdefe cdre^fga gagfefgg+] p.T(64,64,!8,64,32,!16) a^^rrrrr rrrrrrrr p(64)[9r1][ "acrerar;p.T(64,64,!4..,64,32,!16)`c ^^^^^^^rp(64) "g"brdrgr;p.T(64,64,!4..,64,32,!16)b ^^^^^^^rp(64) "f"arcrfr;p.T(64,64,!4..,64,32,!16)a ^^^^^^^rp(64) garbr`drb ^agfede"b] ] TR(6) o5 TM(FIR) v120 t(0) l16 q100 [(R)@50 [8r1]o6 c^^^^^^^ d^^^^^^^ d+^^^^^^^ "b^^^^^^^ g^^^^^^^ g+^^^^^^^ b^^^^^^^ f+^^^^^^^ 'ce'^^^^^^^ 'df+'^^^^^^^ 'd+f+'^^^^^^^'"bd+'^^^^^^^ 'd+g'^^^^^^^'d+g+'^^^^^^^ 'egb'^^^^^^^'"a+d+f+'^^^^^^^ [8r1] '"bd+f+'2'"bd+g'2 '"bd+g+'2'"bd+a'2 'd+g+a+'2'd+g+b'2 'd+g+`c'2'd+g+`c+'2 [4r-1] "g+2"a2c+2f2 c2c+2f2f+2 [2r1]@49;HAM({ v_(20)>c^^d^^c^ ^v_(00)"b^^^^^^ v_(20)d^^e^^d^ ^v_(00)c^^^^^^ v_(15)e^^f^^e^ v_(10)e^^d^^c^ v_(05)<b^^a^^b^ v_(00)g+^^a^^b^ [a^^^^^^^ ^^^^^^^^ g^^^^^^^ ^^^^^^^^ f^^^^^^^ ^^^^^^^^: e^^d^^c^ ^^^^d^<b^] g^^a^^b^ >c^^d^^"b^}) ] Str ORG={ [(R) [4r1] e^^c^^e^ d+^^"b^^d+^ d^^"b^^d^ c+^^"a^^c+^ d^^e^^f^ f+^^d+^^f+^ g^^g+^^a^ b^^f+^^b^ [34r1] ] } Str SYNTH={l16;Tempo(130); ['ce']rr['cf']rr['cf+']rredcd y111,127 [(R) edce^ce^ f^ef^dce f+af+ed+"bce gabf+gad+f+ efga^geg fecafgce f+d+f+"bcdec dageb^^^ [12r1][ edce^ce^ f^ef^dce f+af+ed+"bce gabf+gad+f+ efga^geg fecafgce f+d+f+"bcdec :dagedcde [4r-1]<;v_(-14) c^^"a^^c^ c^^^^^"ac d+^^"a^^d+^ "b^^d+^^f+^ c^^"a^^c^ c^^^^^"ac d+^^"a^^d+^ "b^^^d+^^^>;v_(0)] 'd+b`d+'^^^^^^^ [4r-1]<;v_(-14) c^^"a^^c^ c^^^^^"ac d+^^"a^^d+^ "b^^d+^^f+^ c^^"a^^c^ c^^^^^"ac d+^^"a^^d+^ "b&&b^^^^^^>;v_(0) [4r1] fc^f+c^g+c ac^g+c^d+c d"a^e"a^g"a f+"a^d+"a^b"a [4r1] [8r1] ] } TR(4) o6 TM(FIR) v100 t(0) l16 q100 ORG TR(5) o6 TM(FIR) v100 t(0) l16 q100 ORG TR(1) o6 TM(FIR-1) v90 t(0) q100 SYNTH TR(2) o6 TM(FIR-1) v90 t(0) q100 SYNTH TR(3) o6 TM(FIR-1) v90 t(0) q100 SYNTH

この曲は自作のオリジナル曲であるか、または、作曲者の死後50年以上経過した著作権に問題がない曲であることを確認しましたか？
（←選択）

サクラトップ > 掲示板トップ > 投稿フォーム