/** TOP - Base template : ver2.70 **/
/*PPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPP
                 ¡      R   i   s   i   n   '      ¡

y ì‹ÈE’˜ìŒ  zH.YAMANOI
y‘Î  Û  ‰¹  Œ¹zRoland SC-8850 2port
yŽg  —p  ‰¹  Œ¹zRoland SC-8850
yÄ  ¶  Šm  ”FzTMIDI Player version 3.8.5 (release)
y ƒTƒNƒ‰‚ÌVer. z2.375
y’  ˆÓ  Ž–  €z”ñ¤—p‚ÉŒÀ‚è“]ÚEÄ”z•z‹–‰Â
y’  ˆÓ  Ž–  €z¤—pE”ñ¤—p‚É‚©‚©‚í‚ç‚¸“]ÚEÄ”z•z•s‰Â
y ˜A   —   æ zblog : http://ykun.exblog.jp/
y ‚»   ‚Ì   ‘¼ zƒjƒRƒjƒR“®‰æ : 
                         http://www.nicovideo.jp/watch/sm13463087
QQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQ

ƒ_ƒEƒ“ƒ[ƒh‚µ‚Ä‚¢‚½‚¾‚«‚ ‚è‚ª‚Æ‚¤‚²‚´‚¢‚Ü‚µ‚½B

Ÿ‹È‚Ì‚±‚Æ
ŽÀ‚ÍA¡‚Ü‚Å˜aŠyŠí‚ðŽg‚Á‚½‹È‚Á‚Ä‚Ù‚Æ‚ñ‚Çì‚Á‚½Ž–‚ª‚È‚©‚Á‚½‚Ì‚ÅA
‚¢‚Á‚¿‚å‚â‚Á‚Ä‚Ý‚Á‚©[‚ÆŽv‚¢‚Â‚¢‚½‚Ì‚ªŒ³’UB
‚ ‚Ü‚Â‚³‚¦‹l‚ßž‚Ý‚·‚¬‚Å’·‚Á‚½‚ç‚µ‚¢‚Ì‚ÉA‚¿‚ñ‚½‚ç‚µ‚Ä‚½‚ç‚QŒŽ‚É
‚È‚Á‚Ä‚µ‚Ü‚¢‚Ü‚µ‚½B
‚»‚ñ‚È–ó‚ÅA‚ ‚¯‚Ü‚µ‚Ä‚¨‚ß‚Å‚Æ‚¤‚²‚´‚¢‚Ü‚·B

ŸXV—š—ð
2011/01/31@Ver1.00@Š®¬
QQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQ*/

//_Synth Type
		Int	SynthType	=	4	; // ‰¹Œ¹‚Ìƒ^ƒCƒv -1`8‚Ü‚Å ‰Šú’l:8
		Int	UsePF		=	1	; // XG‰¹Œ¹‚ÅPLG150-PF‚ðŽg—p‚·‚é
		Int	UseDX		=	1	; // XG‰¹Œ¹‚ÅPLG150-DX‚ðŽg—p‚·‚é
		
/** HEADER **/
//_System Setting
Include			(stdmsg.h);
System.MeasureShift	(8);
System.TimeBase		(96);
System.vAdd			(10);
System.qAdd			(10);
Str Tmp_title	=	{"Risin'"};
Str Tmp_ver		=	{"1.00"};
Str Tmp_Copyright	=	{"01/31/2011  H.YAMANOI"}

//_SynthType Definition
If(SynthType != 4){
	SynthType = 4;
}
/*If(SynthType==8){
	Switch(SoundType){
		Case(1){	SynthType = 1;	}
		Case(2){	SynthType = 5;	}
		Default{	SynthType = 0;	}
	}
}
If((SynthType>8) || (SynthType<-1)){
	SynthType = 0;
}
*/

//_Function
//_  Common
// ’²†ƒƒ^ƒCƒxƒ“ƒg
//	sf  n:”‚Ì” -n:ó‚Ì”	mi  0:ƒƒWƒƒ[ 1:ƒ}ƒCƒi[
Function MetaKey(sf,mi){
	DirectSMF($FF,$59,$02,sf,mi);
}
// sinƒÆ‚Ì10,000”{‚ð•Ô‚·
Function SIN(Int Val){
	Int Tmp_Val = Val;
	Int Out = 0;
	If(Tmp_Val < 0){
		Tmp_Val = (Tmp_Val * -1) % 360;
		Tmp_Val = 360 - Tmp_Val;
	}
	If(Tmp_Val >= 360){
		Tmp_Val = Tmp_Val % 360;
	}
	If((Tmp_Val > 180) && (Tmp_Val <= 360)){
		Tmp_Val = 360 - Tmp_Val;
	}
	If((Tmp_Val > 90) && (Tmp_Val <= 180)){
		Tmp_Val = 180 - Tmp_Val;
	}
	Switch(Tmp_Val){
		Case( 0){ Out =     0; }	Case( 1){ Out =   175; }	Case( 2){ Out =   349; }
		Case( 3){ Out =   523; }	Case( 4){ Out =   698; }	Case( 5){ Out =   872; }
		Case( 6){ Out =  1045; }	Case( 7){ Out =  1219; }	Case( 8){ Out =  1392; }
		Case( 9){ Out =  1564; }	Case(10){ Out =  1736; }	Case(11){ Out =  1908; }
		Case(12){ Out =  2079; }	Case(13){ Out =  2250; }	Case(14){ Out =  2419; }
		Case(15){ Out =  2588; }	Case(16){ Out =  2756; }	Case(17){ Out =  2924; }
		Case(18){ Out =  3090; }	Case(19){ Out =  3256; }	Case(20){ Out =  3420; }
		Case(21){ Out =  3584; }	Case(22){ Out =  3746; }	Case(23){ Out =  3907; }
		Case(24){ Out =  4067; }	Case(25){ Out =  4226; }	Case(26){ Out =  4384; }
		Case(27){ Out =  4540; }	Case(28){ Out =  4695; }	Case(29){ Out =  4848; }
		Case(30){ Out =  5000; }	Case(31){ Out =  5150; }	Case(32){ Out =  5299; }
		Case(33){ Out =  5446; }	Case(34){ Out =  5592; }	Case(35){ Out =  5736; }
		Case(36){ Out =  5878; }	Case(37){ Out =  6018; }	Case(38){ Out =  6157; }
		Case(39){ Out =  6293; }	Case(40){ Out =  6428; }	Case(41){ Out =  6561; }
		Case(42){ Out =  6691; }	Case(43){ Out =  6820; }	Case(44){ Out =  6947; }
		Case(45){ Out =  7071; }	Case(46){ Out =  7193; }	Case(47){ Out =  7314; }
		Case(48){ Out =  7431; }	Case(49){ Out =  7547; }	Case(50){ Out =  7660; }
		Case(51){ Out =  7771; }	Case(52){ Out =  7880; }	Case(53){ Out =  7986; }
		Case(54){ Out =  8090; }	Case(55){ Out =  8192; }	Case(56){ Out =  8290; }
		Case(57){ Out =  8387; }	Case(58){ Out =  8480; }	Case(59){ Out =  8572; }
		Case(60){ Out =  8660; }	Case(61){ Out =  8746; }	Case(62){ Out =  8829; }
		Case(63){ Out =  8910; }	Case(64){ Out =  8988; }	Case(65){ Out =  9063; }
		Case(66){ Out =  9135; }	Case(67){ Out =  9205; }	Case(68){ Out =  9272; }
		Case(69){ Out =  9336; }	Case(70){ Out =  9397; }	Case(71){ Out =  9455; }
		Case(72){ Out =  9511; }	Case(73){ Out =  9563; }	Case(74){ Out =  9613; }
		Case(75){ Out =  9659; }	Case(76){ Out =  9703; }	Case(77){ Out =  9744; }
		Case(78){ Out =  9781; }	Case(79){ Out =  9816; }	Case(80){ Out =  9848; }
		Case(81){ Out =  9877; }	Case(82){ Out =  9903; }	Case(83){ Out =  9925; }
		Case(84){ Out =  9945; }	Case(85){ Out =  9962; }	Case(86){ Out =  9976; }
		Case(87){ Out =  9986; }	Case(88){ Out =  9994; }	Case(89){ Out =  9998; }
		Case(90){ Out = 10000; }
	}
	If(Val > 180 && Val < 360){
		Out = Out * -1;
	}
	Result = Out;
}
// cosƒÆ‚Ì10,000”{‚ð•Ô‚·
Function COS(Int Val){
	Int Out = 0;
	Out = SIN(Val+90);
	Result = Out;
}

//_  for GM
Function IsuGM(Array Data) {	// Instrument SetUp
	// BankMSB, BankLSB, PC#, Vol, Pan, Exp, Rev, Cho, Dly/Var
	l%1 y0(Data(0));r* y32(Data(1));r* @(Data(2));r* y7(Data(3));r* y10(Data(4));r*
	y11(Data(5));r* y91(Data(6));r* y93(Data(7));r* y94(Data(8));r*
	// PitchBendSensitivity
	y100(0);r* y101(0);r* y6(Data(9));r*
}
Function Null() {	// PitchBend Sensitivity Null
	l%1 y101(127); r* y100(127); r*
}
Function Mono() {	// Mono Mode
	l%1 y126(0); r*
}
Function Poly() {	// Poly Mode
	l%1 y127(0); r*
}
Function MasterVolume(Int Value) {	// Master Volume
	SysEx = $F0,$7F,$7F,$04,$01,$00,(Value),$F7;
}
Function PKP(Str Note, Int Val){	// Polyphonic Key Pressure
	Int No = NoteNo(Note);
	DirectSMF(($A0+Channel-1),No,Val);
}

//_  for GS
Function GS_EXCLUSIVE(Array Data) {	// System Exclusive
	SysEx = $F0,$41,$10,$42,$12,{(Data)},$F7;
}
Function IsuGS(Array Data) {	// Instrument SetUp
	// BankMSB, BankLSB, PC#, Vol, Pan, Exp, Rev, Cho, Dly
	l%1 y0(Data(0));r* y32(Data(1));r* @(Data(2));r* y7(Data(3));r* y10(Data(4));r*
	y11(Data(5));r* y91(Data(6));r* y93(Data(7));r* y94(Data(8));r*
	// Vibrato  Rate , Depth , Delay
	y99(1);r* y98(8);r* y6(Data(9));r* y99(1);r* y98(9);r* y6(Data(10));r* y99(1);r* y98(10);r* y6(Data(11));r*
	// Filter  LPF , Res
	y99(1);r* y98(32);r* y6(Data(12));r* y99(1);r* y98(33);r* y6(Data(13));r*
	// Envelope  Attack , Decay , Release
	y99(1);r* y98(99);r* y6(Data(14));r* y99(1);r* y98(100);r* y6(Data(15));r* y99(1);r* y98(102);r* y6(Data(16));r*
	// PitchBendSensitivity
	y100(0);r* y101(0);r* y6(Data(17));r*
}
Function EQ(Array Data){	// System EQ
	// LowFreq, LowGain, HiFreq, HiGain
	l%2	GS_EXCLUSIVE($40,$02,$00,(Data(0)     ));	// EQ Low Freq
	r*	GS_EXCLUSIVE($40,$02,$01,(Data(1) + 64));	// EQ Low Gain
	r*	GS_EXCLUSIVE($40,$02,$02,(Data(2)     ));	// EQ Hi Freq
	r*	GS_EXCLUSIVE($40,$02,$03,(Data(3) + 64));	// EQ Hi Gain
}
Function USER_DRUM(Array Data) {	// Setup User Drum
	l%2	// UserDrumNo[1,2], NoteNo, SorceMAP, SorcePC#, SorceNote, Level, Pan
	GS_EXCLUSIVE($20 + (Data(0)),$0A,(Data(1)),(Data(2)    )); r*	// SOURCE DRUM SET# (MAP)
	GS_EXCLUSIVE($20 + (Data(0)),$0B,(Data(1)),(Data(3) - 1)); r*	// SOURCE DRUM SET# (PC#)
	GS_EXCLUSIVE($20 + (Data(0)),$0C,(Data(1)),(Data(4)    )); r*	// SOURCE DRUM SET NUMBER
	GS_EXCLUSIVE($20 + (Data(0)),$02,(Data(1)),(Data(5)    )); r*	// LEVEL
	GS_EXCLUSIVE($20 + (Data(0)),$04,(Data(1)),(Data(6)    )); r*	// PAN
}
Function DAG(Int Map, Int No, Int Gp){	// Drum Instrument Assian Group
	GS_EXCLUSIVE($41,(Map*16+3),(No),(Gp));
}
Function DRN(Int No){	// Drum Instrument Rx Note Off
	GS_EXCLUSIVE($41,$07,(No),$01);
}

//_  for XG
Function XG_EXCLUSIVE(Array Data) {	// System Exclusive [XG Common]
	SysEx	= $F0,$43,$10,$4C,(Data),$F7;
}
Function DX_EXCLUSIVE(Array Data) {	// System Exclusive [PLG150-DX]
	SysEx	= $F0,$43,$10,$62,(Data),$F7;
}
Function PF_EXCLUSIVE(Array Data) {	// System Exclusive [PLG150-PF]
	SysEx	= $F0,$43,$10,$67,(Data),$F7;
}
Function IsuXG(Array Data) {	// Instrument SetUp
	// BankMSB, BankLSB, PC#, Vol, Pan, Exp, Rev, Cho, Var
	l%1 y0(Data(0));r* y32(Data(1));r* @(Data(2));r* y7(Data(3));r* y10(Data(4));r*
	y11(Data(5));r* y91(Data(6));r* y93(Data(7));r* y94(Data(8));r*
	// Vibrato  Rate , Depth , Delay
	y99(1);r* y98(8);r* y6(Data(9));r* y99(1);r* y98(9);r* y6(Data(10));r* y99(1);r* y98(10);r* y6(Data(11));r*
	// Filter  LPF , Resonance , HPF
	y99(1);r* y98(32);r* y6(Data(12));r* y99(1);r* y98(33);r* y6(Data(13));r* y99(1);r* y98(36);r* y6(Data(14));r*
	// Envelope  Attack , Decay , Release
	y99(1);r* y98(99);r* y6(Data(15));r* y99(1);r* y98(100);r* y6(Data(16));r* y99(1);r* y98(102);r* y6(Data(17));r*
	// PitchBendSensitivity
	y100(0);r* y101(0);r* y6(Data(18));r*
	// EQ  Low Frequency , Low Gain , Treble Frequency , Treble Gain
	y99(1);r* y98(52);r* y6(Data(19));r* y99(1);r* y98(48);r* y6(Data(20));r*
	y99(1);r* y98(53);r* y6(Data(21));r* y99(1);r* y98(49);r* y6(Data(22));r*
}
Function Dpf(Int Note,Int Value) {	// Drum Instrument  Pitch Fine
	l%1 y99(25); r* y98(Note); r* y6(Value); r*
}
Function Dfl(Array Data) {	// Drum Instrument  Fillter  LPF , Resonance , HPF
	l%1 y99(20);r* y98(Data(0));r* y6(Data(1));r* y99(21);r* y98(Data(0));r* y6(Data(2));r* y99(36);r* y98(Data(0));r* y6(Data(3));r*
}
Function Deg(Array Data) {	// Drum Instrument  Envelope  Attack , Decay
	l%1 y99(22);r* y98(Data(0));r* y6(Data(1));r* y99(23);r* y98(Data(0));r* y6(Data(2));r*
}
Function Deq(Array Data) {	// Drum Instrument  EQ  Low Frequency , Low Gain , Treble Frequency , Treble Gain
	l%1 y99(52);r* y98(Data(0));r* y6(Data(1));r* y99(48);r* y98(Data(0));r* y6(Data(2));r*
	y99(53);r* y98(Data(0));r* y6(Data(3));r* y99(49);r* y98(Data(0));r* y6(Data(4));r*
}
Function XGDT(Int Tm){
	Array Out;
	If(Tm > 16383){
		Tm = 16383;
	}
	If(Tm < 0){
		Tm = 0;
	}
	Out(0) = Tm / 128;
	Out(1) = Tm % 128;
	Result = Out;
}

//_  for GS/XG
Function Dpt(Int Note,Int Value) {	// Drum Instrument  Pitch Coarse
	l%1 y99(24); r* y98(Note); r* y6(Value); r*
}
Function Dpt2(Int Note,Int Value) {	// Drum Instrument  Pitch Coarse
	r*-%3 y99(24); r*%1 y98(Note); r*%1 y6(Value); r*%1
}
Function Dlv(Int Note,Int Value) {	// Drum Instrument  Level
	l%1 y99(26); r* y98(Note); r* y6(Value); r*
}
Function Dpn(Int Note,Int Value) {	// Drum Instrument  Pan
	l%1 y99(28); r* y98(Note); r* y6(Value); r*
}
Function Drs(Int Note,Int Value) {	// Drum Instrument  Reverb Send Level
	l%1 y99(29); r* y98(Note); r* y6(Value); r*
}
Function Dcs(Int Note,Int Value) {	// Drum Instrument  Chorus Send Level
	l%1 y99(30); r* y98(Note); r* y6(Value); r*
}
Function Dds(Int Note,Int Value) {	// Drum Instrument  Delay/Variation Send Level
	l%1 y99(31); r* y98(Note); r* y6(Value); r*
}
Function FXOutputLevel(Array Data) {	// Insertion Effect Output Level
	// GS:Gain  XG:FX No, Gain
	If(SynthType<=7 && SynthType>=6){
		XG_EXCLUSIVE($03,($00 + (Data(0))),$05,(Data(1)));
	}Else{If(SynthType<=4 && SynthType>=3){
		GS_EXCLUSIVE($40,$03,$16,(Data(0)));
	}}
}
Function PAf_Pitch(Int Rng){
	Int Chn = Channel;
	If(SynthType<=7 && SynthType>=6){
		XG_EXCLUSIVE($08,(MML(Port)*16+Chn-1),$53,($40+Rng));
	}Else{If(SynthType<=4 && SynthType>=3){
		If(Chn==10){
			Chn = 0;
		}
		If(Chn>10 && Chn<=16){
			Chn--;
		}
		GS_EXCLUSIVE($40,($20+Chn),$30,($40+Rng));
	}}
}
Function Rx_CH(Int Val){
	Int Chn = Channel;
	If(SynthType<=7 && SynthType>=6){
		XG_EXCLUSIVE($08,(MML(Port)*16+Chn-1),$04,(Val-1));
	}Else{If(SynthType<=4 && SynthType>=3){
		If(Chn==10){
			Chn = 0;
		}
		If(Chn>10 && Chn<=16){
			Chn--;
		}
		GS_EXCLUSIVE($40,($10+Chn),$02,(Val-1));
	}}
}
Function FINE(Int Data1,Int Data2){
	Int Chn = Channel;
	If(SynthType<=7 && SynthType>=6){
		XG_EXCLUSIVE($08,(MML(Port)*16+Chn-1),$09,(Data1),(Data2));
	}Else{If(SynthType<=4 && SynthType>=3){
		If(Chn==10){
			Chn = 0;
		}
		If(Chn>10 && Chn<=16){
			Chn--;
		}
		GS_EXCLUSIVE($40,($10+Chn),$2A,(Data1),(Data2));
	}}
}

//_  Effect
Function Ben(Int Gain ,Str Length) {	// Bending
	Int Len;
	If(ASC(MID(Length,0,2)) == ASC("!")){
		Len = StrToLen(Replace(Length,{!},{},off));
	}Else{
		Len = Length;
	}
	If((Len <= 0) || (Gain < -8192) || (Gain > 8191)){
		Print("Function Ben : illegal argument.");
		End;
	}
	Sub{	p%.onTime=(Gain),0,(Len);	}
}
Function Vib(Int Gain ,Str Length) {	// Vibrato
	Int Len;
	If(ASC(MID(Length,0,2)) == ASC("!")){
		Len = StrToLen(Replace(Length,{!},{},off));
	}Else{
		Len = Length;
	}
	If((Len <= 0) || (Gain <= 0) || (Gain > 127)){
		Print("Function Vib : illegal argument.");
		End;
	}
	Sub{	y1.onTime=1,(Gain),(Len);r*%(Len)y1(0);	}
}
// Hand Vibrato
//   [‚³, Vib1‰ñ‚Ì’·‚³(step), ‘S‘Ì‚Ì’·‚³
Function HVib(Int Gain ,Int Rate, Str Length) {
	Int Loop;
	Int Len;
	Str Tmp_MML;
	Int Tmp_i;
	If(ASC(MID(Length,0,2)) == ASC("!")){
		Len = StrToLen(Replace(Length,{!},{},off));
	}Else{
		Len = Length;
	}
	Loop = Len / Rate;
	If((Len <= 0) || (Gain < -8192) || (Gain > 8191) || (Gain == 0) || (Loop <= 0)){
		Print("Function HVib : illegal argument.");
		End;
	}

	Tmp_MML = "p%.T=";
	If(Gain>0){
		Tmp_MML = Tmp_MML + "1";
	}Else{If(Gain<0){
		Tmp_MML = Tmp_MML + "-1";
	}}
	Tmp_MML = Tmp_MML + "," + Gain + "," + (Rate / 2) + ",";
	If(Gain>0){
		Tmp_MML = Tmp_MML + (Gain - 1);
	}Else{If(Gain<0){
		Tmp_MML = Tmp_MML + (Gain + 1);
	}}
	Tmp_MML = Tmp_MML + ",0," + (Rate / 2) + "; r%" + Rate;

	For(Tmp_i=0; Tmp_i<Loop; Tmp_i++){
		Tmp_MML;
	}
	Tmp_MML = "r%-" + (Rate*Loop);
	Tmp_MML;
}
Function Mt(Str Length)	{	// Mute
	Int Len;
	If(ASC(MID(Length,0,2)) == ASC("!")){
		Len = StrToLen(Replace(Length,{!},{},off));
	}Else{
		Len = Length;
	}
	If(Len <= 0){
		Print("Function Mt : illegal argument.");
		End;
	}
	Sub{	r%8 y11.onTime=126,64,(Len - 8); r%(Len - 8) y11=127;	}
}
Function Unison(Str S, Int Value){	// Unison (Unison.h‚æ‚è”²ˆ)
	Sub{ Key(Value); S; Key(0); } S;
}
// 3D Auto Pan (RŽÐ‚ÌƒpƒNƒŠ)
//   ŽüŠú‚Ì’·‚³, ”¼Œa(0`63), ’†Sƒpƒ“, ‰ŠúˆÊ‘Š, ‰ñ“]•ûŒü(1,-1:³,•‰), ‰ñ“]‰ñ”, ‘ž•p“x
Function TDAuto(Str Rate, Array Opt){
	Int Len = MML(l);		// ŽüŠúiStepj
	Int Radii = Opt(0);	// ”¼Œa
	Int Center = Opt(1);	// ’†Sƒpƒ“
	Int IPhase = Opt(2);	// ‰ŠúˆÊ‘Š
	Int Direction = Opt(3);	// ‰ñ“]•ûŒü
	Int Loop = Opt(4);	// ‰ñ“]‰ñ”
	Int Freq = Opt(5);	// ‘ž•p“x
	Int Num = 1;		// 1ŽüŠú‚Ì‘ž‰ñ”
	Int DPhase = 0;		// ˆÊ‘Š‚Ì•Ï‰»—Ê
	Int IPan = 64;		// ‰Šúƒpƒ“
	Str Tmp_MML = "";
	Int Tmp_Phase = 0;
	Int Tmp_Pan = 64;
	Int Tmp_i = 0;
	Int Tmp_j = 0;

	If(ASC(MID(Rate,0,2)) == ASC("!")){
		Len = StrToLen(Replace(Rate,{!},{},off));
	}Else{
		Len = Rate;
	}
	If(Radii < 1){
		Radii = 63;
	}
	If(Center < 1){
		Center = 64;
	}
	If(Center+Radii > 127){
		Radii = 127 - Center;
	}
	If(Center-Radii < 1){
		Radii = Center - 1;
	}
	If((Direction != 1) && (Direction != -1)){
		Direction = 1;
	}
	If(Loop < 1){
		Loop = 1;
	}
	If(Freq < 1){
		Freq = 96;
	}
	Num = Len / Freq;
	If(Num == 0){
		Num = 1;
	}
	DPhase = 36000 / Num;

	For(Tmp_j=0; Tmp_j<Loop; Tmp_j++){
		For(Tmp_i=0; Tmp_i<Num; Tmp_i++){
			Tmp_Phase = (IPhase + (DPhase * Tmp_i / 100)) % 360;
			Tmp_Pan = Center + ((Radii * COS(Tmp_Phase) / 10000) * Direction);
			If(Tmp_i == 0){
				IPan = Tmp_Pan;
			}
			Tmp_MML = "y10(" + Tmp_Pan + "); r%" + Freq + " ";
			Tmp_MML;
		}
	}
	Tmp_MML = "y10(" + IPan + "); r%-" + (Len*Loop);
	Tmp_MML;
}
// Auto Wah
//   ‰ŠúƒJƒbƒgƒIƒt, ƒƒE‚Ì[‚³, 1ŽüŠú‚Ì’·‚³, ‘S‘Ì‚Ì’·‚³
Function AutoWah(Int ICut, Int Dpt, Str Opt_Rate, Str Opt_Len){
	If(SynthType <= 0){
		Exit;
	}
	Int Rate;	// ŽüŠú
	Int Len;	// ’·‚³
	Int Loop;
	Str Tmp_MML;

	If(ASC(MID(Opt_Rate,0,1)) == ASC("!")){
		Rate = StrToLen(Replace(Opt_Rate,{!},{},off));
	}Else{
		Rate = Opt_Rate;
	}
	If(ASC(MID(Opt_Len,0,1)) == ASC("!")){
		Len = StrToLen(Replace(Opt_Len,{!},{},off));
	}Else{
		Len = Opt_Len;
	}
	Loop = Len / Rate;

	If((SynthType == 1) || (SynthType == 2)){
		Tmp_MML = "FilterCutoff";
	}Else{
		Tmp_MML = "y74";
	}
	Tmp_MML = Tmp_MML + "(" + ICut + "); [" + Loop + " r%6 ";
	If((SynthType == 1) || (SynthType == 2)){
		Tmp_MML = Tmp_MML + "y6";
	}Else{
		Tmp_MML = Tmp_MML + "y74";
	}
	Tmp_MML = Tmp_MML + ".T=" + (ICut - 1) + "," + (ICut - Dpt) + "," + ((Rate / 2) - 8) + "; r%" + (Rate / 2);
	If((SynthType == 1) || (SynthType == 2)){
		Tmp_MML = Tmp_MML + " y6";
	}Else{
		Tmp_MML = Tmp_MML + " y74";
	}
	Tmp_MML = Tmp_MML + ".T=" + ((ICut - Dpt) + 1) + "," + ICut + "," + ((Rate / 2) - 8) + "; r%" + ((Rate / 2) - 6) + "]";
	Tmp_MML;
}
Function FadeOut(Int Opt_Len){
	Int Len = MML(l);
	Int Tmp_i;

	Len = Len * Opt_Len;
	S{	r%(Len) MasterVolume(0);	}
	Len = Len / 127;
	For(Tmp_i=126; Tmp_i>0; Tmp_i--){
		MasterVolume(Tmp_i);
		r%(Len);
	}
}

