サクラトップ > 掲示板トップ > 投稿フォーム
曲の投稿にはユーザー登録が必要です。 曲 名 作 者 名前: パスワード: 転 載 全て許可 全て許可 メール連絡すれば可 許可しない (ゲームのBGMなど使いたい場合、許可するかどうかを指定。 サクラ本体への収録はあらかじめご承諾ください。) ゲーム制作サイト「Rmake」への転載(およびMP3変換)を許可する ジャンル ダンス・エレクトロニカ ポップス ハードロック・ヘヴィーメタル ヒップホップ クラシック 歌謡曲・演歌 J-POP ロック ブルース・カントリー ダンス・エレクトロニカ ワールド アニメ・ゲーム 日本の伝統音楽・芸能 オルタナティヴロック ソウル・R&B ジャズ・フュージョン ヒーリング・ニューエイジ キッズ・ファミリー 音 源 (パソコン内蔵音源、GS音源、GM音源など) 公開 公開する 削除する (公開を中止して削除するときには、この項目を変更します。) コメント はい 曲データ(サクラから貼り付けます。) //------------------------------------------------------------------------------------------------- // テキスト音楽「サクラ」音楽データ (dSakura.dll Version.2.372)[08/08/11MO][MINIMALTECHNO]W-Temp'08 //------------------------------------------------------------------------------------------------- Include(gs.h)ResetGS;Include(delay.h)System.MeasureShift=2System.vMax=150TrackName={"Gap Correction"} Copyright={"West"}MetaText{"*PR* Myblog→ " katasumi_7019@yahoo,co,jp " *Access here!*} //------------------------------------------------------------------------------------------------- Tempo=132FUNCTION XE(tx){Time(tx:1:0)}FUNCTION MP(STR FR){Sub{>FR<}FR}FUNCTION MM(STR Y){Sub{}Y} FUNCTION MB(STR Z){Sub{>Z<}Sub{}Z}FUNCTION DP(P){XE(-2)GS_RHYTHM(P)r8}TR=9DP=1TR=10DP=2TR=11DP=1 FUNCTION LAC(TC,Vn,Qn,Pn,Mn,Vo,Vo2,On){TR=TC;CH=TC;XE=0l16v(Vn)q(Qn)P=Pn;M(Mn*10)@(Vo,Vo2)o(On)p64} //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,070,080,000,00,040,00,03)LAC(03,100,080,064,00,014,00,05)LAC(06,100,080,064,00,039,00,03) LAC(02,060,080,127,00,038,00,03)LAC(04,100,080,064,00,053,00,05)LAC(07,100,080,000,00,118,00,05) INT STME=0INT SET=STME*-1INT R=0LAC(05,100,080,064,00,081,01,05)LAC(08,100,080,127,00,118,00,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,127,080,064,00,026,00,03)LAC(12,080,080,064,00,116,00,03)LAC(15,100,080,064,00,039,00,06) LAC(10,100,080,064,00,026,00,03)LAC(13,100,050,064,00,081,01,06)LAC(16,100,080,064,00,039,00,03) LAC(11,100,080,064,00,026,00,03)LAC(14,100,080,064,00,039,00,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}PlayFrom(0); //BASS--------------------------------------------------------------------------------------------- STR VC1={[16[3r4]dc#dr]}STR VC2={[64rrgr]}STR VC3={r1[60rrgr]} //MELO1-------------------------------------------------------------------------------------------- STR MD1={[8r1l32MidiDelay({erreerreerre'"bb'rrr},2,!2)r2l16]}STR MD2={q99[16MidiDelay({erreerreerre '"bb'rrr},2,!2)]l16}STR MD3={l32[16MidiDelay({[erreerreerrr'"bb'rr'"bb']},2,!2)]} //MELO1-------------------------------------------------------------------------------------------- STR LE1={[8r1r2rrrrrr'df'r]}STR LE2={[4[r1r2rrr:rrr'df'r]'df'^[3'df']]} //FAM2--------------------------------------------------------------------------------------------- STR AR1={[32grrgrrrr]}STR AR2={r1[30grrgrrrr]}STR AR3={MidiDelay({AR1},4,!8)} //SE4---------------------------------------------------------------------------------------------- STR ER1={@120,0l8[16rrr``g^^^r]}STR ER2={[14rrr``g^^^r]q100``g1^1} //BASS2-------------------------------------------------------------------------------------------- STR RO1={l16[8BR=50p.W(30,0,!4)[g^gag^e^gega:g^e^]gge^]} //KICK&SNARE--------------------------------------------------------------------------------------- STR BD={BR=10p0'n27n32n35'}STR SD={BR=10p127'n27n28n32n35'}STR BS1={[63BD;rrr]SD;rrr}STR BS2={[32BD rrrSD;rrr]}STR BS3={[4BD;rrBD;SD;rrr[7BD;rrrSD;rrr]]}STR BS4={BD;rrrMidiDelay({SD;rrr},8,!8)[31BD;r rrSD;rrr]}STR BS5={[16BD;rrrSD;rrr]BD;rrrl32[8SD]l16[15BD;rrrSD;rrr]} //HIHAT-------------------------------------------------------------------------------------------- STR XA={V=127BR=5p127'n42n44n70n82'}STR XC1={l8[4[rXA;rrrrrXA][rXA;]rrrXA;rXA;rrrrrXA]}STR XC2={[64 rXA]}STR XC3={S{l8[4[n46rn46rn51n51rn52rn51rn51rn52r:n53]n49]}XC2}STR XC4={l16[16[3rrXA:r]XA;rrXA;r ]}STR XC5={S{XC3}XC4}STR XC6={r1[60rrXA;r]} //PER---------------------------------------------------------------------------------------------- STR BW={v100p64'n27n32n33'}STR HQ={n27}STR BW0={[16[4HQ;rHQ]rrrr]}STR BW1={[4[3[4BW;rBW]rrrr][[BW]r BW][3BW;r]]}STR BW2={[[3[4BW;rBW]rrrr][[BW]rBW][3BW;r]][4BW;r][8BW][[4BW;rBW]rrrr][[BW]rBW][3BW;r] [[4BW;rBW]rrrr][[BW]rBW][3BW;r]} //TR=12-------------------------------------------------------------------------------------------- STR GT={p.onCycle(!16,127,127,0,0,127,127,0,0,127,0,127,0,127,127,0,0)}STR GT1={[4[4BR=5GT:S{ererer erereeerrr}brgrbrgrbrbbbrrr]S{eereeereerererrr}bbrgbbrgbrarbrrr]}STR GT2={[8GT;bbbbbrrrr2>>rrfrffrf rfrffrfr<<]}STR GT3={r1[BR=5GT:S{ererererereeerrr}brgrbrgrbrbbbrrr]S{eereeereerererrr}bbrgbbrgbrarb rrr[3[4BR=5GT:S{ererererereeerrr}brgrbrgrbrbbbrrr]S{eereeereerererrr}bbrgbbrgbrar]} //TR=13-FAM---------------------------------------------------------------------------------------- STR TF0={[15r1]V.T(0,100,!1)[16g]}STR TF1={M=0P=0q50[[14rrgr]gggggrgr][rrgr]grMidiDelay({Div{gggg}8 },16,!8)rggg[10rrgr]gggggrgr[14rrgr]gggggrgr}STR TF2={M=127P=127q100TF1}STR TF3={[8r1][8grrgggrgrgr ggrgr]}STR TF4={[16rrgrgggrgggggrMidiDelayS({g})r]}STR TF5={r1[60rrgr]} //TR=14-------------------------------------------------------------------------------------------- STR FS0={@126,8[11r1]r2BR=40p.T(127,127,!4,126,0,!4)'<>'^^^^^rr}STR FS1={@11,0[3r1]r2V.T(30,80 ,!2)[8`e]}STR FS2={@11,0[8rr`errrrrr2r1]}STR FS3={@125,1q100p.T(127,80,!1)'cde'1V.T(100,30,!1)p.W( 127,64,!1)'cde'1} //TR=15-------------------------------------------------------------------------------------------- STR FR1={@125,4l8t3MidiDelay({erededed},4,!1)t0l16}STR FR2={@94,0BR=20S{FOR(Int G=0;G<16;G++){p.T( 64-G*2,64+G*2,!8)r8}}'ae'1}STR FR3={<@82,1MM({[[7r1]r2rf^&e&f&e^^]})>}STR FR4={@116,0[64p.T(127,0, !1)l16gfed]}STR FR5={[15r1]@125,4l16t3drrrdrerdrerdrrrt0} //TR=16-------------------------------------------------------------------------------------------- STR CY1={@127q100[14r1]p.T(0,127,!1,0,127,!1)V.T(0,60,!1,0,90,!1)'>>>>>cg<<<<<'1^1}STR CY2={@126,8 [15r1]p.T(127,0,!2,0,127,!4,127,0,!4)'>>>ceg<<<'1}STR CY3={@126,8q100[7r1]p.T(0,127,!1)'>ceg<'1p.T( 127,64,!1)'>ceg<'1}STR CY4={@123,3Sub{V.T(100,60,!1^1)q100'cc#dd#ef'1^1}FOR(INT E=0;E<32;E++){BR=50 p.W(64+E*2,64-E*2,!16)}}STR CY5={@125,1P=0v60l1BR=40p.T(127,0,!1^1^1^1^1^1^1^1)q100'ae'^^^^^^^p.T(0 ,127,!1^1^1^1^1^1^1^1)q100v.T(60,60,!1^1^1^1,69,20,!1^1^1^1)'ae'^^^^^^^l16} //(TIME, BAS, BAS, SEM,SEM2,FAM2, SE4,BAS2,BAS2,KiSn,HiHt,Perc, WOB, FAM, SE1, SE2, SE3) PL( SET, , , , , , , , , BS1, , BW0, GT1, TF0, , , CY1) PL( 016, VC1, VC1, , , , , , , BS2, , BW0, GT1, TF1, FS0, FR1, CY2) PL( 032, VC1, VC1, , , , , , , BS2, XC1, BW1, GT1, TF2, FS1, FR2, ) PL( 048, VC1, VC1, MD1, LE1, AR1, , , , , XC3, BW1, GT2, TF3, FS2, FR3, CY1)//in en PL( 064, VC2, VC2, , , , , , , BS3, XC4, BW1, GT1, TF2, , FR1, ) PL( 080, VC2, VC2, , , AR1, , , , BS3, XC4, BW1, GT1, TF2, FS3, , CY3) PL( 096, VC2, VC2, , , AR1, , , , BS3, XC4, BW1, GT1, TF4, FS3, FR4, ) PL( 112, VC2, VC2, , , AR1, , , , BS3, XC5, BW1, GT1, TF4, FS3, FR4, CY1)//01 en PL( 128, VC3, VC3, , , AR2, ER1, , , BS4, XC6, BW1, GT3, TF5, , FR5, ) PL( 144, VC2, VC2, MD1, , AR1, , , , BS3, XC4, BW2, GT1, TF4, FS2, FR2, CY4) PL( 160, VC3, VC3, MD1, LE1, AR2, ER1, , , BS3, XC4, BW1, GT1, TF4, FS0, FR4, ) PL( 176, VC3, VC3, MD2, LE2, AR3, ER1, RO1, RO1, BS1, XC3, BW0, GT1, TF4, FS0, FR4, CY1)//02 en PL( 192, VC3, VC3, MD2, LE2, AR3, ER2, RO1, RO1, BS5, XC4, BW1, GT1, TF4, FS2, FR1, CY4) PL( 208, VC3, VC3, MD2, LE2, AR3, ER1, RO1, RO1, BS2, XC5, BW1, GT1, TF4, FS3, FR3, CY2) PL( 224, VC3, VC3, MD3, LE2, AR3, ER1, RO1, RO1, BS5, XC5, BW1, GT1, TF4, FS0, FR1, CY1) PL( 240, VC3, VC3, MD3, LE2, AR3, ER1, RO1, RO1, BS5, XC5, BW1, GT1, TF4, FS0, FR4, CY1)//03 en PL( 256, VC3, VC3, , , AR2, ER1, , , BS4, XC6, BW1, GT3, TF5, , FR5, ) PL( 272, VC2, VC2, , , AR1, , , , BS3, XC5, BW1, GT1, TF4, FS3, FR3, CY1) PL( 288, VC2, VC2, , , , , , , BS3, XC4, BW1, GT1, TF1, FS3, FR2, CY4) PL( 304, , , , , , , , , , , BW0, GT1, , , , CY4)End この曲は自作のオリジナル曲であるか、または、作曲者の死後50年以上経過した著作権に問題がない曲であることを確認しましたか? いいえ。よく分かりません はい。著作権に問題ありません (←選択)