TrackName = {"夜明け(仮題)"};
Copyright = {"S.Zayo"};

/*
歌詞未定。
*/

//-----------------------------variables---------------------------------

Int Intro = 8; Int Apart = 16; Int Bpart = 10; Int Cpart = 15; Int Dpart = 4; Int Epart = 16; Int Fpart = 9; Int Gpart = 8; Int Hpart = 7; Int Ipart = 8; Int Finish = 2;
Array Part = ( Intro , Apart , Bpart , Cpart , Dpart , Epart , Bpart , Cpart , Fpart , Gpart , Hpart , Ipart , Finish , 0 );//最後の0は消さない
Int Tmp = 120;//テンポ

//---------------------------functions---------------------------------

Int N;Int Ptime=0;
FOR(N=0;Part(N)!=0;N++){ Ptime = Ptime + Part(N); }
Ptime = Ptime*240/Tmp;

Function PrintPlayTime(Int Tim)
{
	Int Minute = Tim/60;
	Int Second = Tim%60;
	If(Tim<60){ Print({"演奏時間：約"}+Second+{"秒"}); }
	Else{Print({"演奏時間：約"}+Minute+{"分"}+Second+{"秒"}); }
}

	

//------------------------------system setting---------------------------------

TimeBase(96);System.MeasureShift(1);
Time(0:1:0) Tempo(Tmp);TimeSignature(4,4);TrackSync;PrintPlayTime(Ptime);

//-------------------------------parts---------------------------------

