//_初期設定

TrackName     = {"2017-01-01"}//曲名を書き込みます
Copyright     = {"騎士王321"}//作者の名前を書き込みます
MetaText      = {"1時間くらい集中すると時間はあっという間に過ぎました"}//ひとことコーナーです

テンポ 127;
拍子   4,4;//DTMにおいて拍子は気休め以下です。
TimeBase = 96;//四分音符のステップ数の設定です。tの指定とかをする人には重要です。

TrackSync;

Include(gs.h);//XG音源でない人はこれを絶対に書き込んでおきましょう
Include(delay.h);Include(groove.h);Include(unison.h);//これくらいあればだいたい事足ります。
//あとはお好みでギターとかコードとかのインクルードファイルでも
System.MeasureShift(1);ResetGS;

TrackSync;

//リズムトラックの拡張です。それぞれの行の『//』を外すことによって有効になります。
//CH(11) SysEx$ = f0,41,10,42,12,{40,1a,15,02},f7;//トラック11
//CH(12) SysEx$ = f0,41,10,42,12,{40,1b,15,02},f7;//トラック12
//CH(13) SysEx$ = f0,41,10,42,12,{40,1c,15,02},f7;//トラック13
//CH(14) SysEx$ = f0,41,10,42,12,{40,1d,15,02},f7;//トラック14

//音の基準の高さを決めるチューニング(0~127)です。どれかひとつを有効にしておきましょう
GSScaleTuning(40,40,40,40,40,40,40,40,40,40,40,40);//古風な低めのチューニング
//GSScaleTuning(64,64,64,64,64,64,64,64,64,64,64,64);//ごく一般的なチューニング
//GSScaleTuning(80,80,80,80,80,80,80,80,80,80,80,80);//YMO風の高めのチューニング

//知る人ぞ知るTW-Music2のパラメータ設定。リバーブとコーラスを扱います
//ReverbSetting    Time Dpth High
//CuePoint={"TwmParam( 80,125, 60)"}//リバーブ。各値は下記を参照
//ChorusSetting     Wave Mix Dpth FB Freq Dly Phs
//CuePoint={"TwmChorus(1,127, 30, 30, 30, 30,  1)"}//コーラス。各値は下記を参照

//Slur(1);//スラーの種類を指定します

//==================================================================================================

//_作曲時に役立つツールたち

//PlayFrom(1:0:0);//途中から演奏するときにつかいます
//Solo();//『,』で複数トラック指定可
//Mute();//『,』で複数トラック指定可

STR KeyP = {KeyFlag+(f);Key(0);}//各トラックの頭に書き込んでおくと転調するタイプの曲で便利です
STR KEEP = {}//なにもしない
STR RS08 = {r%3072}//8小節休み
STR RS16 = {r%6144}//16小節休み

//通常トラック用
/*
TR(1);KeyP;
@1,0,0;
V(120);EP(127);P(64);M(0);p%(0);
REV(0);CHO(0);
o5;l4;q99;v120;t0;r1//予動。プレカウントとも
*/

//リズムトラック用
/*
TR(10);KeyFlag+();Key(0);//ドラムトラックはいつでも同じキーにしておきましょう
@1,0,0;
V(120);EP(127);P(64);BR(12);p%(0);
REV(0);CHO(0);
o3;l16;q9;v120;t0;r1//予動はとりあえず1小節にしてます。4拍子が多いから
*/

//==================================================================================================

//_演奏情報

STR XS01 = {[2 [2 [4 'g+`e']][2 [4 'g+`e']]]
		[2 [4 'g`e']][2 [4 'f`e']][3 [4 'f`e']][4 'f`d+']}
TR(1);KeyP;
@25,0,0;
V(40);EP(127);P(64);M(0);p%(0);
REV(0);CHO(0);
o4;l4;q39;v120;t0;r1
XS01 XS01


TR(2);KeyP;
@12,0,0;
V(60);EP(127);P(0);M(0);p%(256);
REV(0);CHO(0);
o4;l4;q39;v100;t0;r1
XS01 XS01


