//-----------------------------------------------
// edge of ice valley
// (C)Yax
//-----------------------------------------------
TrackName = {"edge of ice valley"}
Copyright = {"Yax"}
ResetGM();
r2
TrackSync;
// アルペジオ関数
Function ARP(Int D, Int L, Str S) {
Int LNG = L
Int STP = 0
Int TEMP = 0
Str X = ""
Str RS = ""
Str NS = ""
Int J = 0
Array NAR = ()
For(Int I = 1; I <= 100; I++ ){
X = MID(S,I,1)
J = ASC(X)
IF (X == "") {
EXIT
}
IF ( J >= 97 ) {
IF ( J <= 103 ) {
IF ( NS != "" ) {
NS = Replace(NS,{@-},{-@},off)
NS = Replace(NS,{@+},{+@},off)
NS = Replace(NS,{@#},{#@},off)
NS = Replace(NS,{@*},{*@},off)
NAR = (NAR,NS)
NS = ""
}
X = X + "@"
}
}
NS = NS + X
}
IF ( NS != "" ) {
NS = Replace(NS,{@-},{-@},off)
NS = Replace(NS,{@+},{+@},off)
NS = Replace(NS,{@#},{#@},off)
NS = Replace(NS,{@+},{*@},off)
NAR = (NAR,NS)
NS = ""
}
For(Int I=0;I<SizeOf(NAR);I++){
TEMP = L - STP
RS = "r%" + #STR(STP)
NS = Replace(NAR(I), {@}, {%}+#STR(TEMP),off)
Sub{ RS NS }
STP = STP+D
}
r%(L)
}
// フェードアウト
FUNCTION FADEOUT() {
EP.onTime(127,0,!1^1^1^1^1^1^1^1^1^1^2.)
}
//------------------------------------------------
// 全体の調整
//------------------------------------------------
TR(1) V(105) REV(50) CHO(30)
TR(11) V(105) REV(50) CHO(30)
TR(2) V(100) REV(60) CHO(20)
TR(3) V(82) REV(110) CHO(50)
TR(4) V(105) REV(40) CHO(30)
TR(5) V(105) REV(40) CHO(30)
TR(6) V(108) REV(50) CHO(20)
TR(7) V(109) REV(60) CHO(40)
TR(8) V(110) REV(20) CHO(0)
TR(9) V(110) REV(20) CHO(0)
TR(12) V(110) REV(20) CHO(0)
TR(13) V(110) REV(20) CHO(0)
TR(14) V(110) REV(20) CHO(0)
TR(15) V(110) REV(20) CHO(0)
TR(16) V(110) REV(20) CHO(0)
TR(10) V(115) REV(50) CHO(0)
//------------------------------------------------
// テンポ
//------------------------------------------------
INT T = 200
Tempo=(T)
//------------------------------------------------
// キー
//------------------------------------------------
INT KEY=3
Key(KEY) // 全体のキー
TR(10) TrackKey(KEY * -1) // リズムトラックの調整用、Keyの符号を逆にしたものをセットしておく
INT LOOP = 2
//------------------------------------------------
// MML
//------------------------------------------------
//------------------------------------
// Track 1 :
//------------------------------------
TR(1) CH(1) P(117)
@36 v100
M.onNoteWave(0,70,!1..)
FineTune(68)
[8 r1]
o2 l8 q99
f1^1^1^1
d-1^1^1^1
f1^1>c4&!8f2 c2<a-2f4
d-1^1 a-4&!8>d-2<b-2g2e-4
[2
[2 [3 f2] f4>f4<]
[2 [3 d-2] d-4>d-4<]
]
f4r2.
[6 r1]
r2.e-b-
[(LOOP)
[2
v(MML(v)-20) q80
[4
[2 [3 v(MML(v)+30) f4 v(MML(v)-30) f4 : f4 ]]
[2 [3 v(MML(v)+30) d-4 v(MML(v)-30) d-4 : d-4 ]]
]
v(MML(v)+20)
[2
ffrr rrrr rrrr rrrr
ffrr rrrr rrrr a-2
d-d-rr rrrr rrrr rrrr
d-d-rr rrrr rrrr : e-2
]
g2
]
f4r2.
[6 r1]
r2.d-a-
f4r2.
r1r1
r2.f>c<
d-4r2.
:
r1r1r2d-d-b-e-
]
r1r1r2d-d-b-e-
fr
//------------------------------------
// Track 11 :
//------------------------------------
TR(11) CH(11) P(1)
@36 v100
M.onNoteWave(0,70,!1.)
FineTune(60)
[8 r1]
o2 l8 q99
f1^1^1^1
d-1^1^1^1
f1^1>c4&!8f2 c2<a-2f4
d-1^1 a-4&!8>d-2<b-2g2e-4
[2
[2 [3 f2] f4>f4<]
[2 [3 d-2] d-4>d-4<]
]
f4r2.
[6 r1]
r2.e-b-
[(LOOP)
[2
v(MML(v)-20) q80
[4
[2 [3 v(MML(v)+30) f4 v(MML(v)-30) f4 : f4 ]]
[2 [3 v(MML(v)+30) d-4 v(MML(v)-30) d-4 : d-4 ]]
]
v(MML(v)+20)
[2
ffrr rrrr rrrr rrrr
ffrr rrrr rrrr a-2
d-d-rr rrrr rrrr rrrr
d-d-rr rrrr rrrr : e-2
]
g2
]
f4r2.
[6 r1]
r2.d-a-
f4r2.
r1r1
r2.f>c<
d-4r2.
:
r1r1r2d-d-b-e-
]
r1r1r2d-d-b-e-
fr
//------------------------------------
// Track 2 :
//------------------------------------
TR(2) CH(2) P(64)
@97 v80
o5 l8 q99
P.onNote(127,32,64,96,1)
[2 f4>c4<b->c4<a-4a-g4f4e-4]
[2 d-4>c4<b->c4<a-4a-g4f4e-4]
[4
[2 f4>c4<b->c4<a-4a-g4f4e-4]
[2 d-4>c4<b->c4<a-4a-g4f4e-4]
]
[2 f4>c4<b->c4<a-4a-g4f4e-4]
[2 d-4>c4<b->c4<a-4a-g4f4e-4]
[(LOOP)
[2
[4
[2 f4>c4<b->c4<a-4a-g4f4e-4]
[2 d-4>c4<b->c4<a-4a-g4f4e-4]
]
[2
[2 f4>c4<b->c4<a-4a-g4f4e-4]
[2 d-4>c4<b->c4<a-4a-g4f4e-4]
]
]
[2
[2 f4>c4<b->c4<a-4a-g4f4e-4]
[2 d-4>c4<b->c4<a-4a-g4f4e-4]
]
]
FADEOUT()
[2 f4>c4<b->c4<a-4a-g4f4e-4]
[2 d-4>c4<b->c4<a-4a-g4f4e-4]
f4>c4<b->c4<a-4a-g4f4e-4
r1
//------------------------------------
// Track 3 :
//------------------------------------
TR(3) CH(3) P(64)
@11 v64
o8 l8 q99
P.onNote(32,96,64,1,127)
[4 fca-cgcfc]
[4 fd-a-d-gd-fd-]
[4
[4 fca-cgcfc]
[4 fd-a-d-gd-fd-]
]
[4 fca-cgcfc]
[4 fd-a-d-gd-fd-]
[(LOOP)
[2
[4
[4 fca-cgcfc]
[4 fd-a-d-gd-fd-]
]
[2
[4 fca-cgcfc]
[4 fd-a-d-gd-fd-]
]
]
[2
[4 fca-cgcfc]
[4 fd-a-d-gd-fd-]
]
]
FADEOUT()
[4 fca-cgcfc]
[4 fd-a-d-gd-fd-]
[2 fca-cgcfc]
//------------------------------------
// Track 4 :
//------------------------------------
TR(4) CH(4) P(64)
@81 v110
FineTune(67)
[8 r1]
[8 r1]
[7 r1]
o6 l8 q95
EP.onNoteWave(80,127,!16..)
M.onNoteWave(5,70,!1^1)
r2.fg
a-1.b-2 >c1 e-2..d-16c16<
a-1b-2..a-16b-16> c2..d-24c24<b24b-1
f2.g4 a-2>e-4.d16d-16 c1<a-2.fg
a-e-b-e->c<e-b-e- >e-<e->d-<e- >c<e-b-e- >c2.<b-2 a-4g4e-4
P.onNote(64,127,0,96,32)
EP.onTime(127,0,!1^2) [8 f4.]
[4 r1]
EP(127)
P(64)
EP.onNoteWave(80,127,!16..)
r2 re-fg
[(LOOP)
[2
a-1 g4e-2c4
e-1^2 rfga-
b-1 >c4<b-2g4
f1^2 re-fg
a-1 g4a-2b-4
>c4.d-c1r< fga-
b-1 >c4<b-2g4
f1^2 re-fg
a-2.b-4>c4d-4c2.
e-2d-2c4<b-4ga-
b-2. >c2< b-2 g4
a-1^2 re-fg
a-2.>e-2.c2
f2.e-2d-2< f12g12a-12
b-2.>c2.d-2
e-2.c2<b-2 f12g12a-12
[2
b-4e-a-4e-g4e-f4e-g4a-4
b-4e-a-4e-g4e-f4e-g4a-4
b-4d-a-4d-g4d-f4d-g4a-4
b-4d-a-4d-g4d-f4d- : g4a-4
]
:
g e-fg
]
g4 a-4
f1&!8.>f1
e-4d-c d-4c<b- >c4<b-a- b-a-g4
a-2.b-2.>c2
<a-2.g2.e-2
fga-g b-g>c<g b-g>d-<g >c<gb-g
>e-2.c2<a-2fg
a-f>d-2<a-2>e-2c4
f2.e-f g2.....&!4<b-64
]
//------------------------------------
// Track 5 :
//------------------------------------
TR(5) CH(5) P(64)
@81 v90
FineTune(61)
[8 r1]
[8 r1]
[7 r1]
o6 l8 q96
EP.onNoteWave(80,127,!16..)
M.onNoteWave(5,70,!1^4.)
P.onNote(32,96,127,0)
r.
r2.fg
a-1.b-2 >c1 e-2..d-16c16<
a-1b-2..a-16b-16> c2..d-24c24<b24b-1
f2.g4 a-2>e-4.d16d-16 c1<a-2.fg
a-e-b-e->c<e-b-e- >e-<e->d-<e- >c<e-b-e- >c2.<b-2 a-4g4e-4
EP.onTime(127,0,!1^2) [8 f4.]
[4 r1]
EP(127)
EP.onNoteWave(80,127,!16..)
r2 re-fg
[(LOOP)
[2
a-1 g4e-2c4
e-1^2 rfga-
b-1 >c4<b-2g4
f1^2 re-fg
a-1 g4a-2b-4
>c4.d-c1r< fga-
b-1 >c4<b-2g4
f1^2 re-fg
a-2.b-4>c4d-4c2.
e-2d-2c4<b-4ga-
b-2. >c2< b-2 g4
a-1^2 re-fg
a-2.>e-2.c2
f2.e-2d-2< f12g12a-12
b-2.>c2.d-2
e-2.c2<b-2 f12g12a-12
[2
b-4e-a-4e-g4e-f4e-g4a-4
b-4e-a-4e-g4e-f4e-g4a-4
b-4d-a-4d-g4d-f4d-g4a-4
b-4d-a-4d-g4d-f4d- : g4a-4
]
:
g e-fg
]
g4 a-4
f1&!8.>f1
e-4d-c d-4c<b- >c4<b-a- b-a-g4
a-2.b-2.>c2
<a-2.g2.e-2
fga-g b-g>c<g b-g>d-<g >c<gb-g
>e-2.c2<a-2fg
a-f>d-2<a-2>e-2c4
f2.e-f g2.....&!4<b-64
]
//------------------------------------
// Track 6 :
//------------------------------------
TR(6) CH(6) P(48)
@49 v89
M.onNoteWave(0,60,!1^1)
[8 r1]
o4 l8 q99
[2
EP.onTime(60,127,!1^1^1^1)
ARP(0,!1^1^1^1,{fa->ce-b-<})
EP.onTime(60,127,!1^1^1^1)
ARP(0,!1^1^1^1,{fa-b->d-b-<})
EP.onTime(60,127,!1^1^1^1)
ARP(0,!1^1^1^1,{fa->ce-b-<})
EP.onTime(60,127,!1^1^1^1)
ARP(0,!1^1^1^1,{a-b->d-f>c<<})
]
[8 r1]
[(LOOP)
[2
EP(127)
[2
y64,1; ARP(0,!1^1^1^1,{fa->ce-<}) r-1^1 >f1g1< y64,0;
y64,1; ARP(0,!1^1^1^1,{b->d-fa-<}) r-1^1 >b-1g1< y64,0;
y64,1; ARP(0,!1^1^1^1,{a-b->cf<}) r-1^1 >g1a-1< y64,0;
y64,1; ARP(0,!1^1^1^1,{a->d-fb-<}) r-1^1 >>c1<a-1< y64,0;
]
[8 r1]
EP.onTime(70,127,!2...) 'f1c1'
EP.onTime(70,127,!2...) 'g1e-1'
EP.onTime(70,127,!2...) 'a-1f1'
EP.onTime(70,127,!2...) '>c1<a-1'
EP.onTime(70,127,!2...) 'a-1f1'
EP.onTime(70,127,!2...) 'b-1g1'
EP.onTime(70,127,!2...) '>d-1<a-1'
EP.onTime(70,127,!2...) '>e-1c1<'
EP(127)
]
[8 r1]
>'a-2f2' 'g2e-2' 'f2d-2' 'e-2c2'
'd-f'<a->'e-g'<a- >'fa-'<a->'gb-'<a-> 'a-2f2' 'g2e-2'
'f2a-2' 'e-2g2' 'd-2f2' 'e-2g2'
cfe-f d-gfg e-a-ga- fb-a-b- r-1^1
<a->d-cd- <a->e-d-e- <a->fe-f <a->gfg<
]
//------------------------------------
// Track 7 :
//------------------------------------
TR(7) CH(7) P(80)
@59 v75
M.onNoteWave(0,50,!1)
[8 r1]
o5 l8
r1 r2.q50 [2 'e-c']
q90 'g2..e-2..'r 'a-4.f4.'r'b-2g2'
r1 r2.q50 [2 'a-e-']
q90 'b-2..g2..'r 'a-4.f4.'r'g2e-2'
r1 r2.q50 [2 'e-a-']
q90 'g2..b-2..'r 'a-4.f4.'r 'g2e-2'
r1 r2.q50 [2 'a->c<']
q90 'b-2..>d-2..<'r '>c4.<a-4.'r'b-2g2'
v(MML(v)+5)
[2
r2.e-b-'>c2<a-2'>'e-4.c4.' d16d-16<
'>c1..<a-1..'r4
r2.fb- 'b-2>d-2<' '>e-2c2<'
'>f1..d-1..<'r4
]
[8 r1]
[(LOOP)
[16 r1]
v(MML(v)+10)
r1 r2. q50 [2 'fc']
q90 'g2.e-2.' q50 [2 'fd-'] q90 'a-2.f2.' r4
r1 r2. q70a-b-
'>c4<a-4'b-a- 'b-g'a-'>e-4<a-4' q90 '>c2.<a-2.'r4
r1 r2. q50 [2 'fc']
q90 'g2.e-2.' q50 [2 'fd-'] q90 'a-2f2''b-2g2'
'a-1f1''b-2g2''>c2<a-2'
v(MML(v)-10)
r4'>e-1.c1.<b-1.'r4
[2
v(MML(v)+12)
r2g2 f4.r >c4.<b-16a-16
g1^1
r2g2f4.r>d-4.c16d-16
e-2..r d-1<
r2'g2e-2' 'f4.d-4.'r '>c4.<a-4.'b-16a-16
'g1^2..e-1^2..'r
r2'g2e-2''f4.d-4.'r '>d-4.<a-4.>'c16d-16
'e-2..<b-2..>'r 'd-1<b-1'
v(MML(v)-12)
:
v(MML(v)+8)
r1 g4.f24f+24g24 a-2 b-4.>c<b-1 g2
a-2.>c4 e-2..d16d-16 c1<g1
r2a-4b-4>c4.<b16b-16a-2
>e-2.d-4 c2<a-2
b-1a-2g2
f1r2c2
v(MML(v)-8)
v(MML(v)+5)
r4 'g2c2' 'e-4.c4.'d16d-16 'c2<a-2>' q50 [2 'fc']
q90 'g2.e-2.' q50 [2 'fd-'] q90 'a-2f2' 'e-4g4' ga-
'b-2.f2.' 'a-2.f2.' 'g4e-4' q70a-b-
'>c4<a-4'b-a- 'b-g'a-'>e-4<a-4' q90 '>c2.<a-2.'r4
r4'g4.e-4.'a-16a16 'b-2g2' 'a-2f2' q50 [2 'fc']
q90 'g2.e-2.' q50 [2 'fd-'] q90 'a-2f2''b-2g2'
'a-2.f2.' ga- 'b-4.g4.' g '>c2<a-2'
v(MML(v)-5)
'a-e-'r '>e-1.c1.<b-1.'r4
]
[8 r1]
[7 r1]
q90
EP.onTime(70,127,!2..)
'g1e-1c1'
EP(127)
]
//------------------------------------
// Track 8 :
//------------------------------------
TR(8) CH(8) P(64)
//------------------------------------
// Track 9 :
//------------------------------------
TR(9) CH(9) P(64)
//------------------------------------
// Track 12 :
//------------------------------------
TR(12) CH(12) P(64)
//------------------------------------
// Track 13 :
//------------------------------------
TR(13) CH(13) P(64)
//------------------------------------
// Track 14 :
//------------------------------------
TR(14) CH(14) P(64)
//------------------------------------
// Track 15 :
//------------------------------------
TR(15) CH(15) P(64)
//------------------------------------
// Track 16 :
//------------------------------------
TR(16) CH(16) P(64)
//------------------------------------
// Track 10 : ドラム系
//------------------------------------
TR(10) CH(10)
// マクロ定義
// b = bass / s = Snare / S = Rim
$b{n36,} $s{n38,} $S{n37,}
// h = HH Close / f = HH foot close / o = HH Open
$c{n42,} $f{n44,} $o{n46,}
// e = Crash / j = Ride / t = Ride Bell / d = China / i = Splash / y = Crash2 / u = Ride2
$e{n49,} $j{n51,} $t{n53,} $d{n52,} $i{n55,} $y{n57,} $u{n59,}
// q = High Tom / a = High-Middle / z = Low-Middle / w = Low / x = Floor high / g = Floor low
$q{n50,} $a{n48,} $z{n47,} $w{n45,} $x{n43,} $g{n41,}
// p = Crap / k = Cowbell / m = Tambourine / n = ?? / j = ??
$p{n39,} $k{n56,} $m{n54,} $n{n75,}
@1,90,1
Rhythm {
l8
[4
[6 v100 c v60c v60c16c16 v80c v60c] c o
]
[2
[6 v100 c v60c v60c16c16 v80c v60c] c o
r-1^1^1^1
v80 brrr rrrr rrrr rrrb brrr rrrb rrbr rbrr
]
r-2 v90 ssss
[2
v127 e4 r-4
[2
[6 v100 c v60c v60c16c16 v80c v60c] c o
r-1^1^1^1
:
v80 brrr brrr brrr brrr brrr brrr brrr brrb r-2 v90 s4rr
]
:
v80 brrr brrr brrr brrr brrr brrr brrr brrr r-2 v90 s4v80ss
]
v80 brrr brrr brrr brrr brrr brrr brrr brrb r-1 rv90s4v40s v90 s64v70s16..sv80ss
v127 'e1y1'
r-1
[2
v80 brrr rrrr
v80 rrrr rrbr
:
v80 brrr rrrr
v80 rrrr rrbr
v110 d1 r-1
]
v80 brrr rrbr
v80 brrr brrr r-1 v60's4w4' v70 [2 'sw'] v80[2 'sw'] v90[2 'sw']
}
[(LOOP)
Rhythm {
[2
[2
[2
v80 brbb rrrr bbrb16b16 rrrr r-1^1 v90 r2s2r2s2 r-1^1 v127 e4 r-4 [4 [2 v100 c v60 : c] : c16c16 ] o
v80 brbb rrrr bbrb rrrb r-1^1 v90 r2s2r2s2 r-1^1 [4 [2 v100 c v60 : c] : c16c16 ] o
v80 brbb rrrr bbrb16b16 rrrr r-1^1 v90 r2s2r2s2 r-1^1 [4 [2 v100 c v60 : c] : c16c16 ] o
:
v80 brb16b16b rrrr bbrb16b16 rbrb r-1^1 v90 r2s2r2s2 r-1^1 [3 [2 v100 c v60 : c] c16c16 ] v100 c v60 c c16c16 o
]
:
v80 brb16b16b rrrr brrb16b16 rbrr r-1^1 v90 r2s2rs4v60s v100 qqaz l8 r-1^1 [3 [2 v100 c v60 : c] c16c16 ] v100 c v60 c c16c16 o
]
v80 brb16b16b rrrr brrb16b16 rbrr r-1^1 v90 r2s2rs4v60s v90 s64s16..sss l8 r-1^1 [3 [2 v100 c v60 : c] c16c16 ] v100 c v60 c c16c16 o
[2
v80 bbrr rrrr rrrr brrr r-1^1 rrrr v90 s4rr rrrr rrs64s16..r r-1^1 v127 y4 r-4 [4 v80t4 v100u4]
v80 bbrr rrrr rrrr rrrr r-1^1 rrrr v90 s4rv70s v100 q64a16..rra64z16.. rrz64w16..r r-1^1 [4 v80t4 v100u4]
v80 bbrr rrrr rrbb rrrr r-1^1 rrrr v90 s4rr rrrr rrs64s16..r r-1^1 [4 v80t4 v100u4]
:
v80 bbrr rrrr rrrr rrrr r-1^1 rrrr v90 s4rv70s v100 q64a16..qra64z16.. arz64w16..z r-1^1 [4 v80t4 v100u4]
]
v80 bbrr rrrr brrr brbb r-1^1 rr v90 s64v80s... rv90s4v70s v100 qqaa zzww r-1^1 [4 v80t4 v100u4]
]
v127 'e4y4' r-4
[2
[2
[6 v100 c v60c v60c16c16 v80c v60c] c o
r-1^1^1^1
v80 rrrr brrr rrrr brrr rrrr brrr rrrr brrr
]
:
r-2 v90 srss
]
r-1^1 v100 rq64q16..qq a64a16..aaz z64z16..z v90s64s16..s ssss
}
]
Rhythm {
v127 d4
}