//-----------------------------------------------
// Any Memories...
// (C)Yax
//-----------------------------------------------

ResetGM();
TrackName     = {"Any Memories..."}
Copyright     = {"Yax"}

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)
}

r2
TrackSync;

Tempo=112

Key(1)



// ‘S‘Ì‚Ì’²�®
TR(1)  V(117) REV(50) CHO(30) @1,8,0
TR(2)  V(118) REV(50) CHO(30) @1,8,0
TR(3)  V(118) REV(50) CHO(30) @1,8,0
TR(4)  V(92)  REV(70) CHO(90)


//------------------------------------
// Track 1 : 
//------------------------------------
TR(1) CH(1) P(74)
l8 v96
Slur(3)

 o3 q95

 [2
  ARP(!8,!1,{eb>e<})    r-1 <e1>
  ARP(!8,!1,{f+b>f+<})  r-1 <f+1> r-4 <b4>
  ARP(!8,!1,{g>dg<})    r-1 <g1>
  ARP(!8,!1,{f+>c+f+<}) r-1 <f+1> r-2 d4<a4>
  ARP(!8,!1,{eb>e<})    r-1 <e1>
  ARP(!8,!1,{f+b>f+<})  r-1 <f+1> r-4 <b4>
  ARP(!8,!1,{g>dg<})    r-1 <g1>
  ARP(!8,!1,{a>ea<})    r-1 <a1> r-2 e2
  [2
   y64,1; cfaf4a>cf<     y64,0; r-1 f1
   y64,1; dgbg4b>d<b     y64,0; r-1 g1
   y64,1; ea>c+<a4>c+ea  y64,0; r-1 <a1>
   :
   y64,1; ea>c+<aec+<a4  y64,0; r-1 e1
  ]
  :
  y64,1; ea>c+<aec+<a4  y64,0; r-1 e1
 ]
 Tempo=100 ARP(1,!1,{<a>c+ea>e<}) Tempo=112 

[2
 v(MML(v)-15)
 [2
  e2^8<b4.> d2^8f+4.
  e2^8<b4.> d2^8a4.
  e2^8<b4.> d2^8f+4.
  g2^8d4. : f+2^8d4<a>
 ]
 f+4.ed+4<b4>

 v(MML(v)+7)
 [2
  [2
   ARP(!8,!1,{ceg})
   ARP(!8,!1,{df+a})
   ARP(!8,!1,{egb})
   :
   ARP(!8,!1,{dgb})
  ]
  :
  ARP(!8,!1,{egb})
 ]
 ARP(!8,!1,{eg+b})
 <
 [2
  y64,1; c4.g4.>c4< y64,0; y64,1; <a4.>f+4.d4 y64,0;
  y64,1; <b4.>g4.d4 y64,0; y64,1; e4.b4.ag y64,0;
  y64,1; f+4.d4.a4 y64,0; y64,1;f+4.a4.d4 y64,0;
  :
  y64,1;g4.e4.ba y64,0; y64,1;g4.e2d16d-16 y64,0;
 ]
 ARP(!8,!1^1,{eb>gb>f+<<}) r-1^1 r4 Tempo=100 r2 Tempo=90 r2 Tempo=60 r2. Tempo=112
 v(MML(v)+8)
 r1>
]
 <
 [2
  ARP(!8,!1,{eb>e<})    r-1 <e1>
  ARP(!8,!1,{f+b>f+<})  r-1 <f+1> r-4 <b4>
  ARP(!8,!1,{g>dg<})    r-1 <g1>
  ARP(!8,!1,{f+>c+f+<}) r-1 <f+1> r-2 d4<a4>
  ARP(!8,!1,{eb>e<})    r-1 <e1>
  ARP(!8,!1,{f+b>f+<})  r-1 <f+1> r-4 <b4>
  ARP(!8,!1,{g>dg<})    r-1 <g1>
  ARP(!8,!1,{a>ea<})    r-1 <a1> r-2 e2
  [2
   y64,1; cfaf4a>cf<     y64,0; r-1 f1
   y64,1; dgbg4b>d<b     y64,0; r-1 g1
   y64,1; ea>c+<a4>c+ea  y64,0; r-1 <a1>
   :
   y64,1; ea>c+<aec+<a4  y64,0; r-1 e1
  ]
  :
  y64,1; ea>c+<aec+<a4  y64,0; r-1 e1
 ]
 ARP(1,!1.,{<a>c+ea>e<}) r-1^1. Tempo=107 r4. Tempo=102 r4. Tempo=97 r2 Tempo=92 r2 Tempo=87 r2.




