サクラトップ > 掲示板トップ > 投稿フォーム
曲の投稿にはユーザー登録が必要です。 曲 名 作 者 名前: パスワード: 転 載 全て許可 全て許可 メール連絡すれば可 許可しない (ゲームのBGMなど使いたい場合、許可するかどうかを指定。 サクラ本体への収録はあらかじめご承諾ください。) ゲーム制作サイト「Rmake」への転載(およびMP3変換)を許可する ジャンル ダンス・エレクトロニカ ポップス ハードロック・ヘヴィーメタル ヒップホップ クラシック 歌謡曲・演歌 J-POP ロック ブルース・カントリー ダンス・エレクトロニカ ワールド アニメ・ゲーム 日本の伝統音楽・芸能 オルタナティヴロック ソウル・R&B ジャズ・フュージョン ヒーリング・ニューエイジ キッズ・ファミリー 音 源 (パソコン内蔵音源、GS音源、GM音源など) 公開 公開する 削除する (公開を中止して削除するときには、この項目を変更します。) コメント ミニマルらしいミニマルを目指したミニマル。現代風な静かで無機質な感じを出せるように頑張りました。今回はオマケ付です。ロック好きな人は自由に利用してください。 曲データ(サクラから貼り付けます。) //------------------------------------------------------------------------------------------------- // テキスト音楽「サクラ」音楽データ (dSakura.dll Version.2.372)[08/07/18FR][MINIMALTECHNO]W-Temp'08 //------------------------------------------------------------------------------------------------- // 何か最近投稿し過ぎかも・・・ // おまけ エレキのノイズ的効果音 @80q100V.T(30,70,!1,69,50,!1,49,20,!1)o6f1^1^1 // 「 o 」の値を弄るといろいろ変化します。 ResetGS;TrackSync;Include(delay.h)INT RNS=0INT SET=-(RNS)System.MeasureShift=2System.vMax=150 TrackName={"Steep Slope"}Copyright={"West"}MetaText{"*PR* Myblog→ " katasumi_7019@yahoo,co,jp " *Access here!*} //------------------------------------------------------------------------------------------------- Tempo=133FUNCTION XE(Ver_1){Time(Ver_1:1:0)}FUNCTION MP(STR X){Sub{>X<}X}FUNCTION MM(STR Y){Sub{}Y} Function GS_R(D){Int TH=CH;Int C;If(TH==10){C=$00}ELSE{If(TH<10){C=TH}ELSE{C=TH-1}}C=$10+C;SysEx=$F0,$41,(DeviceNumber),$42,$12,{$40,(C),$15,(D)},$F7} FUNCTION MB(STR Z){Sub{>Z<}Sub{}Z}FUNCTION DP(PN){XE=-2GS_R(PN)r8}TR=8DP=2TR=9DP=1TR=10DP=2TR=11DP=1 FUNCTION LAC(TCn,Vn,Qn,Pn,Mn,Vo1,Vo2,On){TR=TCn;CH=TCn;XE=0l16V(Vn)q(Qn)P=Pn;M(Mn*10)@(Vo1,Vo2,0)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,030,060,000,00,081,00,08)LAC(03,070,050,000,00,033,00,02)LAC(06,127,080,000,00,091,00,03) LAC(02,020,060,000,00,081,01,08)LAC(04,060,050,000,00,035,00,02)LAC(07,127,080,000,00,081,01,03) /*( ------------------------ )*/LAC(05,070,040,000,00,036,00,02)LAC(08,127,080,000,00,026,00,03) //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,000,00,025,00,03)LAC(12,127,080,000,00,039,09,03)LAC(15,127,080,000,00,013,00,04) LAC(10,127,080,000,00,026,00,03)LAC(13,080,080,000,00,119,00,06)LAC(16,127,080,000,00,039,09,03) LAC(11,110,080,000,00,026,00,03)LAC(14,070,080,000,00,119,00,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+RNS}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} //HI----------------------------------------------------------------------------------------------- STR VC1={[16rd"dd&"dMidiDelay({d&"d&d},8,!16)rrd,,70rrrd,,70r]}STR VC2={[8rd"dd&"dMidiDelay({d&"d&d},8,!16) rrd,,70rrrd,,70r]FOR(Int R=1;R<9;R++){rd"dd&"dMidiDelay({d&"d&d},8+R,!16)rrd,,70rrrd,,70r}} //BASS--------------------------------------------------------------------------------------------- STR MD1={l4P.W(127,0,!8)[8eeeeeeee]}STR MD2={IF((CH==3)&&(CH==5)){v90}Else{v80}l16P.W(127,0,!8) [8[[rre:r]eerererrr]]}STR MD3={} //BAS2--------------------------------------------------------------------------------------------- STR PA1={v50P.W(127,0,!16)l16[64"dr'"ddf'r]}STR PA2={v50P.W(127,0,!16)l16[62"dr'"ddf'r]r4['"ddf'r]} STR PA3={v.T(50,15,!1^1^1^1^1^1^1^1^1^1^1^1^1^1^1^1)P.W(127,0,!16)l16[64"dr'"ddf'r]} //KICK&SNARE--------------------------------------------------------------------------------------- STR BD={BR=20p127'n27n32n35'}STR SD={p127'n27n32n35n28'}STR BD1={BD;rrr}STR BD2={[BD1]}STR BSS={BD1;SD;rrr} STR BS1={[32BD1]}STR BS2={[15BD2]r4[BD;r]}STR BS3={BS1;BS2}STR BS4={BS1;[30n35rrr]v.T(0,130,!2)[16l32SD]l16} STR BS5={[32BSS]}STR BS6={S{[64n32rrr]}[15r1]r2v.T(0,127,!2)BR=20p.T(64,80,!2)l32[8BD;SD]l16p64} STR BS7={[30[n32rrr]]}STR GN={n75}STR GN1={[16rrGN;rrr[GN]r[3GN]r[GN]r]}STR GN2={[15rrGN;rrr[GN]r[6GN]r]} STR BS8={[15r1][[4SD]MidiDelay({SD},3,!16)rrSD]}STR BS9={[34BD2]MidiDelay({BD},8,!8)} //HIHAT-------------------------------------------------------------------------------------------- STR XC={v127p64'n42n44n70'}STR XD={BR=10p127v100'n46'}STR XC1={[16[4rrXC:r]XC]}STR XC2={S{XC1}[15r1]r2 v.T(0,127,!2)[17l32n46]l16}STR XC3={[16[4rrXC:r]XD]}STR XC4={[15[4rrXC:r]XC]} //PER---------------------------------------------------------------------------------------------- STR BW={BR=20p127'n31n37n77n76'}STR BW1={[16[3rrBW:r]BW;rrBW;r]}STR BW2={[16rrBW;rrr[BW]r[BW]rl32 MidiDelay({BW},6,!32)[5r]BW;rl16]}STR BW3={[4[[3rrBW:r]BW;rrBW;r:[rrBW;r]r[BW]r[BW;r]]rrBW;rrr[BW]r [BW]rl32MidiDelay({BW},6,!32)[5r]BW;rl16]}STR BW4={[15[3rrBW:r]BW;rrBW;r]} //TR=12-------------------------------------------------------------------------------------------- STR FR1={@126,8[8r1]q90l1BR=30V.T(80,50,!1^1)p.T(64,0,!1^1,0,0,!1^1^1^1,64,0,!1^1)```g^rrrrV=80 ```g^}STR FR2={[8r1]@125,0v.T(80,0,!1^1^1^1)[32BR=20p.T(127,0,!8)'ae'8]l16}STR FR3={p64[8r1] @82,1MidiDelay({d&`d&d},32,!8)}STR FR4={@127,3l16BR=20REV=30v.T(90,50,!1^1^1^1)p.T(0,127,!1^1^1^1) [64'>>cde<<']p64}STR FR5={[8r1]v.T(80,120,!1^1^1^1^1^1^1^1)@127,0[32r`g^r]}STR FR6={MidiDelay({``g},32,!8) [15r][7r1]@80q100V.T(30,70,!1,69,50,!1,49,10,!1)```f1^1^1}STR FR7={V=90v=90FR3[4r1]MidiDelay({'"ddf'},32,!8)} STR FR8={@126,7v.T(100,100,!1^1^1^2,99,30,!2)'>ceg<'1^1^1^1[4r1]@125,0v.T(80,0,!1^1^1^1)[32BR=20 p.T(127,0,!8)'ae'8]l16}STR FR9={q100[12r1]@126,7v.T(40,110,!1^1^1^1,109,20,!2)'>>cde<<'1^1^1^1^2} //TR=13 14----------------------------------------------------------------------------------------- STR VX1={l16IF(CH==13){P.W(127,0,!16)}Else{P.W(0,127,!16)}[16[6r]a^^2]}STR VX2={l16IF(CH==13) {P.W(127,0,!16)}Else{P.W(0,127,!16)}[16[6r]MidiDelay({a^^2},8,!8)]} //TR=15-------------------------------------------------------------------------------------------- STR CG1={q50v40Sub{MidiDelay({[16["fr'"ff':rrr"er]er4]},2,!5)}[16frrfrrerrrrrv20e&"eefv40]} STR CG2={q50v45Sub{MidiDelay({[16["fr'"ff':rrr"er]"el32[8'"ee']l16]},2,!5,)}[16frrfrrerrrrrv20e&"eefv40]} STR CG3={>v.T(45,45,!1^1^1^1^1^1^1^1,40,84,!1^1^1^1^1^1^1^1)Sub{[16drfrrerr'``dd'rdrrrre]} MidiDelay({[16>[drfrrfer]<]},3,!5)<}STR CG4={>v85Sub{[16drfrrerr'``dd'rdrrrre]}MidiDelay({[16>[drfrrfer]<]}, 3,!5)<}STR CG5={>v85Sub{MidiDelay({[8drfrrerr'``dd'rdrrrrer1]},16,!8)}MidiDelay({[8>[drfrrfer]r1<]},16,!8)<} STR CG6={>v85Sub{MidiDelay({[8drfrrerr'``dd'rdrrrrer1]},8,!4)}MidiDelay({[8>[drfrrfer]r1<]},8,!4)<} //TR=16-------------------------------------------------------------------------------------------- STR CY1={@125,1v60l1BR=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)q100 v.T(60,60,!1^1^1^1,69,20,!1^1^1^1)'ae'^^^^^^^l16}STR CY2={@126,8v60MidiDelay({p.T(80,40,!1)'``a``e'4},12,!4)} //( XE , HI , HI , BAS, BAS, BAS,BAS2,BAS2,Per2,Kick,HiHt,Perc, SE1, TAM, TAM, XYL, SE2) PL( SET, VC1, VC1, , , , , , , BS3, , BW1, , , , CG1, ) PL( 016, VC2, VC2, , , , PA3, PA3, , BS4, , BW2, FR1, , , CG1, ) PL( 032, VC1, VC1, MD1, MD1, MD1, PA1, PA1, , BS5, XC1, BW1, , VX1, VX1, CG1, ) PL( 048, VC1, VC1, MD1, MD1, MD1, PA1, PA1, , BS5, XC2, BW2, , VX1, VX1, CG1, ) PL( 064, VC1, VC1, MD1, MD1, MD1, PA1, PA1, , BS5, XC3, BW1, FR2, VX1, VX1, CG2, ) PL( 080, VC1, VC1, MD1, MD1, MD1, PA1, PA1, , BS5, XC3, BW2, FR3, VX1, VX1, CG2, ) PL( 096, VC2, VC2, MD1, MD1, MD1, PA1, PA1, , BS5, XC3, BW3, FR4, VX1, VX1, CG2, ) PL( 112, , , MD2, MD2, MD2, PA2, PA2, , BS6, XC3, BW3, , VX1, VX1, CG2, CY1) PL( 128, , , MD2, MD2, MD2, , , GN2, BS7, XC4, BW4, FR5, , , CG3, ) PL( 144, VC1, VC1, MD3, MD3, MD3, PA1, PA1, GN1, BS5, XC3, BW3, FR6, VX1, VX1, CG4, CY2) PL( 160, VC1, VC1, MD3, MD3, MD3, PA1, PA1, GN1, BS5, XC3, BW3, FR7, VX1, VX1, CG4, ) PL( 176, VC1, VC1, MD2, MD2, MD2, PA1, PA1, GN1, BS5, XC4, BW3, FR8, VX1, VX1, CG4, ) PL( 192, , , MD2, MD2, MD2, PA3, PA3, , BS5, , , FR2, VX2, VX2, CG5, CY2) PL( 208, , , MD2, MD2, MD2, , , GN1, BS5, XC1, BW3, FR9, VX1, VX1, , ) PL( 224, , , , , , , , GN1, BS8, XC1, BW3, , VX2, VX2, CG5, ) PL( 240, VC1, VC1, MD3, MD3, MD3, PA1, PA1, GN1, BS5, XC3, BW2, FR7, VX1, VX1, CG4, ) PL( 256, VC1, VC1, MD3, MD3, MD3, PA1, PA1, GN1, BS5, XC3, BW3, FR3, VX1, VX1, CG4, ) PL( 272, , , MD3, MD3, MD3, PA1, PA1, GN1, BS5, XC3, BW3, FR2, VX2, VX2, CG4, ) PL( 288, , , MD3, MD3, MD3, PA1, PA1, , BS5, XC3, BW3, FR3, VX1, VX1, CG6, CY1) PL( 304, , , , , , , , GN1, BS9, XC1, BW1, , , , , ) //( XE , HI , HI , BAS, BAS, BAS,BAS2,BAS2,Per2,Kick,HiHt,Perc, SE1, TAM, TAM, XYL, SE2) この曲は自作のオリジナル曲であるか、または、作曲者の死後50年以上経過した著作権に問題がない曲であることを確認しましたか? いいえ。よく分かりません はい。著作権に問題ありません (←選択)