サクラトップ > 掲示板トップ > 投稿フォーム
曲の投稿にはユーザー登録が必要です。 曲 名 作 者 名前: パスワード: 転 載 メール連絡すれば可 全て許可 メール連絡すれば可 許可しない (ゲームのBGMなど使いたい場合、許可するかどうかを指定。 サクラ本体への収録はあらかじめご承諾ください。) ゲーム制作サイト「Rmake」への転載(およびMP3変換)を許可する ジャンル ワールド ポップス ハードロック・ヘヴィーメタル ヒップホップ クラシック 歌謡曲・演歌 J-POP ロック ブルース・カントリー ダンス・エレクトロニカ ワールド アニメ・ゲーム 日本の伝統音楽・芸能 オルタナティヴロック ソウル・R&B ジャズ・フュージョン ヒーリング・ニューエイジ キッズ・ファミリー 音 源 (パソコン内蔵音源、GS音源、GM音源など) 公開 公開する 削除する (公開を中止して削除するときには、この項目を変更します。) コメント 秋から冬へ変わる季節の雰囲気をピアノ曲にしてみました。 曲データ(サクラから貼り付けます。) TrackName = {"『枯葉道』"} Copyright = {"ふみこみどり"} MetaText = {"公開日:2006/11/28 ジャンル:ピアノ曲"} /* 作者:ふみこみどり http://asiangreen.boo.jp/ hajike_green@hotmail.com 音源 制作者音源:SC-D70 推奨音源:MS-GSか、SC-D70系統 長さ:1分12秒 //------------------------------------------------------------------------------ 木枯らし吹く頃、枯葉道。 //------------------------------------------------------------------------------ ■こめんと■ おひさしぶりです&はじめまして♪ 即興的に思い浮かぶ音を並べて作ってみたピアノ曲です。 秋から冬にかけてのなんだか寒くなってくる時季を 思い浮かべつつ、というより体感しつつ作りました。 寒いです・・・ */ /*この曲は音源によって音色を変えられる仕組みになってます。 が、標準的な音色しか使ってないのであまり意味なしです・・・。 [0] MS-GSで作成した一般用(ふつう版) [1] SC-D70およびその上位音源用*/ Int TYPE = 0;/* "="の後の数字を0か1にしてください。*/ //------------------------------------------------------------------------------ TIME(0:0:1)Tempo=128 拍子3,4 調-(b,e,a) TimeBase=192 //弦楽器味付け用。 Str SU={"p.T(52,70,!32,70,64,!32)"} Str Su={"p.T(42,70,!16,70,64,!32)"} Str US={"p.T(64,68,!16,64,50,!4-16)"} Str UUSS={"p.T(64,68,!16,68,30,!4-16)"} Str Us={"p.T(86,60,!16,60,64,!32)"} Str SUS={"p.T(30,68,!12,68,64,!24)"} Str USU={"p.T(74,30,!12,30,64,!24)"} Str EPl11={"EP.T(100,110,!2,110,20,!1^2)M.T(30,70,!1,70,20,!1)"} Str EPl11s={"EP.T(85,120,!1,120,75,!2,75,15,!2)M.T(20,50,!1,50,20,!1)"} Str EPl1={"EP.T(100,110,!2^4,110,80,!2^4)M.T(20,90,!1,90,50,!2)"} Str EPl1s={"EP.T(85,120,!2,120,30,!2)M.T(20,50,!2,50,20,!2)"} Str EPl2={"EP.T(100,110,!4,110,80,!2)M.T(20,90,!4,90,70,!4)"} Str EPl2s={"EP.T(85,115,!4,115,40,!2)M.T(20,50,!4,50,30,!4)"} Str EPl4={"EP.T(100,110,!8,110,90,!8)M.T(50,70,!8,70,40,!8)"} Str EPl4s={"EP.T(85,115,!8,115,55,!8)M.T(20,50,!8,50,20,!8)"} Str EPEP={"EP(110)M(10)"} //------------------------------------------------------------------------------ IF(TYPE==0) { ResetGM(); TrackSync; }IF(TYPE==1) { ResetGS(); TrackSync; } //------------------------------------------------------------------------------ Function SetTrack(Int nTrack, Int nNote, Int nNote2, Int nVol, Int nPan, Int nRev, Int nCho, Int nRezo, Int nAtt, Int nCut, Int ) { IF(TYPE!=0 && TYPE!=1){ Str ALT = {"TYPEの後の数字は、0か1でお願いします〜"}; Print(ALT); End(); } IF(TYPE==0) { Track(nTrack) Voice(nNote) }IF(TYPE==1) { Track(nTrack) Voice(nNote, nNote2) } V(nVol) P(nPan) REV(nRev) CHO(nCho) y71,nRezo y73,nAtt y74,nCut } //SetTrack( 1, 1, 0,100, 64, 0, 0, 64, 64, 64);//標準 // No Note Vol Pan Rev Cho Rez Att Cut SetTrack( 1, 1, 0,125, 74, 10, 5, 68, 64, 64);//右手 SetTrack( 2, 1, 0,115, 54, 20, 5, 60, 64, 60);//左手 SetTrack( 3, 1, 0, 60, 96, 10, 5, 68, 64, 70);//右手エコー係 SetTrack( 4, 1, 0, 55, 32, 20, 5, 64, 64, 64);//左手エコー係 //------------------------------------------------------------------------------ //------------------------------------------------------------------------------ Track(1) v100 o6 q99 M(0) EP(125) Str Right1={" v.N(95,95,80,100,100, 105,105,105,100,80,90) l8 c^^ l32 dc l16 d^^^f l8 edec,80 t(4) c t(0) d v.N(90,100,90,80, 80,90,100,80,80) 'e'dc<'f,149 b'^>c<'g'^^^^^,90 > v.N(90,90,100,110,80,110,110,110,80,100, 80,90) l16 c^^^^c l8 d^ l8-64 f l64 t(4) f l8 gfe'c'cd v.N(90,100,90,90, 90,100,90,100, 90,100,100,90, 80,80) 'e'dc< 'f,299 b'g>d Tempo=124 'd'ed Tempo=118 'c'^^,90 Tempo=128 v.N(80,80,95,100, 90,105,90,100,80,90) l8 'c'^^,95 'c'^^ 'c'c<'gb'^^> v.N(100,100,100,100,90,90,100, 60,70,80) cdedcef Tempo=122 g^^,95 Tempo=128 v.N(80,80,90,105,105,100, 90,100,100,100, 80,100,100) 'c'^^,95 'c'cd 'e'd 'c'^c v.N(110,100,90, 90,80,100, 90,100, 70,80) edcd 'd'^^ Tempo=124 'c'^^,90 Tempo=128 v.N(80,90,80, 80,90,80, 90,80,70,80, 85,80) l8 efedc c 'cg'g^ v.N(110,90,90,100, 110, 115,115,115,115,110,110) b^gb^>d g^^,95 q85 'g''g''g',95 q99 v.N(110,110,100, 100,100,90, 110,100,100, 80,115) l8 efedc cg^ v.N(115,125,105,120,115,125,105,110, 125,125,125,110,115) 'b'^'g''b'^'d>d<' >d Tempo=124 ed Tempo=120 'c'^^,90 < Tempo=128 v.N(110,115, 105,120,105, 115,115,115,105,105,115) l8 c^^d^ Div{dfd}(8) edec,80 cd v.N(105,120,105,105, 95,105,115,105,105, 95,105) 'e'dc<'f,149 b'^>c<'g'^^^^,95 l16 ab > v.N(110,105,105, 115,95,105,115,95,125,115,120, 105,95,95,115) l16 c^^^,85 c d^^,90 cd l16-64 f l64 f l8 gfe'c'cd v.N(110,110,100,100, 100,110,100,100,110, 100,110,120,110,90,90,100, 120) 'e'dc< l16 'f,599 b'gb^>d^ l8 Tempo=126 'd'ed Tempo=124 'c'^,90 Tempo=128 v.N(110,115,100,100,110,115, 110,120,120,120,100,100,110) l8 'c'^^ l32 dc l16 d^^^f l8 'e'dec,80 cd v.N(110,120,110,110,100,100,110, 100,100, 115) 'e'dc<'f,149 b'^>c< Tempo=128 'g'^^^^ Tempo=132 >g,95 v.N(110,115,110,115,110,120,120,125,125,100,100,90,100) 'c'^^'d'^f'g'fe'c'cd v.N(110,120,115,115, 100,110,100,115,110,115,115,115,105,110, 80) 'e'dc<'f,299 b' g>d 'd'ed'c'^,90 d v.N(80,90,90,90, 80,90,90,100, 100,100,90,90, 115,115) 'e'dc<'f,299 b'g>d 'd'^^'c',95 cd v.N(115,120,115,115,100,110,115,110, 90,100,110,110,100,100) 'e'dc< Tempo=126 'f,299 b'g> Tempo=120 d Tempo=108 'd'ed Tempo=40 'c'^^ ^ "} TIME(2:1:0) Right1 //------------------------------------------------------------------------------ Track(2) v100 o4 q99 M(0) EP(125) Str Left1={" v.N(95,80,80,100,90,90, 100,100,100,100,90,90) t.N(-1,2,3) l8 eafb> ceab>c t(2) Tempo=126 ef Tempo=120 t(8) g^^,85 Tempo=128 v.N(90,80,80,100,90,90, 100,100,100,100,90,90) t.N(-1,2,3) eafb> ceadb >c< t(2) ge t(5) c^^,85 v.N(95,80,100,90, 95,90,90,90,90,90) t(0) l8 a^b^ t.N(-1,2,3) >ceab>cef t(2) gf Tempo=124 t(4) e,90 Tempo=128 v.N(95,80,100,90, 95,90,90,90,90,90) t(0) a^b^ t.N(-1,2,3) cefgfe,95 v.N(100,90,90,100,90,100, 100,95,100,90) ead ceg> t(3) c^^,80 < v.N(80,70,70) t.N(-1,2,3) l8 cece egeg,95 dfdf v.N(90,80,90,100,100,90) efgf Tempo=124 e,90 Tempo=128 v.N(105,95,95) t.N(-1,2,3) cece e,95 v.N(110,100,100) dgdg dg v.N(110,110,105,105,110,110) t(2) q90 [3 'dg'] q99 t(0) v.N(105,95,95) l8 'cea'^^^^^ 'eg'^^ q80 v.N(125,125,115,115,120,120) t.N(2,2,-1,-1,1,1) 'e''e''e' q99 v.N(115,105,105, 125,120,120) t(4)'cea'^^,95 'dg'^^ t(1) q85 [3 'dg'] q99 v110 'eg>c<'^^,90 t(0) v.N(115,100,100,120,110,110, 110,110,110,110,100,100) t.N(-1,2,3) l8 eafb> ceab>c Tempo=126 t(2) ef Tempo=124 t(4) g^^,95 Tempo=128 v.N(115,100,100,120,110,110, 110,110,110,110,100,100) t.N(-1,2,3) eafb> ceadb >c v.N(115,100,100,120,110,110, 110,110,110,110,100,100) t.N(-1,2,3) l8 eafb> ceab>c Tempo=126 t(2) ef Tempo=124 t(4) g t(6) ab,90 Tempo=128 t(0) v.N(115,80,100,100,120,110,110, 110,110,110,110,100,100) t.N(-1,2,3) <'a>c'eafb> ceadb >ceadb >c v105 t(2) 'cea'^^,95 'dgb'^^ v.N(90,100,110,90,90,90) t.N(0,2,3) ceg t.N(-5,0,7) 'eg>c'^^ ^< "} TIME(2:1:0) Left1 //------------------------------------------------------------------------------ Track(3) v100 o6 q99 M(0) EP(125) TIME(2:1:4) Right1 //------------------------------------------------------------------------------ Track(4) v100 o4 q99 M(0) EP(125) Time(2:1:0) Left1 この曲は自作のオリジナル曲であるか、または、作曲者の死後50年以上経過した著作権に問題がない曲であることを確認しましたか? いいえ。よく分かりません はい。著作権に問題ありません (←選択)