//------------------------------------
// Track 2 : 
//------------------------------------
TR(2) CH(2) P(64)
l8 v90

 o5 q99
 [2
  [2
   rrr'g4.<b4.e4.>' v(MML(v)-15) e4 v(MML(v)+15)
   rrr'f+^2<b4^2a^2>'
   rrr'g4.d4.<b4.>' v(MML(v)-15) d4 v(MML(v)+15)
   :
   ARP(2,!2,{df+a}) v(MML(v)-20) ARP(!48,!2,{<a>df+}) v(MML(v)+20)
  ]
  ARP(3,!2.,{ea>c+<}) v(MML(v)-20) a4 v(MML(v)+20)
  [2
   ARP(1,!1,{fa>c<})
   ARP(1,!1,{dgb})
   :
   ARP(1,!1.,{c+ea})
   v(MML(v)-10)
   ARP(0,!4,{c+ea})
   v(MML(v)+5)
   ARP(0,!4,{dgb})
   v(MML(v)+5)
  ]
  ARP(1,!1,{c+ea})
  :
  v(MML(v)-20)
  ARP(!64,!2,{a>c+ea<})
  v(MML(v)10)
  ARP(2,!2,{eab>c+<})
  v(MML(v)+10)
 ]
 v(MML(v)-20)
 ARP(!64,!1,{a>c+ea<})
 v(MML(v)+20)

