//Progressive Trance
//horizon
//2010 akusil@lol
//
//DLありがとうございます、アクシル@ロルです
//夕暮れ時の空気感をテーマに、個人的なトランスに対する価値観を詰めながら作りました
//ジャンルとしてはプログレッシブトランスを想定　こんなんで合ってますかね
//
//曲の構想自体は結構前からあったのですが、
//色んなことやったりしていたので、
//要するに、何年も悩みに悩んで作ったわけじゃないですよ(笑)
//
//で、作り始めた当初はTW-MUSIC前提で作ってたのですが、
//また作り直すに至って当時より打ち込み技術も少しは上がっているだろうという事で、
//MSGS仕様で作り直すことにしました
//でもwindowsVISTA以降だと残念なことになるみたい(現にwin7にした自分もなってる)なので、
//TW-MUSIC2で聞いてやってください
//
//最後にもう一つ
//実はこの曲を作り始めた当初のデータが曲掲示板ver5に残っています
//なにぶん四年ぐらい前のデータなので、今以上に拙い部分が多いですが、
//暇があったら探して聞き比べてみるのも良いと思います
//IDはここには貼りません、貼る気はありません(笑)

























Include(gs.h);
Include(unison.h);
Include(delay.h);	
ResetGS;
TrackName ={horizon}

KeyFlag=(1,-1,0,0,-1,0,0)
Tempo 140
//----------------------------------------------------------------------------------------
TR(1)GS_RHYTHM(0)r1 @81v117 o5 l8 V(128) q129   REV(0)
TR(5)GS_RHYTHM(0)r1 @81v117 o5 l8 V(128) q129   REV(0)

TR(2)GS_RHYTHM(0)r1 @82v85 o5 l8 V(118) q129  　REV(0)
TR(3)GS_RHYTHM(0)r1 @82v60 o5 l8 V(118) q129  　REV(0)
TR(4)GS_RHYTHM(0)r1 @82v42 o5 l8 V(118) q129  　REV(0)


TR(6)GS_RHYTHM(0)r1 @92v80 o5 l16 V(88) q99  　REV(0)BR(32)
TR(7)GS_RHYTHM(0)r1 @92v80 o5 l16 V(88) q99  　REV(0)BR(32)
TR(8)GS_RHYTHM(0)r1 @1,16v80 o6 l16 V(88) q99  　REV(0)t.Random(8)

TR(9)GS_RHYTHM(0)r1 @88v89 o3 l16 V(100) q99  　REV(0)BR(27)

TR(14)GS_RHYTHM(0)r1 @5,24v127 o6 l8 V(118) q99  　REV(0)
TR(15)GS_RHYTHM(0)r1 @123,3v127 o5 l8 V(60) q99  　REV(0)BR(27)
TR(16)GS_RHYTHM(0)r1 @128,3 o7 q90 v127 l16 V(127) P(64)REV(0)BR(27)p%(1800)
//----------------------------------------------------------------------------------------
TR(10)CH(10)GS_RHYTHM(1)r1@25 v127 P(64) l8  V(127)REV(0)BR(27)p%(-500)
TR(11)CH(11)GS_RHYTHM(2)r1@7 v127 P(64) l16  V(100)REV(0)BR(27)CHO(80)p%(1000)
TR(12)CH(12)GS_RHYTHM(2)r1@26 v127 P(64) l16  V(60)REV(0)BR(27)p%(-3200)
TR(13)CH(13)GS_RHYTHM(2)r1@1 v127 P(64) l8  V(127)REV(0)BR(27)p%(500)
TR(23)CH(13)GS_RHYTHM(2)v127 r1 l8
//----------------------------------------------------------------------------------------
#SYN1_1={
cefg fgbg edfd ed"bc ^"gc^ r1r1r1-4
}
#SYN1_2={
cefg fgbg edfd ed"bc ^"gc^ rcrr gg,,65gr f32f32f32f32ff
}
#SYN1_3={
cefg fgbg edfd ed"bc ^"gc^ rcrr "br"br crer
}
#SYN1_4={
ed"bc cefg fgbg edfd  ^"gc^ rcrr fgbgfb`d`c
}

