//------------------------------------------------------------------------------
TrackName = {"Erster Satz zu einem Konzert in F"}
Copyright = {Composed by W.A.Mozart 1756-1791 /  MIDI Arranged by Atsushi Watanabe(S.W.) }
//------------------------------------------------------------------------------
//2005. 2.11	
//------------------------------------------------------------------------------
Include(midistd.h);

//System Define
System.TimeBase(480);		// Timebase
System.VoiceNoShift(1);		// Voice No.
System.ControllerShift(1);	// Controll Change
System.MeasureShift(0);		// 小節数のシフト設定

Int idRoland = $41				//Roland メーカコード
Int idDevice = $10				//Device ID
Int id1_RolandFantomXR = $00	//Rolanmd FantomXR
Int id2_RolandFantomXR = $6B	//Rolanmd FantomXR

Int ptPerformanceMode = $11000000
Int szPerformanceMode = $00200000
Int ptPatchTone = $002000
Int szPatchTone = $000200
Int ptLFO1_Waveform		= $006D		//0-15
Int ptLFO1_Rate			= $006E		//0-255
Int ptLFO1_DelayTime	= $0072		//0-15
Int ptLFO1_FadeTime		= $0075		//0-255
Int ptLFO1_PitchDepth	= $0077		//0-255

//==============================================================================
//		音色（ＧＳ音源の、定義されてない音色がピアノ化する対策）
//------------------------------------------------------------------------------
//	bRate	レート				(-64〜63)
//	bLevel	レベル				(-64〜63)
//	bDacay	ディケイ			(-64〜63)
//------------------------------------------------------------------------------
Function VoiceEx(bVoice,bMsb,bLsb){
	Time = (Time - 11);
	Voice(bVoice,bMsb,bLsb);
	Time = (Time + 11);

};
//==============================================================================
//		Exclusive
//------------------------------------------------------------------------------
//	iAddress	4 Byte			アドレス
//	iData		0〜15 (0〜127)	データ
//------------------------------------------------------------------------------
Function Fantom_SysEX1(iAddress, iData){

	Int add1 = (iAddress/(256*256*256));
	Int add2 = (iAddress/(256*256))-add1*256;
	Int add3 = (iAddress/(256))-add1*256*256-add2*256
	Int add4 = (iAddress/(1))-add1*256*256*256-add2*256*256-add3*256;

	Int data1 = iData;

	SysEx=$F0,idRoland,idDevice,id1_RolandFantomXR,id2_RolandFantomXR,$12,{add1,add2,add3,add4,data1},$F7

};
//==============================================================================
//		Exclusive
//------------------------------------------------------------------------------
//	iAddress	4 Byte			アドレス
//	iData		0〜255			データ
//------------------------------------------------------------------------------
Function Fantom_SysEX2(iAddress, iData){

	Int add1 = (iAddress/(256*256*256));
	Int add2 = (iAddress/(256*256))-add1*256;
	Int add3 = (iAddress/(256))-add1*256*256-add2*256
	Int add4 = (iAddress/(1))-add1*256*256*256-add2*256*256-add3*256;

	Int data1 = (iData/(16));
	Int data2 = (iData/(1))-data1*16

	SysEx=$F0,idRoland,idDevice,id1_RolandFantomXR,id2_RolandFantomXR,$12,{add1,add2,add3,add4,data1,data2},$F7

};
//==============================================================================
//		Exclusive
//------------------------------------------------------------------------------
//	iAddress	4 Byte			アドレス
//	iData		0〜65535		データ
//------------------------------------------------------------------------------
Function Fantom_SysEX4(iAddress, iData){

	Int add1 = (iAddress/(256*256*256));
	Int add2 = (iAddress/(256*256))-add1*256;
	Int add3 = (iAddress/(256))-add1*256*256-add2*256
	Int add4 = (iAddress/(1))-add1*256*256*256-add2*256*256-add3*256;

	Int data1 = (iData/(16*16*16));
	Int data2 = (iData/(16*16))-data1*16;
	Int data3 = (iData/(16))-data1*16*16-data2*16
	Int data4 = (iData/(1))-data1*16*16*16-data2*16*16-data3*16;

	SysEx=$F0,idRoland,idDevice,id1_RolandFantomXR,id2_RolandFantomXR,$12,{add1,add2,add3,add4,data1,data2,data3,data4},$F7

};
//==============================================================================
//		LFO	（1〜4全てのLFO1を設定する。）
//------------------------------------------------------------------------------
//	ch		チャンネル						1〜16
//	form	波形							0〜15
//	Rate	周期							0〜255
//	Dacay	開始までの時間					0〜127
//	fade	開始からDepthに達するまでの時間	0〜127
//	Depth	ピッチの振幅量					0〜127
//------------------------------------------------------------------------------
Function Fantom_LFO1(ch,form,rate,delay,fade,depth){

	//４チャンネル毎にアドレスが飛ぶので、その計算。
	Int iCh = (ch-1)-((ch-1)/4)*4 + ((ch-1)/4)*8

	//４つの発振器全てに適用する。
	For(Int i=1;i<=4;i++){
	
		//アドレスの計算
		Int ptAddress = ptPerformanceMode + szPerformanceMode*(iCh) + ptPatchTone + szPatchTone*(i-1);

		//Fantom-XRへ送信
		Fantom_SysEX1(ptAddress + ptLFO1_Waveform	,form);
		Fantom_SysEX2(ptAddress + ptLFO1_Rate		,rate);
		Fantom_SysEX1(ptAddress + ptLFO1_DelayTime	,delay);
		Fantom_SysEX1(ptAddress + ptLFO1_FadeTime	,fade);
		Fantom_SysEX1(ptAddress + ptLFO1_PitchDepth	,depth);

	};

};
//==============================================================================
//	ポルタメント	（lengの分タイムポインタが進みます。）
//------------------------------------------------------------------------------
//	Delay	ポルタメントが始まるまでの時間
//	sNote	最初の音程				（例：	o4c	）
//	eNote	ポルタメント後の音程	（例：	o4e	）
//	Ptime	ポルタメントタイム
//	Leng	音長さ
//==============================================================================
Function PoEX(INT Delay, STR sNote, STR eNote, INT Ptime, INT Leng){

	//------------------------------------------
	//ディレイが有る場合の処理
	If(Delay<>0){

		//t命令の分だけ、key onをずらす
		INT mmlt = (MML(t));
		Time = (Time + mmlt);			//t命令の分だけずらす
		DirectSMF(($90+Channel-1),(NoteNo(sNote) and $7F),(MML(v) and $7f));	//ディレイがあるなら、KeyOn
		Time = (Time - mmlt);			//ずらした分戻す。
	};

	//------------------------------------------
	//ポルタメント開始。

	INT mmlt = (MML(t));
	Time = (Time + mmlt);				//t命令の分だけずらす
	Time = (Time + Delay);				//ディレイの分だけ加算。

	//ポルタメントの設定
	PT(Ptime);							//ポルタメント タイム

//--------------------------------------------
//	y84,(NoteNo(sNote) and $7f);
//	NoteOn((NoteNo(eNote) and $7F),MML(v));
//	上記のMMLは、SMF上で連続しなければならない。
	DirectSMF(($B0+Channel-1),84,(NoteNo(sNote) and $7f),0,($90+Channel-1),(NoteNo(eNote) and $7F),(MML(v) and $7f));

	//------------------------------------------

	Time = (Time - Delay);
	Time = (Time - mmlt);

	Time = Time + Leng;					//ならす時間。

	INT mmlq = (Delay*(100-MML(q))/100);
	Time = (Time - mmlq);				//q命令の分だけずらす
	//ディレイが有る場合の処理
	If(Delay<>0){
		Time = (Time - 1);
		DirectSMF(($80+Channel-1),(NoteNo(sNote) and $7F),0);
		Time = (Time + 1);
	}
	DirectSMF(($80+Channel-1),(NoteNo(eNote) and $7F),0);
	Time = (Time + mmlq);				//ずらした分戻す。

};
//==============================================================================
//	ポルタメント	廉価版	（タイムポインタは変化しません。）
//------------------------------------------------------------------------------
//	sNote	最初の音程				（例：	o4c	）
//	Ptime	ポルタメントタイム
//==============================================================================
Function Po(STR sNote, INT Ptime){

	//ポルタメントの設定
	Time = (Time - 16);
	PT(Ptime);							//ポルタメント タイム
	y84,NoteNo(sNote);					//ポルタメント 開始の音程
	Time = (Time + 16);
};
//------------------------------------------------------------------------------
//Macro	Inst

