サクラトップ > 掲示板トップ > 投稿フォーム
曲の投稿にはユーザー登録が必要です。 曲 名 作 者 名前: パスワード: 転 載 全て許可 全て許可 メール連絡すれば可 許可しない (ゲームのBGMなど使いたい場合、許可するかどうかを指定。 サクラ本体への収録はあらかじめご承諾ください。) ゲーム制作サイト「Rmake」への転載(およびMP3変換)を許可する ジャンル ダンス・エレクトロニカ ポップス ハードロック・ヘヴィーメタル ヒップホップ クラシック 歌謡曲・演歌 J-POP ロック ブルース・カントリー ダンス・エレクトロニカ ワールド アニメ・ゲーム 日本の伝統音楽・芸能 オルタナティヴロック ソウル・R&B ジャズ・フュージョン ヒーリング・ニューエイジ キッズ・ファミリー 音 源 (パソコン内蔵音源、GS音源、GM音源など) 公開 公開する 削除する (公開を中止して削除するときには、この項目を変更します。) コメント 曲データ(サクラから貼り付けます。) //------------------------------------------------------------------------------------------------- // テキスト音楽「サクラ」音楽データ (dSakura.dll Version.2.372)[08/10/22WE][MINIMAL TECHNO]W-Temp'08 //------------------------------------------------------------------------------------------------- Include(gs.h)ResetGS;r4;Include(delay.h)System.MeasureShift=2System.vMax=150 TrackName={"tanzen Sie in Klickenklang (West Remix)"}Copyright={"West"} MetaText{"*PR* Myblog→ " katasumi_7019@yahoo,co,jp " *Access here!*} //------------------------------------------------------------------------------------------------- Tempo=128FUNCTION 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,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,120,080,032,01,033,00,02)LAC(03,120,080,096,00,008,00,03)LAC(06,127,080,064,00,039,09,06) LAC(02,080,080,064,02,081,00,02)LAC(04,090,080,064,00,006,00,06)LAC(07,127,015,064,02,080,00,05) INT STME=0INT SET=STME*-1INT R=0LAC(05,090,080,064,00,082,01,06)LAC(08,127,015,064,02,012,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,127,080,064,00,039,09,05)LAC(15,127,100,064,00,039,09,05) LAC(10,127,080,064,00,025,00,03)LAC(13,090,080,064,00,039,09,06)LAC(16,127,100,064,00,039,09,05) LAC(11,127,080,064,00,026,00,03)LAC(14,090,080,064,00,039,09,06)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={l16[8rr"arr"arrrrrrrrrrr1]}STR VC2={l32[4[[rrr[3"a^rr]"a:r2]:r2]IF(CH==3){r4MP({frrffrrf}) }Else{r2}]}STR VC3={l16[4[rr"arr"a[24r]:IF(CH==3){MP({ff})}ELSE{rr}]rr]}STR VC4={BR=20 V=80p.T(64,127,!1^1^1^1^1^1^1^1^1^1^1^1^1^1^1^1)[30MM({arrarrar})]p64IF(CH==2){V=80}Else{V=120}} //MELO--------------------------------------------------------------------------------------------- STR MD1={[8r1]BR=40MidiDelay({l16p64rrrrrrcr"arrrrrdrd&&`e[14r]},16,!4)l16}STR MD2={BR=40[16l32rrrr crr"arrdrd&&errr2]}STR MD3={FOR(INT M=0;M<4;M++){MidiDelay({[4l32rrrrcrr"arrdrd&&errr2]},M,!8)}} STR MD4={[4r1d&&`e[14r]r1^1]}STR MD5={FOR(INT N=0;N<16;N++){MidiDelay({l32rrrrcrr"arrdrd&&errr2},N, !8)}}STR MD6={FOR(INT I=0;I<8;I++){MidiDelay({[l32rrrrcrr"arrdrd&&errr2]},I,!8)}} //SYNTH-------------------------------------------------------------------------------------------- STR SY1={[8r1]@82,1V=90MidiDelay({"arrerrcr},8,!2)} //KICK1-------------------------------------------------------------------------------------------- STR YT1={l4BR=30p.W(70,0,!32)@79,0q=15[32'"g"ec']}STR YT2={l4BR=30p.W(70,0,!32)@79,0q=15[8'"g"ec'8] } //KICK2-------------------------------------------------------------------------------------------- STR GF1={l4BR=30p.W(70,0,!32)@80,0q=15[32'"gc']}STR GF2={l4BR=30p.W(70,0,!32)@79,0q=15[8'"gc'8]} //KICK&SNARE--------------------------------------------------------------------------------------- STR BD={BR=13p127'n27n32n35'}STR SD={BR=13p127'n27n32n28n35'}STR BS1={[64BD;r:rr]SD;SD}STR BS2={[32 BD;rrrSD;rrr]}STR GB={'n54n46'}STR GO={'n63'}STR BS3={@33P=127BR=20p%=1000[16GO;r[[GO]r]GO;l32[3GO] rGO;rl16[GO]GB;GO]@26}STR BS4={@33P=127BR=20p%=1000[15GO;r[[GO]r]GO;l32[3GO]rGO;rl16[GO]GB;GO] BR=20p%=1000[3n79][3n78n79][3n79]MidiDelay({n78},4,!16)@26}STR BS5={S{@33P=127BR=20p%=1000[15GO;r[[ GO]r]GO;l32[3GO]rGO;rl16[GO]GB;GO]@26}[60@26'n27n32n35'rrr]} //HIHAT-------------------------------------------------------------------------------------------- STR XC={'n42n85'}STR XD={'n54n46'}STR XC1={P=127BR=20p%=8000[8[rrXC;r[8r]rr:XD;XC]XC;XC]}STR XC2={ l16[8XC;r[[XC]r]XC;l32[3XC]rXC;rl16[XC]XD;XC]}STR XC3={[8[l32r8[3XC;rrXC]XC;rrr[XC;rrXC]:XD;rrXC]XC rrXC]}STR XC4={l16[16XC;r[[XC]r]XC;l32[3XC]rXC;rl16[XC]XD;XC]}STR XC5={ V.T(127,0,!1^1^1^1^1^1^1^1^1^1^1^1)[12XC;r[[XC]r]XC;l32[3XC]rXC;rl16[XC]XD;XC][3r1]r2r4p64V=127 'n49n52n55n57'BR=20p%=8000} //PER---------------------------------------------------------------------------------------------- STR BW1={BR=2p127V=90[16n27rrn27rn27rn27rn27n27rn27rrn27]}STR BW2={V.T(90,0,!1^1^1^1^1^1^1^1)[8n27r rn27rn27rn27rn27n27rn27rrn27]}STR GR={'n64'}STR TA={'n74'}STR BW3={P=0V=100@33BR=20p%=1000[16l32GR;rrGR; l16TA;GR[3GR;rTA;GR]]@26}STR BW4={V=100@33P=0BR=20p%=1000[15l32GR;rrGR;l16TA;GR[3GR;rTA;GR]] @33BR=20p%=-1000[3n79][3n78n79][3n79]MidiDelay({n78},4,!16)@26} //TR=12-------------------------------------------------------------------------------------------- STR FR1={l8[3r1]@124,2e1[3r1]@125,2c^rrc^^^l16EP=100@5,0[3r1]l8[3r1]@125,2crrrc^^^}STR FR2={l8[2r1]@124,2e1^1r1^1e1 @125,2c^rrc^^^l16EP=100@124,2e1^1e1@5,0;l8[3r1]@125,2crrrc^^^}STR FR3={l16[4[[r2:@125,2rrcrc^^^]r4:@5,0;V=100]r4]} //TR=13-------------------------------------------------------------------------------------------- STR PA1={rrV.T(100,20,!1^1^1^1^1^1^1^1,20,90,!1^1^1^1^1^1^1^1)q50@3,0IF(CH==4){l64rl16@3,0}[40 MidiDelay({`cbegba},2,!4^^)]}STR PA2={rr`cbegba} //TR=15-------------------------------------------------------------------------------------------- STR GT1={[15r1]l16@127,5MidiDelay({"g"gardgrefrffr"aar},2,!32)}STR GT2={@127,5[16"g"gardgrefrffr"aa r]}STR GT3={@126,0BR=40p.T(56,127,1^1^1^1,127,64,!1^1^1^164,127,!1^1^1^1) V.T(127,10,!1^1^1^1^1^1^1^1^1^1^1^1)""g#1^1^1^1^1^1^1^1^1^1^1^1V=127} //TR=16-------------------------------------------------------------------------------------------- STR CY1={[14r1]@126,7p64l1EP.T(0,110,!1^1)`````c^}STR CY2={[12r1]@126,7p64l1EP.T(0,110,!1^1) `````c^^^}STR CY3={@123,1p64l1p.T(127,110,!1^1^1^1^1^1^1^1)EP.T(110,0,!1^1^1^1^1^1^1^1) '>>cd#d<<'^^^^^^^p64}STR CY4={V.T(20,70,!1^1^1^1^1^1^1^1^1^1^1^1^1^1^1^1) p.T(0,127,!1^1^1^1^1^1^1^1^1^1^1^1^1^1^1^1)l1BR=30@83,0`g^^^^^^^^^^^^^^p64}STR CY5={[12r1] EP.T(0,110,!1^1)p64l1@126,7`````c^^^^2^4}STR CY6={[12r1]p64@123,1l1 p.T(110,127,1^1^1^1,127,110,!1^1^1^1^1^1^1^1)EP.T(20,110,!1^1^1^1,110,0,!1^1^1^1^1^1^1^1) '>>cd#d<<'^^^^^^^^^^^p64} //(TIME, BAS, BAS, TR3, TR4, TR5, TR6, TR7, TR8,KiSn,HiHt,Perc,TR12,TR13,TR14,TR15,TR16)(//R+) PL( SET, VC1, VC1, VC1, , , , YT1, GT1, BS1, , BW1, FR1, , , , CY1) PL( 016, VC1, VC1, VC1, MD1, MD1, , YT1, GT1, BS2, XC1, BW2, FR2, , , , ) PL( 032, , , , MD1, MD1, , YT2, GF2, BS1, XC2, BW2, FR2, PA1, PA1, GT1, CY2)//in e PL( 048, VC2, VC2, VC2, MD4, MD4, SY1, YT1, GF1, BS2, XC3, BW1, FR3, , , , CY3) PL( 064, VC2, VC2, VC2, MD4, MD4, , YT1, GF1, BS2, XC3, BW1, FR3, PA2, PA2, GT2, ) PL( 080, VC2, VC2, VC2, MD3, MD3, SY1, YT1, GF1, BS1, XC4, BW2, FR3, , , GT3, CY1)//mb PL( 096, VC2, VC2, VC2, MD2, MD2, , YT1, GF1, BS2, XC3, BW1, FR3, , , , CY3) PL( 112, VC2, VC2, VC2, MD3, MD3, , YT1, GF1, BS2, XC3, BW1, FR3, PA2, PA2, GT2, ) PL( 128, VC3, VC3, VC3, MD3, MD3, SY1, YT1, GF1, BS1, XC2, BW2, FR2, PA1, PA1, GT2, CY1)//e PL( 144, , , , MD1, MD1, , YT1, GF1, BS3, , BW3, FR1, , , , )//br PL( 160, VC4, VC4, VC4, , , SY1, YT2, GF2, BS4, , BW4, , , , , CY4) PL( 176, VC2, VC2, VC2, MD2, MD2, , YT1, GF1, BS2, XC3, BW1, FR3, PA2, PA2, GT3, CY3)//s PL( 192, VC2, VC2, VC2, MD2, MD2, SY1, YT1, GF1, BS2, XC3, BW1, FR3, PA2, PA2, GT2, CY1) PL( 208, VC2, VC2, VC2, MD5, MD5, , YT1, GF1, BS2, XC4, BW1, FR3, , , GT2, CY3)//mb PL( 224, , , , MD1, MD1, SY1, , , , XC5, , , PA1, PA1, GT3, CY5)//b PL( 240, VC2, VC2, VC2, MD2, MD2, , YT1, GF1, BS2, XC4, BW1, FR3, PA2, PA2, GT3, CY3) PL( 256, VC2, VC2, VC2, MD2, MD2, , YT1, GF1, BS2, XC4, BW1, FR3, , , GT2, CY2) PL( 272, VC3, VC3, VC3, MD4, MD4, SY1, YT1, GF2, BS1, XC4, BW1, FR1, , , GT2, CY6) PL( 288, VC3, VC3, VC3, MD4, MD4, , YT1, GF1, BS1, XC5, BW1, FR1, PA2, PA2, , CY2) PL( 304, VC1, VC1, VC1, MD2, MD2, SY1, YT1, GF1, BS1, , BW1, , , , , CY6) PL( 320, , , , MD6, MD6, , , , , , BW2, , , , , )End//e この曲は自作のオリジナル曲であるか、または、作曲者の死後50年以上経過した著作権に問題がない曲であることを確認しましたか? いいえ。よく分かりません はい。著作権に問題ありません (←選択)