TrackName     = {"ため息"}
Copyright     = {"騎士王321"}
MetaText      = {"ループ用とスルー用の二種類を用意しました。"}
Int TYPE = 0//0はループ用、1はスルー用
~{PLAY} = {[2}//ループ用の際の繰り返し回数
テンポ 132
拍子   4,4
KeyFlag+(fcgd);
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;
//==================================================================================================
STR RS08 = {[8 r1]}
STR RS16 = {[16 r1]}
//--------------------------------------------------------------------------------------------------
STR BE01 = {Sub{[16 [2 P.T(0,127,!4,127,0,!4);r2]]}
		g^^b1^2rf^^b1^2r g^^b1^2rd^^e1^2r
		g^^b1^2rd^^f1^2r g^^b1^2rf^^g1^2r}
トラック1
V(50) M(40) q96 p%(0) o5 l8 @12,0,0 r1 v127
//--------------------------------------------------------------------------------------------------
トラック2
V(30) M(20) q97 p%(0) o5 l8 @80,0,0 r1 v127
//--------------------------------------------------------------------------------------------------
STR EF01 = {g^^^gf^b^a^g^f^^f^^^federfrgrb^^ g^^^gabargrfrb^^b+^fb+^gb+`c^^^^rref
		g^^rg`crb^a^g^e^^f^^^fefgrbrg^^^r g^^^gf^b^a^g^f^^f^^^fede^^^^^rrr}
STR EF02 = {[15 r1]""a+^^,265"g,495"b+,395c+,295e+,195g}
トラック3
V(60) M(0) q105 P(96) p%(128) @5,0,0 o5 l8 r1 v127
//--------------------------------------------------------------------------------------------------
トラック4
V(60) M(0) q104 P(32) p%(-128) @5,0,0 o5 l8 r1 v127
//--------------------------------------------------------------------------------------------------
Int NO
STR PI01 = {Sub{[16 [16 P(Random(0,127));r16]]}
		Sub{[16 [16 EP(Random(64,127));r16]]}
		Sub{[16 [16 p%(Random(-256,256));r16]]}
		[16 [16 NO = RandomSelect(61,64,68,71,73,76,78,80);/*o5 cegb o6 cefg*/
		        n(NO)]]}
トラック5//実はこれが一番のポイント!!
V(60) M(10) q94 @6,0,0 o6 l16 t.onCycle(!16,0,8) r1 v120
//--------------------------------------------------------------------------------------------------
STR BC01 = {[2 '"ag`c`e'1'"af+b+`e'1'"gdb`f'1'cgb`d`f'2'cgb`e'2:
		   '"ae`c`g'1'"bf`c`d'1'"b+fa`d'1'cgb`e'1]
		'fa`c`e'1'"bfa`e'2'"bfa`d'2'egb`d'1'egb`e'1}
STR BC11 = {[3 'cfa+`e+'1^1'cfa+`e+'4^8'dgb+`f+'1^2^8]
		'cfa+`e+'1^1'cfa+`e+'4^8'dgb+`f+'4^8'"a+gb+`c+`e+'1^4}
トラック6
V.WR(40,70,!4) M(20) q99 P(64) p%(0) @101,0,0 o4 r1 v100
//--------------------------------------------------------------------------------------------------
STR GT01 = {[2
		'"acg'12,21'"acg'24,21'"acg'12,21'"acg'4^24r8[2 '"bdg'12'"bdg'24,21]'"bdf'8
		'"ac-g-'12,21'"ac-g-'24,21'"ac-g-'12,21'"ac-g-'4^24r8[3 '"bd-g-'12'"bd-g-'24,21]
		'"g"bf'12,21'"g"bf'24,21'"g"bf'12,21'"g"bf'4^24r8[3 '"b+fb'12'dfb'24,21]
		'"beg'12,21'"beg'24,21'"beg'12,21'"beg'4^24r8[2 '"bdg'12'"bdg'24,21]'"bdf'8
		'"beg'12,21'"beg'24,21'"beg'12,21'"beg'4^24r8[2 '"acg'12'"acg'24,21]'"acg'8
		'"adf'12,21'"adf'24,21'"adf'12,21'"adf'4^24r8[2 '"acf'12'"acf'24,21]'"acf'8:
		'"a"b+f'12,21'"a"b+f'24,21'"a"b+f'12,21'"a"b+f'4^24r8[3 '"a"b+f'12'"a"b+f'24,21]
		'"beg'12,21'"beg'24,21'"beg'12,21'"beg'4^24r8[2 '"bdg'12'"bdg'24,21]'"bdf'8]
		'"g"bf'12,21'"g"bf'24,21'"g"bf'12,21'"g"bf'4^24r8[3 '"g"bf'12'"g"bf'24,21]
		'"g"be'12,21'"g"be'24,21'"g"be'12,21'"g"be'8r24'"g"be'2^8}
STR GT11 = {[4 [2 r2[2 '"a+ce+'^'"a+ce+',21]:r8^2]'"b+df+'^^^r8:r1^8'"b+df+'12,21'"b+df+'24,21]'"a+c+,,,3e+,,,6g,,,9'1^4}
トラック7
V(55) M(0) q81 P(40) @38,0,0 o5 l16 r1 BR(12) t.N(0,2,4) v127
//--------------------------------------------------------------------------------------------------
STR BA01 = {[2 "a2rrab^ab^`e^^e r2rrab^ab^`e^^"a "g2rrga^g`d^`f^^f c^r`crrcrrb`c&bg&f"bc^^^r`e^^^:
		   "a2rrab^ab^`e^^e r2rrab^ab^`f^^"b "b+2rrga^g`d^`f^^f c4^8"g4&"b8c8&e8]
		"f2rrab^ab^`e^^f r2rrab^ab^`e^^"b r2rrab^ab^`f^^f e1}
STR BA11 = {[3 f1^1"f4^8"g1^8"g16r16g16g16r8"g8]f1^1^1"a+1}
トラック9
V(90) M.onNoteWave(0,0,!2,0,48,!1) q98 P(64) o3 l8 p%(0) @33,0,0 l24 r1 v127
//--------------------------------------------------------------------------------------------------
STR BD01 = {[4 [15 p%.T(0,-8191,!16);'"bb'4]r4]}
トラック15
V(127) M(0) q10 P(64) o4 BR(24) @79,0,0 r1 v127
//--------------------------------------------------------------------------------------------------
KeyFlag-();Key(0);
STR DR01 = {Sub{v80 MidiDelay({'`c+`a'},3,!4);v127}
		Sub{[4 [15 '"d+'4,,120]r4]}
		Sub{[4 [7 r8`b8`b4,,12]rrr`b`b,,12r`b12`b24,,12]}
		[16 [2 [2 f+12g+24]a+8][6 g+24]]}
STR DR02 = {Sub{[4 [7 r8`b8`b4,,12]rrr`b`b,,12r`b12`b24,,12]}
		[16 [2 [2 f+12g+24]a+8][6 g+24]]}
STR DR11 = {Sub{[8 r1][2 [15 '"d+'4,,120]r4]}
		Sub{[4 [7 r8`b8`b4,,12]rrr`b`b,,12r`b12`b24,,12]}
		[4 r1][12 [2 [2 f+12g+24]a+8][6 g+24]]}
STR DR12 = {Sub{[8 r1][2 [7 r8`b8`b4,,12]rrr`b`b,,12r`b12`b24,,12]}
		[12 r1][4 [2 [2 f+12g+24]a+8][6 g+24]]}
STR DR13 = {Sub{v100 MidiDelay({'`c+`a'},3,!4);v127}
		Sub{[4 [7 r8`b8`b4,,12]rrr`b`b,,12r`b12`b24,,12]}
		[16 [2 [2 f+12g+24]a+8][6 g+24]]}
STR DR14 = {Sub{[2 [7 r8`b8`b4,,12]rrr`b`b,,12r`b12`b24,,12]`b1[7 r1]}
		[8 [2 [2 f+12g+24]a+8][6 g+24]]a+1[7 r1]}
トラック10
V(110) q9 P(64) o3 l16 BR(12) p%(4000) @1,0,0 r1 v127
//--------------------------------------------------------------------------------------------------
STR SD01 = {[8 [2 r4'"ed+'4]]}
トラック11
V(110) q11 P(56) o3 BR(24) p%(8000) @1 r1 v127
//--------------------------------------------------------------------------------------------------
STR RC01 = {[16 r1]r-2 EP.T(0,127,!2);'c`c'2}
STR RC99 = {EP.T(127,0,!1);[3 r1]a1}//ブツ切り防止
トラック16
V(100) q100 P(64) o5 @120,0,0 v127 BR(12) r1 v127
//==================================================================================================
If (TYPE = 0) {[(PLAY)
KeyFlag+(fcgd);Key(0);
TR(03);EF02 EF01
TR(04);EF02 EF01
TR(05);PI01 PI01
TR(06);BC11 BC01
TR(07);GT11 GT01
TR(09);BA11 BA01
KeyFlag-();Key(0);
TR(10);DR11 DR01
TR(11);SD01 SD01
TR(15);BD01 BD01
TR(16);RC01 RS16
]TR(16);RC99}
//==================================================================================================
If (TYPE = 1) {
KeyFlag+(fcgd);Key(0);
TR(01);RS16 BE01 RS16 RS16 BE01 BE01 RS16
TR(02);RS16 BE01 RS16 RS16 BE01 BE01 RS16
TR(03);RS16 RS16 EF02 EF01 RS16 EF01 RS16
TR(04);RS16 RS16 EF02 EF01 RS16 EF01 RS16
TR(05);PI01 PI01 PI01 PI01 PI01 PI01 PI01
TR(06);RS16 BC01 BC11 BC01 BC01 BC01 RS16
TR(07);RS16 RS16 GT11 GT01 GT01 RS16 RS16
TR(09);RS16 RS16 BA11 BA01 BA01 RS16 RS16
KeyFlag-();Key(0);
TR(10);DR12 DR02 DR01 DR01 DR01 DR13 DR14
TR(11);RS16 RS16 RS16 SD01 SD01 SD01 RS16
TR(15);BD01 BD01 BD01 BD01 BD01 BD01 BD01
TR(16);RC01 RS16 RC01 RS16 RC01 RC01 RS16 RC99
}
//==================================================================================================
//Solo(7)//トラックソロ。複数トラックで指定可能
//Mute(9)//トラックミュート。