Str PE ={	Time = (Time - 7);	PS(127)	Time = (Time + 7);	};
Str PD ={	Time = (Time - 7);	PS(0)	Time = (Time + 7);	};

Str	Ton ={ t.Random(16);	t0		};	//32
Str	Toff={ t.Random( 0);	t0		};

Str Von ={ v.Random( 7);	v.Repeat(off);	v.Range(1,127);	};	
Str	Voff={ v.Random( 0);	v.Repeat(off);	v.Range(1,127);	};

Str	Qon ={ q.Random( 1);	q95	};
Str	Qoff={ q.Random( 0);	q95	};

Str Bon ={ PitchBend.Random(-16,16);		};
Str Boff={ PitchBend.Random=0;				};

Str TInit={	Von Qon Bon BR(12) EP(100)	};						//その他、全パートに共通する、初期設定など

Str	Pon  = { y64,127	};
Str	Poff = { y64,0		};
Str	Psw  = { y64,0	y64,127	};	//ペダル　放して　踏む


//--------------------------------------------------------------------
//Panpot位置メモ書き
// 0 [8] 16 [24] 32 40 [48] 56 (64) 72 [80] 88 96 [104] 112 [120] 128
//           Vn1        Va              Vc         Vn2       Cb         //←白鳥の湖はこれ。
//    Cb     Vn1        Vc              Va         Vn2                  //古典の基本形
//           Vn1        Vn2             Va         Vc        Cb         //現在のオーケストラ配置

//各楽器の音色を作成

//---------------
//■木管楽器
STR	HornI		= {	VoiceEx(40,87,0)	TrackKey(+5)	TInit	Ton	P(32);	Reverb(100);	y93,0	Slur(2,105);	V(100)	};
STR	HornII		= {	VoiceEx(40,87,0)	TrackKey(+5)	TInit	Ton	P(40);	Reverb(100);	y93,0	Slur(2,105);	V(100)	};
STR	ClarinetI	= {	VoiceEx(50,93,8)	TrackKey(+12)	TInit	Ton	P(48);	Reverb(100);	y93,0	Slur(2,105);	V(80)	};
STR	ClarinetII	= {	VoiceEx(50,93,8)	TrackKey(+12)	TInit	Ton	P(56);	Reverb(100);	y93,0	Slur(2,105);	V(80)	};
STR	FagotteI	= {	VoiceEx(63,93,8)	TrackKey(+12)	TInit	Ton	P(72);	Reverb(100);	y93,0	Slur(2,105);	V(80)	};
STR	FagotteII	= {	VoiceEx(63,93,8)	TrackKey(+12)	TInit	Ton	P(80);	Reverb(100);	y93,0	Slur(2,105);	V(80)	};
STR	Oboe		= {	VoiceEx(56,93,8)	TrackKey(+12)	TInit	Ton	P(64);	Reverb(120);	y93,0	Slur(2,105);	V(100)	};

//奏法別
STR	Hr	= {	VoiceEx(40,87, 0)	TrackKey(+5)	};	//	72	ソロ
STR	HrM	= {	VoiceEx(40,87, 0)	TrackKey(+5)	};	//	73	マルカート
STR	HrS	= {	VoiceEx(41,87, 0)	TrackKey(+5)	};	//	-	スタッカート
STR	HrZ	= {	VoiceEx(77,93,23)	TrackKey(+5)	};	//	78	sfz
STR	HrR	= {	VoiceEx(16,93,23)	TrackKey(+5)	};	//	79	Rip

STR	ViolinI		= {	VoiceEx( 0,87,0)	TrackKey(+12)	TInit Toff	P(24);	Reverb( 80);	y87,02	Slur(2,105);	V(100)	};
STR	ViolinII	= {	VoiceEx( 0,87,0)	TrackKey(+12)	TInit Toff	P(48);	Reverb( 80);	y93,28	Slur(2,105);	V(100)	};
STR	ViolaI		= {	VoiceEx(10,87,0)	TrackKey(+12)	TInit Toff	P(72);	Reverb( 80);	y93,24	Slur(2,105);	V(100)	};
STR	ViolaII		= {	VoiceEx(10,87,0)	TrackKey(+12)	TInit Toff	P(104);	Reverb( 80);	y93,24	Slur(2,105);	V(100)	};
STR	Cello		= {	VoiceEx(20,87,0)	TrackKey(+12)	TInit Toff	P(96);	Reverb( 80);	y93,16	Slur(2,105);	V(100)	};
STR	Bass		= {	VoiceEx(30,87,0)	TrackKey(+0)	TInit Toff	P(120);	Reverb( 80);	y93,8	Slur(2,105);	V(100)	};

//奏法別	(マルカート)
STR	VnM	= {	VoiceEx( 0,87,0)	TrackKey(+12)	};
STR	VaM	= {	VoiceEx(10,87,0)	TrackKey(+12)	};
STR	VcM	= {	VoiceEx(20,87,0)	TrackKey(+12)	};
STR	CbM	= {	VoiceEx(30,87,0)	TrackKey(+0)	};

//奏法別	(スタッカート)
STR	VnT	= {	VoiceEx( 2,87,0)	TrackKey(+12)	};
STR	VaT	= {	VoiceEx(12,87,0)	TrackKey(+12)	};
STR	VcT	= {	VoiceEx(22,87,0)	TrackKey(+12)	};
STR	CbT	= {	VoiceEx(32,87,0)	TrackKey(+0)	};

//奏法別	(ピッチカート)
STR	VnP	= {	VoiceEx( 1,87,0)	TrackKey(+12)	};
STR	VaP	= {	VoiceEx(11,87,0)	TrackKey(+12)	};
STR	VcP	= {	VoiceEx(21,87,0)	TrackKey(+12)	};
STR	CbP	= {	VoiceEx(31,87,0)	TrackKey(+0)	};

//奏法別	(ソロ)
STR	VnS	= {	VoiceEx(65,93,7)	TrackKey(+12)	};
STR	VaS	= {	VoiceEx(67,93,7)	TrackKey(+12)	};
STR	VcS	= {	VoiceEx(70,93,7)	TrackKey(+12)	};
STR	CbS	= {	VoiceEx(75,93,7)	TrackKey(+0)	};

//------------------------------------------------------------------------------
//Excluesive
Tempo=200;
TimeSignature=4,4;