//_Meta Event
	TR( 0) Port(0) CH( 1) Time(-7:1: 0)
	Tmp_title = {"[ "} + Tmp_title + {" ] for "};
	Tmp_ver = "ver" + Tmp_ver + {" by H.YAMANOI"};
	Switch(SynthType){
		Case( 7){	TrackName = Tmp_title + {"MU1000 "} + Tmp_ver;	}
		Case( 6){	TrackName = Tmp_title + {"MU100 "} + Tmp_ver;	}
		Case( 5){	TrackName = Tmp_title + {"MU80 "} + Tmp_ver;	}
		Case( 4){	TrackName = Tmp_title + {"SC-8850 "} + Tmp_ver;	}
		Case( 3){	TrackName = Tmp_title + {"SC-88pro "} + Tmp_ver;	}
		Case( 2){	TrackName = Tmp_title + {"SC-88 "} + Tmp_ver;	}
		Case( 1){	TrackName = Tmp_title + {"SC-55 "} + Tmp_ver;	}
		Case(-1){	TrackName = Tmp_title + {"TW-MUSIC2 "} + Tmp_ver;	}
		Default{	TrackName = Tmp_title + {"GM "} + Tmp_ver;	}
	}
	Copyright = Tmp_Copyright;
	TimeSignature = 4,4;
	MetaKey(-5,-1);

//_Track Definition
	TR( 1) Port(0) CH( 1) Time(-7:1: 0) TrackName = {"Shakuhachi"}
	TR( 2) Port(0) CH( 2) Time(-7:1: 0) TrackName = {"Bass 1"}
	TR( 3) Port(0) CH( 3) Time(-7:1: 0) TrackName = {"Bass 2"}
	TR( 4) Port(0) CH( 4) Time(-7:1: 0) TrackName = {"Koto"}
	TR( 5) Port(0) CH( 5) Time(-7:1: 0) TrackName = {"Shinobue"}
	TR( 6) Port(0) CH( 6) Time(-7:1: 0) TrackName = {"Synth 4"}
	TR( 7) Port(0) CH( 7) Time(-7:1: 0) TrackName = {"Piano"}
	TR( 8) Port(0) CH( 8) Time(-7:1: 0) TrackName = {"Pad 5 L1"}
	TR( 9) Port(0) CH( 9) Time(-7:1: 0) TrackName = {"Pad 5 L2"}
	TR(10) Port(0) CH(10) Time(-7:1: 0) TrackName = {"Rhythm 1"}
	TR(11) Port(0) CH(11) Time(-7:1: 0) TrackName = {"Rhythm 2"}
	TR(12) Port(0) CH(12) Time(-7:1: 0) TrackName = {"Synth 3"}
	TR(13) Port(0) CH(13) Time(-7:1: 0) TrackName = {"Synth 2 L1"}
	TR(14) Port(0) CH(14) Time(-7:1: 0) TrackName = {"Synth 2 L2"}
	TR(15) Port(0) CH(15) Time(-7:1: 0) TrackName = {"Synth 1 L1"}
	TR(16) Port(0) CH(16) Time(-7:1: 0) TrackName = {"Synth 1 L2"}
	TR(17) Port(1) CH( 1) Time(-7:1: 0) TrackName = {"Pad 1"}
	TR(18) Port(1) CH( 2) Time(-7:1: 0) TrackName = {"Wind"}
	TR(19) Port(1) CH( 3) Time(-7:1: 0) TrackName = {"Pad 2"}
	TR(20) Port(1) CH( 4) Time(-7:1: 0) TrackName = {"Pad 3"}
	TR(21) Port(1) CH( 5) Time(-7:1: 0) TrackName = {"Pad 4"}
	TR(22) Port(1) CH( 6) Time(-7:1: 0) TrackName = {"Shamisen L"}
	TR(23) Port(1) CH( 7) Time(-7:1: 0) TrackName = {"Shamisen R"}
	TR(24) Port(1) CH( 8) Time(-7:1: 0) TrackName = {"Bell"}
	TR(25) Port(1) CH( 9) Time(-7:1: 0) TrackName = {"Zap"}
	TR(26) Port(1) CH(10) Time(-7:1: 0) TrackName = {"Rhythm 3"}
	TR(27) Port(1) CH(11) Time(-7:1: 0) TrackName = {"Rhythm 4"}
	TR(28) Port(1) CH(12) Time(-7:1: 0) TrackName = {"909 SD"}
	TR(29) Port(1) CH(13) Time(-7:1: 0) TrackName = {"Taiko L"}
	TR(30) Port(1) CH(14) Time(-7:1: 0) TrackName = {"Taiko R"}
	TR(31) Port(1) CH(15) Time(-7:1: 0) TrackName = {"Wind Chime"}
	TR(32) Port(1) CH(16) Time(-7:1: 0) TrackName = {"Hit"}
	TR(33) Port(0) CH( 1) Time(-7:1: 0) TrackName = {"Sys-Ex Port A"}
	TR(34) Port(1) CH( 1) Time(-7:1: 0) TrackName = {"Sys-Ex Port B"}

//_Tempo
	Time( -7:1: 0) Tempo = 480 ;
	Time(  0:1: 0) Tempo = 108 ;

//_Universal Exclusive
TR(33) Time( -7:1: 0)	SysEx$ = F0,7E,7F,09,01,F7;	// GM System On
	 Time( -6:4: 0)	MasterVolume(127);

