サクラトップ > 掲示板トップ > 投稿フォーム
曲の投稿にはユーザー登録が必要です。 曲 名 作 者 名前: パスワード: 転 載 全て許可 全て許可 メール連絡すれば可 許可しない (ゲームのBGMなど使いたい場合、許可するかどうかを指定。 サクラ本体への収録はあらかじめご承諾ください。) ゲーム制作サイト「Rmake」への転載(およびMP3変換)を許可する ジャンル ハードロック・ヘヴィーメタル ポップス ハードロック・ヘヴィーメタル ヒップホップ クラシック 歌謡曲・演歌 J-POP ロック ブルース・カントリー ダンス・エレクトロニカ ワールド アニメ・ゲーム 日本の伝統音楽・芸能 オルタナティヴロック ソウル・R&B ジャズ・フュージョン ヒーリング・ニューエイジ キッズ・ファミリー 音 源 (パソコン内蔵音源、GS音源、GM音源など) 公開 公開する 削除する (公開を中止して削除するときには、この項目を変更します。) コメント コメントすべからず、ってやつですよぉw あえて言うなら、ジャンルはごみ音楽でしぃw MP3:http://www5f.biglobe.ne.jp/~marsweb/sentaku.mp3 曲データ(サクラから貼り付けます。) 曲名{"電撃!戦う洗濯機!!"} 作者{"MAR"} /* 馬鹿みたいなタイトルですけどぉ・・・ごめんなさいぃw 作りたいから作っちゃった、ごみみたいな音楽なんだけどねぇw というか、ごみだよねぇww まぁ、暇があったら聴いてくれてもいいですよぉw */ System.MeasureShift(1) /*------------------------------------------------------------------------------------------*/ Function TM(ti){Time(ti:1:0)}TM(0);Tempo=1000; Include(stdmsg.h);ResetGS();TimeBase(384) TrackSync;r1;TimeSignature(4,4);Include(stdmsg.h); Function SHOKI(S1,S2,S3,S3A,S4,S5,S6,S7,S8,S9){ TR=S1;CH=S2;@(S3,S3A);P=S4;REV=S5;CHO=S6;M=S7;V=S8} Str A ={cea>cea<} ;Str A2={dfa>dfa<} Str B ={egb>egb<} ;Str C ={ea>cea`c<} Str D ={gb>egb`e<} ;Str E ={a>cea>ce<<} Str F ={a>dfa>df<<};Str G ={b>egb>eg<<} Function U(X,Str Y){V(127) IF(TR==6){EP.T(070,127,X) ;> ;Y;< ;EP(127)} IF(TR==7){EP.T(080,127,X) ;>>;Y;<<;EP(127)} IF(TR==8){EP.T(127,080,X*2); Y ;EP(127)} IF(TR==9){EP.T(127,070,X*2); Y ;EP(127)} V(110)} Str GUI={ l16 TM(FIR+42) q99 Key(1) aececd U(1536,{[4ede]}) l16 edegaeda l24 cdefga l32 >edc"a"bcde l24;< U(1536,{[4>gegcedc< l16ba l32 gage l24 U(1536,{[4>fgfcd l24 ecb l24 U(1536,{cde[3gae]}) U(1536,{a1})} Array CHH1=(40,128,1536);Array CHH2=(128,40,1536);M(20) Array CHH3=(0,128,6144);Array CHH4=(128,0,6144);M(20) Array CHH5=(110,128,6144);Array CHH6=(128,110,6144);M(20) // TR CH @ MSB PAN REV CHO M V SHOKI( 1, 1, 82,008, 80, 60, 40, 10,120) EP(127) y66,0 y94,32 SHOKI( 2, 2, 74,000, 32,100, 80, 0,127) EP(127) y66,0 y94,30 CHO.W(20,60,!2) SHOKI( 3, 3, 81,024, 0, 60, 40, 10,127) EP(127) y66,0 y94,20 SHOKI( 4, 4, 30,001, 40, 90, 70, 0,100) EP(127) y66,0 y94,50 SHOKI( 5, 5, 81,000, 32,120, 0, 0,100) EP(127) y66,0 y94,32 SHOKI( 6, 6, 31,025, 88, 90, 85, 0,110) EP(127) y66,0 y94,62 SHOKI( 7, 7, 30,001, 88, 80, 80, 0,110) EP(127) y66,0 y94,42 SHOKI( 8, 8, 31,003, 88, 70, 75, 0,110) EP(127) y66,0 y94,22 SHOKI( 9, 9, 30,002, 88, 60, 70, 0,110) EP(127) y66,0 y94,02 SHOKI( 11, 11, 40,000, 24, 80, 80, 0,120) EP(127) y66,0 y94,00 SHOKI( 12, 12,128,003, 64, 0, 0, 0,120) EP(127) y66,0 y94,00 SHOKI( 13, 13,126,008, 0, 0, 0, 0,120) EP(127) y66,0 y94,00 SHOKI( 14, 14,123,002, 0, 0, 0, 0,120) EP(127) y66,0 y94,00 SHOKI( 15, 15,126,000, 0, 0, 0, 0,127) EP(127) y66,0 y94,00 Function PA(W,X,Y,Z){Sub{[(W)P(Random(X,Y))r(Z)]};} Function MDL(Str W,Int X,Int Y,Int T){Int Z=MML(v);Sub{[(Y) r(X)Sub{v(MML(v)-T);W}]};v(Z)W} Int FIR={3} /*------------------------------------------------------------------------------------------*/ TR(10) CH(10) TM(FIR) l16 @1 V(127) v127 REV(80) CHO(80) $a={v120 t(01) n42};$b={v120 t(03) n44}; $g={v115 t(-1) n38};$h={v115 t(04) n40}; $c={v110 t(02) n55};$d={v125 t(01) n35}; $e={v125 t(03) n36};$f={v110 t(05) n49}; TM(FIR);l16;Rhythm{ [16rrgrrr:hr]@17; l24ghg;@1;l16 [12grrhrrg:r]'gh' [4rrgrrr:hr]@17; l24ghg;@1;l16 [26r1] [16rrgrrr:hr]@17; l24ghg;@1;l16 [rrgrrr:hr] l24ghg;@17'gh'1 } TM(FIR);l16;Rhythm{ [16brrrbarr] [12brbaarab] [4brrrbarr] [26r1] [16brrrbarr] [brrrba:rr]ba'ba'1 } TM(FIR);l16;Rhythm{ [16crrrcr:rr]fr [12crrrrrr:r]c [4crrrcr:rr]fr [26r1] [16crrrcr:rr]fr [crrrcr:rr]fr'cf'1 } TM(FIR);l16;Rhythm{ [16drrrde:rr]l24eee;l16 [12drrder:rr]de [4drrrde:rr] l24eee;l16 [26r1] [16drrrde:rr]l24eee [drrrde:rr] l24ded'de'1 } TR(12) o1 TM(FIR-2) Tempo(150) l16 q100 v127 p(64) t(0) EP.T(128,128,!2.,128,0,!2^1);CHO.T(0,128,!4,128,0,!1^1) REV.T(60,120,!4,120,20,!1^1);y94.T(60,120,!4,120,20,!1^1) y66.T(60,120,!4,120,20,!1^1);M.T(60,120,!4,120,20,!1^1) 'cdef'1^1^1;TM(FIR+41);@126,4 EP.T(128,128,!2.,128,0,!2);CHO.T(0,128,!4,128,0,!1) REV.T(60,120,!4,120,20,!1);y94.T(60,120,!4,120,20,!1) y66.T(60,120,!4,120,20,!1);M.T(60,120,!4,120,20,!1) 'cdef'1; TR(13) o7 TM(FIR-2) l16 q100 v127 p(64) t(0) BR(24);p.T(128,0,!1..);EP.T(128,128,!1.,128,0,!4) CHO.T(0,128,!1,128,0,!1);P.T(0,128,!1..)'cde'1^1^1 TM(FIR+40);p.T(128,0,!1..);EP.T(128,128,!1.,128,0,!4) CHO.T(0,128,!1,128,0,!1);P.T(0,128,!1..)'cde'1^1^1 TR(14) o5 TM(FIR-2) l16 q100 v127 p(64) t(0) 'cde'1^1^1 TR(6) o5 v100 p(64) t(1) GUI TR(7) o5 v100 p(64) t(2) GUI TR(8) o5 v100 p(64) t(3) GUI TR(9) o5 v100 p(64) t(4) GUI Key(0) TR(11) o3 TM(FIR) l16 q100 v127 p(64) t(-2)[ "acea^>cecfegcecfegc^eac< "acfa^>cfcfc^eac<] ["acfa^>cfc^eac<] [ cea>c^eac<] ["acfa^>cfcececfc^eac<] ["acfa^>cfc^eac<] [ cea>c^eac<] ["acfa^>cfcece['A'^^]<'G'^'F'rrrrrrr] V(120);@81,24;PA(512,0,127,16)[ v80 [4"acef v(MML(v)+12)] v80 [4 cega v(MML(v)+12)]] v80 [4 cega v(MML(v)+12)] v100[ egb`cv(MML(v)+12)] v100[ efab v(MML(v)+12)] v80 [4 efga v(MML(v)+12)] v80 [4 defg v(MML(v)+12)] [[8"arcrrder arr>egrar<]Key(2)] Key(0)[8"arcrrder arr>egrar<] TR(4) o3 TM(FIR) l16 q110 v120 p(64) t(1) M.W(80,0,!32,0,120,!8);q90 S{'A'2}c^c&&ee^e&&b S{'A2'2}`d^`d&&ff^f&&`c S{'B'2}`e^`e&&gg^g&&`d S{'A'2}`d^`d&&ff^f&&`c S{'A2'2}`d^`d&&ff^f&&`c S{'B'2}`e^`e&&gg^g&&`d S{'C'2}`e^`e&&aa^a&&`e S{'B'2}`e^`e&&gg^e&&`d S{'A'2}c^c&&ee^e&&b S{'A2'2}`d^`d&&ff^f&&`c S{'B'2}`e^`e&&gg^g&&`d S{'A'2}`d^`d&&ff^f&&`c S{'A2'2}`d^`d&&ff^f&&`c S{'B'2}`e^`e&&gg^g&&`d S{'C'2}`e^`e&&aa^a&&`e S{'B'2}`e^`e&&gg^e&&`d;M(20) CHO.T(CHH1,CHH2,CHH1,CHH2,CHH1,CHH2,CHH1,CHH2) REV.T(CHH2,CHH1,CHH2,CHH1,CHH2,CHH1,CHH2,CHH1) q110'A2'^q60'A2'q110'A2'^q60[3'A2'] [3'A2']'A'q110'A2'^q60'B''A' q110'C'^q60'C''A'q110'C'^q60'A'q110'C' ^q60'C''C''B''C''B'q110'A'^ q110'A2'^q60'A2'q110'A2'^q60[3'A2'] [3'A2']'A'q110'A2'^q60'B''A' q110'C'^q60'C''A'q110'C'^q60'A''C' q110'A'^q60'C''C''C'q110'B'^q60'B' q110'C'^q60['C']q110'C'^q60'B'q110'C' ^q60[3'C']'D''E''F''G';q90 S{'G'2}>b^b&&ee^e&&b< S{'F'2}>a^a&&dd^d&&a< q110'E'^q60[3'E']q110'E'^q60'E' [3'E']q110['E'^]q110'E' ^q60[3'E']q110'E'^q60'E'^ q110'D'^q60['D']q110'B'^q60['B'] @31,25;v110 CHO.T(CHH3,CHH4,CHH3,CHH4,CHH3,CHH4);REV.T(CHH3,CHH4,CHH3,CHH4,CHH3,CHH4) M.T(CHH3,CHH4,CHH3,CHH4,CHH3,CHH4); EP.T(CHH6,CHH5,CHH6,CHH5,CHH6,CHH5) q110'A'^q60[60'A']['B'] q110'A'^q60[60'A']'B'Key(2)'B' q110'A'^q60[60'A']['B'] q110'A'^q60[60'A']'B'Key(0)'B' q110'A'^q60[60'A']['B'] q110'A'^q60[60'A']'B' 'B' [r1];@30,1;Key(1);CHO(70);REV(90);M(0) q110'A2'^q60'A2'q110'A2'^q60[3'A2'] [3'A2']'A'q110'A2'^q60'B''A' q110'C'^q60'C''A'q110'C'^q60'A'q110'C' ^q60'C''C''B''C''B'q110'A'^ q110'A2'^q60'A2'q110'A2'^q60[3'A2'] [3'A2']'A'q110'A2'^q60'B''A' q110'C'^q60'C''A'q110'C'^q60'A''C' q110'A'^q60'C''C''C'q110'B'^q60'B' q110'C'^q60['C']q110'C'^q60'B'q110'C' ^q60[3'C']'D''E''F''G';q90 S{'G'2}>b^b&&ee^e&&b< S{'F'2}>a^a&&dd^d&&a< q110'E'^q60[3'E']q110'E'^q60'E' [3'E']q110['E'^]q110'E' ^q60[3'E']q110'E'^q60'E'^ q110'D'^q60['D']q110'B'^q60['B'] q100'A'2...q60['A'32]'A'16 Key(0) TR(3) o6 TM(FIR+16) l16 q110 v127 p(64) t(1) PA(384,0,127,16) [ arrerrdrrerrdcde arrerrdrrerrdcd"a arrerrdrrerrdcde arrerrarrbrrrrbg arrerrdrrerrdcde arrerrdrrerrdcd"a arrerrdrrerrdcde arrerrarrbrrrr:b`c+ Key(2) arrerrdrrerrdcde arrerrdrrerrdcd"a arrerrdrrerrdcde arrerrarrbrrrrbg arrerrdrrerrdcde arrerrdrrerrdcd"a arrerrdrrerrdcde arrerrarrbrrrrba Key(0)]ag //↑スウェーデン型にしたいがために、わざわざ・・・。 TR(1) o6 TM(FIR) l16 q110 v127 p(64) t(1) "a^^d^^e^ f^^g^^a^ g^^a^^e^ d^^e^^^^ d^^e^^a^ b^^>c^^d^ e^^d^^e^cdedcdedec^^d^^e^ d^^e^^f^ g^^^^^^^ ^^^^^^ef g^ag^ed"a d`cbagage この曲は自作のオリジナル曲であるか、または、作曲者の死後50年以上経過した著作権に問題がない曲であることを確認しましたか? いいえ。よく分かりません はい。著作権に問題ありません (←選択)