TR(1);	Port(0);
	GM_SystemOn
	GM_SystemOff																//GM System off
	r32	SysEx=$F0,$41,$7F,$00,$6B,$12,{$10,$00,$06,$00,  3},$f7					//Reverb Hall
	r32	SysEx=$F0,$41,$7F,$00,$6B,$12,{$10,$00,$06,$01,100},$f7					//Reverb Level
	r32	SysEx=$F0,$41,$7F,$00,$6B,$12,{$10,$00,$06,$03,$08,$00,$07,$09},$f7		//Ply Delay = 92ms
	r32	SysEx=$F0,$41,$7F,$00,$6B,$12,{$10,$00,$06,$07,$08,$00,$04,$08},$f7		//Time = 72
	r32	SysEx=$F0,$41,$7F,$00,$6B,$12,{$10,$00,$06,$0B,$08,$00,$00,$07},$f7		//Size = 8
//	r32	SysEx=$F0,$41,$7F,$00,$6B,$12,{$10,$00,$06,$0F,$08,$00,$03,$0F},$f7		//HF Dump
//	r32	SysEx=$F0,$41,$7F,$00,$6B,$12,{$10,$00,$06,$13,$08,$00,$00,$00},$f7		//Density
//	r32	SysEx=$F0,$41,$7F,$00,$6B,$12,{$10,$00,$06,$17,$08,$00,$00,$00},$f7		//Diffusion
//	r32	SysEx=$F0,$41,$7F,$00,$6B,$12,{$10,$00,$06,$1B,$08,$00,$00,$00},$f7		//LF Dump Freq
//	r32	SysEx=$F0,$41,$7F,$00,$6B,$12,{$10,$00,$06,$1F,$08,$00,$00,$00},$f7		//LF Dump Gain
//	r32	SysEx=$F0,$41,$7F,$00,$6B,$12,{$10,$00,$06,$23,$08,$00,$00,$00},$f7		//LF Dump Freq
//	r32	SysEx=$F0,$41,$7F,$00,$6B,$12,{$10,$00,$06,$27,$08,$00,$00,$00},$f7		//LF Dump Gain

TR(16);	Port(0);	r2

//------------------------------------------------------------------------------
//ヴェルクマイスター第1技法第3番(for C major)
MasterTuning(643);		//	A=442Hz
//						c  c+ d  d+ e  f  f+ g  g+ a  a+ b
NRT_OctaveTuningB($FFFF,76,66,68,70,66,74,64,72,68,64,72,68)

//------------------------------------------------------------------------------
//通信負荷軽減目的
TrackSync;

Track(1);	Port(0);	CH(1)	r8
Track(2);	Port(0);	CH(2)	r8.
Track(3);	Port(0);	CH(3)	r4
Track(4);	Port(0);	CH(4)	r4 r16
Track(5);	Port(0);	CH(5)	r4.
Track(6);	Port(0);	CH(6)	r4..
Track(7);	Port(0);	CH(7)	r2
Track(8);	Port(0);	CH(8)	r2 r16
Track(9);	Port(0);	CH(9)	r2 r8
Track(10);	Port(0);	CH(10)	r2 r8.
Track(11);	Port(0);	CH(11)	r2.
Track(12);	Port(0);	CH(12)	r2.r16
Track(13);	Port(0);	CH(13)	r2..
Track(14);	Port(0);	CH(14)	r2...
Track(15);	Port(0);	CH(15)	r1
Track(16);	Port(0);	CH(16)	r1r1

//------------------------------------------------------------------------------
//Track setting

TR(1)	SysEx$ = F0,41,7F,00,6B,12,{10,00,20,1F,1},F7
TR(2)	SysEx$ = F0,41,7F,00,6B,12,{10,00,21,1F,1},F7
TR(3)	SysEx$ = F0,41,7F,00,6B,12,{10,00,22,1F,1},F7
TR(4)	SysEx$ = F0,41,7F,00,6B,12,{10,00,23,1F,1},F7
TR(5)	SysEx$ = F0,41,7F,00,6B,12,{10,00,24,1F,1},F7
TR(6)	SysEx$ = F0,41,7F,00,6B,12,{10,00,25,1F,1},F7
TR(7)	SysEx$ = F0,41,7F,00,6B,12,{10,00,26,1F,1},F7
TR(8)	SysEx$ = F0,41,7F,00,6B,12,{10,00,27,1F,1},F7
TR(9)	SysEx$ = F0,41,7F,00,6B,12,{10,00,28,1F,1},F7
TR(10)	SysEx$ = F0,41,7F,00,6B,12,{10,00,29,1F,1},F7
TR(11)	SysEx$ = F0,41,7F,00,6B,12,{10,00,2A,1F,1},F7
TR(12)	SysEx$ = F0,41,7F,00,6B,12,{10,00,2B,1F,1},F7
TR(13)	SysEx$ = F0,41,7F,00,6B,12,{10,00,2C,1F,1},F7
TR(14)	SysEx$ = F0,41,7F,00,6B,12,{10,00,2D,1F,1},F7
TR(15)	SysEx$ = F0,41,7F,00,6B,12,{10,00,2E,1F,1},F7
TR(16)	SysEx$ = F0,41,7F,00,6B,12,{10,00,2F,1F,1},F7

//------------------------------------------------------------------------------
//Track setting

TR(1)	InstrumentName={"Clarinet I"}		ClarinetI		EP(100);
TR(2)	InstrumentName={"Clarinet II"}		ClarinetII		EP(100);
TR(3)	InstrumentName={"Fagotte I"}		FagotteI		EP(100);
TR(4)	InstrumentName={"Fagotte II"}		FagotteII		EP(100);
TR(5)	InstrumentName={"Horn I"}			HornI			EP(100);
TR(6)	InstrumentName={"Horn II"}			HornII			EP(100);
TR(7)	InstrumentName={"Oboe"}				Oboe			EP(100);



TR(11)	InstrumentName={"Violino I"}		ViolinI		VnM	EP(100);
TR(12)	InstrumentName={"Violino II"}		ViolinII	VnM	EP(100);
TR(13)	InstrumentName={"Viola I"}			ViolaI		VaM	EP(100);
TR(14)	InstrumentName={"Viola II"}			ViolaII		VaM	EP(100);
TR(15)	InstrumentName={"ViolonCello"}		Cello		VcT	EP(100);
TR(16)	InstrumentName={"ViolonBasso"}		Bass		CbT	EP(100);
				r2

//------------------------------------------------------------------------------
//Macro

Str EmbNoth	= {	q99	EP(100)	}														//エンベロープ無し

Str EmbLng1	= {	q99	EP.onNoteWave(( 80,110,!2 ),(110,64,!1.))	}					//１部音符
Str EmbLng2	= {	q99	EP.onNoteWave(( 80,110,!4 ),(110,64,!2.))	}					//２部音符

Str EmbCre1	= {	q99	EP.onNoteWave(( 48,100,!1 ),(100, 48,!1))	}					//１部音符　クレッシェンド
Str EmbCre2	= {	q99	EP.onNoteWave(( 48,100,!2 ),(100, 48,!1))	}					//２部音符　クレッシェンド
Str EmbCre4	= {	q99	EP.onNoteWave(( 48,100,!8.),(100, 48,!1))	}					//２部音符　クレッシェンド

Str EmbDec1	= {	q99	EP.onNoteWave(( 90,100,!64),(100, 48,!1))	}					//１部音符　デクレッシェンド
Str EmbDec2	= {	q99	EP.onNoteWave(( 90,100,!64),(100, 48,!2))	}					//２部音符　デクレッシェンド

