//------------------------------------------------------------------------------
// dSakura.dll Version.2.379
//------------------------------------------------------------------------------
//_著作者表記、他
曲名{"きっと明日は悪くない"};作者{"レイン望"};コメント{"前向きな気持ちになれるポップスを目指して制作しました。"};
/*

こちら、レイン望でございます。

前回に引き続き、またポップスを作りたい欲が溢れてしまい作りました。
今回は、かつて サクラ曲掲示板 Part 5 に曲を投稿されていた午見ヒューラ( https://sakuramml.com/mmlbbs5/mml.cgi?mode=user&id=2 )さんの複数のポップス曲から多大なる影響を受けております。
今は「ゆらゆら」という名前にて、たまにSoundCloudに曲を上げてらっしゃるようですね。

さて、多大なる影響を受けたとはいえ、雰囲気をそのまま真似るのは個人的につまらないので、要所要所で自分なりの個性をぶっこんでみました。
例えば、クリスタルの音色は相変わらずのお気に入りなので当たり前のように入れております。その他、伴奏については最近両手弾きを意識した書き方をしております。

今後の課題としては、見やすいソースと作業効率だと思っています。

*/
//------------------------------------------------------------------------------
//_各種初期設定
Include(gs.h);System.MeasureShift(1);ResetGM;ResetGS;ResetXG;Time(1:1:0);TrackSync;//音源初期化
System.TimeSignature(4,4);/*Tempo(140);*///拍子・テンポ
//------------------------------------------------------------------------------
//_演奏時間
#Part_X	={Time(011:1:0)}//前奏
#Part_A	={Time(019:1:0)}//Aパート
#Part_B	={Time(035:1:0)}//Bパート
#Part_C	={Time(052:1:0)}//Cパート（サビ）
#Part_Y	={Time(072:1:0)}//間奏
#Part_D	={Time(080:1:0)}//Dパート
#Part_E	={Time(096:1:0)}//Eパート
#Part_F	={Time(113:1:0)}//Fパート（サビ2）
#Part_Y2	={Time(129:1:0)}//間奏2
#Part_G	={Time(141:1:0)}//Gパート（サビ3）
#Part_Z	={Time(170:1:0)}//〆
//------------------------------------------------------------------------------
//_トランスポーズ（時間指定型）
/*
	適用時間を指定して、全てのトラックのキーをvalur半音上げる。
	(fromTime)を省略すると現在のタイム、(toTime)を省略すると次に指定があるまでが補完される。
	
	尚、リズムトラックにまで、TimeKeyは適用されてしまうので、リズムトラックでは、TimeKeyを無効にする、"UseKeyShift"を、(off)に設定すること。
	
	↓テンプレ↓
	TimeKey((fromTime),(toTime),(value));//(fromTime)-(toTime)の間、全てのトラックのキーを(value)する
*/
TimeKey((001:1:0),(051:1:0),-1);//(001:1:0)-(051:1:0)の間、全てのトラックのキーを-1
TimeKey((051:1:0),(071:4:0),+2);//(051:1:0)-(071:4:0)の間、全てのトラックのキーを+2 （以下略）
TimeKey((071:4:0),/*省略*/,-1);
TimeKey((112:1:0),/*省略*/,+2);
TimeKey((169:4:0),/*省略*/,-1);
//------------------------------------------------------------------------------
//_Track0 テンポチェンジ用
TR(0)
Time(01:1:0);Tempo(092);
Time(10:1:0);Tempo(140);
//_Track1 主旋律
TR(1)@67,0,0//音色(TenorSax)
REV(064)CHO(032)v.Random(10)
#Part_A;P(64)q100o6 [(2) l8r"ggfeddc d4e<grgab l4.b>cd4 l4erl8efde | c2r8"g8a4 g4l8acrcde :f4ef4g4 e8+4.l16feM(32)d2M(0) ] l8f4ec4.d4c2
#Part_B;r-2l8rcde | [(2) l4.ed"a4 d2l8rdef l4.g"bd4 l8ded:c8+4rl16de | l4.fc<a4 bg>a4 l.N(!4,!8)gfede4+2 l8rcde ] c+8+4rl16de | l4.fcf+ cl4cd c1-8l16"bc d1 | r1
#Part_C;v+10 [(2) P(64+16)l4.cde4 g4l8agrgab l4.b`c:e4 M(16)g2,75M(0)P(64)l8agfe | l4.fca4 l8gaberede fecf4ga4 M(32)g1,75M(0) ] `d4 l.N(!4,!8)b`cbag4 | l2M(32)aM(0)P(64)l8ragf l4.g`c,75g4 f#M(32)`c,75M(0)P(64+16)`c4 `c4b8l4ag | g8+4.f8M(64)e2+1M(0)P(64) v-10
#Part_D;P(64)q100o6 [(2) l8r"ggfeddc d4e<grgab l4.b>cd4 l4erl8efde | c2r8"g8a4 g4l8acrcde :f4ef4g4 e8+4.l16feM(32)d2M(0) ] l8f4ec4.d4c2
#Part_E;r-2l8rcde | [(2) l4.ed"a4 d2l8rdef l4.g"bd4 l8ded:c8+4rl16de | l4.fc<a4 bg>a4 l.N(!4,!8)gfede4+2 l8rcde ] c+8+4rl16de | l4.fcf+ cl4cd c1-8l16"bc d1 | r1
#Part_F;v+10 [(2) P(64+16)l4.cde4 g4l8agrgab l4.b`c:e4 M(16)g2,75M(0)P(64)l8agfe | l4.fca4 l8gaberede fecf4ga4 M(32)g1,75M(0) ] `d4 l.N(!4,!8)b`cbag4 | l2M(32)aM(0)P(64)l8ragf l4.g`c,75g4 f#M(32)`c,75M(0)P(64+16)`c4 `c4b8l4agf8 | M(64)e1M(0)P(64) v-10
#Part_G;P(64)l4.cde4 g4l8agrgab l4.b`ce4 M(16)g2,75M(0)P(64)l8agfe | l4.fca4 l8gaberede fecf4ga4 M(32)g1,75M(0) | r1
	v+10 [(2) P(64+16)l4.cde4 g4l8agrgab l4.b`c:e4 M(16)g2,75M(0)P(64)l8agfe | l4.fca4 l8gaberede fecf4ga4 abag8+2,75 ] `d4 Div{`e`d`c}2Div{`cbg}2 | l2M(32)aM(0)P(64)l8ragf l4.g`c,75g4 f#M(32)`c,75M(0)P(64+16)`c4 `c4b8l4ab | `d8+4.`c8M(64)`c2+1M(0)P(64) v-10
//_Track2 ベース
TR(2)@34,0,0//音色(FingerBass)
REV(032)v.Random(10)
#Part_X;P(64)q105o2 l8[8g] [8c] [8e] [a]ea4aba | [8f] [8e] [8d] [g]dg4gab
#Part_A;[(2) `c2.`c4 g4.grefg [a4.]a4 e2ecde | f2.f4 ecebaeca :d2.d4 g2gdbg ] d2g2 `c4rg`cgec
#Part_B;[(2) [f4.]f4 [g4.]g4 [e4.]e4 a4.a4eca |: [f4.]f4 [g4.]g4 [a4.]a4 e4.e4cde ] f4.c4. f+4.crcf+cd+f+ g2rd"bb g1 | Div{fcf}2g2
#Part_C;[(2) [(4)c`c] [(4)"gg] [(4)"aa] [(4)"ee] | [(4)"ff] [(2)"ee][(2)"aa] [(4)"dd] [(4)"gg] ] | [(4*3)c`c] `c1
#Part_Y;o2 l8[8g] [8c] [8e] [a]ea4aba | [8f] [8e] [8d] [g]dg4gab
#Part_D;[(2) `c2.`c4 g4.grefg [a4.]a4 e2ecde | f2.f4 ecebaeca :d2.d4 g2gdbg ] d2g2 `c4rg`cgec
#Part_E;[(2) [f4.]f4 [g4.]g4 [e4.]e4 a4.a4eca |: [f4.]f4 [g4.]g4 [a4.]a4 e4.e4cde ] f4.c4. f+4.crcf+cd+f+ g2rd"bb g1 | Div{fcf}2g2
#Part_F;[(2) [(4)c`c] [(4)"gg] [(4)"aa] [(4)"ee] | [(4)"ff] [(2)"ee][(2)"aa] [(4)"dd] [(4)"gg] ] | 
#Part_Y2;[(4)c`c] [(4)"gg] [(2)"ee][(2)"gg] [(4)"aa] | [(2)"ff][(2)"gg] [(2)"ee][(2)"aa] | [(4)"ff] [(4)"f+f+] [(8)"gg] | [(2)"gg][(2)"aa] [(2)"bb][(2)"gg]
#Part_G;r1+1+1+1 | l2f1ead1g1 | r1
	l8[(2) [(4)c`c] [(4)"gg] [(4)"aa] :[(4)"ee] | [(4)"ff] [(2)"ee][(2)"aa] [(4)"dd] [(4)"gg] ] [e2] | [(4)"ff] [(2)"ee][(2)"aa] [(4)"dd] [(4)"gg] | [(4*3)c`c] `c1
#Part_Z;o2 l8[8g] [8c] [8e] [a]ea4aba | [8f] [8e] [8d] [g]dg4gab |
	[8c] [8g] [8a] [2e]ba4ega | [8f] [8e] [8d] [g]dg4gab | `c4.`c8+2+1+1+1
//_Track3 伴奏
TR(3)@5,8,0//音色(ElectricPiano1)
REV(096)CHO(064)
Time(1:1:0);P(32)q100v75 Sub{ o3l1'cg' 'dg' 'ea' 'eb' } Slur(3) o5l8c&e&g&`c8+2 "b&d&g&b8+2 "a&c&e&a8+2 "g&"b&d&g8+2 | Sub{ o3l1 'cf' 'eb'2'ea'2 'da' 'dg' } Slur(3) o5l8"f&"a&c&f4c&"a&f e&"b&g&bt.N(0,2,5)'cea'2,75t.N(0) d&"a&f&a4g&d&"a,50 t.N(0,2,5,8)'"g"bdg'1,90t.N(0) | t.N(0,8,16)'b`d`g'1,110t.N(0)
#Part_X;P(32)o5l1'<<dg>>dgb' '<<cg>>ceg' '<<eb>>egb' '<<ea>>cea' | '<<cf>>cfa' '<<eb>>egb' '<<da>>dfa' '<<dg>>dgb'
#Part_A;v90[(2) '<<cg>>ceg' '<<dg>>dgb' '<<ea>>cea' '<<eb>>egb' | '<<cf>>cfa' '<<eb>>egb'2'<<ea>>cea'2 : '<<da>>dfa' '<<dg>>dgb' ] '<<da>>dfa'2'<<dg>>dgb'2 '<<cg>>eg`c'
#Part_B;[(2) '<<cf>>cefa' '<<dg>>dfgb' '<<eb>>egb' :'<<ea>>cea' | '<<cf>>cfa' '<<dg>>dgb' '<<ea>>cega' '<<eb>>egb' ] '<<ea>>cea'4.'<<ea>>c+ea'8+2 | '<<cf>>cfa'1-4 '<<cf+>>cf+a'4+2'<<cf+>>cf+a'2 '<<dg>>dgb' '<<dg>>dgb' | v+10'<<cf>>cfa'2'<<dg>>dgb'2
#Part_C;[(2) '<<cg>>eg`c' '<<dg>>dgb' '<<ea>>cea' '<<eb>>"beg' | '<<cf>>cfa' '<<eb>>"beg'2'<<ea>>cea'2 '<<da>>"adf' '<<dg>>dgb' ] | '<<cg>>eg`c'^^^ v-10
#Part_Y;o5l1'<<dg>>dgb' '<<cg>>ceg' '<<eb>>egb' '<<ea>>cea' | '<<cf>>cfa' '<<eb>>egb' '<<da>>dfa' '<<dg>>dgb'
#Part_D;v90[(2) '<<cg>>ceg' '<<dg>>dgb' '<<ea>>cea' '<<eb>>egb' | '<<cf>>cfa' '<<eb>>egb'2'<<ea>>cea'2 : '<<da>>dfa' '<<dg>>dgb' ] '<<da>>dfa'2'<<dg>>dgb'2 '<<cg>>eg`c'
#Part_E;[(2) '<<cf>>cefa' '<<dg>>dfgb' '<<eb>>egb' :'<<ea>>cea' | '<<cf>>cfa' '<<dg>>dgb' '<<ea>>cega' '<<eb>>egb' ] '<<ea>>cea'4.'<<ea>>c+ea'8+2 | '<<cf>>cfa'1-4 '<<cf+>>cf+a'4+2'<<cf+>>cf+a'2 '<<dg>>dgb' '<<dg>>dgb' | v+10'<<cf>>cfa'2'<<dg>>dgb'2
#Part_F;[(2) '<<cg>>eg`c' '<<dg>>dgb' '<<ea>>cea' '<<eb>>"beg' | '<<cf>>cfa' '<<eb>>"beg'2'<<ea>>cea'2 '<<da>>"adf' '<<dg>>dgb' ] | v-10
#Part_Y2; l1 'o3cg>>ceg' 'o3dg>>"bdg' 'o3eb>>"beg'2'o3dg>>"bdg'2 'o3ea>>cea' | l2 'o3cf>>cfa''o3dg>>dgb' 'o3eb>>egb''o3ea>>ea`c' | l1 'o3cf>>cfa' 'o3cf+>>cf+a' 'o3dg>>dgb'1+1 | 'o3dg>>dgb' 'o3dg>>dg`c'2'o3dg>>dgb'2
#Part_G;Sub{ o3l1'cg' 'dg' 'ea' 'eb' } Slur(3) o5l8c&e&g&`c8+2 "b&d&g&b8+2 "a&c&e&a8+2 "g&"b&d&g8+2 | Sub{ o3l1 'cf' 'eb'2'ea'2 'da' 'dg' } Slur(3) o5l8"f&"a&c&f4c&"a&f e&"b&g&bt.N(0,2,5)'cea'2,75t.N(0) d&"a&f&a4g&d&"a,50 t.N(0,2,5,8)'"g"bdg'1,90t.N(0) | t.N(0,8,16)'b`d`g'1,110t.N(0)
	o5l1[(2) '<<cg>>eg`c' '<<dg>>dgb' '<<ea>>cea' '<<eb>>"beg' | '<<cf>>cfa' '<<eb>>"beg'2'<<ea>>cea'2 '<<da>>"adf' '<<dg>>dgb' ] | '<<cg>>eg`c'^^^ v-10
#Part_Z;o5l1'<<dg>>dgb' '<<cg>>ceg' '<<eb>>egb' '<<ea>>cea' | '<<cf>>cfa' '<<eb>>egb' '<<da>>dfa' '<<dg>>dgb' | 
	'<<cg>>ceg' '<<dg>>dgb' '<<ea>>cea' '<<eb>>egb' | '<<cf>>cfa' '<<eb>>egb' '<<da>>dfa' '<<dg>>dgb' | '<<cg>>cdg'4.'<<cg>>ceg'8+2+1+1+1
//_Track4 ピアノ兼伴奏
TR(4)@2,0,0//音色(BrightPiano)
Str Gliss = {UseKeyShift(off);P.T(127,64,!4) Div{v115q110o8agfedc<bagfedc<ba}4 UseKeyShift(on);};
REV(032)
Time(1:1:0);P(96)q100o6l4.cde4 g4l8agrfef l4.fgc4 l2ed4.l16ed | c1+1
#Part_C;r-4 Gliss | P(64)q75o5l8v95[(2) [(4)'"c"g''eg`c'] [(4)'"d"g''dgb'] [(4)'"e"a''cea'] [(4)'"e""b''"beg'] | [(4)'"c"f''cfa'] [(2)'"e""b''"beg'][(2)'"a"e''cea'] [(4)'"d""a''"adf'] [(4)'"d"g''dgb'] ] | [(4*3)'"gc''eg`c']'"gc'0'eg`c'1
#Part_F;r-4 Gliss | P(64)q75o5l8v95[(2) [(4)'"c"g''eg`c'] [(4)'"d"g''dgb'] [(4)'"e"a''cea'] [(4)'"e""b''"beg'] | [(4)'"c"f''cfa'] [(2)'"e""b''"beg'][(2)'"a"e''cea'] [(4)'"d""a''"adf'] [(4)'"d"g''dgb'] ] | 
#Part_Y2;[(4)'"c"g''eg`c'] [(4)'"d"g''dgb'] [(2)'"e""b''"beg'][(2)'"d"g''dgb'] [(4)'"e"a''cea'] | [(2)'"c"f''cfa'][(2)'"d"g''dgb'] [(2)'"e""b''"beg'][(2)'"e"a''cea'] | [(4)'"c"f''cfa'] [(4)'"c"f+''cf+a'] [(4*2)'"d"g''dgb'] | [(4)'"d"g''dgb'] [(2)'"d"g''dg`c'][(2)'"d"g''dgb']
#Part_G;r1+1+1+1 | r1+1+1+1 | r2+4 Gliss 
	P(64)q75o5l8v95[(2) [(4)'"c"g''eg`c'] [(4)'"d"g''dgb'] [(4)'"e"a''cea'] :[(4)'"e""b''"beg'] | [(4)'"c"f''cfa'] [(2)'"e""b''"beg'][(2)'"a"e''cea'] [(4)'"d""a''"adf'] [(4)'"d"g''dgb'] ] r2+4Gliss | o5v95[(4)'"c"f''cfa'] [(2)'"e""b''"beg'][(2)'"a"e''cea'] [(4)'"d""a''"adf'] [(4)'"d"g''dgb'] | [(4*3)'"gc''eg`c']'"gc'0'eg`c'1
//_Track5 ストリングス
TR(5)@49,0,0//音色(Strings1)
REV(064)CHO(032)
#Part_X;EP(127)v100P(64)q105o5 r-4l16cdef | g2.`c4 g4.>d4l8cde dc"gc8^2^4. c4def | g2+8fef8+2 redc "g4.g8+2 r`cbg8+2
#Part_A;v75P(127)l1[(7)r]l8"g4ag4fed | EP.T(127,032,!1)e1 r-1[(8)r1]r-1 EP(127)q100l8c`cbgedc"g | EP.T(127,032,!1)"e1
#Part_B;l1[(2)rrr:r] P(127)EP(127)o6l8rc"gcdc"g"e | e2+4.l16ce f1 g2+8l8fed e1-8d16e16 | l8fc"ac4"af+c"ac4"af+c"ac l8g2rd"bag1 | r2r2
#Part_C;[(2) c2+8l8cde l4g^ab >l2cd ed | <l2a1 :gc d2+8l8def g4.g4fed ] g`c f+`c dg EP.T((127,127,!1),(127,000,!1+1+1))l1`c^^^
#Part_Y;EP(127)v100P(64)o5g2.`c4 g4.>d4l8cde dc"gc8^2^4. c4def | g2+8fef8+2 redc "g4.g8+2 r`cbg8+2
#Part_D;v75P(127)l1[(7)r]l8"g4ag4gab | q50l4[(4)'e`c'] [(4)'g`d'] [(6)'a`e'] [(2)'eb'] | q100l1 'cf' '"be'2'ea'2 'da'2'gb'2 EP(127)q100l8c`cbgedc"g | EP.T(127,032,!1)"e1
#Part_E;l1[(2)rrr:r] P(127)EP(127)o6l8rc"gcdc"g"e | e2+4.l16ce f1 g2+8l8fed e1-8d16e16 | l8fc"ac4"af+c"ac4"af+c"ac l8g2rd"bag1 | r2r2
#Part_F;[(2) c2+8l8cde l4g^ab >l2cd ed | <l2a1 :gc d2+8l8def g4.g4fed ] g`c f+`c dg EP.T((127,127,!1),(127,000,!1+1+1))l1`c^^^
#Part_Y2;[4r1] | EP(127)l2fg b4.a16b16`c | q50l4[(4)'cf'] [(4)'cf+'] [(4*2)'dg'] | [(2)'dg'] q100l8gca`c b`c`dg8+2
#Part_G;[8r1] | r1
	[(2) c2+8l8cde l4g^ab >l2cd ed | <l2a1 :gc d2+8l8def g4.g4fed ] g`c f+`c dg EP.T((127,127,!1),(127,000,!1+1))l1`c^^ | r2.EP(127)P(064)v100o5l16cdef
#Part_Z;EP(127)P(064)v100o5g2.`c4 g4.>d4l8cde dc"gc8^2^4. c4def | g2+8fef8+2 redc "g4.g8+2 r`cbg8+4r4
	P(127)v75q100l1'eg`c' 'dgb' 'cea' '"beg' | q50l4[(4)'cf'] [(2)'eb'][(2)'ea'] q100l1'da' 'dg'r-2b2 | EP.T((127,127,!1),(127,000,!1+1+1))'eg`c'1+1+1+1
//_Track6 クリスタル
TR(6)@99,0,0//音色(Crystal)
REV(096)CHO(032)
#Part_X;P(127)v75q105o7l1g c l2g>e dc | l1c d e l4edcd
#Part_C;v+5 o7[(2) l1c g l2bg >ed | <l1a g2:c2 l2d`c bg ] `c2 l2f#`c fg | l1`crl8"gcag4ed4c1 v-5
#Part_Y;o7l1g c l2g>e dc | l1c d e l4edcd
#Part_F;v+5 o7[(2) l1c g l2bg >ed | <l1a g2:c2 l2d`c bg ] `c2 l2f#`c fg | l1`cr v-5
#Part_Y2;[4r1] | o7l2g2.>e4dc | o7l1f f+ g r | l2g2.`c4 bg
#Part_G;[8r1] | r1
	v+5 o7[(2) l1c g l2bg >ed | <l1a g2:c2 l2d`c bg ] `c2 l2f#`c fg | l1`crl8"gcag4ed4c1 v-5
#Part_Z;[(2)o7l1g c l2g>e dc | l1c d e l4edcd ] | o7b4.`c8+2+1
//_Track7 ギター
TR(7)@26,0,0//音色(SteelcGuitar)
//チューニング　o3ea>dgb>e
Function GtSt(Str CHD){t.N(-4,-2,0,2,4,8)'CHD'4'CHD'8t.N(8,4,2,0,-2,-4)'CHD'4'CHD'8t.N(-4,-2,0,2,4,8)'CHD'4};
Function GtSt2a(Str CHD){t.N(-4,-2,0,2,4,8)'CHD'4'CHD'8t.N(8,4,2,0,-2,-4)'CHD'8}; Function GtSt2b(Str CHD){t.N(-4,-2,0,2,4,8)[(2)'CHD'4]};
Function GtSt3a(Str CHD){/*全音符*/q50[(4)t(0)r8t.N(8,4,2,0,-2,-4)'CHD'8]}; Function GtSt3b(Str CHD){/*２分音符*/q50[(2)t(0)r8t.N(8,4,2,0,-2,-4)'CHD'8]};
REV(032)v.Random(10)
#Part_X;P(96)q105v75 GtSt(o3gb>dgb>g) GtSt(o3r>ceg>ce) GtSt(o3eb>egb>e) GtSt(o3ra>ea>ce) | GtSt(o3fa>fa>cf) GtSt(o3eb>egb>e) GtSt(o3ra>da>df) t.N(-4,-2,0,2,4,8)[(2)'o3gb>dgb>g'2]
#Part_A;[(2) GtSt(o3r>ceg>ce) GtSt(o3gb>dgb>g) GtSt(o3ra>ea>ce) GtSt(o3eb>egb>e) | GtSt(o3fa>fa>cf) GtSt2a(o3eb>egb>e)GtSt2b(o3ra>ea>ce) :GtSt(o3ra>da>df) GtSt(o3gb>dgb>g) ] GtSt2a(o3ra>da>df)GtSt2b(o3gb>dgb>g) GtSt(o3r>ceg>ce)
#Part_B;l1t.N(0,3,7,12,18,25)[(2) 'o3fa>fa>cf' 'o3gb>dgb>g' 'o3eb>egb>e' :'o3ra>ea>ce' | 'o3fa>fa>cf' 'o3gb>dgb>g' 'o3ra>ea>ce' 'o3eb>egb>e' ] l2'o3ra>ea>ce''o3ra>ea>c+e' | 'o3fa>fa>cf'1-4 'o3f+a>f+a>cf+'4+2'o3f+a>f+a>cf+'2 ['o3gb>dgb>g'1] | t.N(-4,-2,0,2,4,8)'o3fa>fa>cf'2 'o3gb>dgb>g'2
#Part_C;[(2) GtSt3a(o3r>ceg>ce) GtSt3a(o3gb>dgb>g) GtSt3a(o3ra>ea>ce) GtSt3a(o3eb>egb>e) | GtSt3a(o3fa>fa>cf) GtSt3b(o3eb>egb>e)GtSt3b(o3ra>ea>ce) :GtSt3a(o3ra>da>df) GtSt3a(o3gb>dgb>g) ] GtSt3a(o3ra>da>df+) GtSt3a(o3gb>dgb>g) | [(3)GtSt3a(o3r>ceg>ce)] t.N(-32,-16,0,16,32,48)'o3r>ceg>ce'1
#Part_Y;P(96)q105v75 GtSt(o3gb>dgb>g) GtSt(o3r>ceg>ce) GtSt(o3eb>egb>e) GtSt(o3ra>ea>ce) | GtSt(o3fa>fa>cf) GtSt(o3eb>egb>e) GtSt(o3ra>da>df) t.N(-4,-2,0,2,4,8)[(2)'o3gb>dgb>g'2]
#Part_D;t.N(-32,-16,0,16,32,48)'o3r>ceg>ce'1 r1 GtSt(o3ra>ea>ce) GtSt(o3eb>egb>e) | GtSt(o3fa>fa>cf) GtSt2a(o3eb>egb>e)GtSt2b(o3ra>ea>ce) GtSt(o3ra>da>df) GtSt(o3gb>dgb>g) |
	GtSt(o3r>ceg>ce) GtSt(o3gb>dgb>g) GtSt(o3ra>ea>ce) GtSt(o3eb>egb>e) | GtSt(o3fa>fa>cf) GtSt2a(o3eb>egb>e)GtSt2b(o3ra>ea>ce) GtSt2a(o3ra>da>df)GtSt2b(o3gb>dgb>g) GtSt(o3r>ceg>ce)
#Part_E;l1t.N(0,3,7,12,18,25)[(2) 'o3fa>fa>cf' 'o3gb>dgb>g' 'o3eb>egb>e' :'o3ra>ea>ce' | 'o3fa>fa>cf' 'o3gb>dgb>g' 'o3ra>ea>ce' 'o3eb>egb>e' ] l2'o3ra>ea>ce''o3ra>ea>c+e' | 'o3fa>fa>cf'1-4 'o3f+a>f+a>cf+'4+2'o3f+a>f+a>cf+'2 ['o3gb>dgb>g'1] | t.N(-4,-2,0,2,4,8)'o3fa>fa>cf'2 'o3gb>dgb>g'2
#Part_F;[(2) GtSt3a(o3r>ceg>ce) GtSt3a(o3gb>dgb>g) GtSt3a(o3ra>ea>ce) GtSt3a(o3eb>egb>e) | GtSt3a(o3fa>fa>cf) GtSt3b(o3eb>egb>e)GtSt3b(o3ra>ea>ce) :GtSt3a(o3ra>da>df) GtSt3a(o3gb>dgb>g) ] GtSt3a(o3ra>da>df+) GtSt3a(o3gb>dgb>g) | 
#Part_Y2;GtSt3a(o3r>ceg>ce) GtSt3a(o3gb>dgb>g) GtSt3b(o3eb>egb>e)GtSt3b(o3gb>dgb>g) GtSt3a(o3ra>ea>ce) | GtSt3b(o3fa>fa>cf)GtSt3b(o3gb>dgb>g) GtSt3b(o3eb>egb>e)GtSt3b(o3ra>ea>ce) | GtSt3a(o3fa>fa>cf) GtSt3a(o3f+a>f+a>cf+) [(2)GtSt3a(o3gb>dgb>g)] | GtSt3a(o3gb>dgb>g) GtSt3b(o3g`c>dg`c>g)GtSt3b(o3gb>dgb>g)
#Part_G;[4r1] | [4r1] | r1
	[(2) GtSt3a(o3r>ceg>ce) GtSt3a(o3gb>dgb>g) GtSt3a(o3ra>ea>ce) :GtSt3a(o3eb>egb>e) | GtSt3a(o3fa>fa>cf) GtSt3b(o3eb>egb>e)GtSt3b(o3ra>ea>ce) :GtSt3a(o3ra>da>df) GtSt3a(o3gb>dgb>g) ] r1 | GtSt3a(o3fa>fa>cf) GtSt3b(o3eb>egb>e)GtSt3b(o3ra>ea>ce) GtSt3a(o3ra>da>df+) GtSt3a(o3gb>dgb>g) | [(3)GtSt3a(o3r>ceg>ce)] t.N(-32,-16,0,16,32,48)'o3r>ceg>ce'1
#Part_Z;P(96)q105v75 GtSt(o3gb>dgb>g) GtSt(o3r>ceg>ce) GtSt(o3eb>egb>e) GtSt(o3ra>ea>ce) | GtSt(o3fa>fa>cf) GtSt(o3eb>egb>e) GtSt(o3ra>da>df) t.N(-4,-2,0,2,4,8)[(2)'o3gb>dgb>g'2] |
	GtSt(o3r>ceg>ce) GtSt(o3gb>dgb>g) GtSt(o3ra>ea>ce) GtSt(o3eb>egb>e) | GtSt(o3fa>fa>cf) GtSt(o3eb>egb>e) GtSt(o3ra>da>df) t.N(-4,-2,0,2,4,8)[(2)'o3gb>dgb>g'2] | t.N(-6,-3,0,3,6,12)'o3r>cdg>cd'4.'o3r>ceg>ce'8+2+1
//_Track8 合いの手
TR(8)@62,0,0//音色(BrassSection)
REV(032)
#Part_A;r-2 P(0)q50v75l8r'`ceg'['`ceg'16]'`ceg' | '`ceg'4
#Part_A;[(8)r1]r-2 o6l16r8['`ceg']['`ceg']r'`ceg' | '`ceg'4,75 r-4 l1[(8)r] r-2 l8r'`ceg'['`ceg'16]'`ceg'
#Part_C;[(2) [3r1]:l8r'`ceg'['`ceg'16]'`ceg'r2 | [4r1] ] r2l8r'`ceg'['`ceg'16]'`ceg' | [4r1]
#Part_D;r-2           l8r'`ceg'['`ceg'16]'`ceg' | '`ceg'4
#Part_D;[(8)r1]r-2 o6l16r8['`ceg']['`ceg']r'`ceg' | '`ceg'4,75 r-4 l1[(8)r] r-2 l8r'`ceg'['`ceg'16]'`ceg'
#Part_F;[(2) [3r1]:l8r'`ceg'['`ceg'16]'`ceg'r2 | [4r1] ] r2l8r'`ceg'['`ceg'16]'`ceg' | [4r1]
#Part_Y2;[4r1]r-2l8r'`ceg'['`ceg'16]'`ceg' | [2r1] | [6r1]r-2l8r'dgb'['`ceg'16]'dgb'
#Part_G;[8r1] | r1
	[(2) [3r1]:l8r'`ceg'['`ceg'16]'`ceg'r2 | [4r1] ] | r-2l8r'`ceg'['`ceg'16]'`ceg'r1 | [4r1]
//_Track9 音埋め（音色変更あり）
TR(9)/* @8,0,0//音色(Clavi) @81,8,0//音色(SquareLead) */
REV(032)
#Part_X;@81,8,0P(0)q100v50o6l16[(4)"bdgd][(4)cege][(4)"g"be"b][(4)ceae]|[(4)"acfc][(4)"g"be"b][(4)"f"ad"a][(4)"bdgd]
#Part_B;@08,0,0        v75o5 l8[(2) "acfcfc"af "bdgdgd"bg "g"be"be"b"ge ceacaeca | :"acfcfc"af "bdgdgd"bg ceacaeca "g"be"be"b"ge ] 
#Part_Y;@81,8,0        v50o6l16[(4)"bdgd][(4)cege][(4)"g"be"b][(4)ceae]|[(4)"acfc][(4)"g"be"b][(4)"f"ad"a][(4)"bdgd]
#Part_E;@08,0,0        v75o5 l8[(2) "acfcfc"af "bdgdgd"bg "g"be"be"b"ge ceacaeca | :"acfcfc"af "bdgdgd"bg ceacaeca "g"be"be"b"ge ] 
#Part_Z;@81,8,0        v50o6l16[(4)"bdgd][(4)cege][(4)"g"be"b][(4)ceae]|[(4)"acfc][(4)"g"be"b][(4)"f"ad"a][(4)"bdgd] | [(4)eg`cg][(4)dgbg][(4)ceae][(4)"bege] | [(4)"acfc][(4)"g"be"b][(4)"f"ad"a][(4)"bdgd]
	EP.T((096,127,!1+1),(127,127,!1+1),(127,064,!1+1+1+1))P.T((0,64,!1+1+1+1),(64,0,!1+1+1+1))@08,0,0v75o5l8[(8)"gcecgcec]
//_Track11 ハモリ（音色変更あり）
TR(11)/* @67,0,0//音色(TenorSax) @10,0,0//音色(Glockenspiel) */
v.Random(10)
//#Part_C;[(2) l4. cd e4 g4l8agrgab l4.b`c:e4 g2,75l8agfe | l4.fca4   `d4l.N(!4,!8)b`cbag4 |l2M(32)aM(0)l8ragf l4.g`cg4 f#`c,75`c4 `c4b8l4ag | g8+4.f8M(64)e2+1M(0)
#Part_B;REV(096)CHO(016)@10,0,0q100o6v105 P(64+63)[(2)r1] l4.g"bd4 l8dedc8+2 | [(2)r1]r-4a4 l.N(!4,!8)gfede4+2 r2 | [(2)r1] l4.g"bd4 l8dedc+8+2  //r-2l8rcde | [(2) l4.ed"a4 d2l8rdef l4.g"bd4 l8ded:c8+4rl16de | l4.fc<a4 bg>a4 l.N(!4,!8)gfede4+2 l8rcde ] c+8+4rl16de | l4.fcf+ cl4cd c1-8l16"bc d1 | r1
#Part_C;REV(064)CHO(032)@67,0,0o6v85 [(2) P(64-16)l4.<ab>c4 e4l8ferefg l4.ga:c4 e2,75l8rrrr | P(64)r1+1+1+1 ] b4 l.N(!4,!8)gagfe4 | l2M(32)fM(0)l8rrrr P(64)r1 r1-4P(64-16)a4 a4g8l4fe | e8+4.d8M(64)c2+1M(0) v-10
#Part_E;REV(096)CHO(016)@10,0,0o6v105     P(64+63)[(2)r1] l4.g"bd4 l8dedc8+2 | [(2)r1]r-4a4 l.N(!4,!8)gfede4+2 r2 | [(2)r1] l4.g"bd4 l8dedc+8+2  //r-2l8rcde | [(2) l4.ed"a4 d2l8rdef l4.g"bd4 l8ded:c8+4rl16de | l4.fc<a4 bg>a4 l.N(!4,!8)gfede4+2 l8rcde ] c+8+4rl16de | l4.fcf+ cl4cd c1-8l16"bc d1 | r1
#Part_F;REV(064)CHO(032)@67,0,0o6v85 [(2) P(64-16)l4.<ab>c4 e4l8ferefg l4.ga:c4 e2,75l8rrrr | P(64)r1+1+1+1 ] b4 l.N(!4,!8)gagfe4 | l2M(32)fM(0)l8rrrr P(64)r1 r1-4P(64-16)a4 a4g8l4fed8 | M(64)c1M(0)P(64) v-10
#Part_G;[8r1] | r1
	REV(064)CHO(032)@67,0,0q100o6v85 [(2) P(64-16)l4.<ab>c4 e4l8ferefg l4.ga:c4 e2,75l8rrrr | P(64)r1+1+1+1 ] b4 Div{`cba}2Div{age}2 | l2M(32)fM(0)l8rrrr P(64)r1 r1-4P(64-16)a4 a4g8l4fg | b8+4.a8M(64)a2+1M(0)P(64) v-10
//_Track12 ギターソロ
TR(12)@31,0,0//音色(DistortionGuitar)
REV(032)
#Part_Y2;EP.WR(127,64,!1+8)v115q110o6l8[(2)c16&g2+8-16fe:f]d d4ec4"b4 M(32)c8+1,95M(0) | EP.WR(127,96,!1)<eg`cb4a4g# g#`eb`cr>cde | EP.WR(127,96,!8+2)[c16&g8-16f4M(32)c8+2M(0)]r-8c16d16 EP.WR(127,96,!1+2)M(64)d16&e1+2-16,95M(0)Div{rfe}2 | EP.WR(127,96,!1+1)M(64)d1+1,99M(0) | /*パラメーター初期化*/EP(127)
#Part_Z; [8r1] r-4l16cdef | EP.WR(127,96,!2+8)l8M(32)f16&g2+8-16,99M(0)`cbM(16)g8+4.M(0)f16&g4-16fef gccd4cdl4d16&e4-16dc"bM(32)"b16&c8+2-16,99M(0) | l8rdeM(32)c8+2,99M(0) rdec M(32)g2M(0)rb16&`c8-16bM(32)g8+4M(0)rg4fed | EP.WR(127,32,!8+2+1)M(64)d4.e8+2+1,99M(0)
//_Track14 装飾（シンセパッド）
TR(14)@92,0,0//音色(ChoirPad)
REV(127)
#Part_C;r-1o6Div{fef}2g2
#Part_F;r-1  Div{fef}2g2
//#Part_G;[8r1] | @92,0,0o6Div{fef}2g2
//_Track15 合唱
TR(15)@53,0,0//音色(ChoirAahs)
REV(032)CHO(016)
#Part_X;EP(127)q100v75o5 r1+1+1+1 | l1'cfa' '"beg'2'cea'2 '"adf' 'dgb' | EP.T(127,000,!1)'eg`c'1 r1 EP(127)
#Part_B;r-1+1+1+1 'cfa' '"beg'2'cea'2 '"adf'2 '"bdg'2 | EP.T((127,096,!2),(096,000,!2))'eg`c'1
#Part_C;[4r1] | EP(127)l1'cfa' '"beg'2'cea'2 '"adf' 'dgb' | EP.T(127,000,!1)'eg`c'r1+1+1 | EP(127)'cfa' '"beg'2'cea'2 '"adf' 'dgb' | EP.T((127,096,!1),(096,000,!1))'eg`c'^r1+1
#Part_Y;EP(127)q100v75o5 r1+1+1+1 | l1'cfa' '"beg'2'cea'2 '"adf' 'dgb' | EP.T(127,000,!1)'eg`c'1 r1 EP(127)
#Part_E;r-1+1+1+1 'cfa' '"beg'2'cea'2 '"adf'2 '"bdg'2 | EP.T((127,096,!2),(096,000,!2))'eg`c'1
#Part_F;[4r1] | EP(127)l1'cfa' '"beg'2'cea'2 '"adf' 'dgb' | EP.T(127,000,!1)'eg`c'r1+1+1 | EP(127)'cfa' '"beg'2'cea'2 '"adf' 'dgb' | EP.T((127,096,!1),(096,000,!1))'eg`c'^r1+1
#Part_Y2;r1+1+1+1 | EP(127)l2'cfa''dgb' '"beg''cea' | l1'cfa' 'cf+a' EP.T((127,096,!1),(096,000,!1))'dfa'1+1 | r1+1
#Part_G;[8r1] | r1
	[4r1] | EP(127)l1'cfa' '"beg'2'cea'2 '"adf' 'dgb' | EP.T(127,000,!1)'eg`c'r1+1+1 | EP(127)'cfa' '"beg'2'cea'2 '"adf' 'dgb' | EP.T((127,096,!1),(096,000,!1))'eg`c'^r1+1
#Part_Z;EP(127)q100v75o5 [8r1] | [4r1] | l1'cfa' '"beg'2'cea'2 '"adf' 'dgb' | EP.T(127,000,!1)'eg`c'1 r1 EP(127)
//_Track16 流れ星
TR(16)@125,5v100q105REV(127)//音色(TelephoneRing)
Str S_Star  ={UseKeyShift(off);EP.T(127,0,!1+1+1+1)P.T(127,0,!1+1+1+1)o5`c1+1+1+1-64&&c64EP(0)UseKeyShift(on);}
Str S_Star_R={UseKeyShift(off);EP.T(32,127,!1+1)P.T(0,127,!1+1)o4b1+1-64&&`c64EP(0)UseKeyShift(on);}
#Part_X;S_Star
#Part_C;r-1+1 S_Star_R | S_Star
#Part_Y;r-1+1 S_Star_R | S_Star
#Part_F;r-1+1 S_Star_R | S_Star
#Part_G;r-1+1 S_Star_R | S_Star | [3r1] S_Star_R | S_Star
#Part_Z;r-1+1 S_Star_R | S_Star 
Time(186:1:0);r-1+1 S_Star_R | S_Star 
//_Track10 ドラム専用
TR(10)o3@1,0,0//音色(StandardSet)
UseKeyShift(off);//リズムトラックでは、タイムキーの効果をオフにする
//定義
#Ptn1_Cymb={Sub{c2[c8]r4}Sub{l4n(49),drd}l8rf+,,80[(3)f+,,95f+,,80]};
#Ptn1     ={Sub{c2[c8]r4}Sub{l4     rdrd}l8       [(4)f+,,95f+,,80]};
#Ptn2     ={Sub{l4.cc4c}Sub{l8[r]d[3r]dr}l8[(4)f+,,95f+,,80]};
#Ptn3={Sub{l4.cc4c}Sub{l8[r]d[3r]dr}l8[(4)f+,,95:f+,,80]a+,,90};
#Ptn4_Cymb={v.Random(0)v.N(90,75)l8[(8)f+] r-1 v.Random(10)v(100)l4`g[(2)`d#]d r-1 [c4.]r4};
#Ptn4={v.Random(0)v.N(90,75)l8[(8)f+] r-1 v(100)v.Random(10)l4[(3)`d#]d r-1 [c4.]r4};
#Ptn5={v.Random(0)v.N(90,75)l8[(5)f+]rrr r-1 v.Random(10)v(100)l4[(2)`d#]l8`d#Sub{bgf}[3d] r-1 [c4.]c4};
#Ptn6_Cymb={l8`c#a#da#f#a#da# r-1 l4[(4)c]};
#Ptn6     ={l8[(2)f#a#da#] r-1 l4[(4)c]};
#Casta1={r1+2+8[n(85),16]n(8),4};
#Tamb1={[(8)n(54),16,,75n(54),16,,70]};
#Triangle1={[(4) n80,8,,75n81,8,,75 ]};
//演奏
#Part_X;r-1l4[(2)a+]v.N(100,64,68,76,84,96,99)a+8a16[(4)d16]f16v(100) | #Ptn1_Cymb #Ptn2 #Ptn1 #Ptn2 | #Ptn1_Cymb #Ptn2 #Ptn1 l8c0f+f+f+0dc0f+0`al16[`d][b][g]bg
#Part_A;[(2) #Ptn1_Cymb #Ptn2 #Ptn1 #Ptn3 | #Ptn1 #Ptn2 #Ptn1 :l8c0[f+]d0f+f+c0d0f+c0f+d0f+[d16] ] l8c0f+f+f+0dc0f+[c4]r-2`al16[`d][b][g]
#Part_B;v.Random(10)Sub{[(4)#Casta1]} #Ptn4_Cymb [(3)#Ptn4] | [(3)#Ptn4] #Ptn5 | Sub{[(2)#Casta1]} #Ptn4_Cymb [(2)#Ptn4] v.Random(0)v.N(90,75)l8[(5)f+]rrr r-1 v(100)v.Random(10)l4[(2)`d#]l8`d#l16[`d][b][g] r-1 [c4.]r4 | 
	v.Random(10) l8c0`c#'d`d''db'c0`g4g c0`a'db''dg'c0`g4f l8c0[d16]fdg l4`a[(2)a#]a#8[d16]r-1[4c] l4`c#[(2)a#]a#8[d16]r-1[4c] | v.N(80,85,90,95)Div{`c#`a`c#}2`a4v(80)[(4)d16v+10]v(100)r-1[c2]
#Part_C;Sub{[(8)#Tamb1]}Sub{[(8)#Triangle1]} #Ptn6_Cymb [(3)#Ptn6] | #Ptn6_Cymb [(2)#Ptn6] l8[(2)f#a#:da#]d[d16]r-1l4[(4)c] | Sub{[(8)#Tamb1]}Sub{[(8)#Triangle1]} #Ptn6_Cymb [(3)#Ptn6] | #Ptn6_Cymb [(2)#Ptn6] l8[(2)f#a#:da#][d16]f8r-1l4[(4)c] | Sub{[(3)#Tamb1]}Sub{[(3)#Triangle1]} #Ptn6_Cymb [(2)#Ptn6] `a2Sub{[c4]}l8rd[d16]f
#Part_Y;v.Random(10) #Ptn1_Cymb #Ptn2 #Ptn1 #Ptn2 | #Ptn1_Cymb #Ptn2 #Ptn1 l8c0f+f+f+0dc0f+0`al16[`d][b][g]bg
#Part_D;c0n49,1 c0[n55,8.] c0n57,8+4 [d16]f8 #Ptn1_Cymb #Ptn3 | #Ptn1 #Ptn2 #Ptn1 l8c0[f+]d0f+f+c0d0f+c0f+d0f+[d16] | #Ptn1_Cymb #Ptn2 #Ptn1 #Ptn3 | #Ptn1 #Ptn2 #Ptn1 l8c0f+f+f+0dc0f+[c4]r-2`al16[`d][b][g] 
#Part_E;Sub{[(4)#Casta1]} #Ptn4_Cymb [(3)#Ptn4] | [(3)#Ptn4] #Ptn5 | Sub{[(2)#Casta1]} #Ptn4_Cymb [(2)#Ptn4] v.Random(0)v.N(90,75)l8[(5)f+]rrr r-1 v(100)v.Random(10)l4[(2)`d#]l8`d#l16[`d][b][g] r-1 [c4.]r4 | 
	v.Random(10) l8c0`c#'d`d''db'c0`g4g c0`a'db''dg'c0`g4f l8c0[d16]fdg l4`a[(2)a#]a#8[d16]r-1[4c] l4`c#[(2)a#]a#8[d16]r-1[4c] | v.N(80,85,90,95)Div{`c#`a`c#}2`a4v(80)[(4)d16v+10]v(100)r-1[c2]
#Part_F;Sub{[(8)#Tamb1]}Sub{[(8)#Triangle1]} #Ptn6_Cymb [(3)#Ptn6] | #Ptn6_Cymb [(2)#Ptn6] l8[(2)f#a#:da#]d[d16]r-1l4[(4)c] | Sub{[(8)#Tamb1]}Sub{[(8)#Triangle1]} #Ptn6_Cymb [(3)#Ptn6] | #Ptn6_Cymb [(2)#Ptn6] l8[(2)f#a#:da#][d16]f8r-1l4[(4)c] | 
#Part_Y2;Sub{[(4)#Tamb1]}Sub{[(4)#Triangle1]} #Ptn6_Cymb [(3)#Ptn6] | Sub{[(2)#Tamb1]}Sub{[(2)#Triangle1]} #Ptn6_Cymb #Ptn6 | Sub{[(6)#Tamb1]}Sub{[(6)#Triangle1]} #Ptn6_Cymb Sub{l4[(4)c]}l8n(57),a#da#f#a#da# #Ptn6_Cymb [(3)#Ptn6]
#Part_G;n(49),1 r+1+1+1 | l2[(4)c] l4[(8)c] | 'n(49),c'4.[g16]l8'cd'b'cd'[d16]
	Sub{[(8)#Tamb1]}Sub{[(8)#Triangle1]} #Ptn6_Cymb [(3)#Ptn6] | #Ptn6_Cymb [(2)#Ptn6] l8[(2)f#a#:da#]d[d16]r-1l4[(4)c] | Sub{[(3)#Tamb1]}Sub{[(3)#Triangle1]} #Ptn6_Cymb #Ptn6 l8[(2)f#a#:da#]`a4r-1l4[(4)c] Div{'`c#`d''bd''gd''`ag''bd''gd'}1r-1[c2] | Sub{[(4)#Tamb1]}Sub{[(4)#Triangle1]} #Ptn6_Cymb [(2)#Ptn6] l8[(2)f#a#:da#][d16]f8r-1l4[(4)c] | Sub{[(3)#Tamb1]}Sub{[(3)#Triangle1]} #Ptn6_Cymb [(2)#Ptn6] `a2Sub{[c4]}l8rd[d16]f
#Part_Z;[(2) #Ptn1_Cymb #Ptn2 #Ptn1 #Ptn2 | #Ptn1_Cymb #Ptn2 #Ptn1 :#Ptn2 ] l8c0f+f+f+0dc0f+0`al16[`d][b][g]bg | l8'`ac''bd''gd''`c#c'8+1