#SYN2={
q.T(50,99,!1^1^1^1)[4cefgfgbgedfded"bd]
q.T(99,50,!1^1^1^1)[4cefgfgbgedfded"bd]
}

#SYN3_1={
cdecde cdfcdf degdeg debfgb fgbfgb`c`d
>ecfecf cfgcfg  fe"bce"bce<ga`cga`c fgafga
cdecde cdfcdf degdeg debfgb fgbfgb`c`d
>cdecde cdfcdf cdgcdg cdacda cdbc`c`dba<
}
#SYN3_2={
cdecde cdfcdf degdeg debfgb fgbfgb`c`d
>ecfecf cfgcfg  fe"bce"bce<ga`cga`c fgafga
cdecde cdfcdf degdeg debfgb fgbfgb`c`d
>cdecde cdfcdf cdgcdg cdacda cdbcdbf`c<
}

#SYN4={
MidiDelay({
q#?1
P.T(40,80,!1)
aarg+rg+rg+arrrarar
P.T(80,40,!1)
aarg+rg+rg+arrr`er`fr
P.T(40,80,!1)
aarg+rg+rg+arrrarar
P.T(80,40,!1)
aarg+rg+rg+arrrfrer
q.T(#?1,#?2,!1^1^1^1)
P.T(40,80,!1)
aarg+rg+rg+arrrarar
P.T(80,40,!1)
aarg+rg+rg+arrr`er`fr
P.T(40,80,!1)
aarg+rg+rg+arrrarar
P.T(80,40,!1)
aarg+rg+rg+ar`er`fr`ar
},3,!8^16)
}
TR(1)
Time(94:1:0)l16q99@82 CHO.T(0,127,!1^1^1^1^1^1^1^1)p%(512)
#SYN1_1
#SYN1_2
r1r1
#SYN1_3
#SYN1_2
#SYN1_3
#SYN1_4
Time(126:1:0)l8q129@81p%(512)M.T(0,127,!1^1^1^1^1^1^1^1)V(90)P.N(50,89)
#SYN3_1
#SYN3_2
EP.T(0,127,!1^1^1^1^1^1^1^1)TrackKey(3)q80o5l16V(110)@40,16
#SYN4(50,89);
EP.T(127,0,!1^1^1^1^1^1^1^1)
#SYN4(89,139);
Time(174:1:0)
EP.T(0,127,!1^1^1^1^1^1^1^1)q129l8P.N(50,89)@81
#SYN3_2
MidiDelayS({
#SYN3_1
#SYN3_2
#SYN3_1
#SYN3_2
})
TR(5)
Time(126:1:0)l8@81p%(-512)M.T(0,127,!1^1^1^1^1^1^1^1)V(90)P.N(50,89)
#SYN3_1
#SYN3_2
EP.T(0,127,!1^1^1^1^1^1^1^1)TrackKey(3)q80o5l16V(120)@40,16
#SYN4(50,89);
EP.T(127,0,!1^1^1^1^1^1^1^1)
#SYN4(89,139);
Time(174:1:0)
EP.T(0,127,!1^1^1^1^1^1^1^1)q129l8P.N(50,89)@81
#SYN3_2
MidiDelayS({
#SYN3_1
#SYN3_2
#SYN3_1
#SYN3_2
})
TR(2)
Time(94:1:0)l16q99@82 CHO.T(0,127,!1^1^1^1^1^1^1^1)p%(-512)
MidiDelay({
#SYN1_1
#SYN1_2
r1r1
},6,!8^16)
MidiDelay({
#SYN1_3
#SYN1_2
#SYN1_3
#SYN1_4
},4,!8^16)
Time(126:1:0)l8q129p%(0)V(90)P.N(0,127)@81
r8^16
#SYN3_1
#SYN3_2
Time(174:1:0)
TrackKey(3)
EP.T(0,127,!1^1^1^1^1^1^1^1)
r8^16
#SYN3_2

#SYN3_1
#SYN3_2
#SYN3_1
#SYN3_2
TR(3)
Time(78:1:0)
@5o6l16q99M(80)EP(80)CHO(50)v107
MidiDelayS({
[4
P.T(0,127,!1^1^1^1,127,0,!1^1^1^1)#SYN2
]
})
Time(126:1:0)l8v53@81o5V(90)P.N(0,127)
r8^16 r8^16
#SYN3_1
#SYN3_2
Time(174:1:0)
TrackKey(3)
EP.T(0,127,!1^1^1^1^1^1^1^1)
r8^16 r8^16
#SYN3_2