//_System Exclusive
//_  XG System SetUp
	If(SynthType<=7 && SynthType>=5){
TR(33) Time( -7:3: 0)	XG_EXCLUSIVE($00,$00,$7E,$00);	// XG System On
	If(SynthType==5){
	 Time( -6:3: 0)	SysEx$ = F0,43,10,49,00,00,12,00,F7;	// Select MU Basic MAP
	}Else{
	 Time( -6:3: 0)	SysEx$ = F0,43,10,49,00,00,12,01,F7;	// Select MU100 Native MAP
	}
	 Time( -6:4:48)	XG_EXCLUSIVE($08,$00,$07,$02);	// Part Mode Drum1 [A10]
	 	l%2	r*	XG_EXCLUSIVE($08,$0A,$07,$03);	// Part Mode Drum2 [A11]
	If(SynthType>=6){
	 Time( -6:4:52)	XG_EXCLUSIVE($08,$10,$07,$04);	// Part Mode Drum3 [B10]
	 	l%2	r*	XG_EXCLUSIVE($08,$1A,$07,$05);	// Part Mode Drum4 [B11]
	}
	If(UsePF==1){
		//	r*	XG_EXCLUSIVE($70,$04,$00,$00);	// PLG150-PF Part Assign
		//	r*	PF_EXCLUSIVE($60,$00,$00,$43);	// Bass Freq
		//	r*	PF_EXCLUSIVE($60,$00,$01,$3F);	// Bass Gain
		//	r*	PF_EXCLUSIVE($60,$00,$02,$3B);	// Treble Freq
		//	r*	PF_EXCLUSIVE($60,$00,$03,$44);	// Treble Gain
		//	r*	PF_EXCLUSIVE($60,$00,$04,$01);	// PF Mode
		//	r*	PF_EXCLUSIVE($60,$00,$05,$01);	// SusCurve
		//	r*	PF_EXCLUSIVE($60,$00,$06,$42);	// EL1 Level
		//	r*	PF_EXCLUSIVE($60,$00,$07,$41);	// EL2 Level
	}
	If(UseDX==1){
		l%2	r*	XG_EXCLUSIVE($70,$02,$00,$01);	// PLG150-DX Part Assign
			r*	DX_EXCLUSIVE($60,$01,$0B,127);	// Carrier1
		//	r*	DX_EXCLUSIVE($60,$01,$0C, 64);	// Carrier2
		//	r*	DX_EXCLUSIVE($60,$01,$0D, 92);	// Carrier3
			r*	DX_EXCLUSIVE($60,$01,$0E,127);	// Carrier4
		//	r*	DX_EXCLUSIVE($60,$01,$0F,126);	// Carrier5
		//	r*	DX_EXCLUSIVE($60,$01,$10, 64);	// Carrier6
		//	r*	DX_EXCLUSIVE($60,$01,$13, 64);	// Modulator1
			r*	DX_EXCLUSIVE($60,$01,$14,100);	// Modulator2
			r*	DX_EXCLUSIVE($60,$01,$15, 42);	// Modulator3
		//	r*	DX_EXCLUSIVE($60,$01,$16, 56);	// Modulator4
			r*	DX_EXCLUSIVE($60,$01,$17, 42);	// Modulator5
			r*	DX_EXCLUSIVE($60,$01,$18, 57);	// Modulator6
			r*	DX_EXCLUSIVE($60,$01,$1B, 66);	// FeedBack
	}
//_  XG  Reverb
TR(33) Time( -5:1: 0)	XG_EXCLUSIVE(  2,  1,  0,  1,  1);	// Reverb Type [HALL 2]
	//	l%2	r*	XG_EXCLUSIVE(  2,  1,  0,  1,  0);	// Reverb Type
	//		r*	XG_EXCLUSIVE(  2,  1,  2,$0E);	// Reverb Time     0- 69(18)    0.3`30.0s            T#4
	//		r*	XG_EXCLUSIVE(  2,  1,  3,$0A);	// Diffusion       0- 10(10)    0`10
	//		r*	XG_EXCLUSIVE(  2,  1,  4,$1B);	// Initial Delay   0- 63(8)     0.1`99.3ms           T#5
	//		r*	XG_EXCLUSIVE(  2,  1,  5,$14);	// HPF Cutoff      0- 52(13)    Thru`8.0kHz          T#3
	//		r*	XG_EXCLUSIVE(  2,  1,  6,$34);	// LPF Cutoff     34- 60(49)    1.0k`Thru            T#3
	//		r*	XG_EXCLUSIVE(  2,  1, 16,$0E);	// Rev Delay       0- 63(0)     0.1`99.3ms           T#5
	//		r*	XG_EXCLUSIVE(  2,  1, 17,$04);	// Density         0-  4(4)     0`4
	//		r*	XG_EXCLUSIVE(  2,  1, 18,$40);	// Er/Rev Balance  1-127(50)    E63>R`E=R`E<R63
	//		r*	XG_EXCLUSIVE(  2,  1, 19,$06);	// High Damp       1- 10(8)     0.1`1.0
	//		r*	XG_EXCLUSIVE(  2,  1, 20,$40);	// Feedback Level  1-127(64)    -63`+63
	//		r*	XG_EXCLUSIVE(  2,  1, 12,$40);	// Reverb Return                0-127(64)
	//		r*	XG_EXCLUSIVE(  2,  1, 13,$40);	// Reverb Pan                   1-127(64)
//_  XG  Chorus
TR(33) Time( -5:1:48)	XG_EXCLUSIVE(  2,  1, 32, 65, 2);	// Chorus Type [CHORUS 3]
	//	l%2	r*	XG_EXCLUSIVE(  2,  1, 34,$0E);	// LFO Frequency      0-127(12)   0.00Hz`39.7Hz      T#1
	//		r*	XG_EXCLUSIVE(  2,  1, 35,$19);	// LFO Depth          0-127(32)   0`127
	//		r*	XG_EXCLUSIVE(  2,  1, 36,$45);	// Feedback Level     1-127(64)   -63`+63
	//		r*	XG_EXCLUSIVE(  2,  1, 37,$00);	// Delay Offset       0-127(0)    0.0`50             T#2
	//		r*	XG_EXCLUSIVE(  2,  1, 39,$1F);	// EQ Low Frequency   4- 40(28)   32Hz`2.0kHz        T#3
	//		r*	XG_EXCLUSIVE(  2,  1, 40,$42);	// EQ Low Gain       52- 76(64)   -12`+12dB
	//		r*	XG_EXCLUSIVE(  2,  1, 41,$30);	// EQ High Frequency 28- 58(46)   500Hz`16.0kHz      T#3
	//		r*	XG_EXCLUSIVE(  2,  1, 42,$41);	// EQ High Gain      52- 76(64)   -12`+12dB
	//		r*	XG_EXCLUSIVE(  2,  1, 52,$01);	// Input Mode         0-  1(0)    mono/stereo
	//		r*	XG_EXCLUSIVE(  2,  1, 45,$40);	// Chorus Pan                   1-127(64)
	//		r*	XG_EXCLUSIVE(  2,  1, 46,$00);	// Send Cho. to Rev.            0-127(0)
//_  XG  Variation
TR(33) Time( -5:2: 0)	XG_EXCLUSIVE($02,$01,$5A,$01);	// Variation Connect [System]
		l%2	r*	XG_EXCLUSIVE($02,$01,$40,$05,$00);	// Variation Type [DELAY L,C,R]

			r*	XG_EXCLUSIVE(  2,  1, 87, 64);	// Variation Pan                1-127(64)
			r*	XG_EXCLUSIVE(  2,  1, 88,  0);	// Send Variation to Reverb     0-127(0)
			r*	XG_EXCLUSIVE(  2,  1, 89,  0);	// Send Variation to Chorus     0-127(0)
//_  XG  5-BAND EQUALIZER
	If(SynthType>=6){
TR(33) Time( -5:2:48)	XG_EXCLUSIVE(  2, 64,  0,  0);	// EQ Type 0:FLAT 1:JAZZ 2:POPS 3:ROCK 4:CLASSIC
	//	l%2	r*	XG_EXCLUSIVE(  2, 64,  1, 65);	// EQ Gain1      52-76  (-12-+12dB)
	//		r*	XG_EXCLUSIVE(  2, 64,  5, 59);	// EQ Gain2      52-76  (-12-+12dB)
	//		r*	XG_EXCLUSIVE(  2, 64,  9, 64);	// EQ Gain3      52-76  (-12-+12dB)
	//		r*	XG_EXCLUSIVE(  2, 64, 13, 58);	// EQ Gain4      52-76  (-12-+12dB)
	//		r*	XG_EXCLUSIVE(  2, 64, 17, 62);	// EQ Gain5      52-76  (-12-+12dB)
	//		r*	XG_EXCLUSIVE(  2, 64,  2, 15);	// EQ Frequency1  4-40  (32-2000Hz)
	//		r*	XG_EXCLUSIVE(  2, 64,  6, 24);	// EQ Frequency2 14-54  (100-10kHz)
	//		r*	XG_EXCLUSIVE(  2, 64, 10, 32);	// EQ Frequency3 14-54  (100-10kHz)
	//		r*	XG_EXCLUSIVE(  2, 64, 14, 44);	// EQ Frequency4 14-54  (100-10kHz)
	//		r*	XG_EXCLUSIVE(  2, 64, 18, 51);	// EQ Frequency5 28-58  (500-16kHz)
	//		r*	XG_EXCLUSIVE(  2, 64,  3,  8);	// EQ Q1          1-120 (0.1-12.0)
	//		r*	XG_EXCLUSIVE(  2, 64,  7, 12);	// EQ Q2          1-120 (0.1-12.0)
	//		r*	XG_EXCLUSIVE(  2, 64, 11, 10);	// EQ Q3          1-120 (0.1-12.0)
	//		r*	XG_EXCLUSIVE(  2, 64, 15, 14);	// EQ Q4          1-120 (0.1-12.0)
	//		r*	XG_EXCLUSIVE(  2, 64, 19, 12);	// EQ Q5          1-120 (0.1-12.0)
	//		r*	XG_EXCLUSIVE(  2 ,64,  4,  0);	// EQ Shape1      0-1   (0:Shelving 1:Peaking)
	//		r*	XG_EXCLUSIVE(  2, 64, 20,  0);	// EQ Shape5      0-1   (0:Shelving 1:Peaking)
//_  XG  Insertion1
TR(33) Time( -5:3: 0)	XG_EXCLUSIVE($03,$00,$00,$40,$00);	// Insertion1 Type [THRU]
		l%2	r*	XG_EXCLUSIVE($03,$00,$0C,127);	// Insertion1 Part [0-63:Part 64-126:A/D 127:OFF]
//_  XG  Insertion2
TR(33) Time( -5:3:48)	XG_EXCLUSIVE($03,$01,$00,$40,$00);	// Insertion2 Type [THRU]
		l%2	r*	XG_EXCLUSIVE($03,$01,$0C,127);	// Insertion2 Part [0-63:Part 64-126:A/D 127:OFF]
	If(SynthType==7){
//_  XG  Insertion3
TR(33) Time( -5:4: 0)	XG_EXCLUSIVE($03,$02,$00,$40,$00);	// Insertion3 Type [THRU]
		l%2	r*	XG_EXCLUSIVE($03,$02,$0C,127);	// Insertion3 Part [0-63:Part 64-126:A/D 127:OFF]
//_  XG  Insertion4
TR(33) Time( -5:4:48)	XG_EXCLUSIVE($03,$03,$00,$40,$00);	// Insertion4 Type [THRU]
		l%2	r*	XG_EXCLUSIVE($03,$03,$0C,127);	// Insertion4 Part [0-63:Part 64-126:A/D 127:OFF]

}}}Else{If(SynthType<=4 && SynthType>=1){
//_  GS System SetUP
TR(33) Time( -7:3: 0)	GS_EXCLUSIVE($40,$00,$7F,$00);	// GS Reset
	 Time( -6:4:48)	GS_EXCLUSIVE($40,$10,$15,$01);	// Use for Rhythm Part 1 [CH A10]
	 Time( -6:4:50)	GS_EXCLUSIVE($40,$1A,$15,$02);	// Use for Rhythm Part 2 [CH A11]
	If((SynthType==3) || (SynthType==4)){
TR(34) Time( -6:4:52)	GS_EXCLUSIVE($40,$10,$15,$01);	// Use for Rhythm Part 1 [CH B13]
	 Time( -6:4:50)	GS_EXCLUSIVE($40,$1A,$15,$02);	// Use for Rhythm Part 2 [CH B11]
	}
//_  GS  Reverb
TR(33) Time( -5:1: 0)	GS_EXCLUSIVE($40,$01,$30,$03);	// Reverb Macro [Hall 1]
 	//	l%2	r*	GS_EXCLUSIVE($40,$01,$31,  4);	// Reverb Character
		l%2	r*	GS_EXCLUSIVE($40,$01,$32,  0);	// Reverb Pre-LPF
	//		r*	GS_EXCLUSIVE($40,$01,$33, 64);	// Reverb Level
	//		r*	GS_EXCLUSIVE($40,$01,$34, 64);	// Reverb Time
	//		r*	GS_EXCLUSIVE($40,$01,$35,  0);	// Reverb Delay Feedback
	//		r*	GS_EXCLUSIVE($40,$01,$37,  0);	// Reverb Pre Delay Time
//_  GS  Chorus
TR(33) Time( -5:1:48)	GS_EXCLUSIVE($40,$01,$38,$06);	// Chorus Macro [Chorus 3]
	//	l%2	r*	GS_EXCLUSIVE($40,$01,$39,  3);	// Chorus Pre-LPF
	//		r*	GS_EXCLUSIVE($40,$01,$3A, 64);	// Chorus Level
	//		r*	GS_EXCLUSIVE($40,$01,$3B,  8);	// Chorus Feedback
	//		r*	GS_EXCLUSIVE($40,$01,$3C, 80);	// Chorus Delay
	//		r*	GS_EXCLUSIVE($40,$01,$3D,  3);	// Chorus Rate
	//		r*	GS_EXCLUSIVE($40,$01,$3E, 19);	// Chorus Depth
	//		r*	GS_EXCLUSIVE($40,$01,$3F,  0);	// Chorus Send Level to Reverb
	//		r*	GS_EXCLUSIVE($40,$01,$40,  0);	// Chorus Send Level to Delay
	If(SynthType>=2){
//_  GS  Delay
TR(33) Time( -5:2: 0)	GS_EXCLUSIVE($40,$01,$50,$04);	// Delay Macro [Pan Delay 1]
		l%2	r*	GS_EXCLUSIVE($40,$01,$51,  0);	// Delay Pre-LPF
			r*	GS_EXCLUSIVE($40,$01,$52,$6A);	// Delay Time Center
			r*	GS_EXCLUSIVE($40,$01,$53,$18);	// Delay Time Ratio Left
			r*	GS_EXCLUSIVE($40,$01,$54,$0C);	// Delay Time Ratio Right
	//		r*	GS_EXCLUSIVE($40,$01,$55,  0);	// Delay Level Center
	//		r*	GS_EXCLUSIVE($40,$01,$56,127);	// Delay Level Left
	//		r*	GS_EXCLUSIVE($40,$01,$57, 64);	// Delay Level Right
	//		r*	GS_EXCLUSIVE($40,$01,$58, 48);	// Delay Level
	//		r*	GS_EXCLUSIVE($40,$01,$59, 80);	// Delay Feedback
	//		r*	GS_EXCLUSIVE($40,$01,$5A,  0);	// Delay Send Level to Reverbt
	If(SynthType>=3){
//_  GS  SC-88pro~8850
//_  GS  EQ
TR(33) Time( -5:2:48)	EQ(  0,  2,  1,  6);
//_  GS  EFX
TR(33) Time( -5:3: 0)	GS_EXCLUSIVE($40,$03,$00,$00,$00);	// EFX Type [Thru]
	//	l%2	r*	GS_EXCLUSIVE($40,$41,$22,  0);	// EFX On []
	//		r*	GS_EXCLUSIVE($40,$03,$03,  0);	//   
	//		r*	GS_EXCLUSIVE($40,$03,$04,  0);	//   
	//		r*	GS_EXCLUSIVE($40,$03,$05,  0);	//   
	//		r*	GS_EXCLUSIVE($40,$03,$06,  0);	//   
	//		r*	GS_EXCLUSIVE($40,$03,$07,  0);	//   
	//		r*	GS_EXCLUSIVE($40,$03,$08,  0);	//   
	//		r*	GS_EXCLUSIVE($40,$03,$09,  0);	//   
	//		r*	GS_EXCLUSIVE($40,$03,$0A,  0);	//   
	//		r*	GS_EXCLUSIVE($40,$03,$0B,  0);	//   
	//		r*	GS_EXCLUSIVE($40,$03,$14,  0);	//   
	//		r*	GS_EXCLUSIVE($40,$03,$15,  0);	//   
	//		r*	GS_EXCLUSIVE($40,$03,$16, 64);	// EFX Level
	//		r*	GS_EXCLUSIVE($40,$03,$17,  0);	// EFX Send Level to Reverb
	//		r*	GS_EXCLUSIVE($40,$03,$18,  0);	// EFX Send Level to Chorus
	//		r*	GS_EXCLUSIVE($40,$03,$19,  0);	// EFX Send Level to Delay
	//		r*	GS_EXCLUSIVE($40,$03,$1B,  0);	// EFX Control Sorce 1
	//		r*	GS_EXCLUSIVE($40,$03,$1C,127);	// EFX Control Depth 1
	//		r*	GS_EXCLUSIVE($40,$03,$1D,  0);	// EFX Control Sorce 2
	//		r*	GS_EXCLUSIVE($40,$03,$1E,127);	// EFX Control Depth 2
	//		r*	GS_EXCLUSIVE($40,$03,$1F,  1);	// EFX Send EQ Switch
}}}}
Switch(SynthType){
//_Instulment Setup
	Case(7){
//_  XG MU1000/2000
//					     BM, BL, PC,Vol,Pan,Exp,Rev,Cho,Dly,VRt,VDp,VDl,LPF,Res,HPF,Atc,Dec,Rel,BR,LwF,LwG,TrF,TrG
	TR( 1) Time( -4:1: 0) IsuXG(  0,  0,  1,100, 64,127,  0,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64, 64,12, 12, 64, 54, 64);Null;	// 
	TR( 2) Time( -4:1:48) IsuXG( 83, 69, 39,100, 64,127,  0,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64, 64,12, 12, 64, 54, 64);Null;	// 
	TR( 3) Time( -4:2: 0) IsuXG(  0,  0,  1,100, 64,127,  0,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64, 64,12, 12, 64, 54, 64);Null;	// 
	TR( 4) Time( -4:2:48) IsuXG(  0,  0,  1,100, 64,127,  0,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64, 64,12, 12, 64, 54, 64);Null;	// 
	TR( 5) Time( -4:3: 0) IsuXG(  0,  0,  1,100, 64,127,  0,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64, 64,12, 12, 64, 54, 64);Null;	// 
	TR( 6) Time( -4:3:48) IsuXG(  0,  0,  1,100, 64,127,  0,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64, 64,12, 12, 64, 54, 64);Null;	// 
	TR( 7) Time( -4:4: 0) IsuXG(  0,  0,  1,100, 64,127,  0,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64, 64,12, 12, 64, 54, 64);Null;	// 
	TR( 8) Time( -4:4:48) IsuXG(  0,  0,  1,100, 64,127,  0,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64, 64,12, 12, 64, 54, 64);Null;	// 
	TR( 9) Time( -3:1: 0) IsuXG(  0,  0,  1,100, 64,127,  0,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64, 64,12, 12, 64, 54, 64);Null;	// 
	TR(10) Time( -3:1:48) IsuXG(127,  0,  1,100, 64,127,  0,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64, 64,12, 12, 64, 54, 64);Null;	// 
	TR(11) Time( -3:2: 0) IsuXG(127,  0,  1,100, 64,127,  0,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64, 64,12, 12, 64, 54, 64);Null;	// 
	TR(12) Time( -3:2:48) IsuXG(  0,  0,  1,100, 64,127,  0,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64, 64,12, 12, 64, 54, 64);Null;	// 
	TR(13) Time( -3:3: 0) IsuXG(  0,  0,  1,100, 64,127,  0,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64, 64,12, 12, 64, 54, 64);Null;	// 
	TR(14) Time( -3:3:48) IsuXG(  0,  0,  1,100, 64,127,  0,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64, 64,12, 12, 64, 54, 64);Null;	// 
	TR(15) Time( -3:4: 0) IsuXG(  0,  0,  1,100, 64,127,  0,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64, 64,12, 12, 64, 54, 64);Null;	// 
	TR(16) Time( -3:4:48) IsuXG(  0,  0,  1,100, 64,127,  0,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64, 64,12, 12, 64, 54, 64);Null;	// 
//	TR(17) Time( -2:1: 0) IsuXG(  0,  0,  1,100, 64,127,  0,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64, 64,12, 12, 64, 54, 64);Null;	// 
//	TR(18) Time( -2:1:48) IsuXG(  0,  0,  1,100, 64,127,  0,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64, 64,12, 12, 64, 54, 64);Null;	// 
//	TR(19) Time( -2:2: 0) IsuXG(  0,  0,  1,100, 64,127,  0,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64, 64,12, 12, 64, 54, 64);Null;	// 
//	TR(20) Time( -2:2:48) IsuXG(  0,  0,  1,100, 64,127,  0,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64, 64,12, 12, 64, 54, 64);Null;	// 
//	TR(21) Time( -2:3: 0) IsuXG(  0,  0,  1,100, 64,127,  0,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64, 64,12, 12, 64, 54, 64);Null;	// 
//	TR(22) Time( -2:3:48) IsuXG(  0,  0,  1,100, 64,127,  0,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64, 64,12, 12, 64, 54, 64);Null;	// 
//	TR(23) Time( -2:4: 0) IsuXG(  0,  0,  1,100, 64,127,  0,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64, 64,12, 12, 64, 54, 64);Null;	// 
//	TR(24) Time( -2:4:48) IsuXG(  0,  0,  1,100, 64,127,  0,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64, 64,12, 12, 64, 54, 64);Null;	// 
//	TR(25) Time( -1:1: 0) IsuXG(  0,  0,  1,100, 64,127,  0,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64, 64,12, 12, 64, 54, 64);Null;	// 
//	TR(26) Time( -1:1:48) IsuXG(127,  0,  1,100, 64,127,  0,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64, 64,12, 12, 64, 54, 64);Null;	// 
//	TR(27) Time( -1:2: 0) IsuXG(127,  0,  1,100, 64,127,  0,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64, 64,12, 12, 64, 54, 64);Null;	// 
//	TR(28) Time( -1:2:48) IsuXG(  0,  0,  1,100, 64,127,  0,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64, 64,12, 12, 64, 54, 64);Null;	// 
//	TR(29) Time( -1:3: 0) IsuXG(  0,  0,  1,100, 64,127,  0,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64, 64,12, 12, 64, 54, 64);Null;	// 
//	TR(30) Time( -1:3:48) IsuXG(  0,  0,  1,100, 64,127,  0,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64, 64,12, 12, 64, 54, 64);Null;	// 
//	TR(31) Time( -1:4: 0) IsuXG(  0,  0,  1,100, 64,127,  0,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64, 64,12, 12, 64, 54, 64);Null;	// 
//	TR(32) Time( -1:4:48) IsuXG(  0,  0,  1,100, 64,127,  0,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64, 64,12, 12, 64, 54, 64);Null;	// 
	}Case(6){
//_  XG MU100/128
//					     BM, BL, PC,Vol,Pan,Exp,Rev,Cho,Dly,VRt,VDp,VDl,LPF,Res,HPF,Atc,Dec,Rel,BR,LwF,LwG,TrF,TrG
	TR( 1) Time( -4:1: 0) IsuXG(  0,  0,  1,100, 64,127,  0,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64, 64,12, 12, 64, 54, 64);Null;	// 
	TR( 2) Time( -4:1:48) IsuXG(  0,  0,  1,100, 64,127,  0,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64, 64,12, 12, 64, 54, 64);Null;	// 
	TR( 3) Time( -4:2: 0) IsuXG(  0,  0,  1,100, 64,127,  0,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64, 64,12, 12, 64, 54, 64);Null;	// 
	TR( 4) Time( -4:2:48) IsuXG(  0,  0,  1,100, 64,127,  0,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64, 64,12, 12, 64, 54, 64);Null;	// 
	TR( 5) Time( -4:3: 0) IsuXG(  0,  0,  1,100, 64,127,  0,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64, 64,12, 12, 64, 54, 64);Null;	// 
	TR( 6) Time( -4:3:48) IsuXG(  0,  0,  1,100, 64,127,  0,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64, 64,12, 12, 64, 54, 64);Null;	// 
	TR( 7) Time( -4:4: 0) IsuXG(  0,  0,  1,100, 64,127,  0,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64, 64,12, 12, 64, 54, 64);Null;	// 
	TR( 8) Time( -4:4:48) IsuXG(  0,  0,  1,100, 64,127,  0,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64, 64,12, 12, 64, 54, 64);Null;	// 
	TR( 9) Time( -3:1: 0) IsuXG(  0,  0,  1,100, 64,127,  0,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64, 64,12, 12, 64, 54, 64);Null;	// 
	TR(10) Time( -3:1:48) IsuXG(127,  0,  1,100, 64,127,  0,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64, 64,12, 12, 64, 54, 64);Null;	// 
	TR(11) Time( -3:2: 0) IsuXG(127,  0,  1,100, 64,127,  0,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64, 64,12, 12, 64, 54, 64);Null;	// 
	TR(12) Time( -3:2:48) IsuXG(  0,  0,  1,100, 64,127,  0,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64, 64,12, 12, 64, 54, 64);Null;	// 
	TR(13) Time( -3:3: 0) IsuXG(  0,  0,  1,100, 64,127,  0,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64, 64,12, 12, 64, 54, 64);Null;	// 
	TR(14) Time( -3:3:48) IsuXG(  0,  0,  1,100, 64,127,  0,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64, 64,12, 12, 64, 54, 64);Null;	// 
	TR(15) Time( -3:4: 0) IsuXG(  0,  0,  1,100, 64,127,  0,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64, 64,12, 12, 64, 54, 64);Null;	// 
	TR(16) Time( -3:4:48) IsuXG(  0,  0,  1,100, 64,127,  0,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64, 64,12, 12, 64, 54, 64);Null;	// 
//	TR(17) Time( -2:1: 0) IsuXG(  0,  0,  1,100, 64,127,  0,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64, 64,12, 12, 64, 54, 64);Null;	// 
//	TR(18) Time( -2:1:48) IsuXG(  0,  0,  1,100, 64,127,  0,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64, 64,12, 12, 64, 54, 64);Null;	// 
//	TR(19) Time( -2:2: 0) IsuXG(  0,  0,  1,100, 64,127,  0,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64, 64,12, 12, 64, 54, 64);Null;	// 
//	TR(20) Time( -2:2:48) IsuXG(  0,  0,  1,100, 64,127,  0,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64, 64,12, 12, 64, 54, 64);Null;	// 
//	TR(21) Time( -2:3: 0) IsuXG(  0,  0,  1,100, 64,127,  0,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64, 64,12, 12, 64, 54, 64);Null;	// 
//	TR(22) Time( -2:3:48) IsuXG(  0,  0,  1,100, 64,127,  0,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64, 64,12, 12, 64, 54, 64);Null;	// 
//	TR(23) Time( -2:4: 0) IsuXG(  0,  0,  1,100, 64,127,  0,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64, 64,12, 12, 64, 54, 64);Null;	// 
//	TR(24) Time( -2:4:48) IsuXG(  0,  0,  1,100, 64,127,  0,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64, 64,12, 12, 64, 54, 64);Null;	// 
//	TR(25) Time( -1:1: 0) IsuXG(  0,  0,  1,100, 64,127,  0,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64, 64,12, 12, 64, 54, 64);Null;	// 
//	TR(26) Time( -1:1:48) IsuXG(127,  0,  1,100, 64,127,  0,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64, 64,12, 12, 64, 54, 64);Null;	// 
//	TR(27) Time( -1:2: 0) IsuXG(127,  0,  1,100, 64,127,  0,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64, 64,12, 12, 64, 54, 64);Null;	// 
//	TR(28) Time( -1:2:48) IsuXG(  0,  0,  1,100, 64,127,  0,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64, 64,12, 12, 64, 54, 64);Null;	// 
//	TR(29) Time( -1:3: 0) IsuXG(  0,  0,  1,100, 64,127,  0,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64, 64,12, 12, 64, 54, 64);Null;	// 
//	TR(30) Time( -1:3:48) IsuXG(  0,  0,  1,100, 64,127,  0,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64, 64,12, 12, 64, 54, 64);Null;	// 
//	TR(31) Time( -1:4: 0) IsuXG(  0,  0,  1,100, 64,127,  0,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64, 64,12, 12, 64, 54, 64);Null;	// 
//	TR(32) Time( -1:4:48) IsuXG(  0,  0,  1,100, 64,127,  0,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64, 64,12, 12, 64, 54, 64);Null;	// 
	}Case(5){
	}Case(4){
//_  GS SC-8850
//					     BM, BL, PC,Vol,Pan,Exp,Rev,Cho,Dly,VRt,VDp,VDl,Cut,Res,Atc,Dec,Rel,BR
	TR( 1) Time( -4:1: 0) IsuGS(  1,  4, 78,127, 64,127, 70, 30,  0, 64, 89, 69, 64, 64, 64, 64, 64,12);Null;Mono;	// 
	TR( 2) Time( -4:1:48) IsuGS(  6,  4, 39,110, 64,127,  0,  0,  0, 64, 64, 64, 54, 64, 64, 64, 64,12);Null;Mono;	// 
	TR( 3) Time( -4:2: 0) IsuGS(  0,  4, 88, 90, 64,127,  0,  0,  0, 64, 64, 64, 74, 74, 59, 64, 54,12);Null;Mono;	// 
	TR( 4) Time( -4:2:48) IsuGS(  0,  4,108,100, 79,127, 40,  0, 30, 64, 64, 64, 94, 74, 61, 64, 64,12);Null;	// 
	TR( 5) Time( -4:3: 0) IsuGS(  1,  4, 73,120, 64,127, 60, 30,  0, 64, 89, 69, 64, 64, 64, 64, 64,12);Null;Mono;	// 
	TR( 6) Time( -4:3:48) IsuGS(  3,  4, 88, 70, 64,127, 40,  0, 30, 64, 64, 64, 64, 84, 65, 64, 64,12);Null;	// 
	TR( 7) Time( -4:4: 0) IsuGS(  0,  4,  2,120, 64,127, 50,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64,12);Null;	// 
	TR( 8) Time( -4:4:48) IsuGS(  4,  4, 51, 60, 16,127,100, 70,  0, 64, 64, 64, 64, 64, 59, 84, 64,24);Null;	// 
	TR( 9) Time( -3:1: 0) IsuGS(  4,  4, 51, 60,111,127,100, 70,  0, 64, 64, 64, 64, 64, 59, 84, 64,24);Null;FINE($4F,$2D);Rx_CH( 8);	// 
	TR(10) Time( -3:1:48) IsuGS(  0,  4, 52,127, 64,127, 20,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64,12);Null;	// 
			Dlv( 55,127); Dpt( 55, 66);
			Dpt( 52, 60);
			Dpt( 70, 60);
			Dpt( 71, 60);
			Dpt( 75, 60);
	TR(11) Time( -3:2: 0) IsuGS(  0,  4, 53,110, 64,127, 20,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64,12);Null;	// 
			Dpn( 47, 48);
			Dpn( 48, 48);
			Dpn( 51, 59);
			Dpn( 56, 54);
			Dpn( 57, 54);
			Dpn( 58, 54);
			Dpn( 54, 48); Dlv( 54, 80);
	TR(12) Time( -3:2:48) IsuGS( 10,  4, 82, 90, 64,127, 20,  0, 30, 64, 64, 64, 64, 84, 64, 64, 64,12);Null;Mono;	// 
	TR(13) Time( -3:3: 0) IsuGS( 14,  4, 82, 60,  1,127, 10, 40, 40, 64, 64, 64,114, 84,  0, 84,  0,24);Null;FINE($4F,$2E);	// 
	TR(14) Time( -3:3:48) IsuGS( 14,  4, 82, 60,127,127, 10, 40, 40, 64, 64, 64,114, 84,  0, 84,  0,24);Null;Rx_CH(13);	// 
	TR(15) Time( -3:4: 0) IsuGS(  5,  4, 84, 70,  1,127, 10, 40, 40, 64, 64, 64, 64, 80,  0, 44,  0,24);Null;	// 
	TR(16) Time( -3:4:48) IsuGS(  5,  4, 84, 70,127,127, 10, 40, 40, 64, 64, 64, 64, 80,  0, 44,  0,24);Null;FINE($4F,$2E);Rx_CH(15);	// 
	TR(17) Time( -2:1: 0) IsuGS(  3,  4, 98, 80, 64,127,100, 70,  0, 64, 64, 64, 59, 64, 74, 74, 64,12);Null;	// 
	TR(18) Time( -2:1:48) IsuGS(  6,  4,123, 70, 64,127,127,100,  0, 64, 64, 64, 64, 64, 64, 84, 64,12);Null;	// 
	TR(19) Time( -2:2: 0) IsuGS( 10,  4, 96, 80, 64,127,127,100,  0, 64, 64, 64, 64, 64, 74, 64, 64,24);Null;	// 
	TR(20) Time( -2:2:48) IsuGS(  1,  4, 94, 60, 64,127,100, 70,  0, 64, 64, 64, 54, 64, 79, 74, 64,12);Null;	// 
	TR(21) Time( -2:3: 0) IsuGS(  9,  4, 96, 90, 64,127, 70,  0,  0, 64, 64, 64, 64, 64, 84, 64, 64,12);Null;	// 
	TR(22) Time( -2:3:48) IsuGS(  0,  4,107, 90,  1,127, 20,  0, 10, 64, 64, 64, 74, 74, 65, 65, 64,12);Null;	// 
	TR(23) Time( -2:4: 0) IsuGS(  0,  4,107, 90,127,127, 20,  0, 10, 64, 64, 64, 74, 74, 65, 65, 64,12);Null;	// 
	TR(24) Time( -2:4:48) IsuGS(  5,  4, 89, 90, 44,127,100,  0, 30, 64, 64, 64, 74, 74, 54, 74, 64,12);Null;	// 
	TR(25) Time( -1:1: 0) IsuGS(  5,  4,128,100, 64,127,127,100,  0, 64, 64, 64, 54, 64, 64, 64, 64,12);Null;	// 
	TR(26) Time( -1:1:48) IsuGS(  0,  4, 63,100, 64,127, 40,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64,12);Null;	// 
			Dpn( 36, 96); Dpt( 36, 67); DAG(  0, 36,  1);
			Dpn( 47, 96); Dpt( 47, 67); DAG(  0, 47,  1);
			Dpn( 48, 96); Dpt( 48, 67); DAG(  0, 48,  1);
			Dpn( 43, 59); Dpt( 43, 65); DAG(  0, 43,  0);
			Dpn( 58,  1); Drs( 58,100); DAG(  0, 58,  0);
			Dpn( 62,127); Drs( 62,100); DAG(  0, 62,  0);
			Dpn( 73,  1); Drs( 73,127); DRN( 73); DAG(  0, 73,  0);
			Dpn( 74,127); Drs( 74,127); DRN( 74); DAG(  0, 74,  0);
			Dpn( 41, 64); Dpt( 41, 58); DAG(  0, 41,  2);
			Dpn( 42, 64); Dpt( 42, 58); DAG(  0, 42,  2);
	TR(27) Time( -1:2: 0) IsuGS(  0,  4, 58,100, 64,127, 10, 30,  0, 64, 64, 64, 64, 64, 64, 64, 64,12);Null;	// 
			Dpn( 36, 64); Dlv( 36,127);
			Dpn( 84,127); Dlv( 84,127);
			Dpn( 85,  1); Dlv( 85,127);
	TR(28) Time( -1:2:48) IsuGS( 19,  4,118,120, 64,127, 10,  0,  0, 64, 64, 64, 64, 64, 64, 63, 63,12);Null;	// 
	TR(29) Time( -1:3: 0) IsuGS(  0,  4,117,110,  1,127, 10,  0,  0, 64, 64, 64, 84, 79, 59, 59, 59,12);Null;	// 
	TR(30) Time( -1:3:48) IsuGS(  1,  4,117,110,127,127, 10,  0,  0, 64, 64, 64, 84, 79, 61, 61, 61,12);Null;	// 
	TR(31) Time( -1:4: 0) IsuGS(  5,  4,125, 50, 64,127, 80, 50, 30, 64, 64, 64, 64, 64, 64, 64, 64,12);Null;	// 
	TR(32) Time( -1:4:48) IsuGS( 17,  4, 56,120, 64,127, 80, 40,  0, 64, 64, 64, 64, 64, 64, 64, 64,12);Null;	// 
	}Case(3){
//_  GS SC-88pro
//					     BM, BL, PC,Vol,Pan,Exp,Rev,Cho,Dly,VRt,VDp,VDl,Cut,Res,Atc,Dec,Rel,BR
	TR( 1) Time( -4:1: 0) IsuGS(  0,  3,  1,100, 64,127,  0,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64,12);Null;	// 
	TR( 2) Time( -4:1:48) IsuGS(  0,  3,  1,100, 64,127,  0,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64,12);Null;	// 
	TR( 3) Time( -4:2: 0) IsuGS(  0,  3,  1,100, 64,127,  0,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64,12);Null;	// 
	TR( 4) Time( -4:2:48) IsuGS(  0,  3,  1,100, 64,127,  0,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64,12);Null;	// 
	TR( 5) Time( -4:3: 0) IsuGS(  0,  3,  1,100, 64,127,  0,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64,12);Null;	// 
	TR( 6) Time( -4:3:48) IsuGS(  0,  3,  1,100, 64,127,  0,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64,12);Null;	// 
	TR( 7) Time( -4:4: 0) IsuGS(  0,  3,  1,100, 64,127,  0,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64,12);Null;	// 
	TR( 8) Time( -4:4:48) IsuGS(  0,  3,  1,100, 64,127,  0,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64,12);Null;	// 
	TR( 9) Time( -3:1: 0) IsuGS(  0,  3,  1,100, 64,127,  0,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64,12);Null;	// 
	TR(10) Time( -3:1:48) IsuGS(  0,  3,  1,100, 64,127,  0,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64,12);Null;	// 
	TR(11) Time( -3:2: 0) IsuGS(  0,  3,  1,100, 64,127,  0,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64,12);Null;	// 
	TR(12) Time( -3:2:48) IsuGS(  0,  3,  1,100, 64,127,  0,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64,12);Null;	// 
	TR(13) Time( -3:3: 0) IsuGS(  0,  3,  1,100, 64,127,  0,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64,12);Null;	// 
	TR(14) Time( -3:3:48) IsuGS(  0,  3,  1,100, 64,127,  0,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64,12);Null;	// 
	TR(15) Time( -3:4: 0) IsuGS(  0,  3,  1,100, 64,127,  0,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64,12);Null;	// 
	TR(16) Time( -3:4:48) IsuGS(  0,  3,  1,100, 64,127,  0,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64,12);Null;	// 
//	TR(17) Time( -2:1: 0) IsuGS(  0,  3,  1,100, 64,127,  0,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64,12);Null;	// 
//	TR(18) Time( -2:1:48) IsuGS(  0,  3,  1,100, 64,127,  0,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64,12);Null;	// 
//	TR(19) Time( -2:2: 0) IsuGS(  0,  3,  1,100, 64,127,  0,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64,12);Null;	// 
//	TR(20) Time( -2:2:48) IsuGS(  0,  3,  1,100, 64,127,  0,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64,12);Null;	// 
//	TR(21) Time( -2:3: 0) IsuGS(  0,  3,  1,100, 64,127,  0,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64,12);Null;	// 
//	TR(22) Time( -2:3:48) IsuGS(  0,  3,  1,100, 64,127,  0,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64,12);Null;	// 
//	TR(23) Time( -2:4: 0) IsuGS(  0,  3,  1,100, 64,127,  0,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64,12);Null;	// 
//	TR(24) Time( -2:4:48) IsuGS(  0,  3,  1,100, 64,127,  0,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64,12);Null;	// 
//	TR(25) Time( -1:1: 0) IsuGS(  0,  3,  1,100, 64,127,  0,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64,12);Null;	// 
//	TR(26) Time( -1:1:48) IsuGS(  0,  3,  1,100, 64,127,  0,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64,12);Null;	// 
//	TR(27) Time( -1:2: 0) IsuGS(  0,  3,  1,100, 64,127,  0,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64,12);Null;	// 
//	TR(28) Time( -1:2:48) IsuGS(  0,  3,  1,100, 64,127,  0,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64,12);Null;	// 
//	TR(29) Time( -1:3: 0) IsuGS(  0,  3,  1,100, 64,127,  0,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64,12);Null;	// 
//	TR(30) Time( -1:3:48) IsuGS(  0,  3,  1,100, 64,127,  0,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64,12);Null;	// 
//	TR(31) Time( -1:4: 0) IsuGS(  0,  3,  1,100, 64,127,  0,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64,12);Null;	// 
//	TR(32) Time( -1:4:48) IsuGS(  0,  3,  1,100, 64,127,  0,  0,  0, 64, 64, 64, 64, 64, 64, 64, 64,12);Null;	// 
	}Case(2){
	}Case(1){
	}Case(-1){
	}Default{
}}
//_Rhythm Macro
$k{ n55,} $b{ n52,} $d{ n70,} $D{ n71,} $e{ n75,} $E{ n74,} $o{ n58,} $O{ n56,} $p{ n76,}
$i{ n48,} $I{ n47,} $a{ n54,} $w{ n51,} $W{ n56,} $x{ n57,} $X{ n58,}
$c{ n58,} $C{ n62,} $z{ n73,} $Z{ n74,} $t{ n95,} $T{ n96,} $h{ n36,} $H{ n47,} $G{ n48,} $g{ n43,} $j{ n41,} $J{ n42,}
$u{'n84,n85,'} $U{ n36,}
//---------------------------------------------------------------------------------------------
/** BODY **/
//_Track 10 [Ryhthm 1]
#dr13={	l16 q99	Rhythm{
	(v120	S){	k1	r1	r1	r2^4.(v-)k8(v+)
			k1	r1	r1	k2k4.(v-)k8(v+)	}
}}
#dr14={	l16 q99	Rhythm{
	(v120	S){	[2	k1	r2^4.(v-)k8(v+)]
			k2k2	k2k4.(v-)k8(v+)	k2k2	kr(v-)rk rr(v-)kr (v+)rkrr (v+)kr(v-)kr(v+)	}
