//-----------------------------------------------
// forward from days
// (C)Yax
//-----------------------------------------------
ResetGM();
TrackName = {"forward from days"}
Copyright = {"Yax"}
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 DANDO(B, E, LEN, STP) {
Int _STEP = 24
Int _DIFF = 0
Int _CNT = 0
Int _TMP = 0
Int _LAP = 0
IF( STP != 0 ) {
_STEP = STP
}
_CNT = LEN/_STEP
_DIFF = (E - B)/_CNT
_TMP = B
Tempo = %(B)
For(Int I = 1; I < _CNT; I++ ){
r%(_STEP)
_TMP = _TMP + _DIFF
Tempo = %(_TMP)
_LAP = _LAP + _STEP
}
r%(LEN-_LAP)
Tempo = %(E)
r-%(LEN)
}
// 全体の調整
TR(1) V(118) REV(30) CHO(0)
TR(2) V(114) REV(30) CHO(0)
TR(3) V(110) REV(40) CHO(60)
TR(4) V(95) REV(60) CHO(70)
TR(5) V(80) REV(90) CHO(80)
TR(6) V(110) REV(20) CHO(0)
TR(7) V(94) REV(40) CHO(50)
TR(8) V(80) REV(60) CHO(30)
TR(9) V(90) REV(50) CHO(50)
TR(10) V(113) REV(90) CHO(0)
TR(11) V(110) REV(20) CHO(0)
TR(12) V(103) REV(25) CHO(0)
TR(13) V(99) REV(25) 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)
// テンポ
INT T = 92 // 通常のテンポ
INT T2 = 67 // リタルダンド後のテンポ
INT T3 = 60 // リタルダンド後のテンポ
Tempo=(T)
// キー
INT KEY=2
Key(KEY) // 全体のキー
TR(10) TrackKey(KEY * -1) // リズムトラックの調整用、Keyの符号を逆にしたものをセットしておく
//------------------------------------
// Track 1 :
//------------------------------------
TR(1) CH(1) P(54)
@1 v95
o5 l8 q90
y64,1; [4 'g>ce<' v(MML(v)-10) g v(MML(v)+10)] y64,0;
y64,1; [4 'a>cdf<'v(MML(v)-10) a v(MML(v)+10)] y64,0;
y64,1; [4 'gb>d<' v(MML(v)-10) g v(MML(v)+10)] y64,0;
y64,1; [2 'gb>ce<' v(MML(v)-10) g v(MML(v)+10)] y64,0;
y64,1; [2 'gb>d<' v(MML(v)-10) g v(MML(v)+10)] y64,0;
y64,1; [4 'g>ce<' v(MML(v)-10) g v(MML(v)+10)] y64,0;
y64,1; [4 'a>cdf<'v(MML(v)-10) a v(MML(v)+10)] y64,0;
y64,1; [4 'gb>d<' v(MML(v)-10) g v(MML(v)+10)] y64,0;
DANDO(T,T2,!2.,!8)
y64,1; 'egb>c<'geg ARP(3,!2,{egb>c<}) y64,0;
Tempo(T)
[2
[2
y64,1; [4 'eg>c<' v(MML(v)-10) c v(MML(v)+10)] y64,0;
y64,1; [4 '<b>dg' v(MML(v)-10) <b> v(MML(v)+10)] y64,0;
y64,1; [4 'cfa' v(MML(v)-10) c v(MML(v)+10)] y64,0;
:
y64,1; [4 'dgb' v(MML(v)-10) d v(MML(v)+10)] y64,0;
]
y64,1; [2 '<b>dg' v(MML(v)-10) <b> v(MML(v)+10)] <ARP(2,!8,{b>dg}) dgb y64,0;
[2
y64,1; [4 '<b>eg' v(MML(v)-10) <b> v(MML(v)+10)] y64,0;
y64,1; [3 'cea' v(MML(v)-10) c v(MML(v)+10)] 'ae>c<' v(MML(v)-10) b v(MML(v)+10) y64,0;
y64,1; [4 'dfa' v(MML(v)-10) d v(MML(v)+10)] y64,0;
:
y64,1; [3 'dgb' v(MML(v)-10) d v(MML(v)+10)] gb y64,0;
]
:
y64,1; [2 'eg+b' v(MML(v)-10) e v(MML(v)+10)] ARP(4,!4.,{eg+b>e<}) g y64,0;
]
y64,1; [2 'eg+b' v(MML(v)-10) e v(MML(v)+10)] y64,0;
y64,1; [2 'eg+b>d<' v(MML(v)-10) e v(MML(v)+10)] y64,0;
[2
y64,1; [4 'ga>ce<' v(MML(v)-10) g v(MML(v)+10)] y64,0;
y64,1; [4 'ab>dg<' v(MML(v)-10) b v(MML(v)+10)] y64,0;
y64,1; [4 'fga>c<' v(MML(v)-10) a v(MML(v)+10)] y64,0;
y64,1; [2 'gb>de<' v(MML(v)-10) g v(MML(v)+10)] [2 'egb>d<' v(MML(v)-10) g v(MML(v)+10)] y64,0;
y64,1; [4 'fga>c<' v(MML(v)-10) f v(MML(v)+10)] y64,0;
y64,1; [4 'gab>d<' v(MML(v)-10) g v(MML(v)+10)] y64,0;
:
y64,1; [4 'gb>ce<' v(MML(v)-10) e v(MML(v)+10)] y64,0;
y64,1; [2 'egb>d<' v(MML(v)-10) d v(MML(v)+10)] [2 'b>deg<' v(MML(v)-10) d v(MML(v)+10)] y64,0;
]
y64,1; 'egb>c<'ceg 'ec'gb>c< y64,0;
ARP(4,!1,{egb>ce<})
[2
ARP(0,!4.,{<fa>ce}) ARP(1,!2.,{<fa>ce}}) y64,1; <'af'>cf afc4 y64,0;
ARP(0,!4.,{<egb>d}) ARP(1,!2.,{<egb>d}}) y64,1; <'ge' b>d <b>dgf+16f16 y64,0;
ARP(0,!4.,{<fa>ce}) ARP(1,!2.,{<fa>ce}}) y64,1; <'af'>cf afcf y64,0;
ARP(0,!4.,{<b>deg}) ARP(1,!2.,{<b>deg}}): y64,1; 'be'gd 'ge'<b>ed16d+16 y64,0;
]
y64,1; 'e<b>'de 'ge'egb^2 y64,0;
[2
y64,1; [4 'ga>ce<' v(MML(v)-10) g v(MML(v)+10)] y64,0;
y64,1; [4 'ab>dg<' v(MML(v)-10) b v(MML(v)+10)] y64,0;
y64,1; [4 'fga>c<' v(MML(v)-10) a v(MML(v)+10)] y64,0;
y64,1; [2 'gb>de<' v(MML(v)-10) g v(MML(v)+10)] [2 'egb>d<' v(MML(v)-10) g v(MML(v)+10)] y64,0;
y64,1; [4 'fga>c<' v(MML(v)-10) f v(MML(v)+10)] y64,0;
y64,1; [4 'gab>d<' v(MML(v)-10) g v(MML(v)+10)] y64,0;
:
y64,1; [4 'gb>ce<' v(MML(v)-10) e v(MML(v)+10)] y64,0;
y64,1; [2 'egb>d<' v(MML(v)-10) d v(MML(v)+10)] [2 'b>deg<' v(MML(v)-10) d v(MML(v)+10)] y64,0;
]
y64,1; 'egb>c<'ceg 'ec'gb>c< y64,0;
ARP(4,!1,{egb>ce<})
[2
y64,1; [4 'eg>c<' v(MML(v)-10) c v(MML(v)+10)] y64,0;
y64,1; [4 '<b>dg' v(MML(v)-10) <b> v(MML(v)+10)] y64,0;
y64,1; [4 'cfa' v(MML(v)-10) c v(MML(v)+10)] y64,0;
:
y64,1; [4 'dgb' v(MML(v)-10) d v(MML(v)+10)] y64,0;
]
y64,1; [2 '<b>dg' v(MML(v)-10) <b> v(MML(v)+10)] <ARP(2,!8,{b>dg}) dgb y64,0;
[2
y64,1; [4 '<b>eg' v(MML(v)-10) <b> v(MML(v)+10)] y64,0;
y64,1; [3 'cea' v(MML(v)-10) c v(MML(v)+10)] 'ae>c<' v(MML(v)-10) b v(MML(v)+10) y64,0;
y64,1; [4 'dfa' v(MML(v)-10) d v(MML(v)+10)] y64,0;
:
y64,1; [3 'dgb' v(MML(v)-10) d v(MML(v)+10)] gb y64,0;
]
y64,1; [2 'eg+b' v(MML(v)-10) e v(MML(v)+10)] y64,0;
ARP(5,!1.,{eg+b>d<})
[2
[2
y64,1; [4 'ga>ce<' v(MML(v)-10) g v(MML(v)+10)] y64,0;
y64,1; [4 'ab>dg<' v(MML(v)-10) b v(MML(v)+10)] y64,0;
y64,1; [4 'fga>c<' v(MML(v)-10) a v(MML(v)+10)] y64,0;
y64,1; [2 'gb>de<' v(MML(v)-10) g v(MML(v)+10)] [2 'egb>d<' v(MML(v)-10) g v(MML(v)+10)] y64,0;
y64,1; [4 'fga>c<' v(MML(v)-10) f v(MML(v)+10)] y64,0;
y64,1; [4 'gab>d<' v(MML(v)-10) g v(MML(v)+10)] y64,0;
:
y64,1; [4 'gb>ce<' v(MML(v)-10) e v(MML(v)+10)] y64,0;
y64,1; [2 'egb>d<' v(MML(v)-10) d v(MML(v)+10)] [2 'b>deg<' v(MML(v)-10) d v(MML(v)+10)] y64,0;
]
:
y64,1; [4 'gb>ce<' v(MML(v)-10) e v(MML(v)+10)] y64,0;
y64,1; v(MML(v)+10) EP.onTime(80,127,!2.) [8 'b>ceg<'] v(MML(v)-10)y64,0;
]
y64,1; 'egb>c<'ceg 'ec'gb>c< y64,0;
ARP(4,!1,{egb>ce<})
y64,1; ARP(0,!4,{<fa>ce})r ARP(0,!^2,{<fa>ce}}) ARP(1,!1,{<fa>ce}}) y64,0;
r-1^1 r'>c<a'a>'e^2<a^2' r'af'>cf 'ae'fc4 <
y64,1; ARP(0,!4,{<egb>d})r ARP(0,!^2,{<egb>d}}) ARP(1,!1,{<egb>d}}) y64,0;
r-1^1 r'>d<g'b> 'g^2e^2' r16>c32c+32<'>d<g'bg 'e<g>'d 'e12<g12>'d12<b12
y64,1; ARP(0,!4,{<fa>ce})r ARP(0,!^2,{<fa>ce}}) ARP(1,!1,{<fa>ce}}) y64,0;
r-1^1 r'>c<a'a16^48>d48d+48'e4.<a4.''>g4d4<' '>a4.e4.<' >>'c<a' bg 'e<b>'d <
y64,1; ARP(0,!4,{<b>deg})r ARP(0,!^2,{<b>deg}}) ARP(1,!1,{<b>deg}}) y64,0;
r-1^1 '>e<b'gb>d16e16 'bd'ged16<b16> d12e12f12 l24 egb>ed<b '>d<g'be l16 'd<b'd >de'ge'd < l8
y64,1; [4 'g>ce<' v(MML(v)-10) g v(MML(v)+10)] y64,0;
y64,1; [4 'a>cdf<'v(MML(v)-10) a v(MML(v)+10)] y64,0;
y64,1; [4 'gb>d<' v(MML(v)-10) g v(MML(v)+10)] y64,0;
y64,1; [2 'gb>ce<' v(MML(v)-10) g v(MML(v)+10)] y64,0;
y64,1; [2 'gb>d<' v(MML(v)-10) g v(MML(v)+10)] y64,0;
y64,1; [4 'g>ce<' v(MML(v)-10) g v(MML(v)+10)] y64,0;
y64,1; [4 'a>cdf<'v(MML(v)-10) a v(MML(v)+10)] y64,0;
DANDO(T,T3,!1.,!8)
y64,1; [4 'gb>d<' v(MML(v)-10) g v(MML(v)+10)] y64,0;
y64,1; 'egb>c<'geg ARP(5,!1.,{cegb>c<}) y64,0;
Tempo(T)
//------------------------------------
// Track 2 :
//------------------------------------
TR(2) CH(2) P(64)
@1 v95
o3 l8 q95
y64,1; cg>ce^2< y64,0;
y64,1; ca>cf^2< y64,0;
y64,1; db>dg4.d4< y64,0;
y64,1; g>ceg< y64,0 y64,1 dgb>d< y64,0;
y64,1; cg>ce^2< y64,0;
y64,1; ca>cf^2< y64,0;
y64,1; dgb>d4.<bg y64,0;
y64,1; g>c<g>e< e2 y64,0;
[2
y64,1; c4.g>c2< y64,0;
y64,1; g2b4g4 y64,0;
y64,1; a2f2 y64,0;
y64,1; g2d4g4 y64,0;
y64,1; >c4.<ge2 y64,0;
y64,1; d2g4b4 y64,0;
y64,1; a2f2 y64,0;
y64,1; d2g4.a16a+16 y64,0;
y64,1; b2g2 y64,0;
y64,1; a2e2 y64,0;
y64,1; f2d2 y64,0;
y64,1; g2d4.a16a+16 y64,0;
y64,1; b2g2 y64,0;
y64,1; a2e2 y64,0;
y64,1; f2a2 y64,0;
:
y64,1; b2g+2 y64,0;
]
y64,1; b2g+2 y64,0;
[2
y64,1; cga>e4c<ge y64,0;
y64,1; <b>ga>d4<bgd y64,0;
y64,1; cfa>c4<agf y64,0;
y64,1; gb>de4<b>dg< y64,0;
y64,1; fa>cf4c<af y64,0;
y64,1; gb>dg4d<bg y64,0;
:
y64,1; eb>ce4c<bg y64,0;
y64,1; gb>dg4ed<b y64,0;
]
egb>e4c<bg
'e1c1'
[4
y64,1; f4.f2c f4.ea2 y64,0;
y64,1; e4.e2<b> : e4.<b>g2 y64,0;
]
b4ge gec4^2 y64,0;
[2
y64,1; cga>e4c<ge y64,0;
y64,1; <b>ga>d4<bgd y64,0;
y64,1; cfa>c4<agf y64,0;
y64,1; gb>de4<b>dg< y64,0;
y64,1; fa>cf4c<af y64,0;
y64,1; gb>dg4d<bg y64,0;
:
y64,1; eb>ce4c<bg y64,0;
y64,1; gb>dg4ed<b y64,0;
]
egb>e4c<bg
'e1c1'
y64,1; c4.g>c2< y64,0;
y64,1; g2b4g4 y64,0;
y64,1; a2f2 y64,0;
y64,1; g2d4g4 y64,0;
y64,1; >c4.<ge2 y64,0;
y64,1; d2g4b4 y64,0;
y64,1; a2f2 y64,0;
y64,1; d2g4.a16a+16 y64,0;
y64,1; b2g2 y64,0;
y64,1; a2e2 y64,0;
y64,1; f2d2 y64,0;
y64,1; g2d4.a16a+16 y64,0;
y64,1; b2g2 y64,0;
y64,1; a2e2 y64,0;
y64,1; f2a2 y64,0;
y64,1; b2g+2 v(MML(v)-20) <b2.>d4 v(MML(v)+20) y64,0;
[2
[2
y64,1; cga>e4c<ge y64,0;
y64,1; <b>ga>d4<bgd y64,0;
y64,1; cfa>c4<agf y64,0;
y64,1; gb>de4<b>dg< y64,0;
y64,1; fa>cf4c<af y64,0;
y64,1; gb>dg4d<bg y64,0;
:
y64,1; eb>ce4c<bg y64,0;
y64,1; gb>dg4ed<b y64,0;
]
:
y64,1; eb>ce4c<bg y64,0;
y64,1; gb>dg4ed<b y64,0;
]
egb>e4c<bg
'e1c1'
[2
y64,1; f4.f2c f4.ea2 y64,0;
y64,1; e4.e2<b> : e4.<b>g2 y64,0;
]
b4ge gec4 y64,0;
y64,1; cg>ce^2< y64,0;
y64,1; ca>cf^2< y64,0;
y64,1; db>dg4.d4< y64,0;
y64,1; g>ceg< y64,0 y64,1 dgb>d< y64,0;
y64,1; cg>ce^2< y64,0;
y64,1; ca>cf^2< y64,0;
y64,1; dgb>d4.<bg y64,0;
y64,1; g>c<g>e< v(MML(v)-20) 'e1.<g1.' y64,0;
//------------------------------------
// Track 3 :
//------------------------------------
TR(3) CH(3) P(64)
@34 v100
M.onNoteWave(10,90,!2.)
o3 q90
l16
>d8&!8e2^8..&!8c32< b&!16>c<
g+&a2^8^32&g32 adg+&!16a
f+&!16g4^32&f32 eg a&!16b4.^32&a+32
b&!16>c4^32&<b32 f+&g d4...&!16.<b32>
d+&!16e2.^32&!16d+32 d&e
e32&f4^16. g&g+ a4.b32&>c.<
b4^16.&!16a32 gd f+32&g.fd d+32&e. d8
c2&!8.>c2<
[8 r1]
[7 r1]
r2.>d+32&e.<bg+<
b&!16>c2.^32&!16<b32 g>c<
brb2.>d<b
g+32&a4^16.>e&f c4.<b&a
grg4.>d8&!8e4<g8
b&!16>c2.^16 d&e<
brb2.>f+32&g.
f4.cc+ d4 g+32&ag.f
f+16&!16g4.^32&!16f+32 d4...&!16.<b32>
d&!16e2.^32&!16d32 b&!16>c<
g+16&a2^8^32&!16g+32 d+32&e32cd&e
f4.a&b >c16&d4^32&c+32 c8<
b4...&!16.a32 g4^16.&f32 d8
d&!16e2.^32&d+32 b&!16>c<
g+32&a2^8.&!16g+32 >c+32&dc.<b
a4^16.&!16g32 d+&e f4...&!16.e32
a8&!8b4^16.&!16.a+32 g16&!16g+4.^32&!16g32
[2
c4 c8<g>c c8 d+16&!16e8^32.&!32d+64 c8
d4 d8f+32&g32d d8<b4b8
a4 a8fa Slur(1) >c8 g&a >c8<ae Slur(0)
g4 b8>d+32&e32<b Slur(1) >c&<bg8 e8c&<b Slur(0)
:
a4 Slur(1) a&b>c8< a8 Slur(0) >d+16&!16e8^32.&!32d+64 c8
d4 d8<b>d g8d<b> Slur(1) b&g d8 Slur(0)
e4 <e8g>c< g8 b16&!16>c8^32.&!32.<b64 e8
g4 Slur(1) geg&b >e8f&g Slur(0) a+32&b.<b8>
]
a4 >c8<a>c d+32&e^64&!32d+64 c4c8
d4 <g8 Slur(1) b&>d g8f&e d8c&<b
>c4< g8 >c&e g>c&ec g8e&c< Slur(0)
c1
<a4.a2>d&e a2e8.d8.c8
<b4.b2>f&f+ g2d4<b4
a8.>c8.d8< a4>a4 e2<a2
b4.>cd e8.d8.c8 g2d4.c<b>
<a4.ab> c8<a>c eae8 c4.<ba+ a4>e4
d4.dc< b4. ba g4>d4 g4 e8d<b>
<a4.a>c e8cd e8c8 a4.ag f8fe d8dc
<b4.gb > d4.de g8gf e8ed e<b>de bag8
r2
[2
c4 c8<g>c c8 d+16&!16e8^32.&!32d+64 c8
d4 d8f+32&g32d d8<b4b8
a4 a8fa Slur(1) >c8 g&a >c8<ae Slur(0)
g4 b8>d+32&e32<b Slur(1) >c&<bg8 e8c&<b Slur(0)
:
a4 Slur(1) a&b>c8< a8 Slur(0) >d+16&!16e8^32.&!32d+64 c8
d4 d8<b>d g8d<b> Slur(1) b&g d8 Slur(0)
e4 <e8g>c< g8 b16&!16>c8^32.&!32.<b64 e8
g4 Slur(1) geg&b >e8f&g Slur(0) a+32&b.<b8>
]
a4 >c8<a>c d+32&e^64&!32d+64 c4c8
d4 <g8 Slur(1) b&>d g8f&e d8c&<b
>c4< g8 >c&e g>c&ec g8e&c< Slur(0)
c1
[7 r1]
r2.g8d&d+
d&!16e2.^32&!16d32 b&!16>c<
g+16&a2^8^32&!16g+32 d+32&e32cd&e
f4.a&b >c16&d4^32&c+32 c8<
b4...&!16.a32 g4^16.&f32 d8
d&!16e2.^32&d+32 b&!16>c<
g+32&a2^8.&!16g+32 >c+32&dc.<b
a4^16.&!16g32 d+&e f4...&!16.e32
a8&!8b4^16.&!16.a+32 g16&!16g+4.^32&!16g32
e2.<bg+&a&b>
[2
[2
c4 c8<g>c c8 d+16&!16e8^32.&!32d+64 c8
d4 d8f+32&g32d d8<b4b8
a4 a8fa Slur(1) >c8 g&a >c8<ae Slur(0)
g4 b8>d+32&e32<b Slur(1) >c&<bg8 e8c&<b Slur(0)
:
a4 Slur(1) a&b>c8< a8 Slur(0) >d+16&!16e8^32.&!32d+64 c8
d4 d8<b>d g8d<b> Slur(1) b&g d8 Slur(0)
e4 <e8g>c< g8 b16&!16>c8^32.&!32.<b64 e8
g4 Slur(1) geg&b >e8f&g Slur(0) a+32&b.<b8>
]
:
a4 >c8<a>c d+32&e^64&!32d+64 c4c8
d4 <g8 Slur(1) b&>d g8f&e d8c&<b
>c4< Slur(1) g8>c&e g>c&ec g8e&c<
d<gb&>d g8dg <b>d&ec <g8 a&b> Slur(0)
]
a4 >c8<a>c d+32&e^64&!32d+64 c4c8
d4 <g8 Slur(1) b&>d g8f&e d8c&<b
>c4< g8 >c&e g>c&ec g8e&c< Slur(0)
c1<
f4.f2 >d&e f2^8..&!8e32< a4
g4.g2 >c&c+ d2.< a8g8
f4.f2 >g&g+ a2^8..&!8g32 <a4
g4.g8^2 >f&!16g4^8^32&!8f+32 g8a&a+ ba>c&d
d8&!8e2^8..&!8c32< b&!16>c<
g+&a2^8^32&g32 adg+&!16a
f+&!16g4^32&f32 eg a&!16b4.^32&a+32
b&!16>c4^32&<b32 f+&g d4...&!16.<b32>
d+&!16e2.^32&!16d+32 d&e
e32&f4^16. g&g+ a4.b32&>c.<
b4^16.&!16a32 gd f+32&g.fd d+32&e. d8
c2 v(MML(v)-15) b8&!8>c2.
//------------------------------------
// Track 4 :
//------------------------------------
TR(4) CH(4) P(64)
@49 v70
M.onNoteWave(2,50,!1.)
o4 l8 q99
'g1e1'
'a1f1'
'b1g1'
'>c2<g2' 'b2g2'
'g1e1'
'a1f1'
'b1g1'
'e2g2'r2
[8 r1]
'<b1>e1'
'a1e1'
'f1d1'
'g1b1'
'<b1>e1'
'a1e1'
'f1a1'
'g+1b1'
'<g1>e1g1'
'<b1>g1b1' r-2 d2
'<a1>f1a1'
'<g1>d1g1' r-2 b2
'c1e1g1'
'd1g1b1' r-2 d2
'c1f1a1'
'<b1>d1g1' r-2 b2
'<b1>e1' r-1 ARP(!8,!1,{b>deg<})
'a1e1' r-1 ARP(!8,!1,{a>cea<})
'f1d1' r-1 ARP(!8,!1,{a>dfa<})
'g1b1' r-1 ARP(!8,!1,{b>dgb<})
'<b1>e1' r-1 ARP(!8,!1,{b>deg<})
'a1e1' r-1 ARP(!8,!1,{a>cea<})
'f1a1' r-1 ARP(!8,!1,{a>dfa<})
'g+1b1' r-1 ARP(!8,!1,{b>dg+b<})
[2
'g1e1' r-1 >e4.g4.>c4<<
'b1g1' r-1 >b2g2<
'a1f1' r-1 >f4.a4.>c4<<
'g1d1' r-1 >b2g2<
'f1c1' r-1 >c4.f4.a4<
'g1d1' r-1 >g2b2<
:
'g1e1' r-1 >e4.g4.b4<
'b1g1' r-1 >>d2<b2<
]
'e1g1' r-1 >c4.e4.g4<
'g1b1' r-1 > 'g1e1'<
v(MML(v)-10)
[2
'f1^1a1^1' r-1 >c2e2<
'e1^1g1^1' r-1 b2>d2<
'f1^1a1^1' r-1 >c2e2<
:
'g1^1b1^1' r-1 >g4.f16e16 d2<
]
'g1^1b1^1' r-1 >g4.f+16f16 e4c4<
v(MML(v)+10)
r2
[2
'g1e1' r-1 >e4.g4.>c4<<
'b1g1' r-1 >b2g2<
'a1f1' r-1 >f4.a4.>c4<<
'g1d1' r-1 >b2g2<
'f1c1' r-1 >c4.f4.a4<
'g1d1' r-1 >g2b2<
:
'g1e1' r-1 >e4.g4.b4<
'b1g1' r-1 >>d2<b2<
]
'e1g1' r-1 >c4.e4.g4<
'g1b1' r-1 > 'g1e1'<
[7 r1]
r2. EP.onTime(90,127,!4) l24 efgg+aa+ l8 EP(127)
'<b1>e1' r-1 ARP(!8,!1,{b>deg<})
'a1e1' r-1 ARP(!8,!1,{a>cea<})
'f1d1' r-1 ARP(!8,!1,{a>dfa<})
'g1b1' r-1 ARP(!8,!1,{b>dgb<})
'<b1>e1' r-1 ARP(!8,!1,{b>deg<})
'a1e1' r-1 ARP(!8,!1,{a>cea<})
'f1a1' r-1 ARP(!8,!1,{a>dfa<})
'g+1b1' r-1 ARP(!8,!1,{b>dg+b<})
r2. EP.onTime(90,127,!4) l32 g+aa+b >cc+dd+< l8 EP(127)
[4
'g1e1' r-1 >e4.g4.>c4<<
'b1g1' r-1 >b2g2<
'a1f1' r-1 >f4.a4.>c4<<
'g1d1' r-1 >b2g2<
'f1c1' r-1 >c4.f4.a4<
'g1d1' r-1 >g2b2<
:
'g1e1' r-1 >e4.g4.b4<
'b1g1' r-1 >>d2<b2<
]
'e1g1' r-1 >c4.e4.g4<
'g1b1' r-1 > 'g1e1'<
v(MML(v)-10)
'f1^1a1^1' r-1 >c2e2<
'e1^1g1^1' r-1 b2>d2<
'f1^1a1^1' r-1 >c2e2<
'g1^1b1^1' r-1 >g4.f+16f16 e4d4<
'g1e1' r-1 >e4.f16f+16 g4>c4<<
'a1f1' r-1 >a2>c2<<
'b1g1' r-1 >b4.a+16a16 g4d4<
'>c2<g2' 'b2g2' r-1 > e2 d2 <
'g1e1' r-1 >e2f4g4<
'a1f1' r-1 >a2b4>c4<<
'b1g1' r-1 >b2g4d4<
EP.onTime(127,30,!1.) 'e1.g1.' r-1. >e1.<
//------------------------------------
// Track 5 :
//------------------------------------
TR(5) CH(5) P(64)
@11 v50
P.onNote(117,10,64)
o7
P.onNote(117,10,64)
l16
EP(100)
[2
[2 g8>ce<g>ecg<]
[2 a8>cf<a>fda<]
[2 g8b>d<g>d<b>g<]
:
g8b>c<b>ecg< b8>ce<b>ecg<
]
g8b>c<b>ecg c2
EP(127)
[8 r1]
[2
l4
[2
rgrg rara
rfrf : rgrg
]
rg+br
:
l8
r1 r2rg>d<b
r1 r2rb>gd<
r1 r2r>gd<b
r1 rrrd g>dg<b
]
l8
[2
r>c<g>c ec<g16a16>e<
r>d<a>d ge<b16>d16e<
r>c<a>c fc <a16>c16f<
r>e<b>e ge<b16>d16g<
r>c<g>c fc <g16a16>c<
r>d<a>d ge<b16>d16d<
:
r>c<g>c ec<g16a16>e<
gb>de <b>de16g16b<
]
r>e<b>e ge<b16>d16g<
>e1<
[8 r1]
[8 r1]
r2
[2
r>c<g>c ec<g16a16>e<
r>d<a>d ge<b16>d16e<
r>c<a>c fc <a16>c16f<
r>e<b>e ge<b16>d16g<
r>c<g>c fc <g16a16>c<
r>d<a>d ge<b16>d16d<
:
r>c<g>c ec<g16a16>e<
gb>de <b>de16g16b<
]
r>e<b>e ge<b16>d16g<
>e1<
l8
r1 r2rg>d<b
r1 r2rb>gd<
r1 r2r>gd<b
r1 rrrd g>dg<b
l4
[2
rgrg rara
rfrf : rgrg
]
rg+br
r1
l8
[4
r>c<g>c ec<g16a16>e<
r>d<a>d ge<b16>d16e<
r>c<a>c fc <a16>c16f<
r>e<b>e ge<b16>d16g<
r>c<g>c fc <g16a16>c<
r>d<a>d ge<b16>d16d<
:
r>c<g>c ec<g16a16>e<
gb>de <b>de16g16b<
]
r>e<b>e ge<b16>d16g<
>e1<
[8 r1]
l16
EP(100)
[2
[2 g8>ce<g>ecg<]
[2 a8>cf<a>fda<]
[2 g8b>d<g>d<b>g<]
:
g8b>c<b>ecg< b8>ce<b>ecg<
]
g8b>c<b>ecg c2
//------------------------------------
// Track 6 :
//------------------------------------
TR(6) CH(6) P(64)
//------------------------------------
// Track 7 :
//------------------------------------
TR(7) CH(7) P(84)
@30 v110
//@31,91,0 v110
BR(2)
PitchBend(0)
M.onNoteWave(2,90,!1)
FineTune(68)
o5 l16
q90
[8 r1]
[8 r1]
[8 r1]
[8 r1]
[8 r1]
[8 r1]
[7 r1]
r2. < q60 refg
q85 g+&!16a16.&!32g+64r64 e8.>d+&16e4.^32.&!32d+64 q70 ef q85f+32&g. q70 fe q80 e32&f.d8 d+32&e.c8 d8< q70 ba
q85 a+32&b8^64&a+64 g8. >c+&!16d4.^32&!32c+64r64 q75de q85 e32&f4^16. q70 fe q85 d4 d+32&e8.&d+32
q80 c8.e8.g8 q85 g+&!16a4^32.&!32g+64 q70 b&>c< q85 a4....&!32.g+64 b&!16>c4.^32.&!32<b64
q85 a+32&b. q70 ba q80 f+32&g.d8 d+32&e.<b8> c+32&d.<a8 q85 a+32&b4^16&a+64r64 >c+&!16d4.^32&!32c+64r64 q70 eg
q85 g+32&a4^16. b4.b32&>c8.&!32<b64r64 q80 g+32&a. q75>ed q80 <b32&>c.<b8 b32&>c. q75 c<b q80 a8f8
q85 g4.a4.a+32&b8.. b&!16>c4^32&<b64r64> c+&!16d4.^32&!32c+64r64 q70 cd
q85 d+&!16e4^32&c+64r64 g+&!16a4^32&!32.g64r64 e4 b&!16>c4^32&!32<b64r64a4.q70 >c<bge
q85 f+&!16g4^32&!32f+64r64 q70 gf e<b>de gdgb q90 >c16&!16d4^32.&!16<b64 b2^8...&!16.g64
r4.
//------------------------------------
// Track 8 :
//------------------------------------
TR(8) CH(8) P(64)
//@30 v110
@81,91,0 v100
BR(2)
PitchBend(0)
EP.onNoteWave(80,127,!8)
M.onNoteWave(99,127,!4.)
FineTune(58)
o5 l16
q90
r64
[8 r1]
[8 r1]
[8 r1]
[8 r1]
[8 r1]
[8 r1]
[7 r1]
r2. < q60 refg
q85 g+&!16a16.&!32g+64r64 e8.>d+&16e4.^32.&!32d+64 q70 ef q85f+32&g. q70 fe q80 e32&f.d8 d+32&e.c8 d8< q70 ba
q85 a+32&b8^64&a+64 g8. >c+&!16d4.^32&!32c+64r64 q75de q85 e32&f4^16. q70 fe q85 d4 d+32&e8.&d+32
q80 c8.e8.g8 q85 g+&!16a4^32.&!32g+64 q70 b&>c< q85 a4....&!32.g+64 b&!16>c4.^32.&!32<b64
q85 a+32&b. q70 ba q80 f+32&g.d8 d+32&e.<b8> c+32&d.<a8 q85 a+32&b4^16&a+64r64 >c+&!16d4.^32&!32c+64r64 q70 eg
q85 g+32&a4^16. b4.b32&>c8.&!32<b64r64 q80 g+32&a. q75>ed q80 <b32&>c.<b8 b32&>c. q75 c<b q80 a8f8
q85 g4.a4.a+32&b8.. b&!16>c4^32&<b64r64> c+&!16d4.^32&!32c+64r64 q70 cd
q85 d+&!16e4^32&c+64r64 g+&!16a4^32&!32.g64r64 e4 b&!16>c4^32&!32<b64r64a4.q70 >c<bge
q85 f+&!16g4^32&!32f+64r64 q70 gf e<b>de gdgb q90 >c16&!16d4^32.&!16<b64 b2^8...&!16.g64
r4.
[8 r1]
[8 r1]
[8 r1]
[8 r1]
r1
[8 r1]
[8 r1]
[8 r1]
[8 r1]
[8 r1]
[8 r1]
r1
//------------------------------------
// Track 9 :
//------------------------------------
TR(9) CH(9) P(44)
@30 v110
BR(2)
PitchBend(0)
M.onNoteWave(2,90,!2..)
FineTune(68)
o5 l16
q90
[8 r1]
[8 r1]
[8 r1]
[8 r1]
[8 r1]
[8 r1]
[7 r1]
r2. q60 < rcde
q85 e&!16f^32&!32e64r64 c8. b&!16>c4.^32&<b64r64> q70 cd q85 d+32&e. q70 dc q80 c+32&d.<b8 b32&>c.<a8 a+32&b. q70 gf
q85 f+32&g8&!32f+64r64 e8.b2 b>c d4.dc<b4>c4<
g+32&a8&!32g+64r64 b32&>c8&!32<b64r64> d+32&e&d+64r64 e&!16f4^32&!32e64r64 g&a e&!16f4.^32&!32e64r64 g+&!16a4.^32&!32g+64r64
q80 >c+32&d. q75dc q80 < a+32&b.g8 g+32&a.e8 f+32&g.d8 q85 d+&!16e4^32&!32d+64r64 f+&!16g4.^32&!32f+64r64 q70 gb>
q85 <b&!16>c4^32&!32<b64r64> c+&!16d4^32&!32c+64r64 d+&!16e8^32&!32d+64r64 <b&!16>c4.^32&!32<b64r64> d+&!16e4.^32&!16..<a64r64
a+&!16b4^32&!32a+64r64 b&!16>c4^32&!32<b64r64> c+&!16d8^32&!32c+64r64 d+&!16e4^32&!32d+64r64 f+&!16g4.^32&!32f+64r64 q70 eg
q85 g+&!16a4^32&!32g+64r64 b&!16>c4^32&!32<b64r64 g+&!16a8^32&!32g+64r64 >d+&!16e4^32&!32d+64r64 c4. q70 edc<g
q85 a+&!16b4^32&!32a+64r64 q70 ba gdgb >d<b>de q85 e8&!8f8..&!32.e64r64 d2^8...&!16.<b64
r4.
[8 r1]
[8 r1]
[8 r1]
[8 r1]
r1
[8 r1]
[8 r1]
[8 r1]
[8 r1]
[8 r1]
[8 r1]
r1
//------------------------------------
// Track 10 : ドラム系
//------------------------------------
TR(10) CH(10)
// マクロ定義
// b = bass / s = Snare
$b{n36,} $s{n38,}
// 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,}
//@33,90,1
@1,90,1
l8
Rhythm {
[8 r1]
[8 r1]
[7 r1]
rrrr v80brbr r-2 v90 rs v100 a16a16z16z16 r-2 v80 d v127 y v80 ff
[2
v80 brrr rrrr r-1 v90 rrrr s4rr r-1 v127 e4 v100 c4c4c4
v80 bbrr rrrb r-1 v90 rrrr s4rr r-1 v100 c4c4c4c4
v80 brrr rrrr r-1 v90 rrrr s4rr r-1 v100 c4c4c4c4
:
v80 bbrb rbrb r-1 v90 rrrr s4rr r-1 v100 c4c4c4c v80o
]
v80 bbrb16b16 rbbr r-1 v90 rrrr s4 s16s16 v100z16z16 r-1 v100 c4c4 v90d4 v80f4
[2
v80 brrb rrrb r-1 v90 rrrr s4rr r-1 v127 e4 v100 c4c4c4
v80 bbrb rbrb r-1 v90 rrrr s4rr r-1 v100 c4c4c4c4
:
v80 brrb rrrb r-1 v90 rrrr s4rr r-1 v100 c4c4c4c4
v80 bbrb rbbr r-1 v90 rrrr ssrs16s16 r-1 v100 c4c4 v80d4 v100 c4
]
v80 brrb rbbr r-1 v90 rrrr s4rs16s16 r-1 v100 c4c4 v80d4 v100c4
v80 brbr brbr r-1 rv70'sw'v80'sw'v90'sw' l16 v100 ssqq aazz l8 r-1 v100 c4c4 v80d4 v100c4
[2
[2
v80 brrr bbrr r-1 v90 rrs4 rrs4 r-1 v127 e v80c [3 v100 c v80c]
v80 brrr bbr.b16 r-1 v90 rrs4 rrs4 r-1 [4 v100 c v80 : c] o
:
v80 brrr bbrr r-1 v90 rrs4 rrs4 r-1 [4 v100 c v80 c]
v80 bbrr b16bb16r16bb16 r-1 v90 rrs4 rrs4 r-1 [2 v100 c v80 c] v80d c v100c v80c
]
:
v80 brrr bbrr r-1 v90 rrs4 rrs4 r-1 [4 v100 c v80 c]
v80 bbrr bbbb r-1 v90 rrsv80s64s32.s16 l16 v100 ra64a32.as z64z32.zss l8 r-1 v120y v80c v100 c v80 c v80d c v100c v80c
]
v80 brrb16b16 brbr r-1 v90 rrs4 l16 v100 azsz asaz l8 r-1 [4 v100 c v80 c]
v80 brrr rrr16b. r-1 v127 y2. v80c16c16o
[2
[2
v80 brrb rrrb r-1 v90 rrrr s4rr r-1 v127 e v80c [3 v100cv80c]
v80 brrb rbrb r-1 v90 rrrr s4 v70 r16 s s16 r-1 [3 v100cv80c] c16c16 o
:
v80 brrb rrrb r-1 v90 rrrr s4rr r-1 [4 v100cv80c]
v80 brrb rbrb r-1 v90 rrrr s4r v80 s16s16 r-1 [3 v100cv80c] c16c16 o
]
:
v80 brrb rrrr r-1 v90 rrrr s4rv80s r-1 [4 v100cv80c]
v80 bb16b16rb r16bb16 rb16b16 r-1 v90 rrs64s8... s4s16s. r-1 [2 v100cv80c] v100d v80c fo
]
v80 brrb rbrb r-1 v75r16 s. v90 s. v70 s16 v90 s4sv80s16s16 r-1 [2 v100cv80c] v127 y v80 c ff
v80 bb16b16rb r16bb16 rb16b16 r-1 v90 rr s.v70s16 v90 ss s16s. r-1 [2 v100cv80c] v100d v80c fo
v80 brbb r-2 v100 l16 q64q32.q a64a32.a ssz64z32.z l8 r-2 v70 ffff
[2
[2
v80 brrr bbrr r-1 v90 rrs4 rrs4 r-1 v127 e v80c [3 v100 c v80c]
v80 brrr bbr.b16 r-1 v90 rrs4 rrs4 r-1 [4 v100 c v80 : c] o
:
v80 brrr bbrr r-1 v90 rrs4 rrs4 r-1 [4 v100 c v80 c]
v80 bbrr b16bb16r16bb16 r-1 v90 rrs4 rrs4 r-1 [2 v100 c v80 c] v80d c v100c v80c
]
:
v80 brrr bbrr r-1 v90 rrs4 rrs4 r-1 [4 v100 c v80 c]
v80 bbrr bbbb r-1 v90 rrsv80s64s32.s16 l16 v100 ra64a32.as z64z32.zss l8 r-1 v120y v80c v100 c v80 c v80d c v100c v80c
]
v80 brrb16b16 brbr r-1 v90 rrs4 l16 v100 azsz asaz l8 r-1 [4 v100 c v80 c]
v80 brrr rrrv50b r-1 v127 y2. v80c16c16 o
v60 brrr rrrr r-1 v100 d1
[6 r1]
r2. v80 bb r-1 r2. v100 s64s32.s16a16a16 r-2. rr v110 i v80o ff
[2
v80 brrb rrrb r-1 v90 rrrr s4rr r-1 v127 e4 v100 c4c4c4
v80 bbrb rbrb r-1 v90 rrrr s4rr r-1 v100 c4c4c4c4
v80 brrb rrrb r-1 v90 rrrr s4rr r-1 v100 c4c4c4c4
:
v80 bbrb rbrb r-1 v90 rrrr s4ss16s16 r-1 v100 c4c4c4c v80o
]
v80 bbrb rbrb r-1 v90 rrrr s4 a64a32.a16s r-1 v100 c4c4 v127 y4 v100 c v80o
v80 brbr brbr r-1 v90 l24 rqaqaz qazwwg sqsgss l16 s64s32.sss l8 r-1 v80f4f4f4f4
[2
[2
[2
v80 brrr bbrr r-1 v90 rrs4 rrs4 r-1 v127 e v80c [3 v100 c v80c]
v80 brr.b16 bbr.b16 r-1 v90 rrs4 r16v60s. v90s.v60s16 r-1 [4 v100 c v80 : c] o
:
v80 brrr bbrr r-1 v90 rrs4 rrs4 r-1 [4 v100 c v80 c]
v80 bbrb b16bb16r16bb16 r-1 v90 rrs4 r16v60s. v90s.v60s16 r-1 [2 v100 c v80 c] v80d c v100c v80c
]
:
v80 brrr bbrr r-1 v90 rrs4 rrs.v60s16 r-1 [4 v100 c v80 c]
v80 bbrr bbbb r-1 v90 rrsv80s64s32.s16 l16 v100 ra64a32.as z64z32.zss l8 r-1 v120y v80c v100 c v80 c v80d c v100c v80c
]
:
v80 brrr b16bb16rr r-1 v90 rrs4 rrsv70s16s16 r-1 [4 v100 c v80 c]
v80 brbr brbb r-1 l16 [2 rv70s64s32.v90ss] v100 aass zzss l8 r-1 v120y v80 fff ffff
]
v80 brrb16b16 brbr r-1 v90 rrs4 l16 v100 azsz asaz l8 r-1 [4 v100 c v80 c]
v80 brrr rrrr r-1 v127 'e1y1'
}
//------------------------------------
// Track 11 :
//------------------------------------
TR(11) CH(11) P(64)
//------------------------------------
// Track 12 :
//------------------------------------
TR(12) CH(12) P(64)
@82,110,3 v100
[8 r1]
o5 l16 q90
[2
r4.cc e4.de d4.efg2
r4.ff a4.ga g4.fed2
r4.cc e4.ef g4.a8b2
r4.aa>c4c.<b.a b2g4.f+f
e2g4b4 >c2<a2
>c2<a4.>c<a b2g4.f+f
e2g4b4 >c2<a2
f4.a>c d4c4< : b2.r4
]
b2.>d4
[2
e4.ee e4e8ef g2d2
c4.cc c4c8<ba> e2<b2
:
a2a4>e4 d2g2
e2..ef g2d2
]
a2a4>e4 d2<b2>
c1r1
[16 r1]
r2
[2
e4.ee e4e8ef g2d2
c4.cc c4c8<ba> e2<b2
:
a2a4>e4 d2g2
e2..ef g2d2
]
a2a4>e4 d2<b2>
c1r1<
r4.cc e4.de d4.efg2
r4.ff a4.ga g4.fed2
r4.cc e4.ef g4.a8b2
r4.aa>c4c.<b.a b2g4.f+f
e2g4b4 >c2<a2
>c2<a4.>c<a b2g4.f+f
e2g4b4 >c2<a2
f4.a>c d4c4< b1>
r2.r4
[2
[2
e4.ee e4e8ef g2d2
c4.cc c4c8<ba> e2<b2
:
a2a4>e4 d2g2
e2..ef g2d2
]
:
a2a4>e4 d2g2
e2..ef d1
]
a2a4>e4 d2<b2>
c1.r2<
//------------------------------------
// Track 13 :
//------------------------------------
TR(13) CH(13) P(74)
@82,110,3 v70
[8 r1]
o5 l16 q90
[2
[8 r1]
g2b4>d4 e2c2
e2c2 d2<b2
g2b4>d4 e2c2<
a2 b2 : g+2.r4
]
g+2.b4
v(MML(v)+5)
[2
>c4.cc c4c8cc d2<b2
a4.aa a4a8gf b2g2
:
f2f4>c4< b2>d2
c1 d2<b2
]
f2f4>c4< b2g2
g1 r1
v(MML(v)-5)
[16 r1]
r2
v(MML(v)+5)
[2
>c4.cc c4c8cc d2<b2
a4.aa a4a8gf b2g2
:
f2f4>c4< b2>d2
c1 d2<b2
]
f2f4>c4< b2g2
g1 r1
v(MML(v)-5)
[8 r1]
g2b4>d4 e2c2
e2c2 d2<b2
g2b4>d4 e2c2<
a2 b2 g+2.b4
r1
v(MML(v)+5)
[2
[2
>c4.cc c4c8cc d2<b2
a4.aa a4a8gf b2g2
:
f2f4>c4< b2>d2
c1 d2<b2
]
:
f2f4>c4< b2>d2
c1 <b1
]
f2f4>c4< b2g2
g1 r1
v(MML(v)-5)
//------------------------------------
// Track 14 :
//------------------------------------
TR(14) CH(14) P(64)
//------------------------------------
// Track 15 :
//------------------------------------
TR(15) CH(15) P(64)
//------------------------------------
// Track 16 :
//------------------------------------
TR(16) CH(16) P(64)