サクラトップ > 掲示板トップ > 投稿フォーム
曲の投稿にはユーザー登録が必要です。 曲 名 作 者 名前: パスワード: 転 載 全て許可 全て許可 メール連絡すれば可 許可しない (ゲームのBGMなど使いたい場合、許可するかどうかを指定。 サクラ本体への収録はあらかじめご承諾ください。) ゲーム制作サイト「Rmake」への転載(およびMP3変換)を許可する ジャンル ジャズ・フュージョン ポップス ハードロック・ヘヴィーメタル ヒップホップ クラシック 歌謡曲・演歌 J-POP ロック ブルース・カントリー ダンス・エレクトロニカ ワールド アニメ・ゲーム 日本の伝統音楽・芸能 オルタナティヴロック ソウル・R&B ジャズ・フュージョン ヒーリング・ニューエイジ キッズ・ファミリー 音 源 (パソコン内蔵音源、GS音源、GM音源など) 公開 公開する 削除する (公開を中止して削除するときには、この項目を変更します。) コメント GM音源でどこまでできるか挑戦してみました。 ノリ重視のファンク?です。 曲データ(サクラから貼り付けます。) /* *** Microsoft GS Wavetable SW Synth 専用 *** ■どうもこんにちは。R*3です。 久しぶりに勢いで曲を作ってみました。 というのも、久しぶりに某スレをのぞいてみたらGMでどこまでできるか挑戦したくなって、5時間位で一気に作ってしまいました。 こう、勢いで曲を作ると、作曲ってすげえ楽しいって再認識させられます。 ■今回の曲はなんかジャンル良くわかんないんですが、ファンク?な感じがします。 メロディよりグルーヴ感を重視、っていうかそれしか狙ってません。 ■HP:http://rrr3.nobody.jp/ R*3 */ Include(gs.h); KeyFlag-(cdga) Include(groove.h); Function GR(_D){ INT _TCH = Channel; INT _CH; IF(_TCH=10){_CH = $00;} Else{IF(_TCH<10){_CH=_TCH;} Else{_CH=_TCH-1;}} _CH=$10+_CH; SysEx=$F0,$41,(DeviceNumber),$42,$12,{$40,(_CH),$15,(_D)},$F7; } ResetGM; ResetGS;r1 TrackSync Tempo=135 TrackName={"Mad Funk"} Copyright={"R*3"} Str Bass={ l16 rrdr cdrd rrdr cdrd rrrr rrrr rrrr drcdrd rrdr cdrd rrrr rrrr rrgr fgb`d rr`drdcrd rrdr cdrd rrrr rrrr rrrr drcdrd rrdr cdrd rrrr rrdf rdcr abr`d rrdr cdrd rrdr cdrd rrdr cdre^ rdrc drd rrdr cdrd rrgr egrg rg>dr cdre^ dg^ egrd^ adr cdv-30"dv+30d rrdr cdrd rrrr rrrr rdeg abr`d //A rrdr cdrd rrdr cdrd rrdr cdre^ rdrc drd rrdr cdrd rrgr egrg rg>dr cdre^ dg^ egrd^ adr cdv-30"dv+30d rrdr cdrd rrgr barg ^rgr fgr`d ^ r`dr cdrd rrdr cdrd rrdr cdre^ rdrc drd rrdr cdrd rrgr egrg rg>dr cdre^ dg^ egrd^ adr cdv-30"dv+30d rrdr cdrd rrgr bav-20gv+20g ^rgr fgr`d ^ r`dr cdrd rrdr cdrd rrdr cdre^ rdrc drd rrdr cdrd rrgr egrg rg>dr cdre^ dg^ egrd^ adr cdv-30"dv+30d rrdr cdrd rrgr bav-20gv+20g ^rgr fgr`d ^ r`dr cdrd rrdr cdrd rrdr cdre^ rdrc drd rrdr cdrd rrgr egrg rg>dr cdre^ dg^ egrd^ adr cdv-30"dv+30d rrdr cdrd rrgr bav-20gv+20g ^rgr fgr`d ^ } //_ *** Phaser Bass T1,2 TR=1 r-2 GR(0) r2 @82 P=64 o2 q100 V.T(0,70,!1+1,70,40,!1+1+1+1+1+1+1+1+1+1+1+1+1+1) v127 BR=1 p64 Sub{[16P.T(64,104,!4,104,64,!4,64,24,!4,24,64,!4)r1]} 'v-40`dv+40dv-20"dv+20'1+1+1+1+1+1+1+1+1+1+1+1+1+1+1+1+1+1+1 TR=2 r-2 GR(0) r2 @82 P=64 o2 q100 V.T(0,70,!1+1,70,40,!1+1+1+1+1+1+1+1+1+1+1+1+1+1) v127 BR=1 p%=100 Sub{r8[16P.T(104,64,!4,64,24,!4,24,64,!4,64,104,!4)r1]} 'v-40`dv+40dv-20"dv+20'1+1+1+1+1+1+1+1+1+1+1+1+1+1+1+1+1+1+1 //_ *** Bass T3,4,5 TR=3 r-2 GR(0) r2 @28 P=64 Swing16(4) o3 r1+1+1+1 BR=1 p66 q50 V=127 EP.W(90,127,!16) Bass // Left TR=4 r-2 GR(0) r2 @28 P=64 Swing16(4) o3 r1+1+1+1 BR=1 p67 q50 V=127 EP.W(90,127,!16) Bass // Right TR=5 r-2 GR(0) r2 @28 P.onNote(0,127) Swing16(4) BR=1 p66 q95 o3 EP=127 V=90 r1+1+1+1 // Center Delay Sub{r8 v100 Bass} Sub{v-30 r4 Bass} Sub{r4. v-20 Bass} r2 v-20 Bass //_ *** Filter Synth T6,7,8 TR=6 r-2 GR(0) r2 Swing16(0) l16 o6 @8 r1+1+1+1+1+1+1+1+1+1+1+1+1+1+1+1+1+1+1+1 BR=1 p60 V.T(30,100,!1+1+1+1+1 +1+1+1+1 +1+1+1) [ q.T(1,210,!1+1+1+1 +1+1+1+1 +1+1+1+1)[6rrdr cdr"a r"adr cdr"a rrdr cdrd r"ddr derc ] q.T(210,1,!1+1+1+1)[2rrdr cdr"a r"adr cdr"a rrdr cdrd r"ddr derc ] ] V.T(100,70,!1+1+1+1 +1+1+1+1) q.T(1,100,!1+1+1+1)[rrdr cdr"a r"adr cdr"a rrdr cdrd r"ddr derc ] q.T(100,1,!1+1+1+1)[rrdr cdr"a r"adr cdr"a rrdr cdrd r"ddr derc ] TR=7 r-2 GR(0) r2 Swing16(0) l16 o6 @8 r1+1+1+1+1+1+1+1+1+1+1+1+1+1+1+1+1+1+1+1 BR=1 p68 V.T(30,100,!1+1+1+1+1 +1+1+1+1 +1+1+1) [ q.T(1,210,!1+1+1+1 +1+1+1+1 +1+1+1+1)[6rrdr cdr"a r"adr cdr"a rrdr cdrd r"ddr derc ] q.T(210,1,!1+1+1+1)[2rrdr cdr"a r"adr cdr"a rrdr cdrd r"ddr derc ] ] V.T(100,70,!1+1+1+1 +1+1+1+1) q.T(1,100,!1+1+1+1)[rrdr cdr"a r"adr cdr"a rrdr cdrd r"ddr derc ] q.T(100,1,!1+1+1+1)[rrdr cdr"a r"adr cdr"a rrdr cdrd r"ddr derc ] TR=8 r-2 GR(0) r2 Swing16(0) l16 o6 @8 r1+1+1+1+1+1+1+1+1+1+1+1+1+1+1+1+1+1+1+1 P.onNote(0,127) V.T(30,122,!1+1+1+1+1 +1+1+1+1 +1+1+1) BR=1 p64 Sub{ r16 v35 [ q.T(1,210,!1+1+1+1 +1+1+1+1 +1+1+1+1)[6rrdr cdr"a r"adr cdr"a rrdr cdrd r"ddr derc ] q.T(250,1,!1+1+1+1)[2rrdr cdr"a r"adr cdr"a rrdr cdrd r"ddr derc ] ] } Sub{ r8 v80 [ q.T(1,210,!1+1+1+1 +1+1+1+1 +1+1+1+1)[6rrdr cdr"a r"adr cdr"a rrdr cdrd r"ddr derc ] q.T(250,1,!1+1+1+1)[2rrdr cdr"a r"adr cdr"a rrdr cdrd r"ddr derc ] ] } Sub{ r8. v20 [ q.T(1,210,!1+1+1+1 +1+1+1+1 +1+1+1+1)[6rrdr cdr"a r"adr cdr"a rrdr cdrd r"ddr derc ] q.T(250,1,!1+1+1+1)[2rrdr cdr"a r"adr cdr"a rrdr cdrd r"ddr derc ] ] } Sub{ r4 v55 [ q.T(1,210,!1+1+1+1 +1+1+1+1 +1+1+1+1)[6rrdr cdr"a r"adr cdr"a rrdr cdrd r"ddr derc ] q.T(250,1,!1+1+1+1)[2rrdr cdr"a r"adr cdr"a rrdr cdrd r"ddr derc ] ] } Sub{ r4+16 v10 [ q.T(1,210,!1+1+1+1 +1+1+1+1 +1+1+1+1)[6rrdr cdr"a r"adr cdr"a rrdr cdrd r"ddr derc ] q.T(250,1,!1+1+1+1)[2rrdr cdr"a r"adr cdr"a rrdr cdrd r"ddr derc ] ] } Sub{ r4. v40 [ q.T(1,210,!1+1+1+1 +1+1+1+1 +1+1+1+1)[6rrdr cdr"a r"adr cdr"a rrdr cdrd r"ddr derc ] q.T(250,1,!1+1+1+1)[2rrdr cdr"a r"adr cdr"a rrdr cdrd r"ddr derc ] ] } r2 v20 [ q.T(1,210,!1+1+1+1 +1+1+1+1 +1+1+1+1)[6rrdr cdr"a r"adr cdr"a rrdr cdrd r"ddr derc ] q.T(250,1,!1+1+1+1)[2rrdr cdr"a r"adr cdr"a rrdr cdrd r"ddr derc ] ] V.T(122,60,!1+1+1+1 +1+1+1+1) Sub{r16 v35 q.T(1,100,!1+1+1+1)[rrdr cdr"a r"adr cdr"a rrdr cdrd r"ddr derc ]q.T(100,1,!1+1+1+1)[rrdr cdr"a r"adr cdr"a rrdr cdrd r"ddr derc ]} Sub{r8 v80 q.T(1,100,!1+1+1+1)[rrdr cdr"a r"adr cdr"a rrdr cdrd r"ddr derc ]q.T(100,1,!1+1+1+1)[rrdr cdr"a r"adr cdr"a rrdr cdrd r"ddr derc ]} Sub{r8. v20 q.T(1,100,!1+1+1+1)[rrdr cdr"a r"adr cdr"a rrdr cdrd r"ddr derc ]q.T(100,1,!1+1+1+1)[rrdr cdr"a r"adr cdr"a rrdr cdrd r"ddr derc ]} Sub{r4 v55 q.T(1,100,!1+1+1+1)[rrdr cdr"a r"adr cdr"a rrdr cdrd r"ddr derc ]q.T(100,1,!1+1+1+1)[rrdr cdr"a r"adr cdr"a rrdr cdrd r"ddr derc ]} Sub{r4+16 v10 q.T(1,100,!1+1+1+1)[rrdr cdr"a r"adr cdr"a rrdr cdrd r"ddr derc ]q.T(100,1,!1+1+1+1)[rrdr cdr"a r"adr cdr"a rrdr cdrd r"ddr derc ]} Sub{r4. v40 q.T(1,100,!1+1+1+1)[rrdr cdr"a r"adr cdr"a rrdr cdrd r"ddr derc ]q.T(100,1,!1+1+1+1)[rrdr cdr"a r"adr cdr"a rrdr cdrd r"ddr derc ]} Sub{r2 v20 q.T(1,100,!1+1+1+1)[rrdr cdr"a r"adr cdr"a rrdr cdrd r"ddr derc ]q.T(100,1,!1+1+1+1)[rrdr cdr"a r"adr cdr"a rrdr cdrd r"ddr derc ]} //_ *** Sub Bass (Side Chain) T9 TR=9 r-2 GR(0) r2 Swing16(0) l16 o2 @88 q100 r1+1+1+1+1+1+1+1+1+1+1+1+1+1+1+1+1+1+1+1 [16 Sub{ [8V.T(0,10,!16,0,117,!8-32,117,117,!16.) r4 ]} 'v70`dv127d'2.+16'v70`cv127c'16'v70`dv127d'2+2-8 'v70`ev127e'4 ] //_ *** Lead T12,13,14 TR=12 r-2 GR(0) r2 Swing16(0) l16 o6 @7 q60 P=44 BR=1 p62 V=102 r1+1+1+1+1+1+1+1+1+1+1+1+1+1+1+1+1+1r1r1 r1+1+1+1+1+1+1+1 r1+1+1+1+1+1+1r2. [ab>cd edcd< [r2. ] ab>cd edcd [r2. ] agec edcd< [r2. ] ab>cd edcd r2 "bcea< r2.] q.T(60,1,!1+1+1+1 +1+1+1+1) V.T(102,90,!1+1+1+1 +1+1+1+1) ab>cdedcd< [r2. ] ab>cd edcd [r2. ] agec edcd< [r2. ] ab>cd edcd r2 "bcea< r2. TR=13 r-2 GR(0) r2 Swing16(0) l16 o6 @7 q60 P=84 p66 V=102 r1+1+1+1+1+1+1+1+1+1+1+1+1+1+1+1+1+1r1r1 r1+1+1+1+1+1+1+1 r1+1+1+1+1+1+1 r2. [ab>cd edcd< [r2. ] ab>cd edcd [r2. ] agec edcd< [r2. ] ab>cd edcd r2 "bcea< r2.] q.T(60,1,!1+1+1+1 +1+1+1+1) V.T(102,90,!1+1+1+1 +1+1+1+1) ab>cdedcd< [r2. ] ab>cd edcd [r2. ] agec edcd< [r2. ] ab>cd edcd r2 "bcea< r2. TR=14 r-2 GR(0) r2 Swing16(0) l16 o6 @7 q40 P=74 p64 V=96 r1+1+1+1+1+1+1+1+1+1+1+1+1+1+1+1+1+1r1r1 r1+1+1+1+1+1+1+1 r1+1+1+1+1+1+1 r2. [ Sub{ r8 v127 ab>cd edcd< [r2. ] ab>cd edcd [r2. ] agec edcd< [r2. ] ab>cd edcd r2 "bcea< r2 } Sub{ r4 v100 ab>cd edcd< [r2. ] ab>cd edcd [r2. ] agec edcd< [r2. ] ab>cd edcd r2 "bcea< r2 } Sub{ r4. v80 ab>cd edcd< [r2. ] ab>cd edcd [r2. ] agec edcd< [r2. ] ab>cd edcd r2 "bcea< r2 } Sub{ r2 v60 ab>cd edcd< [r2. ] ab>cd edcd [r2. ] agec edcd< [r2. ] ab>cd edcd r2 "bcea< r2 } Sub{ r8+2 v40 ab>cd edcd< [r2. ] ab>cd edcd [r2. ] agec edcd< [r2. ] ab>cd edcd r2 "bcea< r2 } Sub{ r4+2 v20 ab>cd edcd< [r2. ] ab>cd edcd [r2. ] agec edcd< [r2. ] ab>cd edcd r2 "bcea< r2 } Sub{ r4.+2 v10 ab>cd edcd< [r2. ] ab>cd edcd [r2. ] agec edcd< [r2. ] ab>cd edcd r2 "bcea< r2 } r1+1+1+1 +1+1+1+1] q.T(60,1,!1+1+1+1 +1+1+1+1+1) V.T(96,83,!1+1+1+1 +1+1+1+1) Sub{ r8 v127 ab>cd edcd< [r2. ] ab>cd edcd [r2. ] agec edcd< [r2. ] ab>cd edcd r2 "bcea< r2 } Sub{ r4 v100 ab>cd edcd< [r2. ] ab>cd edcd [r2. ] agec edcd< [r2. ] ab>cd edcd r2 "bcea< r2 } Sub{ r4. v80 ab>cd edcd< [r2. ] ab>cd edcd [r2. ] agec edcd< [r2. ] ab>cd edcd r2 "bcea< r2 } Sub{ r2 v60 ab>cd edcd< [r2. ] ab>cd edcd [r2. ] agec edcd< [r2. ] ab>cd edcd r2 "bcea< r2 } Sub{ r8+2 v40 ab>cd edcd< [r2. ] ab>cd edcd [r2. ] agec edcd< [r2. ] ab>cd edcd r2 "bcea< r2 } Sub{ r4+2 v20 ab>cd edcd< [r2. ] ab>cd edcd [r2. ] agec edcd< [r2. ] ab>cd edcd r2 "bcea< r2 } Sub{ r4.+2 v10 ab>cd edcd< [r2. ] ab>cd edcd [r2. ] agec edcd< [r2. ] ab>cd edcd r2 "bcea< r2 } //_ *** Reverse Cymbal T15,16 TR=15 r-2 GR(0) r2 @120 r1+1+1+1+1+1+1+1+1+1+1+1+1+1+1+1+1+1r1-16 v127 V.T(0,0,!16,0,127,!16)'ce'4 TR=16 r-2 GR(0) r2 @120 r1+1+1+1+1+1+1+1+1+1+1+1+1+1+1+1+1+1 r2 q99 V.T(50,110,!2) 'ce'2 r2 V.T(0,90,!2) 'ce'2 //_ *** Drum T10 TR=10 r-2 GR(1) r2 Swing16(6) BR=3 p127 r1+1+1+1+1+1+1+1+1+1r1r2 l16 rrSwing16(0)l24 v50n40n40n40 l16 Swing16(6) v100n40n45n40n40 Sub{ l16 v127 n49rn42n42 rrv90n42v127n42 rrv100n42n46 n44rv127n42n42 rrn42r rv90n42v120n46v100n42 rrv127n42v100n42 rv90n46v100n42v127n42 v127 n46n44n42n42 rrv90n42v127n42 rrv100n42n46 n44rv127n42n42 rrn42r rv90n42v120n46v100n42 rrv127n46v100n42 n42v90n46v127n44n46 v127Swing16(0) l32 n46v70n42v80n42v90n42v127n42v80n44rr l16 Swing16(6) n44rn42n42 rrn46r n44v80n42v110n46n42 rrn42n42 rv110n42rn42 rrv127n42r rn46n42v90n42 v127 n42rn46r n44rn42n42 rrn42n42 n44n42rn42 n46n44rr rrrn46 n44n46n44r n46n44rn46 } Swing16(6) l16 v127 n36rrr n40rrr rv80n40v127n36r n40rrv80'n40v50n36' v127 n36rrn36 rrl24Swing16(0)v55n40n40n40 l16 Swing16(6)v127n40v80n36r'v127n40v60n36' v127n36rrn40 l16 v127 n36rrr n36n40rr rv80n40v127n36r n40rrv80'n40v50n36' v127 n36rrn36 rrn40r n40n36rn36 Sub{r64n45}n45rl24Swing16(0)n36n36n36 Swing16(6) l16 v127 n36rrn36 n40rrr rv80n40v127n36r n40rrv80'n40v50n36' v127 n36rrn36 rrn36r rrn40r n40n36n40n40 l16 Sub{ [3n36,4]n36,8n36,8r2rrn36r rn36rv80n36} v50n40v127n40v50n40n40 v127n40v50n40n40v127n40 v50n40n40v127n40v50n40 v60n40v100n40n40n40 Swing16(0)r4r4rrl24v60n40n40n40 l16 Swing16(6) v127n40n36n40n36 //Break [4 Swing16(6) Sub{ l16 v127 n49rn42n42 rrv90n42v127n42 rrv100n42n46 n44rv127n42n42 rrn42r rv90n42v120n46v100n42 rrv127n42v100n42 rv90n46v100n42v127n42 v127 n46n44n42n42 rrv90n42v127n42 rrv100n42n46 n44rv127n42n42 rrn42r rv90n42v120n46v100n42 rrv127n46v100n42 n42v90n46v127n44n46 v127Swing16(0) l32 v127n46v60n42v70n42v80n42v127n42v80n44rr l16 Swing16(6) n44rv127n42n42 rrn46r n44v80n42v110n46n42 rrn42n42 rv110n42rn42 rrv127n42r rn46n42v90n42 v127 n42rn46r n44rn42n42 rrn42n42 n44n42rn42 rrn46n44 rn46n42n42 rn42n46n44 rrn46n44 } Swing16(6) l16 v127 n36rrr n40rrr rv80n40v127n36r n40n36rv80'n40v50n36' v127n36rrn36 n40rrv80n40 v127n36v80n40v80n36v127n36 rn36n40r l16 v127 n36rrn36 n40rrr rv80n40v127n36r n40n36rv80'n40v50n36' v127n36rrr n40rrv80n40 v127n36v80n40v80n36v127n36 rn40n40n40 l16 v127 n36rrv80n36 v127 n40rrr rv80n40v127n36r n40n36rv80'n40v50n36' v127n36rrn36 n40rrv80n40 v127n36v80n40v80n36v127n36 rn36n40r l16 v127 n36rrn36 n40rrr rv80n40v127n36r n40n36rv80'n40v50n36' v127n36rrr n40rv80n40r v127n36n40v80n36v127n40 rn40n40v80n36 ] l16 n46n44 この曲は自作のオリジナル曲であるか、または、作曲者の死後50年以上経過した著作権に問題がない曲であることを確認しましたか? いいえ。よく分かりません はい。著作権に問題ありません (←選択)