Str EmbM4	= {	q99	EP.onNoteWave((100,90,!4))					}					//８部音符　マルカート
Str EmbM8	= {	q99	EP.onNoteWave((100,90,!8))					}					//８部音符　マルカート
Str EmbM16	= {	q99	EP.onNoteWave((100,90,!16))					}					//16部音符　マルカート
Str EmbM32	= {	q99	EP.onNoteWave((100,90,!32))					}					//16部音符　マルカート

Str EmbS4	= {	q99	EP.onNoteWave(( 90,100,!64),(100,92,!64),(90,48,!8..))	}		//８部音符　スタッカート
Str EmbS8	= {	q99	EP.onNoteWave(( 90,100,!64),(100,92,!64),(90,72,!16.))	}		//８部音符　スタッカート
Str EmbS16	= {	q99	EP.onNoteWave(( 90,100,!64),(100,92,!64),(90,80,!32))	}		//16部音符　スタッカート
Str EmbS32	= {	q99	EP.onNoteWave(( 90,100,!64),(100,64,!64))				}		//32部音符　スタッカート

Str EmbE8	= {	q99	EP.onNoteWave(( 90,100,!64),(100,90,!16..),(90,64,!8))	}		//８部音符　次が休符
Str EmbN	= {	q99	EP.onNoteWave(( 90,100,!64),(100,60,!1))	}					//64〜４部音符　短い音符
Str EmbAN	= {	q99	EP.onNoteWave((100,120,!64),(120,60,!1))	}					//64〜４部音符　強めのアタック
Str EmbSA	= {	q99	EP.onNoteWave((120,100,!8 ),(100,60,!8))	}					//64〜４部音符　強めのアタック

Str ExpL4 = {	q95	EP.Frequency(20) EP.onNoteWave(( 90, 80, !16),( 80,100,!8.))	};	//Brass
Str ExpL1 = {	q95	EP.Frequency(20) EP.onNoteWave(( 90, 80, !16),( 80,110,!8.),(110,100,!4 ))	};	//Brass
Str ExpreP = {	q95	EP.Frequency(20) EP.onNoteWave((100,100, !8 ),(100, 90,!1 ))	};	//Pipe
Str ExpreV = {	q95	EP.Frequency(20) EP.onNoteWave(( 80,100, !4 ),(100, 64,!1 ))	};	//Pipe
Str ExpreD = {	q95	EP.Frequency(20) EP.onNoteWave((100, 80, !16),( 80,  0,!4 ))	};	//下降
Str ExpreF = {	q95	EP.Frequency(20) EP.onNoteWave((100, 90, !16),( 90, 32,!2 ))	};	//下降2
Str ExpreG = {	q95	EP.Frequency(20) EP.onNoteWave((100,100, !16),(100, 64,!2 ))	};	//下降3
Str ExpreB = {	q95	EP.Frequency(20) EP.onNoteWave((100, 80, !16),(80,100,!8 ),(100, 80,!2))	};	//下降2
Str ExpreC = {	q95	EP.Frequency(20) EP.onNoteWave((100, 64, !16),(64,100,!4 ),(100,120,!2))	};	//下降2

