サクラトップ > 掲示板トップ > 投稿フォーム
曲の投稿にはユーザー登録が必要です。 曲 名 作 者 名前: パスワード: 転 載 許可しない 全て許可 メール連絡すれば可 許可しない (ゲームのBGMなど使いたい場合、許可するかどうかを指定。 サクラ本体への収録はあらかじめご承諾ください。) ゲーム制作サイト「Rmake」への転載(およびMP3変換)を許可する ジャンル ジャズ・フュージョン ポップス ハードロック・ヘヴィーメタル ヒップホップ クラシック 歌謡曲・演歌 J-POP ロック ブルース・カントリー ダンス・エレクトロニカ ワールド アニメ・ゲーム 日本の伝統音楽・芸能 オルタナティヴロック ソウル・R&B ジャズ・フュージョン ヒーリング・ニューエイジ キッズ・ファミリー 音 源 (パソコン内蔵音源、GS音源、GM音源など) 公開 公開する 削除する (公開を中止して削除するときには、この項目を変更します。) コメント かなり手抜きですが、ギターが話題になってましたので、ギターの雰囲気を・・と作ってみました。 曲データ(サクラから貼り付けます。) //------------------------------------------------------------------------------ // テキスト音楽「サクラ」音楽データ (dSakura.dll Version.2.36) //------------------------------------------------------------------------------ 曲名{"ギタリン"} 作者{"メロン"} // かなり手抜きですが、ギターが話題になってましたので、 // ギターの雰囲気を・・と作ってみました。 // ギターヘッダを使用しないで、コード・ヘッダから簡易関数で作り出してますので、 // ギターの構成音とは違ってます。 //------------------------------------------------------------------------------ 音源初期化 Include(chord.h); Include(chord2.h); Function S2A(Str K,D){ Array H; Str Y; Int CT; Int Hit; For(Int N=1;MID(K,N,1)!={};N++){ IF(MID(K,N,1)!={ }){ Y=Y+MID(K,N,1); H(CT)=Y; Hit=1; } IF(MID(K,N,1)=={ }){ IF(Hit!=0){ IF(MID(K,N+1,1)!={ }){ CT++; } Y={}; } } } Result=H; } Function C2A(Str Cho,D){ Str X=Cho X.s({'},{}) X.s({*},{* }) X.s({* +},{*+ }) Result = S2A(X) } //------ Array K; Function RS(Array AR){Str A = AR( Random( SizeOf(AR) ) );A;} Str H Str U={y64,0y64,127 K=C2A(Cho) [16 H = K(Random(SizeOf(K))); RS({o4},{o5}); H]} Function J(Str Cho){U} Function J2(Str Cho,D){U} Int Z [ TR=1P=100Z=110 l16 @25 o4 v.N(Z,0,Z,Z,0,Z,Z,Z,Z,Z,0,Z,0,Z,Z,Z) J2(#Em7)J2(#Cdim)J2(#Ab7)J2(#Db7) TR=11P=32o5 l1 r8 Em7 Cdim Ab7 Db7 r-8 TR=6P=32o3l1 eca-d- TR=7P=32o4l1 de-g-b TR=2 P=64 @66o4q98M=77 [4r1] TR=3 P=122@49o4q98M=77 [4r1] TR=4 P=0 @49o4q98M=77 [4r1] TR=5@33o3q95 efg`d `c+baa a-g-fd d-cde- deff+ fedd- TR=10 [8[n36n37]r-1[8n42,8]] TR=99CH=10 [4r1 r2+8n37,4.] TR=1P=100Z=110 l16 @25 o4 v.N(Z,0,Z,Z,0,Z,Z,Z,Z,Z,0,Z,0,Z,Z,Z) J2(#Em7)J2(#Cdim)J2(#Ab7)J2(#Db7) v85 J(#CM7)J(#Cdim)J(#Fm6)J(#F7) TR=11P=32o5 l1 r8 Em7 Cdim Ab7 Db7 CM7 Cdim Fm6 F7 r-8 TR=6P=32o3l1 eca-d- ccff TR=7P=32o4l1 de-g-b bade- TR=2 P=64 @66o4q98M=77 e2.g8b8`c1-4.`e-1`c+1+4 r8 [4r1] TR=3 P=122@49o4q98M=77 e2.g8b8`c1-4.`e-1`c+1+4 r8 [4r1] TR=4 P=0 @49o4q98M=77 e2.g8b8`c1-4.`e-1`c+1+4 r8 [4r1] TR=5@33o3q95 efg`d `c+baa a-g-fd d-cde- deff+ fedd- TR=10 [8[n36n37]r-1[8n42,8]] TR=99CH=10 [4r1 r2+8n37,4.] //-------------- TR=1P=100Z=110 l16 @25 o4 v.N(Z,0,Z,Z,0,Z,Z,Z,Z,Z,0,Z,0,Z,Z,Z) J2(#Em7)J2(#Cdim)J2(#Ab7)J2(#Db7) TR=11P=32o5 l1 r8 Em7 Cdim Ab7 Db7 r-8 TR=6P=32o3l1 eca-d- TR=7P=32o4l1 de-g-b TR=2 P=64 @66o4q98M=77 [4r1] TR=3 P=122@49o4q98M=77 [4r1] TR=4 P=0 @49o4q98M=77 [4r1] TR=5@33o3q95 efg`d `c+baa a-g-fd d-g+1`d2f+4gg+b c+4c2g+1`d2f+4gg+b c+4c2g+1`d2f+4gg+b c+4c2cde- deff+ fedd- TR=10 [8[n36n37]r-1[8n42,8]] TR=99CH=10 [4r1 r2+8n37,4.] ] //------ [3 TR=1P=100Z=110 l16 @25 o4 v.N(Z,0,Z,Z,0,Z,Z,Z,Z,Z,0,Z,0,Z,Z,Z) J2(#Em7)J2(#Cdim)J2(#Ab7)J2(#Db7) TR=11P=32o5 l1 r8 Em7 Cdim Ab7 Db7 r-8 TR=6P=32o3l1 eca-d- TR=7P=32o4l1 de-g-b TR=2 P=64 @66o4q98M=77 [4r1] TR=3 P=122@49o4q98M=77 [4r1] TR=4 P=0 @49o4q98M=77 [4r1] TR=5@33o3q95 efg`d `c+baa a-g-fd d- この曲は自作のオリジナル曲であるか、または、作曲者の死後50年以上経過した著作権に問題がない曲であることを確認しましたか? いいえ。よく分かりません はい。著作権に問題ありません (←選択)