サクラトップ > 掲示板トップ > 投稿フォーム
曲の投稿にはユーザー登録が必要です。 曲 名 作 者 名前: パスワード: 転 載 許可しない 全て許可 メール連絡すれば可 許可しない (ゲームのBGMなど使いたい場合、許可するかどうかを指定。 サクラ本体への収録はあらかじめご承諾ください。) ゲーム制作サイト「Rmake」への転載(およびMP3変換)を許可する ジャンル ジャズ・フュージョン ポップス ハードロック・ヘヴィーメタル ヒップホップ クラシック 歌謡曲・演歌 J-POP ロック ブルース・カントリー ダンス・エレクトロニカ ワールド アニメ・ゲーム 日本の伝統音楽・芸能 オルタナティヴロック ソウル・R&B ジャズ・フュージョン ヒーリング・ニューエイジ キッズ・ファミリー 音 源 (パソコン内蔵音源、GS音源、GM音源など) 公開 公開する 削除する (公開を中止して削除するときには、この項目を変更します。) コメント 先日までのは、コード・トーンばかりが出る感じでしたが、今回は、隣接ノートが出るようにしてみました。 曲データ(サクラから貼り付けます。) //------------------------------------------------------------------------------ // テキスト音楽「サクラ」音楽データ (dSakura.dll Version.2.36) //------------------------------------------------------------------------------ 曲名{"お隣のサックス"} 作者{"メロン"} // 先日までのは、コード・トーンばかりが出る感じでしたが、 // 今回は、隣接ノートが出るようにしてみました。 Int L= 5 ;// お好きにどうぞ。。 //------------------------------------------------------------------------------ 音源初期化Tempo=144Include(chord2.h);Function RS2(Array R){Result=R(Random(SizeOf(R)));} Function RS(Array AR){Str A=AR(Random(SizeOf(AR)));A;}Str Q=RS2({c},{e},{g}) Function Z(Str A,D){Str R; If(A=={""b}){ R =RS2({"b},{c})} If(A=={"c}){ R =RS2({"b},{d})} If(A=={"d}){ R =RS2({"c},{"e})} If(A=={"e}){ R =RS2({"d},{"f})} If(A=={"f}){ R =RS2({"e},{"g})} If(A=={"g}){ R =RS2({"f},{"a})} If(A=={"a}){ R =RS2({"g},{"b})} If(A=={"b}){ R =RS2({"a},{c})} If(A=={c}){ R =RS2({"b},{d})} If(A=={d}){ R =RS2({c},{e})} If(A=={e}){ R =RS2({d},{f})} If(A=={f}){ R =RS2({e},{g})} If(A=={g}){ R =RS2({f},{a})} If(A=={a}){ R =RS2({g},{b})} If(A=={b}){ R =RS2({a},{`c})} If(A=={`c}){ R =RS2({b},{`d})} If(A=={`d}){ R =RS2({`c},{`e})} If(A=={`e}){ R =RS2({`d},{`f})} If(A=={`f}){ R =RS2({`e},{`g})} If(A=={`g}){ R =RS2({`f},{`a})} If(A=={`a}){ R =RS2({`g},{`b})} If(A=={`b}){ R =RS2({`a},{``c})} If(A=={``c}){ R =RS2({b},{c})} Result = R;} [(L)TR=1V=111@66;l16 q99 [8 [16 RS(,,{v0}) Q Q=Z(Q) v(Random(80,122))]] TR=2q100 v70 @80@51 l1 Am7 Dm7 l2 Ab7 G7 l1 Cpdim FM7 l2 Gbm7 B7 l1 Bm7b5 l2 F7 E7 l1 TR=3@33o3 [8[4 Q Q=Z(Q) v(Random(80,122))]]TR=10 [8 [n36n38]r-1[8n42,8]]] TR=1ara`c brb>d crcd ef+g+a16+1TR=2V=111Am Am TR=3V=111l16ara`c brb>d crcd ef+g+a16+1 TR=10[3'n36n38n46']n36,8 n49,1 この曲は自作のオリジナル曲であるか、または、作曲者の死後50年以上経過した著作権に問題がない曲であることを確認しましたか? いいえ。よく分かりません はい。著作権に問題ありません (←選択)