Str MelIn = {[8r1]};
Str MelA  = {[l8 b4^8b b8^16d8^16b `c8^16,,105b8^16a a8^16g8^16a b8^16,,105g8^16e d2 r1
				b4^8b b8^16d8^16b `c8^16,,105b8^16a a8^16g8^16a b8^16,,105d8^16`d,,105 b2 r1]};
Str MelB = { l8 `e4^8,,110`e,,110 `e8^16,,110`d8^16,,105`c `d8^16,,105g8^16a g4^8r `d4^8,,105`d,,105 `d8^16,,105`c8^16b `c8^16,,105g8^16a g4^8r
				`e4^8,,110`e,,110 `e4,,110b4 `f+4,,115b4 a4ba rg8^16g8^16 ef+gb ra8^16a8^16 aab`c `d2^4,,105`e4,,110 `d4,,110r4 gabg};
Str MelC = { [[l8 `e2,,110`e-4^8,,110r `d8^16,,105`g8^16,,120`d,,105 `c+8^16,,105`g8^16,,120`c+,,105 `c,,110r`c4,,110 b4,,105a4,,105 : `d4^8,,110r gabg] :g4^8r gabg]};
Str MelD = {g1 [3r1]};
Str MelE = MelA;
Str MelF = {g1 [7r1] r2 l8 gabg};
Str MelG = {[l8 `e2,,110`e-4^8,,110r `d8^16,,105`g8^16,,120`d,,105 `c+8^16,,105`g8^16,,120`c+,,105 `c,,110r`c4,,110 b4,,105a4,,105 : `d4^8,,110r gabg] g4^8r gabg};
Str MelH = {[l8 `e2,,110`e-4^8,,110r `d8^16,,105`g8^16,,120`d,,105 `c+8^16,,105`g8^16,,120`c+,,105 `c,,110r`c4,,110 b4,,105a4,,105 : `d4^8,,110r gabg]};
Str MelI = {g1};

Str PiaIn = {[Sub{[8"g8]}l16 rrg^rg^rg^rg^rg^ : Sub{[8"f8]}l16 rrf^rf^rf^rf^rf^]Sub{[7"f8]}l16 rrf^rf^rf^rf^rrr
[Sub{[8"g8]}l16 rrg^rg^rg^rg^rg^ Sub{[8"f8]}l16 rrf^rf^rf^rf^rf^]};
Str PiaA = {[8 Sub{[8"g8]}l16 rrg^rg^rg^rg^rg^ : Sub{[8"f8]}l16 rrf^rf^rf^rf^rf^] Sub{[4d8]}rr`d^r`d^r Sub{[4"g8]}f^rf^rf^ };
Str PiaB = {Sub{[8c8]}l16 rr`c^r`c^r`c^r`c^r`c^ Sub{[8"b8]}l16 rrb^rb^rb^rb^rb^ Sub{[8"b-8]}l16 rrb-^rb-^rb-^rb-^rb-^ Sub{[4"a8]}l16 rra^ra^r Sub{[4"g8]}l16 f^rf^rf^
Sub{[8c8]}l16 rr`c^r`c^r`c^r`c^r`c^ Sub{[8"b8]}l16 rrb^rb^rb^rb^rb^ Sub{[4"e8]}rre^re^r Sub{[4c+8]}`c+^r`c+^r`c+^ Sub{[8"a8]}l16 rra^ra^ra^ra^ra^ Sub{[8d8]}l16 rr`d^r`d^r`d^r`d^r`d^ r1};
Str PiaC = {[4Sub{[8"g8]}l16 rrg^rg^rg^rg^rg^ Sub{[4"b8]}rrg^rg^r Sub{[4"b-8]}g^rg^rg^
Sub{[4"a8]}rra^ra^r Sub{[4d8]}`d^r`d^r`d^ : Sub{[8"g8]}l16 rrg^rg^rg^rg^rg^]};
Str PiaD = {[Sub{[8"g8]}l16 rrg^rg^rg^rg^rg^ : Sub{[8"f8]}l16 rrf^rf^rf^rf^rf^]'"f8f8'r2^4^8};
Str PiaE = {[4 Sub{[8"g8]}l16 rrg^rg^rg^rg^rg^ : Sub{[8"f8]}l16 rrf^rf^rf^rf^rf^] r1
[4 Sub{[8"g8]}l16 rrg^rg^rg^rg^rg^ : Sub{[8"f8]}l16 rrf^rf^rf^rf^rf^] Sub{[4"e8]}rre^re^r Sub{[4"g8]}f^rf^rf^};
Str PiaF = {Sub{[8"a8]}l16 rra^ra^ra^ra^ra^ Sub{[8d8]}l16 rr`d^r`d^r`d^r`d^r`d^ Sub{[4"g8]}rrg^rg^r Sub{[4"f8]}f^rf^rf^ Sub{[8"e8]}l16 rre^re^re^re^re^
Sub{[8c8]}l16 rr`c^r`c^r`c^r`c^r`c^ Sub{[8"b8]}l16 rrb^rb^rb^rb^rb^ Sub{[8"b-8]}l16 rrb-^rb-^rb-^rb-^rb-^ Sub{[8"a8]}l16 rra^ra^ra^ra^ra^ r1};
Str PiaG = {[8r1]};
Str PiaH = {[Sub{[8"g8]}l16 rrg^rg^rg^rg^rg^ Sub{[4"b8]}rrg^rg^r Sub{[4"b-8]}g^rg^rg^
Sub{[4"a8]}rra^ra^r Sub{[4d8]}`d^r`d^r`d^ : Sub{[8"g8]}l16 rrg^rg^rg^rg^rg^]};
Str PiaI = {[4Sub{[8"g8]}l16 rrg^rg^rg^rg^rg^ : Sub{[8"f8]}l16 rrf^rf^rf^rf^rf^]Sub{[7"f8]"f1^1}l16 rrf^rf^rf^rf^rf1^1};

Str DrmIn = {[3r1] P(72) r2^8 EP.onTime(80,127,!4) l8 ['n38n42']r EP(127) P.onCycle(!8,64,72) Sub{[rn49rrrrrr r1]} [14n35'n38n46']n35 P(72) [3'n38n42']};
Str DrmA = {l8 [4 P.onCycle(!8,64,72) Sub{n49}[15n35'n38n46'] P(72) ['n38n46']]};
Str DrmB = {l8 P.onCycle(!8,64,72) Sub{n49}[16'n35n42''n38n46'] Sub{n49}[20'n35n42''n38n46']'n35n42'r P(72) 'n38n46'r r[3'n38n46'] };
Str DrmC = {l8 [3 P.onCycle(!8,64,72) Sub{n49}[15n35'n38n46']P(72)['n38n46']] P.onCycle(!8,64,72) Sub{n49}[11n35'n38n46']P(72)['n38n46']};
Str DrmD = {l8 P.onCycle(!8,64,72) Sub{n49}[12n35'n38n46'] n49rrrr P(72) [3'n38n46']};
Str DrmE = {l8 [ P.onCycle(!8,64,72) Sub{n49}[12n35'n38n46']:[3n35'n38n46']P(72)['n38n46']] l1 n49 l8 [Sub{n49}[15n35'n38n46']P(72)['n38n46']]};
Str DrmF = {l8  [P.onCycle(!8,64,72) Sub{n49}[16n35'n38n46']] P(72) 'n38n46'rrrrrrr};
Str DrmG = {[EP(127) P(64) l1 n49rr : r2 l8 r EP.onTime(80,127,!2^4) P(72)[3'n38n46']] Sub{l16 [5 P(68)n41r P(64)n35]r} r2 l8 r P(72)[3'n38n46']};
Str DrmH = {l8 P.onCycle(!8,64,72) Sub{n49}[15n35'n38n46']P(72)['n38n46'] P.onCycle(!8,64,72) Sub{n49}[11n35'n38n46']P(72)['n38n46']};
Str DrmI = {l8 P.onCycle(!8,64,72) Sub{n49}[15n35'n38n46']P(72)['n38n46'] P.onCycle(!8,64,72) Sub{n49}[15n35'n38n46']P(72)'n38n46'P(64)n49 };

Str ElgIn = {[4r1] l8 [[4r'g`d'][4r'f`c']]};
Str ElgA = {[16r1]};
Str ElgB = {[10r1]};
Str ElgC = {[15r1]};
Str ElgD = {l8 [[4r'g`d']:[4r'f`c']]r1};
Str ElgE = ElgA;
Str ElgF = {l16 r[5'`e`a''`d`g''`e-`a-']r[5'`d``c''`c`a''`c+`b'] rr'`d8`g8`b8'[r'`d,80`g,80`b,80'] rr'`c8`f8`a8'[r'`c,80`f,80`a,80'] rr['``e,80`a-,80`b,80'rr]['``e`a-`b'rr]M(20)'``e8`a-8`b8'
M(0)rr['``c,80`e,80'rr]['``c`e'rr]M(20)'``c8`e8' M(0)rr['`b,80`d,80'rr]['`b`d'rr]M(20)'`b8`d8' M(0)rr[3'`b-,80`d,80'r:r]'`b-8`d8'Sub{`a16&`b-16}`c+16&`d16'`b-8`g8' l24 [`a`g`f+`f+`g`a][`a``c``e``e``c`a]M(20) g4r4r4r4};
Str ElgG = {[8r1]};
Str ElgH = {[7r1]};
Str ElgI = {M(0) l8 [4[4r'g`d']:[4r'f`c']][3r'f`c']M(30)'f1^1`c1^1'};

Str ClgIn = {[4r1] l16 [[g^`d^r`g`d^]:[f^`c^r`f`c^]]f^`c^r`f`c^ r2};
Str ClgA = {l16 [8[g^`d^r`g`d^]:[f^`c^r`f`c^]]`dr`a^r``c`d^ g^`d^r`fg^};
Str ClgB = {[`c^`g^r``c`g^][b^`g^r`b`g^][b-^`g^r`b-`g^]a^`e^r`a`e^ g^`d^r`fg^ [`c^`g^r``c`g^]b^`f+^r`b`f+^ `b^`f+^re-b^
e^b^r`eb^ c+^g^rbc+^ [a^`e^r`a`e^][`d^`a^r``d`a^]r1};
Str ClgC = {[4`c^`e^r`e`g^ ``c^`g^r`g`c^ b^r`d^`d`g^ b-^r`d^`d`g^ a^`c^r`c`e^ `d^`f+^r`f+`a^ : g^`d^r`g`d^ g^b^`d^`f^]};
Str ClgD = {l16 [[g^`d^r`g`d^]:[f^`c^r`f`c^]]f8r2^4^8};
Str ClgE = {l16 [4[g^`d^r`g`d^]:[f^`c^r`f`c^]] r1 [4[g^`d^r`g`d^]:[f^`c^r`f`c^]]`e^`g^r``d`b^ g^`d^r`fg^};
Str ClgF = {l16 a^`c^r`e`c^ `a^`e^r`e`c^ `d^`a^r`f+`a^ ``d^`a^r`f+`d^ g^b^`d`g^g f^a^`c`f^f e^a-^rb`e^ `e^b^ra-e^
`c^`e^r`e`g^ ``c^`g^r`g`c^ b^`d^r`d`g^ `b^`g^r`g`d^ b-^`d^r`d`g^ `b-^`g^r`g`d^ a^`c^r`e`c^ `a^`e^r`e`c^ r1};
Str ClgG = {[8r1]};
Str ClgH = {[`c^`e^r`e`g^ ``c^`g^r`g`c^ b^r`d^`d`g^ b-^r`d^`d`g^ a^`c^r`c`e^ `d^`f+^r`f+`a^ : g^`d^r`g`d^ g^b^`d^`f^]};
Str ClgI = {l16 [4[g^`d^r`g`d^]:[f^`c^r`f`c^]]f^`c^r`f`c^ f^`c^r`f`c1^1};

Str BasIn = {[4r1] l8 [["grdr]:["frcr]]"frcr"f"f"e"f};
Str BasA = {[3 l8 [["grdr]:["frcr]]"frcr"f"f"e"f] [["grdr]:["frcr]]drdr"g"a"b"g};
Str BasB = {l8 [crgr]["brgr]["b-rgr]"ar"ar"g"a"b"g[crgr]"brf+rbrf+r [er][c+r]["arer][drar]dr"g&"f "g"a"b"g};
Str BasC = {l8 [4crgr`crgr"brgr"b-rgr"arerdrar:"grdr"g"a"b"g]};
Str BasD = {l8 [["grdr]:["frcr]]"frrrr"f"f"f};
Str BasE = {[l8 [["grdr]:["frcr]]:"frcr"f"f"e"f]r"f8^16"g8^16"a8^16"g8^16"f [l8 [["grdr]:["frcr]]:"frcr"f"f"e"f]"er"er"g"a"b"g};
Str BasF = {l8 ["arer][dr"ar][gr][fr][er"br][crgr]["brgr]["b-rgr]["arer]"g4r4r4r4};
Str BasG = {[c1"b2"b-2"a2d2:"g1]"g4^8r8 l8 "g"a"b"g};
Str BasH = {l8 [crgr`crgr"brgr"b-rgr"arerdrar:"grdr"g"a"b"g]};
Str BasI = {l8 [[["grdr]:["frcr]]"frcr"f"f"e:"f]"f1^1};

Str Cr1In = {[8r1]};
Str Cr1A = {[8g1:f1]d2g2};
Str Cr1B = {g1g1g1a2g2 g1f+1e2c+2"a1d1r1};
Str Cr1C = {[4g1g1a2d2:g1]};
Str Cr1D = {g1f1g1r1};
Str Cr1E = {[4g1:f1]r1 [4g1:f1]e2f2};
Str Cr1F = {"a1d1g2f2e1c1"b1"b-1"a1r1};
Str Cr1G = {[8r1]};
Str Cr1H = {[g1g1a2d2:g1]};
Str Cr1I = {[4g1:f1]f2^4^8 f1^1};

Str Cr2In = {[8r1]};
Str Cr2A = {[3[3r1] l16 rrf^^g^^a^^g^^f^][4r1]};
Str Cr2B = {[10r1]};
Str Cr2C = {[15r1]};
Str Cr2D = {[3r1]l16 rrf^^g^^a^^g^^f^};
Str Cr2E = Cr2A;
Str Cr2F = {};
Str Cr2G = {};
Str Cr2H = {};
Str Cr2I = {};

Str Cr3In = {[4r1] l8 [grrrrrrrfrrrrrrr]};
Str Cr3A = {l8 [8grrrrrrr:frrrrrrr]r1};
Str Cr3B = {[10r1]};
Str Cr3C = {[15r1]};
Str Cr3D = {l8 [grrrrrrr:frrrrrrr]r1};
Str Cr3E = {l8 [[4grrrrrrr:frrrrrrr]r1]};
Str Cr3F = {[9r1]};
Str Cr3G = {[8r1]};
Str Cr3H = {[7r1]};
Str Cr3I = {l8 [4grrrrrrrfrrrrrrr]};

//-----------------------------------Tracks--------------------------------------

#Scr = {Time(1:1:0) #?1In;#?1A;#?1B;#?1C;#?1D;#?1E;#?1B;#?1C;#?1F;#?1G;#?1H;#?1I;}

//Track--------001---002---003---004---005---006---007---008---009---010---011---012---013---014---015---016---
Array Vols = ( 080 , 100 , 127 , 100 , 100 , 100 , 100 , 080 , 080 , 100 , 090 , 080 , 100 , 120 , 090 , 100 );

FOR(Int I=1;I<=16;I++){TR(I) CH(I) V(Vols(I-1));}

TR(1)  Voice(1) M(0) REV(20) CHO(0) P(64) PitchBend(0) q100 v100 o5
Time(1:1:0) V(100) Time(5:1:0) V(80) #Scr(Pia)
TR(2)  Voice(34) M(0) REV(0) CHO(0) P(48) PitchBend(0) q98 v100 o3
#Scr(Bas)
TR(3)  Voice(69) M(0) REV(0) CHO(0) P(64) PitchBend(0) q100 v100 o4
#Scr(Mel)
TR(4)  Voice(1) M(0) REV(0) CHO(0) P(64) PitchBend(0) q100 v100 o5

TR(5)  Voice(1) M(0) REV(0) CHO(0) P(64) PitchBend(0) q100 v100 o5

TR(6)  Voice(1) M(0) REV(0) CHO(0) P(64) PitchBend(0) q100 v100 o5

TR(7)  Voice(1) M(0) REV(0) CHO(0) P(64) PitchBend(0) q100 v100 o5

TR(8)  Voice(56) M(0) REV(0) CHO(40) P(72) PitchBend(0) q100 v100 o5
t8 #Scr(Cr3)
TR(9)  Voice(30) M(0) REV(10) CHO(0) P(88) PitchBend(0) q98 v100 o4
t8 #Scr(Elg)
TR(10) M(0) REV(0) CHO(0) P(64) v100
#Scr(Drm)
TR(11) Voice(30) M(0) REV(10) CHO(0) P(96) PitchBend(0) q98 v100 o4
#Scr(Elg)
TR(12) Voice(76) M(10) REV(10) CHO(40) P(64) PitchBend(0) q100 v100 o6
#Scr(Cr1)
TR(13) Voice(18) M(0) REV(0) CHO(0) P(48) PitchBend(0) q100 v100 o5
#Scr(Cr2)
TR(14) Voice(26) M(0) REV(0) CHO(0) P(48) PitchBend(0) q100 v100 o4
#Scr(Clg)
TR(15) Voice(56) M(0) REV(0) CHO(40) P(80) PitchBend(0) q100 v100 o5
#Scr(Cr3)
TR(16) Voice(18) M(0) REV(0) CHO(0) P(48) PitchBend(0) q100 v100 o4
#Scr(Cr2)

//-------------------------------others----------------------------------

Time(126:3:0) 
Tempo=100;

FOR(Int J=1;J<=16;J++){TR(J) CH(J) Time(127:1:0) V.onTime(Vols(J-1),0,!1^1) }