[2
 v(MML(v)-13)
 [2
  r4. ARP(0,!4.,{<gb>e}) v(MML(v)-10) ARP(2,!4,{eb}) v(MML(v)+10)
  r4. ARP(0,!4.,{<a>df+}) v(MML(v)-10) ARP(2,!4,{da}) v(MML(v)+10)
  r4. ARP(0,!4.,{<gb>e}) v(MML(v)-10) ARP(2,!4,{gb}) v(MML(v)+10)
  r4. ARP(0,!4.,{<a>df+}) v(MML(v)-10) ARP(2,!4,{f+a>c<}) v(MML(v)+10)
  r4. ARP(0,!4.,{<gb>e}) v(MML(v)-10) ARP(2,!4,{eb}) v(MML(v)+10)
  r4. ARP(0,!4.,{<a>df+}) v(MML(v)-10) ARP(2,!4,{da}) v(MML(v)+10)
  r4. ARP(0,!4.,{<b>dg}) v(MML(v)-10) ARP(2,!4,{<b>gb}) v(MML(v)+10)
  :
  r4. ARP(0,!4.,{<a>df+}) v(MML(v)-10) ARP(1,!4,{f+a>cd<}) v(MML(v)+10)
 ]
 rARP(1,!4.,{ef+b}) ARP(2,!2,{d+f+b})

 v(MML(v)+6)
 [2
  [2
   y64,1; r4.ARP(0,!4,{eg})ec<g> y64,0;
   y64,1; r4.ARP(0,!4,{df+})d<a>f+ y64,0;
   y64,1; r4.ARP(0,!4,{gb})ge<b> y64,0;
   :
   y64,1; r4.ARP(0,!4,{dg})bgd y64,0;
  ]
  :
  y64,1; r4.ARP(0,!4,{gb})ge<b> y64,0;
 ]
 y64,1; rrreg+>e<bg+ y64,0;
 
 v(MML(v)-6)

 [2
  y64,1; ARP(0,!4.,{ega>c<}) cega4 y64,0; y64,1; ARP(1,!4.,{f+a>cd<}) df+a>c4< y64,0; 
  y64,1; ARP(0,!4.,{degb}) degb4 y64,0; y64,1; ARP(1,!4.,{df+gb}) f+gb>d<g y64,0;
  y64,1; ARP(0,!4.,{def+a}) <a>def+4 y64,0; y64,1; ARP(1,!4.,{cdf+a}) <a>cdf+c y64,0; 
  :
  y64,1; ARP(0,!4.,{<b>deg}) d<b>dg4 y64,0; y64,1; ARP(1,!4.,{<b>df+g}) df+abg
 ]
 ARP(!64,!1^1,{<egb>e})
 v(MML(v)+15)
 r1
]

 [2
  [2
   rrr'g4.<b4.e4.>' v(MML(v)-15) e4 v(MML(v)+15)
   rrr'f+^2<b4^2a^2>'
   rrr'g4.d4.<b4.>' v(MML(v)-15) d4 v(MML(v)+15)
   :
   ARP(2,!2,{df+a}) v(MML(v)-20) ARP(!48,!2,{<a>df+}) v(MML(v)+20)
  ]
  ARP(3,!2.,{ea>c+<}) v(MML(v)-20) a4 v(MML(v)+20)
  [2
   ARP(1,!1,{fa>c<})
   ARP(1,!1,{dgb})
   :
   ARP(1,!1.,{c+ea})
   v(MML(v)-10)
   ARP(0,!4,{c+ea})
   v(MML(v)+5)
   ARP(0,!4,{dgb})
   v(MML(v)+5)
  ]
  ARP(1,!1,{c+ea})
  :
  v(MML(v)-20)
  ARP(!64,!2,{a>c+ea<})
  v(MML(v)10)
  ARP(2,!2,{eab>c+<})
  v(MML(v)+10)
 ]
 v(MML(v)-20)
 ARP(!64,!1.,{a>c+ea<})
 v(MML(v)+20)