#SYN3_1
#SYN3_2
#SYN3_1
#SYN3_2
TR(4)
r8^16
Time(78:1:0)
@5o6l16q99M(80)EP(80)CHO(50)v65
MidiDelayS({
[4
P.T(0,127,!1^1^1^1,127,0,!1^1^1^1)#SYN2
]
})
Time(126:1:0)l8v31@81o5V(90)P.N(0,127)
r8^16 r8^16 r8^16
#SYN3_1
#SYN3_2
Time(174:1:0)
TrackKey(3)
EP.T(0,127,!1^1^1^1^1^1^1^1)
r8^16 r8^16 r8^16
#SYN3_2

#SYN3_1
#SYN3_2
#SYN3_1
#SYN3_2

#PAD={
P.T(#?1,#?2,!1^1^1^1^1^1^1^1)
'"c"gceg'1'"d"g"bdf'1'"c"ace'1^1 '"g"begb'1'"acea`c'1'"f"acfa'1^1
P.T(#?2,#?1,!1^1^1^1^1^1^1^1)
'"c"gceg'1'"d"g"bdf'1'"c"ace'1^1 '"gcegb'1'"f"acfa'1'"gcea`c'1^1
}
TR(6)
EP.T(0,127,!1^1^1^1^1^1^1^1)P.T(0,32,!1^1^1^1^1^1^1^1)
'"c"gcfa'1^1^1^1^1^1^1^1
M.T(0,127,!1^1^1^1^1^1^1^1)P.T(32,0,!1^1^1^1^1^1^1^1)
'"c"gcfa'1^1^1^1^1^1^1^1
CHO.T(0,80,!1^1^1^1^1^1^1^1)P.T(0,32,%6144)
'"c"gcfa`c'%6144
P.T(32,0,!1^1^1^1)
'"c"gcfa`c`g'%3072 r1r1r1r1
Time(90:1:0)
EP.T(0,80,!1^1^1^1^1^1^1^1)
'"c"gcfa`c'1^1^1^1
'"c"gcfa`c`g'%3072
'"c"gcfa`c`g``c'%3072
EP.T(0,10,!1,10,87,!1^1^1^1^1^1^1^1^1^1^1^1^1)
[3#PAD(0,32)]
TrackKey(3)
[6
#PAD(0,32)
]
TR(7)
EP.T(0,127,!1^1^1^1^1^1^1^1)P.T(127,95,!1^1^1^1^1^1^1^1)
'"c"gcfa'1^1^1^1^1^1^1^1
M.T(0,0,!8,0,127,!1^1^1^1^1^1^1^1-8)P.T(95,127,!1^1^1^1^1^1^1^1)
'"c"gcfa'1^1^1^1^1^1^1^1
CHO.T(0,80,!1^1^1^1^1^1^1^1)P.T(127,95,%6144)
'"c"gcfa`c'%6144
P.T(95,127,!1^1^1^1^1^1^1^1)
'"c"gcfa`c`g'%3072 r1r1r1r1
Time(90:1:0)
EP.T(0,80,!1^1^1^1)
'"c"gcfa`c'1^1^1^1
'"c"gcfa`c`g'%3072
'"c"gcfa`c`g``c'%3072
EP.T(0,10,!1,10,87,!1^1^1^1^1^1^1^1^1^1^1^1^1)
[3#PAD(127,95)]
TrackKey(3)
[6
#PAD(127,95)
]
TR(8)
Time(110:1:0)
EP.T(0,10,!1,10,87,!1^1^1^1^1^1^1^1^1^1^1^1^1)
P.N(0,0,127,127)
[3#PAD]
[8r1]
TrackKey(3)
EP.T(0,127,!1^1^1^1^1^1^1^1)@82p%(512)o5l16V(100)v127
#SYN4(139,179);
Time(174:1:0)EP(127)
#SYN4(179,179);
EP.T(127,0,!1^1^1^1^1^1^1^1)
#SYN4(80,139);

#CLAP2={
EP(0)rrEP(127)'cg'^^^EP.W(127,0,!4^8)'cg'^ ^^'cg'^^^'cg'^
^^'cg'^^^'cg'^ ^^'cg'^^^'cg'^
^^'cg'^^^'cg'^ ^^'cg'^^^'cg'^
^^'cg'^^^'cg'^ ^^'cg'^^^^'cg'

rr'cg'^^^'cg'^ ^^'cg'^^^'cg'^
^^'cg'^^^'cg'^ ^^'cg'^^^'cg'^
^^'cg'^^^'cg'^ ^^'cg'^^^'cg'^
^^'cg'^^^'cg'^ ^^'cg'^^^^'cg'
}
TR(16)l8
[8r1]
'cg'1[15r1]
'cg'1[7r1]
'cg'1[7r1]
'cg'1[3r1]
'cg'1[14r1]
r1-8EP.W(127,0,!4^8)'cg'
[2
^^'cg'^^^'cg'^ ^^'cg'^^^'cg'^
^^'cg'^^^'cg'^ ^^'cg'^^^'cg'^
^^'cg'^^^'cg'^ ^^'cg'^^^'cg'^
^^'cg'^^^'cg'^ ^^'cg'^^^^'cg'
]
#CLAP2
EP(127)
[2
'cg'1[7r1]
]
[3
'cg'1[15r1]
]
[2
'cg'1[7r1]
]
[4
#CLAP2
]
EP(127)
'cg'1[7r1]
EP.W(127,0,!4^8)
'cg'^'cg'^'cg'^'cg'^ 'cg'^'cg'^'cg'^'cg'r
'cg'^'cg'^'cg'^'cg'^ 'cg'r'cg'^'cg'r'cg'r
'cg'^'cg'^'cg'^'cg'^ 'cg'^'cg'^'cg'^'cg'r
'cg'^'cg'^'cg'^'cg'^ 'cg'^'cg'^l16'cg'^^'cg'^^'cg'^
'cg'1
Str SY_R={
[8[2cefgfgbgedfded"bd]]
cegbfa`c`e`g`e`fabgaf
cefgfgbgedfded"bd
[7[2cefgfgbgedfded"bd]]
TrackKey(3)
[8[2cefgfgbgedfded"bd]]
TrackKey(0)
}


TR(9)
[16r1]l16
[2crrc^^crcrrc^^cr crrc^^crcrrc^^`cc]
[4r1]
[2rcrrc^^crcrrc^^cr crrc^^crcrrc^^`c]
[4r1]
[8crrc^^crcrrc^^cr]r1r1r1r1
o2
OctaveUnison({
[4q.T(60,99,!1^1^1^1)[2c"c"cc^^c"cc"c"cc^^c"c]c"c"cc^^c"cc"c"cd^^e"c c"c"cc^^c"c"b"c"c"b^^"b"c]
[4q.T(60,99,!1^1^1^1)[2"cc"c"cc^^c"cc"c"cc^^c]"cc"c"cc^^c"cc"c"cd^^e"c c"c"cc^^c"c"b"c"c"b^^"b]

[4q.T(60,99,!1^1^1^1)[2c"c"cc^^c"cc"c"cc^^c"c]c"c"cc^^c"cc"c"cd^^e"c c"c"cc^^c"c"b"c"c"b^^"b"c]
})
l8
Time(126:1:0)q99
OctaveUnison({
[4
rcrcrcrc rcrcrcrc rererere rerererd
rcrcrcrc rcrcrcrc rererere rererfrg
]
})
TrackKey(3)
OctaveUnison({
[12
rcrcrcrc rcrcrcrc rererere rerererd
rcrcrcrc rcrcrcrc rererere rererfrg
]
l16
[4q.T(60,99,!1^1^1^1)[2c"c"cc^^c"cc"c"cc^^c"c]c"c"cc^^c"cc"c"cd^^e"c c"c"cc^^c"c"b"c"c"b^^"b"c]
l8
})

TR(14)
[32r1]l16P.N(0,127)@5,24o6
MidiDelay({
cefg fgbg edfd ed"bc ^"gc^ r1-4 r1r1
cefg fgbg edfd ed"bc ^"gc^ r1-4 r1r1
cefg fgbg edfd ed"bc ^"gc^ r1-4 r1r1
},12,!8)
o6@87
[4
[3P.N(0,0,0,0,127,127,127,127)MidiDelay({r4-16'eg`c`g'},10,!8^16)r1 
r1r1r2r8EP.T(0,127,!8)P(64)q50[8'eg`c`g'64]q99EP(127)]
P.N(0,0,0,0,127,127,127,127)MidiDelay({r4-16'eg`c`g'},10,!8^16)r1 
r1r1r4:EP.T(0,127,!2)P(64)q50[4'eg`c`g'32][6'eg`c`g'16]q99EP(127)
]
r2
Time(158:1:0)l16@5
TrackKey(3)
EP.T(0,127,!1^1^1^1,127,0,!1^1^1^1)q80o5l16V(100)
#SYN4(50,89);
EP.T(0,127,!1^1^1^1^1^1^1^1)@82p%(-512)
#SYN4(89,139);
Time(174:1:0)EP(127)
#SYN4(139,139);
EP.T(127,0,!1^1^1^1^1^1^1^1)
#SYN4(139,139);

TR(15)
EP.T(0,127,!1^1)
'c`c'%6144
'c`c'%6144
'c`c'%3072
@123V(127)o8
Time(125:1:0)
EP.T(0,127,!1)'cg'1
Time(157:1:0)
EP.T(0,127,!1)'cg'1
Time(173:1:0)
EP.T(0,127,!1)'cg'1
Time(237:1:0)
EP.T(0,127,!1)'cg'1
//-------------------------------
~{ど}={'n(36),n(35)'}
~{ち}={v127n(46),}
~{つ}={v77n(42),}
~{ぱ}={v127n(49),}
~{さ}={v107n(57),}
~{た}={n(40)}
~{ぽ}={n(64)}
~{か}={n(63)}
~{て}={n(62)}
Key(0)
//-------------------------------
#BD1={どっどっどっどっ}
#BD2={どっどっどっどど}
#BD3={どっどっどっどっ16ど16}
#BD4={どっどっl16どどっっどっっどl8}
#BD5={どどどっl16どっっど,,65どっどっl8}
TR(10)ArgOrder(lvqto)
r1r1r1r1
r1r1r1
r2l16ど32,,65ど32,,80ど24,,100ど24ど24ど P.N(0,127)どど,,65どどP(64)l8
[3[7どっどっどっどっ]どっどっどっどど]
どど1-8r1r1r1-8ど ど1r1r1r1-8ど　ど1r1r1r2l16どっっどっっどっl8

[2
	[2
		[3#BD1] #BD2
		[3#BD1]:#BD3
	]
#BD4
:
	[2
		[3#BD1] #BD2
		[3#BD1]:#BD3
	]
#BD5
]

ど1^1^1^1-8ど　ど1^1^1^1-8ど
ど1^1-4どっ ど1^1-4どど
ど1-4どっ　ど1-4どっ ど2ど2 どっどっどっどっ
ど1[15r1]
ど1[15r1]
ど1^1-4どっ　ど1^1-8ど ど1^1-4どっ　ど1^1-8ど
ど1^1-8ど ど1^1-8ど
ど1-4どっ　ど1-4ど4 ど2ど2 どっどっどっどっ
ど1[7r1]
ど1^1-8ど ど1^1-8ど
ど1-4どっ　ど1-4どっ ど2ど2 どっどっl16ど32,,65ど32,,80ど24,,100ど24ど24ど P.N(0,127)どど,,65どどP(64)l8
[2
	[2
		[3#BD1] #BD2
		[3#BD1]:#BD3
	]
#BD4
	[2
		[3#BD1] #BD2
		[3#BD1]:#BD3
	]
#BD5
]
ど1^1^1^1-8ど　ど1^1^1^1-8ど
ど1^1-4どっ ど1^1-4どど
ど1-4どっ　ど1-4どっ ど2ど2 どっどっどっどっ
[2
		[3#BD1] #BD2
		[3#BD1]:#BD3
	]
#BD4
TR(11)ArgOrder(lvqto)
[44r1]
EP.W(127,0,!8^16)
l8
っ
[24ちーちーちーち　ーちーちーちーちー]
r-8
[8r1]
っ
[4ちーちーちーち　ーちーちーちーちー]
r-8
[16r1]
っ
[16ちーちーちーち　ーちーちーちーちー]
r-8
[8r1]
[4っちーちーちーち　ーちーちっちーち]

[48っちーちーちーち　ーちーちっちーち]

#HAT_1={つつちーつつEP.W(127,127,!16,0,0,!16)ちーEP(127)つちつつつちつち}
#HAT_2={つつちーつつEP.W(127,127,!16,0,0,!16)ちーEP(127)つちつつつちつち}
#HAT_3={つつちーつつEP.W(127,127,!16,0,0,!16)ちーEP(127)つつちーつっつっ}
TR(12)ArgOrder(lvqto)
[40r1]
V.T(0,60,!1^1^1^1)

p%.T(-3000,0,!1,0,-3000,!1)
#HAT_1 #HAT_2
p%.T(-3000,0,!1,0,-3000,!1)
#HAT_1 #HAT_3

V(60)

[6
	[2
	p%.T(-3000,0,!1,0,-3000,!1)
	#HAT_1 #HAT_2
	p%.T(-3000,0,!1,0,-3000,!1)
	#HAT_1 : #HAT_2
	]
#HAT_3
]

[8r1]

[2
p%.T(-3000,0,!1,0,-3000,!1)
#HAT_1 #HAT_2
p%.T(-3000,0,!1,0,-3000,!1)
#HAT_1 #HAT_3
]

[16r1]

[4
	[2
	p%.T(-3000,0,!1,0,-3000,!1)
	#HAT_1 #HAT_2
	p%.T(-3000,0,!1,0,-3000,!1)
	#HAT_1 : #HAT_2
	]
#HAT_3
]
[8r1]
	[2
	p%.T(-3000,0,!1,0,-3000,!1)
	#HAT_1 #HAT_2
	p%.T(-3000,0,!1,0,-3000,!1)
	#HAT_1 : #HAT_2
	]
#HAT_3

[11
	[2
	p%.T(-3000,0,!1,0,-3000,!1)
	#HAT_1 #HAT_2
	p%.T(-3000,0,!1,0,-3000,!1)
	#HAT_1 : #HAT_2
	]
#HAT_3
]
TR(13)
[8r1]
ぱ1r1r1r1r1r1r1r1-4さ4
ぱ1r1r1r1r1r1r1r1-4さ4
ぱ1r1r1r1r1r1r1r1-4さ4
さぱ1-8r1r1r1-8さ ぱ1r1r1r1-8さ ぱ1r1r1r2l16
EP.W(127,127,!16,0,0,!16)さーーさーーさーEP(127)
[3
ぱ1r1r1r1r1r1r1r1-4さ4
ぱ1r1r1r1r1r1r1r1-4さ4
]
ぱ1^1^1^1-8ぱ8
ぱ1^1^1^1-8ぱ8
ぱ1^1-4ぱ4 ぱ1^1-4EP.W(127,127,!16,0,0,!16)ぱ8ぱ8EP(127)
ぱ1-4ぱ4 ぱ1-4ぱ4 ぱ2ぱ2 ぱ4ぱ4ぱ4ぱ4
ぱ1[15r1]
ぱ1[15r1]
ぱ1^1-4さ4 ぱ1^1-8さ8 ぱ1^1-4さ4 ぱ1^1-8さ8
ぱ1^1-8さ8 ぱ1^1-8さ8
ぱ1-4ぱ4 ぱ1-4ぱ4 ぱ2ぱ2 ぱ4ぱ4ぱ4ぱ4
ぱ1[7r1]
ぱ1^1-8さ8 ぱ1^1-8さ8
ぱ1-4ぱ4 ぱ1-4ぱ4 ぱ2ぱ2 ぱ4ぱ4ぱ4ぱ4

ぱ1r1r1r1r1r1r1r1-4さ4
ぱ1r1r1r1r1r1r1r1-4さ4
[6
ぱ1r1r1r1r1r1r1r1-4さ4
]
ぱ1^1^1^1-8ぱ8
ぱ1^1^1^1-8ぱ8
ぱ1^1-4ぱ4 ぱ1^1-4EP.W(127,127,!16,0,0,!16)ぱ8ぱ8EP(127)
ぱ1-4ぱ4 ぱ1-4ぱ4 ぱ2ぱ2 ぱ4ぱ4ぱ4ぱ4
ぱ1r1r1r1r1r1r1r1-4さ4
ぱ1r1r1r1r1r1r1r1-4さ4
ぱ1