//			k1	k1	k2k2	k4k4krr(v-)k(v+)k(v--)k(v+)kr	}
}}
#dr15={	l16 q99	Rhythm{
	(v120	S){	(v-)k(v-)k(v-)[8k32(v+3)]k(v+3)k(v+3) (v---)k(v+)k(v+)k(v+)k	}
}}
#dr16={	l16 q99	Rhythm{
	(v120	S){	[7	[4k4]]	[3k4]k8(v--)k8(v++)	}
}}
#dr17={	l16 q99	Rhythm{
	(v120	S){	[6	[4k4]]	[3k4]k8(v--)k8(v++)	k4k4krr(v-)k(v+)k8(v--)k8(v++)	}
	(v120	S){	[7r1]	brrr rbrr brrr rrbr	}
	(v120	S){	[7r1]	rrDr rrrD rrrr rrrr	}
	(v110	S){	[7r1]	rrrd rdrr drrr drrr	}
	(v100	S){	[7r1]	rrrr errr [2r(v--)e(v+)e(v+)e]	}
}}
#dr19={	l16 q99	Rhythm{
	(v120	S){	[6	[4k4]]	k4k4krr(v--)k(v++)kr(v-)kr(v+)	k(v---)[3k32k32(v+)] kr(v-)kr(v+) k(v---)k32k32r(v+)k(v++) kr(v-)kr(v+)	}
	(v120	S){	[7r1]	r2 brrr brrr	}
	(v120	S){	[7r1]	r2 rrDr rDrD	}
	(v110	S){	[7r1]	r2 rrrd rrdr	}
	(v100	S){	[7r1]	rrrr 	}
}}
#dr1d={	l16 q99	Rhythm{
	(v120	S){	[6	[4k4]]	[3k4]k8(v--)k8(v++)	k4k8(v--)k8(v++)krr(v--)k(v++)kr(v--)k(v-)k	}
}}

#dr1i={	l16 q99	Rhythm{
	(v120	S){	(v-)k(v-)k(v-)[8k32(v+3)]k(v+3)k(v+3) k	}
}}
#dr1k={	l16 q99	Rhythm{
	(v120	S){	k1	[2r1]	r2.rr(v--)k8(v++)
			k2.rr(v--)k8(v++)	k4.(v-)k8(v+) k4k4
			k8.k8.(v-)k8(v+) kr(v-)k(v-)k (v-)kr(v+)k(v+)k(v+)	k(v--)[14k32(v-3)][8k32(v+4)][4k(v+8)]	}
	(v100	S){	[7r1]	(Dpt2( 74, 88);)Er(y6( 82);)E(y6( 79);)E r(y6( 73);)Er(y6( 67);)E (y6( 64);)Er(y6( 58);)Er (y6( 52);)Errr	}
}}
#dr1r={	l16 q99	Rhythm{
	(v110	S){	[4	Orrr rrrr OrOr rrrr	:	Orrr rrrr OrOr rrrr]	Orrr rrrr OrOr rrrr	}
	(v100	S){	[4	rror rror rrrr rror	:	rror rror rrrr rror]	rror rror rrrr rror	}
	(v80	S){	[4	rrro rrrr rorr rrrr	:	rrro rrrr rorr rrrr]	rrro rrrr rorr rrrr	}
	(v100	S){	[4	rrrr prrr rrrr prrr	:	rrrr prrr rrrr prrp]	rrrr prrr rprr prrp	}
	(v80	S){	[4	rrrr rrrr rrrr rrrr	:	rrrr rrrr rrrr rrrr]	rrrr rrrr rrrr rrdr	}
	(S{	y71(89); [2 y74.T=32,64,!1,64,1,!1^1,1,32,!1; [4r1]]	})
}}
#dr1s={	l16 q99	Rhythm{
	(v110	S){	[4	Orrr rrrr OrOr rrrr	:	Orrr rrrr OrOr rrrr]	Orrr rrrr OrOr rrrr	}
	(v100	S){	[4	rror rror rrrr rror	:	rror rror rrrr rror]	rror rror rrrr rrrr	}
	(v80	S){	[4	rrro rrrr rorr rrrr	:	rrro rrrr rorr rrrr]	rrro rrrr rorr rrrr	}
	(v100	S){	[4	rrrr prrr rrrr prrr	:	rrrr prrr rrrr prrp]	rrrr prrr rprr prrr	}
	(v80	S){	[4	rrrr rrrr rrrr rrrr	:	rrrr rrrr rrrr rrrr]	rrrr rrrd rrrr rrrr	}
	(S{	[2 y74.T=32,64,!1,64,1,!1^1,1,32,!1; [4r1]] y71(64);y74(64)	})
	(S{	p%=-683;[2r1]	p%=-1365;[2r1]	p%=-2048;[2r1]	p%=-2729;[2r1]	p%=0;	})
}}
#dr1t={	l16 q99	Rhythm{
	(v120	S){	r1	r2 (v-)[2k32(v-)]k(v+30)k(v-)[2k32(v-)]k(v+30)k(v-)[2k32(v-)]k	}
}}
#dr1u={	l16 q99	Rhythm{
	(v120	S){	[3	k2.r8(v-)k8(v+)]	k4.(v-)k8(v+)k4k4
			[2	k2.r8(v-)k8(v+)]	[2k4.(v-)k8(v+)]	k4k4krr(v--)k(v++)kr(v-)k(v+)r	}
}}
#dr1v={	l16 q99	Rhythm{
	(v120	S){	[3	k4k4krr(v--)k(v++)kr(v-)k(v+)r]	k4k4krr(v--)k(v++)kr(v-)k(v-)k(v++)
			[2	k4k4krr(v--)k(v++)kr(v-)k(v+)r]	[2krr(v--)k(v++)kr(v-)k(v+)r]	k4k8(v-)k8(v+)k(v--)krk(v++)kr(v-)k(v-)k(v++)	}
}}
#dr1w={	l16 q99	Rhythm{
	(v120	S){	[7krr(v--)krr(v+)kr(v+)] krr(v--)krr(v+)k(v-)k(v++)
			[2	[4kr(v-)k(v-)k(v++)]]	[8k(v--)k(v++)]	k(v-28)[14k32(v-3)][12k32(v+5)]k(v+)k	}
}}
#dr1x={	l16 q99	Rhythm{
	(v120	S){	OrrO rrOr rOrr OrOr	}
}}

//_Track 11 [Ryhthm 2]
#dr23={	l16 q99	Rhythm{
	(v110	S){	[8	arr(v--)a(v++) ar(v-)ar(v+) a(v---)a(v+++)r(v--)a(v++) ar(v--)ar(v++)]	}
}}
#dr25={	l16 q99	Rhythm{
	(v110	S){	a4	}
}}
#dr26={	l16 q99	Rhythm{
	(v120	S){	[2	r4w4r4 wrr(v--)w(v++)		r4w4r4 wr(v-)wr(v+)
				r4w4r4 wrr(v--)w(v++)	:	r4w4 rr(v--)wr(v++) (v--)w(v++)wr(v-)w(v+)]
									r4 wrr(v--)w rwrr(v++) w4	}
}}
#dr27={	l16 q99	Rhythm{
	(v120	S){	[2	r4w4r4 wrr(v--)w(v++)		r4w4r4 wr(v-)wr(v+)
				r4w4r4 wrr(v--)w(v++)	:	r4w4 rr(v--)wr(v++) (v--)w(v++)wr(v-)w(v+)]
									/*r4 wrr(v--)w rwrr(v++) w4*/	}
	(v110	S){	[6r1]	Wrrr rrrr WrWr rrWr	}
	(v110	S){	[6r1]	rrrx rrxr rxrr rrrx	}
	(v110	S){	[6r1]	rrXr Xrrr rrrr Xrrr 	}
}}
#dr29={	l16 q99	Rhythm{
	(v120	S){	[2	r4w4r4 wrr(v--)w(v++)		r4w4r4 wr(v-)wr(v+)
				r4w4r4 wrr(v--)w(v++)	:	r4w4 rr(v--)wr(v++) (v--)w(v++)wr(v-)w(v+)]
									r4 wrr(v--)w /*rwrr(v++) w4*/	}
}}
#dr2c={
	S{	#dr23	}
	S{	#dr26	}
		l16 q99	Rhythm{
}}
#dr2d={
	S{	#dr23	}
	S{	#dr29	}
		l16 q99	Rhythm{
}}
#dr2s={	l16 q99	Rhythm{
	(v110	S){	[8	arr(v--)a(v++) ar(v-)ar(v+) a(v---)a(v+++)r(v--)a(v++) a:r(v--)ar(v++)]	}
}}

//_Track 26 [Ryhthm 3]
#dr33={	l16 q99	Rhythm{
	(v120	S){	r-4z4	}
	(v120	S){	r-4Z4	}
	(v100	S){	c1	}
	(v100	S){	C1	}
}}
#dr34={	l16 q99	Rhythm{
	(v100	S){	c1	r1	r1	r1		r1	r1	c2r2	c4.c8r4c4	}
	(v100	S){	C1	r1	r1	r1		C1	r1	r2C2	C4.r8C4r4	}
}}
#dr35={	l16 q99	Rhythm{
	(v100	S){	c1	}
	(v100	S){	C1	}
}}
#dr36={	l16 q99	Rhythm{
	(v120	S){	r-4z4	}
	(v120	S){	r-4Z4	}
	(v100	S){	c1	r1	r1	r1		r1	r1	r1	r2.c4	}
	(v100	S){	C1	r1	r1	r1		C1	r1	r1	r2.r4	}
	(v70	S){	[2	[2	[2r4g4]	:	r4g4r4(v-30)g(v+30)gr8]	r4g4r8.(v-60)g(v+30)g(v+30)gr8]	}
}}
#dr37={	l16 q99	Rhythm{
	(v100	S){	c1	r1	r1	r1		r1	r1	c2r2	c4.c8r4c4	}
	(v100	S){	C1	r1	r1	r1		C1	r1	r2C2	C4.r8C4r4	}
	(v80	S){	[2	[3	[2r4t4]]	:	r4t4r4t8T8]	}
	(v70	S){	[2	[2	[2r4g4]	:	r4g4r4(v-30)g(v+30)gr8]	:	r4g4r8.(v-60)g(v+30)g(v+30)gr8]	}
}}
#dr38={	l16 q99	Rhythm{
	(v100	S){	c1	r1	r1	r1		r1	r1	r1	r2.c4	}
	(v100	S){	C1	r1	r1	r1		C1	r1	r1	r2.r4	}
	(v80	S){	[2	[3	[2r4t4]]	r4t4r4t8T8]	}
	(v110	S){	[8	[2hrHrhrHG]]	}
	(v70	S){	[8	[4 (v-40)g(v+20)g(v+20)g(v-20)g(v+20)]]	}
}}
#dr39={	l16 q99	Rhythm{
	(v100	S){	c1	r1	r1	r1		r1	r1	c2r2	c4c4r4.c8	}
	(v100	S){	C1	r1	r1	r1		C1	r1	r2C2	C4r4C4.r8	}
	(v80	S){	[2	[3	[2r4t4]]	:	r4t4r4t8T8]	r4t4	}
	(v110	S){	[7	[2hrHrhrHG]]	hrHrhrHG	}
	(v70	S){	[7	[4 (v-40)g(v+20)g(v+20)g(v-20)g(v+20)]]	[2 (v-40)g(v+20)g(v+20)g(v-20)g(v+20)]	}
}}
#dr3b={	l16 q99	Rhythm{
	(v100	S){	c1	r1	r1	r1		r1	r1	c2r2	c4.c8r4c4	}
	(v100	S){	C1	r1	r1	r1		C1	r1	r2C2	C4.r8C4r4	}
	(v80	S){	[2	[3	[2r4t4]]	:	r4t4r4t8T8]	}
	(v110	S){	[7	[2hrHrhrHG]]	}
	(v70	S){	[7	[4 (v-40)g(v+20)g(v+20)g(v-20)g(v+20)]]	}
}}
#dr3c={	l16 q99	Rhythm{
	(v100	S){	c1	r1	r1	r1		r1	r1	r1	r2.c4	}
	(v100	S){	C1	r1	r1	r1		C1	r1	r1	r2.r4	}
	(v80	S){	[2	[3	[2r4t4]]	r4t4r4t8T8]	}
	(v70	S){	[2	[2	[2r4g4]	:	r4g4r4(v-30)g(v+30)gr8]	r4g4r8.(v-60)g(v+30)g(v+30)gr8]	}
}}
#dr3d={	l16 q99	Rhythm{
	(v100	S){	c1	r1	r1	r1		r1	r1	c1	r2c4r4	}
	(v100	S){	C1	r1	r1	r1		C1	r1	r1	C2r4C4	}
	(v80	S){	[2	[3	[2r4t4]]	r4t4r4t8T8]	}
	(v70	S){	[2	[2	[2r4g4]	:	r4g4r4(v-30)g(v+30)gr8]	r4g4r8.(v-60)g(v+30)g(v+30)gr8]	}
}}
#dr3f={
	S{	#dr3b	}
		l16 q99	Rhythm{
	(v120	S){	[7r1]	r2.z4	}
	(v120	S){	[7r1]	r2.Z4	}
}}
#dr3k={	l16 q99	Rhythm{
	(v120	S){	r-4z4	}
	(v120	S){	r-4Z4	}
	(v100	S){	c1	r1	r1	r2c2		r1	r1	c2r4c4	c1	}
	(v100	S){	C1	r1	r1	r1		C1	r1	r2C4r4	C1	}
}}
#dr3m={	l16 q99	Rhythm{
	(v100	S){	c1	r1	r1	r1		r1	r1	c2r2	c4.c8r4c4	}
	(v100	S){	C1	r1	r1	r1		C1	r1	r2C2	C4.r8C4r4	}
	(v80	S){	[2	[3	[2r4t4]]	r4t4r4t8T8]	}
	(v110	S){	[8	[2hrHrhrHG]]	}
	(v70	S){	[8	[4 (v-40)g(v+20)g(v+20)g(v-20)g(v+20)]]	}
}}
#dr3r={	l16 q99	Rhythm{
	(v120	S){	r-4z4	}
	(v120	S){	r-4Z4	}
	(v120	S){	[8 jrjr JrjJ jJjr JrjJ]	}
	(v100	S){	c1	r1	r1	r2.c4		r1	r1	r1	r1	}
	(v100	S){	C1	r1	r1	r1		C1	r1	r1	r2.C4	}
}}
#dr3s={	l16 q99	Rhythm{
	(v120	S){	[8 jrjr JrjJ jJjr J:rjJ]	}
	(v100	S){	c1	r1	r1	r2.c4		r1	r1	c2.c4	c1	}
	(v100	S){	r1	r1	r1	r1		C1	r1	C2.r4	C1	}
	(S{	p%=-683;[2r1]	p%=-1365;[2r1]	p%=-2048;[2r1]	p%=-2729;[2r1]	p%=0;	})
}}
#dr3u={	l16 q99	Rhythm{
	(v120	S){	r-4z4	}
	(v120	S){	r-4Z4	}
	(v100	S){	c1	r1	r1	r1		r1	r1	r1	r2.c4	}
	(v100	S){	C1	r1	r1	r1		C1	r1	r1	r2.r4	}
}}
#dr3v={	l16 q99	Rhythm{
	(v100	S){	c1	r1	r1	r1		c1	r1	r1	c2c4r4	}
	(v100	S){	C1	r1	r1	r1		r1	r1	C1	C2r4C4	}
}}
#dr3w={	l16 q99	Rhythm{
	(v100	S){	c1	c1	r2c2	r2c4r4		c2c2	r4c4r4c4	c4.r8c4r4	c1	}
	(v100	S){	C1	r1	C2r2	C2r4C4		C1	C4r4C4r4	C4.C8r4C4	C1	}
}}
#dr3x={	l16 q99	Rhythm{
	(v120	S){	r-4z4	r2.z4	}
	(v120	S){	r-4Z4	r2.Z4	}
	(v100	S){	c1	}
	(v100	S){	C1	}
}}

//_Track 27 [Ryhthm 4]
#dr45={	l16 q99	Rhythm{
	(v90	S){	r2.u4	}
}}
#dr47={	l16 q99	Rhythm{
	(v127	S){	[6r1]	r2^4.U4	}
}}

//_Track  1 [Shakuhachi]
#shk1={	o5 v110 l8 q99
	r-2^8 a->Ben(-683,!16);d-4 Ben(-683,!16);g-4<
	Ben(-384,!8);b-4.>S{p%=-1365;r16 p%=0;}e-< Ben(-384,!8);S{r4 y11.T=127,119,!4,119,103,!4;}b-2
	^4r y11(127); b-> Ben(-683,!16);f4 Ben(384,!16);d-4
	Ben(-384,!8);e-4.S{p%=-1365;r16 p%=0;}a- Ben(-384,!8);S{r4 y11.T=127,119,!4,119,103,!4;}e-2
	^4r y11(127); e- Ben(-683,!16);g-4 Ben(384,!16);d-4<
	Ben(-384,!8);b-4.>S{p%=-1365;r16 p%=0;}e-< Ben(-384,!8);S{r4 y11.T=127,119,!4,119,103,!4;}b-2
	^4r y11(127); >f Ben(384,!16);e-4< Ben(384,!16);b-4
	Ben(-384,!8);>d-4.S{p%=-683;r16 p%=0;}d- Ben(-384,!8);S{r4 y11.T=127,119,!4,119,103,!4;}a-2
	^4r y11(127);
//	r-2^8 a->d-4g-4<
//	b-4.>d-16e-16<b-2
//	^4rb->f4d-4
//	e-4.g-16a-16e-2
//	^4re-g-4d-4<
//	b-4.>d-16e-16<b-2
//	^4r>fe-4<b-4
//	>d-4.c16d-16a-2
//	^4
}
#shk2={	o5 v110 l8 q99
	r-2^8 >f Ben(384,!16);e-4< Ben(384,!16);a-4
	Ben(-384,!8);b-4.>S{p%=-1365;r16 p%=0;}e-< Ben(-384,!8);S{r4 y11.T=127,119,!4,119,103,!4;}b-2
	^4r y11(127); b->Ben(-683,!16);f4 Ben(384,!16);d-4
	Ben(-384,!8);e-4.S{p%=-1365;r16 p%=0;}a- Ben(-384,!8);S{r4 y11.T=127,119,!4,119,103,!4;}e-2
	^4r y11(127); e- Ben(-683,!16);g-4 Ben(384,!16);d-4
	Ben(-384,!8);e-4.S{p%=-1365;r16 p%=0;}e- Ben(-683,!16);g-4 Ben(-683,!16);b-4
	Ben(-384,!8);a-4.S{p%=3412;r16 p%=0;}c Ben(-683,!16);e-4< Ben(384,!16);a-4
	Ben(-683,!8);S{r2 y11.T=127,119,!2,119,103,!2,103,79,!2;}b-1^1 r y11(127);
