サクラトップ > 掲示板トップ > 投稿フォーム
曲の投稿にはユーザー登録が必要です。 曲 名 作 者 名前: パスワード: 転 載 メール連絡すれば可 全て許可 メール連絡すれば可 許可しない (ゲームのBGMなど使いたい場合、許可するかどうかを指定。 サクラ本体への収録はあらかじめご承諾ください。) ゲーム制作サイト「Rmake」への転載(およびMP3変換)を許可する ジャンル ポップス ポップス ハードロック・ヘヴィーメタル ヒップホップ クラシック 歌謡曲・演歌 J-POP ロック ブルース・カントリー ダンス・エレクトロニカ ワールド アニメ・ゲーム 日本の伝統音楽・芸能 オルタナティヴロック ソウル・R&B ジャズ・フュージョン ヒーリング・ニューエイジ キッズ・ファミリー 音 源 (パソコン内蔵音源、GS音源、GM音源など) 公開 公開する 削除する (公開を中止して削除するときには、この項目を変更します。) コメント ほかの学校より一足早く今日、卒業式を迎え、晴れて高校卒業なりました。 ということで、卒業式自体とは関係ないですが、学校から程近いとある街をイメージした曲をひとつ。 曲データ(サクラから貼り付けます。) TrackName = {"潮風の街〜本牧〜"} Copyright = {"騎士王321"} MetaText = {"爽快度高め。 ここは横浜のとある街、本牧。知る人ぞ知る伝説の街。 昭和のカルチャーはこの街発祥のものもあったりするんです。 今回はそんな懐かしい風薫る街、本牧に思いを馳せてみました。"} テンポ 135 拍子 4,4 KeyFlag+(fcg); TrackSync; Include(delay.h);Include(groove.h);Include(unison.h); System.MeasureShift(1);ResetGS;TrackSync; CuePoint={"TwmParam(16,120,0);"}//ReverbTime,DepthLevel,HighDump Function Tune444(){Int I;For(I=1; I<=16;I ++){CH(I)FineTune(80) DataLSB($03) RPN(127,127,0)} CH 1} Tune444() CH(11) SysEx$ = f0,41,10,42,12,{40,1a,15,02},f7; //================================================================================================== STR Cre16 = {EP.T(0,127,6144);} STR Res16 = {[16 r*1]}/* ==================================================================================================*/ STR PF01 = {v110[3 r8^16^32`d+32`e`cae2,103r1 r4`e`cae2,103r1] r8^16^32`e+32`f`caf2,103r1 r4`ebge2,103 r4`e`d`cb`e`f`g`b``e} STR PF02 = {v110 `a2^12`g`a`g`f+`f [3 `e`c,,95b,,95]`e^b+%12,273b%10a+%10 a2^12gabad+ efgfgbgb`cb`c`e >fd+ebrgd+eb^^^,103rd+e[2 bg,,95e,,95]br Sub{e}b24b+24 `c2^12`e`cb`cg bgebf+ebfeceg< `a2^12`g`a`g`f+`f [3 `e`c,,95b,,95]`e^b+%12,273b%10a+%10 a2^12gabad+< v.N(110,95,95);`e`cb`cbabagagf v110 gee+fab>l16 cdee+fgab l12>c"bec"bfc"bec"bg [2 l12 c"bgfeb:l8 b+32`c16^32gl12 feb]`cbgb`c`d} STR PF03 = {v110>d+32e4^8^16a+32bagag<`e2^6`cbaga<`e2^12 bagab e2"b+cefafbb+`c`e`f`g> v100[4 f%16g%16]v110fgagfgab>v95[4 c%16d+%16]v110 cd+ec"aegb age^c"b+24"b24 "e+"a"bde+abe+,73,80 aa+bafed"b l4 d12e12e+12 q83 v.N(85,85,100);t.N(0,2,4);'"bea''de+b''ea`d'> '"f"be''"gcf''"bdg'v100 q103 t(0)]< `a2^12`g`a`g`f+`f [3 `e`c,,95b,,95]`e^b+%12,273b%10a+%10 a2^12gabad+ efgfgbgb`cb`c`e >fd+ebrgd+eb^^^,103rd+e[2 bg,,95e,,95]br Sub{e}b24b+24 `c2^12`e`cb`cg bgebf+ebfeceg} STR PF07 = {Sub{c2,93,90e8,,70}a2^12gagf+f Sub{v-20"g4"f+4"f4v+20}[3 ec,,95"b,,95]e^"b+%12,273"b%10"a+%10< Sub{e2,93,90c8,,70}a2^12gabad+ Sub{v-30c4d4d+4e4v+30}efgfgbgb`cb`c`e r-32`g32,,90> '"b,473,80f'd+ebr'c,473,80g'd+eb^^^,103rd+e Sub{a4g4}[2 bg,,95e,,95]br Sub{e}b24b+24 'a2^12,93,80`c2^12'`e`cb`cg Sub{c2,,80}bgebf+ebfeceg Sub{c2,93,90e8,,70}a2^12gagf+f Sub{v-10"g4"f+4"f4v+10}[3 ec,,95"b,,95]e^"b+%12,273"b%10"a+%10< Sub{e2,93,90c8,,70}a2^12gabad+l16 cdee+fgab l12>c"bec"bfc"bec"bg Sub{q93 v90 [2 "f4c4e4:"a4]g4 q173 v110} [2 l12 c"bgfeb:l8 b+32`c16^32gl12 feb]`cbgb`c`d}//下手にハモリを入れないほうが良いみたいです。無念。。。 STR PF08 = {v110>'"a2,103,85c2,103,85,8e2,,105,16'bagag<`e2^6`cbaga<`e2^12 bagab e2"b+cefafbb+`c`e`f`g> v100[4 f%16g%16]v110fgagfgab>v95[4 c%16d+%16]v110 cd+ec"aegb age^c"b+24"b24 Sub{e4r8d4r8e8r8f4r8f+4r8g8r8b4}[3 gab`c:`dr]>[3 "bcde:fr][2 bgf+fedc"b+<] l4 t.N(0,4,8,12);v.N(90,80,80,110) q93'ceg`c''dfgb''dega+''"bcea't(0)} STR PF09 = {Sub{'"a1^1,93c1^1,73,,4e1^1,83,,8g1^1,103,,12'v90 o6 l12 q173} [2 r2 fed+ed+"b1^12>v-5 r2 fed+ed+"b1^12v-5] Sub{v60 o5'""a1^1c1^1,96e1^1,96,,6g1^1,96,,12b1^1,96,70,18'}r1 EP.T(127,32,!1);v50>>'"a2c2,,,6f2,,,12g2,,,18b2,,,24'} トラック1 V(125) REV(64) CHO(16) M(0) q173 P(64) l12 @1 Res16 Res16 EP.T(64,127,6144);PF01 PF02 PF03 PF04 PF05 PF06 /*PF07*/"bcdff+g bgf+gfd c8g8fdf edc"b"a"g p%.T(-8191,0,!4);[16 '"g64,66,80c64,66,80']q66 l4'"gc' TempoChange(135,99,!1);t.N(0,3,6);'ceg''cea''ceg'q96 t(0)ModG'ce,,,12`c,,,24' l12 o4 Tempo(135) r-8 KeyFlag+(fcg);r4 M(0)r-8} STR Gt06 = {[12 r*1]TempoChange(135,127,!1^1^1^2^8);r1^1^1^2^8 TempoChange(127,78,!4^8);r4^8[16 r-1] v80 MidiDelay({[16 [4 bge]]/*bgebge`cbgbge*//*←音切れする*/},1,!8^16); 'e1^1,96,70g1^1,96,70,24b1^1,96,,48'} トラック4 V(110) REV(80) CHO(32) M(0) q156 P(40) o4 l12 BR(12) @26 EP.T(100,127,!2); Gt01 Gt01 Gt02 Gt01 Gt03 V(125) Gt04 Gt05 Cre16 Gt01 Gt01 Gt01 Gt06 //-------------------------------------------------------------------------------------------------- トラック5 V(70) REV(96) CHO(0) M(0) q156 P(112) o4 l12 BR(12) r8^16 @25,32 EP.T(100,127,!2); Gt01 Gt01 Gt02 Gt01 Gt03 V(60) Gt04 Gt05 V(70) Cre16 Gt01 Gt01 Gt01 Gt06 //-------------------------------------------------------------------------------------------------- トラック6 V(50) REV(96) CHO(0) M(0) q156 P(16) o4 l12 BR(12) r4^8 @25,32 EP.T(100,127,!2); Gt01 Gt01 Gt02 Gt01 Gt03 V(60) Gt04 Gt05 V(50) Cre16 Gt01 Gt01 Gt01 Gt06 //-------------------------------------------------------------------------------------------------- STR BaEP = {v.N(100,120,100,120,100,120,120,120);} STR Ba01 = {l1^1 afafafde} STR Ba02 = {afafafbe1^2e+2} STR Ba03 = {fd+fd+fd+"bc} トラック8 V(127) REV(32) CHO(0) M(0) q97 P(80) o3 @36 EP.T(100,127,!2); Ba01 Ba01 Ba01 r-4 EP.T(127,0,!8,0,0,!8);r4 EP(127) Ba01 Ba02 Ba03 Ba03 Cre16 Ba01 v+10 Ba01 Ba01 Ba01 EP.T(127,127,!1,127,0,!1^1);a1^1^8 //-------------------------------------------------------------------------------------------------- トラック9 V(127) REV(8) CHO(64) M(10) q98 P(80) o2 BaEP @80 EP.T(100,127,!2); Ba01 Ba01 Ba01 r-4 EP.T(127,0,!8,0,0,!8);r4 EP(127) BaEP Ba01 v.N(100,120);Ba02 BaEP Ba03 Ba03 Cre16 Ba01 Ba01 Ba01 Ba01 EP.T(127,127,!1,127,32,!1^1);a1^1^8 //-------------------------------------------------------------------------------------------------- STR El01 = {l1^1 v95 '"acegb''"fcea`c''"aceb`f,,85''"fcea`e' '"aegb`c''"f"aegb'Sub{`c1^1`c1^1}'"d"aef''"edgb'} STR El02 = {l1^1 v95 '"acegb''"fcea`c''"aceb`f,,85''"fcea`e' '"aegb`c''"f"aegb'Sub{d1^1d1^1}'""bab`e+''"e1^2g1^2b1^2`c1^2''"e+2"b2g2`e+2'} STR El03 = {V.T(110,0,!1^1^1);l1^1^1 v95 '"acegb'""a} トラック13 V(110) REV(96) CHO(16) M(20) q96 P(0) EP.onNoteWave(112,16,!2,16,112,!2,112,16,!2,16,112,!2); @5 Res16 t.N(0,1,2,3,4);El01 El01 El01 El02 Key(-3); El01 El01 Key(0); El01 El01 El01 El01 El03 //-------------------------------------------------------------------------------------------------- トラック14 V(110) REV(96) CHO(16) M(20) q96 P(127) EP.onNoteWave(16,112,!2,112,16,!2,16,112,!2,112,16,!2); @5 Res16 t.N(0,1,2,3,4);El01 El01 El01 El02 r-8 Key(-3);r8 El01 El01 Key(0); El01 El01 El01 El01 El03 //-------------------------------------------------------------------------------------------------- トラック15 V(75) REV(48) CHO(16) M(40) q99 P(0) EP.onNoteWave(112,16,!2,16,112,!2,112,16,!2,16,112,!2); @90 Res16 t.N(0,1,2,3,4);El01 El01 El01 El02 r-4 Key(-3);r4 El01 El01 Key(0); El01 El01 El01 El01 El03 //-------------------------------------------------------------------------------------------------- トラック16 V(75) REV(48) CHO(16) M(40) q99 P(127) EP.onNoteWave(16,112,!2,112,16,!2,16,112,!2,112,16,!2); @90 Res16 t.N(0,1,2,3,4);El01 El01 El01 El02 r-8^16 Key(-3);r8^16 El01 El01 Key(0); El01 El01 El01 El01 El03 //-------------------------------------------------------------------------------------------------- KeyFlag-(); STR DrPB = {p%.T(-8191,-2000,5760,-2000,0,384);} STR Dr00 = {[16 r*1]r-2^32 c32,,95c12,,125[2 c12,,75]c8,,125c8,,75} STR Dr01 = {[16 c4,,110c4,,110:c4,,110c4,,110]r-32 c32,,95c12,,115[2 c12,,75]c8,,110c8,,75} STR Dr02 = {Sub{[16 c4,,110c4,,110:c4,,110c4,,110]r-32 c32,,95c12,,115[2 c12,,75]c8,,110c8,,75} [16 `b,,120`b%64,,110`b%32,,80`b4,,120`b4,,100]} Str Dr03 = {r-24[2 `b48,,115]r24[16 `b32 v-11 `b32 v+9]r-24`b24,,85[3 `b12]`b,,100} トラック10 V(110) REV(16) CHO(32) M(0) q12 P(64) o3 BR(12) p%(0) @27,90 Dr00 Dr01 Dr02 r-4 EP.T(127,0,!4);r4 EP(127) Dr02 Dr02 Dr02 Dr02 Cre16 DrPB Dr01 Dr02 Dr02 Dr02 Dr03 //-------------------------------------------------------------------------------------------------- STR HCEP = {EP.T(127,0,6144)} STR HC01 = {[16 r4e-4,,100r4e-%64,,100e-%32,,70]} STR HC02 = {[15 r*1]r4e-4,,110 e-%32,,100[2 e-%32,,70]e-4,,100} トラック11 V(105) REV(64) CHO(0) M(0) q14 P(64) o3 BR(12) p%(2000) @27,90 Res16 HC01 HC01 r-4 EP.T(127,0,!4);r4 EP(127) HC01 HC01 HC01 HC01 HC02 HC01 HC01 HCEP HC01 //================================================================================================== //Solo(1)//トラックソロ。複数トラックで指定可能 //Mute(1)//トラックミュート。 この曲は自作のオリジナル曲であるか、または、作曲者の死後50年以上経過した著作権に問題がない曲であることを確認しましたか? いいえ。よく分かりません はい。著作権に問題ありません (←選択)