TrackName = {"Dominant"};Copyright = {"騎士王321"};MetaText = {"たまにはGM-Levelで頑張ります"};
テンポ = 132;拍子 = 4,4;KeyFlag+();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;
//==================================================================================================
STR RS08 = {r%3072}
STR RS16 = {r%6144}
//--------------------------------------------------------------------------------------------------
STR BA00 = {Sub{[8 [4 V.T(40,70,!4);r4]]}EP.T(32,127,6144);[2 [3 g1]g2^4^8`g,59`g,59]}
STR BA01 = {Sub{[8 [4 V.T(40,70,!4);r4]]}[2 [3 g1]g2^4^8`g,59`g,59]}
STR BA10 = {Sub{[8 [4 V.T(40,70,!4);r4]]}EP.T(127,0,6144);[4 [8 g12,69:[2 g12,29]]`g12,59`g12,59]}
STR BA11 = {Sub{[8 [4 V.T(40,70,!4);r4]]}[4 [8 g12,69:[2 g12,29]]`g12,59`g12,59]}
トラック1
V(70) M(0) q98 P(64) p%(256) v125 l16 o2 @39,1,0 EP(32) r1
BA01 BA00 BA01 BA01 BA01 BA01 BA01 BA01 BA01 BA01 BA01 BA11 BA11 BA11 BA11 BA10 BA11
//--------------------------------------------------------------------------------------------------
トラック2
V(70) M(8) q99 P(48) p%(512) o3 v125 l16 @81,8,0 EP(32) r1
BA01 BA00 BA01 BA01 BA01 BA01 BA01 BA01 BA01 BA01 BA01 BA11 BA11 BA11 BA11 BA10 BA11
//--------------------------------------------------------------------------------------------------
トラック3
V(70) M(16) q99 P(80) o3 v125 l16 @81,8,0 EP(32) r1
BA01 BA00 BA01 BA01 BA01 BA01 BA01 BA01 BA01 BA01 BA01 BA11 BA11 BA11 BA11 BA10 BA11
//--------------------------------------------------------------------------------------------------
STR SQ01 = {MidiDelay({[2 '""gdfa`c'r1^2^4^8'""gfa-`c`e-'r1^2^4^8]},5,!8^16)}
STR SQ11 = {MidiDelay({[2 '""gdfa`c'r1^2^4^8:'""gfa-`c`e-'r1^2^4^8]'""e-d-fa-`c'r1^2^4^8},5,!8^16)}
STR SQ21 = {MidiDelay({[2 '""gdfa`c'r1^2^4^8'""e-d-fa-`c'r1^2^4^8]},5,!8^16)}
STR SQ90 = {MidiDelay({'""cceg`c'},5,!8^16)r1^1^1^1EP(0);}
トラック4
V(64) M(0) q21 P(0) p%(256) l8 o5 v127 @7,16,0 r1
RS08 RS08 SQ01 RS08 RS08 RS08 RS08 SQ01 SQ01 RS08 RS08 RS08 RS08 SQ01 SQ11 SQ21 SQ21 SQ90
//--------------------------------------------------------------------------------------------------
トラック5
V(64) M(0) q21 P(127) p%(-128) l8 o5 v127 @7,16,0 r1
RS08 RS08 SQ01 RS08 RS08 RS08 RS08 SQ01 SQ01 RS08 RS08 RS08 RS08 SQ01 SQ11 SQ21 SQ21 SQ90
//--------------------------------------------------------------------------------------------------
トラック6
V(72) M(10) q11 P(64) l8 o5 v127 @87,0,0 r1
RS08 RS08 SQ01 RS08 RS08 RS08 RS08 SQ01 SQ01 RS08 RS08 RS08 RS08 SQ01 SQ11 SQ21 SQ21 SQ90
//--------------------------------------------------------------------------------------------------
STR PE01 = {Sub{[8 [8 p%(Random(-1024,1024));r8]]}MidiDelay({[4 'cg'[31 r]]},3,!4^8);}
トラック7
V(50) M(100) q29 P.N(96,88,104) o6 l16 v125 @119,8,0 r1
PE01 PE01 PE01 PE01 PE01 PE01 PE01 PE01 PE01 PE01 PE01 PE01 PE01 PE01 PE01 PE01 PE01
//--------------------------------------------------------------------------------------------------
トラック8
V(40) M(120) q29 P.N(32,40,24) o6 l16 v125 @119,8,0 r1^8^16
PE01 PE01 PE01 PE01 PE01 PE01 PE01 PE01 PE01 PE01 PE01 PE01 PE01 PE01 PE01 PE01 PE01
//--------------------------------------------------------------------------------------------------
STR BO01 = {p%.W(0,-8191,!32);[8 [4 'cg'4]]EP(127);}
STR BO02 = {p%.W(0,-8191,!32);[7 [4 'cg'4]]r1}
STR BO10 = {EP.T(127,0,6144);p%.W(0,-8191,!32);[8 [4 'cg'4]]}
STR BO20 = {EP.T(127,0,6144);p%.W(0,-8191,!32);[8 [4 'cg'4]]}
トラック9
V(127) M(0) q59 P(64) BR(12) o4 l16 v127 @119,8,0 r1
BO01 BO01 BO02 BO01 BO01 BO01 BO02 BO01 BO02 BO10 BO01 BO01 BO02 BO01 BO01 BO20 BO01
//--------------------------------------------------------------------------------------------------
Key(0);KeyFlag-();
STR RD01 = {Sub{[8 [8 V(Random(64,100));P(Random(0,127));r8]]}[8 `f8`f8[2 `f,,64][3 `f24][3 `fr:r]]}
STR RD11 = {Sub{[8 [8 V(Random(64,100));P(Random(0,127));r8]]}[8 `f8`f8[2 `f,,64][3 `f24][3 `f`f,,48:`f,,48]]}
トラック10
BR(12) p%(0) q11 o3 l16 v127 @26 r1
RS08 RS08 RS08 RS08 RS08 RD01 RD01 RS08 RS08 RS08 RS08 RD01 RD11 RS08 RS08 RD11 RD11 `f
//--------------------------------------------------------------------------------------------------
STR BD01 = {[8 [4 '"d+"g+"bc']]}
STR BD02 = {[7 [4 '"d+"g+"bc']]r1}
STR BD10 = {EP.T(0,127,6144);[8 [4 '"d+"g+"bc']]}
STR BD20 = {EP.T(127,0,6144);[8 [4 '"d+"g+"bc']]}
トラック11
V(100) P(64) BR(12) p%(8000) q12 o3 @9 v127 r1
BD01 BD01 BD02 BD01 BD01 BD01 BD02 BD01 BD02 BD10 BD01 BD01 BD02 BD01 BD01 BD20 BD01
//--------------------------------------------------------------------------------------------------
STR SD01 = {[8 [2 r'"ed+']]}
STR SD02 = {[7 [2 r'"ed+']]r'"ed+'rr}
トラック12
V(80) P(64) BR(12) p%(8000) q13 v127 o3 @26 r1
SD01 SD01 SD02 SD01 SD01 SD01 SD01 SD01 SD02 RS08 RS08 SD01 SD01 SD01 SD01 SD01 SD02
//--------------------------------------------------------------------------------------------------
STR HH01 = {[8 [2 r8f+8r8g+16f+16,,80]]}
STR HH91 = {[2 r2^4[8 f+32 v-10]f+r v127 r1^1^2]}
トラック13
V(100) P(64) BR(12) p%(-4000) q14 o3 v127 @1 r1
RS08 HH91 HH91 HH01 HH01 HH01 HH01 HH01 HH01 RS08 RS08 RS08 RS08 HH01 HH01 HH91 HH91
//--------------------------------------------------------------------------------------------------
STR CC01 = {V.T(100,0,!1^1^1^1);EP.W(32,127,!4);[16 '`c+`a'][4 r1]}
トラック14
V(100) P(64) BR(12) p%(0) q15 o3 v120 @17 r1
CC01 CC01 RS08 RS08 RS08 CC01 RS08 RS08 RS08 CC01 RS08 RS08 RS08 CC01 RS08 RS08 RS08 CC01
//--------------------------------------------------------------------------------------------------
STR BX01 = {Sub{r1^1[7 c6]r-6 r1^1^1^1^1^1^1^1^1[7 c6]}}
トラック15
V(127) P(64) BR(12) p%.W(0,-8000,!16) q11 o4 @119,8 v127 r1
RS08 RS08 RS08 BX01 RS16 RS08 RS08 BX01 RS16 BX01 RS16 RS08 RS08 RS08 RS08 RS08 RS08
//--------------------------------------------------------------------------------------------------
STR AP01 = {EP(0)[4 r1]EP.T(0,32,!1^1,32,127,!1^1);'ceg'^^^}
STR AP02 = {EP(0)[4 r1]EP.T(0,32,!1^1,32,127,!1^1);'g'^^^}
トラック16
V(100) P(64) BR(12) p%(0) q100 l1 o10 v120 @126,7 r1
RS08 RS08 RS08 RS08 AP01 RS08 RS08 RS08 RS08 RS08 RS08 RS08 AP01 RS08 RS08 RS08 AP02
/*==================================================================================================
　100ぴったりだとなんかうれしい　(というかそのために少し詰め込んだけど)*/