//	r-2^8 >fe-4<a-4
//	b-4.>d-16e-16<b-2
//	^4rb->f4d-4
//	e-4.g-16a-16e-2
//	^4re-g-4d-4
//	e-4.d-16e-16g-4b-4
//	a-4.f16c16e-4<a-4
//	b-1
}
#shkC={	o5 v110 l8 q99
	r-4 b->d-
	Ben(-384,!8);S{r4. y11.T=127,113,!4;}e-2^8r y11(127);S{p%=-2048;r16 p%=0;r16 p%=1365;r16 p%=0;}g-4
	S{p%.T=981,1365,!8;r2 p%.T=1365,0,!64;}S{r2 y11.T=127,119,!4,119,111,!8;}d-2^4.r y11(127);<
	Ben(-256,!16);b-4.b- Ben(-256,!16);>d-4<b-g-
	Ben(-256,!16);a-4>d-e- Ben(-384,!8);<b-4.r
	Ben(-256,!16);a-4.a- Ben(-256,!16);>d-4<b->d-
	Ben(-256,!16);e-8.d-16,95e-,75g-,75 Ben(-256,!16);e-4 Ben(256,!16);d-4
	Ben(-384,!8);S{r4. y11.T=127,113,!4;}<b-2^8r y11(127);S{p%=-2048;r16 p%=0;r16 p%=1365;r16 p%=0;}>d-4
	Ben(-384,!8);S{r4. y11.T=127,113,!4;}e-2^8r y11(127);
//	r-4 b->d-
//	e-2^8re-16g-16a-16g-16
//	e-2d-4.r<
//	b-4.b->d-4<b-g-
//	a-4>d-e-<b-4.r
//	a-4.a->d-4<b->d-
//	e-8.d-16e-g-e-4d-4
//	<b-4.rb->d-e-d-
//	e-2^8r
}
#shkD={	o5 v110 l8 q99
	r-4 b->d-
	Ben(-384,!8);S{r4. y11.T=127,113,!4;}e-2^8r y11(127);S{p%=-2048;r16 p%=0;r16 p%=1365;r16 p%=0;}g-4
	Ben(-384,!8);S{r4. y11.T=127,113,!4;}e-2^8r y11(127);S{p%=-2048;r16 p%=0;r16 p%=1365;r16 p%=0;}g-4
	Ben(-384,!8);S{r4. y11.T=127,113,!4;}d-2^8r y11(127);S{r16 p%=1365;r16 p%=3412;r16 p%=0;}d-4
	S{p%.T=981,1365,!8;r2 p%.T=1365,0,!64;}S{r2 y11.T=127,119,!4,119,111,!8;}d-2^4.r y11(127);<
	Ben(-256,!16);a-4.b- Ben(-256,!16);>d-4<b->d-
	Ben(-256,!16);e-4d-g- Ben(-384,!16);a-4.r
	Ben(-384,!16);a-4.S{p%=-1354;r16 p%=0;}a-g-d-<b->d-
	Ben(-384,!8);e-4.r Ben(-384,!16);g-4 Ben(-384,!16);a-4
	Ben(-384,!8);S{r2 y11.T=127,119,!2,119,103,!2,103,79,!2;}b-1^1 r y11(127);
//	r-4 b->d-
//	e-2^8re-16g-16a-16g-16
//	e-2^8re-16g-16a-16g-16
//	d-2^8rd-16e-16g-16d-16
//	e-2d-4.r<
//	a-4.b->d-4<b->d-
//	e-4d-g-a-4.r
//	a-4.g-16a-16g-d-<b->d-
//	e-4.rg-4a-4
//	b-1
}

//_Track  2 [Bass 1]
#bs1sp1={	v120 l16 q85	#?1r>#?1^<	}
#bs1sp2={	v120 l16 q85	#?1#?1>#?1^<	}
#bs1p1={	#bs1sp1(#?1) #bs1sp1(#?1) #bs1sp2(#?1) #bs1sp2(#?1)	}
#bs1p2={	#bs1sp1(#?1) #bs1sp1(#?1) #bs1sp2(#?1) #bs1sp2(#?2)	}
#bs13={	o2 v120 l16 q85
	[2	#bs1p1({g-})	#bs1p1({a-})	#bs1p1({b-})	#bs1p2({b-},{a-})]
}
#bs14={	o2 v120 l16 q85
	[2	#bs1p1({g-})	#bs1p1({a-})	#bs1p1({b-}) :	#bs1p2({b-},{a-})]	#bs1p1({b-})
}
#bs15={	o2 v120 l16 q85
	b-2.p%.T=8192,0,!4;b-4
}
#bs16={	o3 v120 l16 q75
	[2	[3	[2 rra-,99e-d-,99e-^,99e-]]	:	rra-,99e-d-,99e-^,99e- rra-,99e-d-,99e-^,99g-]
									rra-,99e-d-,99e-^,99e- rre-,99a-d-,99e-^,99d-
}
#bs19={	o3 v120 l16 q75
	[2	[3	[2 rra-,99e-d-,99e-^,99e-]]	:	rra-,99e-d-,99e-^,99e- rra-,99e-d-,99e-^,99g-]
									rra-,99e-d-,99e-^,99e- rrd-,99a-d-,99f ^,99<a-
}
#bs1a={	o2 v120 l16 q75
	[2	[2 rrb-,99g-f,99g-^,99g-]			[2 rr>d-,99<a-g-,99a-^,99a-]
		[2 rr>e-,99<b-a-,99b-^,99b-]		:	rr>e-,99<b-a-,99b-^,99b- rr>d-,99<a-g-,99a-^,99>c<]
									rr>e-,99<b-a-,99b-^,99b- rra-,99>d-<g-,99a-^,99g-
}
#bs1b={	o2 v120 l16 q75
	[2	[2 rrb-,99g-f,99g-^,99g-]			[2 rr>d-,99<a-g-,99a-^,99a-]
		[2 rr>e-,99<b-a-,99b-^,99b-]		:	rr>e-,99<b-a-,99b-^,99b- rr>d-,99<a-g-,99a-^,99>c<]
									rr>e-,99<b-a-,99b-^,99b- rrb-,99>e-<a-,99b-^,99>d-<
}
#bs1c={	o3 v120 l16 q75
	[2	[2	[2 rra-,99e-d-,99e-^,99e-]]
			[2 rre-,99<b-a-,99b-^,99b->]	:	[2 rre-,99<b-a-,99b-^,99b->]]	rre-,99<b-a-,99b-^,99b-> rrf,99c<a-,99>c^,99c
}
#bs1d={	o3 v120 l16 q75
	[2	[2	[2 rrg-,99d-<b-,99>d-^,99d-]]
			[2 rrd-,99<a-g-,99a-^,99a->]	:	[2 rrd-,99<a-g-,99a-^,99a->]]	rre-,99<b-a-,99b-^,99b-> rrb-,99g-f,99g-^,99g-
}
#bs1f={	o3 v120 l16 q75
	[2	[2	[2 rrg-,99d-<b-,99>d-^,99d-]]
			[2 rrd-,99<a-g-,99a-^,99a->]	:	[2 rrd-,99<a-g-,99a-^,99a->]]	rre-,99<b-a-,99b-^,99b-> rra-,99e-d-,99e-^,99e-
}
#bs1i={	o2 v120 l16 q85
	b-2
}
#bs1k={	o2 v120 l16 q85
	#bs1p1({g-})	#bs1p1({a-})	#bs1p1({d-})	#bs1p1({e-})
	#bs1p1({g-})	#bs1p1({a-})	#bs1p2({b-},{>d-<})	>e-2
}
#bs1l={	o3 v120 l16 q75
	[2 <rrb-,99g-f,99g-^,99g->]	[2 rrd-,99<a-g-,99a-^,99a->]
	[2 rrg-,99d-<b-,99>d-^,99d-]	[2 rra-,99e-d-,99e-^,99e-]
	[2 <rrb-,99g-f,99g-^,99g->]	[2 rrd-,99<a-g-,99a-^,99a->]
	[2 rre-,99<b-a-,99b-^,99b->]	rre-,99<b-a-,99b-^,99b-> rrd-,99g-<b-,99>d-^,99d-
}
#bs1m={	o3 v120 l16 q75
	[2 <rrb-,99g-f,99g-^,99g->]	[2 rrd-,99<a-g-,99a-^,99a->]
	[2 rrg-,99d-<b-,99>d-^,99d-]	[2 rra-,99e-d-,99e-^,99e-]
	[2 <rrb-,99g-f,99g-^,99g->]	[2 rrd-,99<a-g-,99a-^,99a->]
	rre-,99<b-a-,99b-^,99b-> rrg-,99d-<b-,99>d-^,99d-	rra-,99e-d-,99e-^,99e- rre-,99a-d-,99e-^,99d-
}
#bs1x={	o1 v120 l16 q75
	d-^^e-^^g-^^a-^^b-^>d-^
}

//_Track  3 [Bass 2]
#bs2sp1={	v120 l8 q80		r#?1	}
#bs2p1={	v120 l8 q80		[4 #bs2sp1(#?1)]	}
#bs2p2={	v120 l8 q80		[2 #bs2sp1(#?1)] [2 #bs2sp1(#?2)]	}
#bs2p3={	v120 l8 q80		[3 #bs2sp1(#?1)] #bs2sp1(#?2)	}
#bs23={	o3 v120 l16 q85
	[2	#bs2p1({g-})	#bs2p1({a-})	#bs2p1({b-})	#bs2p2({b-},{a-})]
}
#bs24={	o3 v120 l16 q85
	[2	#bs2p1({g-})	#bs2p1({a-})	#bs2p1({b-}) :	#bs2p2({b-},{a-})]	#bs2p1({b-})
}
#bs25={	o3 v120 l16 q85
	b-2
}
#bs26={	o3 v120 l16 q85
	[8	#bs2p1({e-})]
}
#bs29={	o3 v120 l16 q85
	[7	#bs2p1({e-})]	#bs2p2({e-},{f})
}
#bs2c={	o3 v120 l16 q85
	[2	[2	#bs2p1({e-})] <	#bs2p1({b-})	:	#bs2p1({b-}) >]	#bs2p2({b-},{'>c<'})
}
#bs2d={	o3 v120 l16 q85
	[2	[2	#bs2p1({d-})] <	#bs2p1({a-})	:	#bs2p1({a-}) >]	#bs2p2({b-},{'>g-<'})
}
#bs2f={	o3 v120 l16 q85
	[2	[2	#bs2p1({d-})] <	#bs2p1({a-})	:	#bs2p1({a-}) >]	#bs2p2({b-},{'>e-<'})
}
#bs2k={	o3 v120 l16 q85
	#bs2p1({g-})	#bs2p1({a-})	#bs2p1({d-})	#bs2p1({e-})
	#bs2p1({<g->})	#bs2p1({<a->})	#bs2p2({<b->},{d-})	e-2
}
#bs2l={	o3 v120 l16 q85
	#bs2p1({g-})	#bs2p1({a-})	#bs2p1({d-})	#bs2p1({e-})
	#bs2p1({<g->})	#bs2p1({<a->})	#bs2p1({<b->})	#bs2p2({<b->},{d-})
}
#bs2m={	o3 v120 l16 q85
	#bs2p1({g-})	#bs2p1({a-})	#bs2p1({d-})	#bs2p1({e-})
	#bs2p1({<g->})	#bs2p1({<a->})	#bs2p2({<b->},{d-})	#bs2p1({e-})
}
#bs2x={	o2 v120 l16 q85
	d-^^e-^^g-^^a-^^b-^>d-^
}

//_Track  4 [Koto]
#kt12={	o4 v110 l8 q399	r-%3
	<v--g-16v+a-16v+>d-r2v-g-rv+	v-b-16v+>e-8.<r2.
	<v--a-16v+>c16v+e-r2v-b-rv+		v->d-16v+f8.<r2.
	<v--b-16v+>d-16v+e-r2v-g-b-v+	>e-4v-d-4v-<a-4.rv++
	v_.T=-20,-5,!1;<e-b->d-e-a-b->d-a-	v+5b-r<
}
#kt1p1={	l16	r- v---- #?1 v++++ #?1^ r #?1^ r v-- #?1 r v++	}
#kt16={	o5 v110 l8 q399	r-%5
	#kt1p1(b-)	#kt1p1(g-) <	#kt1p1(b-) >	#kt1p1(e-)
	#kt1p1(b-)	#kt1p1(g-) <	#kt1p1(a-) >	#kt1p1(d-)
	#kt1p1(b-)	#kt1p1(g-) <	#kt1p1(b-) >	#kt1p1(f)
	#kt1p1(b-)	#kt1p1(g-)		#kt1p1(a-) >	#kt1p1(d-) <
}
#kt1j={	o5 v110 l8 q399	r-%5
	r-2b-a-g-<b->
	d-4.rb-a-g-<b->	e-4.rb-a-g-a-	e-4.rb-a-g-d-	e-4.rb-a-g-e-
	d-4.rb-a-g-a-	d-4.rb-a-g-d-	e-4d-e-d-4<a-4	b-4.r
}
#kt1k={	o5 v110 l8 q399	r-%5
	r-2b-a-g-<b->
	d-4.rb-a-g-<b->	e-4.rb-a-g-a-	e-4.rb-a-g-d-	e-4.rb-a-g-e-
	d-4.rb-a-g-a-	d-4.rb-a-g-d-	e-4d-e-g-a-b->d-	e-4.r
}
#kt1x={	o6 v110 l8 q399	r-%5
	S{ t2	<a-8.b-8.>d-8.e-8.fa- t0	}
		<d-8.e-8.g-8.a-8.b->d-
}
#kt1y={	o6 v110 l8 q399	r-%5
	#kt1p1(e-)	#kt1p1(d-) <	#kt1p1(b-)		#kt1p1(g-) >
	#kt1p1(g-)	#kt1p1(e-)		#kt1p1(d-) <	#kt1p1(a-) >
	#kt1p1(e-)	#kt1p1(d-) <	#kt1p1(b-) >	#kt1p1(d-)
	#kt1p1(e-)	#kt1p1(g-)		#kt1p1(a-)		#kt1p1(b-)
}
#kt1z={	o6 v110 l8 q399	r-%5
	#kt1p1(e-)	#kt1p1(d-) <	#kt1p1(b-)		#kt1p1(g-) >
	#kt1p1(g-)	#kt1p1(e-)		#kt1p1(d-) <	#kt1p1(a-) >
	#kt1p1(e-)	#kt1p1(d-) <	#kt1p1(b-) >	#kt1p1(d-)
	#kt1p1(g-)	#kt1p1(b-) >	#kt1p1(d-)		#kt1p1(e-) <
}

//_Track  5 [Shinobue]
#sb1a={	o7 v110 l8 q97
	Ben(-256,!16);e-8.d-16e-,50e-,50 S{p%=1365;r16 p%=0;}d-8.e-16 Ben(-256,!16);g-a-,90
	Ben(-256,!16);b-8.,90b-16a-,50 Ben(-256,!16);a-g-,50 Ben(-256,!16);g- Ben(-384,!16);e-8.r16
	Ben(-256,!16);d-8.<b-16>d-,50, Ben(-256,!16);d-,90d-16<b->d-16e- Ben(-256,!16);g-,90
	a-16,90 Ben(-256,!16);a-a-16,90g-,50 Ben(-256,!16);g-d-,50 Ben(-256,!16);d- Ben(-384,!16);e-8.r16
	Ben(-256,!16);<a-8.g-16a-,50 Ben(-256,!16);>d-,50<b-,75a-,75b-,75>d-,75
	Ben(-256,!16);e-8.d-16e-,50 Ben(-256,!16);g-a-,50g-,50 Ben(-384,!16);a-8.r16
	Ben(-256,!16);a-8.,90a-16g-,50 Ben(-256,!16);g-e-,50 Ben(-256,!16);e-d-,50 Ben(-256,!16);d-
	Ben(-256,!16);<b-8.>d-16<b-,50 Ben(-256,!16);>d-,50<b-,75>d-,75e-,75g-,75
//	e-8.d-16e-,50e-,50e-16d-e-16g-a-,90
//	b-8.,90b-16a-,50a-g-,50g-e-8.r16
//	d-8.<b-16>d-,50,d-,90d-16<b->d-16e-g-,90
//	a-16,90a-a-16,90g-,50g-d-,50d-e-8.r16
//	<a-8.g-16a-,50>d-,50<b-,75a-,75b-,75>d-,75
//	e-8.d-16e-,50g-a-,50g-,50a-r
//	a-8.,90a-16g-,50g-e-,50e-d-,50d-
//	<b-8.>d-16<b-,50>d-,50<b-,75>d-,75e-,75g-,75
}
#sb1b={	o7 v110 l8 q97
	Ben(-384,!8);S{r2 y11.T=127,119,!4,119,111,!8;}a-2^4. y11(127);Ben(-384,!16);b-
	Ben(-384,!8);S{r4 y11.T=127,119,!8;}a-4. y11(127);S{p%.T=981,1365,!16;r p%.T=1365,0,!64;}S{r4 y11.T=127,111,!4;} g-2r y11(127);
	e-16,90e-,90e-16d-,50 Ben(-256,!16);d-<b-,50 Ben(-256,!16);b->d-,50 Ben(-256,!16);d-
	a-16,90a-,90a-16g-,50 Ben(-256,!16);g-e-,50 Ben(-256,!16);e- Ben(-384,!16);d-8.r16
	<b-16,90b-,90b-16a-,50 Ben(-256,!16);>d-e-,75d-,75<b-,75>d-,75
	e-16,90e-,90e-16d-,50 Ben(-256,!16);e-g-,50a-,50 Ben(-384,!16);b-8.r16
	S{p%=1365;r16 p%=0;r16 p%=1365;r16 p%=0;}g-4e-,50, Ben(-256,!16);g- S{p%=1365;r16 p%=0;r16 p%=1365;r16 p%=0;}g-4e-,50, Ben(-256,!16);g-
	S{p%=1365;r16 p%=0;r16 p%=1365;r16 p%=0;}g-4e-,50, S{p%=1365;r16 p%=0;}g-d-,50e-,50g-,50a-,50
	Ben(-384,!8);S{r2 y11.T=127,119,!4,119,103,!4;}b-1 r y11(127);
//	a-2^4.b-
//	a-4.a-g-4.r
//	e-16,90e-,90e-16d-,50d-<b-,50b->d-,50d-
//	a-16,90a-,90a-16g-,50g-e-,50e-d-r
//	<b-16,90b-,90b-16a-,50>d-e-,75d-,75<b-,75>d-,75
//	e-16,90e-,90e-16d-,50e-g-,50a-,50b-r
//	a-16g-16a-16g-16e-,50,g-a-16g-16a-16g-16e-,50,g-
//	a-16g-16a-16g-16e-,50,a-16g-16d-,50e-,50g-,50a-,50
//	b-2
}
#sb1E={	o7 v110 l8 q97
	Ben(-256,!16);g-8.,90g-16,90e-,50 Ben(-256,!16);g- Ben(-256,!16);a-8.g-16,90a-,50 Ben(-256,!16);a-
	Ben(-256,!16);>e-8.,90e-16,90d-,50 Ben(-256,!16);<b-a-,75g-,75 Ben(-256,!16);d-8.r16
	Ben(-256,!16);e-8.,90e-16,90d-,50 Ben(-256,!16);e-g-,75e-,75d-,75<b-,75>
	Ben(-256,!16);d-8.e-16,90d-,50 Ben(-256,!16);<b-a-,75g-,75 Ben(-256,!16);a-8.r16
	Ben(-256,!16);b-8.,90b-16,90a-,50 Ben(-256,!16);>d-e-,75d-,75<b-,75a-,75
	Ben(-256,!16);b-8.,90b-16,90a-,50 Ben(-256,!16);>d-e-,75d-,75 Ben(-256,!16);e-8.r16
	a-16,90a-,90a-16,75g-,50 Ben(-256,!16);g-e-,50 Ben(-256,!16);e- Ben(-256,!16);d-8.r16
	Ben(-256,!16);<b-8.>d-16,90<b-,50 Ben(-256,!16);>d-<a-,75b-,75>d-,75g-,75
//	g-8.,90g-16,90e-,50g-a-8.g-16,90a-,50a-
//	>e-8.,90e-16,90d-,50<b-a-,75g-,75d-8.r16
//	e-8.,90e-16,90d-,50e-g-,75e-,75d-,75<b-,75>
//	d-8.e-16,90d-,50<b-a-,75g-,75a-8.r16
//	b-8.,90b-16,90a-,50>d-e-,75d-,75<b-,75a-,75
//	b-8.,90b-16,90a-,50>d-e-,75d-,75e-8.r16
//	a-16,90a-,90a-16,75g-,50g-e-,50e-d-8.r16
//	<b-8.>d-16,90<b-,50>d-<a-,75b-,75>d-,75g-,75
}
#sb1F={	o7 v110 l8 q97
	Ben(-384,!8);e-4.e- Ben(-256,!16);g-8.,90g-16,90e-,50 Ben(-256,!16);g-
	S{r16 p%=1365;r16 p%=0;}a-4 Ben(-256,!16);g- S{p%=1365;r16 p%=0;}d- S{Ben(-256,!16);r p%=1365;r16 p%=0;}d-4 Ben(-256,!16);<b-8.r16
	a-16,90a-,90a-16b-,50 Ben(-256,!16);b-> S{Ben(-256,!16);r p%=-2048;r16 p%=0;}d-4 Ben(-256,!16);e-d-
	e-16,90e-,90e-16 Ben(-256,!16);d- S{p%=-2048;r16 p%=0;}g- S{Ben(-256,!16);r p%=-1365;r16 p%=0;}a-4 Ben(-256,!16);b-8.r16
	>e-16,90e-d-16 Ben(-256,!16);<b- S{p%=1365;r16 p%=0;}g- S{Ben(-256,!16);r p%=1365;r16 p%=0;}a-4g-,75 Ben(-256,!16);e-
	Ben(-256,!16);d- S{p%=-2048;r16 p%=0;}g- Ben(-256,!16);a- S{p%=2048;r16 p%=0;}e- S{p%=-1365;r16 p%=0;}e- S{r16 p%=1365;r16 p%=0;}g-4r
	a-16,90a-,90a-16 Ben(-256,!16);g- S{p%=1365;r16 p%=0;}d- S{Ben(-256,!16);r p%=2048;r16 p%=0;}e-4 d-,75 Ben(-256,!16);<b->
	S{Ben(-256,!16);r p%=-1365;r16 p%=0;}e-4g-,75a-b-a-16>e-16d-<S{p%=1365;r16 p%=0;}a-
	Ben(-384,!8);S{r2 y11.T=127,119,!2,119,103,!2,103,79,!2;}b-1^1 r y11(127);
//	e-4.e-g-8.,90g-16,90e-,50g-
//	a-16b-16a-g-e-16d-16d-e-16d-16<b-8.r16
//	a-16,90a-,90a-16b-,50b->d-<b-16>d-16e-d-
//	e-16,90e-,90e-16d-e-16g-16a-g-16a-16b-8.r16
//	>e-16,90e-d-16<b-a-16g-16a-b-16a-16g-,75e-
//	d-e-16g-16a-g-16e-16d-16e-16g-16a-16g-8.r16
//	a-16,90a-,90a-16g-e-16d-16e-g-16e-16d-,75<b->
//	e-d-16e-16g-,75a-b-a-16>e-16d-<b-16a-16
//	b-1^1
}

