サクラトップ > 掲示板トップ > 投稿フォーム
曲の投稿にはユーザー登録が必要です。 曲 名 作 者 名前: パスワード: 転 載 全て許可 全て許可 メール連絡すれば可 許可しない (ゲームのBGMなど使いたい場合、許可するかどうかを指定。 サクラ本体への収録はあらかじめご承諾ください。) ゲーム制作サイト「Rmake」への転載(およびMP3変換)を許可する ジャンル ダンス・エレクトロニカ ポップス ハードロック・ヘヴィーメタル ヒップホップ クラシック 歌謡曲・演歌 J-POP ロック ブルース・カントリー ダンス・エレクトロニカ ワールド アニメ・ゲーム 日本の伝統音楽・芸能 オルタナティヴロック ソウル・R&B ジャズ・フュージョン ヒーリング・ニューエイジ キッズ・ファミリー 音 源 (パソコン内蔵音源、GS音源、GM音源など) 公開 公開する 削除する (公開を中止して削除するときには、この項目を変更します。) コメント 【騎士王321さんの企画参加作品です】シンプルにハウスでまとめてみました。和音をあまり使ってないので皆さんの作品とは聴き劣りするかもしれませんが宜しくお願いします。あとギターの使い方が少し反則気味かもしれません。あ、そうそう、六番目です 曲データ(サクラから貼り付けます。) //------------------------------------------------------------------------------------------------- // テキスト音楽「サクラ」音楽データ (dSakura.dll Version.2.372)[MerryChristmas!!08/12/25TH][HOUSE] //------------------------------------------------------------------------------------------------- // 【重大な問題】すごく重い 重たい ヘヴィー 最悪再生されない // TR=1 ギター TR=3 アコーディオン TR=9 キック スネア TR=10 11 ハット TR=12 カウベル Include(gs.h)ResetGS;r4;Include(delay.h)System.MeasureShift=2System.vMax=150 TrackName={"Accordionica"}Copyright={"West"} MetaText{"*PR* Myblog→ " katasumi_7019@yahoo,co,jp " *Access here!*} //------------------------------------------------------------------------------------------------- Tempo=129FUNCTION 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=12DP=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,120,080,064,00,026,00,03)LAC(03,127,090,000,00,024,00,06)LAC(06,127,080,064,00,017,00,05) LAC(02,127,080,064,00,039,08,04)LAC(04,070,100,064,00,005,00,05)LAC(07,127,080,064,00,082,09,05) INT STME=0INT SET=STME*-1INT R=0LAC(05,127,080,127,00,082,01,05)LAC(08,127,080,064,00,082,09,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,127,080,064,00,026,00,03)LAC(12,127,100,000,00,039,09,05)LAC(15,127,080,064,00,039,09,05) LAC(10,127,080,064,00,026,00,03)LAC(13,127,100,127,00,039,09,05)LAC(16,127,100,064,00,039,09,05) LAC(11,127,080,064,00,026,00,03)LAC(14,127,100,064,00,039,09,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={S{>>[4[3[4'"ad'^r]'"ac'^'"ac'^][4'da'^r]'dg'^'dg'^]<<}[4[d^rd^rd^drdrdr:rr]d^d^rd^rd^drdrd rdra^a^g^f^e^^^"a^^^]}STR VC2={S{>>[4[3[4'"ad'^r]'"ac'^'"ac'^][4'da'^r]'dg'^'dg'^]<<}[8[[3d^:r]drdr dr:rr]dd]}STR VC3={>>[4[3[4'"ad'^r]'"ac'^'"ac'^][4'da'^r]'dg'^'dg'^]<<} //MELO--------------------------------------------------------------------------------------------- STR MD1={MB({[[3V.T(127,40,!^^^)d^^V.W(127,70,!16)drrdrdefed^:rr]V.W(127,40,!4)g^f^e^d^f^e^^^"a^^^ [3V.T(127,40,!^^^)d^^V.W(127,70,!16)drrdrdefed^:rr]V.W(127,40,!8)a^defefefgb^ba`c^`d^]})}STR MD2={ MB({[8[V.T(127,40,!^^^)d^^V.W(127,70,!16)drrdrdddddr:rr]dd]})}STR MD3={ V.T(0,127,!1^1^1^1^1^1^1^1^1^1^1^1^1^1^1^1)MB({FOR(INT X=0;X<8;X++){MidiDelay({[d^^drrdrdddddr:rr] dd},8*(X*2),!32)}})V=0}STR MD4={MB({[4[V.T(127,40,!^^^)d^^V.W(127,70,!16)drrdrdddddr:rr] dd]FOR(INT X=0;X<4;X++){MidiDelay({[d^^drrdrdddddr:rr]dd},8*(X*2),!32)}})V=0}STR MD5={ V.T(0,127,!1^1^1^1^1^1^1^1^1^1^1^1^1^1^1^1)r1^1MB({FOR(INT X=0;X<7;X++){MidiDelay({[d^^drrdrdefed^r r]},8*(X*2),!32)}})V=0}STR MD6={MB({[3V.T(127,40,!^^^)d^^V.W(127,70,!16)drrdrdefed^:rr] V.W(127,40,!4)g^f^e^d^f^e^^^"a^^^[3V.T(127,40,!^^^)d^^V.W(127,70,!16)drrdrdefed^:rr]V.W(127,40,!8) a^defefefgb^ba`c^`d^})MidiDelay({MB({[3V.T(127,40,!^^^)d^^V.W(127,70,!16)drrdrdefed^:rr] V.W(127,40,!4)g^f^e^d^f^e^^^"a^^^[3V.T(127,40,!^^^)d^^V.W(127,70,!16)drrdrdefed^:rr]V.W(127,40,!8) a^defefefgb^ba`c^`d^})},16,!32)} //KICK&SNARE--------------------------------------------------------------------------------------- STR BD={'n27n33n32n35n36'}STR SD={'n27n35n36n38n39'}STR CD={'n27n32n35n36n49'}STR BD1={BD;rrr} STR SD1={SD;rrr}STR BD2={BD;r}STR SD2={SD;r}STR CD1={CD;rrr}STR CD2={CD;r}STR BB={[BD1]}STR BS={BD1 SD1}STR CS={CD1;SD1}STR CB={CD1;BD1}STR PED={rrr'n40n44'rr'n40n77n76n44'r}STR BS1={p20l16V=127S{[15 r1][4CD;rrr]}[S{[16PED]}CB[14BB]BD2;rBD;BD2;BD;BD]}STR BS2={p20l16V=127S{[15r1][4CD;rrr]}[S{[16PED] }CS[14BS]BD2;rBD;BD2;BD;BD]} //HIHAT-------------------------------------------------------------------------------------------- STR XA={V=60n42}STR XB={V=90'n42n44n46n70n82'}STR XC={'n69n70n82'}STR XX={IF(CH==10){p80}Else{p20}} STR XC1={l16BR=5p127XX[8r1][[8[XA;rXB:XC]r]]}STR XC2={[[16[XA;rXB:XC]r]]} //TR=12-------------------------------------------------------------------------------------------- STR BW1={[64rr'n54n56'n42]}STR BW2={[8r1][32rr'n54n56'n42]} //(TIME, BAS, BAS, TR3, TR4, TR5, TR6, TR7, TR8,KiSn,HiHt,Perc,TR12,TR13,TR14,TR15,TR16)(//R+) PL( SET, VC3, , , , , , , , BS1, XC1, XC1, , , , , ) PL( 016, VC2, , , , , , , , BS1, XC2, XC2, BW2, , , , ) PL( 032, VC2, , MD3, , , , , , , XC1, XC1, BW1, , , , )//mb PL( 048, VC2, , MD2, , , , , , BS1, XC1, XC1, , , , , ) PL( 064, VC2, , MD2, , , , , , BS2, XC2, XC2, BW2, , , , ) PL( 080, VC2, , MD4, , , , , , BS2, XC2, XC2, BW2, , , , ) PL( 096, VC1, , MD5, , , , , , , XC1, XC1, BW1, , , , )//mb PL( 112, VC1, , MD1, , , , , , BS1, XC1, XC1, , , , , ) PL( 128, VC1, , MD1, , , , , , BS2, XC2, XC2, BW2, , , , ) PL( 144, VC1, , MD6, , , , , , BS2, XC2, XC2, BW2, , , , ) PL( 160, VC2, , MD5, , , , , , , XC1, XC1, BW1, , , , )//mb PL( 176, VC2, , MD2, , , , , , BS1, XC2, XC2, , , , , ) PL( 192, VC2, , MD2, , , , , , BS2, XC2, XC2, BW2, , , , ) PL( 208, VC2, , MD2, , , , , , BS2, XC2, XC2, BW2, , , , ) PL( 224, VC2, , MD4, , , , , , , XC2, XC2, BW2, , , , ) PL( 240, VC3, , , , , , , , BS1, XC1, XC1, , , , , ) PL( 254, , , , , , , , , BS1, XC2, XC2, , , , , )End この曲は自作のオリジナル曲であるか、または、作曲者の死後50年以上経過した著作権に問題がない曲であることを確認しましたか? いいえ。よく分かりません はい。著作権に問題ありません (←選択)