/*

　　　　　<<　再　生　に　当　た　っ　て　の　注　意　>>

TW-Music2の同時発音数は　256　になっているでしょうか?
もしそれ以下になっていますと、おそらく音切れが生じてしまいます。
少しの操作で解決できますので、ぜひ音切れしない状態で聞いて頂きたいです。

・同時発音数を256にするには?
　→TW-Music2を起動し、右側にある　Menu　を押します。
  　オプションの設定をクリックしますと別の画面が出てきます。
    その画面のMsSynth　のタブに　MsSynthのボイス数　という項目があるので
    それを　256　に変えましょう。そのあとは右下の　OK　をクリック。
    そして、忘れてはいけないのが設定の保存です。
    再び　Menu　を開き、今度は　設定を保存する　をクリックしてください。
    以上で操作は終了です。



*/
MetaText      = {"暗い夜に何も言わず降り続ける雪、あるいは朝露に濡れる紅葉の印象"}
TrackName     = {"Fall"}
Copyright     = {"騎士王321"}
テンポ 127
拍子   4,4
KeyFlag+(fcgda);
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;
CuePoint={"TwmParam(120,120,0)"}
CuePoint={"TwmChorus(1,127,60,64,64,48,1)"}
/*==================================================================================================
TR(1,2) MainSynth
TR(3,4) Backing1
TR(5)   SubSynth
TR(6,7) Backing2
TR(8,9) Bass
TR(15)  Pad
TR(10)  BassDrum
TR(11)  Snare,HiHat
TR(12)  HiHat(roop)
TR(13)  FingerSnap
TR(14)  Noise
TR(16)  Noise
==================================================================================================*/
STR RS08 = {r%3072}
STR RS16 = {r%6144}
//--------------------------------------------------------------------------------------------------
STR SQ00 = {CHO.T(127,0,6144);EP.T(16,64,384*15,64,127,384);v100
            MidiDelay({[16 [2 `b`cb`a`faf`c]]},2,!4^8);EP(127)}
STR SQ10 = {CHO.T(0,127,3072,127,0,3072);EP.T(127,0,6144);
            MidiDelay({[16 [2 `b`cb`a`faf`c]]},2,!4^8);}
