//_初期設定

TrackName     = {"神ともにいまして"}//曲名を書き込みます
MetaText      = {"God be with you till we meet again"}//ひとことコーナーです

テンポ 112;
拍子   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;

//音の基準の高さを決めるチューニング(0~127)です。どれかひとつを有効にしておきましょう
//GSScaleTuning(32,32,32,32,32,32,32,32,32,32,32,32);//古風な低めのチューニング
GSScaleTuning(68,68,68,68,68,68,68,68,68,68,68,68);//ごく一般的なチューニング

//知る人ぞ知るTW-Music2のパラメータ設定。リバーブとコーラスを扱います
//ReverbSetting    Time Dpth High
CuePoint={"TwmParam(127,127, 80)"}//リバーブ。各値は上記を参照
//ChorusSetting     Wave Mix Dpth FB Freq Dly Phs
CuePoint={"TwmChorus(  1,127, 32, 80,127,  2, 1)"}

//Slur(1);//スラーの種類を指定します

//==================================================================================================

//_作曲時に役立つツールたち

//PlayFrom(1:0:0);//途中から演奏するときにつかいます
//Solo();//『,』で複数トラック指定可
//Mute();//『,』で複数トラック指定可

STR KeyP = {KeyFlag-();Key(0);}//各トラックの頭に書き込んでおくと転調するタイプの曲で便利です
STR KEEP = {}//なにもしない
STR RS08 = {r%3072}//8小節休み
STR RS16 = {r%6144}//16小節休み

//==================================================================================================

//_演奏情報

TR(1);KeyP;
@64,0,0;
V(120);EP(127);P(48);M(0);p%(0);
REV(20);CHO(60);
o5;l8;q96;v120;t0;r1

e^^eeeee|g^d^e^^r|a^^aaaaa|a^^^g^^r|g^^ggggg|g^^^e^^r|e^^eagcd|e^d^c8^16r16e8^16f16|
g^`c^`e^`d8^16`c16|a^`c^^^b8^16a16|g^^agece|d^^^^^e8^16f16|g^`c^`e^`d8^16`c16|a^`c^^^`c8^16a16|gecde^d^|c2^4r4

e^^eeeee|g^d^e^^r|a^^aaaaa|a^^^g^^r|b^^bbbbb|`c^^^g^^^|e^^eagcd|e^d^c8^16r16e8^16f16|
g^`c^`e^`d8^16`c16|a^`c^^^b8^16a16|g^^agece|d^^^^^e8^16f16|g^`c^`e^`d8^16`c16|a^`c^^^b8^16a16|gecde^d^|c4a+g+gd+cd|
d+^d^cr`c^&`c12a+12g12f12g12d+12 TempoChange(112,88,!2);gd+cd|/*にぶんのに*/d+4a+4|Tempo(104);`c1|f1|e1,127



TR(2);KeyP;
@64,0,0;
V(120);EP(127);P(58);M(0);p%(0);
REV(20);CHO(60);
o5;l8;q96;v120;t0;r1

c^^ccccc|c^"b^c^^r|c^^fffff|f^^^e^^r|d^^dddff|e^^^c^^r|c^^cfecc|c^"b^crc8^16d16|
e2g4g8^16g16|f4a2g8^16f16|e^^fecc^|"b2^4c8^16d16|e2g4g8^16g16|f4a2f8^16f16|ecccc^"b^|c2^4r4

c^^ccccc|d^"b^c^^^|f^^fffff|f^^^e^^^|g^^ggggg|g^^^e^^^|c^^cc^"a^|"b2c4c8^16d16|
e4g4`c4g8^16g16|f2^4g8^16f16|e^^eec"a"b|c2"b4"b8^16d16|e4g4`c4g8^16g16f4a2g8^16f16|ec"a"a"b^"b^|c4r4"g2
"b2c2|"g2c"a+"g+"a+|c4d4|e1|c1|c1,127


TR(3);KeyP;
@64,0,0;
V(120);EP(127);P(70);M(0);p%(0);
REV(20);CHO(60);
o4;l8;q95;v120;t0;r1

g^^ggggg|g^g^g^^r|f^^`c`c`c`c`c|`c2`c4rr|b^^bbb`d`d|`c2g4r4|g^^g`c`cgag^f^e^g8^16g16|
g2`c4`c8^16`c16|`c2^4`c8^16`c16|`c^^`c`cgeg|g2^4g8^16g16|g2`c4`c8^16`c16|`c2^4a8^16`c16|`cggag^f^|e2^4r4
v100
g^^ggggg|g^g^g^^r|`c^^`c`c`c`c`c|`c^^^`c^^r|`d^^`d`d`d`d`d|`e2`c2|a^^aa^g^|f^g^e^g8^16g16|
g4e4g4`c8^16c16|f2^4`c8^16`c16|`c^^`caagg|f+2g4g8^16g16|g4e4g4`c8^16`c16|`c4a2`c8^16`c16|aaggf^g^|e^r4d+2|
f2e2|e2d+2|g+2|g1|a1|g1,127


TR(4);KeyP;
@64,0,0;
V(120);EP(127);P(80);M(0);p%(0);
REV(20);CHO(60);
o4;l8;q95;v120;t0;r1

c^^ccccc|e^g^c^^r|f^^fffff|c2c4r4|g^^ggg"g"g|c2c4r4|c^^cccef|g^"g^c^c8^16c16|
c2c4e8^16e16|f2^4f8^16f16|c^^cc^c^|"g2^4c8^16c16|c2^4e8^16e16|f2^4f8^16f16|ccefg^"g^c2^4r4
v127
c^^ccccc|"b^"b^c^^r|"f^^"f"f"f"f"f|"c^^^"c^^r|"g^^"g"g"g"g"g|"a^^^"a+^^^|"f^^"f"f"g"a"f|"g^"g^c^c8^16c16|
"c2"c4"c8^16"c16|"c2^4c8^16c16|"a+^^"a+"a^"a^|"g+2"g4g8^16g16|"c2"c4"c8^16"c16|"f2^4"f4|"d2"g4g4|c4r4"g+2|
"g2c2|c2"g+2|"a+2|c1|"c1|"c1,127


//↓仕切り線です。ご自由にお使いください
//==================================================================================================
//--------------------------------------------------------------------------------------------------
