サクラトップ > 掲示板トップ > 投稿フォーム
曲の投稿にはユーザー登録が必要です。 曲 名 作 者 名前: パスワード: 転 載 許可しない 全て許可 メール連絡すれば可 許可しない (ゲームのBGMなど使いたい場合、許可するかどうかを指定。 サクラ本体への収録はあらかじめご承諾ください。) ゲーム制作サイト「Rmake」への転載(およびMP3変換)を許可する ジャンル ダンス・エレクトロニカ ポップス ハードロック・ヘヴィーメタル ヒップホップ クラシック 歌謡曲・演歌 J-POP ロック ブルース・カントリー ダンス・エレクトロニカ ワールド アニメ・ゲーム 日本の伝統音楽・芸能 オルタナティヴロック ソウル・R&B ジャズ・フュージョン ヒーリング・ニューエイジ キッズ・ファミリー 音 源 (パソコン内蔵音源、GS音源、GM音源など) 公開 公開する 削除する (公開を中止して削除するときには、この項目を変更します。) コメント hai 曲データ(サクラから貼り付けます。) //------------------------------------------------------------------------------------------------- // テキスト音楽「サクラ」音楽データ (dSakura.dll Version.2.372)[09/12/28MO][DIRTY DUTCH]W-Temp'09 //------------------------------------------------------------------------------------------------- // Include(gs.h)ResetGS;r4;Include(delay.h)System.MeasureShift=2System.vMax=150 TrackName={"Homuramai (West 2010 Remix)"}Copyright={"West"} MetaText{"*PR* Myblog→ " http://nu3d.blog.shinobi.jp/ " *Access here!*} //------------------------------------------------------------------------------------------------- Tempo=130FUNCTION 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=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)} FUNCTION ATC(STR IX,STR EV,STR IG,Si=6,Se=7,Ei=8){IF(CH==Si){IX}IF(CH==Se){EV}IF(CH==Ei){IG}} FUNCTION BTC(STR OR,STR IV,Fo,Fi){IF(CH==Fo){OR}IF(CH==Fi){IV}} //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,100,064,00,082,01,03)LAC(03,150,100,064,00,082,00,03)LAC(06,127,120,127,12,062,00,06) LAC(02,150,100,064,00,039,00,03)LAC(04,127,120,064,00,003,00,05)LAC(07,127,120,064,12,082,00,06) INT STME=0INT SET=STME*-1INT R=0LAC(05,127,120,064,00,005,08,05)LAC(08,127,120,000,12,063,00,06) //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,025,00,03)LAC(12,127,100,064,00,081,08,05)LAC(15,127,080,064,00,039,09,05) LAC(10,127,080,064,00,001,00,03)LAC(13,127,100,000,00,117,00,04)LAC(16,127,100,064,00,039,09,05) LAC(11,127,080,064,00,026,00,03)LAC(14,127,100,127,00,117,01,04)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 VCA={o4ATC({@49,0},{@45,0},{@50,0},1,2,3)}STR VCB={o3ATC({@82,1},{@39,0},{@82,0},1,2,3)} STR VC1={VCB;V=100t.onCycle(!16,0,5)l16[16p.W(70,50,!4)rrr"f#rrbr]} STR VC2={VCA;l1V=50p.W(64,60,!1)['eg#b''f#a#`c#':'d#g#b''f#a#`c#']'d#f#`c#''g#bd#'} STR VC3={VCA;l1V=50p.W(64,60,!1)['eg#b''f#a#`c#':'d#g#b''f#a#`c#']'g#a#d#'^} STR VC4={VCA;l1'eg#b'^^^^^^} STR VC5={VCB;V=100[128v.onCycle(!16,100,100,100,70,100,100,70,100)p.W(70,50,!4)b16]} STR VC6={VCB;>[[""g#rr['g#bd#',,90^:""g#]][""a#rr['f#a#`c#',,90^:""a#]][""brr['d#g#b',,90^:""b]]:[ ""a#rr'f#a#`c#',,90""a#:r'f#a#`c#',,90^]['f#a#`c#',,90]r]""c#rr['d#f#`c#',,90^:""c#]""d#r[3r 'g#bd#',,90]<} STR VC7={VCB;>[[""g#rr['g#bd#',,90^:""g#]][""a#rr['f#a#`c#',,90^:""a#]][""brr['d#g#b',,90^:""b]]:[""a#rr'f#a#`c#',,90 ""a#:r'f#a#`c#',,90^]['f#a#`c#',,90]r]"brr'g#a#d#',,90"br'g#a#d#',,90r""b""br'g#a#d#',,90""b'g#a#d#',,90'g#a#d#',,90r<} //MELO--------------------------------------------------------------------------------------------- STR MDA={q100;BTC({@3,0},{@5,0},4,5)}STR MDB={q40BTC({@3,0M=10},{@39,8M=10},4,5)} STR MD1={MDA;t.onCycle(!16,0,5)V=127l4r-2MP({[[p64d#f#g#^]:d#f#g#b8g#8f#g#d#^]`d#^`c#`d#8`c#8b`c#`d#^})} STR MD2={MDA;r-2MP({[l4d#f#l4g#^]d#f#g#b8g#8f#g#d#^d#f#g#^`d#^`c#`d#8`c#8bg#b^^^^^^})} STR MD3={MDB[MidiDelay({l16V=90;rrr},8,!8)r4r2r1r1r1]} STR MD4={MDB[16l16rrMidiDelay({r'<'rr'>'r},1,!8)]} STR MD5={MDA;l8[MP({a#a#rg#^g#rf#f#f#rf#^f#rf#f#f#rf^frf#f#f#rg#^g#rf#})]} STR MD6={r-2[5d#f#:g#^][8g#4][8g#8]r2MDB;l16rrMidiDelay({r'<'rr'>'r},1,!8)} STR MD7={MDB;MidiDelay({[[8l16p64rrrp64'<>'r:r'<>'r]BR=10p.T(64,127,!4)['<>']rp64]},1,!8)} STR MD8={q.T(40,127,!1^1^1^1^1^1^1^1)MD7}STR MD9={q.T(40,127,!1^1^1^1^1^1^1^1)V.T(40,100,!1^1^1^1^1^1^1^1) t0;MDB[128p64l16'<>']t.onCycle(!16,0,5)} STR MD10={MDB;S{MD1}MD4} STR MD11={MDB;S{MD2}MD4} //SYNTH-------------------------------------------------------------------------------------------- STR SYA={o6ATC({@82,1},{@82,0},{@82,8})}STR SYB={o5V=120ATC({@1,1},{@2,0},{@4,0})} STR SYC={o5@62,0ATC({BR=10p66},{BR=20p64},{BR=30p62})}FUNCTION Q(STR SY){l8V=80'SY'[3'SY'r]'SY'} STR SY1={SYA;t.onCycle(!16,0,5)q60MidiDelay({[8V.T(50,80,!2,80,50,!2)rrrd#d#rd#d#rd#rd#d#rd#d#]})} STR SY2={SYB[Q({'eg#b'})Q({'f#a#`c#'}):Q({'d#g#b'})Q({'f#a#`c#'})]Q({'d#f#`c#'})Q({'g#bd#'})} STR SY3={SYB[Q({'eg#b'})Q({'f#a#`c#'}):Q({'d#g#b'})Q({'f#a#`c#'})][Q({'g#a#d#'})]} STR SY4={SYA;l1q100'""e'^^^^^^q120} STR SY5={[8l16t.onCycle(!16,0,5)SYA;MidiDelay({b^bbrbrbBR=12p.T(64,64,!8,64,0,!16)b^b^p64brb^},1,!4)]} STR SY6={MidiDelay({d#^d#d#rd#rd#BR=12p.T(64,64,!8,64,0,!16)g#^g#^p64g#rg#^[7b^bbrbrbBR=12p.T(64,64,!8,64,0,!16)b^b^p64brb^]},1,!4)} STR SY7={SYA;q100V.T(0,120,!1^1^1^1^1^1^1)l1b^^^^^^l4[4'b`b']} STR SY8={MM({SY5})}STR SY9={MM({SY6})} //KICK&SNARE--------------------------------------------------------------------------------------- STR BD={'n27n36n35n32'} STR BS1={@25,0BR=5p30[16t.onCycle(!16,0,5)p30BD;rrp40'n86n45n27'p30BD;rp0'n87n27'r]} STR BS2={@26,0BR=10p127[8rrrr'n28n35'rrr][8'n28n35'rrr][16'n28n35']p.T(127,0,!2)[9n28]} STR BS3={@25,0BR=5p30[15t.onCycle(!16,0,5)p30BD;rrp40'n86n45n27'p30BD;rp0'n87n27'r]} STR BS4={@25,0BR=5p30[16t.onCycle(!16,0,5)p30BD;rrp40'n86n45n27'p30BD:rp0'n87n27'r][3p40'n86n45n27']} STR BS5={V.T(0,100,!1^1^1^1^1^1^1^1)BS1} STR BS6={V=127[128BD]} STR BS7={@25,0BR=5p30[12t.onCycle(!16,0,5)p30BD;rrp40'n86n45n27'p30BD;rp0'n87n27'r] [4p30BD;rrp40'n86n45n27'][4BD;r][8BD]} //HIHAT-------------------------------------------------------------------------------------------- STR XC1={BR=10p70V=127S{n55}[32'n39n51'rn27r]} STR XC2={BR=10p70[28'n39n51'rn27r][4'n39n51'r'n27n39n51'r]n55} STR XC3={BR=10p70S{n55}[16'n39n51'rrr][16'n39n51'r][16'n39n51']p.T(70,0,!2^4)[9n39]V=0} STR XC4={BR=10p70V=127[16'n39n51'rrr][16'n39n51''n40n51''n55n40''n40n51']} //PER---------------------------------------------------------------------------------------------- STR BW1={BR=5p70[32t.onCycle(!16,0,5)'n27n42'p127rp70'n44n46n42'r]} STR BW2={BR=5p70[32t.onCycle(!16,0,5)'n27n42'p127n70p70'n44n46n42n70'n70]} //TR=12-------------------------------------------------------------------------------------------- STR FR1={p.W(60,0,!32)V.W(127,0,!2)BR=30l16q40[16f#rrrf#rf#r]} //TR=13-------------------------------------------------------------------------------------------- STR PAA={@117,4o4}STR PAB={o6V=70BTC({@88,0},{@8,0},13,14)}STR PAC={o4ATC({@49,0},{@50,0},13,14)} STR PA1={PAA;TrackKey=0l16[16t.onCycle(!16,0,5)drr"brr"br]} STR PA2={l8PAB;TrackKey=-1cafcacfcdbgdg"bd"bcaecacec"bge"bg"be"bcafcacfcdbgdg"bd"b"bge"bg"be"bcaecacec} STR PA3={l8PAB;TrackKey=-1cafcacfcdbgdg"bd"bcaecacec"bge"bg"be"bcafcacfcdbgdg"bd"bcaecaceccaecacec} STR PA4={PAC;v150;l1V=50p.W(64,60,!1)['eg#b''f#a#`c#':'d#g#b''f#a#`c#']'d#f#`c#''g#bd#'} STR PA5={PAC;l1V=50p.W(64,60,!1)['eg#b''f#a#`c#':'d#g#b''f#a#`c#']'g#a#d#'^} //TR=15-------------------------------------------------------------------------------------------- STR GT1={[4r1]V.T(0,127,!1^1^1^1)p.T(0,127,!1^1^1^1)l8@127,0BR=10[16r'cde']} STR GT2={V.T(127,0,!1^1^1^1)p.T(127,0,!1^1^1^1)l8@127,0BR=10[16'cde'^]} STR GT3={V.T(0,90,!1^1^1^1^1^1^1^1)l1@127,0p.T(0,127,!1^1^1^1^1^1^1^1)l1q100'cde'^^^^^^^} STR GT4={V.T(0,90,!1^1^1^1^1^1^1^1)l1@127,0p.T(0,127,!1^1^1^1^1^1^1^1)l1q100'cde'^^^^^^} //TR=16-------------------------------------------------------------------------------------------- STR CY1={@126,7l1V.T(0,0,!1^1,30,127,!1^1,127,0,!1^1^1)BR=30p.T(70,64,!1^1^1^1)`````c^^^^^^^} STR CY2={[4r1]CY1} STR CY3={r-4@123,1V.T(0,0,!4,110,0,!1^1^1^1^1^1^1^1^1)'>cde<'1^1^1^1^1^1^1^1^1^4} STR CY4={@127,0p.T(127,100,!1^1)[8V.T(0,127,!8)'cde'4]V=0} STR CY5={V.T(0,90,!1^1^1^1^1^1^1^1)l1@82,0p.T(0,127,!1^1^1^1^1^1^1^1)BR=30l1q100'c'^^^^^^^} //(TIME, BAS, BAS, TR3, TR4, TR5, TR6, TR7, TR8,KiSn,HiHt,Perc,TR12,TR13,TR14,TR15,TR16)(//R+) PL( SET, , , , , , , , , BS1, , , FR1, PA1, PA1, , CY3) PL( 008, , , , , , , , , BS1, , , FR1, PA1, PA1, , ) PL( 016, , , , MD3, MD3, SY1, SY1, SY1, BS1, XC1, , FR1, PA1, PA1, , ) PL( 024, , , , MD3, MD3, SY1, SY1, SY1, BS1, XC2, , FR1, PA1, PA1, GT1, ) PL( 032, , , , , , , , , , , , , , , GT2, CY1)R=4 PL( 032, VC2, VC2, VC2, MD5, MD5, SY2, SY2, SY2, , , , , , , , ) PL( 040, VC3, VC3, VC3, MD5, MD5, SY3, SY3, SY3, , , , , , , , CY2) PL( 048, VC2, VC2, VC2, MD1, MD1, SY2, SY2, SY2, , , , , PA2, PA2, , ) PL( 056, VC3, VC3, VC3, MD2, MD2, SY3, SY3, SY3, , , , , PA3, PA3, , ) PL( 064, VC4, VC4, VC4, MD6, MD6, SY4, SY4, SY4, BS2, XC3, , , , , GT4, ) PL( 072, VC1, VC1, VC1, MD4, MD4, SY5, SY5, SY5, BS1, , , FR1, PA1, PA1, , CY3) PL( 080, VC1, VC1, VC1, MD7, MD7, SY5, SY5, SY5, BS3, XC1, BW1, FR1, PA1, PA1, , ) PL( 088, VC1, VC1, VC1, MD7, MD7, SY6, SY6, SY6, BS4, XC1, BW2, FR1, PA1, PA1, GT2, CY4) PL( 096, VC1, VC1, VC1, MD8, MD8, SY5, SY5, SY5, BS3, XC2, BW2, FR1, PA1, PA1, GT3, ) PL( 104, VC3, VC3, VC3, MD5, MD5, SY3, SY3, SY3, BS3, XC2, BW2, , , , , CY1) PL( 112, VC2, VC2, VC2, MD1, MD1, , , , , , , , , , GT2, ) PL( 120, VC3, VC3, VC3, MD2, MD2, , , , BS5, , , FR1, PA1, PA1, , CY2) PL( 128, VC5, VC5, VC5, MD9, MD9, SY7, SY7, SY7, BS6, XC4, , FR1, PA1, PA1, GT3, CY5) PL( 136, VC1, VC1, VC1, MD4, MD4, SY8, SY8, SY8, BS1, , , FR1, PA1, PA1, , CY3) PL( 144, VC1, VC1, VC1, MD7, MD7, SY8, SY8, SY8, BS3, XC1, BW1, FR1, PA1, PA1, , ) PL( 152, VC1, VC1, VC1, MD7, MD7, SY9, SY9, SY9, BS4, XC1, BW2, FR1, PA1, PA1, GT2, CY4) PL( 160, VC1, VC1, VC1, MD8, MD8, SY8, SY8, SY8, BS3, XC2, BW2, FR1, PA1, PA1, GT3, ) PL( 168, VC6, VC6, VC6,MD10,MD10, SY8, SY8, SY8, BS1, XC1, BW2, FR1, PA4, PA4, , ) PL( 176, VC7, VC7, VC7,MD11,MD11, SY8, SY8, SY8, BS1, XC2, BW2, FR1, PA5, PA5, GT2, CY4) PL( 184, , , , MD3, MD3, SY5, SY5, SY5, BS1, XC1, BW2, FR1, PA1, PA1, , ) PL( 192, , , , MD3, MD3, SY5, SY5, SY5, BS1, XC2, BW2, FR1, PA1, PA1, GT1, ) PL( 200, , , , , , SY1, SY1, SY1, BS1, XC1, BW1, FR1, PA1, PA1, , CY3) PL( 208, , , , , , SY1, SY1, SY1, BS7, XC2, BW1, FR1, PA1, PA1, , ) この曲は自作のオリジナル曲であるか、または、作曲者の死後50年以上経過した著作権に問題がない曲であることを確認しましたか? いいえ。よく分かりません はい。著作権に問題ありません (←選択)