Str ExpreS = {	q95	EP.Frequency(20) EP.onNoteWave((100, 64,!16 ),( 64,  0,!8 ))	};	//スタッカート
Str ExpreH = {	q80	EP.Frequency(20) EP.onNoteWave(( 90,100, !8 )		 			};	//−・　（スタッカートと伸ばすやつ）

Str	Mon		= {	M.onNoteWave(0, 64,!8);	};
Str	MonS	= {	M.onNoteWave(0,127,!8);	};


//------------------------------------------------------------------------------
TrackSync;	//4:1:0

TimeSignature=4,4;
Tempo=144;

KeyFlag-(b)
TR(1)			l8 o5v43		ExpreP	r*1					|		r*1					|		r*1								|	r*1				|	r*1					|	r*1							|			r*1						|	f1							|	^1							|	^4		r*2.	EP(100)
TR(2)			l8 o4v43		ExpreP	r*1					|		r*1					|		r*1								|	r*1				|	r*1					|	r*1							|			r*1						|	f1							|	^1							|	^4		r*2.	EP(100)
TR(3)			l8 o3v43 MonS	ExpreP	r*1					|		r*1					|		r*1								|	r*1				|	a2			g&a&b&a	|>	d4.c<				br*	ar*	|			g4	a4	`c4	[4	`c32&b32]	a4			r*2.			|	r*1							|	r*1				EP(100)	M(0)
TR(4)			l8 o3v43 MonS	ExpreP	r*1					|		r*1					|		r*1								|	r*1				|	f2			e&f&g&f	|	b4.a				gr*	fr*	|			e4	f4	a4	[4	a32&g32	]	f4			r*2.			|	r*1							|	r*1				EP(100)	M(0)
KeyFlag-()
TR(5)			l8 o5v43				r*1					|		r*1					|		r*1						HrS		|	r*ccc	cccc	Hr	ExpreB		c1		|	^1							|			^1						|	^1							|	^1							|	^4		r*2.	EP(100)
TR(6)			l8 o4v43				r*1					|		r*1					|		r*1						HrS		|	r*ccc	cccc	Hr	ExpreB		c1		|	^1							|			^1						|	^1							|	^1							|	^4		r*2.	EP(100)
KeyFlag-(b)
TR(7)			l8 o5v50 MonS	ExpreP	f2	EmbN	e&f&g&f	| b4.a				gr*	fr*				e4&	f4&	a4&	[4	a32&g32&	]	f4	r*2.		|	a2			g&a&b&a	|>	d4.c<				br*	ar*	|			g4	a4	`c4	[4	`c32&b32]	a4			r*2.			|	r*1							|	r*1				EP(100)	M(0)
TR(11) 			l8 o4v50		EmbLng2	f2	EmbN	e&f&g&f	| b4.a	EP(100)	VnT	gr*	fr*	VnM	EmbN	e4&	f4&	a4&	[4	a32&g32&	]	f4	r*2.	EmbLng2	a2	EmbN	g&a&b&a	|>	d4.c<	EP(100)	VnT	br*	ar*	VnM	EmbN	g4	a4	`c4	[4	`c32&b32]	a4r*4>	l16	e-8&cr*	c8&<ar*	|	a8&br*	r*4	`d8&br*>f8dr*	|	"b*8cr*	r*2.	EP(100)
TR(12) 			l8 o3v50		EmbLng2	a2	EmbN	g&a&b&a	|>d4.c<	EP(100)	VnT	br*	ar*	VnM	EmbN	g4&	a4&`c4&	[4	`c32&b32&	]	a4	r*2.>	EmbLng2	f2	EmbN	e&f&g&f	|	b4.a	EP(100)	VnT	gr*	fr*	VnM	EmbN	e4	f4	a4	[4	a32&g32	]	EmbLng2	f2&	e-2				|	d2&			"b2				|	"a4		r*2.	EP(100)
TR(13)		VaT	l8 o3v43				ffff		ffff	|	ffff		ffff		|			ffff		ffff			|	f>ccc	cccc	|	c4	r*2.			|	r*1							|			r*1					o4	|	ffff		ffff			|	ffff		ffff			|	f4		r*2.	EP(100)
TR(14)		VaT	l8 o3v43				ffff		ffff	|	ffff		ffff		|			ffff		ffff			|	f aaa	aaaa	|	a4	r*2.			|	r*1							|			r*1					o4	|	ffff		ffff			|	ffff		ffff			|	f4		r*2.	EP(100)
TR(15)		VcT	l8 o3v43				ffff		ffff	|	ffff		ffff		|			ffff		ffff			|	f4r*4	r*2		|	ffff	ffff		|	ffff				ffff	|			ffff	ffff			|	f4	r*2.					|	r*1							|	r*1				EP(100)
TR(16)		CbT	l8 o3v43				ffff		ffff	|	ffff		ffff		|			ffff		ffff			|	f4r*4	r*2		|	ffff	ffff		|	ffff				ffff	|			ffff	ffff			|	f4	r*2.					|	r*1							|	r*1				EP(100)	//Cb

//------------------------------------------------------------------------------
TrackSync;	//14:1:0

KeyFlag-(b)
TR(1)			l8 o5v85		ExpreP	f+1								|	f1													|	e4	e8.				e16				e4			|	e-4	e-8.			e-16			e-4	EP(100)
TR(2)			l8 o5v85		ExpreP	c1							<	|	b*1													|	b4	b8.				b16				b4			|	a4	a8.				a16				a4	EP(100)
TR(3)			l8 o3v85 MonS	ExpreP	d	dd	dd	dd	d				|	"g	gg	gg	gg	g									|	c	cc	cc	cc	c								|	"ffff	f4		r*4						EP(100)	M(0)
TR(4)			l8 o3v85 MonS	ExpreP	d	dd	dd	dd	d				|	"g	gg	gg	gg	g									|	c	cc	cc	cc	c								|	"ffff	f4		r*4						EP(100)	M(0)
KeyFlag-()
TR(5)			l8 o5v85		ExpreB	e1								|	d1													|	d4	d8.	EP(100)	HrS	d16	Hr	ExpreB	d4			|	c4	c8.	EP(100)	HrS	c16	Hr	ExpreB	c4	EP(100)
TR(6)			l8 o5v85		ExpreB	e1								|	d1												<	|	g4	g8.	EP(100)	HrS	g16	Hr	ExpreB	g4			|	g4	g8.	EP(100)	HrS	g16	Hr	ExpreB	g4	EP(100)
KeyFlag-(b)
TR(11) 			l16o6v92		EmbN	c4	c4.	EP(100)	VnT	"b*cdrcr	VnM	EmbN	c8&<b*8g4.	a32&g32&f+	EP(100)	VnT	gr*ar*	|	b-8b-8	VnM	EmbN	b4.	EP(100)	VnT	ab`cr*br*	VnM	EmbN	b8&a8f4.	EP(100)	VnT	f8g8a8	EP(100)
TR(12) 	Sub{	l8 o4v85				f+8	f+4	f+4	f+4	f+8				|	f8	f4	f4	f4	f8									|	e8	e4	e4	e4	e8								|	e-8	e-4	e-4.	r*4	EP(100)	}
				l8 o3v85				a8	a4 	a4	a4	a8				|	g8	g4	g4	g4	g8									|	g8	g4	g4	g4	g8							>	|	c8	c4	c4.		r*4	EP(100)
TR(13)			l8 o4v85				d	dd	dd	dd	d				|	d	dd	dd	dd	d									|	c	cc	cc	cc	c							<	|	 ffff	f4		r*4
TR(14)			l8 o3v85				d	dd	dd	dd	d				|	d	db*	b*b*b*b*b*									|	b	bb	bb	bb	b								|	 aaaa	a4		r*4
TR(15)			l8 o3v85				d	dd	dd	dd	d				|	"g	gg	gg	gg	g									|	c	cc	cc	cc	c								|	"ffff	f4		r*4
TR(16)			l8 o3v85				d	dd	dd	dd	d				|	"g	gg	gg	gg	g									|	c	cc	cc	cc	c								|	"ffff	f4		r*4	//Cb

//------------------------------------------------------------------------------
TrackSync;	//18:1:0

TR(11) 		VnM	l16o5v50	EmbN	b8.&`c&	a8.&b&	g8.&a&	f8.&g	|	e4r*4.	EP(100)	VnT	f8g8a8	VnM	EmbN	b8.&`c&	a8.&b&	g8.&a&	f8.&g	|	e4r*4.	e8&g8&f8&					|	e8&d8&c4.	c+8&e8&d8&	|	c8&<b8&a4.	a8&b8&g8	`c8.&a	`d8.&b	a4	[4	a32&:g32&	]	g32	EP(100)	
TR(12) 			l16o4v50	EmbN	r*1								|	"b,,+32&c,,+16&"b&c&"b&c&"b&c&	"b8r*4.	r*1								|	"b,,+32&c,,+16&"b&c&"b&c&"b&c&	"b8r*4.	r*4		b4&	a8r*4.		|	r*4	g4&		f4&	e4	|	f4		^8.	g	f4	[4	f32&:e32&	]	e32	EP(100)	VnT
TR(13)		VaM	l8 o4v43	EmbN	f4&		e4&		d4&		c4		|	c4		r*2.						|	f4&		e4&		d4&		c4		|	c4		r*2.						|	r*4		g4&	f8r*4.		|	r*4	e4&		d4&	c4	l16	^4		"b8.d	c4<	[4	`c32&:b32&	]	b32	EP(100)	VaT
TR(14)		VaM	l8 o4v43	EmbN	d4&		c4&<	b4&		a4		|	g4		r*2.					>	|	d4&		c4&<	b4&		a4		|	g4		r*2.						|	r*1					o3	|	r*4	r*4		r*4	g4&	|	a4&		b4>		c2			^8				EP(100)	VaT
TR(15)		VcM	l8 o3v43	EmbN	r*1								|	c4		r*2.						|	r*1								|	c4		r*2.						|	r*4		e4&	f8r*4.		|	r*4	c+4&	d4&<b4	|	a4&		b4>		c4	c4						EP(100)	VcT
TR(16)		CbM	l8 o3v43	EmbN	r*1								|	c4		r*2.						|	r*1								|	c4		r*2.						|	r*4		e4&	f8r*4.		|	r*4	c+4&	d4&<b4	|	a4&		b4>		c4	c4						EP(100)	CbT	//Cb

//------------------------------------------------------------------------------
TrackSync;	//25:1:0

KeyFlag-(b)
TR(1)			l16o4v85		ExpreP	f2				^4.			>	f8	|			[2	g32&f32& ]	e8	e4.	e&fg8				a8				b8	g4	e4	c8	c8	c8			|	c4		e4		f4		r*8.	f	[2	g32&f32&]	e8	e4.	e&f&g8				a8				|	b4<						b2						b4			EP(100)
TR(2)			l8 o4v85		ExpreP	f2				a2					|		b1													|	^2				^8	b8	b8	b8			|	a4		b4		`c4		a4			|	b1														|	^4						e2						e4			EP(100)
TR(3)			l8 o3v85 MonS	ExpreP	f8	c8	f8	c8	f8	c8	f8	c8		|		g8				c8		g8		a8	b8	a8	g8	f8	|	e8	g8	b8	g8	e8	g8	c8	e8			|	f8	c8	g8	c8	a8	c8	f8	c8		|	g8	c8	g8					a8	b8	a8	g8	f8			|	e8				c8	e8		g8		b8	g8		e8		c8	EP(100)	M(0)
TR(4)			l8 o3v85 MonS	ExpreP	f8	c8	f8	c8	f8	c8	f8	c8		|		g8				c8		g8		a8	b8	a8	g8	f8	|	e8	g8	b8	g8	e8	g8	c8	e8			|	f8	c8	g8	c8	a8	c8	f8	c8		|	g8	c8	g8					a8	b8	a8	g8	f8			|	e8				c8	e8		g8		b8	g8		e8		c8	EP(100)	M(0)
KeyFlag-()
TR(5)			l8 o4v85		ExpreB	g1									|		^1													|	^1										|	^4	EP(100)	HrS	g4	g4	g4	Hr	ExpreB	g2		^8		EP(100)	HrS			g8	g8	g8			|	g4	>	Hr	ExpreB		d2		EP(100)	HrS		d4			EP(100)
TR(6)			l8 o3v85		ExpreB	g1									|		^1													|	^1										|	^4	EP(100)	HrS	g4	g4	g4	Hr	ExpreB	g2		^8		EP(100)	HrS			g8	g8	g8			|	g4	>	Hr	ExpreB		g2		EP(100)	HrS		g4			EP(100)
KeyFlag-(b)
TR(11) 			l16o4v92		EmbN	f8	a4>	c4	f8&a8	EP(100)	VnT	f8	VnM	EmbN	[2	g32&f32& ]	e8	e4.	e&fg8	EP(100)	VnT	a8	VnM	EmbN	b8	g4	e4	c4<	b8	EP(100)	VnT	|	a`cba	b>cde	fgab	`c8r*f		[2	g32&f32&]	VnM	EmbN	e8	e4.	e&f&g8	EP(100)	VnT	a8	l32	b8.	VnM	EmbN	b&a&	g8r16g&f&	e8r16e&d&	c8rc&<b&	|	a8	EP(100)	VnT
TR(12) 			l16o4v85				fccc	cccc	cccc	cccc		|			cccc	cccc	cccc	cccc					|	cccc	cccc	cccc	cccc			|	c ccc	c ccc	cccc	 ccc c		|	cccc	cccc	cccc	cccc							|	cccc					cccc		cccc		cccc
TR(13)			l8 o4v85				a8	c8	f8	a8	f8	a8	f8	a8		|		b8	VaM	EmbN	b4	EP(100)	VaT	a8	g8	f8	e8	f8	|	a8	VaM	EmbN	f4	c4	f4	EP(100)	VaT	a8	f8	VaM	EmbN c4< EP(100) VaT b8a8>c8f8a8 b8	VaM	EmbN b4 EP(100) VaT	a8	g8	f8	e8	f8			|	a8	VaM	EmbN	a4			a4			a4	EP(100) VaT	a8
TR(14)			l8 o4v85				r*8	c8	f8	a8	f8	a8	f8	a8		|		b8	VaM	EmbN	b4	EP(100)	VaT	a8	g8	f8	e8	f8	|	a8	VaM	EmbN	f4	c4	f4	EP(100)	VaT	a8	f8	VaM	EmbN c4< EP(100) VaT b8a8>c8f8a8 b8	VaM	EmbN b4 EP(100) VaT	a8	g8	f8	e8	f8			|	a8	VaM	EmbN	a4			a4			a4	EP(100) VaT	a8
TR(15)			l8 o3v85				f8	c8	f8	c8	f8	c8	f8	c8		|		g8				c8		g8		a8	b8	a8	g8	f8	|	e8	g8	b8	g8	e8	g8	c8	e8			|	f8	c8	g8	c8	a8	c8	f8	c8		|	g8	c8	g8					a8	b8	a8	g8	f8			|	e8				c8	e8		g8		b8	g8		e8		c8
TR(16)			l8 o3v85				f8	c8	f8	c8	f8	c8	f8	c8		|		g8				c8		g8		a8	b8	a8	g8	f8	|	e8	g8	b8	g8	e8	g8	c8	e8			|	f8	c8	g8	c8	a8	c8	f8	c8		|	g8	c8	g8					a8	b8	a8	g8	f8			|	e8				c8	e8		g8		b8	g8		e8		c8	//Cb

//------------------------------------------------------------------------------
TrackSync;	//31:1:0

KeyFlag-(b)
TR(1)			l16o4		ExpreP	a8>	f8	f4.			f8	f4		|	^8	f8	f8	f8	f8c<b	b32&a.gf	|>	c1						>	|	c1							|	^4<	c4		c4	r*4	EP(100)
TR(2)			l16o4		ExpreP	f8	f8	f4.			f8	f4		|	^8	f8	f8	f8	f8`cb	b32&a.gf	|	c1						>	|	c1							|	^4<	c4		c4	r*4	EP(100)
TR(3)			l16o3 MonS	ExpreP	f8 fg	ab`ca	b8ga	b>cd"b	|	c8<ab>	c8de	f8c<b	b32&a.gf	|	`c8	c8	e8	c8	f8	c8	a8	f8	`c8	c8	e8	c8	f8	c8	a8	f8	`c4	c4		c4	r*4	EP(100)	M(0)
TR(4)			l16o3 MonS	ExpreP	f8 fg	ab`ca	b8ga	b>cd"b	|	c8<ab>	c8de	f8c<b	b32&a.gf	|	`c8	c8	e8	c8	f8	c8	a8	f8	`c8	c8	e8	c8	f8	c8	a8	f8	`c4	c4		c4	r*4	EP(100)	M(0)
KeyFlag-()
TR(5)			l8 o5				c4		r*4		c4		r*4	<	|	r*	e	g	g	`c	g	e	c		|	g4>	r*8	d8		e4	r*8	e8	|	d4	r*8	d8		e4	r*8	e8	|	d4	g4		"g4	r*4
TR(6)			l8 o4				c4		r*4		c4		r*4		|	r*	e	g	g	`c	g	e	c		|	g4	r*8	g8>		c4	r*8	c8	|	"g4	r*8	"g8		c4	r*8	c8	|<	g4	g4		"g4	r*4
KeyFlag-(b)
TR(11) 			l16o4				r*8fg	ab`ca	b8ga	b>cd"b	|	c8<ab>	c8de	f8c<b	b32&a.gf>l32	c4	r*8`cbab	a4	r*8gfef	|	e4	r*8`cbab	a4	r*8gfef	|	e4	'e`c'4<	c4	r*4
TR(12) 			l16o4				c8 fg	ab`ca	b8ga	b>cd"b	|	c8<ab>	c8de	f8c<b	b32&a.gf>l32	c4	r*8`cbab	a4	r*8gfef	|	e4	r*8`cbab	a4	r*8gfef	|	e4	'e`c'4<	c4	r*4
TR(13)			l16o4				f8<fg	ab`ca	b8ga	b>cd"b	|	c8<ab>	c8de	f8c<b	b32&a.gf	|	cccc	cccc	cccc	cccc	cccc	cccc	cccc	cccc	c4	`c4		c4	r*4
TR(14)			l16o4				f8<fg	ab`ca	b8ga	b>cd"b	|	c8<ab>	c8de	f8c<b	b32&a.gf	|	cccc	cccc	cccc	cccc	cccc	cccc	cccc	cccc	c4	`c4		c4	r*4
TR(15)			l16o3				f8 fg	ab`ca	b8ga	b>cd"b	|	c8<ab>	c8de	f8c<b	b32&a.gf	|	`c8	c8	e8	c8	f8	c8	a8	f8	`c8	c8	e8	c8	f8	c8	a8	f8	`c4	c4		c4	r*4
TR(16)			l16o3				f8 fg	ab`ca	b8ga	b>cd"b	|	c8<ab>	c8de	f8c<b	b32&a.gf	|	`c8	c8	e8	c8	f8	c8	a8	f8	`c8	c8	e8	c8	f8	c8	a8	f8	`c4	c4		c4	r*4	//Cb

//------------------------------------------------------------------------------
TrackSync;	//36:1:0

KeyFlag-(b)
TR(3)			l8 o3v43 MonS	ExpreP	r*1							|	r*1								|	r*1							|	r*4	g4&		a4&		b4		EP(100)	M(0)
TR(4)			l8 o3v43 MonS	ExpreP	r*1							|	r*1								|	r*1							|	r*4	e4&		f4&		g4		EP(100)	M(0)
TR(11) 		VnM	l12o6v50		EmbLng2	c2	EmbN	d&c&<b&a&g&f+	|	g8&a8&b8&b*8	`c&b&a&g&f&e	|	f8&g8&a-8&a8	b&a&g&f&e&d	l16	c4	^8.&d	c8.&d&	c8.&d	EP(100)
TR(12) 		VnM	l12o5v50		EmbLng2	c2	EmbN	d&c&<b&a&g&f+	|	g8&a8&b8&b*8	`c&b&a&g&f&e	|	f8&g8&a-8&a8	b&a&g&f&e&d	l16	c4	^8.&d	c8.&d&	c8.&d	EP(100)
TR(13)		VaM	l8 o4v43				r*1							|	r*1								|	r*1					EmbN	|	r*4	g4&		a4&		b4		|	a4	EP(100)	VaT
TR(14)		VaM	l8 o4v43				r*1							|	r*1								|	r*1					EmbN	|	r*4	e4&		f4&		g4		|	f4	EP(100)	VaT
TR(15)		VcM	l8 o3v43				r*1							|	r*1								|	r*1					EmbN	|	r*4	b4&		a4&		e4		EP(100)
TR(16)		CbM	l8 o3v43				r*1							|	r*1								|	r*1					EmbN	|	r*4	b4&		a4&		e4		EP(100)	//Cb

//------------------------------------------------------------------------------
TrackSync;	//40:1:0

KeyFlag-(b)
TR(1)			l8 o5v50		ExpreP	q50	r*fff	q99	f&	q50	ggg	|	q99	g&	q50	aaa	q99	a8.&	b16	gr*	q50	r*	ggg	q99	g&	q50	aaa	|	q99	a&	q50	bbb	q95	b8.&>	c16<ar*	EP(100)
TR(2)			l8 o5v50		ExpreP	q50	r*ccc	q99	c&	q50	eee	|	q99	e&	q50	fff	q99	f8.&	g16	er*	q50	r*	eee	q99	e&	q50	fff	|	q99	f&	q50	ggg	q95	g8.&	a16	fr*	EP(100)
TR(3)			l8 o3v43 MonS	ExpreP		a4	f4	e4	c4			|	f4	"f4	c4	r*4						|	`c4	b4	a4	f4			|	e4	c4	f4	r*4				M(0)	EP(100)
TR(4)			l8 o3v43 MonS	ExpreP		f4	f4	e4	c4			|	f4	"f4	c4	r*4						|	`c4	b4	a4	f4			|	e4	c4	f4	r*4				M(0)	EP(100)
KeyFlag-()
TR(5)		HrS	l8 o5v50				HrS	r*ccc	Hr	c	HrS	ddd	|	Hr	d	HrS	eee	Hr	e8.	HrS	f16	dr*	|	r*	ddd	Hr	d	HrS	eee	|	Hr	e	HrS	fff	Hr	f8.	HrS	g16	er*	EP(100)
TR(6)		HrS	l8 o4v50				HrS	r*eee	Hr	e	HrS	ggg	|	Hr	g>	HrS	ccc	Hr	c8.	HrS	d16<gr*	|	r*	ggg	Hr	g>	HrS	ccc	|	Hr	c	HrS	ddd	Hr	d8.	HrS	e16	cr*	EP(100)
KeyFlag-(b)
TR(15)			l8 o3v43				f4	r*2.					|	r*2			r*	`c&	b*&	`c			|	c4	r*2.				|	r*2		>	r*	f	e	f<	|	f8	EP(100)	VcT
TR(16)			l8 o3v43				f4	r*2.					|	r*2			r*	`c&	b*&	`c			|	c4	r*2.				|	r*2		>	r*	f	e	f<	|	f8	EP(100)	CbT	//Cb
TR(11) 			l8 o5v43		EmbLng1	c1							|	^1								>	|	c1						|	^1									EP(100)	VnT
TR(12) 			l8 o4v43		EmbLng1	c1							|	^1								>	|	c1						|	^1									EP(100)	VnT

//------------------------------------------------------------------------------
TrackSync;	//44:1:0

KeyFlag-(b)
TR(1)			l8 o5v85		ExpreP	r*1			q50	|	r*g g g		g g g g	|		q95	f1					|			f4	r*4		e4	r*4		|	r*2.										q50	ff		|	q95	g4				q50	gg			q95	g4		`c32&b16.a16g16	q95	f4	
TR(2)			l8 o5v85		ExpreP	r*1			q50	|	r*e e e		e e e e	|		q95	d1					|			c4	r*4		c4	r*4		|	r*2.										q50	ff		|	q95	d4				q50	dd			q95	e4				q50	ee	q95	f4	
TR(3)			l8 o3v85 MonS	ExpreP	r*1			q50	|	r*a a a		a a a a	|		q95	b4	b4	b4	b4		|		>	cccc<		cccc		|	f&a			q50	>cc			q95	d&f			q50	<aa		|	q95	b&`d			q50	gb			q95	`c&b*			q50	`cc	q95	f4	
TR(4)			l8 o3v85 MonS	ExpreP	r*1			q50	|	r*a a a		a a a a	|		q95	b4	b4	b4	b4		|		>	cccc<		cccc		|	f&a			q50	>cc			q95	d&f			q50	<aa		|	q95	b&`d			q50	gb			q95	`c&b*			q50	`cc	q95	f4	
KeyFlag-()
TR(5)			l8 o5v92				r*1				|	r*1					|		HrS	r*ccc	cccc		|			 e4	r*4		d4	r*4	<	|	r*4				gg		>		c4				cc		|		d4					dd				d4					dd	|	c4
TR(6)			l8 o4v92				r*1				|	r*1					|		HrS	r*ccc	cccc		|			`c4	r*4		g4	r*4		|	r*4				gg		>		c4				cc		|		c4					cc			<	g4					gg	|	e4
KeyFlag-(b)
TR(13)	Sub{	l8 o4v85				r*1				|	r*g g g		g g g g				f8	f4	f4	f4	f8	|			f4	}
				l8 o3v85				r*1				|	r*a a a		a a a a	EmbAN	VaM	b8	b4	b4	b4	b8	|			a4	>a8.f16	`c4	c4		|	f&a	EP(100)	VaT	cc	EmbAN	VaM	d&f	EP(100)	VaT	<aa	EmbAN	VaM	b&`d	EP(100)	VaT	gb	EmbAN	VaM	`c&b*	EP(100)	VaT	`cc	|	f4
TR(14)	Sub{	l8 o4v85				r*1				|	r*e e e		e e e e	|	}
				l8 o4v85				r*1				|	r*c+c+c+	c+c+c+c+ EmbAN	VaM	d8	d4	d4	d4	d8	EP(100)	VaT	cccc<	cccc	EmbAN	VaM	f&a	EP(100)	VaT	>cc	EmbAN	VaM	d&f	EP(100)	VaT	<aa	EmbAN	VaM	b&`d	EP(100)	VaT	gb	EmbAN	VaM	`c&b*	EP(100)	VaT	`cc	|	f4
TR(15)			l8 o3v85				r*1				|	r*a a a		a a a a	|			b4	b4	b4	b4		|		>	cccc<	cccc	EmbAN	VcM	f&a	EP(100)	VcT	>cc	EmbAN	VcM	d&f	EP(100)	VcT	<aa	EmbAN	VcM	b&`d	EP(100)	VcT	gb	EmbAN	VcM	`c&b*	EP(100)	VcT	`cc	|	f4
TR(16)			l8 o3v85				r*1				|	r*a a a		a a a a	|			b4	b4	b4	b4		|		>	cccc<	cccc	EmbAN	CbM	f&a	EP(100)	CbT	>cc	EmbAN	CbM	d&f	EP(100)	CbT	<aa	EmbAN	CbM	b&`d	EP(100)	CbT	gb	EmbAN	CbM	`c&b*	EP(100)	CbT	`cc	|		//Cb
TR(11) 			l8 o6v85				r*ccc	cccc	VnM	EmbLng1	c+1	l16		EP(100)	VnT	[4	e32&d.c+d	]	EmbAN	VnM	c4<	a8.f16	`c4	'"gce'4	l8	f&a	EP(100)	VnT	cc	EmbAN	VnM	d&f	EP(100)	VnT	<aa	EmbAN	VnM	b&`d	EP(100)	VnT	gb	EmbAN	VnM	`c&b*	EP(100)	VnT	`cc	
TR(12) 			l8 o5v85				r*ccc	cccc	VnM	EmbLng1	c+1	l16		EP(100)	VnT	[4	e32&d.c+d	]	EmbAN	VnM	c4	'fc<f'4	c4	'g>ce'4	l8	f&a	EP(100)	VnT	cc	EmbAN	VnM	d&f	EP(100)	VnT	<aa	EmbAN	VnM	b&`d	EP(100)	VnT	gb	EmbAN	VnM	`c&b*	EP(100)	VnT	`cc	

//------------------------------------------------------------------------------
TrackSync;	//50:1:0

KeyFlag-(b)
TR(1)			l16o5v43	r*1	ExpreP						|	r*4	a8.&g	g8r*8	b8.&a	|	a4	r*2.			|	r*4	a8.&b	g8r*8	g8.&a	EP(100)
TR(2)			l16o4v43	r*1	ExpreP						|	r*4	f8.&e	e8r*8	g8.&f	|	f4	r*2.			|	r*4	f8.&g	e8r*8	e4		EP(100)
TR(3)			l16o3v43 	r*1	ExpreP	MonS				|	f4	r*4		c4		r*4		|	"f4	r*2.			|	"f4	r*4		c4		r*4		EP(100)
TR(4)			l16o3v43 	r*1	ExpreP	MonS				|	f4	r*4		c4		r*4		|	"f4	r*2.			|	"f4	r*4		c4		r*4		EP(100)
KeyFlag-()
TR(5)			l16o5v43	r*1								|	r*4	 e8.&d	d8r*8	f8.&e	|	e4	r*2.			|	r*4	e8.&f	d8r*8	d8.&e	
TR(6)			l16o4v43	r*1								|	r*4	`c8.&g	g8r*8>	d8.&c	|	c4	r*2.			|	r*4	c8.&d<	g8r*8	g4		
KeyFlag-(b)
TR(11) 			l8 o4v43	f>	EmbN	VnM	f&e&f&	g&f&a&f	EmbLng1	c1^8			EmbN	|<	   f&e&f&	g&f&a&f	EmbLng1	c1^8					EP(100)
TR(12) 			l8 o4v43	f	EmbN	VnM	f&e&f&	g&f&a&f	EmbLng1	c1^8			EmbN	|	   f&e&f&	g&f&a&f	EmbLng1	c1^8					EP(100)
TR(13)			l8 o3v43	r*1	EmbN	VaM					|		r*1						|	r* f&e&f&	g&f&a&f	EmbLng1	c1^8					EP(100)
TR(14)			l8 o3v43	r*1	EmbN	VaM					|		r*1						|	r* f&e&f&	g&f&a&f	EmbLng1	c1^8					EP(100)
TR(15)			l8 o3v43	r*1	EmbN	VcM					|		r*1						|	r*1					|		r*1
TR(16)			l8 o3v43	r*1	EmbN	CbM					|		r*1						|	r*1					|		r*1	//Cb
TR(7)			l8 o6v64	r*1	ExpreP	MonS				|		r*1						|	c1					|	^1							|	^4.<a	f4r*f	|	b4.g e4r*e	|	f4.a gfed

TrackSync;	//57
TR(7)			l32o5v64	c4<	`c&b&`c&b&`c&b&a&b	a4r*4	l8	g&>>d	d2	c32&<b16.a16g16	|	f8&e8 b2 a32&g16.f16e16	|	g&f&e&d& c+&c&d&<b	|	a&b&>c&"b*& d&cr*4

TrackSync;	//62
TR(11)			l8 o5v85	r*1								|	r*1										|	r*1		EmbAN	VnM					|	f&a	EP(100)	VaT	cc	EmbAN	VaM	d&f	EP(100)	VaT	<aa	EmbAN	VaM	b&`d	EP(100)	VaT	gb	EmbAN	VaM	`c&b*	EP(100)	VaT	`cc	|	f4
TR(7)			l16o4v64	g8ab>	cdef	gab>c	d8d8	|	d8,,+24&c8&"b*8&c8	c8,,+24&<b8&a8&b8	|	b&a&b&a&`c32&b.&a&g	f4&a32&g.&f&g&	|	f4	r*2.													|	r*1															

TrackSync;
TR(7)			l8 o4v64	f2	a4>	c4	|	f4.a>	c4	c4	|	c&<f	f4	r*e16f16	ga	|	`c&b	q50	ag	q95	a&g	q50	fe	l16q95	|	f4<	f4^8ga	b>cde	|	fgfg	abab>	c8c8c8c8	|	c8&<e8


//------------------------------------------------------------------------------
TrackSync;	//50:1:0

KeyFlag-(b)
TR(1)			l8 o5		ExpreP	
TR(2)			l8 o4		ExpreP	
TR(3)			l8 o3 MonS	ExpreP	
TR(4)			l8 o3 MonS	ExpreP	
KeyFlag-()
TR(5)			l8 o5				
TR(6)			l8 o4				
KeyFlag-(b)
TR(7)			l8 o5 MonS	ExpreP	
TR(11) 			l8 o4				
TR(12) 			l8 o3				
TR(13)			l8 o3				
TR(14)			l8 o3				
TR(15)			l8 o3				
TR(16)			l8 o3					//Cb


//------------------------------------------------------------------------------
//ヴェロシティー基本値　メモ書き
/*
	vol.	
8
fz	127	
	120	
fff	113	
	106
ff	99
	92
f	85
	78
mf	71
	64
mp	57
	50
p	43
	36
pp	29
	22
ppp	15
	8
pz	1
*/

//------------------------------------------------------------------------------
//_演奏情報

PlayFrom(1:1:0)

//Solo(1)//トラックソロ。複数トラックで指定可能
//Mute(1)//トラックミュート。