サクラトップ > 掲示板トップ > 投稿フォーム
曲の投稿にはユーザー登録が必要です。 曲 名 作 者 名前: パスワード: 転 載 許可しない 全て許可 メール連絡すれば可 許可しない (ゲームのBGMなど使いたい場合、許可するかどうかを指定。 サクラ本体への収録はあらかじめご承諾ください。) ゲーム制作サイト「Rmake」への転載(およびMP3変換)を許可する ジャンル ジャズ・フュージョン ポップス ハードロック・ヘヴィーメタル ヒップホップ クラシック 歌謡曲・演歌 J-POP ロック ブルース・カントリー ダンス・エレクトロニカ ワールド アニメ・ゲーム 日本の伝統音楽・芸能 オルタナティヴロック ソウル・R&B ジャズ・フュージョン ヒーリング・ニューエイジ キッズ・ファミリー 音 源 (パソコン内蔵音源、GS音源、GM音源など) 公開 公開する 削除する (公開を中止して削除するときには、この項目を変更します。) コメント 前回、ちょっと簡単過ぎたので、多少普通の感じのものをと・・。 以前作りかけてた物ですが、これ以上手を加える戦意消失・・ってことでアップ。HydroyS さんの、ご報告、ありがとうございました。早速修正しました。 曲データ(サクラから貼り付けます。) //------------------------------------------------------------------------------ // テキスト音楽「サクラ」音楽データ (dSakura.dll Version.2.36) //------------------------------------------------------------------------------ 曲名{"月のダンス"} 作者{"メロン"} // 前回、ちょっと簡単過ぎたので、多少普通の感じのものをと・・。 // 以前作りかけてた物ですが、これ以上手を加える戦意消失・・ってことでアップ。 // HydroyS さんの、ご報告、ありがとうございました。早速修正しました。 //------------------------------------------------------------------------------ 音源初期化Tempo = 144 Function RS2(Array AR){Result = AR( Random( SizeOf(AR) ) );} Function RS(Array AR){Str A = AR( Random( SizeOf(AR) ) );A;} //Str Dmadd9 Function Dmadd9(Str L){ Str H={'d*e*f*a*'}; H=H+L; H;} Include(chord2.h);Str L={l.N(!4,!6,!4,!12,!6,!12)} Function Q(Str C){ l12 [12 v(RandomSelect(50,80)) C]}Str Z={< [8r1]r4 [ega`d]>r4[b-age] r6 c+2d2 r2r6g2f4 "b-2 r2+12 e-6g-4a-12 ra- b+4 b2+12 r1} Str AA={ TR=1 q99 l12 @67M=55 Z TR=11q99 l12 @49M=55 Z TR=16 P=96 o7v66 @12 [L ee"baed ee"b-a-ed- dd"adef RS({f1},{d1},{b-1}) L e-e-RS({"b-},{g})a-e-d ccRS({a-},{c})aee- ffdfeRS({f},{"b-}) RS({"a1},{"b1},{f+1})] TR=2 P=32 q99 l1 @1[Q(Em7) Q(Apdim)Q(Dmadd9)Q(Bb7)Q(Ebm7)Q(AbM7)Q(BbM7)Q(B7)] TR=12P=96 q99 l1 @1 V=66 o4[Q(Em7)Q(Apdim)Q(Dmadd9)Q(Bb7)Q(Ebm7)Q(AbM7)Q(BbM7)Q(B7)] TR=4q99@5 l1 @90v50l1 [Em7 Apdim Dmadd9 Bb7 Ebm7 AbM7 BbM7 B7] TR=3@33o3 [4defg12g+12b12 agfe dccd] TR=10 [8 [RS({n36},{n36},{n36},{[3n(RandomSelect(36,43,47,1,1)),12]}) RS({n38},{n38}, {n38},{[3n(RandomSelect(38,1,1)),12]})] r-1[n46,n46,6 n(RandomSelect(42,46,42,46, 49))12]] [8 [n36n38]r-1[n46,n42,6n42,12]] } [AA] Str Z2={e-2+6 c1b-a-g- a-6f12d-4 frfa-b`c r6g+bg+r6d"br6} TR=1 Z2 TR=11 Z2 TR=2 v100 q99 l1 @1 r6 EbM7 Abm7 Db7 Gaug r-6 TR=12P=96 q99 l1 @1 V=66 o4 r6 EbM7 Abm7 Db7 Gaug r-6 TR=16[4r1] TR=4 EbM7 Abm7 Db7 Gaug TR=3@33o3 [1defg12g+12b12 agfe dccd] TR=10 [8'n36n46'2] AA Str Z3={ [4af+e] "a"a ff+faa-abb+baa-a a-1b1} TR=1 Z3 TR=11 Z3 TR=2v100 q99 l12 @1 r6 Am6(4)Am6(12)r6 Am6(4+12) r6 Dm6(4)Dm6(12)r6 Dm6(4+12) r6 Fm6(4)Fm6(12)r6 Fm6(4+12) r6 Bdim(4)Bdim(12)r6 Bdim(4+12) TR=16[4r1] TR=4 Am6 Dm6 Fm6 Bdim TR=3@33o3 [1defg12g+12b12 agfe dccd] TR=10 [4 [n36n38]r-1[n46,n42,6n42,12]] AA Function _FA(B){Include(fadeio.h);Time(Time-TimeBase*4*B)FadeoutAll(B);}_FA(8); この曲は自作のオリジナル曲であるか、または、作曲者の死後50年以上経過した著作権に問題がない曲であることを確認しましたか? いいえ。よく分かりません はい。著作権に問題ありません (←選択)