サクラトップ > 掲示板トップ > 投稿フォーム
曲の投稿にはユーザー登録が必要です。 曲 名 作 者 名前: パスワード: 転 載 許可しない 全て許可 メール連絡すれば可 許可しない (ゲームのBGMなど使いたい場合、許可するかどうかを指定。 サクラ本体への収録はあらかじめご承諾ください。) ゲーム制作サイト「Rmake」への転載(およびMP3変換)を許可する ジャンル ジャズ・フュージョン ポップス ハードロック・ヘヴィーメタル ヒップホップ クラシック 歌謡曲・演歌 J-POP ロック ブルース・カントリー ダンス・エレクトロニカ ワールド アニメ・ゲーム 日本の伝統音楽・芸能 オルタナティヴロック ソウル・R&B ジャズ・フュージョン ヒーリング・ニューエイジ キッズ・ファミリー 音 源 (パソコン内蔵音源、GS音源、GM音源など) 公開 公開する 削除する (公開を中止して削除するときには、この項目を変更します。) コメント 環境Jazz、第二段(?)です。 Jazz にあまりなじみのない方は、ちょっと意味不明感を感じるかも知れません。 曲データ(サクラから貼り付けます。) //------------------------------------------------------------------------------ // テキスト音楽「サクラ」音楽データ (dSakura.dll Version.2.36) //------------------------------------------------------------------------------ 曲名{"リディアン・セブンスの環境Jazz"} 作者{"メロン"} // 環境Jazz、第二段(?)です。 // Jazz にあまりなじみのない方は、ちょっと意味不明感を感じるかも知れません。 // スケールはリディアン、コードはすべてセブンスです。そのスケール上で // 乱数メロを出して、あとはそれを小節ごとにランダム転調(移調)しています。 Int L= 55 ;// Loops //------------------------------------------------------------------------------ 音源初期化Function RS(Array AR){Str A=AR( Random(SizeOf(AR)));A;}Str K={y64,0y64,66} Str PP={P=Random(128)}Function RS2(Array AR){Result = AR( Random( SizeOf(AR) ) );} Str R={[3v(RandomSelect(50,77,99))'egb-']v99}Str X7={TR=1P=32K@12If(Random(4)==0){ RS({v100[6b-6v-10]v100},{v100c4c+4c4g6c12},{v100c4d+4c4g6c12})}Else{l12 [12RS({o4},{o5}, {o6},{o7})v(RandomSelect(0,75,100,110))PP RS({c},{d-},{d},{e-},{e},{f},{f+},{g},{a-}, {a},{b-},{`c},{`d},{`e-})]}TR=2P=96l12[4RS(R,R,R,{r4},{},{rb-r},{ef+g},{re-6},{ cg-e-})]TR=3@33o3RS({c},{c},{e},{g})[3RS({c},{d-},{d},{e-},{e},{f},{f+},{g},{a-},{a}, {b-},{`c},{`d},{`e-})]TR=10l12UseKeyShift(0)[n36,4n37rRS({n37},{r})]r-1[n46,4[3RS({n42}, {n42},{n42},{n46})]]TR=99CH=10l12 IF(Time%(96*4*4)==0){r4[3RS({n43},{n47},{n50},{n49})] r4[3RS({n41},{n45},{n48},{n49})] }Else{r1}UseKeyShift(1)}[(L)TimeKey(Random(-6,6))X7] Function _FA(B){Include(fadeio.h);Time(Time-TimeBase*4*B)FadeoutAll(B);}_FA(10); この曲は自作のオリジナル曲であるか、または、作曲者の死後50年以上経過した著作権に問題がない曲であることを確認しましたか? いいえ。よく分かりません はい。著作権に問題ありません (←選択)