//------------------------------------
// Track 3 : 
//------------------------------------
TR(3) CH(3) P(54)
l8 v90

 o6 q99

 [16 r1]

 v(MML(v)-30)
 r2r>  b>d+64e16..<b ad4.r2 r4.g4.a+64b8...af+d<a^2
 rg4>e4.<b4 >c+64d4.... r2 re4a4.e4 g+64a4....r2
 v(MML(v)+10)
 c1 rrrdf+64g16..f+ed e2..<a2rrgab>
 c4.e^2 d4.g4.d4 e1 'a1e1'
 v(MML(v)+20)

 <
 v(MML(v)-15)
 r2y64,1; f+64'g16..e16..'f+ef+ y64,0;
 y64,1; 'd2.<f+2.>'<a4 y64,0;
 y64,1; 'b4.e4.'>g4.b4 y64,0;
 y64,1; g+64a16..f+dgecf+d y64,0;
 y64,1; <b4>'g4e4'b4g4 y64,0;
 y64,1; 'a4.f+4.'a f+64g16..f+ed y64,0;
 y64,1; 'e4.<b4.>' '>e4.<g4.' b4 y64,0;
 y64,1; '>d4.<a4.'>d16c+16 'c2<f+2' y64,0;

 y64,1; ra+64'b16..g16..'eg<b>e<gg+ y64,0;
 y64,1; ab>cc+64'd8...<a8...>'ef+4 y64,0;
 y64,1; 'g4.<b4.>'bgeg<b> y64,0;
 y64,1; '>d4.<f+4.' 'a4d4' b64>c16..<ba y64,0;
 y64,1; 'be'ge> d+64'e8...<g8...>'dc<b y64,0;
 y64,1; '>d2<f+2''a4.d4.'g16a16 y64,0;
 'b1g1d1'
 y64,1; b<b>ef+ ARP(!32,!2,{d+f+b}) y64,0;

 v(MML(v)+7)
 r1r2 EP.onTime(90,127,!2..) r'ad'gf+ y64,1; 'ge'<b>'bg'<b> 'af+'<b> 'ge'<b> y64,0;
 EP.onTime(90,127,!2.) 'y64,1; gd'<b>'bg'<b> 'af+'<b> 'gd'<b> y64,0; EP(127)
 'g4.e4.'v(MML(v)-10)'e4.c4.'v(MML(v)+5)f+g v(MML(v)-5) 
 'a2f+2'rv(MML(v)+10)'ad'gf+
 EP.onTime(90,127,!2.) y64,1; 'ge'<b>'bg'<b> 'af+'<b> 'ge'<b>  y64,0; EP(127)
 EP.onTime(90,127,!2.) y64,1; 'be'<b>'af+'<b> 'ge'<b> 'af+'<b> y64,0; EP(127)
 r'b4e4'v(MML(v)-10)'e4.c4.'v(MML(v)+15)'>e4<g4' v(MML(v)-5) 
 '>d^2<a^2' >v(MML(v)-8)'d<f+>'ef+ v(MML(v)+8)
 'f+<a>''g<b>'r'e2<g2>'< v(MML(v)-10)ARP(2,!2.,{egb}) v(MML(v)+10)'be'ag
 'g4.<b4.>' e4 v(MML(v)-6)ef+g v(MML(v)+6) 'ad'v(MML(v)-6)'f+4<a4>'v(MML(v)-6)'d4<f+4>'v(MML(v)+6) 'c4.<f+4.>'v(MML(v)+6)
 y64,1; v(MML(v)-18) '<be>'cd v(MML(v)+6) 'e<be>'f+gv(MML(v)+6)ev(MML(v)+6) y64,0; ARP(1,!1^8,{<g+b>eb})

 y64,1; r c'ae'c'>c<g'c'ae'c 'af+'d'>c<f+'d4'ac'gf+ y64,0;
 y64,1; 'ge'<b>'bg'<b4>'af+''ge''f+d'  'gd'<b>'bf+'<b>'ae'<bab> y64,0;
 y64,1; 'd<a>'<f+ga 'bf+'>cde 'f+<a>'>c<b'a4d4'agf+ y64,0;
 y64,1;'e<g>'<b>e<b> 'f+<b>'<b>f+<b> 'gd'<b>g<b> 'af+'<b>a<b> y64,0;
 y64,1; r'ac'eg 'ac''>c4<g4' 'b2f+2''ad'b>c4. y64,0;
 y64,1; 'd2^8<g2^8>'<b>cd 'e2<g2' 'b4.g4.'g y64,0;
 y64,1; 'ad'gf+e4>'d4<f+4>'c16<b16 a4.>c<bagf+ y64,0;
 ARP(1,!1,{<b>deg}) v(MML(v)-10) ARP(!64,!1^2,{egb>df+<}) v(MML(v)+10)
 r2

 v(MML(v)-7)
 rrrrr y64,1; 'g<b>'f+e v(MML(v)-5) 'd2.<a2.>' v(MML(v)+5) r4 y64,0;
 rrrr y64,1; f+'g<b>'f+e v(MML(v)-8)'f+4.<a4.>' v(MML(v)+8) 'a^2d^2' y64,0;
 rrr y64,1; 'be' v(MML(v)-5) agf+e v(MML(v)+5) 'f+<a>'v(MML(v)-5) def+ >c+64 v(MML(v)+5)' d16..<f+16..>'c<'be'a y64,0;
 y64,1; 'bg'<b>cd4ef+g y64,0; y64,1; 'af+'>f64f+16..e EP.onTime(127,90,!2^8) d c12<b12a12g12f+12e12 r y64,0;
 y64,1; EP.onTime(90,127,!1.)'ge'f+e 'be'ag'>c<g' ba'>d<a>'c< b>cde y64,0; EP(127)
 y64,1; 'f+d<g' v(MML(v)-10)b2 v(MML(v)+5) ab>c v(MML(v)+5) 'd<f+'v(MML(v)-10)a2.. y64,0; v(MML(v)+10)
 y64,1; v(MML(v)-8) 'be'ag v(MML(v)+8)'a4f+4' v(MML(v)-5) d v(MML(v)+5)'>d4<a4' v(MML(v)-10) 'a4.d4.' v(MML(v)+5)'f+4d4' v(MML(v)-5) def+ y64,0; v(MML(v)+10)
 'g4e4'<b>'b4e4''g<b>'aa+
 y64,1; b<b>ef+ ARP(!32,!2,{d+f+b}) y64,0;

 v(MML(v)+7)
 EP(110)y64,1; 'g4.<b4.>'f+4.e4 EP(118) 'f+4.d4.' v(MML(v)-10) df+ v(MML(v)+10) 'ad'gf+ y64,0; EP.onTime(90,127,!2.) y64,1; 'ge'<b>'bg'<b> 'af+'<b> 'ge'<b> y64,0;
 EP.onTime(90,127,!2.) 'y64,1; gd'<b>'bg'<b> 'af+'<b> 'gd'<b> y64,0; EP(127)
 'g4.e4.'v(MML(v)-10)'e4.c4.'v(MML(v)+5)f+g v(MML(v)-5) 
 'a2f+2'rv(MML(v)+10)'ad'gf+
 EP.onTime(90,127,!2.) y64,1; 'ge'<b>'bg'<b> 'af+'<b> 'ge'<b>  y64,0; EP(127)
 EP.onTime(90,127,!2.) y64,1; 'be'<b>'af+'<b> 'ge'<b> 'af+'<b> y64,0; EP(127)
 r'b4e4'v(MML(v)-10)'e4.c4.'v(MML(v)+15)'>e4<g4' v(MML(v)-5) 
 '>d^2<a^2' >v(MML(v)-8)'d<f+>'ef+ v(MML(v)+8)
 'f+<a>''g<b>'r'e2<g2>'< v(MML(v)-10)ARP(2,!2.,{egb}) v(MML(v)+10)'be'ag
 'g4.<b4.>' e4 v(MML(v)-6)ef+g v(MML(v)+6) 'ad'v(MML(v)-6)'f+4<a4>'v(MML(v)-6)'d4<f+4>'v(MML(v)+6) 'c4.<f+4.>'v(MML(v)+6) y64,1; v(MML(v)-18) '<be>'cd v(MML(v)+6) 'e<be>'f+gv(MML(v)+6)ev(MML(v)+6) y64,0; ARP(1,!1^8,{<g+b>eb})

 v(MML(v)+8)
 y64,1; r'ae'>ce aec12<a12e12 f+4.ga12g12f+12b12a12g12 y64,0;
 y64,1; r'g4d4''>d4<g4'eb12a12g12 'f+<a>''d4<a4>''e4<b4>'agf+ y64,0;
 y64,1; l12 EP.onTime(90,127,!2.)gf+e agf+ bag f+>ed EP(127) l8 c<bab >cde12f+12g12 y64,0;
 EP.onTime(84,105,!1)
 [2 'b8v(MML(v)-10)e8v(MML(v)+10)'] [3 'b12v(MML(v)-10)e12v(MML(v)+10)'] 
 [4 'b16v(MML(v)-10)e16v(MML(v)+10)'] [6 'b24v(MML(v)-10)e24v(MML(v)+10)']
 EP.onTime(104,70,!1)
 [6 'b24v(MML(v)-10)d24v(MML(v)+10)'] [4 'b16v(MML(v)-10)d16v(MML(v)+10)'] 
 [3 'b12v(MML(v)-10)d12v(MML(v)+10)'] [2 'b8v(MML(v)-10)d8v(MML(v)+10)']
 < EP(127)
 y64,1; r'ac'e12f+12g12 'ac''>c4<g4' 'b4.f+4.' EP.onTime(90,127,!2.) l12af+a>'a<a>'gf+ 'e<a>'dc y64,0; l8 EP(127)
 y64,1; 'd2^8<g2^8>'<b>c12c+12d12 'e2<g2' 'b4.g4.'g y64,0;
 y64,1; 'ad'gf+e4>'d4<f+4>'c16<b16 a4.>c<b12a12g12a12g12f+12 y64,0;
 ARP(1,!1,{<b>deg}) v(MML(v)-10) ARP(!64,!1^2,{egb>df+<}) v(MML(v)+10)
 r2

 EP(118)
 y64,1; rf+g>d4<g4.^1 r2^8 f+ga f+1 y64,0;
 y64,1; rf+g>d4<g4.^1 r2^8 bag f+c+2.. y64,0
 y64,1; c4.a4.>c4<be4g4.b4 a2..>c+^1< y64,0;
 y64,1; f4.c4.a4 be4g4.b4 a2..'>c+^1<e^1' y64,0;

 y64,1; rf+g>d4<g4.^1 r-1 v(MML(v)-15) >rf+g>d4<g4.< v(MML(v)+15) r2^8 f+ga f+1 y64,0;
 y64,1; rf+g>d4<g4.^1 r-1 v(MML(v)-15) >rf+g>d4<g4.< v(MML(v)+15) r2^8 bag f+c+2.. y64,0
 y64,1; c4.a4.>c4<be4g4.b4 a2..>c+^1< y64,0;
 y64,1; f4.c4.a4 be4g4.b4 a1 y64,0;
 ARP(!64,!1,{ea>c+})
 >
 Tempo=54
 r2.
 Tempo=94
 
 EP(90) v(MML(v)-18)
 egbegb df+adf+a c+f+ac+f+a cegceg r-1  EP.onTime(90,0,!1^1^1^1^1^1^2..) r1
 [2
  egbegb df+adf+a c+f+ac+f+a cegceg r-1^1^1 < gb>e<gb>e< f+a>d<f+a>d< f+a>c+<f+a>c+< eg>c<eg>c
 ]
 r2
 Tempo=112


