TrackName = {"Driving Techno"} Copyright = {"騎士王321"} MetaText = {" @82,90,1 をフューチャした曲"} テンポ 180 拍子 4,4 KeyFlag-(bea); 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,120,8)"} CuePoint={"TwmChorus(1,127,60,64,64,48,1)"} //================================================================================================== STR RS08 = {[8 r1]} STR RS16 = {[16 r1]} STR Eout = {EP.T(127,0,12288);} //-------------------------------------------------------------------------------------------------- STR BA01 = {[2 [2 `e&eerred-errrrreg-e:`e&eerred-errrrreg-a]`e&eerred-errrrred-"b]} トラック1 V(105) REV(1) CHO(0) M(10) q99 P(32) p%(256) o2 @40,16,0 l8 v127 r1 RS16 BA01 BA01 BA01 BA01 RS16 RS16 BA01 BA01 Eout BA01 BA01 r1EP(0)r1a1 //-------------------------------------------------------------------------------------------------- トラック2 V(105) REV(1) CHO(0) M(20) q99 P(96) o2 @40,16,0 l8 v127 r1 RS16 BA01 BA01 BA01 BA01 RS16 RS16 BA01 BA01 Eout BA01 BA01 //-------------------------------------------------------------------------------------------------- トラック3 V(80) REV(0) CHO(80) M(64) q99 P(64) o3 @39,0,0 l8 v125 r1 RS16 RS16 BA01 BA01 BA01 RS16 RS16 BA01 BA01 Eout BA01 BA01 //-------------------------------------------------------------------------------------------------- STR LD01 = {/*Sub{[16 [4 V.T(64,127,!8^16,127,100,!16);r4]]}*/ Sub{ef1^2^4g-4ab1^1^1^2^4`c4`d-`c1^2^4`e4`c1`d1} RS08 ef1^2^4g-4ab >@82,90,1} STR LD11 = {/*Sub{[16 [4 V.T(64,127,!8^16,127,100,!16);r4]]}*/ o5 Sub{OctaveUnison(ef1^2^4g-4ab1^1^1^2^4`c4`d-`c1^2^4`e4`c1`d1);} OctaveUnison(RS08 ef1^2^4g-4ab);} STR LD21 = {o5 Sub{OctaveUnison(ef1^2^4g-4ab1^1^1^2^4`c4`d-`c1^2^4`e4`c1`d1);} OctaveUnison(RS08 ef1^2^4g-4ab);} トラック4 V(120) REV(64) CHO(1) M(16) q99 P(64) p%(256) o4 @51,110 l1^1 v127 r1 RS16 RS16 RS16 LD01 LD01 LD21 LD11 LD11 LD11 Eout LD01 LD01 //-------------------------------------------------------------------------------------------------- トラック5 V(75) REV(64) CHO(8) M(32) q99 P(16) p%(128) o4 @51,110 l1^1 v127 r1^2 RS16 RS16 RS16 LD01 LD01 LD21 LD11 LD11 LD11 Eout LD01 LD01 //-------------------------------------------------------------------------------------------------- トラック6 V(60) REV(64) CHO(16) M(64) q99 P(112) o4 @51,110 l1^1 v127 r1^1 RS16 RS16 RS16 LD01 LD01 LD21 LD11 LD11 LD11 Eout LD01 LD01 //-------------------------------------------------------------------------------------------------- STR PD01 = {[2 'egb''d-g-b`d-''cfa`e':'fgb`d']'db`d`f'} STR PD11 = {Sub{[16 [4 V.T(40,40,!8,80,64,!8);r4]]} [2 'egb''d-g-b`d-''cfa`e':'fgb`d']'db`d`f'} トラック7 V(64) REV(80) CHO(16) M(10) q99 P(64) p%(-128) o5 @50,90,1 v110 l1^1 r1 PD01 PD11 PD11 PD11 PD11 PD01 PD11 PD11 PD11 Eout PD11 PD11 //-------------------------------------------------------------------------------------------------- トラック8 V(64) REV(100) CHO(8) M(20) q99 P(0) p%(512) o4 @98,0,0 v95 l1^1 r1 PD01 PD11 PD11 PD11 PD11 PD01 PD11 PD11 PD11 Eout PD11 PD11 //-------------------------------------------------------------------------------------------------- トラック9 V(64) REV(100) CHO(8) M(30) q99 P(127) p%(128) o4 @98,0,0 v95 l1^1 r1 PD01 PD11 PD11 PD11 PD11 PD01 PD11 PD11 PD11 Eout PD11 PD11 //-------------------------------------------------------------------------------------------------- STR SI01 = {MidiDelay({[4 r2^4^8[3 b24]`errerrerr2r1^1]},3,!2)} STR SI11 = {EP.T(127,0,6144); MidiDelay({[4 r2^4^8[3 b24]`errerrerr2r1^1]},3,!2)} トラック14 V(80) REV(80) CHO(1) P(64) q51 o6 @81,8,0 l16 v120 r1 SI01 RS16 RS16 RS16 RS16 SI01 SI01 RS16 RS16 SI01 SI11 //-------------------------------------------------------------------------------------------------- Key(0);KeyFlag-(); STR BD00 = {Sub{[8 r1^2^4[4 "e-16]]} RS08 Sub{v32[8 [4 c v+3]]}v127[8 [4 '"""c"a-']]} STR BD01 = {Sub{[8 r1^2^4[4 "e-16]]} [16 [4 '"""c"a-c']]} STR BD11 = {Sub{[8 r1^2^4[4 "e-16]]} [15 [4 '"""c"a-c']][4 '"""c"a-c'8][3 '"""c"a-c'12][2 '"""c"a-c'8]} トラック10 V(127) REV(0) CHO(0) P(64) BR(12) p%(0) q11 o3 v120 @26,100 r1 RS16 BD01 BD01 BD01 BD11 BD00 BD11 BD01 BD01 Eout BD01 BD01 //-------------------------------------------------------------------------------------------------- STR SD00 = {[15 r1]p%.T(-8191,8191,!2,8191,0,!2);[16 d16]} トラック11 V(100) REV(0) CHO(80) P(64) BR(12) p%(0) q12 o3 @27,7 v127 r1 RS16 SD00 RS16 RS16 RS16 RS16 SD00 RS16 SD00 RS16 RS16 //-------------------------------------------------------------------------------------------------- STR HH01 = {/*Sub{[16 [4 p%.T(-3000,-8000,!4);r4]]}*/ Sub{[16 P.T(8,112,!2,112,8,!2);r1]} [16 [4 a+]]} トラック12 V(64) REV(80) CHO(120) P(64) BR(12) p%(-3000) q13 o3 @25,90,1 v125 r1 RS16 RS16 HH01 HH01 HH01 RS16 RS16 HH01 HH01 Eout HH01 HH01 //-------------------------------------------------------------------------------------------------- STR CC01 = {MidiDelay({[2 `c+1r1^1^1^1^1^1^1]},7,!4)} STR RD01 = {[10 [3 '`d+`f'8][3 '`d+`f'24][3 '`d+`f',,80'`d+`f':'`d+`f',,80]] [3 '`d+`f'8][3 '`d+`f'24]'`d+`f',,80'`d+`f'[2 '`d+`f',,80]} トラック13 V(120) REV(8) CHO(16) P(64) BR(12) p%(6000) q14 o3 v125 l8 @17,100 r1 RS16 RS16 RD01 RD01 RD01 CC01 RS16 RD01 RD01 Eout CC01 RD01 //-------------------------------------------------------------------------------------------------- STR WN01 = {@123,1 o5'cde'%6144,,24} STR WN02 = {RS08 @126,7 o10[7 r1]EP.T(0,127,!1);'cde'1} トラック15 V(127) REV(127) CHO(120) P(64) M(127) q99 o5 @123,1 v127 r1 WN01 WN02 RS16 RS16 RS16 WN01 RS16 RS16 WN02 WN01 WN01 r-1 EP.T(127,0,!1); //-------------------------------------------------------------------------------------------------- STR DD01 = {[2 EP.T(80,127,!4)'cg'1^1^1^1r1^1^1^1]} トラック16 V(100) REV(127) CHO(127) P(64) q101 o1 @117,8 v125 r1 DD01 RS16 RS16 RS16 RS16 DD01 RS16 RS16 RS16 RS16 RS16 //================================================================================================== //Solo(1,2,3)//トラックソロ。複数トラックで指定可能 //Mute(1)//トラックミュート。