サクラトップ > 掲示板トップ > 投稿フォーム
曲の投稿にはユーザー登録が必要です。 曲 名 作 者 名前: パスワード: 転 載 全て許可 全て許可 メール連絡すれば可 許可しない (ゲームのBGMなど使いたい場合、許可するかどうかを指定。 サクラ本体への収録はあらかじめご承諾ください。) ゲーム制作サイト「Rmake」への転載(およびMP3変換)を許可する ジャンル ダンス・エレクトロニカ ポップス ハードロック・ヘヴィーメタル ヒップホップ クラシック 歌謡曲・演歌 J-POP ロック ブルース・カントリー ダンス・エレクトロニカ ワールド アニメ・ゲーム 日本の伝統音楽・芸能 オルタナティヴロック ソウル・R&B ジャズ・フュージョン ヒーリング・ニューエイジ キッズ・ファミリー 音 源 (パソコン内蔵音源、GS音源、GM音源など) 公開 公開する 削除する (公開を中止して削除するときには、この項目を変更します。) コメント はい 曲データ(サクラから貼り付けます。) //------------------------------------------------------------------------------------------------- // テキスト音楽「サクラ」音楽データ (dSakura.dll Version.2.372)[09/09/22TH][MINIMAL]W-Temp'09 //------------------------------------------------------------------------------------------------- Include(gs.h)ResetGS;r4;Include(delay.h)System.MeasureShift=2System.vMax=150 TrackName={"Minimateck"}Copyright={"West"} MetaText{"*PR* Myblog→ " http://nu3d.blog.shinobi.jp/ " *Access here!*} //------------------------------------------------------------------------------------------------- Tempo=126FUNCTION XE(tx){Time(tx:1:0)}FUNCTION MP(STR FR){Sub{TrackKey=12FR;TrackKey=0}FR} FUNCTION MM(STR Y){Sub{TrackKey=-12Y;TrackKey=0}Y}FUNCTION MB(STR Z){Sub{TrackKey=12Z;TrackKey=0} Sub{TrackKey=-12Z;TrackKey=0}Z}FUNCTION DP(P){XE(-2)GS_RHYTHM(P)r8}TR=9DP=1TR=10DP=2TR=11DP=1TR=4DP=2 FUNCTION LAC(TC,Vn,Qn,Pn,Mn,Vo1,Vo2,On){TR=TC;CH=TC;XE(0)l16v(Vn)q(Qn)P=Pn;M(Mn*10)@(Vo1,Vo2)o(On)} //B(TC, v , q , P , M, @ ,V2, o)M/C(TC, v , q , P , M, @ ,V2, o)SYN(TC, v , q , P , M, @ ,V2, o) LAC(01,150,080,064,00,081,08,03)LAC(03,120,020,064,00,081,00,04)LAC(06,127,010,064,00,081,01,05) LAC(02,150,080,064,00,080,00,03)LAC(04,120,040,064,00,119,01,06)LAC(07,127,010,064,00,081,00,05) INT STME=8INT SET=STME*-1INT R=0LAC(05,120,040,064,00,117,00,06)LAC(08,150,040,064,00,081,08,05) //D(TC, v , q , P , M, @ ,V2, o)MSE(TC, v , q , P , M, @ ,V2, o)/SE(TC, v , q , P , M, @ ,V2, o) LAC(09,150,080,064,00,001,00,03)LAC(12,127,100,064,00,039,09,05)LAC(15,127,100,064,00,039,09,05) LAC(10,150,080,064,00,026,00,03)LAC(13,100,100,064,00,080,01,04)LAC(16,127,100,064,00,039,09,05) LAC(11,127,080,064,00,026,00,03)LAC(14,100,100,064,00,081,08,05)FUNCTION PL(T,STR T1,STR T2,STR T3, STR T4,STR T5,STR T6,STR T7,STR T8,STR T9,STR T10,STR T11,STR T12,STR T13,STR T14,STR T15,STR T16){ STR I={XE=T+R+STME}TR=01I;T1;TR=02I;T2;TR=03I;T3;TR=04I;T4;TR=05I;T5;TR=06I;T6;TR=07I;T7;TR=08I;T8; TR=09I;T9;TR=10I;T10;TR=11I;T11;TR=12I;T12;TR=13I;T13;TR=14I;T14;TR=15I;T15;TR=16I;T16} //BASS--------------------------------------------------------------------------------------------- STR VC1={[32rrf^"frf"f]} //CHORD-------------------------------------------------------------------------------------------- STR CH1={[32rrbrrrgr]} //SYNTH-------------------------------------------------------------------------------------------- STR SY1={[32rrrr@123,1V=127BR=10p20'n33n31'rrr]} //SYNTH-------------------------------------------------------------------------------------------- STR PT1={V=127BR=15p127[31rrf""""frr"ar]rrp.T(64,127,!4^8)BR=15frfrfr} STR PT2={FOR(INT D=0;D<7;D++){[4MidiDelay({rrfrrr"ar},D-1,!8)]}[3rrfrrr"ar]} STR PT3={V=127BR=15p127[31rrf""""frr"a""""f]rrp.T(64,127,!4^8)BR=15frfrfr} STR PT4={V.T(127,0,!1^1^1^1^1^1^1^1^1^1)PT2} //KICK&SNARE--------------------------------------------------------------------------------------- STR BD={'n32n35'}STR SD={'n32n35n36'}STR BS1={BR=10p127[30BD;rrrSD;rrr]}STR BS2={[48BD;rrr]} //HIHAT-------------------------------------------------------------------------------------------- STR XC1={BR=20p127[63rr'n44n28n38n54'r]} STR XC2={BR=20p127[32rr['n44n28n38n54']rr'n28n44'r]} STR XC3={[24rr['n44n28n38n54']rr'n28n44'r]} //PER---------------------------------------------------------------------------------------------- STR BW={p64v150v.T(0,150,!4)S{r-64[3'n85n28'48]}r}STR BW0={[7r1]p127S{r2n32n32rMidiDelay({n54},4, !16)rrn38}[MidiDelay({n27},8,!32)r]}STR BW1={[8r1]BW0}STR BW2={[32rrrrBW;rrr]} STR BW3={[8r1]BW0} //TR=12-------------------------------------------------------------------------------------------- STR FR1={BR=30p.W(60,0,!16)l4q40@80,0[60c]}STR FR2={[48c]} //TR=13-------------------------------------------------------------------------------------------- STR PA1={p.T(50,60,!1,60,30,!1,30,60,!1^2,60,80,!2,80,127,!1^1^1^1)BR=20 V.T(127,127,!1^1^1^1,127,50,!1^1^1^1)IF(CH==14){V.T(50,50,!1^1^1^1,50,127,!1)}l1'"ac#e'^^^^^^} STR PA2={[8r1]PA1} STR PA3={p.T(0,50,!1^1^1^1^1^1^1^1,50,60,!1,60,30,!1,30,60,!1^2,60,80,!2,80,127,!1^1^1^1)BR=20 V.T(0,127,!1^1^1^1^1^1^1^1,127,127,!1^1^1^1,127,50,!1^1^1^1)IF(CH==14){ V.T(0,50,!1^1^1^1^1^1^1^1,50,50,!1^1^1^1,50,127,!1)}l1'"ac#e'^^^^^^^^^^^^^^}STR PA4={[8r1] p.T(50,60,!1,60,30,!1,30,60,!1^2,60,80,!2,80,127,!1^1^1^1)BR=20 V.T(127,127,!1^1^1^1,127,50,!1^1^1^1)IF(CH==14){V.T(50,50,!1^1^1^1,50,127,!1)}l1'"ac#e'^^^^^^^} //TR=15-------------------------------------------------------------------------------------------- STR GT1={V.T(0,127,!1^1^1^1^1^1^1^1^1^1^1^1^1^1^1^1)BR=15p127[30EP.W(127,0,!32)rrr@109,0q40"arrrr]} STR GT2={BR=15p127V=127[32EP.W(127,0,!32)rrr@109,0q40"arrrr]} //TR=16-------------------------------------------------------------------------------------------- STR CY1={r-4@123,1V.T(0,0,!4,110,110,!1^1^1,0,0,!32)'>gg#a<'1^1^1^1^2^4^3} //(TIME, BAS, BAS, TR3, TR4, TR5, TR6, TR7, TR8,KiSn,HiHt,Perc,TR12,TR13,TR14,TR15,TR16)(//R+) PL( SET, , , , , , , , , , , BW0, , PA1, PA1, , ) PL( 000, , , , , , , , , BS1, , BW1, FR1, , , , ) PL( 016, , , , , , , , , BS2, XC1, , FR2, , , , ) PL( 032, , , , , , PT1, PT1, PT1, BS1, XC1, BW1, FR1, , , , ) PL( 048, , , CH1, , , PT1, PT1, PT1, BS1, XC2, BW1, FR1, , , , ) PL( 064, , , , , , PT2, PT2, PT2, , XC3, , , PA2, PA2, , ) PL( 080, VC1, VC1, , , , PT1, PT1, PT1, BS1, XC1, BW2, FR1, , , , CY1) PL( 096, VC1, VC1, CH1, , , PT1, PT1, PT1, BS1, XC2, BW2, FR1, , , , ) PL( 112, VC1, VC1, , SY1, , PT3, PT3, PT3, BS2, , , FR2, , , , ) PL( 128, VC1, VC1, CH1, SY1, , PT3, PT3, PT3, BS1, XC2, BW2, FR1, , , , CY1) PL( 144, , , , , , PT3, PT3, PT3, BS1, , BW2, FR1, , , , ) PL( 160, , , , , , PT4, PT4, PT4, , , BW3, , PA3, PA3, GT1, ) PL( 176, VC1, VC1, , SY1, , PT1, PT1, PT1, BS1, XC1, BW2, FR1, , , GT2, CY1) PL( 192, VC1, VC1, CH1, SY1, , PT1, PT1, PT1, BS1, XC2, BW2, FR1, , , GT2, ) PL( 208, VC1, VC1, , SY1, , PT3, PT3, PT3, BS2, , , FR2, , , GT2, ) PL( 224, VC1, VC1, CH1, SY1, , PT3, PT3, PT3, BS1, XC2, BW2, FR1, , , GT2, CY1) PL( 240, VC1, VC1, , SY1, , PT4, PT4, PT4, , XC2, BW2, , PA4, PA4, , ) PL( 256, VC1, VC1, , SY1, , , , , BS1, XC2, , FR1, , , , CY1) PL( 272, , , , SY1, , , , , BS2, XC1, BW1, FR2, , , , ) End この曲は自作のオリジナル曲であるか、または、作曲者の死後50年以上経過した著作権に問題がない曲であることを確認しましたか? いいえ。よく分かりません はい。著作権に問題ありません (←選択)