サクラトップ > 掲示板トップ > 投稿フォーム
曲の投稿にはユーザー登録が必要です。 曲 名 作 者 名前: パスワード: 転 載 許可しない 全て許可 メール連絡すれば可 許可しない (ゲームのBGMなど使いたい場合、許可するかどうかを指定。 サクラ本体への収録はあらかじめご承諾ください。) ゲーム制作サイト「Rmake」への転載(およびMP3変換)を許可する ジャンル アニメ・ゲーム ポップス ハードロック・ヘヴィーメタル ヒップホップ クラシック 歌謡曲・演歌 J-POP ロック ブルース・カントリー ダンス・エレクトロニカ ワールド アニメ・ゲーム 日本の伝統音楽・芸能 オルタナティヴロック ソウル・R&B ジャズ・フュージョン ヒーリング・ニューエイジ キッズ・ファミリー 音 源 (パソコン内蔵音源、GS音源、GM音源など) 公開 公開する 削除する (公開を中止して削除するときには、この項目を変更します。) コメント 今回は珍しくループ非対応です。 音量小さめです。悲しげです。エンディングのつもりです。 では、聞いてください。 曲データ(サクラから貼り付けます。) 曲名{"Half Moon"} 作者{"MAR"} ResetGS(); /* */ /*------------------------------------------------------------------------------------------*/ Function TM(ti){Time(ti:1:0)} TimeSignature(4,4);Tempo(200) 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, 1,000, 72,127, 0, 0,120) EP(127) y66,0 y94,0 y64,127 SHOKI( 2, 2, 1,000, 56,127, 0, 0,100) EP(127) y66,0 y94,0 y64,127 SHOKI( 3, 3, 74,000, 48,100, 0, 0,090) EP(127) y66,0 y94,0 y64,0 SHOKI( 4, 4, 50,000, 48,100, 0, 0,110) EP(127) y66,0 y94,0 y64,0 SHOKI( 5, 5, 41,000, 32,100, 0, 0,095) EP(127) y66,0 y94,0 y64,0 SHOKI( 6, 6, 41,000, 32,100, 0, 0,095) EP(127) y66,0 y94,0 y64,0 SHOKI( 7, 7, 36,000, 64,100, 0, 0,095) EP(127) y66,0 y94,0 y64,0 SHOKI( 8, 8, 50,000, 68,100, 0, 0,095) EP(127) y66,0 y94,0 y64,0 SHOKI( 9, 9, 52,000, 68,100, 0, 0,095) EP(127) y66,0 y94,0 y64,0 SHOKI( 11, 11, 75,000, 76,100, 0, 0,095) EP(127) y66,0 y94,0 y64,0 SHOKI( 12, 12, 80,000, 76,100, 0, 0,095) 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 V(70) REV(127) $a={t(01) v080 n55}; TM(FIR);Rhythm{l16} /*Int i = 0;rr FOR(i=81;i<=126;i++){n(i)} */ Key(1) Str T={t.N(0,2)} Function DI(Str W){v_(0) IF(TR==5){EP.T(127,40,!2);W} IF(TR==6){EP.T(40,127,!4);>>;W;<<} EP(127);v_(-20)} TR(12) TM(FIR) v80 t(0) q100 [4r1];p(66);l32;o6;@80 TR(11) TM(FIR) v80 t(0) q100 [4r1];p(66);l32;o6; f^d^f^a^ ^^`c^b^a^ g^fed^c^ d^e^f^g^ d^e^f^g^ d^f^a^b^ `c^b^a^g^ l48q120fgfefededcdcq100 l32d^^f^^a^ `c^^b^^a^ g^^f^^e^ f^^e^^c^ "a^^^"b^^^ c^^^d^^^ e^^^^^c^ "b^^^d.^^r64 @47;<<;Tempo(39);y64,127; HAM({l32;v_(-13) e^cdefga >edccdedef gfedefdf edcdefdf edcdefdf edcdefdf edcdefde fedefgeg fedefgef gfedccdefgab`c<}) @75;Tempo(42);y64,0 Str BACK={ [4r1];p(66);l8; '"f"ad'^^^ '"f"ac'^^^ '"f"ad'^^^ '"g"be'^^^ '"ace'^^^ '"g"be'^^^ '"f"ac'^^^ '"g"bd'^^^ '"ace'^^^ '"g"be'^^^ '"f"ac'^^^ '"g"bd'^^^ '"ace'^^^ '"g"bd'^^^ '"f"ac'^^^ '"g"be'^^^ '"f"ac'^^^ '"g"bd'^^^ '"e"g+c'^^^ '"g+"be'^^^ '"f"g+c'^^^ '"g"a+d'^^^ '"g"a+d+'^^^'"gcd+'^^^ EP.T(127,100,!2.,100,0,!4) '"acf'^^^ ^^^^ } TR(8) TM(FIR) v60 t(0) q100 o6;BACK TR(9) TM(FIR) v60 t(0) q100 EP.T(20,127,384*8) o5;BACK TR(7) TM(FIR) v60 t(0) q100 [4r1]o3;l16;p(66) r-4;EP.T(0,127,!4);c^^^ d^^^^^^^ c^^^^^^^ d^^^^^^^ e^^^^^^^ a^^^^^^^ e^^^^^^^ c^^^^^^^ d^^^^^^^ e^^^^^^^ d^^^^^^^ c^^^^^^^ e^^^^^d^ e^^^^^^^ d^^^^^^^ f^^^e^^^ g^^^^^^^ f^^^^^^^ e^^^^^^^ g+^^^^^^^ e^^^^^^^ f^^^^^^^ g^^^^^^^ g+^^^^^^^ a+^^^^^^^ Str VV={o5;l32;[12r1];v_(-20);p(66) f^^^^^ef d^^^>d^^^ c^^^^^e^^^^^c^ d^^^^^e^ c^^^d^^^ e^^^^^^^ d^^e^^f^ e^^^^^f^ d^^^g^^^ e^^^^^d^ e^^^^^^^ f^^^^^f^ f^^e^^d^ g^^^^^^^ e^^^^^^^ [2r1]EP.T(80,128,!1^1) f^^^^^g+^ ^^^^a+^^^ g^^^^^a+^ ^^^^>c^^^ c+^^^^^c^ ^^^^^^^^ c+^^^^^d+^ ^^^^f^g^ EP.T(127,100,!2.,100,0,!4) f^^^^^^^ ^^^^^^^^ ^^^^^^^^ ^^^^^^^^ r1 }) TR(3) TM(FIR) v90 t(0) l16 q100 o7;p(66);[4r1] d"ada^fga ga32g32fe f48g48f48l32edcdec d^^^^^ef d^^^a^^^ `c^^^^^b`c b^^^a^g^ a^^^^^e^ a^>e^d^c^< b^^^^^ag e^^^^^d^ c^^^d^^^ f^^^e^^^ g^^^^^b^ g^^^^^^^ [4r1] TR(2) TM(FIR) v100 t(0) l16 q100 o4;t_(1);p(66) t(0)Sub{aea>cded"b} t(2)ec^^b^ge t(0)Sub{cc' t(0)Sub{edc dedcce t(0)c^^dc^"a^ [10r1]l8;t.N(0,3,5);EP.T(50,128,!1^1) '"f"g+c'^^^ '"g"a+d'^^^ '"g"a+d+'^^^'"gcd+'^^^ l64;<<;t(0) fa>cfga>ce fga>cefga TR(1) TM(FIR) v100 t(0) l16 q100 o6r-8Tempo(42);p(66) eg arr`cbara errderd"a c24"a24c24eagdfg t(0) Sub{erararge} t(2) ar>crd"bc24d24e24 t(0) Sub{d"adefgfd}< t(2) fdfgl24fdedfgl16> t(0) Sub{c"aaed"a"a+c}< t(2) ge`ecagfe t(0) Sub{a+f>d"afede}< t(2) fdfdl48aa+a l32gfl24efel16> t(0) Sub{drargrfe}< t(2) frdrl24fgagfe [10r1]l16;EP.T(0,128,!1^1) fcfgfgfg fcfgfgfg fcfg+gg+gg+ gcgg+a+ga+g //PlayFrom(17:1:0) この曲は自作のオリジナル曲であるか、または、作曲者の死後50年以上経過した著作権に問題がない曲であることを確認しましたか? いいえ。よく分かりません はい。著作権に問題ありません (←選択)