TrackName = {"新世界へ"} Copyright = {"滝之上"} MetaText = {"/* 楽器の音色とかはかなりシンプルにしました。 が、曲自体はめっちゃ複雑です。 ほんとに突然、変拍子が出てくるとか、 長調の和音に短音階を使ったり、またその逆も。 とにかくジェットコースターに乗ってるような かなりのスピードで曲は展開していくので テンション高めで聞いてみてください d(･∀・）／♪＼（・∀･)b 　　　　　 　　　　遠近法を使ってみたつもり↑*/"} テンポ 185 拍子 4,4 KeyFlag-(bea); TrackSync; Include(delay.h);Include(groove.h);Include(unison.h); System.MeasureShift(1);ResetGS;TrackSync; Function Tune444(){Int I;For(I=1; I<=16;I ++){CH(I)FineTune(72) DataLSB($03) RPN(127,127,0)} CH 1} Tune444() CH(11) SysEx$ = f0,41,10,42,12,{40,1a,15,02},f7; CH(12) SysEx$ = f0,41,10,42,12,{40,1b,15,02},f7; CuePoint={"TwmParam(120,120,1)"} //================================================================================================== STR RS08 = {[8 r*1]} STR RS10 = {[10 r*1]} STR RS11 = {[11 r*1]} STR RS14 = {[14 r*1]r2} STR RS16 = {[16 r*1]} //--キーボードは二つ使います------------------------------------------------------------------------ STR PF01 = {l4^8'"f"a''c8e8'r8'eg''df''gb''d4f4' '"b+,99e,99f+,99a,99' v+10""a8 q289[2 ""a%16""b%14"d-%14"e%14"g-%14>]v-10 q89<<'e8,109a8,109''d1f1b1' '"f"a''"g8e8'r8'eg''df''gb''`d4`f4''`d+2^4`f+2^4'r8'`d+8`f+8''`d-2^4`f2^4`a2^4' q289 v+10 l32 `e`dbag-ed"b q89 v-10 l4^8} STR PF02 = {'"f"a''c8e8'r8'eg''df''gb''d4f4' '"b+,99e,99f+,99a,99' v+10""a8 q289[2 ""a%16""b%14"d-%14"e%14"g-%14>]v-10 q89<<'e8,109a8,109''d1f1b1' '"f"a''"g8e8'r8'eg''df''gb''`d4`f4''`d+2^4`f+2^4'r8'`d+8`f+8'q99 l1^1^2^8^16 M.onNoteWave(0,127,!1^1);EP.T(127,127,!1,127,32,!1^2^4);'`d-`f`a'r16 M(0)EP(127)} STR PF03 = {r-4 fgb`c`e`f`g`b l4 q99[2 v70 t.N(0,4,8,12,16);'c1e+1g1b+1`d1''"b1^2f1^2g1^2b1^2`c+1^2'v90 '"aegb`c'r'"fca`c`e'r'"ggb`d`f'r8: Sub{'"f1^1^2`c1^1^2`g1^1^2'}Sub{a+1^1^8a2}`e+1^1^8`e4,109`d4,109] '"f1^2^8a+1^2^8`c1^2^8`e+1^2^8`g1^2^8''"f+1^2b1^2`d-1^2`f1^2`a1^2''"g4^8b+4^8`d4^8`f4^8`b+4^8'r8} STR PF04 = {o5 l8 v90 q99 Sub{c1^1"b1^1^1^1^1 c1^1"b1^1^1^1^1^2,99} Sub{e1^1^1^1^1^2d-1^2 e1^1^1^1^1^2d-1^1,99} Sub{g1^1g-1^2c1^1f1^2 g1^1g-1^2c1^1e1^1,99} Sub{b1^1^1^2g1^1a1^2 b1^1^1^2g1^1^1^1,99} [14 r1]v127 `e12`c12b12g12f12f+12 l1 v95} STR PF05 = {[14 r1]r4}//ただの休み STR PF06 = {Sub{o3 [2 ag`cb ag`c:b2e2]c} Sub{o4 [2 eded- gfe:d-]e+} Sub{ gfba bb+ba2g2 gfba bb+b^} o5 v120 q109[2 g1f4^8a+32,129b4^16^32f4g1a2g6a6b6 `c1b+2b+6`c6`d6:`d32,129`e8^32`d8^16b2^8a2b4^8a+16,129a16,129]`e2^4`e4`e+1} STR PF16 = {Sub{o3 [2 ag`cb ag`c:b2e2]`c+} Sub{o4 [2 eded- gfe:d-]g} Sub{ gfba bb+ba2g2 gfba bb+ba+} o5 v120 q109[2 g1f4^8a+32,129b4^16^32f4g1a2g6a6b6 `c1b+2b+6`c6`d6:`d32,129`e8^32`d8^16b2^8a2b4^8a+16,129a16,129]`e2^4`e4`e+1} STR PF07 = {[15 r1]EP.T(0,127,!2^4);'"g1,,125"b1,,125e+1,,125g1,,125'} STR PF17 = {[14 r1]KeyFlag+(fcg);r1^1 v100 <"a12"b12c12e12f12b24,189b+24,159>KeyFlag-(bea);} STR PF27 = {EP.T(32,127,!1^1^1^1^1^1^1);""c+1^1^1^1^1^1^1 KeyFlag+(fcg);v100 r2 <"a12"b12c12e12f12b24,189b+24,159>KeyFlag-(bea);} STR PF08 = {RS08 EP.T(0,127,!1);'d-1^1f1^1a1^1`c1^1'} STR PF09 = {KeyFlag+(fcg);l8 v120[2 c"bec^"bf"bc"be"bf"bc"bc"be"bf"bg"bgage^c"b"a: c"bec^"bf"bc"be"bf"bc"be+"bf"bg"bb"bbaga^ge"b] c"bec^"bf"bc"be"bf"bc"bc"be"bf"bb"b'c2,,90e2,,80b2' EP.T(127,96,!2);/*p%.T(0,-8191,!2);*/'c2,,90f2,,80a+2',95 KeyFlag-(bea);} STR PF19 = {KeyFlag+(fcg);l8 v120 p%(0);[2 c"bec^"bf"bc"be"bf"bc"bc"be"bf"bg"bgage^c"b"a: c"bec^"bf"bc"be"bf"bc"be+"bf"bg"bb"bbaga^ge"b] c"bec^"bf"bc"be"bf"bc"bc"be"bf"bb"b'c2,,90e2,,80b2''c2,,90f2,,80a+2' KeyFlag-(bea);} STR PF10 = {l1 KeyFlag+(cfg);v80 q109 o4[2 'dfa`c''dfgb''cegb''cefa':'dfa`c''efgb''de+gb''f2a2`c2`e2''e2g-2b2`d2'] 'dfa`c''efgb''fgb`c''cfa+`c' KeyFlag-(bea);v100} STR PF11 = {Sub{l1^1 q101<'"ff''"f+f+''"gg''"aa''"a+a+''"bb''"b+b+''c`c'>} >'c+e+gb'%6144<} STR PF12 = {Sub{'c+e+gb'1^1^1^1^1^1^1^2^4} q299 l12 >[7 e+gb`c+`e+`g`b`g`e+`c+bg]e+gb`c+`e+`g`b[5 r12]<} トラック1 V(127) REV(80) CHO(64) M(0) q89 P(64) BR(12) l4^8 v100 o6 @82,90,1 r1 RS08 PF01 PF02 RS14 PF05 PF07 PF01 PF02 PF05 PF17 PF09 RS16 PF27 PF19 PF19 EP.T(127,0,3072);PF19 //--第二キーボード---------------------------------------------------------------------------------- トラック2 V(110) REV(48) CHO(32) M(20) q99 P(64) l32 o4 q299 @49,90,1 RS08 RS08 RS11 PF03 PF04 PF06 RS08 PF08 PF04 PF16 PF10 PF11 PF12 PF10 PF10 EP.T(127,0,3072);PF10 //--エレキギター------------------------------------------------------------------------------------ STR GT01 = {@31,8 t.N(0,1,2,3);[2 '"fca`e''"f8,28c8,28a8,28`e8,28'[2 '"fca`e'][2 '"f16,28c16,28a16,28`e16,28'] '"gfb`d''"g8,28f8,28b8,28`d8,28'[2 '"gfb`d'][2 '"g16,28f16,28b16,28`d16,28']: '"b+f+b`e''"b+8,28f+8,28b8,28`e8,28'[2 '"b+f+b`e'][2 '"b+16,28f+16,28b16,28`e16,28'] '"ba`c`f''"b8,28a8,28`c8,28`f8,28'[2 '"ba`c`f'][2 '"b16,28a16,28`c16,28`f16,28']] '"b+f+b-`e''"b+8,28f+8,28b-8,28`e8,28'[2 '"b+f+b-`e'][2 '"b+16,28f+16,28b-16,28`e16,28'] 'd-a`c`f''d-8,28a8,28`c8,28`f8,28'[2 'd-a`c`f'][2 'd-16,28a16,28`c16,28`f16,28']} STR GT02 = {t.N(0,1,2,3);[2 '"fca`e''"f8,28c8,28a8,28`e8,28'[2 '"fca`e'][2 '"f16,28c16,28a16,28`e16,28'] '"gfb`d''"g8,28f8,28b8,28`d8,28'[2 '"gfb`d'][2 '"g16,28f16,28b16,28`d16,28']: '"b+f+b`e''"b+8,28f+8,28b8,28`e8,28'[2 '"b+f+b`e'][2 '"b+16,28f+16,28b16,28`e16,28'] '"ba`c`f''"b8,28a8,28`c8,28`f8,28'[2 '"ba`c`f'][2 '"b16,28a16,28`c16,28`f16,28']] '"b+f+b-`e''"b+8,28f+8,28b-8,28`e8,28'[2 '"b+f+b-`e'][2 '"b+16,28f+16,28b-16,28`e16,28'] 'd-a`c`f''d-8,28a8,28`c8,28`f8,28'[2 'd-a`c`f'][2 'd-16,28a16,28`c16,28`f16,28'] M.onNoteWave(0,127,!1^1);'d-1^1a1^1,,,2`c1^1,,,4`f1^1,,,6'M(0) t(0)} STR GT03 = {M.onNoteWave(0,0,!4,0,64,!4);@26,32 r-4 o5 r4 l8[2 v127 q197 b+`cb+g2r8^16a+16b4a,97gagecec"b v100 q97 '"e4"a4,,,2c4,,,4'r[2 '"e16,28"a16,28,,2c16,28,,4']'"f4"a4,,,2e4,,,4'r[2 '"f16,28"a16,28,,2e16,28,,4'] '"g4"b4,,,2f4,,,4'[2 '"g16,28"b16,28,,2f16,28,,4']: EP.T(127,127,!1,127,32,!1^2)'"f1^1^2"a+1^1^2,77,,2e+1^1^2,77,,4g1^1^2,,,6'r8 EP(127)] '"f1^2^8"a+1^2^8,77,,2e+1^2^8,77,,4g1^2^8,,,6''"f+1^2"b1^2,,,4f1^2,,,8a1^2,,,12' '"g4^8d4^8,,,4f4^8,,,8b+4^8,,,12'r8} STR GT04 = {v127 q197 l8 @26,32[2 [4 "gdeb][3 "bfg-`d-][4 "geb`d]:[3 "fd-a`c]][3 "bgb:`e]`d-`e`d-bg} STR GT05 = {t.N(0,1,2,3);o4 l2^4 v80 q77[2 '"acfb'[3 '"a12c12f12b12']'"gdfb+'[3 '"g12d12f12b+12'] '"geb`c'[3 '"g12e12b12`c12']'"ad-fb'[3 '"a12d-12f12b12'] '"aeg`c'[3 '"a12e12g12`c12']'"gfb+`d'[3 '"g12f12b+12`d12'] 'cgb`e'[3 'c12g12b12`e12']:q47 '"b4d-4a4`c4'[3 '"b12d-12a12`c12']'"b4e4g4`d-4'[3 '"b12e12g12`d-12']q77 ]'c2^4g2^4b2^4`e+2^4'[3 'c12g12b12`e+12'] l4 v100 q97} STR GT06 = {@31,8 l2^4^8 v100 o4 KeyFlag+(fcg);t.N(0,1,2,3,4);[2 '"adf`c`e'[2 '"a16,28d16,28f16,28`c16,28`e16,28'] '"beg`c`e'[2 '"b16,28e16,28g16,28`c16,28`e16,28'] '"bea`c`f'[2 '"b16,28e16,28a16,28`c16,28`f16,28'] '"aea`c`f'[2 '"a16,28e16,28a16,28`c16,28`f16,28']: '"adf`c`e'[2 '"a16,28d16,28f16,28`c16,28`e16,28'] '"beg`c`e'[2 '"b16,28e16,28g16,28`c16,28`e16,28'] '"be+gb`d'[2 '"b16,28e+16,28g16,28`d16,28`e+16,28'] [2 '"a4^8e4^8a4^8`c4^8`f4^8'[2 '"a16,28e16,28a16,28`c16,28`f16,28']Key(-2);]Key(0);] '"adf`c`e'[2 '"a16,28d16,28f16,28`c16,28`e16,28'] '"beg`c`e'[2 '"b16,28e16,28g16,28`c16,28`e16,28'] 'cfb`e`g'[2 'c16,28f16,28b16,28`e16,28`g16,28'] 'cfa+`c`f'1 KeyFlag-(bea);} STR GT07 = {[6 r1]< p%(8191)r1[2 '"gc+e+b`c+'8[4 '"gc+e+b`c+'16,28]]p%.T(8191,0,!4);'"gc+e+b`c+'4>} トラック5 V(125) REV(16) CHO(48) M(0) q97 P(32) o4 v100 BR(12) @31,8 r1 [2 GT01]GT02 GT03 GT04 GT05 GT01 GT02 GT04 GT05 GT06 RS16 GT07 GT06 GT06 EP.T(127,0,3072);GT06 //--普通のエレキベースで問題ないでしょう------------------------------------------------------------ STR BA01 = {[2 ffgff`cfa ggbgg`dga+>[2 "b+"b+f+]"b+d+:[2 "b+"b+f+]"b+d+:[2 d^^`d^^d^ d^`d`e^^`d^ c^^g^e"g"g- "f^ca^^g^: d^^`d^^dd+ e^^`e^^e16f16e f-^^"f-^^"f-^ "f^ce^g-b`d] d^^`d^^dd+ e^^`e^^e"b "fcef^efb a+gfc"a+"g"f^ KeyFlag-(bea);<} STR BA16 = {KeyFlag+(fcg);>[2 d^^`d^^d^ d^`d`e^^`d^ c^^g^e"g"g- "f^ca^^g^: d^^`d^^dd+ e^^`e^^e16f16e f-^^"f-^^"f-^ "f^ce^g-b`d] d^^`d^^dd+ e^^`e^^e"b "fcef^efb a+gfc"a+"g"f"e<} STR BA07 = {[8 f4][8 f+4][8 g4][8 a4][8 a+4][8 b4][8 b+4][8 `c4]} STR BA08 = {[2 [4 `c+4]`c+4`c+6c+12[3 e+12`e+12]] [2 `c+4`c+6c+12[3 e+12`e+12]]`e+4`e+6e+12[3 g12`g12] `c+12b12g12b12g12e+12 `e+12`g12`b12``c+12r6} トラック8 V(120) REV(0) CHO(32) M(0) q96 P(96) o2 l8 v127 M.onNoteWave(0,0,!1,0,64,!1); @39,1 r1 [2 BA01]BA02 BA03 BA04 BA05 BA01 BA02 BA04 BA15 BA06 BA07 BA08 BA16 BA06 EP.T(127,0,3072);BA06 //--珍しくアコースティックなドラムです。------------------------------------------------------------ KeyFlag-(); STR DR01 = {a+4,,100a+4,,80f+,,100[3 g+,,80]a+4,,120} STR DR02 = {Sub{[2 [3 [4 c4,,127]][3 c4,,127]c8,,127c8,,120]} [7 [4 f+8,,100g+8,,50]]a+4,,100a+4,,80f+,,100[3 g+,,80]a+4,,120} STR DR03 = {Sub{[2 [3 [4 c4,,127]][3 c4,,127]c8,,127c8,,120]} Sub{[2 '`c+4,,125`e4,,125'r1^1^2^4:v60r2[2 '`c+4`e4'v+20]v100]} [7 [4 f+8,,100g+8,,50]]a+4,,100a+4,,80f+,,100[3 g+,,80]a+4,,120} STR DR04 = {Sub{[2 [3 [4 c4,,127]][3 c4,,127]c8,,127c8,,120][2 c4,,120r4][3 c4,,127][2 c8,,127]} Sub{[2 '`c+1,,125`e1,,125'[3 r*1]][2 '`c+1,,125`e1,,125']} [7 [4 f+8,,100g+8,,50]]a+4,,100a+4,,80f+,,100[3 g+,,80]a+4,,120[8 a+4,,100] r-2'`c+4`e4'a+4,,120} STR DR05 = {Sub{[2 v127 Sub{'`c+4`e4,,100'}[2 c4c4r4c8c8,,100]c4c4,,100 [3 'c4`c+4`e4,,100':r4]r8c8:Sub{'c4`c+4`e4,,100'}[2 c4,,100][2 c4c4r4c8c8,,100]] Sub{'c4`c+4`e4,,100'}[2 c4,,100][3 c4c4r4c8c8,,100]v100} l4 v120[2 [2 `d+`d+,,90`d+,,100`d+,,90]`d+,,120`d+,,90r1^1: [2 `d+`d+,,90`d+,,100:`d+,,90][3 `d+12 v-20]] [3 `d+`d+,,90`d+,,100`d+,,90]l16 v100} STR DR06 = {Sub{Sub{'`c+`e'}[2 [4 c4,,127r4][3 c4,,127r4]] Sub{'`c+`e'} [8 c4,,127][6 c4,,127][8 c4,,127][3 c4,,127]r4^8c16,,127c16[3 c3,,127]} [4 [7 f+8,,100g+8,,50][2 f+,,100g+,,50] [5 f+8,,100g+8,,50]:[2 f+,,100g+,,50]][3 f+8,,100g+8,,50]} STR DR07 = {Sub{[16 c4,,120r4c4,,100r4]} Sub{[16 `d+4,,120`d+4,,100`d+4,,120`d+4,,100]} [16 [2 f+4,,100[3 f+12,,110]]]} STR DR08 = {Sub{v127 [3 '`c+1`e1'r1][2 '`c+2`e2'][4 '`c+4`e4'] [3 '`c+1`e1'r1][4 '`c+4`e4'][2 '`c+2`e2']} Sub{[16 [4 c4,,120]]} [16 [4 r8f+8,,120]]} STR DR09 = {EP.T(127,32,124,32,127,6020);v127 Sub{'`c+`e'} Sub{[4 c4r2^4][8 [2 c4r4]][4 [4 c4]]} [16 [2 a+4a+6g+12,,120]]} STR DR10 = {Sub{[4 '`c+1`e1':r1]'`c+`e'1} Sub{[7 [4 c4]][2 c4]} Sub{[8 [3 `d+4,,100]:`d+12`d+12,,100`d+12,,64]r4} [7 [2 a+4a+6g+12,,120]]a+4a+6g+12,,120a+2} トラック10 V(105) REV(0) CHO(80) M(0) q12 P(64) l16 o3 BR(12) p%(-2000) @33,90,1 DR01 DR02 DR03 DR04 DR05 DR06 DR07 DR03 DR04 DR06 DR07 DR08 DR09 DR10 DR08 DR08 EP.T(127,0,3072);DR08 //-------------------------------------------------------------------------------------------------- STR SD01 = {Sub{[2 '`c+4,,125`e4,,125'r1^1^2^4:v60r2[2 '`c+4`e4'v+20]v100]} [8 r4'"e4d+4e4,,120'r'"e,,80d+,,80e,,100'r8'"e4,,80d+4,,80e4,,120']} STR SD02 = {Sub{[2 '`c+4,,125`e4,,125'r2^4[3 r*1]][2 '`c+4,,125`e4,,125'r2^4]} [8 r4'"e4d+4e4,,120'r'"e,,80d+,,80e,,100'r8'"e4,,80d+4,,80e4,,120'] [3 '"e8,,60d+8,,60e8,,80''"e8d+8e8,,120':'"e8,,60d+8,,60e8,,80'] r4'"e4d+4e4,,120'`d,,127`c,,120b,,110g,,100Sub{'`c+4`e4'}b8,,110g8,,110} STR SD03 = {[2 Sub{'`c+,,125`e,,100'}[2 r2'"e4,,80d+4,,80e4,,120'r4]r4'"e4,,80d+4,,80e4,,120' v120[3 '`c+8`e8,,100'`d`cb:agf]r'`c+4^8`e4^8,,100'r4[2 r2'"e4,,80d+4,,80e4,,120'r4]] r2'"e4,,80d+4,,80e4,,120'[4 '"e,,80d+,,80e,,100']} STR SD04 = {Sub{'`c+`e'}[2 r1^1^1^2]Sub{'`c+`e'}[2 r1^1^1^2] v50[8 '"ed+e'v+10]v100} STR SD05 = {[15 r2'"e4,,80d+4,,80e4,,100'r4]v90[4 '"e12d+12e12'v-10[2 '"e12d+12e12']v+20]} STR SD06 = {Sub{v127 '`c+1`e1'[3 r1]'`c+1`e1'r1[3 '`c+2`e2']'`c+4`e4'[3 '`c+12`e12'] '`c+1`e1'[3 r1]'`c+1`e1'r1'`c+4`e4'r2'`c+4`e4'[2 '`c+2`e2']} [16 [2 r4'"e4d+4e4,,120']]} STR SD07 = {EP.T(127,32,12,32,127,3060);v127[7 [3 '"ed+e'12,,64]'"ed+e,,120'12[2 '"ed+e'12,,64] [2 '"ed+e'12,,64][2 '"ed+e'24,,64]'"ed+e,,120'12[2 '"ed+e'12,,64] ]'`c+`e'1} トラック11 V(120) REV(32) CHO(0) M(0) q14 P(60) l16 o3 BR(12) p%(-6000) @25,90,1 r1 RS08 SD01 SD02 SD03 SD04 SD05 SD01 SD02 SD04 SD05 SD06 RS16 SD07 SD06 SD06 EP.T(127,0,3072);SD06 //-------------------------------------------------------------------------------------------------- STR DP01 = {[8 'c']} トラック12 V(127) REV(127) CHO(80) q9 P(64) o3 l1^1 @1,0,0 v127 Time(135:3:000);TempoChange(185,145,!2); Time(136:1:000);Tempo=185 DP01 //================================================================================================== //Solo(1)//トラックソロ。複数トラックで指定可能 //Mute(1)//トラックミュート。