//_Track  6 [Synth 4]
#sn4c={	o5 v100 l16 q90
	S{[4	y74.T=16,80,!1,80,16,!1;r1^1]}
	[2	[2	[4'b->e-<''b->e-<'^r]]
	:	[2	[4'b->d-<''b->d-<'^r]]	]
			[4'b->d-<''b->d-<'^r]	[2'b->d-<''b->d-<'^r][2'a->c<''a->c<'^r]
}
#sn4d={	o5 v100 l16 q90
	S{[4	y74.T=16,80,!1,80,16,!1;r1^1]}
	[2	[2	[4'a->d-<''a->d-<'^r]]
	:	[2	[4'a->e-<''a->e-<'^r]]	]
			[4'a->e-<''a->e-<'^r]	[4'b->d-<''b->d-<'^r]
}
#sn4f={	o5 v100 l16 q90
	S{[4	y74.T=16,80,!1,80,16,!1;r1^1]}
	[2	[2	[4'a->d-<''a->d-<'^r]]
	:	[2	[4'a->e-<''a->e-<'^r]]	]
			[4'a->e-<''a->e-<'^r]	[4'b->e-<''b->e-<'^r]
}
#sn4p={	o5 v100 l16 q90
	S{[4	y74.T=16,80,!1,80,16,!1;r1^1]}
	[8	[4'b->e-<''b->e-<'^r]]
}
#sn4q={	o5 v100 l16 q90
	S{[4	y74.T=16,80,!1,80,16,!1;r1^1]}
	[7	[4'b->e-<''b->e-<'^r]]	[2'b->e-<''b->e-<'^r][2'a->d-<''a->d-<'^r]
}

//_Track  7 [Piano]
#pf1k={S{	l8
	[3	r%8 y64(127); r-%8 r1 r-%8 y64(0); r%8]
		[2r%8 y64(127); r-%8 r2 r-%8 y64(0); r%8]
	[2	r%8 y64(127); r-%8 r1 r-%8 y64(0); r%8]
		[2r%8 y64(127); r-%8 r2 r-%8 y64(0); r%8]
		r%8 y64(127); r-%8 r2. r-%8 y64(0); r%8
	}	o5 v100 l8 q98
	'g-b->e-<'v-<g-v+b-v+>e-4v---d-v+g-v+b-
	'a->d-f<'v-<a-v+b-v+>f4v---d-v+a-v+b-
	'b->d-f<'v-<b-v+>d-v+a-4v---fv+a-v+>d-<
	'b->e-a-<'v-<b-v+>e-v+a-v-'b->d-f<'v-e-v+'a->d-e-<'v-d-v+
	'g-b->e-<'v-<g-v+b-v+>e-4v---d-v+g-v+b-
	'a->d-f<'v-<a-v+b-v+>f4v---d-v+a-v+b-
	'b->d-f<'v-<b-v+>d-v+a-v-'b->e-f<'v-d-v+fv+a-v-
	'b->e-g-<'2.
}
#pf1l={S{	l8
	[3	r%8 y64(127); r-%8 r1 r-%8 y64(0); r%8]
		[2r%8 y64(127); r-%8 r2 r-%8 y64(0); r%8]
	[3	r%8 y64(127); r-%8 r1 r-%8 y64(0); r%8]
		[2r%8 y64(127); r-%8 r2 r-%8 y64(0); r%8]
	}	o5 v100 l8 q98
	'g-b->e-<'v-<g-v+b-v+>e-4v---d-v+g-v+b-
	'a->d-f<'v-<a-v+b-v+>f4v---d-v+a-v+b-
	'b->d-f<'v-<b-v+>d-v+a-4v---fv+a-v+>d-<
	'b->e-a-<'v-<b-v+>e-v+a-v-'b->d-f<'v-e-v+'a->d-e-<'v-d-v+
	'g-b->e-<'v-<g-v+b-v+>e-4v---d-v+g-v+b-
	'a->d-f<'v-<a-v+b-v+>f4v---d-v+a-v+b-
	'b->d-f<'v-<b-v+>d-v+a-4v---fv+a-v+>d-<
	'b->e-f<'v-<b-v+>e-v+fv-'a->d-f<'v-d-v+a-v+>f<v-
}
#pf1m={S{	l8
	[3	r%8 y64(127); r-%8 r1 r-%8 y64(0); r%8]
		[2r%8 y64(127); r-%8 r2 r-%8 y64(0); r%8]
	[2	r%8 y64(127); r-%8 r1 r-%8 y64(0); r%8]
		[2r%8 y64(127); r-%8 r2 r-%8 y64(0); r%8]
		r%8 y64(127); r-%8 r1-8 r-%8 y64(0); r%8
	}	o5 v100 l8 q98
	'g-b->e-<'v-<g-v+b-v+>e-4v---d-v+g-v+b-
	'a->d-f<'v-<a-v+b-v+>f4v---d-v+a-v+b-
	'b->d-f<'v-<b-v+>d-v+a-4v---fv+a-v+>d-<
	'b->e-a-<'v-<b-v+>e-v+a-v-'b->d-f<'v-e-v+'a->d-e-<'v-d-v+
	'g-b->e-<'v-<g-v+b-v+>e-4v---d-v+g-v+b-
	'a->d-f<'v-<a-v+b-v+>f4v---d-v+a-v+b-
	'b->d-f<'v-<b-v+>d-v+a-v-'b->e-f<'v-d-v+fv+a-v-
	'b->d-g-<'v--<b-v+>d-v+g-v-'b->e-g-<'4.
}

//_Track  8 [Pad 5 L1]
#pd51={	v100 l2 q99
	S{	o4	g-1	a-1	b-1.a-2	g-1	a-1	b-1.a-2	}
	S{	o5	d-1	^1	e-1.g-2	d-1	^1	e-1	f1	}
	S{	o5	b-1	^1	>d-1^1<	b-1	^1	>d-1	^1	}
	S{	o6	e-1	f1	a-1.f2	e-1	f1	^1	a-2e-2	}
}
#pd52={	v100 l2 q99
	S{	o4	g-1	a-1	b-1.a-2	g-1	a-1	b-1	^1	}
	S{	o5	d-1	^1	e-1.g-2	d-1	^1	e-1	f1	}
	S{	o5	b-1	^1	>d-1^1<	b-1	^1	>d-1	^1	}
	S{	o6	e-1	f1	a-1.f2	e-1	f1	^1	a-1	}
}
#pd53={	v100 l2 q99
	S{	o4	g-1	a-1	b-1.a-2	g-1	a-1	b-1	}
	S{	o5	d-1	^1	e-1.g-2	d-1	^1	e-1	}
	S{	o5	b-1	^1	>d-1^1<	b-1	^1	>d-1	}
	S{	o6	e-1	f1	a-1.f2	e-1	f1	^1	}
}
#pd56={	v100 l2 q99
	S{	o4	b-1	b-1	^1	b-1	^1	b-1	^1	b-1	}
	S{	o5	e-1	^1	e-1	^1	e-1	^1	e-1.d-2	}
	S{	o6	d-1	d-1	^1	d-1	^1	d-1	^1.c2		}
	S{	o6	g-1	^1	g-1	^1	g-1	^1	g-1.f2	}
}
#pd57={	v100 l2 q99
	S{	o4	b-1	b-1	^1	b-1	^1	b-1	^1.a-2	}
	S{	o5	e-1	^1	e-1	^1	e-1	^1	e-1.d-2	}
	S{	o6	d-1	d-1	^1	d-1	^1	d-1	^1.e-2	}
	S{	o6	g-1	^1	g-1	^1	g-1	^1	g-1	^1	}
}
#pd5c={	v100 l2 q99
	S{	o4	b-1	b-1	^1	b-1	^1	b-1	^1	b-1	}
	S{	o5	e-1	^1	d-1	^1	e-1	^1	d-1	^1	}
	S{	o6	d-1	^1	<a-1	^1	>d-1	^1	<a-1.>c	}
	S{	o6	g-1	^1	f1	^1	g-1	^1	f1	^1	}
}
#pd5d={	v100 l2 q99
	S{	o4	a-1	a-1	^1	a-1	^1	a-1	^1	b-1		}
	S{	o5	d-1	^1	e-1	^1	d-1	^1	e-1	a-2e-2	}
	S{	o6	c1	c1	^1	c1	^1	c1	^1	d-2c2		}
	S{	o6	f1	^1	g-1	^1	f1	^1	g-1	f1		}
}
#pd5f={	v100 l2 q99
	S{	o4	a-1	a-1	^1	a-1	^1	a-1	^1	/*b-1		*/	}
	S{	o5	d-1	^1	e-1	^1	d-1	^1	e-1	/*a-2e-2	*/	}
	S{	o6	c1	c1	^1	c1	^1	c1	^1	/*d-1		*/	}
	S{	o6	f1	^1	g-1	^1	f1	^1	g-1	/*f2g-2	*/	}
}
#pd5h={	v100 l2 q99
	S{	o4	g-1	a-1	b-1.a-2	g-1	a-1	b-1	^1	}
	S{	o5	d-1	^1	e-1.g-2	d-1	^1	e-1	^1	}
	S{	o5	b-1	^1	>d-1^1<	b-1	^1	>d-1	^1	}
	S{	o6	e-1	f1	a-1.f2	e-1	f1	^1	^1	}
}
#pd5i={	o4 v100 l2 q99
	'b->f>d-a-<<'
}
#pd5l={	v100 l2 q99
//	o4
//	'g->d-b->e-<<'1	'a->d-b->f<<'1	'b->f>d-a-<<'1	'b->e->d-a-<<'1
//	'g->d-b->e-<<'1	'a->d-b->f<<'1	'b->f>d-a-<<'1.'a->g->d-f<<'2
	S{	o4	g-1	a-1	b-1	^1		g-1	a-1	b-1.a-2	}
	S{	o5	d-1	^1	f1	e-1		d-1	^1	f1,g-2	}
	S{	o5	b-1	^1	>d-1	^1<		b-1	^1	>d-1	^1<	}
	S{	o6	e-1	f1	a-1	^1		e-1	f1	a-1.	f2	}
}
#pd5m={	v100 l2 q99
//	o4
//	'g->d-b->e-<<'1	'a->d-b->f<<'1	'b->f>d-a-<<'1	'b->e->d-a-<<'1
//	'g->d-b->e-<<'1	'a->d-b->f<<'1	'b->d-a->e-<<'2'b->d-a->f<<'2	'b->e->d-g-<<'1
	S{	o4	g-1	a-1	b-1	^1		g-1	a-1	b-1	^1	}
	S{	o5	d-1	^1	f1	e-1		d-1	^1	d-1	e-1	}
	S{	o5	b-1	^1	>d-1	^1<		b-1	^1	a-1	>d-1<	}
	S{	o6	e-1	f1	a-1	^1		e-1	f1	e-2f2	g-1	}
}
#pd5r={	v100 l2 q99
	S{	o4	g-1	a-1	>d-1	e-1<		g-1	a-1	b-1	^2>d-2<	}
}
#pd5s={	v100 l2 q99
	S{	o4	g-1	a-1	>d-1	e-1<		g-1	a-1	b-2>d-2	e-2.<	}
}
#pd5t={	o4 v100 l2 q99
	y11.T=0,127,!1.; S{r1. p%.T=-1,-8192,!2;r2 p%=0;}
	'<b->g->e-g-b->e-<<'1^1
}
#pd5w={	o4 v100 l2 q99
	[4	[2'b->f>d-a-<<',95]]
	[2	[4'b->f>d-a-<<'4,95]]
		[8'b->f>d-a-<<'8,95]
		  'b->f>d-a-<<'1
}
#pd5H={	v100 l2 q99
	S{	o4	g-1	a-1	b-1.a-2	g-1	a-2b-2	a-1	b-1	}
	S{	o5	d-1	^1	e-1.g-2	d-1	^2e-2		c1	e-1	}
	S{	o5	b-1	^1	>d-1^1<	b-1	^2>d-2	>d-1	d-1	}
	S{	o6	e-1	f1	a-1.f2	e-1	f1		f1	g-1	}
}

//_Track  9 [Pad 5 L2]

//_Track 12 [Synth 3]
#sn3c={	o6 v110 l16 q85
//   ŽüŠú‚Ì’·‚³, ”¼Œa(0`63), ’†Sƒpƒ“, ‰ŠúˆÊ‘Š, ‰ñ“]•ûŒü(1,-1:³,•‰), ‰ñ“]‰ñ”, ‘ž•p“x
	S{TDAuto(!1^1,32,64,0,-1,4,8);}
	S{[2	y74.T=32,96,!1^1,96,32,!1^1;[4r1]]}
	[2	[2	e-re-g- b-re-r g-b-rr r4]	[2	d-rd-g- b-rd-r g-b-rr r4]]
}
#sn3d={	o6 v110 l16 q85
	S{TDAuto(!1^1,32,64,0,-1,4,8);}
	S{[2	y74.T=32,96,!1^1,96,32,!1^1;[4r1]]}
	[2	[2	d-rd-g- a-rd-r g-a-rr r4] :	[2	d-rd-e- a-rd-r e-a-rr r4]]
									d-rd-e- a-rd-r e-a-rr r4	d-rd-e- b-re-r g-b->d-<r r4
}
#sn3f={	o6 v110 l16 q85
	S{TDAuto(!1^1,32,64,0,-1,4,8);}
	S{[2	y74.T=32,96,!1^1,96,32,!1^1;[4r1]]}
	[2	[2	d-rd-g- a-rd-r g-a-rr r4] :	[2	d-rd-e- a-rd-r e-a-rr r4]]
									d-rd-e- a-rd-r e-a-rr r4	<b-rb->d- e-rg-b- ra-b-r >d-rd-e-
}
#sn3p={	o6 v110 l16 q85
	S{TDAuto(!1^1,32,64,0,-1,4,8);}
	S{[2	y74.T=32,96,!1^1,96,32,!1^1;[4r1]]}
	[7	e-re-g- a-re-r g-b-rr r4]	e-re-g- a-re-r fb-rr r4
}
#sn3q={	o6 v110 l16 q85
	S{TDAuto(!1^1,32,64,0,-1,4,8);}
	S{[2	y74.T=32,96,!1^1,96,32,!1^1;[4r1]]}
	[7	e-re-g- a-re-r g-b-rr r4]	e-re-g- a-rd-r e-a-rr r4
}

//_Track 13 [Synth 2 L1]
#sn22={	o5 v110 l16 q80
	[7r1]
	y74.T=0,114,!2.,114,114,!8,114,0,!8;
	y71.T=20,84,!2.;
	'e-b->e-g-b-<'1,99
}
#sn23={	o5 v110 l16 q80	y74(114);
	r^'<b->g-b->e-g-<'^ ^r^^ '<a->fa->d-f<'^^r ^^'<b->g-b->d-g-<'^	^r^^ 'e-b->e-g-b-<'^^^ 'd-a->d-f a-<'^r^ '<b->f b->d- f  <'^^r
	r^'<b->g-b->e-g-<'^ ^r^^ '<a->fa->d-f<'^^r ^^'<b->g-b->d-f <'^	^r^^ 'e-b->e-g-b-<'^^^ 'e-b->e-a-b-<'^r^ '<b->f b->d- f  <'^^r
	r^'<b->g-b->e-g-<'^ ^r^^ '<a->fa->d-f<'^^r ^^'<b->g-b->d-g-<'^	^r^^ 'e-b->e-g-b-<'^^^ 'd-a->d-f a-<'^r^ '<b->f b->d- f  <'^^r
	r^'<b->g-b->e-g-<'^ ^r^^ '<a->fa->d-f<'^^r ^^'<b->f b->d-f <'^	^r^^ 'd-a->d-e-a-<'^^^ 'e-b->e-g-b-<'^r^ ' g->d-g- a->d-<<'^^r
}
#sn24={	o5 v110 l16 q80	y74(114);
	r^'<b->g-b->e-g-<'^ ^r^^ '<a->fa->d-f<'^^r ^^'<b->g-b->d-g-<'^	^r^^ 'e-b->e-g-b-<'^^^ 'd-a->d-f a-<'^r^ '<b->f b->d- f  <'^^r
	r^'<b->g-b->e-g-<'^ ^r^^ '<a->fa->d-f<'^^r ^^'<b->g-b->d-f <'^	^r^^ 'e-b->e-g-b-<'^^^ 'e-b->e-a-b-<'^r^ '<b->f b->d- f  <'^^r
	r^'<b->g-b->e-g-<'^ ^r^^ '<a->fa->d-f<'^^r ^^'<b->g-b->d-g-<'^	^r^^ 'e-b->e-g-b-<'^^^ 'd-a->d-f a-<'^r^ '<b->f b->d- f  <'^^r
	'<b->g-b->e- g-<'^r'<a->f a->d- f <'^r' d- b->d- f b-<'^r'<b->g- b->e-g-<'^r'<f>d- f a->d-<'^'<b->g-b->d- g-< '^
	'<f >d-f  a->d-<'^r'<g->e-g- b->e-<'^r'<b->g- b->d-g-<'^r' c  a->c  e-a-<'^r' d-b->d-g- b-<'^' f >d-f  a->d-<<'^
}
#sn25={	o5 v110 l16 q80
	y74.T=114,114,!2.,114,0,!4;
	'g->e-g-b->e-<<'1,100
}
#sn2f={	o3 v120 l16 q80
	[7	r1]
	y74.T=1,114,!1;
	v-b-rv+'>g-b->d-<<',99v-b-v+ '>a->d-e-<<'^,99v-b-v+'>b->d-g-<<' ^,99v-b-v+'>>d-g-b-<<'^,99 v-b-v+'>>e-g-b-<<'^,99v-b-v+
}
#sn2p1={	l16	v- #?1 v+ #?2 ^ v- #?1 v+ #?2 ^ v- #?1 v+ #?2 	}
#sn2g={	o5 v110 l16 q80	y74(114);
	#sn2p1({<b->},{'b->e-g-<'}) #sn2p1({d-},{'a->d-f<'})	#sn2p1({e-},{'g-b->d-<'}) #sn2p1({d-},{'b->d-f<'})
	#sn2p1({<b->},{'b->e-g-<'}) #sn2p1({d-},{'a->d-f<'})	#sn2p1({e-},{'g-b->d-<'}) #sn2p1({d-},{'b->d-f<'})
	#sn2p1({<b->},{'b->e-g-<'}) #sn2p1({d-},{'a->d-f<'})	#sn2p1({e-},{'g-b->d-<'}) #sn2p1({d-},{'b->d-f<'})
	#sn2p1({<b->},{'b->e-g-<'}) #sn2p1({d-},{'a->d-f<'})	#sn2p1({e-},{'b->e-g-<'}) #sn2p1({d-},{'>d-g-a-<'})
}
#sn2h={	o5 v110 l16 q80	y74(114);
	S{r4 p%.T=-1,-2730,!8,-2731,-8191,!8;y74.T=114,0,!4; r4 p%=0; y74.T=1,114,!2^1;}
	'b->e-g-b-<'2,99		    #sn2p1({d-},{'a->d-f<'})	#sn2p1({e-},{'g-b->d-<'}) #sn2p1({d-},{'b->d-f<'})
	#sn2p1({<b->},{'b->e-g-<'}) #sn2p1({d-},{'a->d-f<'})	#sn2p1({e-},{'g-b->d-<'}) #sn2p1({d-},{'b->d-f<'})
	#sn2p1({<b->},{'b->e-g-<'}) #sn2p1({d-},{'a->d-f<'})	#sn2p1({e-},{'g-b->d-<'}) #sn2p1({d-},{'b->d-g-<'})
	'b->e-g-<'^r'a->d-f<'^r'>d-fb-<'^r'b->e-g-<'^r'fa->d-<'^'b->d-g-<'^
	'fa->d-<'^r'g-b->e-<'^r'b->d-g-<'^r'>ce-a-<'^r'>d-g-b-<'^'>fa->d-<<'^
}
#sn2n={	o5 v110 l16 q80	y74(114);
	#sn2p1({e-},{'b->e-g-<'}) #sn2p1({d-},{'a->d-f<'})	#sn2p1({<b->},{'g-b->d-<'}) #sn2p1({<a->},{'d-fb-'})
	#sn2p1({e-},{'b->e-g-<'}) #sn2p1({d-},{'a->d-f<'})	#sn2p1({<b->},{'g-b->d-<'}) #sn2p1({<a->},{'e-fb-'})
	#sn2p1({e-},{'b->e-g-<'}) #sn2p1({d-},{'a->d-f<'})	#sn2p1({<b->},{'g-b->d-<'}) #sn2p1({<a->},{'a->d-f<'})
	#sn2p1({e-},{'b->e-g-<'}) #sn2p1({d-},{'a->d-f<'})	#sn2p1({<b->},{'b->d-g-<'}) #sn2p1({<a->},{'>d-g-a-<'})
}
#sn2o={	o5 v110 l16 q80	y74(114);
	#sn2p1({e-},{'b->e-g-<'}) #sn2p1({d-},{'a->d-f<'})	#sn2p1({<b->},{'g-b->d-<'}) #sn2p1({<a->},{'d-fb-'})
	#sn2p1({e-},{'b->e-g-<'}) #sn2p1({d-},{'a->d-f<'})	#sn2p1({<b->},{'g-b->d-<'}) #sn2p1({<a->},{'e-fb-'})
	#sn2p1({e-},{'b->e-g-<'}) #sn2p1({d-},{'a->d-f<'})	#sn2p1({<b->},{'g-b->d-<'}) #sn2p1({<a->},{'d-fb-'})
	#sn2p1({e-},{'b->e-g-<'}) #sn2p1({d-},{'>d-fa-<'})	#sn2p1({<b->},{'>e-g-b-<'}) #sn2p1({<b->},{'>e-g-b-<'})
}
#sn2p={	o5 v110 l16 q80	y74(114);
	[7	[2 #sn2p1({<b->},{'>e-g-b-<'})]]	#sn2p1({<b->},{'>e-g-b-<'}) #sn2p1({<b->},{'>d-fb-<'})
}
#sn2q={	o5 v110 l16 q80	y74(114);
	[7	[2 #sn2p1({<b->},{'>e-g-b-<'})]]	#sn2p1({<b->},{'>e-g-b-<'}) #sn2p1({<a->},{'>d-e-a-<'})
}
#sn2u={	o5 v110 l16 q80
	S{	o4 v100 l16 q70
		[2		rr'g->d-<'rr'g->d-<'rr'g->d-<'rr'g->d-<'r'g->d-<'r'g->d-<'
				rr'a->e-<'rr'a->e-<'rr'a->e-<'rr'a->e-<'r'a->e-<'r'a->e-<'
				rr'b->e-<'rr'b->e-<'rr'b->e-<'rr'b->e-<'r'b->e-<'r'b->e-<'
				rr'b->e-<'rr'b->e-<'rr'b->e-<'rr'a->e-<'r'a->e-<'r'a->e-<']
	}
	S{	o5 v120 l16 q85
		[2	[2	'e-b->e-<'rr'b->g-b-<'rr'a->e-a-<'rr'g->d-g-<'rr' e-b->e-< 'r' d- a->d-< 'r	:
				'e-b->e-<'rr'b->g-b-<'rr'a->e-a-<'rr'f >d-f <'rr' d-a->d-< 'r'<b->f  b-  'r]
			:	'e-b->e-<'rr'b->g-b-<'rr'a->e-a-<'rr'b->f b-<'rr'>d-a->d-<<'r' b->f  b-< 'r]
				'e-b->e-<'rr'b->g-b-<'rr'a->e-a-<'rr'b->f b-<'rr'>d-a->d-<<'r'>e- b->e-<<'r
	}
}
#sn2v={	o5 v110 l16 q80
	S{	o4 v100 l16 q70
		[2		rr'g->d-<'rr'g->d-<'rr'g->d-<'rr'g->d-<'r'g->d-<'r'g->d-<'
				rr'a->e-<'rr'a->e-<'rr'a->e-<'rr'a->e-<'r'a->e-<'r'a->e-<'
			[2	rr'b->e-<'rr'b->e-<'rr'b->e-<'rr'b->e-<'r'b->e-<'r'b->e-<']]
	}
	S{	o5 v120 l16 q85
		[2	[2	'e-b->e-<'rr'b->g-b-<'rr'a->e-a-<'rr'g->d-g-<'rr' e-b->e-< 'r' d- a->d-< 'r	:
				'e-b->e-<'rr'b->g-b-<'rr'a->e-a-<'rr'f >d-f <'rr' d-a->d-< 'r'<b->f  b-  'r]
			:	'e-b->e-<'rr'b->g-b-<'rr'a->e-a-<'rr'b->f b-<'rr'>d-a->d-<<'r' b->f  b-< 'r]
				'e-b->e-<'rr'b->g-b-<'rr'>d-a->d-<<'rr'>g->d-g-<<'rr'>a->e-a-<<'r'>b->fb-<<'r
	}
}
#sn2w={	o5 v110 l16 q80
	S{	o4 v100 l16 q70
		[4	[2rr'b->e-<'rr'b->e-<'r'b->e-<']]
		[2	[4r'b->e-<'rr]]
	}
	S{	o5 v120 l16 q85
		[4	[2'e-b->e-<'rr'b->g-b-<'rr'a->e-a-<'r]]
		[2	[4'e-b->e-<'r'b->g-b-<''a->e-a-<']]
			[4'e-b->e-<''b->g-b-<''a->e-a-<']'e-b->e-<''b->g-b-<''>d-a->d-<<''a->e-a-<'
	}
	[7	r1]	#sn25
}
#sn2x={	o5 v110 l16 q80
	y74.T=0,114,!1;
	S{	o4 v100 l16 q70
				rr'<g->d-'rr'<a->e-'rr'cg-'rr'd-a-'r'e-b-'r'f>c<'
	}
	S{	o5 v120 l16 q85
				'<d-a->d-'rr'<e-b->e-'rr'<g->d-g-'rr'<a->e-a-'rr'<b->e-b-'r'd-a->d-<'r
	}
}
#sn2C={	o5 v110 l16 q80
	y74.T=114,18,!1^1^1^1 ^1^1^1^1;
	#sn2u
}
#sn2D={	o5 v110 l16 q80
	y74.T=18,114,!1^1^1^1 ^1^1^1^1;
	#sn2v
}
#sn2H={	o5 v110 l16 q80
	y74.T=114,18,!1^1^1^1 ^1^1^1^1;
	S{	o4 v100 l16 q70
				rr'g->d-<'rr'g->d-<'rr'g->d-<'rr'g->d-<'r'g->d-<'r'g->d-<'
				rr'a->e-<'rr'a->e-<'rr'a->e-<'rr'a->e-<'r'a->e-<'r'a->e-<'
			[2	rr'b->e-<'rr'b->e-<'rr'b->e-<'rr'b->e-<'r'b->e-<'r'b->e-<']
				rr'g->d-<'rr'g->d-<'rr'g->d-<'rr'g->d-<'r'g->d-<'r'g->d-<'
				rr'a->e-<'rr'a->e-<'r'a->e-<'rr'b->e-<'rr'b->e-<'r'b->e-<'
				rr'<a->e-'rr'<b->f'rr'd-a-'rr'e-b-'r'g->d-<'r'a->f<'
	}
	S{	o5 v120 l16 q85
			[2	'e-b->e-<'rr'b->g-b-<'rr'a->e-a-<'rr'g->d-g-<'rr' e-b->e-< 'r' d- a->d-< 'r	:
				'e-b->e-<'rr'b->g-b-<'rr'a->e-a-<'rr'f >d-f <'rr' d-a->d-< 'r'<b->f  b-  'r]
				'e-b->e-<'rr'b->g-b-<'rr'a->e-a-<'rr'b->f b-<'rr'>d-a->d-<<'r' b->f  b-< 'r
				'e-b->e-<'rr'b->g-b-<'rr'a->e-a-<'rr'g->d-g-<'rr' e-b->e-< 'r' d- a->d-< 'r
				'e-b->e-<'rr'b->g-b-<'rr'a->e-a-<'r'f>d-f<'rr'>d-a->d-<<'rr'f>d-f<'r
				'<a->e-a-'rr'<b->fb-'rr'd-a->d-<'rr'e-b->e-< 'rr'g->d-g-<'r'a->fa-<'r
				'b->g-b-<'1,100
	}
}

