サクラトップ > 掲示板トップ > 投稿フォーム
曲の投稿にはユーザー登録が必要です。 曲 名 作 者 名前: パスワード: 転 載 全て許可 全て許可 メール連絡すれば可 許可しない (ゲームのBGMなど使いたい場合、許可するかどうかを指定。 サクラ本体への収録はあらかじめご承諾ください。) ゲーム制作サイト「Rmake」への転載(およびMP3変換)を許可する ジャンル アニメ・ゲーム ポップス ハードロック・ヘヴィーメタル ヒップホップ クラシック 歌謡曲・演歌 J-POP ロック ブルース・カントリー ダンス・エレクトロニカ ワールド アニメ・ゲーム 日本の伝統音楽・芸能 オルタナティヴロック ソウル・R&B ジャズ・フュージョン ヒーリング・ニューエイジ キッズ・ファミリー 音 源 (パソコン内蔵音源、GS音源、GM音源など) 公開 公開する 削除する (公開を中止して削除するときには、この項目を変更します。) コメント 久々の投稿ですー。覚えてらっしゃる方は数少ないと思いますが…。またボチボチと復活していけたらなぁと思います。ではでは。 曲データ(サクラから貼り付けます。) TrackName={"----------SUNNY DAYS----------"}Copyright={"∴ab"}MetaText={""}INT KEY=0Key(KEY) Tempo(100)Include(chord.h);Time(1:1:0)Include(gs.h);TimeSignature=4,4;System.MeasureShift = 1;ResetGM; r2 ResetGS; r2TrackSync; Str Rdm={v.Random(10);q.Random(15);t.Random(2);} 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 0 BR 12 p%0 FineTune(64); UseKeyShift(on); X;TR 2 Rdm; P 127 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 0 BR 12 p%0 FineTune(64);UseKeyShift(on); X; TR 4 Rdm; P 127 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 0 BR 12 p%0 FineTune(64);UseKeyShift(on);X TR 6 Rdm; P 127 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 0 BR 12 p%0 FineTune(64);UseKeyShift(on); X TR 12Rdm; P 127 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 HT(AA,AB,AC,AD,AG,AH,AI,AJ,AK,AL){TR=AA;CH=AB;@=AC;V=AD;q=(AG);REV=(AH);CHO=AI;M=AJ;P=AK;} STR MR0={[[crrcrr"grrcrl128rrrrrrv(50)"gcv(100)l16e^drrcrrdc^r]frrfrrerrer:l128rrrrrrv(50)"gc;v(100)l16e^errdrrcd^^^^^^^^^^^^^^^^^^^^^^^rrr]l128rrrrrrv(50)"g"b;v(100)l16d^drrcrrcd^c^^^^^^^^^^^^^^^^^^^^^rrr} STR MR1={["arr"arr"err"arr:"g^"frr"g^^^^rr]"b^crrd^^^^rr[f^errcrrcdrr];;;;;rreerre^frrg^^^^^^^^^^^^rrrrrrrrrrrr} STR MMR={TR1(>l16@(11)V(113)q(90)M(40)[MR0;MR1;])} // TR CH @ V q REV CHO M P // HT(001,001,011,117,090,020,050,040,064)l16MMR STR BS0={[[c^c`c^crrc`c^c]["a^"aa^"arr"aa^"a]"f^"ff^"frr"ff^"f"d^"dd^"drr"dd^"d:"g^"gg^"grr"gg^"g;rr"gc^gf^ed^"b]>"c^"cc^"crr"cc^"cl16;l16@(7)V(100)q(50)M(30)[GT0;GT1] $d{'n35,n36'}$f{n37}$t{'n38,n40'}$s{n42}$n{n46}$q{n49}$w{n57}$m{n(Cabasa),}$p{n(HighWoodBlock),}$k{n(LowWoodBlock),} STR DR0={Rhythm{{[[4mrrrrrprrrrrmrrrrrkmmpmm]]}{[qrr[15rrr]wrr[15rrr]]}{[8srsnrs][7srsnrs]sssnrr;;[8srsnrs][6srsnrs]wrsnrsssnrr}[[drrtrrdrftrrdrrtrr:dfdtrr]:ddttrr]tdftdf;[drrtrrdrftrrdrrtrr:dfdtrr]ddttrr;;[drrtrrdrftrr:drrtrrdfdtrr]rrftrrdftttt}} STR DR1={Rhythm{{qrr[7rrr]wrr[7rrr]qrr[7rrr]wrr[7rrr]qrr[4rrr]}{[4mrrkrrmrrprr][mrrrrrrrrrrr];rrrrrrprrkrr;[4prk]rrrrrrprrrrr}{[4srsnrsrrsnrs][nrsrrnrrsnrs]rrr[3nrs][4nrr]nssnsssrrnrr}[[3drftrf]ddftrt][trtrrfrrdtrr]rrrtrrdfdtrr;dfrtrfddftrt;tddtddtrrfrr}} HT(010,010,012,120,050,050,050,000,064)l16[DR0;DR1] この曲は自作のオリジナル曲であるか、または、作曲者の死後50年以上経過した著作権に問題がない曲であることを確認しましたか? いいえ。よく分かりません はい。著作権に問題ありません (←選択)