サクラトップ > 掲示板トップ > 投稿フォーム
曲の投稿にはユーザー登録が必要です。 曲 名 作 者 名前: パスワード: 転 載 全て許可 全て許可 メール連絡すれば可 許可しない (ゲームのBGMなど使いたい場合、許可するかどうかを指定。 サクラ本体への収録はあらかじめご承諾ください。) ゲーム制作サイト「Rmake」への転載(およびMP3変換)を許可する ジャンル ヒーリング・ニューエイジ ポップス ハードロック・ヘヴィーメタル ヒップホップ クラシック 歌謡曲・演歌 J-POP ロック ブルース・カントリー ダンス・エレクトロニカ ワールド アニメ・ゲーム 日本の伝統音楽・芸能 オルタナティヴロック ソウル・R&B ジャズ・フュージョン ヒーリング・ニューエイジ キッズ・ファミリー 音 源 (パソコン内蔵音源、GS音源、GM音源など) 公開 公開する 削除する (公開を中止して削除するときには、この項目を変更します。) コメント あけましておめでとうございます。新年早々、ありがち曲で恐縮ですが、3分程度の明るい曲を作りました。へなちょこですが、お時間のある方はお聴きくださると嬉しいです。 曲データ(サクラから貼り付けます。) ResetGM;r8 TrackSync TrackName = {"electronic parade!!"} //曲名 Copyright = {"adas, 2008/1/13"} //著作権表示 /* あけましておめでとうございます。 みなさんにとっても良い一年でありますように。 久しぶりにイージーで明るい曲を作りたくなったのでサクサクっと作ってみました。 ドラムパターンはカナリ手抜き入ってて申し訳ないのですが(というか、2小節のパターンを ひたすら繰り返してるだけ…)、裏打ちが多くて個人的には気に入っています。イージー。 アンサンブルが4音色大ユニゾンなのであるところで発音数が足りなくなってしまいチェレスタは シングルトラックで演奏するハメに。。途中の適当さ加減が混じってるエレピソロはイマイチでしたね…。 この曲は、Microsoft GS Wavetable SW Synthとヘッドフォンで調整してあります。 http://www.0and1.org/ adas. */ ////ここから 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 TR1(Str X){TR 1 Rdm; P 10 BR 12 p%0 FineTune(64); UseKeyShift(on); X;TR 2 Rdm; P 117 BR 12 p%0 FineTune(68); UseKeyShift(on); X;} Function TR2V(Int Vol){TR 3 V(Vol); TR 4 V(Vol);} Function TR2(Str X){TR 3 Rdm; P 10 BR 12 p%0 FineTune(64);UseKeyShift(on); X; TR 4 Rdm; P 117 BR 12 p%0 FineTune(68); UseKeyShift(on); X;} Function TR3V(Int Vol){TR 5 V(Vol); TR 6 V(Vol);} Function TR3(Str X){TR 5 Rdm; P 10 BR 12 p%0 FineTune(64);UseKeyShift(on);X TR 6 Rdm; P 117 BR 12 p%0 FineTune(68);UseKeyShift(on); X} Function TR4V(Int Vol){TR 11 V(Vol); TR 12 V(Vol);} Function TR4(Str X){TR 11 Rdm; P 10 BR 12 p%0 FineTune(64);UseKeyShift(on); X TR 12Rdm; P 117 BR 12 p% 0 FineTune(68);UseKeyShift(on); X} Int TR5R = 16;Function TR5V(Int Vol){TR 7 V(Vol); TR 8 V(Vol-20); TR 9 V(Vol-40);} Function TR5(Str X){TR 7 Rdm; P 64 BR 12 p%0 FineTune(64);UseKeyShift(on); X TR 8 Rdm; P 127 BR 12 p%0 FineTune(68);UseKeyShift(on); r(TR5R) X TR 9 Rdm; P 0 BR 12 p%0 FineTune(60);UseKeyShift(on); r(TR5R/2) X} Int TR6R = 4;Function TR6V(Int Vol){TR 13 V(Vol); TR 14 V(Vol-20); TR 15 V(Vol-40);} Function TR6(Str X){TR 13 Rdm; P 64 BR 12 p%0 FineTune(64);UseKeyShift(on); X TR 14 Rdm; P 127 BR 12 p%0 FineTune(68);UseKeyShift(on); r(TR6R) X TR 15 Rdm; P 0 BR 12 p%0 FineTune(60);UseKeyShift(on); r(TR6R/2) X} ////ここまで Function TR1Tone(Int Ltone, Int Rtone){TR 1 @Ltone TR 2 @Rtone} Function TR2Tone(Int Ltone, Int Rtone){TR 3 @Ltone TR 4 @Rtone} Function TR3Tone(Int Ltone, Int Rtone){TR 5 @Ltone TR 6 @Rtone} Function TR4Tone(Int Ltone, Int Rtone){TR 11 @Ltone TR 12 @Rtone} $b{v90 n35};$B{v100 n36}; // bass $s{v70 n38};$S{v100 n38}; // snare $o{v40 n46}; $O{v100 n46}; $h{v70 n42}; $H{v100 n42};// hihat $x{v100 n50};$y{v100 n47};$z{v100 n43}; // tom $X{v100 n48};$Y{v100 n45};$Z{v100 n41}; // tom2 $a{v100 n39};$A{v100 n31}; // clap, stick $p{v100 n51};$P{v100 n59}; // ride,ride2 $d{v100 n61};$D{v100 n60}; // bongo $e{v100 n64};$E{v100 n63}; // conga $f{v100 n66};$F{v100 n65}; // timbale $g{v100 n67};$G{v100 n68}; // agogo $i{v90 n80};$I{v70 n81}; // triangle $k{v100 n69};$K{v100 n70}; // cabasa , maracas $j{v100 n77};$J{v100 n76}; // woodblock $m{v100 n75};$M{v70 n83}; // claves, jinglebell $Q{v100 n78};$q{v100 n79}; // cuica $T{v100 n74};$t{v100 n73}; // guiro $w{n84,,,100};$W{n82,,,100}; // bell tree , shaker //$v{v100 n58};$V{v100 n27}; // vibraslap,highQ $u{v100 n29};$U{v100 n30}; // scratch Str Ex1 = {EP.T(70,100,!1^1^1,100,70,!1);} Str Ex2 = {EP.T(70,120,!1^1^1...,120,70,!8);} Str Ez1 = {S{r-1^1^1^1 ^1^1^1^1 EP.T(127,0,!1^1^1^1 ^1^1^1^1);}} Str Ez2 = {S{r-1 EP.T(127,50,!1);}} Str Tx1 = {S{t.N(0,4,8,12);}} Str Pz1 = {S{r-4 p%.T(0,-4000,!4);r4 p%0}} Str Pz2 = {S{r-8 p%.T(0,-4000,!8);r8 p%0}} Str Mz1 = {S{r-1 EP.T(127,40,!2..); M.T(0,100,!1);r1 EP 127 M 0}} Str Mz2 = {S{r-2. EP.T(127,40,!2.); M.T(0,100,!2.);r2. EP 127 M 0}} Str Mz3 = {S{r-1 /*EP.T(127,40,!2..);*/ M.T(0,100,!1);r1 /*EP 127*/ M 0}} Tempo 120 TimeBase(96) TimeKey(,,3) ///////////////////////// 伴奏&ベース TR1Tone(39, 108); TR1V(100);TR1({ l8 /*@39*/ v70 q65 t0 EP 127 TimeKey2(,,0) r2 [ S{o2 [ [ f^rf f^rr |f^rf f^rf|g^rg g^rr |g^rg g^rg : a^ra a^rr |a^ra a`e^g|aara a^rr |a^ra arar ] c^rc c^rr |c^rc ccrc|ccrc c^rr c^rc crcr ] } o4 [[ rr'a`c`e'r 'ab`d''ab`d'r'a`c`e' |r'a`c`e'r'a`c`e' 'ab`d'r'ab`d'r| 'a`c`e'r'a`c`e'r 'ab`d''gb`d'r'g`c`e' |r'g`c`e'r'g`c`e' 'gb`d'r'gb`d'r| : 'gb`d'r'gb`d'r 'gb`e''gb`e'r'gb`d' |r'gb`d'r 'gb`d' r'gb`e'r 'gb`e'| 'gb`d'r'gb`d'r 'gb`e''gb`e'r'gb`d' |r'gb`d'r 'gb`d' 'gb`d'r 'gb`e'r| ] 'gb`d'r'gb`d'r 'gb`e''gb`e'r'gb`d' |r'gb`d'r 'gb`d' r'gb`e'r 'gb`e'| :'gb`d'r'gb`d'r 'gb`e''gb`e'r'gb`d' |r'gb`d'r 'gb`d' 'gb-`f'r 'gb-`e'r| ] 'gb`d'r'gb`d'r 'gb`e''gb`e'r'gb`d' |r'gb`d'r 'gb`d' 'gb`d'r 'gb`e'r| ://fermata S{o2 [ TimeKey2(,,0) [g^^g g^^g |rg^g rgrg|g^^g g^^^ |g^^g g^gg] TimeKey2(,,+2) :[g^^g g^^g |rg^g rgrg|g^^g g^^^ |g^^g g^gg] ] [g^^g g^^g |rg^g rgrg|:g^^g g^^^ |g^^g g^gg]g^^g g^^g r1 } o4 [8 'fa`c'r'fa`c'r 'fab''fab'r'fab' | r'fab'r'fab' 'fa`c'r'fab'r| rr'fa`c'r 'fa`c''fa`c'r'fab' | :r'fab'r'fab' 'fa`c'r'fab'r| ] r1 ] // fadeout S{o2 f^rf f^rr |f^rf f^rf|g^rg g^rr |g^rg g^rg a^ra a^rr |a^ra a`e^g|aara a^rr |a^ra arar } o4 rr'a`c`e'r 'ab`d''ab`d'r'a`c`e' |r'a`c`e'r'a`c`e' 'ab`d'r'ab`d'r| 'a`c`e'r'a`c`e'r 'ab`d''gb`d'r'g`c`e' |r'g`c`e'r'g`c`e' 'gb`d'r'gb`d'r| 'gb`d'r'gb`d'r 'gb`e''gb`e'r'gb`d' |r'gb`d'r 'gb`d' r'gb`e'r 'gb`e'| 'gb`d'r'gb`d'r 'gb`e''gb`e'r'gb`d' |r'gb`d'r 'gb`d' 'gb`d'r 'gb`e'r| Ez1; }); ///////////////////////// 伴奏 TR2Tone(52, 49); TR2V(100);TR2({ l8 o5 /*@49*/ v70 EP 127 //EP.T(30,100,!4); //S{Div{cdefgab>cd<}2} [ q80 v_10 S{Div{rrrrrcdefgab>cd<}2} Div{cdefgab>cdef<}2 v_0 q96 S{[4 `g1^1 ^1^1 ^1^1 ^1^1,,+10]} [[ rr'a`c`e'r 'ab`d''ab`d'r'a`c`e' |r'a`c`e'r'a`c`e' 'ab`d'r'ab`d'r| 'a`c`e'r'a`c`e'r 'ab`d''gb`d'r'g`c`e' |r'g`c`e'r'g`c`e' 'gb`d'r'gb`d'r| :'gb`d'r'gb`d'r 'gb`e''gb`e'r'gb`d' |r'gb`d'r 'gb`d' r'gb`e'r 'gb`e'| 'gb`d'r'gb`d'r 'gb`e''gb`e'r'gb`d' |r'gb`d'r 'gb`d' 'gb`d'r 'gb`e'r| ] 'gb`d'r'gb`d'r 'gb`e''gb`e'r'gb`d' |r'gb`d'r 'gb`d' r'gb`e'r 'gb`e'| :'gb`d'r'gb`d'r 'gb`e''gb`e'r'gb`d' |r'gb`d'r 'gb`d' 'gb-`f'r 'gb-`e'r| ] 'gb`d'r'gb`d'r 'gb`e''gb`e'r'gb`d' |r'gb`d'r 'gb`d' 'gb`d'r 'gb`e'r| :// fermata // S{[16r1] `g1^1^1^1 ^1^1^1^1 ^1^1^1^1 ^1^1^1,99 r1 } [8 'fa`c'r'fa`c'r 'fab''fab'r'fab' | r'fab'r'fab' 'fa`c'r'fab'r| rr'fa`c'r 'fa`c''fa`c'r'fab' | :r'fab'r'fab' 'fa`c'r'fab'r| ]r1 r-2 // for top ] // fadeout q96 S{`g1^1 ^1^1 ^1^1 ^1^1,,+10} rr'a`c`e'r 'ab`d''ab`d'r'a`c`e' |r'a`c`e'r'a`c`e' 'ab`d'r'ab`d'r| 'a`c`e'r'a`c`e'r 'ab`d''gb`d'r'g`c`e' |r'g`c`e'r'g`c`e' 'gb`d'r'gb`d'r| 'gb`d'r'gb`d'r 'gb`e''gb`e'r'gb`d' |r'gb`d'r 'gb`d' r'gb`e'r 'gb`e'| 'gb`d'r'gb`d'r 'gb`e''gb`e'r'gb`d' |r'gb`d'r 'gb`d' 'gb`d'r 'gb`e'r| Ez1; }); ///////////////////////// メロディ(エレピ) TR6R=4;TR6V(110);TR6({ r2 EP 127 [32 r1] l8 o5 @5 q97 v100 "gd,50g^ ^^^^ ^^^f16g16 |f Div{ef,,-20e,,-20}de | rc`c^ b Div{ab,,-20a,,-20}gf | ^ef,50r rg"g^ "f"e"f,50r "g^^^ ^^^e16f16 Div{ef,,-20e,,-20}deb,50 | fef,50g ^^^^ |^^^`c cd,50ef,50 g^^f16e16 d^^^ |^^^e16f16 g^^b16`c16 | bDiv{ga,,-20g,,-20}fe f Div{ef,,-20e,,-20}dc |"g^^^ rrrr16c16 d^^^ ^^^r16g16 | a^^^ ^^^^ | ^^ l16 b`cbg fefe dcdc | "bc"bc dc"b"a l8 "g^^g,50 gaba b`cra16b16 |`cb`c`d rrrr | e0gf0ag0bf0a g0ba0`cra16b16 |a0`cb`e0`gr rrr`f `f`ffr rrdr fefg rrrr |a^^^ rrb16`c16`d16`e16 `f`e`a`g rrrg efgf garr |gaba b`crr | >efgf garr | rgrf rerd< d^^^ ^^^f16g16 |a^^^^ ^^^^ ^^ l16 b`cbg fefe dcdc | "bc"bc dc"b"a l8 "g^^g,50 Ez2; }); ///////////////////////// チェレスタ TR 16 V 105 P 64 M 0 EP 127 //TR4V(90);TR4({ r2 [ l16 o6 @9 q50 v100 [ r2"b2r1 r2d2r1 r2e2r1 <<[3b>ceg] b`cbg [ec| r2"b2r1 r2d2r1 r2e2g2r2 r2b2g2d2| ] : l8 [8 `g`cg`dgd`cb|g`g`cg`dgd`c|bg`g`c g`dgd|:`cbg`gg`c`d`g]r1 ] // fadeout r2"b2r1 r2d2r1 r2e2r1 <<[3b>ceg] b`cbg [ec| Ez1; //}); ///////////////////////// メロディ(笛) TR5R=8;TR5V(100);TR5({ r2 EP 127 l8 o6 @71 q97 v120 [ de,-50g^ ^2 ^1 Mz1; de,-50 "g^ ^2 ^1 Mz1; de,-50 "b^ ^2 ^1 Mz1;r1^1 de,-50g^ ^2 ^1 Mz1; de,-50 "g^ ^2 ^1 Mz1; de,-50 "b^ ^2 ^2.. Mz2; c,-50 de,-50g^ ^2 ^1 Mz1; de,-50 "g^ ^2 ^1 Mz1; de,-50ba e2 ^2.. Mz1; d,-50 e1^1 Mz1; de,-50g^ ^2 ^1 Mz1; de,-50 "g^ ^2 ^1 Mz1; de,-50 "b^ ^2 ^1 Mz1; r1^1 :// top [32 r1] ] // fadeout de,-50g^ ^2 ^1 Mz3; de,-50 "g^ ^2 ^1 Mz3; de,-50 "b^ ^2 ^1 Mz3;r1^1 Ez1; }); ///////////////////////// ドラム UseKeyShift(off); TR 10 V 100 P 64 M 0 EP 127 l16 r2 q10 Rhythm{ [16 brrr rrbr brrr brbr r-1 srrr srrr srsr rrsr r-1 hrh,,-30r h,,-30rhr h,,-30rhr hrh,,-30r r-1 prkr prkk prpr rkpr r-1 rrIr rrrr rrrr rrrr brrr rrbr brrr brbr r-1 rrsr rrsr srrr srrr r-1 hrh,,-30r h,,-30rhr h,,-30rhr hrh,,-30r r-1 rrpr rrpk prkr pkkr r-1 rrrr rrrr rrrr rrrr ] [16 brrr rrbr brrr brbr r-1 srrr srrr srsr rrsr r-1 hrh,,-30r h,,-30rhr h,,-30rhr hrh,,-30r r-1 prkr prkk prpr rkpr r-1 rrIr rrrr rrrr rrrr :brrr rrbr brrr brbr r-1 rrsr rrsr srrr srrr r-1 hrh,,-30r h,,-30rhr h,,-30rhr hrh,,-30r r-1 rrpr rrpk prkr pkkr r-1 rrrr rrrr rrrr rrrr ]r1 [20 brrr rrbr brrr brbr r-1 srrr srrr srsr rrsr r-1 hrh,,-30r h,,-30rhr h,,-30rhr hrh,,-30r r-1 prkr prkk prpr rkpr r-1 rrIr rrrr rrrr rrrr brrr rrbr brrr brbr r-1 rrsr rrsr srrr srrr r-1 hrh,,-30r h,,-30rhr h,,-30rhr hrh,,-30r r-1 rrpr rrpk prkr pkkr r-1 rrrr rrrr rrrr rrrr ] (Ez1;) } この曲は自作のオリジナル曲であるか、または、作曲者の死後50年以上経過した著作権に問題がない曲であることを確認しましたか? いいえ。よく分かりません はい。著作権に問題ありません (←選択)