TrackName = {"Space"} Copyright = {"騎士王321"} MetaText = {"ほんとはもうちょっといい曲名があるんじゃないかとか悩んでます"} テンポ 133 拍子 4,4 KeyFlag+(fc); TrackSync; Include(delay.h);Include(groove.h);Include(unison.h); System.MeasureShift(1);ResetGS;TrackSync; 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; CH(13) SysEx$ = f0,41,10,42,12,{40,1c,15,02},f7; //CH(14) SysEx$ = f0,41,10,42,12,{40,1d,15,02},f7; CuePoint={"TwmParam(120,121,40)"} CuePoint={"TwmChorus(1,127,60,64,64,48,1)"} //================================================================================================== STR KEEP = {} STR RS01 = {r1} STR RS16 = {r%6144} //-------------------------------------------------------------------------------------------------- STR CF00 = {Sub{[16 [4 V.T(40,50,!4);r4]]}EP.T(32,127,6144); '"gdb`f`a'%6144} STR CF01 = {Sub{[16 [4 V.T(40,50,!4);r4]]} [2 '""bb`f`a``d'1^1^1^2'"da`f`a``c'2'"gdb`f`a'%1536]} STR CF11 = {Sub{[16 [16 V.T(50,0,!16);r16]]} Sub{[4 EP.T(0,32,!1^1,32,127,!1,127,0,!1);r%1536]} [2 '""bb`f`a``d'1^1^1^2'"da`f`a``c'2'"gdb`f`a'%1536]} STR CF02 = {Sub{[16 [16 V.T(50,0,!16);r16]]} Sub{[4 EP.T(0,32,!1^1,32,127,!1,127,0,!1);r%1536]} [2 '""bb`f`a``d'1^1^1^2'"da`f`a``c'2'"gdb`f`a'%1536] EP.T(0,127,6144);/*後につなげる*/} STR CF12 = {Sub{[16 [16 V.T(50,0,!16);r16]]} Sub{[4 EP.T(0,32,!1^1,32,127,!1,127,0,!1);r%1536]} '""bb`f`a``d'1^1^1^2'"da`f`a``c'2'"gdb`f`a'%1536 '""bb`f`a``d'1^1^1^2'"da`f`a``c'2'"gdb`f`a'1^1'"edb`e`g+'1^1} STR CF22 = {Sub{[16 [4 V.T(40,50,!4);r4]]} '""bb`f`a``d'1^1^1^2'"da`f`a``c'2'"gdb`f`a'%1536 '""bb`f`a``d'1^1^1^2'"da`f`a``c'2'"gdb`f`a'1^1'"edb`e`g+'1^1} STR CF03 = {Sub{[16 [4 V.T(40,50,!4);r4]]} EP.T(127,0,6144); [2 '""bb`f`a``d'1^1^1^2'"da`f`a``c'2'"gdb`f`a'%1536]} STR CF59 = {Sub{[16 [16 V.T(50,0,!16);r16]]} Sub{[4 EP.T(0,32,!1^1,32,127,!1,127,0,!1);r%1536]} '"d+d+b-`f-`g'%1536'"f-f-a`c-`g'%1536'"gdb`d`a'%1536'"c-eb-`d`g+'%1536} STR CF51 = {Sub{[16 [4 V.T(40,50,!4);r4]]} EP.T(127,0,6144); '"d+d+b-`f-`g'%1536'"f-f-a`c-`g'%1536'"gdb`d`a'%1536'"c-eb-`d`g+'%1536} STR CF81 = {Sub{[16 [16 V.T(50,0,!16);r16]]} Sub{[4 EP.T(0,32,!1^1,32,127,!1,127,0,!1);r%1536]} [2 '"bb`d+`f`b'1^1Sub{`b1^2`a2}'da`c`e`f'1^1'"gdb`d`f`a'1^1^1^1]} STR CF82 = {Sub{[16 [16 V.T(50,0,!16);r16]]} Sub{[4 EP.T(0,32,!1^1,32,127,!1,127,0,!1);r%1536]} [4 '"ffa+`c`f'1^1^1'"eeg+b`e'1]EP.T(0,127,6144);} トラック1 V(40) REV(64) CHO(40) M(10) q100 P(0) o4 l2 @92,0,0 p%(256) v120 r1 RS16 CF02 CF01 CF01 CF01 CF01 CF22 CF51 RS16 CF81 CF81 RS01 CF82 CF82 CF01 CF03 CF11 //-------------------------------------------------------------------------------------------------- トラック2 V(40) REV(64) CHO(40) M(20) q100 P(127) o4 l2 @92,0,0 p%(-256) v120 r1 RS16 CF02 CF01 CF01 CF01 CF01 CF22 CF51 RS16 CF81 CF81 RS01 CF82 CF82 CF01 CF03 CF11 //-------------------------------------------------------------------------------------------------- STR BA01 = {Sub{[16 [4 V.T(20,50,!8,50,127,!8);r4]]} Sub{v80>[2 b^^^^^^`d`g^^^^^^`f][2 b^^^^^^`d`g^^^^^^`f]b^^^^^^`d`g^^^^^^`f|b^^^^^^`d`g^^^`e^^^[2 b1^2`c2`d1^1`g1^1^1^1][2 b1^2`c2`d1^1:`g1^1^1^1]`g1^1^1^1g%3072c%3072`d+%1536`f%1536`g%1536`c-%1536b1,,80<} p%(8191);[15 r1]p%.T(8191,20,!1);b1} トラック3/*H-dur部はバスドラの音数が多いので音量下げ*/ V(120) REV(1) CHO(10) M(0) q99 P(64) o1 l2 @74,0,0 BR(12);p%(20)/*BR(2);p%(128)と同等*/ v127 r1 RS16 BA91 BA01 BA01 BA02 BA01 BA03 BA58 BA51 BA51 BA52 KEEP BA81 BA82 BA01 BA01 BA01 //-------------------------------------------------------------------------------------------------- STR BS01 = {MidiDelay({[2 r1|r2^4^8a8|b8r2^4^8|r1|`d8r2^4^8|r1^1^1/*8bars*/]},7,!8^16);} トラック8 V(90) REV(80) CHO(127) M(0) q46 P.N(32,96) o2 l16 @39,8,0 p%(640) v127 r1 RS16 RS16 RS16 BS01 RS16 BS01 BS01 RS16 RS16 BS01 BS01 RS01 RS16 RS16 BS01 BS01 RS16 //-------------------------------------------------------------------------------------------------- STR SX01 = {Sub{[16 [2 V.T(10,40,!4,40,10,!4);r2]]} MidiDelay({[16 [2 '"bdf'rr'"bea'rr'"bce'r]]},3,!4^8);} STR SX08 = {Sub{[16 [2 V.T(10,40,!4,40,10,!4);r2]]} EP.T(127,0,6144); MidiDelay({[16 [2 '"bdf'rr'"bea'rr'"bce'r]]},3,!4^8);} STR SX09 = {Sub{[16 [2 V.T(10,40,!4,40,10,!4);r2]]} EP.T(0,127,6144); MidiDelay({[16 [2 '"bdf'rr'"bea'rr'"bce'r]]},3,!4^8);} STR SX10 = {Sub{[1 [2 V.T(10,40,!4,40,10,!4);r2]]} MidiDelay({[1 [2 '"bdf'rr'"bea'rr'"bce'r]]},3,!4^8);} トラック4 V(40) REV(48) CHO(64) M(0) q21 P(32) o5 l16 @82,110,5 p%(256) v127 r1 SX01 SX01 SX01 SX01 SX01 SX01 SX08 RS16 RS16 SX09 SX01 SX10 SX01 SX01 SX01 SX01 SX01 //-------------------------------------------------------------------------------------------------- STR SY01 = {Sub{[16 [2 V.T(40,10,!4,10,40,!4);r2]]}r8^16 MidiDelay({[16 [2 '"bdf'rr'"bea'rr'"bce'r]]},3,!4^8)} STR SY08 = {Sub{[16 [2 V.T(40,10,!4,10,40,!4);r2]]}r8^16 EP.T(127,0,6144); MidiDelay({[16 [2 '"bdf'rr'"bea'rr'"bce'r]]},3,!4^8)} STR SY09 = {Sub{[16 [2 V.T(40,10,!4,10,40,!4);r2]]}r8^16 EP.T(0,127,6144); MidiDelay({[16 [2 '"bdf'rr'"bea'rr'"bce'r]]},3,!4^8)} STR SY10 = {Sub{[1 [2 V.T(40,10,!4,10,40,!4);r2]]}r8^16 MidiDelay({[1 [2 '"bdf'rr'"bea'rr'"bce'r]]},3,!4^8)} トラック5 V(40) REV(48) CHO(64) M(0) q21 P(96) o5 l16 @82,110,5 p%(-128) v127 r1 SY01 SY01 SY01 SY01 SY01 SY01 SY08 RS16 RS16 SY09 SY01 SY10 SY01 SY01 SY01 SY01 SY01 //-------------------------------------------------------------------------------------------------- STR XS11 = {Sub{[16 [4 V.T(30,70,!4);r4]]} [2 '""b"bd+fb'1^1Sub{b1^2a2}'"d"acef'1^1'""g"d"a"bdf'1^1^1^1]} STR XS12 = {Sub{[16 [4 V.T(30,70,!4);r4]]} EP.T(127,127,3072,127,0,3072); CHO.T(8,127,6144); [2 '""b"bd+fb'1^1Sub{b1^2a2}'"d"acef'1^1'""g"d"a"bdf'1^1^1^1]} STR XS51 = {Sub{[16 [4 V.T(30,70,!4);r4]]} EP.T(32,127,6144); CHO.T(127,8,6144); <'"d+d+b-`f-`g'%1536'"f-f-a`c-`g'%1536'"gdab`d'%1536'"c-eb-`d`f'%1536>} STR XS52 = {Sub{[16 [4 V.T(30,70,!4);r4]]} '""f"c"a+ea'%6144} トラック6 V(70) REV(32) CHO(8) M(0) q100 P(8) o5 l1 @82,90,1 p%(512) v125 r1 RS16 RS16 RS16 RS16 RS16 RS16 RS16 XS51 XS11 XS11 XS12 RS01 RS16 RS16 RS16 RS16 RS16 //-------------------------------------------------------------------------------------------------- トラック7 V(70) REV(32) CHO(8) M(0) q100 P(128) o5 l1 @82,90,1 p%(-512) v125 r1 RS16 RS16 RS16 RS16 RS16 RS16 RS16 XS51 XS11 XS11 XS12 RS01 RS16 RS16 RS16 RS16 RS16 //-------------------------------------------------------------------------------------------------- STR EF01 = {Sub{[16 P.T(0,127,!2,127,0,!2);p%.T(-256,256,!4,256,-256,!4,-256,256,!4,256,-256,!4);r1]} [2 "b,2012da'`c`f'r2|r2^4`a`e|'"bda'4,,120r4""b4`c`d|'"acdf'4,,120r4""f,,120`d`ca ""g4,2012r8'""gdfb'2^8|r4^8`f2^8:""g,412fab v100 "d,412eab|v80 "g,412dfb v64 d,412efa v127 Sub{""b,2012}] ""g4^8'ab`d'2^8|r1} STR EF02 = {Sub{[16 P.T(0,127,!2,127,0,!2);p%.T(-256,256,!4,256,-256,!4,-256,256,!4,256,-256,!4);r1]} EP.T(127,64,6144); [2 "b,2012da'`c`f'r2|r2^4`a`e|'"bda'4,,120r4""b4`c`d|'"acdf'4,,120r4""f,,120`d`ca ""g4,2012r8'""gdfb'2^8|r4^8`f2^8:""g,412fab v100 "d,412eab|v80 "g,412dfb v64 d,412efa v127 Sub{""b,2012}] ""g4^8'eb`d'2^8|r1} STR EF51 = {Sub{[32 P.T(0,127,!2,127,0,!2);p%.T(-256,256,!4,256,-256,!4,-256,256,!4,256,-256,!4);r1]} EP.T(0,127,6144+3072,127,32,3072); [4 ""b,1012'`f`b''b`f''b`g+''f`c''f`d+''"bf''"bg+'|cd+bfg+fc"b ""a,1012'`f`b''`c`f''`c`a''f`c''f`e''cf''ca'|ceafc"a"f"d ""g,1012'`f`b''b`e''b`f''da''db''"be''"bf'|"bdfed"b"g"d ""g"d"a""g"d"b"gg|f'da'b`d`e`f`a`b ]} STR EF10 = {EP.T(32,0,!1);l16[4 `b`a`f`e<]o5 l8 EP.T(0,127,6144);} トラック9 V(80) REV(80) CHO(24) M(0) q502 o5 l8 @5,8,0 v127 r1 RS16 RS16 RS16 RS16 RS16 RS16 EF01 RS16 RS16 EF51 KEEP EF10 RS16 RS16 RS16 EF02 RS16 //-------------------------------------------------------------------------------------------------- STR PP01 = {MidiDelay({[2 [15 rr'fb''b`e'r'fb''"be''b`e']rr'fb''b`e''b`f''`f`b''b`e''`b``f']},2,!8^16);} STR PP10 = {r1 CHO.T(0,127,6144);} STR PP17 = {EP.T(127,64,6144); CHO.T(0,127,3072,127,64,6144,64,127,6144,127,0,3072); MidiDelay({[2 [15 rr'fb''b`e'r'fb''"be''b`e']rr'fb''b`e''b`f''`f`b''b`e''`b``f']},2,!8^16);} STR PP18 = {EP.T(64,127,6144); MidiDelay({[2 [15 rr'fb''b`e'r'fb''"be''b`e']rr'fb''b`e''b`f''`f`b''b`e''`b``f']},2,!8^16);} STR PP19 = {EP.T(0,127,6144); MidiDelay({[2 [15 rr'fb''b`e'r'fb''"be''b`e']rr'fb''b`e''b`f''`f`b''b`e''`b``f']},2,!8^16);} トラック14/*左から右のようで結構ランダムに聞こえる*/ V(45) REV(16) CHO(0) M(0) q54 P.N(0,16,32,48,64,80,96,112,127);o6 l16 @81,1,0 p%(0) v120 EP(80) r1 PP19 PP01 PP01 PP01 PP01 PP01 PP17 PP01 PP18 PP01 PP01 PP10 PP01 PP17 PP18 PP01 PP01 //-------------------------------------------------------------------------------------------------- Key(0);KeyFlag+(); STR BD01 = {[16 [4 '"g+c']]} STR BD10 = {'"g+c'1} STR BD11 = {[15 [4 '"g+c']][3 '"g+c'8][3 '"g+c'24][3 '"g+c'16r16:r16]} STR BD21 = {Sub{[16 [4 c v-1]]c v127} [16 [4 "g+]] Sub{"g+}/*次のブロックに1拍かぶせる*/} STR BD22 = {p%.T(-1000,7191,6144); Sub{[12 [4 c v-1]][3 [4 c8c8 v-1]][4 c16]c4v127} [12 [4 "g+]][3 [8 "g+8]][4 "g+16]"g+4 p%(-1000);r2} STR BD81 = {'"g+c'1[14 [4 "g+]]"g+2[4 '"g+'16]r-32'c'32[2 '"g+c'8]} STR BD59 = {[15 [4 "g+]][2 "g+][2 '"g+c'8r16]r8} STR BD51 = {[8 '"g+c'4"g+8'"g+c'8r4^8'"g+c'16c16,,,6|[3 '"g+c'8:r16][4 "g+16]r16"g+16'"g+c'8]} STR BD52 = {[8 '"g+c'4"g+8'"g+c'8r4^8'"g+c'16c16,,,6:[3 '"g+c'8:r16][4 "g+16]r16"g+16'"g+c'8] [3 '"g+c'8:r16]r2} STR BD23 = {[16 [4 '"g+']]} トラック10 V(100) REV(2) CHO(0) q11 P(64) o3 l4 @26,100,0 BR(12) p%(-1000) v127 r1 BD01 BD11 BD01 BD01 BD81 BD01 BD21 RS16 BD59 BD51 BD52 BD10 BD01 BD22 BD01 BD21 BD23 //-------------------------------------------------------------------------------------------------- STR HT01 = {[16 [4 r p%(3000);r p%.T(3000,-5000,!8);g+8,,80]]} STR HT10 = {[1 [4 r p%(3000);r p%.T(3000,-5000,!8);g+8,,80]]} トラック11 V(125) REV(8) CHO(120) q13 P(8) o3 l16 @9,90,1 BR(12) p%(0) v127 r1 HT01 HT01 HT01 HT01 HT01 HT01 HT01 HT01 HT01 HT01 HT01 HT10 HT01 HT01 HT01 HT01 HT01 //-------------------------------------------------------------------------------------------------- STR SD01 = {Sub{[16 [2 r4e4,,120]]}[16 r2^4^8^16 p%(3000);'"g+c+d+',,,4 p%(-1000);]} STR SD91 = {EP(0);[8 r1]EP.T(0,32,!1^1^1^1^1^1,32,127,!1^1);[8 [16 e16]]} STR SD51 = {Sub{r-8e8,,120[16 r2e2,,120]}[8 r1|r2^4 p%(3000);[2 '"g+c+d+',,,4]p%(-1000);r8]} STR SD10 = {p%.T(-4000,8000,!4,8000,-8000,!2,-8000,-1000,!4); '"d+"g+c'^'"d+"g+c'^|e^'"d+"g+c''"d+"g+c'|'"d+"g+c'e'"d+"g+c''"d+"g+c'|e^'"d+"g+c''"d+"g+c'} STR SD20 = {[15 r1] p%.T(-4000,8000,!4,8000,-8000,!2,-8000,-1000,!4); '"d+"g+c'^'"d+"g+c'^|e^'"d+"g+c''"d+"g+c'|'"d+"g+c'e'"d+"g+c''"d+"g+c'|e^'"d+"g+c''"d+"g+c'} トラック12 V(70) REV(24) CHO(0) q15 P(64) o3 l16 @25,90,1 BR(12) p%(-1000) v127 r1 RS16 RS16 RS16 RS16 SD91 SD01 SD01 RS16 RS16 SD51 SD51 SD10 RS16 SD91 RS16 RS16 RS16 //-------------------------------------------------------------------------------------------------- STR HH01 = {[16 [3 f+rg+,,100]a+8g+8,,30[2 f+rg+,,100]a+16[3 g+48,,100]]} STR HH02 = {EP.T(127,0,6144);[16 [3 f+rg+,,100]a+8g+8,,30[2 f+rg+,,100]a+16[3 g+48,,100]]} STR HH03 = {[16 EP.T(64,64,!4^8,127,64,!8,64,127,!4^8,127,127,!8); [3 f+rg+,,100]a+8g+8,,30[2 f+rg+,,100]a+16[3 g+48,,100]]} STR HC01 = {Sub{'`c+`a'} [16 [3 f+rg+,,100]a+8g+8,,30[2 f+rg+,,100]a+16[3 g+48,,100]]} STR CC01 = {Sub{'`c+`a'}[16 r1]} STR HH90 = {[15 r1]r2[6 f+]a+4} STR HC90 = {EP(127);Sub{'`c+`a'}[15 r1]r2[6 f+]a+4} STR HC10 = {EP(127);Sub{'`c+`a'}r2[6 f+]a+4} トラック13 V(100) REV(32) CHO(1) q17 P(72) o3 l24 @26,0,0 BR(12) p%(6000) v127 r1 RS16 HH90 HC01 HH01 HC01 HC01 HH02 HC90 HH03 HC01 HC10 HH01 HC01 HH01 HC01 HH01 HH01 //-------------------------------------------------------------------------------------------------- STR EM01 = {EP.T(127,0,6144);p%.T(8191,-8191,6144); 'e'%6144} STR EM02 = {[14 r1] EP.T(0,127,!1^1,127,0,!1^1^1^1);p%.T(-8191,0,!1^1,0,8191,!1^1^1^1);'e'1^1|^1^1^1^1 [12 r1]} STR EM03 = {[8 r1] EP.T(127,0,6144);p%.T(8191,-8191,6144);'e'%6144 [8 r1]} トラック15 V(30) REV(127) CHO(20) q98 P(64) o7 l1 @81,8,0 BR(12) v127 r1 RS16 RS16 RS16 RS16 EM01 RS16 RS16 EM02 KEEP EM03 KEEP RS01 RS16 RS16 RS16 EM01 RS16 //-------------------------------------------------------------------------------------------------- STR AE86 = {r-2 EP.T(0,0,!2,127,0,6144);p%.T(0,8191,!2,8191,-8191,6144); 'egb'%(6144+192)} STR AE01 = {EP.T(0,32,3072,32,127,3072);p%.T(-8191,8191,6144); 'egb'%6144} トラック16 V.WR(20,40,!4) REV(100) CHO(120) q100 P(64) o5 l8 @123,1,0 BR(12) p%(0) v120 r1 AE86 RS16 RS16 AE01 RS16 RS16 RS16 AE86 RS16 RS16 RS01 AE01 RS16 AE01 RS16 RS16 AE01 //================================================================================================== //Solo(10,11,12,13,15)//トラックソロ。複数トラックで指定可能 //Mute(6,7)//トラックミュート。