//_Track 14 [Synth 2 L2]

//_Track 15 [Synth 1 L1]
#sn13={	o5 v110 l16 q75
	y74.T=0,80,!1^1^1^1 ^1^1^1^1;
	y71.T=16,80,!1^1^1^1 ^1^1^1^1;
	[2	e-<v--g-v++>b-,99a- <v--g-v++>e-,99>d-,99e-< e-<v--g-v++>b-,99a- <v--g-v++> e-,99>e-,99d-<
		e-<v--a-v++>b-,99a- <v--a-v++>f ,99>c ,99e-< e-<v--a-v++>b-,99a- <v--a-v++> f ,99>f ,99d-<
		e-<v--b-v++>b-,99a- <v--b-v++>a-,99>e-,99f < e-<v--b-v++>b-,99a- <v--b-v++> a-,99>f ,99d-<
		e-<v--b-v++>b-,99a- <v--b-v++>b-,99>e-,99a-< e-<v--a-v++>b-,99a- <v--a-v++>>b-,99 f ,99d-<	]
}
#sn14={	o5 v110 l16 q75
	[2	e-<v--g-v++>b-,99a- <v--g-v++>e-,99>d-,99e-< e-<v--g-v++>b-,99a- <v--g-v++> e-,99>e-,99d-<
		e-<v--a-v++>b-,99a- <v--a-v++>f ,99>c ,99e-< e-<v--a-v++>b-,99a- <v--a-v++> f ,99>f ,99d-<
	:	e-<v--b-v++>b-,99a- <v--b-v++>a-,99>e-,99f < e-<v--b-v++>b-,99a- <v--b-v++> a-,99>f ,99d-<
		e-<v--b-v++>b-,99a- <v--b-v++>b-,99>e-,99a-< e-<v--a-v++>b-,99a- <v--a-v++>>b-,99 f ,99d-<	]
		e-<v--b-v++>b-,99a- e-<v--b-v++>b-,99a- e-<v--b-v++>b-,99a- e-<v--b-v++>b-,99a-
		e-<v--b-v++>b-,99a- e-<v--b-v++>b-,99a- e-g-b->e- d-<a-g-e-
}
#sn15={	o5 v110 l16 q75
	y74.T=80,80,!2.,80,0,!4;
//	y71.T=80,80,!2.,80,16,!4;
	b-1,100
}
#sn1a={	o5 v110 l8 q66
	y74.T=16,80,!1^1^1^1,80,48,!1^1,48,80,!1^1;
	<b->e-g-b-d-e-a->d-<	e-g-b->e-<e-a->d-g-<
	<b->e-g-b-d-e-a->d-<	e-g-b->e-<e-a->fd-<
	<b->e-g-b-d-e-a->d-<	e-g-b->e-<e-a->d-g-<
	<b->e-g-b-d-e-a->d-<	e-g-b->e-g->d-<a-e-<
}
#sn1b={	o5 v110 l8 q66
	y74.T=80,48,!1^1,48,80,!1^1,80,16,!1^1^1^1;
	<b->e-g-b-d-e-a->d-<	e-g-b->e-<e-a->d-g-<
	<b->e-g-b-d-e-a->d-<	e-g-b->e-<e-a->fd-<
	<b->e-g-b-d-e-a->d-<	e-g-b->e-<e-a->d-g-<
	<b->d-e-g-a->d-e-a-	b-
//	<b->e-g-b-d-e-a->d-<
}
#sn1e={	o6 v110 l16 q75
	S{[2	y74.T=80,48,!1^1,48,80,!1^1;[4r1]]}
	[2	[2	d-re-d- g-rb-r re-rb- >d-re-r<]
		[2	>b-rg-b- e-rd-r rg-rd- <b-rg-r]	]
}
#sn1f={	o6 v110 l16 q75
	S{[2	y74.T=80,48,!1^1,48,80,!1^1;[4r1]]}
	[2	[2	d-re-d- fra-r re-ra- >d-re-r<]
	:	[2	>a-rfa- e-rd-r rfrd- <a-rfr]	]
			>b-rg-b- e-rd-r rg-rd- <b-rg-r
			d-re-g- b-r>d-r re-rb- >d-re-r<<
}
#sn1h={	o5 v110 l8 q66
	y74.T=80,48,!1^1,48,80,!1^1,80,16,!1^1^1^1;
	<b->e-g-b-d-e-a->d-<	e-g-b->e-<e-a->d-g-<
	<b->e-g-b-d-e-a->d-<	e-g-b->e-<e-a->fd-<
	<b->e-g-b-d-e-a->d-<	e-g-b->e-<e-a->d-g-<
	<b->e-g-b-d-e-a->d-<	<b->d-e-g-a->d-e-a-
	b-4
}
#sn1l={	o8 v110 l8 q66
//	y74.T=80,48,!1^1,48,80,!1^1,80,16,!1^1^1^1;
//	y74.T=16,80,!1^1,80,16,!1^1,16,80,!1^1,80,16,!1^1;
	y74.T=16,80,!1^1^1^1,80,16,!1^1^1^1;
	e-d-<a-g->d-<b-g-e-	b-a-e-d-a-g-d-<b->
	g-e-<b-a->e-d-<a-g->	d-<b-g-e-b-a-e-d-
	a-g-d-<b->g-e-<b-a->	e-d-<a-g->d-<b-g-e-
	b-a-e-d-a-g-d-<b->	g-e-<b-a->e-d-<a-g-
}
#sn1m={	o4 v110 l8 q66
//	y74.T=16,80,!1^1^1^1,80,48,!1^1,48,80,!1^1;
//	y74.T=16,80,!1^1,80,16,!1^1,16,80,!1^1,80,16,!1^1;
	y74.T=16,80,!1^1^1^1,80,16,!1^1^1^1;
	e-g-b->d-<g-a->d-e-<	a-b->e-g-<b->d-g-a-
	d-e-a-b-e-g-b->d-<	g-a->d-e-<a-b->e-g-<
	b->d-g-a-d-e-a-b-		e-g-b->d-<g-a->d-e-<
	a-b->e-g-<b->d-g-a-	d-e-a-b-e-g-b->d-
}
#sn1p={	o5 v110 l16 q75
	S{[2	y74.T=80,48,!1^1,48,80,!1^1;[4r1]]}
	[2	[2	[2 e-rg-b-rr>e-r<]]	:	[2	[2 >g-re-<b-rrg-r]]]
									[2 >g-re-<b-rrg-r]	>g-re-<b-rrg-r >fre-<b-rrfr
}
#sn1q={	o5 v110 l16 q75
	S{[2	y74.T=80,48,!1^1,48,80,!1^1;[4r1]]}
	[2	[2	[2 e-rg-b-rr>e-r<]]	:	[2	[2 >g-re-<b-rrg-r]]]
									[2 >g-re-<b-rrg-r]	>g-re-<b-rrg-r >e-rd-<a-rrer
}
#sn1v={	o5 v110 l16 q75
	[2	e-<v--g-v++>b-,99a- <v--g-v++>e-,99>d-,99e-< e-<v--g-v++>b-,99a- <v--g-v++> e-,99>e-,99d-<
		e-<v--a-v++>b-,99a- <v--a-v++>f ,99>c ,99e-< e-<v--a-v++>b-,99a- <v--a-v++> f ,99>f ,99d-<
		e-<v--b-v++>b-,99a- <v--b-v++>a-,99>e-,99f < e-<v--b-v++>b-,99a- <v--b-v++> a-,99>f ,99d-<
	:	e-<v--b-v++>b-,99a- <v--b-v++>b-,99>e-,99a-< e-<v--a-v++>b-,99a- <v--a-v++>>b-,99 f ,99d-<	]
		e-<v--b-v++>b-,99a- <v--b-v++>b-,99>e-,99g-< e-<v--g-v++>b-,99a- <v--b-v++>>g-,99 b-,99>d-<<
}
#sn1w={	o5 v110 l16 q75
	[4	[2e-<v--g-v++>b-,99a- <v--g-v++>e-,99>d-,99e-<]]
	[2	[4e-<v--b-v++>b-,99a-]]
	e-<v--b-v++>b-,99a- e-g-b->e- d-<a-g-e-
	#sn15
}
#sn1z={	o5 v110 l16 q75
	y74.T=80,0,!1^1^1^1 ^1^1^1^1;
	y71.T=80,16,!1^1^1^1 ^1^1^1^1;
	[2	e-<v--g-v++>b-,99a- <v--g-v++>e-,99>d-,99e-< e-<v--g-v++>b-,99a- <v--g-v++> e-,99>e-,99d-<
		e-<v--a-v++>b-,99a- <v--a-v++>f ,99>c ,99e-< e-<v--a-v++>b-,99a- <v--a-v++> f ,99>f ,99d-<
		e-<v--b-v++>b-,99a- <v--b-v++>a-,99>e-,99f < e-<v--b-v++>b-,99a- <v--b-v++> a-,99>f ,99d-<
	:	e-<v--b-v++>b-,99a- <v--b-v++>b-,99>e-,99a-< e-<v--a-v++>b-,99a- <v--a-v++>>b-,99 f ,99d-<	]
		e-<v--b-v++>b-,99a- <v--b-v++>b-,99>e-,99g-< e-<v--g-v++>b-,99a- <v--b-v++>>g-,99 b-,99>d-<<
}
#sn1H={	o5 v110 l16 q75
	y74.T=80,0,!1^1^1^1 ^1^1^1^1;
	y71.T=80,16,!1^1^1^1 ^1^1^1^1;
		e-<v--g-v++>b-,99a- <v--g-v++>e-,99>d-,99e-< e-<v--g-v++>b-,99a- <v--g-v++> e-,99>e-,99d-<
		e-<v--a-v++>b-,99a- <v--a-v++>f ,99>c ,99e-< e-<v--a-v++>b-,99a- <v--a-v++> f ,99>f ,99d-<
		e-<v--b-v++>b-,99a- <v--b-v++>a-,99>e-,99f < e-<v--b-v++>b-,99a- <v--b-v++> a-,99>f ,99d-<
		e-<v--b-v++>b-,99a- <v--b-v++>b-,99>e-,99a-< e-<v--a-v++>b-,99a- <v--a-v++>>b-,99 f ,99d-<
		e-<v--g-v++>b-,99a- <v--g-v++>e-,99>d-,99e-< e-<v--g-v++>b-,99a- <v--g-v++> e-,99>e-,99d-<
		[2e-<v--g-v++>b-,99a- <v--g-v++>e-,99>d-,99e-<]
		e-<v--b-v++>b-,99a- e-<v--b-v++>b-,99a- e-g-b->e- d-<a-g-e-
		b-1,100
}

//_Track 16 [Synth 1 L2]

//_Track 17 [Pad 1]
#pd11={	v100 l2 q99
	S{	o3	g-1	a-1	b-1.a-2	g-1	a-1	b-1.a-2	}
	S{	o4	d-1	^1	e-1.g-2	d-1	^1	e-1	f1	}
	S{	o4	b-1	^1	>d-1^1<	b-1	^1	>d-1	^1	}
	S{	o5	e-1	f1	a-1.f2	e-1	f1	^1	a-2e-2	}
}
#pd12={	v100 l2 q99
	S{	o3	g-1	a-1	b-1.a-2	g-1	a-1	b-1	^1	}
	S{	o4	d-1	^1	e-1.g-2	d-1	^1	e-1	f1	}
	S{	o4	b-1	^1	>d-1^1<	b-1	^1	>d-1	^1	}
	S{	o5	e-1	f1	a-1.f2	e-1	f1	^1	a-1	}
}
#pd1j={	v100 l2 q99
//	o3
//	'g->d-b->e-<<'1	'a->d-b->f<<'1	'b->f>d-a-<<'1	'b->e->d-a-<<'1
//	'g->d-b->e-<<'1	'a->d-b->f<<'1	'b->f>d-a-<<'1.'a->g->d-f<<'2
	S{	o3	g-1	a-1	b-1	^1		g-1	a-1	b-1.a-2	}
	S{	o4	d-1	^1	f1	e-1		d-1	^1	f1,g-2	}
	S{	o4	b-1	^1	>d-1	^1<		b-1	^1	>d-1	^1<	}
	S{	o5	e-1	f1	a-1	^1		e-1	f1	a-1.	f2	}
}
#pd1k={	v100 l2 q99
//	o3
//	'g->d-b->e-<<'1	'a->d-b->f<<'1	'b->f>d-a-<<'1	'b->e->d-a-<<'1
//	'g->d-b->e-<<'1	'a->d-b->f<<'1	'b->d-a->e-<<'2'b->d-a->f<<'2	'b->e->d-g-<<'2.
	S{	o3	g-1	a-1	b-1	^1		g-1	a-1	b-1	^2.	}
	S{	o4	d-1	^1	f1	e-1		d-1	^1	d-1	e-2.	}
	S{	o4	b-1	^1	>d-1	^1<		b-1	^1	a-1	>d-2.<	}
	S{	o5	e-1	f1	a-1	^1		e-1	f1	e-2f2	g-2.	}
}
#pd1r={	v100 l2 q99
	S{	o3	g-1	a-1	>d-1	e-1<		g-1	a-1	b-1	^2>d-2<	}
}
#pd1s={	v100 l2 q99
	S{	o3	g-1	a-1	>d-1	e-1<		g-1	a-1	b-2>d-2	e-2.<	}
}

//_Track 18 [Wind]
#wd10={	o7 v100 q95 l1
	r-1
	y74.T=48,72,!1,72,72,!1,72,0,!1^1^1;	b-1^1^1^1^1
	r1^1^1
	y74.T=48,96,!1^1;	b-1^1
}
#wd12={	o7 v100 q95 l1
	[7r1]
	y74.T=127,0,!1^1;	b-1^1
}
#wd1a={	o7 v100 q95 l1
	r-1
	y74.T=48,127,!1^1;	b-1^1^1
}
#wd1t={	o7 v100 q95 l1
	r2 y74.T=48,127,!2^1;	b-2^1^1
}

//_Track 19 [Pad 2]
#pd21={	o7 v100 q99 l2
//   ŽüŠú‚Ì’·‚³, ”¼Œa(0`63), ’†Sƒpƒ“, ‰ŠúˆÊ‘Š, ‰ñ“]•ûŒü(1,-1:³,•‰), ‰ñ“]‰ñ”, ‘ž•p“x
	TDAuto(!1^1^1^1,48,64,180,1,2,8);
	e-1^1	b-1^1	e-1^1	b-1^1
}
#pd2t={	o5 v120 q99 l2	@( 96,  2,  4); y10( 64);
	y11.T=0,127,!1.; S{r1. p%.T=-1,-8192,!2;r1p%=0;}
	'<b->g->e-g-b->e-<<'1^1,100
}

//_Track 20 [Pad 3]
#pd31={	Key(12)	#pd11	Key(0)	}
#pd32={	Key(12)	#pd12	Key(0)	}
#pd3j={	Key(12)	#pd1j	Key(0)	}
#pd3k={	Key(12)	#pd1k	Key(0)	}
#pd3r={	Key(12)	#pd1r	Key(0)	}
#pd3s={	Key(12)	#pd1s	Key(0)	}

//_Track 21 [Pad 4]
#pd41={	o5 v100 q99 l2
	[6r1]	y10.T=16,64,!1,64,127,!1^2; b-1^1^2
}

//_Track 22 [Shamisen L]
#sm13={	o5 v110 l16 q99
	[2	b-a-b-r b-rb-a- b->d-e-r d-r<b-a-
		b-a-b-r b-ra-b- >e-d-<b-r b-rb-a-
		b-a-b-r b-rb-a- a-b->d-e- d-r<a->d-<
	:	b-a-b-r b-ra-b- >e-d-e-a- frc<a-	]
		b-a-b-r b-r>d-e- b-g-e-a- g-re-<b-
}
#sm14={	o5 v110 l16 q99
	[2	b-a-b-r b-rb-a- b->d-e-r d-r<b-a-
		b-a-b-r b-ra-b- >e-d-<b-r b-rb-a-
	:	b-a-b-r b-rb-a- a-b->d-e- d-r<a->d-<
		b-a-b-r b-ra-b- >e-d-e-a- frc<a-	]
		b-a-b-r b-rb-a- b-a-b-r b-ra-b-
		b-a-b-r b-r>d-e- b-a-g-e- d-r<b-a-
}
#sm15={	o5 v110 l16 q99
		b-4
}
#sm1c={	o5 v110 l16 q99
	[2	e-d-e-r e-re-d- e-g-a-r g-re-d-
		e-d-e-r e-rd-e- a-g-e-r e-re-d-
		<b-a-b-r b-rb-a- a-b->d-e- d-r<a->d-<
	:	b-a-b-r b-ra-b- >e-d-e-a- g-rd-<b->	]
		b-a-b-r b-r>d-e- >c<g-e-a- g-re-c
//	r^g-g- g-^e-^ g-^g-g- e-^g-^
//	r^a-a- a-^a-^ g-g-^g- e-^d-^
//	r^d-^ d-^<b-^> d-^d-d- <b-^>d-^
//	r^<b-^> d-^d-<b-> e-^e-d- e-^g-^
//	r^g-g- g-^d-^ e-e-^d- e-^g-^
//	r^b-b- b-^b-^ a-a-^a- e-^d-^
//	r^a-^ a-^g-^ a-^g-a- g-^a-a-
//	r^b-b- b-^b-^ a-a-^a- e-^d-^
}
#sm1d={	o5 v110 l16 q99
	[2	d-<a->d-r d-rd-<a-> d-e-g-r e-rd-<a->
		d-<a->d-r d-r<a->d- g-e-d-r d-r<b-a->
		<a-g-a-r a-ra-g- g-a-b->d- <b-rg-b-
	:	a-g-a-r a-rg-a- >d-<b->d-g- e-rd-<g->	]
		b-a-b-r b-r>d-e- g-e-d-g- e-rd-<b->
//	r^g-g- g-^e-^ g-^g-g- e-^g-^
//	r^a-a- a-^a-^ g-g-^g- e-^d-^
//	r^d-^ d-^<b-^> d-^d-d- <b-^>d-^
//	r^<b-^> d-^d-<b-> e-^e-d- e-^g-^
//	r^g-g- g-^d-^ e-e-^d- e-^g-^
//	r^b-b- b-^b-^ a-a-^a- e-^d-^
//	r^a-^ a-^g-^ a-^g-a- g-^a-a-
//	r^b-^ b-^a-^ b-b-^b- >d-^d-e-
}
#sm1f={	o5 v110 l16 q99
	[2	d-<a->d-r d-rd-<a-> d-e-g-r e-rd-<a->
		d-<a->d-r d-r<a->d- g-e-d-r d-r<b-a->
		<a-g-a-r a-ra-g- g-a-b->d- <b-rg-b-
	:	a-g-a-r a-rg-a- >d-<b->d-g- e-rd-<g->	]
		b-a-b-r b-r>d-e- d-e-g-a- b-r>d-e-
//	r^g-g- g-^e-^ g-^g-g- e-^g-^
//	r^a-a- a-^a-^ g-g-^g- e-^d-^
//	r^d-^ d-^<b-^> d-^d-d- <b-^>d-^
//	r^<b-^> d-^d-<b-> e-^e-d- e-^g-^
//	r^g-g- g-^e-^ g-^g-e- g-^g-a-
//	r^a-a- a-^e-^ a-^e-a- g-^e-a-
//	r^b-b- b-^a-^ b-^>d-e-< b-^>e-d-<
//	r^b-b- >d-^e-^ b-a-g-e- d-r<b-a-
}

//_Track 23 [Shamisen R]
#sm23={	l%2r	Key(7) #sm13 Key(0)	}
#sm24={	l%2r	Key(7) #sm14 Key(0)	}
#sm25={	l%2r	Key(7) #sm15 Key(0)	}
#sm2c={	l%2r	Key(7) #sm1c Key(0)	}
#sm2d={	l%2r	Key(7) #sm1d Key(0)	}
#sm2f={	l%2r	Key(7) #sm1f Key(0)	}