STR SQ20 = {CHO.T(127,64,384*14,64,0,384,0,0,384);EP.T(16,127,3072);MidiDelay({[14 [2 `b`cb`a`faf`c]]
		`b`cb`a`faf`c `b`cb`arrrr `b`cb`a`faf`c bc"barrrr},2,!4^8);v127}
STR SQ30 = {[14 r1]@82,110,4 r1EP(95);l32 CHO.T(64,127,384*15,127,0,384);
            MidiDelay({""b"c"d"f"bcdf b`c`d`f`b``c``d``f``br-32},2,!4^8);l16 r2}
STR SQ40 = {[14 r1]@82,110,5 r1EP(95);l32 CHO.T(64,127,384*15,127,0,384);
            MidiDelay({""b"c"d"f"bcdf b`c`d`f`b``c``d``f},2,!4^8);l16 r2}
STR SQ01 = {MidiDelay({[16 [2 `b`cb`a`faf`c]]},2,!4^8);}
STR SQ11 = {MidiDelay({[15 [2 `b`cb`a`faf`c]]},2,!4^8);@82,110,1 EP(127);l32
            MidiDelay({""b"c"d"f"bcdf b`c`d`f`b``c``d``f``br-32},2,!4^8);l16 r2}
STR SQ21 = {MidiDelay({[15 [2 `b`cb`a`faf`c]]},2,!4^8);@82,110,2 EP(127);l32
            MidiDelay({""b"c"d"f"bcdf b`c`d`f`b``c``d``f},2,!4^8);l16 r2}
トラック1
V(76) REV(120) CHO(1) M(0) q29 P(16) p%(256) o5 @82,110,1 l16 v127 r1
RS16 SQ00 SQ01 SQ10 RS16 SQ20 SQ01 SQ01 SQ10 RS16 SQ30 SQ11 SQ01 SQ01 RS16 RS16
//--------------------------------------------------------------------------------------------------
トラック2
V(64) REV(120) CHO(1) M(10) q39 P(112) p%(128) o5 @82,110,2 l16 v127 r1^8^16
RS16 SQ00 SQ01 SQ10 RS16 SQ20 SQ01 SQ01 SQ10 RS16 SQ40 SQ21 SQ01 SQ01 RS16 RS16
//--------------------------------------------------------------------------------------------------
STR FO01 = {Sub{[16 [4 V.T(16,100,!4);r4]]}
            [2 Sub{r1^1`a1^1r1^1`a1`b1}[2 '"egb`d`f'1^1'"gb`d`f'1^1]]}
STR FO11 = {Sub{[16 [4 V.T(16,100,!4);r4]]}EP.T(32,127,6144);
            [2 Sub{r1^1`a1^1r1^1`a1`b1}[2 '"egb`d`f'1^1'"gb`d`f'1^1]]}
トラック3
V(64) REV(40) CHO(24) M(20) q99 P(0) p%(512) o4 v125 @103,1,0 r1
RS16 RS16 RS16 RS16 RS16 RS16 FO01 FO01 FO01 FO01 FO11 FO01 FO01 FO01 RS16 RS16
//--------------------------------------------------------------------------------------------------
トラック4
V(64) REV(40) CHO(24) M(30) q99 P(127) p%(256) o4 v125 @103,1,0 r1
RS16 RS16 RS16 RS16 RS16 RS16 FO01 FO01 FO01 FO01 FO11 FO01 FO01 FO01 RS16 RS16
//--------------------------------------------------------------------------------------------------
STR MM00 = {RS08 EP.T(32,127,3072);Sub{[8 [16 p%(Random(-512,768));r]]}
            MidiDelay({[8 "ggd"gd"ggb `dg"g`e+g"g`fg]},2,!8^32)}
STR MM01 = {Sub{[16 [16 p%(Random(-512,768));r]]}
            MidiDelay({[16 "ggd"gd"ggb `dg"g`e+g"g`fg]},2,!8^32);}
STR MM02 = {EP.T(127,0,3072);Sub{[16 [16 p%(Random(-512,768));r]]}
            MidiDelay({[16 "ggd"gd"ggb `dg"g`e+g"g`fg]},2,8^32);}
トラック5
V(110) REV(32) CHO(24) M(10) q45 P(64) o5 v127 l16 @29,16,0 r1
RS16 RS16 RS16 MM00 MM01 MM02 RS16 MM00 MM01 MM01 MM02 RS16 RS16 RS16 RS16 RS16
//--------------------------------------------------------------------------------------------------
STR XS00 = {Sub{[16 P.T(0,127,!2,127,0,!2);r1]}
            CHO.T(8,127,3072);EP.T(127,0,6144);
		MidiDelay({[2 [8 '"bdg'rrr'"bdg'r'cf''"bdg'r'"bdg'rrr'dfb'rr]]},2,!4^8)}
STR YS00 = {Sub{[16 P.T(0,127,!2,127,0,!2);r1]}
            CHO.T(8,127,3072);EP.T(127,0,6144);
		MidiDelay({[2 [8 '"bdg'rrr'"bdg'r'cf''"bdg'r'"bdg'rrr'dfb'rr]]},2,!4^8)}
STR XS01 = {Sub{[16 P.T(0,127,!2,127,0,!2);r1]}
            Sub{[8 CHO.T(8,32,!1,32,8,!1);r1^1]}
		MidiDelay({[2 [8 '"bdg'rrr'"bdg'r'cf''"bdg'r'"bdg'rrr'dfb'rr]]},1,!4^8)}
STR YS01 = {Sub{[16 P.T(0,127,!2,127,0,!2);r1]}
            Sub{[8 CHO.T(8,32,!1,32,8,!1);r1^1]}
		MidiDelay({[2 [8 '"bdg'rrr'"bdg'r'cf''"bdg'r'"bdg'rrr'dfb'rr]]},1,!4^8)}
STR XS02 = {Sub{[16 P.T(0,127,!2,127,0,!2);r1]}
            Sub{[8 CHO.T(8,32,!1,32,8,!1);r1^1]}EP.T(64,127,384,127,127,384*14,127,0,384);
		MidiDelay({[2 [8 '"bdg'rrr'"bdg'r'cf''"bdg'r'"bdg'rrr'dfb'rr]]},1,!4^8)}
STR YS02 = {Sub{[16 P.T(0,127,!2,127,0,!2);r1]}
            Sub{[8 CHO.T(8,32,!1,32,8,!1);r1^1]}EP.T(64,127,384,127,127,384*14,127,0,384);
		MidiDelay({[2 [8 '"bdg'rrr'"bdg'r'cf''"bdg'r'"bdg'rrr'dfb'rr]]},1,!4^8)}
トラック6
V(64) REV(8) CHO(8) M(16) q35 o5 l16 @51,110,0 p%(256) v127 r1
RS16 RS16 RS16 XS01 XS01 XS00 RS16 RS16 RS16 RS16 XS02 RS16 RS16 RS16 RS16 RS16
//--------------------------------------------------------------------------------------------------
トラック7
V(48) REV(8) CHO(8) M(24) q35 o5 l16 @51,110,0 v127 p%(1024) r1^8^16
RS16 RS16 RS16 YS01 YS01 YS00 RS16 RS16 RS16 RS16 YS02 RS16 RS16 RS16 RS16 RS16
//--------------------------------------------------------------------------------------------------
STR BA00 = {EP.T(127,127,384*7+192,127,32,192,32,127,384*7,0,0,384);g%6144 EP(127)}
STR BA01 = {[4 e1^1g1^1]}
STR BA02 = {g%6144}
STR BA03 = {EP.T(0,0,3072,0,127,3072);[4 e1^1g1^1]}
STR BA04 = {g%3072e%1536g%1536}
STR BA05 = {r-1 EP.T(127,32,!1);r1 RS16}
STR BA10 = {Sub{[16 [4 V.T(20,20,!8,100,100,!8);r4]]}
            EP.T(127,127,3072,32,127,384*7,0,0,384);g%6144 EP(127)}
STR BA11 = {Sub{[16 [4 V.T(20,20,!8,100,100,!8);r4]]}
            [4 e1^1g1^1]}
STR BA12 = {Sub{[16 [4 V.T(20,20,!8,100,100,!8);r4]]}
            g%6144}
STR BA13 = {Sub{[16 [4 V.T(20,20,!8,100,100,!8);r4]]}
            EP.T(0,0,3072,0,127,3072);[4 e1^1g1^1]}
STR BA14 = {Sub{[16 [4 V.T(20,20,!8,100,100,!8);r4]]}
            g%3072e%1536g%1536}
STR BA15 = {r-1 EP.T(127,32,!1);r1 RS16}
トラック8
V(120) REV(0) CHO(0) M(0) q100 P(64) o2 @39,1,0 p%(512) v120 l16 r1
RS16 RS16 BA04 BA01 BA01 BA00 BA01 BA01 BA01 BA01 BA03 BA01 BA01 BA01 BA01 BA05
//--------------------------------------------------------------------------------------------------
トラック9
V(80) REV(0) CHO(8) M(20) q100 P(64) o2 @74,0,0 p%(256) v120 r1
RS16 RS16 BA14 BA11 BA11 BA10 BA11 BA11 BA11 BA11 BA13 BA11 BA11 BA11 BA11 BA15
//--------------------------------------------------------------------------------------------------
STR PD00 = {Sub{[16 [4 V.T(40,40,!8,64,64,!8);r4]]}
            EP.T(32,127,5760+192);'"gdb`f'%6144r-1`g2`a2}
STR PD10 = {Sub{[16 [4 V.T(40,40,!8,64,64,!8);r4]]}
            EP.T(100,127,3072);'"gdb`f`a'%6144,100r-1 EP.T(32,32,!4,127,64,!2,64,127,!4);r1 EP(127)}
STR PD01 = {Sub{[16 [4 V.T(40,40,!8,64,64,!8);r4]]}
            Sub{[4 "e1^1"g1^1]}[4 'fb`d`g'^'f`c`d`a''fb`d`b']}
STR PD11 = {Sub{[16 [4 V.T(40,40,!8,64,64,!8);r4]]}
            Sub{"g%3072"e%1536"g%1536}[4 'fb`d`g'^'f`c`d`a''fb`d`b']}
STR PD21 = {Sub{[16 [4 V.T(40,40,!8,64,64,!8);r4]]}
            Sub{[4 "e1^1"g1^1]}[4 'fb`d`g'^'f`c`d`a''fb`d`b']}r-1 EP.T(127,32,!1);r1
トラック15
V(64) REV(125) CHO(16) P(64) M(30) p%(128) v125 q99 l1 @82,90,1 o4 r1
RS16 PD00 PD11 PD01 PD01 PD10 RS16 RS16 RS16 RS16 PD10 RS16 RS16 RS16 PD21 RS16
//--------------------------------------------------------------------------------------------------
Key(0);KeyFlag-();
STR BD01 = {[16 [4 '""e,,80c']]}
STR BD02 = {[16 [4 '""e,,80c']]r-1 EP(0);r1 EP(127);}
STR BD20 = {EP.T(127,0,6144);[16 [4 '""e,,80c']]EP(127);}
STR BD30 = {Sub{[15 [4 '"a-']]}RS08
            v16[7 [4 'c' v+4]]v127'"a-c'rr REV(64)@27,110 "d4,,96 @27,90 REV(0)}
STR BD90 = {[16 [4 '""e,,1c,,100']]r-4 EP(0)r4 EP(127)}
トラック10
V(127) REV(0) CHO(0) P(64) BR(12) p%(-1500) q11 o3 v127 @27,90 r1
BD90 BD02 BD01 BD01 RS16 BD30 BD02 BD01 BD01 BD20 BD30 BD02 BD01 BD02 BD02 BD90
//--------------------------------------------------------------------------------------------------
STR HH02 = {/*Sub{[16 [4 V.T(80,127,!4);r4]]}*/Sub{[16 [2 EP.T(100,120,!4,120,100,!4);r2]]}
            Sub{[16 p%.T(3000,0,!2,0,3000,!2);r1]}Swing16(3)
            /*[16 [4 f+g+,,100a+g+,,100]]*/[16 [2 f+g+a+,,100g+,,100g+,,100f+g+,,100g+]]Swing16(0)}
STR CC01 = {@25,90,1 Sub{REV(120);MidiDelay({`c+},4,!4);}RS08 EP(0)`c+1[7 r1 EP(100)]}
トラック11
V(90) REV(16) CHO(100) P(8) BR(12) p%(3000) q12 o3 l16 v127 @26 r1
RS16 RS16 HH02 HH02 HH02 RS16 HH02 HH02 HH02 HH02 HH02 HH02 HH02 HH02 HH02 CC01 CC01
//--------------------------------------------------------------------------------------------------
STR SH00 = {@27,110 r2^4 REV(100);P(0)"d4 P(64);REV(8);@26,100}
STR SH01 = {/*Sub{[7 r1^2^4^8 @27,110 "d8 @26,100]r1^2^4 @27,110 "d @26,100}*/
            Sub{[16 [2 rd+]]}
		[16 [4 r8'g+,,100'8]]}
STR SH11 = {/*Sub{[7 r1^2^4^8 @27,110 "d8 @26,100]r1^2^4 @27,110 "d @26,100}*/
            Sub{[15 [2 rd+]]r1}
		[16 [4 r8'g+,,100'8]]}
STR SH21 = {/*Sub{[7 r1^2^4^8 @27,110 "d8 @26,100]}*/
            Sub{RS08 v16[8 [16 d16 v+1]]v127}
		Sub{[15 [2 rd+]]r1}
		[16 [4 r8'g+,,100'8]]}
STR SH03 = {[16 [4 r8'g+,,100'8]]r-4EP(0);r4 EP(127);}
STR SH90 = {Sub{RS08 p%.T(-6000,2000,384*7);EP.T(64,127,384*7,0,0,384);}
            Sub{RS08 v32[8 [16 d16 v+1]]v127}
		[16 [4 r8'g+,,100'8]]EP(127);p%(1000);}
トラック12
V(127) REV(8) CHO(32) P(64) BR(12) p%(1000) q97 o3 v127 @26,100 r1 TimingBack(3)
SH03 SH03 SH03 SH03 SH03 SH90 SH11 SH01 SH01 SH11 RS16 SH03 SH01 SH21 SH03 SH03
//--------------------------------------------------------------------------------------------------
STR SC01 = {Sub{[4 P(0)r1 P(127)r1^1 P(0)r1]}
            MidiDelay({[7 r1^2^4^8'"d'8]r1^2^4'"d'4},0,!16);}
STR SC11 = {Sub{[4 P(0)r1 P(127)r1^1 P(0)r2:r2]P(64)r2}
            MidiDelay({[7 r1^2^4^8'"d'8]r1^2^4'"d'4},0,!16);}
STR SC21 = {[15 r1]r2 P(64)r4"d4}
トラック13
V.W(127,127,!64,0,0,!4);REV(100) CHO(32) P(0) BR(12) p%(500) @27,110 q108 v127 o3 r1
SC11 SC01 SC11 SC11 SC11 SC21 SC11 SC01 SC01 SC11 SC21 SC11 SC01 SC01 SC01 SC21
//--------------------------------------------------------------------------------------------------
STR AP00 = {[15 r1]p%.T(0,8191,!1);'g'2^8r4^8}
STR AP01 = {[14 r1]EP.T(0,32,!1,32,127,!1);p%.T(-8191,8191,!1^1);'g'1^2^8,,90r4^8}
STR AP02 = {[8 r1]EP.T(0,64,384*6,64,127,384*2);p%.T(-8191,0,384*6,0,8191,384*2);'g'%3000r%72}
STR DP01 = {@117,8 '""""c""""g'1^1,,64 [6 r1]@127 RS08}
トラック14
V(127) REV(127) CHO(127) P(64) BR(12) q101 o5 @127 v127 r1
AP01 RS16 RS16 AP01 DP01 AP00 RS16 RS16 RS16 RS16 AP01 AP02 RS16 RS16 AP02 RS16
//--------------------------------------------------------------------------------------------------
STR WN00 = {r-1 p%.T(-8191,8191,384,8191,-8191,6144);EP.T(0,0,384,127,64,6144);'g'%6144,,64 r1}
STR WN01 = {r-1 p%.T(-8191,8191,384,8191,-8191,6144);EP.T(0,0,384,127,64,6144);'g'%6144 r1}
STR WN10 = {r-1 p%.T(-8191,8191,384,8191,-8191,6144);EP.T(32,127,384,127,0,6144);'g'%6144 r1}
トラック16
V(110) REV(120) CHO(120) P(64) BR(12) q100 o5 @123,1 v127 r1 TimingForward(3)
WN00 WN00 RS16 WN10 WN10 RS16 RS16 WN10 RS16 RS16 WN00 RS16 WN10 RS16 RS16 WN10
//==================================================================================================
//Solo(1,2,8,9,10,11,12,13)//トラックソロ。複数トラックで指定可能
//Mute()//トラックミュート。