サクラトップ > 掲示板トップ > 投稿フォーム
曲の投稿にはユーザー登録が必要です。 曲 名 作 者 名前: パスワード: 転 載 全て許可 全て許可 メール連絡すれば可 許可しない (ゲームのBGMなど使いたい場合、許可するかどうかを指定。 サクラ本体への収録はあらかじめご承諾ください。) ゲーム制作サイト「Rmake」への転載(およびMP3変換)を許可する ジャンル ポップス ポップス ハードロック・ヘヴィーメタル ヒップホップ クラシック 歌謡曲・演歌 J-POP ロック ブルース・カントリー ダンス・エレクトロニカ ワールド アニメ・ゲーム 日本の伝統音楽・芸能 オルタナティヴロック ソウル・R&B ジャズ・フュージョン ヒーリング・ニューエイジ キッズ・ファミリー 音 源 (パソコン内蔵音源、GS音源、GM音源など) 公開 公開する 削除する (公開を中止して削除するときには、この項目を変更します。) コメント 半年近く間が開いてしまった…。 今回は、没寸前の曲なんですが、結構凝ってるところもあったりするので、投稿してみます。 さてどうなることか…。 曲データ(サクラから貼り付けます。) /* Thank you Download! - FASTER THAN LIGHT - Made Grandy 前の投稿から丸半年開いてしまったGrandyです。 ジャンルはあいかわらず謎です。 今回のは出来があまりよくないです。 途中で力尽きて、相当中途半端で終わります。 たまたま100小節ちょうどなんですけどね。(←やっぱり短い? しかも題名の割にはスピード感ないです。(BPMもたった147。。。) というか、マイナーかメジャーかすら分かりません。 …いつかリメイクします。 でも,けっこう部分的に凝ってたりするんで、 とりあえず最後まで聞いていただければ嬉しいです。 この曲の影響で、不眠症になる方がいない事を心から祈ります。 [ヘッドホン+TW-MUSIC2推奨] */ Int K=0 // キー Int FR=30 EP.Frequency(FR) M.Frequency(FR) PitchBend.Frequency(FR) CHO.Frequency(FR) REV.Frequency(FR) V.Frequency(FR) P.Frequency(FR) VAR.Frequency(FR) y6.Frequency(FR) // DataEntryMSB y38.Frequency(FR) // DataEntryLSB TrackName={"FASTER THAN LIGHT"} Copyright={"Copyrights(c) 2006 by Grandy"} MetaText={"DLありがとうございます。"} //------------------------------------------------------------------------------ ResetGS; TimeBase=480 Tempo=120 r*1 Tempo=147 //------------------------------- // TW-MUSIC用設定 // ReverbSetting Time Dpth High CuePoint={"TwmParam( 90,100, 050 )"} // リバーブの長さ,深さ,高音部 // ChorusSetting Wave Mix Dpth FB Freq Dly Phs CuePoint={"TwmChorus( 002, 055, 050, 060, 040, 075, 001 )"} // コーラスの形状,混ぜ具合,深さ,重ね,長さ,遅延,位相 //------------------------------- Time(10:1:0) // 無理矢理(汗) TrackSync; //------------------------------------------------------------------------------ Function OU(Str S){Int ob=MML(o)Sub{o(ob+1)S;o(ob)}S;} Str \={Solo(Track)} Str /={Mute(Track)} Str DB={PrintTime} Str TD={PrintTrack} //------------------------------------------------------------------------------ TR 1 CH 1 Time(2:1:0) TimeKey(K) l8q100h4o5 v110 @3,8 REV(50) CHO(30) V(127) P(64) t.N(0,3,6) // あんま意味ない(^^; EP.T(30,127,!1^1^1^1^1^1^1^1) [20 [4'cea'.]['cea'] // Am→F→C→Gを延々と繰り返す [4'cfa'.]['cfa'] [4'ceg'.]['ceg'] [4'"bdg'.]['"bdg'] ]r1 EP.T(127,0,!1^1^1^1^1^1^1^1^1^1^1^1^1^1^1^1) [4 [4'cea'.]['cea'] [4'cfa'.]['cfa'] [4'ceg'.]['ceg'] [4'"bdg'.]['"bdg'] ] /*t.N(0,480/4,480/2) // バラし [ [4'cea'.]['cea'] [4'cfa'.]['cfa'] [4'ceg'.]['ceg'] [4'"bdg'.]['"bdg'] ]*/ //------------------------------------------------------------------------------ TR 2 CH 1 l8q100h4o6 v120 [24r*1] [4 /*[4'ca'.]'ca'^ [4'ca'.]'ca'^*/ [4'ea'.]'ea'^ [4'fa'.]'fa'^ [4'eg'.]'eg'^ [4'dg'.]'dg'^ ]Time(83:1:0)EP.T(127,0,!1^1^1^1^1^1^1^1^1^1^1^1^1^1^1^1) t.N(0,480/4,480/2) [4 /*[4'ca'.]'ca'^ [4'ca'.]'ca'^*/ [4'ea'.]'ea'^ [4'fa'.]'fa'^ [4'eg'.]'eg'^ [4'dg'.]'dg'^ ] //------------------------------------------------------------------------------ TR 3 CH 2 l16q50h4o6 v100 @81 V(84) CHO(10) REV(100) P(71) [4r*1^1] r*-4 '"gc''"ad''"be'^ q.T(100,30,!1^1^1^1^1^1^1^1) P.onCycle(!25,64,60,70,55,75,50,80,45,85,40,90,35,95,30,100,20,105,15,110,10,115,5,120,1,127) [ [4`caec] [4`cafc] [4`cgec] [4`dbgd] ] q.T(30,100,!1^1^1^1^1^1^1^1) [ [4cea`c] [4cfa`c] [4ceg`c] [4dgb`d] ] q.T(200,50,!1^1^1^1^1^1^1^1) EP(100) v.N(80,70,60,50) M.W(0,127,!16) q100 OU{ [4 [4`caec] [4`cafc] [4`cgec] [4`dbgd] ] } Time(83:1:0)EP.T(127,0,!1^1^1^1^1^1^1^1^1^1^1^1^1^1^1^1) [ [4`caec] [4`cafc] [4`cgec] [4`dbgd] ] //------------------------------------------------------------------------------ TR 4 CH 3 @40,16 V(80) CHO(10) REV(100) l8q100h4o2 P(78) [8r*1] v.N(100,80,80,110,110) OU{ [8 /*[4e`e] [4f`f] [8g`g] */ /*[12c`c] [4`dd]*/ [8"aa] [8"gg] ] }@39 OU{ [4 [8"aa] [8"gg] ] }@40,16 Time(83:1:0)EP.T(127,0,!1^1^1^1^1^1^1^1^1^1^1^1^1^1^1^1) OU{ [4 /*[4e`e] [4f`f] [8g`g] */ /*[12c`c] [4`dd]*/ [8"aa] [8"gg] ] } //------------------------------------------------------------------------------ TR 5 CH 4 @126,7 V(80) CHO(60) REV(0) q100h4v110o5 BR(50) P.W(100,20,!1^1^1^1^1^1^1^1) p%.W(-4000,$2000,!1^1^1^1^1^1^1^1) [4 '"gcdf+`c+'1^1^1^1^1^1^1^1] '"gcdf+`c+'1^1^1^1^1^1^1 REV(30)CHO(10) p(127) EP.T(10,127,!1-8) P.T(127,1,!1) <'""fcdef+g+a+`c'1,100,110 Time(81:1:0)EP.T(127,0,!1^1^1^1^1^1^1^1^1^1^1^1^1^1^1^1) EP.T(10,127,!1-8) P.T(127,1,!1) <'""fcdef+g+a+`c'1,100,110 Time(83:1:0)v127EP.T(127,0,!1^1^1^1^1^1^1^1^1^1^1^1^1^1^1^1) P.W(100,20,!1^1^1^1^1^1^1^1) p%.W(-4000,$2000,!1^1^1^1^1^1^1^1) [2 '"gcdf+`c+'1^1^1^1^1^1^1^1] /*@120,0 REV(127)CHO(20)BR(12) v127p%.T(6000,-6000,!2)P.T(127,1,!2) 'cdefgab'2*/ //------------------------------------------------------------------------------ TR 6 CH 5 @37 V(60) BR(12) CHO(2) REV(30) P(42) M(8) Time(42:1:0) o7l16q100h4v100 //p%.W(0,8192,!16) //Solo(6) v.N(100,80,70,50) v_.T(+0,+20,!1^1^1^1^1^1^1^1) Sub{[32abcd]} q50 o3l8v100[8[4'ca'.]['ca']] Time(83:1:0)p%(-100)EP.T(127,0,!1^1^1^1^1^1^1^1^1^1^1^1^1^1^1^1) l8q100v100o3v_(0) [4 [caea][4"a]"a"bcd [cgcg]ggggaabb ] //------------------------------------------------------------------------------ TR 7 CH 6 @51,8 V(50) BR(12) CHO(40) REV(30) P.WR(104,24,!2,24,104,!2) M.W(0,30,!2) EP.WR(127,110,!32,110,127,!32) [24r*1] o5l1q100h4v120 [4 '""gac`e`a``g' // 適当なテンションを加える '""gac`f`a``g' '""d"gc`eg``d' '""f"b"gb`d``f' ]Time(83:1:0)EP.T(127,0,!1^1^1^1^1^1^1^1^1^1^1^1^1^1^1^1) [4 '""gac`e`a``g' '""gac`f`a``g' '""d"gc`eg``d' '""f"b"gb`d``f' ] //------------------------------------------------------------------------------ // めろでー TR 8 CH 7 @11 r4 V(125) REV(100) CHO(50) P(41) r4 BR(24) Time(50:1:0) //r-1^1 ? r1^1 l4 EP.W(127,30,!1) l4q100h3o6v127 OU{ c"bl8c.c.cl4 c"al8c.c.c l8cdcecfcg dgdadbd>cl4 } p%.T(0,-1024,!8) >l1'"cc' p%.T(0,-1050,!8-32) '"cc'p%0 /*p%.W(0,-1200,!8) l4'"cc''"cc''"cc''"cc' p%.W(0,1024,!16) l8'"dd''"dd''"dd''"dd' p%.W(0,1500,!16) '"dd''"dd''"dd''"dd'*/ p%0 <rc4."bcccc^"a^"accc l8} //t.N(0,480/4,480/2) // バラし Time(83:1:0)v100EP.T(127,0,!1^1^1^1^1^1^1^1^1^1^1^1^1^1^1^1) OU{ [4[4[`ca]v-10[ca]v-10]v100]v100 } //------------------------------------------------------------------------------ TR 11 CH 11 @81,1 V(120) REV(85) CHO(40) P(20) BR(54) l8o7q100h4v127 Time(58:1:0) //t.N(0,480/4,480/2) // バラし [3'ace'.]r16q50ab`cq100 [3'fac'.]r16q50ab`cq100 [3'ceg'.]r16q50>cdedefq100< [3'ace'.]r16q50ab`cq100 [3'fac'.]r16q50ab`cq100 [3'ceg'.]r16q50>cdedc"bq100 BR(12)EP.W(127,60,!1^1^1^1)M(30)cdedefq100< [3'ace'.]r16q50ab`cq100 [3'fac'.]r16q50ab`cq100 [3'ceg'.]r16q50>cdedc"bq100< }] //----------------------------------------------------------------------- TR 10 CH 12 @81,0 r2 V(120) REV(90) CHO(60) P(20) BR(24) Time(58:1:0) l8o6q100h4v127 EP.W(127,0,!1) [3'ace'.]r16q50ab`cq100 [3'fac'.]r16q50ab`cq100 [3'ceg'.]r16q50>cdedefq100< OU{ [3'ace'.]r16q50ab`cq100 [3'fac'.]r16q50ab`cq100 [3'ceg'.]r16q50>cdedc"bq100 }BR(12)EP.W(127,60,!1^1^1^1)cdedefq100< [3'ace'.]r16q50ab`cq100 [3'fac'.]r16q50ab`cq100 [3'ceg'.]r16q50>cdedc"bq100< }] //------------------------------------------------------------------------------ TR 11 CH 13 @81,8 r4. V(120) REV(90) CHO(62) P(84) BR(24) Time(58:1:0) l8o5q100h4v100 M.W(0,127,!1^1) [3'ace'.]r16q50ab`cq100 [3'fac'.]r16q50ab`cq100 [3'ceg'.]r16q50>cdedefq100< [3'ace'.]r16q50ab`cq100 [3'fac'.]r16q50ab`cq100 [3'ceg'.]r16q50>cdedc"bq100 v127cdedefq100< [3'ace'.]r16q50ab`cq100 [3'fac'.]r16q50ab`cq100 [3'ceg'.]r16q50>cdedc"bq100< ] //------------------------------------------------------------------------------ TR 20 CH 10 l4q10v50 @17 // Powor P(55) V(102) UseKeyShift=off v.Random(20) //PitchBend.Frequency(480) EP.T(80,127,!1^1^1^1^1^1^1^1) v.T(50,127,!1^1^1^1^1^1^1^1) BR(50) p%.T(-8192,7000,!1^1^1^1^1^1^1^1) REV.T(0,60,!1^1^1^1^1^1^1^1) CHO.T(0,30,!1^1^1^1^1^1^1^1) [8 [4'n35n36n38n40n46'] ] REV(110) v110 EP.onCycle(!4,100,127) P.onCycle(!8,30,50,80,50) p%1024 [8 //p%.T(-500,3000,!1^1^1^1,3000,-500,!1^1^1^1) //p%.T(-1000,7000,!1^1^1^1^1^1^1^1) [16'n35n36n40''n35n36n38n40'] ]r1EP.T(127,0,!1^1^1^1^1^1^1^1^1^1^1^1^1^1^1^1) [[16'n35n36n40''n35n36n38n40']] Time(33:4:0) v127 p%512 l8r*n78p%1024n79 Time(49:4:5) v127 'n52n57' Time(81:1:0) EP.onCycle(!4,90,100,110,127)v40l16[16n38v+7] Time(99:1:0) r*2;ResetGS;r*2 TrackSync; End; …IE7が使いにくいのは俺だけですか? この曲は自作のオリジナル曲であるか、または、作曲者の死後50年以上経過した著作権に問題がない曲であることを確認しましたか? いいえ。よく分かりません はい。著作権に問題ありません (←選択)
cdedefq100< [3'ace'.]r16q50ab`cq100 [3'fac'.]r16q50ab`cq100 [3'ceg'.]r16q50>cdedc"bq100< }] //----------------------------------------------------------------------- TR 10 CH 12 @81,0 r2 V(120) REV(90) CHO(60) P(20) BR(24) Time(58:1:0) l8o6q100h4v127 EP.W(127,0,!1) [3'ace'.]r16q50ab`cq100 [3'fac'.]r16q50ab`cq100 [3'ceg'.]r16q50>cdedefq100< OU{ [3'ace'.]r16q50ab`cq100 [3'fac'.]r16q50ab`cq100 [3'ceg'.]r16q50>cdedc"bq100 }BR(12)EP.W(127,60,!1^1^1^1)cdedefq100< [3'ace'.]r16q50ab`cq100 [3'fac'.]r16q50ab`cq100 [3'ceg'.]r16q50>cdedc"bq100< }] //------------------------------------------------------------------------------ TR 11 CH 13 @81,8 r4. V(120) REV(90) CHO(62) P(84) BR(24) Time(58:1:0) l8o5q100h4v100 M.W(0,127,!1^1) [3'ace'.]r16q50ab`cq100 [3'fac'.]r16q50ab`cq100 [3'ceg'.]r16q50>cdedefq100< [3'ace'.]r16q50ab`cq100 [3'fac'.]r16q50ab`cq100 [3'ceg'.]r16q50>cdedc"bq100 v127cdedefq100< [3'ace'.]r16q50ab`cq100 [3'fac'.]r16q50ab`cq100 [3'ceg'.]r16q50>cdedc"bq100< ] //------------------------------------------------------------------------------ TR 20 CH 10 l4q10v50 @17 // Powor P(55) V(102) UseKeyShift=off v.Random(20) //PitchBend.Frequency(480) EP.T(80,127,!1^1^1^1^1^1^1^1) v.T(50,127,!1^1^1^1^1^1^1^1) BR(50) p%.T(-8192,7000,!1^1^1^1^1^1^1^1) REV.T(0,60,!1^1^1^1^1^1^1^1) CHO.T(0,30,!1^1^1^1^1^1^1^1) [8 [4'n35n36n38n40n46'] ] REV(110) v110 EP.onCycle(!4,100,127) P.onCycle(!8,30,50,80,50) p%1024 [8 //p%.T(-500,3000,!1^1^1^1,3000,-500,!1^1^1^1) //p%.T(-1000,7000,!1^1^1^1^1^1^1^1) [16'n35n36n40''n35n36n38n40'] ]r1EP.T(127,0,!1^1^1^1^1^1^1^1^1^1^1^1^1^1^1^1) [[16'n35n36n40''n35n36n38n40']] Time(33:4:0) v127 p%512 l8r*n78p%1024n79 Time(49:4:5) v127 'n52n57' Time(81:1:0) EP.onCycle(!4,90,100,110,127)v40l16[16n38v+7] Time(99:1:0) r*2;ResetGS;r*2 TrackSync; End; …IE7が使いにくいのは俺だけですか?
cdedefq100< [3'ace'.]r16q50ab`cq100 [3'fac'.]r16q50ab`cq100 [3'ceg'.]r16q50>cdedc"bq100< }] //------------------------------------------------------------------------------ TR 11 CH 13 @81,8 r4. V(120) REV(90) CHO(62) P(84) BR(24) Time(58:1:0) l8o5q100h4v100 M.W(0,127,!1^1) [3'ace'.]r16q50ab`cq100 [3'fac'.]r16q50ab`cq100 [3'ceg'.]r16q50>cdedefq100< [3'ace'.]r16q50ab`cq100 [3'fac'.]r16q50ab`cq100 [3'ceg'.]r16q50>cdedc"bq100 v127cdedefq100< [3'ace'.]r16q50ab`cq100 [3'fac'.]r16q50ab`cq100 [3'ceg'.]r16q50>cdedc"bq100< ] //------------------------------------------------------------------------------ TR 20 CH 10 l4q10v50 @17 // Powor P(55) V(102) UseKeyShift=off v.Random(20) //PitchBend.Frequency(480) EP.T(80,127,!1^1^1^1^1^1^1^1) v.T(50,127,!1^1^1^1^1^1^1^1) BR(50) p%.T(-8192,7000,!1^1^1^1^1^1^1^1) REV.T(0,60,!1^1^1^1^1^1^1^1) CHO.T(0,30,!1^1^1^1^1^1^1^1) [8 [4'n35n36n38n40n46'] ] REV(110) v110 EP.onCycle(!4,100,127) P.onCycle(!8,30,50,80,50) p%1024 [8 //p%.T(-500,3000,!1^1^1^1,3000,-500,!1^1^1^1) //p%.T(-1000,7000,!1^1^1^1^1^1^1^1) [16'n35n36n40''n35n36n38n40'] ]r1EP.T(127,0,!1^1^1^1^1^1^1^1^1^1^1^1^1^1^1^1) [[16'n35n36n40''n35n36n38n40']] Time(33:4:0) v127 p%512 l8r*n78p%1024n79 Time(49:4:5) v127 'n52n57' Time(81:1:0) EP.onCycle(!4,90,100,110,127)v40l16[16n38v+7] Time(99:1:0) r*2;ResetGS;r*2 TrackSync; End; …IE7が使いにくいのは俺だけですか?