TR(3);KeyP;
@12,0,0;
V(60);EP(127);P(127);M(0);p%(-256);
REV(0);CHO(0);
o4;l4;q39;v100;t0;r1
XS01 XS01


STR YS01 = {[2 [2 [6 'eb']][2 [6 '"aa']]]
		[2 [6 'c`c']][2 [6 'da']][3 [6 '"ba']][6 '"ba']}
TR(4);KeyP;
@89,0,0;
V(90);EP(127);P(64);M(0);p%(0);
REV(0);CHO(0);
o4;l6;q49;v120;t0;r1
YS01 YS01


TR(5);KeyP;
@65,0,0;
V(100);EP(127);P(96);M.onNoteWave(0,0,!16,0,64,!2);p%(0);
REV(0);CHO(0);
o5;l16;q109;v120;t0;r1
[15 r1]r2r"bc+dd+e+fa
b1,101a+4^8b4b8,99&&`e4|`e1^2,99`e8^16`c+8`c16b8|
b8^16`c+2^1e,31c+,31"b,31r8|"g+"ac+d+efg+b16^1^4r8ga|
b4^8g4^8e4^4b4^8g4^8|e4^8a4^8f4a,61a+,61b,31fb4^8a4^8|
a^feafeab&`cbafefa r"f"a"bcc+effab`cb`cb`e|
rr`e`er`e`err`e`e`e&&`f^^^|^^^^^^^^^^^^^^rr


STR BS01 = {e^"a^e^"a^|c^d^"b^^^}
TR(11);KeyP;
@39,1,0;
V.WR(30,120,!4);EP(127);P(64);M(0);p%(0);
REV(0);CHO(0);
o3;l1;q99;v120;t0;r1
BS01 BS01


STR PD01 = {[2 '"eg+b`e`f'^'"aab`c+`g+'^]|'"gcg`e`g'^'"adf+`d`f+'^'"bfa`c+`e'^^'""bfab`d+'}
TR(12);KeyP;
@90,0,0;
V.WR(20,80,!4);EP(127);P(64);M(0);p%(0);
REV(0);CHO(0);
o4;l1;q99;v120;t0;r1
PD01 PD01


STR BA01 = {[2 
			e^"e,19"e^^^^^^^^e,19a&b"e,19|e^"e,19"e^"e,19"b"b,19e^"e^b^"b^
			a^"a,19"a^^^^^^^^"a,19a&b"a,19|a^"a,19"a^"a,19c"e,19g+^"g+^b"b^^]
		c^"c,19c^"c,19"c^^^^^c,19c&d"g,19|[2 c^"c,19"c,19]c^d^e^g^
		[2 d^"d,19"d^"d,19d&ed"d,19:"a"a,19d"d,19e"e,19]"a&"bd&e"a,19"a
		[2 "b^"b,19b[3 "b,59]b[2 "b,19"b,19b]"bb|"b^a&b"b`e&`f"b,19"b"a&"befab"b,19]}
TR(13);KeyP;
@37,0,0;
V(100);EP(127);P(32);M(0);p%(0);
REV(0);CHO(0);
o3;l16;q99;v120;t0;r1
BA01 BA01


TR(10);KeyFlag+();Key(0);//ドラムトラックはいつでも同じキーにしておきましょう
@1,0,0;
V(120);EP(127);P(64);BR(12);p%(-1000);
REV(0);CHO(0);
o3;l16;q9;v120;t.onCycle(!16,0,7);r1//予動はとりあえず1小節にしてます。4拍子が多いから
STR DR01 = {
	Sub{[15 [4 '"bc'4]][3 '"bc'4]r-32'"bc'32[2 '"bc'8]}
	Sub{[15 r2^8^16[2 'd+`f+'8:r16]]rr`c`craafr`cafr4}
	Sub{[16 [4 f+,,50g+,,60f+g+,,50]]}
	[16 r1]
	}
DR01 DR01
//↓仕切り線です。ご自由にお使いください
//==================================================================================================
//--------------------------------------------------------------------------------------------------