//_Track 24 [Bell]
#bl16={	o7 v110 l2 q99
	b-g-	<b->e-	b-g-	<a->d-
	b-g-	<b->f		b-g-	a->d-<
}
#bl1j={	o7 v100 l8 q99
	r-2b-a-g-<b->
	d-4.rb-a-g-<b->	e-4.rb-a-g-a-	e-4.rb-a-g-d-	e-4.rb-a-g-e-
	d-4.rb-a-g-a-	d-4.rb-a-g-d-	e-4d-e-d-4<a-4	b-4.r
}
#bl1k={	o7 v100 l8 q99
	r-2b-a-g-<b->
	d-4.rb-a-g-<b->	e-4.rb-a-g-a-	e-4.rb-a-g-d-	e-4.rb-a-g-e-
	d-4.rb-a-g-a-	d-4.rb-a-g-d-	e-4d-e-g-a-b->d-	e-4.r
}
#bl1x={	o6 v110 l16 q99
	d-^^e-^^g-^^a-^^b-^>d-^
}
#bl1y={	o7 v110 l2 q99
	e-d-	<b-g->	g-e-	d-<a->
	e-d-	<b->d-	e-g-	a-b-
}
#bl1z={	o7 v110 l2 q99
	e-d-	<b-g->	g-e-	d-<a->
	e-d-	<b->d-	g-b-	>d-e-<
}

//_Track 25 [Zap]
#zap3={	o2 v120 q99 l1	b-	}

//_Track 28 [909 SD]
#sd93={	o4 v120 l16 q99
	[2	[3	[4r8v-b-8v+]]	:	[3r8v-b-8v+]>c8v-<b-8v+]	[3r8v-b-8v+]v--b-v+a-v+b-8
}
#sd94={	o4 v120 l16 q99
	[3	[4r8v-b-8v+]]	[3r8v-b-8v+]>c8v-<b-8v+
	[2	>c8<v-[7b-8]v+]	[2>c8<v-[3b-8]v+]	[8>c<v-b-v+]
}
#sd95={	o4 v120 l16 q99
	v->c<[3v-b-][4v+b-]v+b-v-[4b-32]v+b-v->c<v-b-v-a-v-f
}
#sd99={	o4 v120 l16 q99
	[4	r1]
	[2	v-24[4[2b-v-6>c<v-6]v+30]]
	v-12>c<[3v-8b-][12b-v+3]	>c<[6b-32v-4][4v+6b-]
}
#sd9f={	o4 v120 l16 q99
	[7	r1]
	v-12[2[2b-v-6>c<v-6]v+30]>c<[3b-v-8][4v+6b-]
}
#sd9k={	o4 v110 l16 q99
	[3	[4r8b-8]]	[2r8b-8]a-b-b-ra-rb-b-
	[4a-8b-8]	[3a-8b-8]a-rb-b-	[2a-a-b-ra-rb-b-]
	>c<[3v-b-][4v+b-]v+b-v-[4b-32]v+b-v->c<v-b-v-a-v-f
}
#sd9u={	o4 v0 l16 q99
	[8	[8b-v+10>d-<v-9]]
}
#sd9v={	o4 v64 l16 q99
	[8	[8b-v+10>d-<v-9]]
}
#sd9w={	o4 v127 l16 q99
	[4	[2b->d-<rb->d-<rv-20g-32v+5a-32v+5b-32v+5>d-32v+5<]]
	[2	[4b-rv-15a-32v+5b-32v+5>d-v+5<]]
	[8b-v-4][8b-v+4]	v120 b-b-[24b-32v-1]v+24[8b-64v-2]
}
#sd9x={	o5 v120 l16 q99
	[12d-64v-2]v+24[12e-64v-2]v+24[12g-64v-2]v+24[12a-64v-2]v+24[8b-64v-2]v+16>[8d-64v-2]v+16
}

//_Taiko
#taiko3={	v110 l16 q99
	[2	[2	b-rr32v-40b-32v+20b-v+20 b-rb-r v-20b-v+20b-rv-20b-32v-20b-32v+40 b-rb-r
		:	b-rr32v-40b-32v+20b-v+20 b-rb-r v-20b-v+20b-rv-20b-32v-20b-32v+40 b-rv-40b-v+20b-v+20]
			b-rr32v-40b-32v+20b-v+20 b-rb-r b-rb-v-20b-v+20 b-v-20b-32v-20b-32v+20rb-v+20	]
}
#taiko5={	v110 l16 q99
	b-4
}
#taikow={	v110 l16 q99
	[4	[2b-rr32v-40b-32v+40b-v-20b-r32v-20b-32v+40b-v-20b-v+20]]
	[2	[4b-rr32v-40b-32v+40b-]]
	b-rr32v-40b-32v+20b-v+20 b-rb-r b-rb-v-20b-v+20 b-v-20b-32v-20b-32v+20rb-v+20
	b-4
}

//_Track 29 [Taiko L]
#tk13={	o5	#taiko3	}
#tk15={	o5	#taiko5	}
#tk1w={	o5	#taikow	}

//_Track 30 [Taiko R]
#tk23={	o4	#taiko3	}
#tk25={	o4	#taiko5	}
#tk2w={	o4	#taikow	}

//_Track 31 [Wind Chime]
#wnc0={	o5 v100 l1 q99
	y11.T=96,127,!2,127,0,!2^1^1^1;
	b-1^1^1^1^1
}

//_Track 32 [Hit]
#hitx={	o5 v120 l16 q99
	d-^^e-^^g-^^a-^^b-^>d-^
}

//_Track  0 [MetaEvent & SysEx]
#met1={	Tempo = 108;
		GS_EXCLUSIVE($40,$01,$52,$6A);	// Delay Time Center
}
#met2={	Tempo = 132;
		GS_EXCLUSIVE($40,$01,$52,$67);	// Delay Time Center
}
#met3={ l1	Tempo = 126;	[2r]
		GS_EXCLUSIVE($40,$01,$52,$68);	// Delay Time Center
		Tempo = 120;	[2r]
		GS_EXCLUSIVE($40,$01,$52,$69);	// Delay Time Center
		Tempo = 114;	[2r]
		GS_EXCLUSIVE($40,$01,$52,$66);	// Delay Time Center
		Tempo = 108;
		GS_EXCLUSIVE($40,$01,$52,$6A);	// Delay Time Center
}

//---------------------------------------------------------------------------------------------
//_Track List
//	Tr	2Port		Meta	 1	 2	 3	 4	 5	 6	 7	 8	 9	10	11	12	13	14	15	16	17	18	19	20	21	22	23	24	25	26	27	28	29	30	31	32
//			     
Time(  1:1:0)S{	Play(#met1;     ;     ;     ;     ;     ;     ;     ;     ;     ;     ;     ;     ;     ;     ;     ;     ;#pd11;#wd10;#pd21;#pd31;     ;     ;     ;     ;     ;     ;     ;     ;     ;     ;#wnc0;     ;);}// 0
l1[8r*]	S{	Play(#met1;#shk1;     ;     ;     ;     ;     ;     ;     ;     ;     ;     ;     ;     ;     ;     ;     ;#pd11;     ;#pd21;#pd31;#pd41;     ;     ;     ;     ;     ;     ;     ;     ;     ;     ;     ;);}// 1
l1[8r*]	S{	Play(     ;#shk2;     ;     ;#kt12;     ;     ;     ;     ;     ;     ;     ;     ;#sn22;     ;     ;     ;#pd12;#wd12;#pd21;#pd32;     ;     ;     ;     ;     ;     ;     ;     ;     ;     ;     ;     ;);}// 2
l1[8r*]	S{	Play(#met2;     ;#bs13;#bs23;     ;     ;     ;     ;     ;     ;#dr13;#dr23;     ;#sn23;     ;#sn13;     ;     ;     ;     ;     ;     ;#sm13;#sm23;     ;#zap3;#dr33;     ;#sd93;#tk13;#tk23;     ;     ;);}// 3
l1[8r*]	S{	Play(     ;     ;#bs14;#bs24;     ;     ;     ;     ;     ;     ;#dr14;#dr23;     ;#sn24;     ;#sn14;     ;     ;     ;     ;     ;     ;#sm14;#sm24;     ;     ;#dr34;     ;#sd94;#tk13;#tk23;     ;     ;);}// 4
l1[8r*]	S{	Play(     ;     ;#bs15;#bs25;     ;     ;     ;     ;     ;     ;#dr15;#dr25;     ;#sn25;     ;#sn15;     ;     ;     ;     ;     ;     ;#sm15;#sm25;     ;#zap3;#dr35;#dr45;#sd95;#tk15;#tk25;     ;     ;);}// 5
l1  r* 	S{	Play(#met2;     ;#bs16;#bs26;     ;     ;     ;     ;     ;     ;#dr16;#dr26;     ;     ;     ;     ;     ;     ;     ;     ;     ;     ;     ;     ;     ;     ;#dr36;     ;     ;     ;     ;     ;     ;);}// 6
l1[8r*]	S{	Play(     ;     ;#bs16;#bs26;     ;     ;     ;     ;     ;     ;#dr17;#dr27;     ;#sn22;     ;     ;     ;     ;     ;     ;     ;     ;     ;     ;     ;     ;#dr37;#dr47;     ;     ;     ;     ;     ;);}// 7
l1[8r*]	S{	Play(#met2;     ;#bs16;#bs26;#kt16;     ;     ;     ;#pd56;     ;#dr16;#dr26;     ;     ;     ;     ;     ;     ;     ;     ;     ;#pd41;     ;     ;#bl16;     ;#dr38;     ;     ;     ;     ;     ;     ;);}// 8
l1[8r*]	S{	Play(     ;     ;#bs19;#bs29;#kt16;     ;     ;     ;#pd57;     ;#dr19;#dr29;     ;     ;     ;     ;     ;     ;     ;     ;     ;     ;     ;     ;#bl16;     ;#dr39;     ;#sd99;     ;     ;     ;     ;);}// 9
l1[8r*]	S{	Play(#met2;#shk1;#bs1a;#bs23;     ;     ;     ;     ;#pd51;     ;#dr16;#dr26;     ;     ;     ;#sn1a;     ;     ;#wd1a;     ;     ;#pd41;     ;     ;     ;     ;#dr38;     ;     ;     ;     ;#wnc0;     ;);}// a
l1[8r*]	S{	Play(#met2;#shk2;#bs1b;#bs24;     ;     ;     ;     ;#pd53;     ;#dr17;#dr27;     ;#sn22;     ;#sn1b;     ;     ;     ;     ;     ;     ;     ;     ;     ;     ;#dr3b;#dr47;     ;     ;     ;     ;     ;);}// b
l1[8r*]	S{	Play(#met2;     ;#bs1c;#bs2c;     ;     ;#sn4c;     ;#pd5c;     ;#dr16;#dr26;#sn3c;     ;     ;     ;     ;     ;     ;     ;     ;     ;#sm1c;#sm2c;     ;     ;#dr3c;     ;     ;     ;     ;     ;     ;);}// c
l1[8r*]	S{	Play(     ;     ;#bs1d;#bs2d;     ;     ;#sn4d;     ;#pd5d;     ;#dr1d;#dr26;#sn3d;     ;     ;     ;     ;     ;     ;     ;     ;     ;#sm1d;#sm2d;     ;     ;#dr3d;     ;#sd9f;     ;     ;     ;     ;);}// d
l1[8r*]	S{	Play(#met2;     ;#bs1c;#bs2c;     ;     ;#sn4c;     ;#pd5c;     ;#dr16;#dr26;#sn3c;     ;     ;#sn1e;     ;     ;     ;     ;     ;     ;#sm1c;#sm2c;     ;     ;#dr38;     ;     ;     ;     ;     ;     ;);}// e
l1[8r*]	S{	Play(     ;     ;#bs1f;#bs2f;     ;     ;#sn4f;     ;#pd5f;     ;#dr17;#dr27;#sn3f;#sn2f;     ;#sn1f;     ;     ;     ;     ;     ;     ;#sm1f;#sm2f;     ;     ;#dr3f;#dr47;     ;     ;     ;     ;     ;);}// f
l1[8r*]	S{	Play(#met2;     ;#bs1a;#bs23;     ;#sb1a;     ;     ;#pd51;     ;#dr16;#dr2c;     ;#sn2g;     ;#sn1a;     ;     ;#wd1a;     ;     ;#pd41;#sm13;#sm23;     ;     ;#dr38;     ;     ;#tk13;#tk23;     ;     ;);}// g
l1[8r*]	S{	Play(#met2;     ;#bs1b;#bs24;     ;#sb1b;     ;     ;#pd5h;     ;#dr19;#dr2d;     ;#sn2h;     ;#sn1h;     ;     ;     ;     ;     ;     ;#sm14;#sm24;     ;     ;#dr39;     ;#sd99;#tk13;#tk23;     ;     ;);}// h
l1[8r*]	S{	Play(#met2;     ;#bs1i;#bs25;     ;     ;     ;     ;#pd5i;     ;#dr1i;#dr25;     ;#sn25;     ;     ;     ;     ;     ;     ;     ;     ;#sm15;#sm25;     ;     ;#dr35;     ;     ;#tk15;#tk25;     ;     ;);}// i
l1[3r*]	S{	Play(#met2;     ;     ;     ;#kt1j;     ;     ;#pf1l;     ;     ;     ;     ;     ;     ;     ;     ;     ;#pd1j;#wd10;#pd21;#pd3j;#pd41;     ;     ;#bl1j;     ;     ;     ;     ;     ;     ;#wnc0;     ;);}// j
l1[8r*]	S{	Play(     ;     ;     ;#bs2k;#kt1k;     ;     ;#pf1k;     ;     ;#dr1k;     ;     ;     ;     ;     ;     ;#pd1k;     ;#pd21;#pd3k;     ;     ;     ;#bl1k;#zap3;#dr3k;     ;#sd9k;     ;     ;     ;     ;);}// k
l1[8r*]	S{	Play(#met2;     ;#bs1l;#bs2l;#kt1j;     ;     ;#pf1l;#pd5l;     ;#dr16;#dr26;     ;     ;     ;#sn1l;     ;     ;     ;     ;     ;     ;     ;     ;#bl1j;     ;#dr38;     ;     ;     ;     ;     ;     ;);}// l
l1[8r*]	S{	Play(     ;     ;#bs1m;#bs2m;#kt1k;     ;     ;#pf1m;#pd5m;     ;#dr1d;#dr26;     ;     ;     ;#sn1m;     ;     ;     ;     ;     ;     ;     ;     ;#bl1k;     ;#dr3m;     ;#sd9f;     ;     ;     ;     ;);}// m
l1[8r*]	S{	Play(#met2;     ;#bs1l;#bs2l;#kt1j;     ;     ;#pf1l;#pd5l;     ;#dr16;#dr26;     ;#sn2n;     ;#sn1l;     ;     ;     ;     ;     ;     ;     ;     ;#bl1j;     ;#dr38;     ;     ;     ;     ;     ;     ;);}// n
l1[8r*]	S{	Play(     ;     ;#bs1m;#bs2m;#kt1k;     ;     ;#pf1m;#pd5m;     ;#dr1d;#dr26;     ;#sn2o;     ;#sn1m;     ;     ;     ;     ;     ;     ;     ;     ;#bl1k;     ;#dr3m;     ;#sd9f;     ;     ;     ;     ;);}// o
l1[8r*]	S{	Play(#met2;     ;#bs16;#bs26;     ;     ;#sn4p;     ;#pd56;     ;#dr16;#dr26;#sn3p;#sn2p;     ;     ;     ;     ;     ;     ;     ;     ;     ;     ;     ;     ;#dr38;     ;     ;     ;     ;     ;     ;);}// p
l1[8r*]	S{	Play(     ;     ;#bs19;#bs29;     ;     ;#sn4q;     ;#pd57;     ;#dr19;#dr29;#sn3q;#sn2q;     ;     ;     ;     ;     ;     ;     ;     ;     ;     ;     ;     ;#dr39;     ;#sd99;     ;     ;     ;     ;);}// q
l1[8r*]	S{	Play(#met2;     ;     ;     ;#kt1j;     ;     ;     ;#pd5r;     ;#dr1r;#dr23;     ;     ;     ;     ;     ;#pd1r;     ;#pd21;#pd3r;#pd41;     ;     ;#bl1j;#zap3;#dr3r;     ;     ;     ;     ;     ;     ;);}// r
l1[8r*]	S{	Play(#met3;     ;     ;     ;#kt1k;     ;     ;     ;#pd5s;     ;#dr1s;#dr2s;     ;     ;     ;     ;     ;#pd1s;     ;#pd21;#pd3s;     ;     ;     ;#bl1k;     ;#dr3s;     ;     ;     ;     ;     ;     ;);}// s
l1[9r*]	S{	Play(#met2;     ;     ;     ;     ;     ;     ;     ;#pd5t;     ;#dr1t;     ;     ;     ;     ;     ;     ;     ;#wd1t;#pd2t;     ;     ;     ;     ;     ;     ;     ;     ;     ;     ;     ;     ;     ;);}// t
l1[2r*] 	S{	Play(#met2;     ;     ;     ;     ;     ;     ;     ;#pd51;     ;#dr1u;     ;     ;#sn2u;     ;#sn13;     ;     ;     ;     ;     ;     ;     ;     ;     ;#zap3;#dr3u;     ;#sd9u;#tk13;#tk23;     ;     ;);}// u
l1[8r*]	S{	Play(     ;     ;     ;     ;     ;     ;     ;     ;#pd52;     ;#dr1v;     ;     ;#sn2v;     ;#sn1v;     ;     ;     ;     ;     ;     ;     ;     ;     ;     ;#dr3v;     ;#sd9v;#tk13;#tk23;     ;     ;);}// v
l1[8r*]	S{	Play(     ;     ;     ;     ;     ;     ;     ;     ;#pd5w;     ;#dr1w;     ;     ;#sn2w;     ;#sn1w;     ;     ;     ;     ;     ;     ;     ;     ;     ;     ;#dr3w;     ;#sd9w;#tk1w;#tk2w;     ;     ;);}// w
l1[8r*]	S{	Play(#met2;     ;#bs1x;#bs2x;#kt1x;     ;     ;     ;     ;     ;#dr1x;     ;     ;#sn2x;     ;     ;     ;     ;     ;     ;     ;     ;     ;     ;#bl1x;     ;#dr3x;     ;#sd9x;     ;     ;     ;#hitx;);}// x
l1 r* 	S{	Play(#met2;     ;#bs1a;#bs23;#kt1y;     ;     ;     ;#pd51;     ;#dr16;#dr26;     ;#sn2u;     ;#sn13;     ;     ;#wd1a;     ;     ;#pd41;     ;     ;#bl1y;#zap3;#dr38;     ;     ;     ;     ;#wnc0;     ;);}// y
l1[8r*]	S{	Play(     ;     ;#bs1b;#bs24;#kt1z;     ;     ;     ;#pd5m;     ;#dr1d;#dr26;     ;#sn2v;     ;#sn1z;     ;     ;     ;     ;     ;     ;     ;     ;#bl1z;     ;#dr3m;     ;#sd9f;     ;     ;     ;     ;);}// z
l1[8r*]	S{	Play(#met2;     ;#bs1a;#bs23;#kt1y;     ;     ;     ;#pd51;     ;#dr16;#dr26;     ;#sn2u;     ;#sn13;     ;     ;     ;     ;     ;#pd41;     ;     ;#bl1y;     ;#dr38;     ;     ;     ;     ;     ;     ;);}// A
l1[8r*]	S{	Play(#met2;     ;#bs1b;#bs24;#kt1z;     ;     ;     ;#pd53;     ;#dr17;#dr27;     ;#sn2v;     ;#sn1z;     ;     ;     ;     ;     ;     ;     ;     ;#bl1z;     ;#dr3b;#dr47;     ;     ;     ;     ;     ;);}// B
l1[8r*]	S{	Play(#met2;#shkC;#bs1a;#bs23;#kt1y;     ;     ;     ;#pd51;     ;#dr16;#dr26;     ;#sn2C;     ;#sn13;     ;     ;     ;     ;     ;#pd41;#sm13;#sm23;#bl1y;     ;#dr38;     ;     ;#tk13;#tk23;     ;     ;);}// C
l1[8r*]	S{	Play(#met2;#shkD;#bs1b;#bs24;#kt1z;     ;     ;     ;#pd5m;     ;#dr1d;#dr26;     ;#sn2D;     ;#sn1z;     ;     ;     ;     ;     ;     ;#sm14;#sm24;#bl1z;     ;#dr3m;     ;#sd9f;#tk13;#tk23;     ;     ;);}// D
l1[8r*]	S{	Play(#met2;     ;#bs1a;#bs23;#kt1y;#sb1E;     ;     ;#pd51;     ;#dr16;#dr2c;     ;#sn2C;     ;#sn13;     ;     ;     ;     ;     ;#pd41;#sm13;#sm23;#bl1y;     ;#dr38;     ;     ;#tk13;#tk23;     ;     ;);}// E
l1[8r*]	S{	Play(#met2;     ;#bs1b;#bs24;#kt1z;#sb1F;     ;     ;#pd53;     ;#dr19;#dr2d;     ;#sn2D;     ;#sn1z;     ;     ;     ;     ;     ;     ;#sm14;#sm24;#bl1z;     ;#dr39;     ;#sd99;#tk13;#tk23;     ;     ;);}// F
l1[8r*]	S{	Play(#met2;     ;     ;     ;#kt1j;     ;     ;#pf1l;#pd51;     ;#dr1r;#dr23;     ;#sn2u;     ;#sn13;     ;     ;     ;     ;     ;#pd41;     ;     ;#bl1j;#zap3;#dr3r;     ;     ;     ;     ;     ;     ;);}// G
l1[8r*]	S{	Play(#met3;     ;     ;     ;#kt1k;     ;     ;#pf1k;#pd5H;     ;#dr1s;#dr2s;     ;#sn2H;     ;#sn1H;     ;     ;     ;     ;     ;     ;     ;     ;#bl1k;     ;#dr3s;     ;     ;     ;     ;     ;     ;);}// H
//l1[8r*]	S{	Play(     ;     ;     ;     ;     ;     ;     ;     ;     ;     ;     ;     ;     ;     ;     ;     ;     ;     ;     ;     ;     ;     ;     ;     ;     ;     ;     ;     ;     ;     ;     ;     ;     ;);}// 
l1[8r*] v0 b-
/*
//				
//	Tr	1Port		 1	 2	 3	 4	 5	 6	 7	 8	 9	10	11	12	13	14	15	16
Time(  1:1:0)S{	Play(;     ;     ;     ;     ;     ;     ;     ;     ;     ;     ;     ;     ;     ;     ;     ;     ;);}
l1[8r*]	S{	Play(;     ;     ;     ;     ;     ;     ;     ;     ;     ;     ;     ;     ;     ;     ;     ;     ;);}
l1[8r*] v0 a
*/
//---------------------------------------------------------------------------------------------
//_Memo
/*
	If(SynthType==7)	{		}
Else{	If(SynthType==6)	{		}
Else{	If(SynthType==5)	{		}
Else{	If(SynthType==4)	{		}
Else{	If(SynthType==3)	{		}
Else{	If(SynthType==2)	{		}
Else{	If(SynthType==1)	{		}
Else{	If(SynthType==0)	{		}
}}}}}}}

Switch(SynthType){
	Case(7){		}
	Case(6){		}
	Case(5){		}
	Case(4){		}
	Case(3){		}
	Case(2){		}
	Case(1){		}
	Default{		}
}
*/