サクラトップ > 掲示板トップ > 投稿フォーム
曲の投稿にはユーザー登録が必要です。 曲 名 作 者 名前: パスワード: 転 載 全て許可 全て許可 メール連絡すれば可 許可しない (ゲームのBGMなど使いたい場合、許可するかどうかを指定。 サクラ本体への収録はあらかじめご承諾ください。) ゲーム制作サイト「Rmake」への転載(およびMP3変換)を許可する ジャンル アニメ・ゲーム ポップス ハードロック・ヘヴィーメタル ヒップホップ クラシック 歌謡曲・演歌 J-POP ロック ブルース・カントリー ダンス・エレクトロニカ ワールド アニメ・ゲーム 日本の伝統音楽・芸能 オルタナティヴロック ソウル・R&B ジャズ・フュージョン ヒーリング・ニューエイジ キッズ・ファミリー 音 源 (パソコン内蔵音源、GS音源、GM音源など) 公開 公開する 削除する (公開を中止して削除するときには、この項目を変更します。) コメント 懐古趣味なシューティング風BGMです。ベタで暑苦しいメロディを目指したつもり…ですが、いかがでしょうか。稚拙な曲ですがお聴きいただければ幸いです。ヘッドフォン+Windows XP標準の音源で調整しています。 曲データ(サクラから貼り付けます。) TrackName = {"NEBULA"} //曲名 Copyright = {"adas, 2008/8/29"} //著作権表示 /* 80年代シューティングゲームっぽさを目指した曲です。 どことなく聞いたことのあるベースやメロディはご愛嬌ってことで(^^; オーソドックスな短調系コード進行を繰り返しながら、音色を変えつつ長調も まぜる、という感じです。単調ですが色んなパートを混ぜ込んでスムーズに 楽曲として聴かせるといのは難しいですね! 1分程度で1ループします。 この曲はWindowsXPに標準で搭載されているMicrosoft GS Wavetable Software Synthという音源で調整しています。 短くて未熟ですが、お気に召して頂ければ幸いです。 http://adas.lolipop.jp/mtblog/ - adas(あだす) */ SoundType=0;////ここから Str Rdm={v.Random(10);q.Random(5);t.Random(2);t2} Str Pn={r64 y64,127 r-64};Str Pf={r-64 y64,0 r64};Str Pp={Pf;Pn;} Function TR1V(Int Vol){TR 1 V(Vol); TR 2 V(Vol);} Function TR1T(Int T1,Int T2){TR 1 @(T1); TR 2 @(T2);} Function TR1(Str X){TR 1 Rdm; P 20 BR 12 p%0 FineTune(64); UseKeyShift(on); X;TR 2 Rdm; P 107 BR 12 p%0 FineTune(68); UseKeyShift(on); X;} Function TR2V(Int Vol){TR 3 V(Vol); TR 4 V(Vol);} Function TR2T(Int T1,Int T2){TR 3 @(T1); TR 4 @(T2);} Function TR2(Str X){TR 3 Rdm; P 20 BR 12 p%0 FineTune(64);UseKeyShift(on); X; TR 4 Rdm; P 107 BR 12 p%0 FineTune(68); UseKeyShift(on); X;} Function TR3V(Int Vol){TR 5 V(Vol); TR 6 V(Vol);} Function TR3T(Int T1,Int T2){TR 5 @(T1); TR 6 @(T2);} Function TR3(Str X){TR 5 Rdm; P 20 BR 12 p%0 FineTune(64);UseKeyShift(on);X TR 6 Rdm; P 107 BR 12 p%0 FineTune(68);UseKeyShift(on); X} Function TR4V(Int Vol){TR 7 V(Vol); TR 8 V(Vol);} Function TR4T(Int T1,Int T2){TR 7 @(T1); TR 8 @(T2);} Function TR4(Str X){TR 7 Rdm; P 20 BR 12 p%0 FineTune(64);UseKeyShift(on); X TR 8Rdm; P 107 BR 12 p% 0 FineTune(68);UseKeyShift(on); X} Function TR5V(Int Vol){TR 9 V(Vol); TR 11 V(Vol);} Function TR5T(Int T1,Int T2){TR 9 @(T1); TR 11 @(T2);} Function TR5(Str X){TR 9 Rdm; P 20 BR 12 p%0 FineTune(64);UseKeyShift(on); X TR 11Rdm; P 107 BR 12 p% 0 FineTune(68);UseKeyShift(on); X} Function TR6V(Int Vol){TR 12 V(Vol); TR 13 V(Vol);} Function TR6T(Int T1,Int T2){TR 12 @(T1); TR 13 @(T2);} Function TR6(Str X){TR 12 Rdm; P 20 BR 12 p%0 FineTune(64);UseKeyShift(on); X TR 13Rdm; P 107 BR 12 p% 0 FineTune(68);UseKeyShift(on); X} Function TR7V(Int Vol){TR 14 V(Vol); TR 15 V(Vol);} Function TR7T(Int T1,Int T2){TR 14 @(T1); TR 15 @(T2);} Function TR7(Str X){TR 14 Rdm; P 20 BR 12 p%0 FineTune(64);UseKeyShift(on); X TR 15Rdm; P 107 BR 12 p% 0 FineTune(68);UseKeyShift(on); X} TR1V(100);TR2V(100);TR3V(100);TR4V(100);TR5V(100);TR6V(100);TR7V(100); ////ここまで Tempo 140 TimeKey(,,2) Str Ex1 = {EP.T(90,50,!2,50,90,!2);} Str Mx1={r*-2 M.T(0,50,!2); r*2 M(0)} $b{n36,,, 120} $s{n38,,, 100} $S{n38,,,100} $h{n42,,, 60} $H{n42,,,100} $p{n51,,, 60} $P{n51,,,100} $a{n39,,, 90} $A{n39,,,100} $c{n49,,, 40} $C{n49,,,100} $d{n69,,, 60} $D{n69,,,100} $e{n56,,, 60} $E{n70,,,100} $f{n60,,, 40} $F{n61,,,40} $g{n60,,, 40} $G{n61,,,40} $x{n50,,, 120} $y{n47,,, 120} $z{n43,,, 120} $i{n80,,, 100} $I{n81,,, 100} /********************************************************************** ベース **********************************************************************/ [ TR1V(100) TR1({// @39 q97 o2 l12 v100 Pf; //Intro [12 a][12 a] //A [ [[12 a][12 g][12 f][12 g]] ] //B [[crc ccc][b-rb- b-b-b-][frf fff][grg ggg]] //C [ [3a`a] [3 g`g][6 f+`f+] [3 f`f] [3 e-`e-] [3 d`d] e`ee `g+g+`g+ ] [12 b-`b-] }) ] /********************************************************************** メロディ **********************************************************************/ Str Melody1 = { l12 v100 //Intro r1r1 //A [ S{ } b^^ r>cd g^^ ^^^ | ^^^ Mx1; rdg `c^b^g^ | e^^ ^^^ ^^^ ^^r Mx1; | rdc cd g^^ ^^^ | ^^^ Mx1; rdg `c^b^`d^ | `e^^ ^^^ ^^^ ^^r Mx1; | >fec ed"g cc^^ ^^^ ^^^ ^^r Mx1; |fec fec fec gfc<| S{ v_-30"g^^ rrr c^^ r"eg| c^^ r"gc e^^^"g^ | e^^ ^^^ "c^"e^"g^| "c^^ rrr rrr ""brr v_0} S{ v_-30 c^^ rrr e^^ r"gc| e^^ rce g^d^`c^ | g^^ ^^^ "e^"g^"b^| dc"g dc"g "g"a"b cde v_0 } e^^ rce g^^ ^^^ | ^^^ Mx1; rab `c^g^`g^ |>e^^ ^^^ ^^^ ^^r Mx1; |fec fec "bcd eg+b| } Str Melody3 = { l12 v120 //C `cbe `cbe `cbe `cbd `cbg dc"b cde | fec fec gfc gfc gfcgfc "bf+debg+ S{ v_-30 } v_0 `cbe `cbe `cbe `cbd `cbg dc"b cde | fec fec gfc gfc gfcgfc "bf+de`cg+ a1 ^1 } [ TR2V(120) TR2T(62,63) TR2({ o5 q97 Melody1 }) TR2V(120) TR2T(108,6) TR2({ o6 q97 Melody2}) TR2V(120) TR2T(64,63) TR2({ o6 q97 Melody3 }) TR7V(60) TR7T(63,62) TR7({ r12 o4 q97 Melody1 }) TR7V(60) TR7T(6,108) TR7({ o5 q97 Melody2}) TR7V(60) TR7T(63,64) TR7({ o5 q97 Melody3 }) TR3V(100) TR3({ @103 q99 o4 l12 v120 Pf; Melody1}) TR3V(90) TR3({ Melody2 }) TR3V(100) TR3({ Melody3}) ] /********************************************************************** コード **********************************************************************/ [ TR4V(90) TR4({// @49 q99 o6 l4 v120 Pf; r1 EP.T(0,127,!1) "b0e0g1 EP 90 [4 Ex1;c0e0g1 Ex1;"b0e0g1 Ex1; "f0e0g1 Ex1;"b0e0g1] S{<< c1b-1f1g1 c1b-1f1b2e2 >>} [ Ex1;e0g0`c1 Ex1; d0f0b-1 Ex1;e0g0`c1 : Ex1; d0f0`c2. d0f0b4] Ex1; d0f0`c2 d0f+0b4 e0g+0b4 [ Ex1; e0`c2 e0b2 Ex1; e0a1 Ex1; e0a2 e-0b-2 Ex1; f0`c2 f+0b2] EP.T(90,127,!1^2.., 127,90,!8) ""b-0d0b-1^1 }) ] /********************************************************************** シーケンス **********************************************************************/ [ TR5V(90) TR5({// @11 q99 o6 l12 v90 Pf; r1r1 r1r1r1r1 r1r1r1r1 [cec gec `cge `e`cg | "be"b ge"b bge `ebg | "ae"a ge"a `cae `eag | "be"b ge"b bge `ebg] r1r1r1r1 r1r1r1r1 r1r1r1r1 //`cbe `cbe `cbe `cbd `cbg dc"b cde | fec fec gfc gfc gfcgfc "bf+de`cg+ >ed"g ed"g ed"g ed"f+ ed"b "f"e"d <"b>"c"d "e"f+"g | df adf ab-f ab->d | "a"b-d fab- afd "b-"ar < }) ] UseKeyShift(off) /********************************************************************** リバースシンバルほか **********************************************************************/ [ TR 16 V 100 v127 EP 127 q100 o5 r1r2 @120 g2 [r1r1r1r1 r1r1r1:r1]r2 @120g2 @123``c1r1r1r1 r1r1r1r2 @120g2 r1r1r1r1 r1r1r1r1 @123``c1r2 @120g2 ] /********************************************************************** リズム **********************************************************************/ [ TR 10 V 127 EP 127 l12 Rhythm{ //I [ brr brr brr brr r-1 Hhh hHh hhh Hhh r-1 prr rrr rrr rrr] r-1 crr rrr xrr ryz //A [8 brr brr brr brr r-1 Hhh hHh hhh Hhh r-1 prr rrr rrr rrr] r-1 crr rrr xrr ryz [[8 brr srr brr srr r-1 Hhh hHh hhh Hhh r-1 prr rrr rrr rrr]] //C [4 brr srr brr srs r-1 Hhh hHh hhh Hhh r-1 pri rii iri Iri brr srr brr sss r-1 Hhh hHh hhh Hhh r-1 pri rii iri Iri] r-1 crr rrr xrr ryz //O brr brr brr brr r-1 rrr srr rrr srs r-1 Hhh hHh hhh Hhh r-1 prr rrr rrr rrr brr brr bbr bbb r-1 srs sss sss sss r-1 Hhh hHh hhh Hhh r-1 prr rrr rrr rrr } ] この曲は自作のオリジナル曲であるか、または、作曲者の死後50年以上経過した著作権に問題がない曲であることを確認しましたか? いいえ。よく分かりません はい。著作権に問題ありません (←選択)