//------------------------------------
// Track 4 : 
//------------------------------------
TR(4) CH(4) P(64)
@51 l8 v40
M.onNoteWave(0,100,!1^1)

  o6 q99
  EP.onNoteWave(80,127,!1)
  [2
   b1^1^1^2..b-16a16
   g1a1b1>c+1<
   '>c1<a1' 'b1g1' 'a1^1e1^1'
   '>c1<a1' 'b1g1' 'a1^1>c+1^1<'
  ]

 [2
  [16 r1]
  EP.onNoteWave(80,127,!1)
  e1f+2..e16f+16 g1^1 r-1 b1
  'g1e1' 'f+1d1' 'e1^1<b1^1>' r-1 b1
  g1a2>d4.c+16c16<b1^2^8e4. r-1 g1
  b1f+1 e1 r-2 g2 'b1g+1e1'

  [2
   EP(127)
   a1^1 r-1^1 '>c1<e1' 'f+1d1'
   b1^1 r-1^1 'g1e1' 'f+1d1'
   a1^1 r-1^1 'f+1e1' 'f+1d1'
   :
   b1^1 r-1^1 'g1e1' 'f+1d1'
  ]
  EP(110)
  'g1e1d1<b1>'
  EP.onTime(30,127,!1^2)
  ARP(1,!1^1,{dgb>ef+<})
  r-2
  r4 EP.onTime(127,30,!4)r4
 ]

 EP.onNoteWave(80,127,!1)
 [2
  b1^1^1^2..b-16a16
  g1a1b1>c+1<
  '>c1<a1' 'b1g1' 'a1^1e1^1'
  :
  '>c1<a1' 'b1g1' 'a1^1>c+1^1<'
 ]
 '>c1<a1' '>d1<b1' '>e1^1c+1^1<'