//	B.G.M. for the “X“à

CuePoint={"TwmDlsUrl(http://pmr.ueuo.com/dls/hat.dls)"}
CuePoint={"TwmDlsUrl(http://pmr.ueuo.com/dls/galaxy.dls)"}
CuePoint={"TwmDlsUrl(http://pmr.ueuo.com/dls/kick.dls)"}

STR EFFECT		=	OFF;	//ON or OFF
INT KeyS		=	0;	//KeyChange

INT EST=137PlayFrom.SysEx=1PlayFrom.CtrlChg=1PlayFrom.RPN_NRPN=1TrackName={"Native Inageyan Machoman"}Copyright={Cyberhippie}System.MeasureShift=3Tempo=1000Include(delay.h)ResetGS;
FUNCTION WIN(X1,X2,X3,XA,XB,X4,X5,X6,X7,X8,X9,XC){TR=X1;DL(0)CH=X2;@(X3,XA,XB)TrackKey=X4;P=X5;CHO=X6*10REV=X7*10v=(X8)q=(X9*10)M=(XC*10)}
FUNCTION DL(ti){Time(ti:1:0)}FUNCTION PAN(ER1,ER2){If(ER2==0){P.T(0,127,ER1)}If(ER2==1){P.T(127,0,ER1)}}FUNCTION GSRY(_D){INT _TCH=Channel;INT _CH;If(_TCH==10){_CH=$00;}Else{If(_TCH<10){_CH=_TCH;}Else{_CH=_TCH-1}}_CH=$10+_CH;SysEx=$F0,$41,(DeviceNumber),$42,$12,{$40,(_CH),$15,(_D)},$F7;}
FUNCTION HAM(STR SA){Sub{Key=12SA;Key=0}SA}FUNCTION HAM2(STR SA){Sub{Key=-12SA;Key=0}SA}FUNCTION HAM3(STR SA){Sub{Key=-12SA;Key=0}Sub{Key=12SA;Key=0}SA}FUNCTION REC(FF=127){EP.T(FF,0,!1^1^1^1^1^1)}FUNCTION REC2(FF=100){V.T(FF,0,!1^1^1^1^1^1)}FUNCTION IP(DW=1){DL(-2)GSRY(DW)r8}INT K=KeyS;DL=0Tempo=EST;
Function MD(Str S,Int Repeat, Int Delay){Int Temp_v=MML(v);Int Dly=Delay;Int Dec_v=Temp_v/(Repeat+2);Int J=Temp_v+35;J=J-(Dec_v*2);v(J);For(Int I=1;I<=Repeat;I++){Sub{r%(Dly)v(J)S}Dly=Dly+Delay;J=J-Dec_v;}v(Temp_v)S}
//-(TR,CH,@  ,2 ,3,K, P ,C,R, v ,q ,M)---(TR,CH,@  ,2 ,3,K, P ,C,R, v ,q ,M)---(TR,CH,@  ,2 ,3,K, P ,C,R, v ,q ,M)
WIN(01,01,012,00,0,K,074,0,0,127,09,0)WIN(07,07,039,08,0,K,096,0,0,100,10,0)WIN(13,13,119,00,0,0,064,0,0,127,10,0)
WIN(02,02,100,00,0,K,000,0,0,060,10,0)WIN(08,08,012,00,0,K,080,0,0,070,09,2)WIN(14,14,082,01,0,K,100,0,0,127,10,0)
WIN(03,03,091,00,0,K,070,0,0,080,10,0)WIN(09,09,012,00,0,K,050,0,0,100,09,2)WIN(15,15,003,00,0,K,010,0,0,127,10,0)
WIN(04,04,089,00,0,K,127,0,0,060,10,0)WIN(10,10,025,00,0,0,064,0,0,127,10,0)WIN(16,16,091,00,0,K,117,0,0,127,10,0)
WIN(05,05,035,00,0,K,032,2,0,060,10,0)WIN(11,11,025,00,0,0,064,0,0,127,09,0)//--Light source ver1.7--//
WIN(06,06,039,01,0,K,096,1,0,060,10,0)WIN(12,12,026,00,0,0,064,0,0,127,09,0)TR=10IP;TR=11IP=2TR=12IP=3TR=13IP=4
INT HZ0=1INT HAZ=17INT ST0=33INT ST1=49INT ST2=65INT BGN=81INT ST3=97INT HZ1=113INT HZ2=129INT HZ3=145INT BN2=161INT ST4=177INT BN3=193INT ST5=209INT END=225
/*1*/STR MN={CHO.W(10,127,!1,127,10,!1)REV.W(20,100,!1,100,20,!1)}
STR MNH={@66,90,1l24v=100;>HAM({[MN;MidiDelay({EP=70"c^"d#"g^EP=50'gd#c'},12,!4)[42r]MN;MidiDelay({EP=70"a#^df^EP=60'a#"a#'},12,!4)[42r]]})
HAM({[MN@35,90,1MidiDelay({EP=70"c^"d#"g^EP=50'gd#c'},12,!4)[42r]MN@35,0,0MidiDelay({EP=70"a#^df^'a#fd'},12,!4)[42r]]})<M=0}
STR MNI={@82,110,2Reverb=50CHO=60[8c^"g`c^"ga#^d#f^dc^"g`c^"ga#^fg^d#]}
STR MNJ={@82,110,2Reverb=50CHO=60v=80[48r][6c^"g`c^"ga#^d#f^dc^"g`c^"ga#^fg^d#]}
STR MNK={@82,110,2Reverb.T(50,127,!1^1^1^1^1^1^1^1)CHO=60v.T(80,60,!1^1^1^1^1^1^1^1)[8c^"g`c^"ga#^d#f^d:c^"g`c^"ga#^fg^d#]}
STR MN1={@82,110,2Reverb=50CHO=60v=127l24EP=50[[c^"g#g#^"g#d#^"g#g^`cc^"g#"a#^"g#d#^"gg#^`c]:
["a#^"gg^"gd^"gd#^a#"a#^"g"g#^"g"a#^"gg^a#]]"a#^"ff^"fc^"fc^a#"a#^"fc^"f"a#^"ff^a#;d#^"g"a#^"gg^"ga#^"g`c^"g`d^g`f^g`g^g}
STR MN2={@82,110,2Reverb=50CHO=60v.T(127,0,!1^1^1^1^1^1^1^1)l24EP=50[[c^"g#g#^"g#d#^"g#g^`cc^"g#"a#^"g#d#^"gg#^`c]:
["a#^"gg^"gd^"gd#^a#"a#^"g"g#^"g"a#^"gg^a#]]"a#^"ff^"fc^"fc^a#"a#^"fc^"f"a#^"ff^a#;d#^"g"a#^"gg^"ga#^"g`c^"g`d^g`f^g`g^g}
STR MN3={@66,90,1EP.T(0,90,!1^1^1^1^1^1^1^1)CHO=50REV=0BR=24q=100
[7l24c^^crdd#^d#c&&^^g^^c^cd#^d#crccc^crdd#^d#c&&^^g^gcccd#^d#crc]
c^^crdd#^d#REV=80c&&^^REV=10`g^^`d#^`d#`d#^`d#`g^^REV=50
>d#^d#ggga#^a#a#^&&`dMidiDelay({`d#^`d#`gr`g`fr`f`d^^},12,!2)<q=90}
STR MN4={>@66,90,1EP=90CHO=100REV=80BR=24l16[10r]l24"a#&&`d`d#MidiDelay({`d^`ca#^g},24,!4)l16<}
STR MN5={@66,90,1EP.T(20,90,!1^1)CHO=50REV=0BR=24q=100[3l24c^^crdd#^d#c&&^^g^^c^cd#^d#crccc^crdd#^d#c&&^^g^gcccd#^d#crc]
c^^crdd#^d#REV=80c&&^^REV=10`g^^`d#^`d#`d#^`d#`g^^REV=50
>d#^d#ggga#^a#a#^&&`dMidiDelay({`d#^`d#`gr`g`fr`f`d^^},4,!2)<q=90}
STR MN6={@82,110,2Reverb=50CHO=60v=70;>[22c^"g`c^"ga#^d#f^dc^"g`c^"ga#^fg^d#]
v.T(70,0,!1^1^1^1^1^1^1^1)REV.T(50,127,!1^1^1^1^1^1^1^1)[8c^"g`c^"ga#^d#f^dc^"g`c^"ga#^fg^d#]<}
TR=1DL=HZ0;MNH;DL=HAZ;DL=HAZ+8v.T(50,90,!1^1^1^1^1^1^1^1)MNI>v=80[MNI]
MNJ[MNI]MNK<DL=BGN;MN1>MN1>MN2<<DL=HZ1;MN;HAM2({MNH})DL=HZ2+8MN3;
DL=ST4-1MN4;DL=ST4+8MN5;DL=BN3+2MN6;
IF(EFFECT=="ON"){
TR=1DL=HZ0;CuePoint={"TwmParam(30,127,64,127)"}CuePoint={"TwmChorus(1,64,50,79,14,114,3)"}DL=HAZ;CuePoint={"TwmParam(127,117,0,127)"}
DL=ST1;CuePoint={"TwmChorus(1,64,127,110,0,0,0)"}CuePoint={"TwmParam(5,127,127,127)"}
DL=ST1+2CuePoint={"TwmParam(127,117,20,127)"}CuePoint={"TwmChorus(1,64,50,79,14,114,3)"}
DL=ST1+8CuePoint={"TwmChorus(1,64,127,10,0,0,0)"}CuePoint={"TwmParam(127,127,127,127)"}
DL=ST1+10CuePoint={"TwmParam(127,117,40,127)"}CuePoint={"TwmChorus(1,64,50,79,14,114,3)"}
DL=ST2;CuePoint={"TwmParam(127,120,60,127)"}CuePoint={"TwmChorus(1,64,50,90,14,114,3)"}
DL=ST2+8CuePoint={"TwmParam(127,120,80,127)"}CuePoint={"TwmChorus(1,64,50,79,14,114,3)"}
DL=BGN;CuePoint={"TwmChorus(1,64,127,32,0,0,0)"}CuePoint={"TwmParam(127,120,60,127)"}
DL=HZ1;CuePoint={"TwmParam(127,127,127,127)"}DL=HZ2-4CuePoint={"TwmParam(40,127,127,127)"}
DL=HZ2-2CuePoint={"TwmChorus(1,64,127,25,127,127,0)"}CuePoint={"TwmParam(10,127,127,127)"}
DL=HZ2;CuePoint={"TwmChorus(1,64,50,79,14,114,3)"}CuePoint={"TwmParam(70,127,127,127)"}
DL=BN2-4CuePoint={"TwmParam(127,117,40,127)"}CuePoint={"TwmChorus(1,64,50,79,14,114,3)"}
DL=ST4-2CuePoint={"TwmParam(127,127,127,127)"}CuePoint={"TwmChorus(1,64,127,5,127,127,0)"}
DL=ST4;CuePoint={"TwmParam(127,117,40,127)"}CuePoint={"TwmChorus(1,64,50,79,14,114,3)"}DL=BN3-6CuePoint={"TwmParam(127,127,100,127)"}
DL=BN3;CuePoint={"TwmParam(127,117,50,127)"}CuePoint={"TwmChorus(1,64,127,100,127,127,0)"}
DL=ST5+8CuePoint={"TwmParam(50,127,80,127)"}DL=END;CuePoint={"TwmParam(127,127,127,127)"}
INT VLM=104TR=10V=VLM;}
/*2&3&4*/STR RTH={If(CH==2){>@19,110,0EP=90CHO.W(0,100,!1,100,0,!1)}
If(CH==3){/*@82,110,0@82,110,2*/@4,110,0EP=127CHO=70}
If(CH==4){@82,110,0EP=90CHO.W(0,100,!1,100,0,!1)}
v.T(20,40,!1^1^1^1^1^1^1^1)l2'gd#c'^^^'fd#"a#'^^^'d#c"g#'^^^'fc"g'^'gd#"g'^If(CH==2){<}}
STR RT1={If(CH==2){>>EP.W(60,100,!1,100,70,!1)@19,110,0CHO.W(0,100,!1,100,0,!1)}
If(CH==3){/*@82,110,0@82,110,2*/@4,110,0EP=110CHO=70}
If(CH==4){@82,110,0EP.W(60,100,!1,100,70,!1)CHO.W(0,100,!1,100,0,!1)}
v=50REV=30l2['gd#c'^^^'fd#"a#'^^^'d#c"g#'^^^'fc"g'^'gd#"g'^]If(CH==2){<<}}
STR RT2={If(CH!=3){P=64BR=32If(CH==2){@39,8EP.T(10,127,!1^1)p%=100v=80}Else{@82,110,0p%=-100v=50}
q.T(0,100,!1^1)CHO.T(0,127,!1^1)REV.T(127,0,!1^1)l16[32'g#d#c']v=60}If(CH==2){P=0}If(CH==4){P=127}p%=0}
STR RT2A={If(CH!=3){P=64BR=12If(CH==2){@39,8EP.T(10,127,!1^1)p%=100v=70}Else{@82,110,0p%=-100v=40}
q.T(0,100,!1^1)CHO.T(0,127,!1^1)REV.T(127,0,!1^1)l16[32'`cgd#c"g"d#"c']v=60}If(CH==2){P=0}If(CH==4){P=127}p%=0}
STR RT3={If(CH==2){@31,91,0P=64EP.T(10,127,!1^1)v=60q.T(0,100,!1^1)CHO.T(0,127,!1^1)REV=30l16[32'g#d#']v=60P=0}}
STR RT4={If(CH==3){@19,110,0EP.T(90,0,!1^1^1^1^1)BR=32REV=127p.T(127,64,!1^1^1^1^1)CHO.T(30,127,!1^1^1^1^1)l1'>gd#c<'^^^^rp%=0}}
STR RT5={If(CH==2){>>EP.W(60,90,!1^1^1^1^1^1^1,90,0,!1^1^1^1^1^1^1)@19,110,0CHO.W(0,100,!1,100,0,!1)}
If(CH==3){/*@82,110,0@82,110,2*/@4,110,0EP.W(110,110,!1^1^1^1^1^1^1^1,110,0,!1^1^1^1^1^1^1^1)CHO=70}
If(CH==4){@82,110,0EP.W(60,100,!1^1^1^1^1^1^1^1,100,0,!1^1^1^1^1^1^1^1)CHO.W(0,100,!1,100,0,!1)}
v=50REV=30l1'`cgd#c'^^^^^^^^^^^^^^If(CH==2){<<}}
STR RT6={If(CH==3){l4rrrr@55,110,8[6rEP.W(5,110,!1^2)'c"g"d#'^^^^^^EP=0rEP.W(5,110,!1^2)'"a#"f"d'^^^^^^EP=0]}
If(CH==2){P=44@1,0,0EP=100v=110REV=10CHO=20q=150l32[29r]
SUB{rrr"a#^^^^^^^}SUB{rr"g^^^^^^^^}SUB{r"d#^^^^^^^^^}"c^^^^^^^^^^
l4'c"g"d#'^^^^^^l4EP=127""gEP=90SUB{l32rd^^^^^^^^^^^^^}l4'"a#"fc'^^^^^^
[6EP=127""g#EP=90'c"g"d#'^^^^^^EP=127""gEP=90'"a#"f"d'^^^^^^]
<EP.onCycle(!4,127,90)"f'fc"g#'"g'gd"a#'"g#'g#d#c'"a#'a#fd'EP=127l8"g^^"g'gd"a#'^'fd"a#'^l48y64=127"g"a#dl8g^^^^ry64=0l8>
v=60P=0}
If(CH==4){P=84l1[16r]@1,0,0q=150REV=10CHO=20v=110l24[18r]>EP=100a#g#gfd#dl16EP=110
c^^dd#^^cg^c^d#rg^;c^^dd#^^cgrd#rEP=100'a#f'^^^;EP=110"a#^^cd^^"a#dr"a#rdra#r
EP=100SUB{d#^^d#"g^"ggrgfrd#d#cr}c^^cc^cd#rd#drcc"grREV.T(10,50,!1^1^1^1)
[[l24EP.T(110,70,!6)'c"g#'[5'c"g#']]EP=100:SUB{"g#^"g#^c^d#^"g^"a#^}d#^c^d#^g^c^g^]
SUB{d#^f^g^f^d^"a#^}c^d^d#^d^c^"g^;l32EP=110a#^^g^^a#^g#^^d#^^g^f^^d^^f^d#^^c^^a#^
l24`ca#gfd#c;/*a#g#gfd"a#*/a#gfd"a#"f;MidiDelay({gd#c"g"d#"c;d#c"g"d#"c""g},12,!2)[96r]<P=127}}
STR RT7={If(CH==3){<<l16[16r]@35,90,1v=100REV=0EP=127q=100l16c^rrrr[27EP=110"g^EP=127c^rrrr]>>v=80}
If(CH==2){l16[16r]@3,0,0P=44@1,0,0EP=127v=107REV=20CHO=40q=90l24
[[[3EP=127"c^rr"c^rrEP.T(90,110,!6)"c^^"c]:"c^"d#"g^"a#c^"g"d#^^]EP=127"g^^^^"g"g^"a#^^"g]
[[3EP=127"d#^rr"d#^rrEP.T(90,110,!6)"d#^^"d#]:"c^"d#"g^"a#c^"g"d#^^]EP=127"g^^^^"g"g^"a#^^"g
[EP=127"c^rr"c^rrEP.T(90,110,!6)"c^^"c]l24"c#^^^"d^"e^^^"d#^"b^^^"b^"a#^^^"a#^
<EP=127l8"g^^"g'gd"a#'^'fd"a#'^'"g"bdg'^^^^rl8>}
If(CH==4){l16@3,0,0P=84REV=10CHO=20q=100[10r]l24EP=127`d^`d#`d^`ca#^gl16EP=110v=90
['`cgd#c'^^EP=100'`cgd#c'rrrEP=110:l32ry64=127DIV{cd#g}`c^^^^^l16y64=0EP=100'`cgd#c'rrrrEP=110]rl24'`cgd#c'^^'`g`d#'^'`g`d#''`g`d#'rr'`d#a#'rrl16
[3'`cgd#c'^^EP=100'`cgd#c'rrrrEP=110]l24'`cgd#c'^^EP=127`d^`d#`d^`ca#^gl16EP=110
['`cgd#c'^^EP=100'`cgd#c'rrrEP=110:l32ry64=127DIV{cd#g}`c^^^^^l16y64=0EP=100'`cgd#c'rrrrEP=110]rl24'`cgd#c'^EP=127ga#^ga#^gf^dl16EP=110
[3'`cgd#c'^^EP=100'`cgd#c'rrrrEP=110]l24EP=127SUB{a#^^^a#^^^a#^^a#}`d^^^`d^^^`d#^^`fl16EP=110
['`cg`d#c'^^EP=100'`cg`d#c'rrrEP=110:l32ry64=127DIV{cg`c}`d#^^^^^l16y64=0EP=100'`cg`d#c'rrrrEP=110]rl24'`cg`d#c'^^'`g`d#'^'`g`d#''`g`d#'rr'`d#a#'rrl16
[3'`cg`d#c'^^EP=100'`cg`d#c'rrrrEP=110]l24'`cg`d#c'^^EP=127`g^g`f^`d#`d^a#EP=110l16
['`cg`d#c'^^EP=100'`cg`d#c'rrrrEP=110]ll24EP=127SUB{`c#^^^`c#^`c^^^`c^b^^^b^a#^^^a#^}`f^^^`f^`e^^^`e^`d#^^^`d#^`d^^^`d^
>EP=110l8'gd"a#'^^'gd"a#''gd"a#'^'fc#"a#'^
y64=127SUB{>l16rrrDIV{"g"g#"a#}"brrDIV{cc#d}d#rrrDIV{ff#gg#}DIV{g#`g#`g`f#}DIV{`fba#}a^^<}l8'"g"a#dg'rrrrry64=0l8<
}}
STR RT8={If(CH==3){<<l16@35,90,1v=100REV=0EP=127q=100l16c^rrrr[11EP=110"g^EP=127c^rrrr]
[3EP=110"g^EP=127c^rrrr>EP=110""g^EP=127"a#^rrrrEP=110""g^EP=127"g#^rrrrEP=110""g^EP=127"g^rrrr<]
[4EP=110"g^EP=127f^rrrr][4EP=110c^EP=127g^rrrr]
>>v=80}
If(CH==2){l16@3,0,0P=44@1,0,0EP=127v=107REV=20CHO=40q=90l24
[[3EP=127"d#^rr"d#^rrEP.T(90,110,!6)"d#^^"d#]:"c^"d#"g^"a#c^"g"d#^^]EP=127"g^^^^"g"g^"a#^^"g
[[3EP=127"c^rr"c^rrEP.T(90,110,!6)"c^^"c]:"c^"d#"g^"a#c^"g"d#^^]EP=127"g^^^^"g"g^"a#^^"g
l16"c^^^l4EP=110'"c"d#"gc'^^^^^^^>}
If(CH==4){l16@3,0,0P=84REV=10CHO=20q=100l16EP=110v=90
['`cg`d#c'^^EP=100'`cg`d#c'rrrEP=110:l32ry64=127DIV{cg`c}`d#^^^^^l16y64=0EP=100'`cg`d#c'rrrrEP=110]rl24'`cg`d#c'^^'`g`d#'^'`g`d#''`g`d#'rr'`d#a#'rrl16
[3'`cg`d#c'^^EP=100'`cg`d#c'rrrrEP=110]l24EP=127`g`f`d#`d`ca#g#gfd"a#"gEP=110l16
['`cg`d#c'^^EP=100'`cg`d#c'rrrrEP=110]['g`c`d#`g'^^EP=100'g`c`d#`g'rrrrEP=110]
'`d#`ca#g'^^EP=100'`d#`ca#g'rrrEP=110l32ry64=127DIV{ga#`c}`d#^^^^^l16y64=0EP=100'`d#`ca#g'rrrrEP=110
['`cg`d#c'^^EP=100'`cg`d#c'rrrrEP=110]l12>EP=127`cgd#a#fdgd#cd"a#"gl24EP=110'fc"g#'^^^^'fc"g#''fc"g#'^^'fc"g#'^^'gd"a#'^^^^^v=110q=150
@1,0,0EP=110a#g#gfd#dl16EP=110"a#^^cd^^"a#dr"a#rdra#rEP=100SUB{d#^^d#"g^"ggrgfrd#d#cr}c^^cc^cd#rd#drcc"grREV.T(10,50,!1^1^1^1)
[[l24EP.T(110,70,!6)'c"g#'[5'c"g#']]EP=100:SUB{"g#^"g#^c^d#^"g^"a#^}d#^c^d#^g^c^g^]
SUB{d#^f^g^f^d^"a#^}c^d^d#^d^c^"g^;l32EP=110a#^^g^^a#^g#^^d#^^g^f^^d^^f^d#^^c^^a#^
l24`ca#gfd#c;/*a#g#gfd"a#*/a#gfd"a#"f;MidiDelay({gd#c"g"d#"c;d#c"g"d#"c""g},6,!2)[96r]<P=127
}}
STR RT9={If(CH==2){@31,90,0v=60EP=80CHO=80REV=0;>>>>l8[4f^EP.T(30,80,!4)Div{fff}ff^^^f^EP.T(30,80,!4)Div{fff}ff^e^]<<<<}
If(CH==3){@19,110,0v=60EP.T(90,0,!1^1^1^1^1)BR=32REV=127p.T(127,64,!1^1^1^1^1)CHO.T(30,127,!1^1^1^1^1)l1'>gd#c<'^^^^rp%=0}}
STR RRZ={l2DL=HZ0+8RTH;}STR RRF={DL=ST1;RT2;DL=ST1+8RT3;DL=ST2+8RT4;DL=BGN[RT1]RT5;DL=HZ2-1RT6;DL=BN2-1RT7;DL=ST4;RT8;DL=ST5+8;RT9;DL=END;RT2A;}
TR=2RRZ;RRF;TR=3RRZ;HAM2({RRF})TR=4RRZ;RRF;
/*5&6*/STR BSA={q=80BR=3If(CH==5){@82,110,0CHO=60p%=100}Else{@82,1,0@88,0,0CHO=90p%=-100}}
STR BSP={If(CH==5){P=32}Else{P=96}}
STR BSP2={If(CH==5){P.onCycle(!16,32,107,107,20,20,20,32,32)}Else{P.onCycle(!16,96,20,20,107,107,107,96,96)}}
STR BSH={l16BSA;EP=110[16MidiDelay({cc^c^^ccc^^c^^cc},4,!16)]}
STR BSI={l4q=100BR=24EP=100`g#^^^^^^&&"g#l16EP=115BSA[6MidiDelay({cc^c^^ccc^^c^^cc},4,!16)]
[MidiDelay({"g#g#^g#^^g#^},4,!16)"g#g#^g#^^^^][6MidiDelay({cc^c^^ccc^^c^^cc},4,!16)]}
STR BS1={l16BSA;EP=115[[MidiDelay({"g#g#^g#^^g#^},4,!16)"g#g#^g#^^^^][MidiDelay({"gg^g^^g^},4,!16)"gg^g^^^^]]
[MidiDelay({"g#g#^g#^^g#^},4,!16)"g#g#^g#^^^^][MidiDelay({"gg^g^^g^},4,!16)"gg^g^^^^]
[MidiDelay({"ff^f^^f^},4,!16)"ff^f^^^^]MidiDelay({"dd^d^^d^},4,!16)"dd^d^^^^MidiDelay({"gg^g^^g^},4,!16)"gg^g^^^^}
STR BS1A={l16BSA;EP=115[[4"g#g#^g#^^g#^][4"gg^g^^g^]][4"g#g#^g#^^g#^][4"gg^g^^g^][4"ff^f^^f^]>["dd^d^^d^]<["gg^g^^g^]}
STR BS2={l16BSA;EP=110[[MidiDelay({"g#g#^g#^^g#^},4,!16)"g#g#^g#^^^^][MidiDelay({"gg^g^^g^},4,!16)"gg^g^^^^]]
[MidiDelay({"g#g#^g#^^g#^},4,!16)"g#g#^g#^^^^][MidiDelay({"gg^g^^g^},4,!16)"gg^g^^^^]
[MidiDelay({"ff^f^^f^},4,!16)"ff^f^^^^]MidiDelay({"dd^d^^d^},4,!16)"dd^d^^^^MidiDelay({"gg^g^^g^},4,!16)rrrrrrrr}
STR BS3={l16BSA>EP=120["cc"c^"g"d#"g"c^^c"c^"g"d#"g]<[30MidiDelay({cc^c^^ccc^^c^^cc},4,!16)]}
STR BASS={l8<<DL=HAZ;BSP2[BSH]BSI;BS2;DL=BGN;BS1;BS1A;BSH;DL=BN3;BSP2;BS3;}TR=5@35,90,1BASS;TR=6@82,1BASS;
/*7*/STR HTH={l24@78,0,0EP=60CHO=127M=127[[39r]MidiDelay({g^`g#`g^`d#c^g},8,!4):[39r]MidiDelay({`d`d^g^"g`f^`g},8,!4)][33r]MidiDelay({`d^"g`f^"g`g^"g``d^"g``g^"g},8,!4)
EP=50[[39r]HAM({MidiDelay({g^`g#`g^`d#c^g},8,!4)}):[39r]HAM({MidiDelay({`d`d^g^"g`f^`g},8,!4)})][33r]
REV.T(30,60,!1,60,127,!1^1^1^1)HAM2({MidiDelay({`d^"g`f^"g`g^"g``d^"g``g^"g},24,!6)})}
STR HTI={EP=40M=0@77,0,0CHO=30REV=80l16>>[8``c^fgfgd#^fgf^a#^`f^]<<}
STR HTJ={EP=50M=0@49,90,1CHO=80REV=50l16[32r]>>[14`c^fgfgd#^fgf^a#^f^]<<}
STR HTK={EP=50M=0@49,90,1CHO=80REV=50l16>>[8`c^fgfgd#^fgf^a#^f^]<<}
STR HTL={EP=40M=0@77,0,0CHO=30REV=80l16>>[8``c^fgfgd#^fgf^:a#^`f^]rrrr<<}
STR HT1={EP=75M=0@49,90,1CHO=50REV=0l4>[30r]P.T(0,127,!1^1,127,0,!1^1,0,127,!1^1,127,0,!1^1,0,127,!1^1,127,0,!1^1,0,127,!1^1,127,0,!1^1)
[a#g#g^^^^^^^f^^^a#^f^d#^^^^^^^:f^^^g^]c^^^d^<}
STR HT2={M.W(0,50,!1^1)REV.W(0,127,!1^1)CHO.W(50,127,!1^1)EP=70@78,0,0l4>a#g#g^^^^^^^f^^^a#^f^d#^^^^^^^f^^^
l24g^^^^^^^^P.onCycle(!8,10,40,110,80,20,100,30,110)<REV=0CHO=127M=127SUB{[10rr"g]}HAM2({MidiDelay({`d^r`f^r`g^r``d^r``g^r},48,!6)})}
STR HT3={M.W(0,100,!1)@78,0,0CHO=127REV=80l8q=150EP.T(10,75,!1)c^^^^^^^^l24BR=24`d#^"g`d^"g`c^"ga#^"gg^"ga#^"g`c^"g
l4EP.T(75,80,!1,80,0,!1)a#^^^^^^^q=100}
STR HT4={@77,0,0l24EP=70REV=127CHO=127MidiDelay({`c^"d#g^"d#d#^"d#},20,!4)}
STR HT5={M.W(0,100,!1)@78,0,0CHO=127REV=80l8q=150EP.T(10,60,!1)c^^^^^^^^l24BR=24`d#^"g`d^"g`c^"ga#^"gg^"ga#^"g`c^"g
l8a#^^^^^^^q=100`d#^`c^`d^`d#^`f^^^^^^^`g^^REV=0CHO=127M=127l24P.onCycle(!8,10,40,110,80,20,100,30,110)
SUB{[10rr"g]}HAM2({MidiDelay({`d^r`f^r`g^r``d^r``g^r},48,!6)})}
STR HT6={EP=40M=0@77,0,0CHO=30REV=80l16>>[8`c^fgfgd#^fgf^a#^f^]EP=50M=0@49,90,1CHO=80REV=50[8`c^fgfgd#^fgf^a#^f^]<<}
TR=7DL=HZ0;l8>P.onCycle(!8,10,40,110,80,20,100,30,110)HTH;DL=ST0+8HTI;HTJ;HTK;HTL;DL=BGN;HT1;
P.T(0,127,!1^1,127,0,!1^1,0,127,!1^1,127,0,!1^1)HT2;DL=HZ3+8HT3;DL=BN2+8HT4;DL=ST4+10HT5;DL=BN3+8HT6;
/*8*/STR UL1={l16>>@37,110,1TrackKey=(K+3)EP=40q=10'e"g'[16SUB{g"g^g"gg"g^g"g^g"gg}`ee^`ee`ee^`ee^`ee`e:'"ge'^]'"ge'<<}
TR=8DL=HAZ;HAM2({[3UL1]})DL=BGN;HAM2({[UL1]})/*9*/STR GC={c"g"d#}STR GH={c"g#"d#}STR GI={"a#"f"d#}STR DH={c"f"a}STR DI={d"g"d}STR DM={`d#`cg}
STR KRH={@5,8EP=45CHO=100[16rr'GC'^r'GC'^'GC'r'GC''GC'^'GC'^['GC']]}
STR KRI={@5,8EP=45CHO=100[32r][6rr'GC'^r'GC'^'GC'r'GC''GC'^'GC'^['GC']]
[>rr'GH'^r'GH'^'GH'r'GH''GH'^'GH'^['GH']<][6rr'GC'^r'GC'^'GC'r'GC''GC'^'GC'^['GC']]}
STR KR1={@5,8EP=45CHO=100[rr'GH'^r'GH'^'GH'r'GH''GH'^'GH'^['GH']][rr'GI'^r'GI'^'GI'r'GI''GI'^'GI'^['GI']]
[rr'GH'^r'GH'^'GH'r'GH''GH'^'GH'^['GH']]rr'DH'^r'DH'^'DH'r'DH''DH'^'DH'^['DH']rr'DI'^r'DI'^'DI'r'DI''DI'^'DI'^['DI']}
STR KR2={@5,8EP=45CHO=100[3[rr'GH'^r'GH'^'GH'r'GH''GH'^'GH'^['GH']][rr'GI'^r'GI'^'GI'r'GI''GI'^'GI'^['GI']]]}
STR KR3={>@40,90,0EP=35REV=60CHO=100c[27'GC'c^'GC'c'GC':c^]<}
STR KR4={>@40,90,0EP=35REV=60CHO=100c[15'GC'c^'GC'c'GC':c^]<}
STR KR5={@5,8EP=45CHO=100REV=0[16r][30rr'GC'^r'GC'^'GC'r'GC''GC'^'GC'^['GC']]}
TR=9DL=HAZ;l16[KRH]KRI;KR1;DL=BGN;l16[4KR1]DL=HZ3;KR2;DL=BN2;KR3;DL=ST4;KR4;DL=BN3;KR5;
/*10*/STR OA={f}STR O1={'OA'}STR O2={'n38n40OA'}STR O3={'n49OA'}STR O4={'n57OA'}STR O5={'n51n59OA'}STR DM1={O1;rrr}STR DH1={[7DM1][2O1;r]}
STR DM2={O1;rrrO2;rrr}STR DM3={DM2;O1;rrrO2;rrO2}STR DM4={[7DN2]O1;rrrO2;rO1;r}STR DM5={[7DM2]O1;O2;r[2O1]r[2O1]}STR DM6={[7DM2]O1;rrr[2O2;r]}STR DM7={[7DM2]O1;rrrO2;r[2O2]}STR DM8={[6DM2]O1;rrrO1;rO2;rrrO1;rO2;r[2O2]}
STR DM9={[6DM2]O3[7r]['n28n39'r][4'n28n39']}STR DM10={[7DM2][3O1]r[4O1]}STR DM11={[6DM2][O2;r[O1]][O2;r][O2]rr}STR DM12={O1;rrrO4;rO1;rrrO4;rO1;O4;rO4}STR DM13={[6DM2]O3[7r][n54rrr]}STR DM14={[7DM1][O1;r][4O1;rrr]O3[7r]['n28n39'r]rrrr}
STR DM15={[[O1;r]O4;r[O1]:rO4[O1;r:O4;r]][O1]O4;r[4'n27n28']}STR DM16={[6DM2]rrr['n39n28'r:rr]O1;r[4O1]}STR DM17={[6DM2]p.W(0,127,!16)[3DM1]p%=2000O1;r[O1]}STR DM18={SUB{[32n42r]}[O1;rrrO4;rO1;rrrO4;rO1;O4;rO4:[O1;r]O4;rO1;rrrO1;rO4;r[O4]][O1;r]O4;r[O1;O4]O4;rO1;r[O4]}STR DM19={[O1;r]O4;rO1;rrrO1;rO4;r[O4]}
STR DDH={[32O1;rrr]}STR DDI={O1[31r][28O1;rrrO1;rrr]}STR DD1={[32O1;rrrO1;rrr]}STR DD2={[96r]BR=20p%=-1000[8O1;rrr][16O1;rrrSUB{'c#d#'}O1;rrr]}
STR DD3={[32O1;rrr:O1;rrr]rrrr}STR DD4={[30O1;rrrO1;rrr][16r]}STR DD5={l12n49n51n53n50n48n47;n57n59n54n48n47n45;n49n55n53n47n45n43;n57n52n46n45n43n41;
'n57n49n35'rrrl16EP.T(10,127,!6)[3n55]}STR DD6={[56O1;rrr][28r]l24[6O1]l16}STR DD7={[40O1;rrr]@9,90,1[20'n35n36'rrr]SUB{[3n50n50r]n48n48rn43rn41r}[4'n35n36'rrr]}
STR DD8={[32r][57O1;rrr][12r][61O1;rrr]}
TR=10l16DL=HZ0+8@1,127,1EP=127DDH;DL=HAZ+8@1,127,1EP=127DDH;DD1;DDI;DD3;DL=BGN@1,127,1EP=127[DD1]DD4;DL=HZ3+12@9,90,1DD5;
DL=BN2@2,80,0OA={c}DD6;DD7;OA={f}DL=BN3@1,127,1DD8;
/*11*/STR GR={'c'}STR GA={'c#'}STR GB={c#}STR GW={a#}STR TA={n54}STR MT={n51}STR DR={'n38n40n82n85'}STR PL1={If(MODE1==GS){P.onCycle(!8,32,90)}Else{P.onCycle(!8,20,90)}}STR PL2={P.onCycle(!16,0,32,96,127)If(MODE1==TWM){P.onCycle(!16,0,32,70,80)}}
STR GP1={[2GR;GA;GB;r][2GR;GA;GB;GR]}STR GP2={[3GR;rGB;r]GR;r[2GB]}STR GP3={[3[GR]GB;r][2GR][2GB]}STR GP4={[GR]GB;GR}STR GP5={[3GP4][GR][GB]}STR GP6={[GR][TA]}STR GP7={[GP6][GR]TA;GR;GP6}STR GP8={[3[GR]GB;GR][2GR][2GB]}
STR GGH={l24BR=20p%=3000q=500V=120v.T(50,127,!1^1^1^1^1^1^1^1)[32EP=75GW;rrEP=50GW;rEP=40GW]v=127[32EP=75GW;rrEP=50GW;rEP=40GW]q=100p%=0V=100}
STR GG1={l24[8[3GA;rr]GR;rGR[3GA;rr]rrGR;SUB{[17r]n37rrrn37}rrr[GR;rr][GR;rGR][GR;rr]GR;rGR]}
STR GG2={SUB{l1g#^}l24[8[3GA;rr]GR;rGR[3GA;rr]rrGR;SUB{[17r]n37rrrn37}rrr[GR;rr][GR;rGR][GR;rr]GR;rGR]}
STR GG3={SUB{l1g#^}l16SUB{[128r][64r][6'GW'^^'GW''GW'^^^][4'GW']l32'GW'^^[3'GW']l16[7'GW']'GW'^^^^^^^}l24[8[3GA;rr]GR;rGR[3GA;rr]rrGR;SUB{[17r]n37rrrn37}rrr[GR;rr][GR;rGR][GR;rr]GR;rGR]}
STR GG4={l24SUB{l1f#^}l24[48r]SUB{l1g#^}l24[6[7rrc]rcc#]SUB{l16['GW'^^'GW''GW'^^^][4'GW']l32'GW'^^[3'GW']l16[7'GW']'GW'^^^^^^^}
SUB{l1f#^}l24[3GA;rr]GR;rGR[3GA;rr]rrGR;SUB{[17r]n37rrrn37}rrr[GR;rr][GR;rGR][GR;rr]GR;rGR;SUB{l1g#^}l24[6[7rrc]rcc#]}
STR GG5={SUB{l1g#^}l24[7[3GA;rr]GR;rGR[3GA;rr]rrGR;SUB{[17r]n37rrrn37}rrr[GR;rr][GR;rGR][GR;rr]GR;rGR]
[3GA;rr]GR;rGR[3GA;rr]rrGR;rrr[GR;rr][GR;rGR]l16@27,110,0EP=127CHO=127[``c#]``c#^^^@2,88,1EP=75CHO=0}
STR GG6={SUB{l1'g#'^}[4l24GR;rGR;rrr[3GR;rrrr:r]GR;GR;rGR;rrr[3GR;rrrrr]]EP.T(75,0,!1^1^1^1)[4l24GR;rGR;rrr[3GR;rrrr:r]GR;GR;rGR;rrr[3GR;rrrrr]]}
STR GG7={l24q=500v.T(10,127,!1^1^1^1^1^1^1^1)[64EP=75GW;rrEP=50GW;rEP=40GW]q=100v=127}
STR GG8={l16EP=55SUB{l24[7[3GA;rr]GR;rGR[3GA;rr]rrGR;SUB{[17r]n37rrrn37}rrr[GR;rr][GR;rGR][GR;rr]GR;rGR]}l16[7[6rr'd#e'^]rr['d#e']rr'd#e'^]
EP.T(20,55,!1^1)[7rr'd#e'^]rrrrEP=55}
STR GG9={l16EP=55SUB{l24[5[3GA;rr]GR;rGR[3GA;rr]rrGR;SUB{[17r]n37rrrn37}rrr[GR;rr][GR;rGR][GR;rr]GR;rGR]}l16[4[6rr'd#e'^]rr['d#e']rr'd#e'^]
SUB{l4a^b^f#^g#^}l16[6rr'd#e'^]rr['d#e']rr'd#e'^
SUB{l24[3[3GA;rr]GR;rGR[3GA;rr]rrGR;SUB{[17r]n37rrrn37}rrr[GR;rr][GR;rGR][GR;rr]GR;rGR]}l16REV=50[12rr`c#^rra#^]REV=0}
STR GG10={l16[32r]SUB{l1'f#g#'^}l24[7[3GA;rr]GR;rGR[3GA;rr]rrGR;SUB{[17r]n37rrrn37}rrr[GR;rr][GR;rGR][GR;rr]GR;rGR]}
STR GG11={l16SUB{l1'f#g#'^}l24[4[3GA;rr]GR;rGR[3GA;rr]rrGR;SUB{[17r]n37rrrn37}rrr[GR;rr][GR;rGR][GR;rr]GR;rGR]}
TR=11l16DL=HZ0@2,88,1GGH;DL=HAZ;EP=75GG3;GG2;GG4;GG5;DL=BGN@2,88,1EP=75q=100SUB{l1f#^}[GG1]GG6;DL=HZ2+8GG7;
DL=BN2;SUB{l1'fg#'^}GG8;SUB{l1'f#'^}GG9;DL=BN3;EP=75GG10;GG11;DL=END;l1'f#g#'
/*12*/STR TTH={[64r]CHO=0[16rrEP.T(80,80,!16,80,0,!16)'`c'^]}STR TT1={CHO=10Reverb=30[32rrEP.T(80,80,!16,80,0,!16)'`c'^]}
STR TT1A={CHO.T(10,100,!1^1^1^1^1^1^1^1)Reverb.T(30,50,!1^1^1^1^1^1^1^1)[32rrEP.T(80,80,!16,80,0,!16)'`c'^]}
STR TT1B={CHO.T(100,0,!1^1^1^1^1^1^1^1)Reverb.T(50,0,!1^1^1^1^1^1^1^1)[30rrEP.T(80,80,!16,80,0,!16)'`c'^][8r]}
STR TT1C={CHO.T(100,0,!1^1^1^1^1^1^1^1)Reverb.T(50,0,!1^1^1^1^1^1^1^1)[32rrEP.T(80,80,!16,80,0,!16)'be'^]}
STR TT2={CHO=100[32rrEP.T(80,80,!16,80,0,!16)'be'^]}STR TT3={CHO=100[32r][24rrEP.T(80,80,!16,80,0,!16)'be'^]}
STR TT4={CHO=100[4[6rrEP.T(80,80,!16,80,0,!16)'be'^]rrEP=80['be']EP=0rrEP.T(80,80,!16,80,0,!16)'be'^]
v.T(127,0,!1^1^1^1^1^1^1^1)[4[6rrEP.T(80,80,!16,80,0,!16)'be'^]rrEP=80['be']EP=0rrEP.T(80,80,!16,80,0,!16)'be'^]}
STR TT5={l48v=127EP.T(127,0,!8,0,127,!2^4)BR=20p%=3000[48n44]p%=-1000v=90
EP.onCycle(!24,127,70,20,90,20,70)SUB{l16[74rrn33]}SUB{[56rrn85r]}l32[16n35^n62n62n62n60n44n62n60^^n62n61n60^n62]
SUB{l16[24n36rrr]}l32[8n35^n62n62n62n60n44n62n60^^n62n61n60^n62][4n35^n62n62n62n60n44n62n60^^n62n61n60^n62]l16[24r]l16EP=127v=127n41rn65n65n65rn66r}
STR TT6={CHO=0BR=20p%=-1000EP.onCycle(!24,100,70,20,90,20,70)
SUB{l24[28n26^^n26^l48n26;n37n39n32n35^l24n26n26^n26]}
l32[28n37^n62n62n62n60n44n62n60^^n62n61n60^n62]
l24@12,7,0 v.T(20,90,!1^1)[4EP=127n41rrrEP.T(40,127,!12)[3n50]rn50:n47rr]rrrv=127@33,90,1}
STR TT7={CHO=0BR=20p%=-1000EP.onCycle(!24,100,70,20,90,20,70)
SUB{l24[20n26^^n26^l48n26;n37n39n32n35^l24n26n26^n26]}
l32[20n37^n62n62n62n60n44n62n60^^n62n61n60^n62]
@1,90,1l16BR=20p%=2000EP=110SUB{n49}[12rrrrn38rrr]}
STR TT8={CHO=100[32r][56rrEP.T(80,80,!16,80,0,!16)'be'^]}
TR=12l16DL=HZ0+8@2,88,1BR=20p%=3000Reverb=50TTH;DL=HAZ@2,88,1BR=20p%=3000TT1;TT1A[TT2]TT3[TT2]TT1B;DL=BGN@2,88,1BR=20p%=3000Reverb=50[4TT2]Reverb=0
DL=HZ1;TT4;DL=HZ3-1@33,90,1TT5;DL=BN2;l16TT6;TT7;DL=BN3@2,88,1BR=20p%=3000TT8;TT1C;
/*13*/STR SN1={[8[rrrrEP=100n40rrEP=60n40rEP=40n40rEP=50n40EP=100n40rr:r]EP=40n40]}
STR SN1A={[4[rrrrEP=100n40rrEP=60n40rEP=40n40rEP=50n40EP=100n40rr:r]EP=40n40]Reverb.T(0,30,!1^1^1^1^1^1^1^1)[4[rrrrEP=100n40rrEP=60n40rEP=40n40rEP=50n40EP=100n40rr:r]EP=40n40]}
STR SN2={EP=100[16r]rn50n50rn47rrn47rn48n48rl24n45n47n48n47n43n41;
l16[rrrrEP=100n40rrEP=60n40rEP=40n40rEP=50n40EP=100n40rr:r]EP=40n40EP=100l24SUB{[6n38]}
l16rrrrEP=100n40rrEP=60n40rEP=40n40rEP=50n40EP=100n40rrr;rrrrEP=100n40rrEP=60n40rSUB{n50n50rn47rrn45}rrrEP=100n40rrEP=40n40
l16rrrrEP=100n40rrEP=60n40rEP=40n40rEP=50n40EP=100n40rrr;rrrrEP=100n40rrEP=60n40rEP=40n40rEP=50n40EP=100[4n40]
/*l16rrrrEP=100n40rrEP=60n40rEP=40n40rEP=50n40EP=100n40rrr;rrrrEP=100n40rrEP=60n40rEP=40n40rEP=50n40EP=100n40rrEP=40n40*/
l16SUB{[24r]EP=100n50rrn47n45rrr[6n47rrr[n47]n48r:n50rrn47n45rrr]}
l16[3[rrrrEP=100n40rrEP=60n40rEP=40n40rEP=50n40EP=100n40rr:r]EP=40n40]
l16rrrrEP=100n40rrEP=60n40rEP=40n40rEP=50n40EP=100n40rrrl24EP=90[6n38]l16EP=100n40rrEP=60n40rEP=40n40EP=80l24[3n38]EP=100SUB{l24[6n38]}l16EP=100n40rrr}
STR SN3={[7[rrrrEP=100n40rrEP=60n40rEP=40n40rEP=50n40EP=100n40rr:r]EP=40n40]
rrrrEP=100n40rrEP=60n40rEP=40n40rEP=50n40EP=100n40rrrl24EP=90[6n38]l16EP=100n40rrEP=60n40rEP=40n40EP=80l24[3n38]EP=100SUB{l24[6n38]}l16EP=100n40rrr}
STR SN4={l16v.T(127,0,!1^1^1^1^1^1^1^1)[4[rrrrEP=100n40rrEP=60n40rEP=40n40rEP=50n40EP=100n40rr:r]EP=40n40]v=127}
STR TMA={EP=100rn50n50rn47rrn47rMidiDelay({n48n48rn45rrn43},16,!4)}
STR SN5={EP=100l16[32r]l24EP=100l24[6n38]l16[21r]EP=90n50n50rn47rrn45}STR SN6={l16[8r]n50rrn48n45rn41r}
STR SN7={EP=100[16r]rn50n50rn47rrn47rn48n48rl24n45n47n48n47n43n41l16[6[rrrrEP=100n40rrEP=60n40rEP=40n40rEP=50n40EP=100n40rr:r]EP=40n40]
rrrrEP=100n40rrEP=60n40rEP=40n40rEP=50n40EP=100n40rrrl24EP=90[6n38]l16EP=100n40rrEP=60n40rEP=40n40EP=80l24[3n38]EP=100SUB{l24[6n38]}l16EP=100n40rrr
SUB{[8r]EP=100n50rrn47n45rrr[7n47rrr[n47]n48rn50rrn47n45rrr]}[8[rrrrEP=100n40rrEP=60n40rEP=40n40rEP=50n40EP=100n40rr:r]EP=40n40]}
TR=13DL=HAZ@1,7,0CHO=70n46DL=HAZ+7l16TMA;DL=ST0;SN3;SN2;SN4;DL=BGN@1,7,0SN1A;SN1;DL=ST4;SN5;DL=ST4+9SN6;DL=BN3;SN7;
/*14*/STR JG1={/*@29,90,0*/@66,90,1EP=50M.W(0,40,!8)l16CHO.W(50,127,!8)/*Reverb.W(10,100,!4)*/
MD({[3[['gd#c'^^]'gd#c'^rr'gd#c'^^^'"a#dg'^][['fd#"a#'^^]'fd#"a#'^rr'fd#"a#'^^^'fd#"a#'^]]
[['d#c"g#'^^]'d#c"g#'^rr'd#c"g#'^^^'"a#d"g'^]['fc"g'^^]'fc"g'^rr'fc"g'^^^'fc"g'^['gd#"g'^^]'gd#"g'^rr'gd#"g'^^^'gd#"g'^},2,!24)}
STR JG2={l16@29,110,1EP=60q=10REV=70CHO=30[32r][[12'"g"d#'^^'"g"d#'^^'"g"d#''"g"d#']:[4'"g#"d#'^^'"g#"d#'^^'"g#"d#''"g#"d#']]}
STR JG3={@82,110,3EP=50M.W(0,40,!8)l16CHO.W(50,127,!8)REV=30
MD({[3[['gd#c'^^]'gd#c'^rr'gd#c'^^^'"a#dg'^][['fd#"a#'^^]'fd#"a#'^rr'fd#"a#'^^^'fd#"a#'^]]
EP.T(50,30,!1^1^1^1^1^1^1)REV.T(30,127,!1^1^1^1^1^1^1)
[['d#c"g#'^^]'d#c"g#'^rr'd#c"g#'^^^'"a#d"g'^]['fc"g'^^]'fc"g'^rr'fc"g'^^^'fc"g'^['gd#"g'^^]'gd#"g'^rrrrrrrr},2,!24)}
STR JG4={@51,110,0EP=50REV=10CHO=30q=100M=0HAM({l8[cdd#cgcd#g]<[a#`c`da#`ga#`d`g]>fgg#fgg#a#gg#a#`cg#a#`c`d`d#`d^^^^^^^l16`g^^^^r`g`grr})}
STR JG5={@60,0,0EP=40CHO=20REV=70`c&&a#ra#ra#[28g^&&`c:a#ra#ra#]}
STR JG6={@60,0,0EP=40CHO=20REV=70`c&&a#ra#ra#[19g^&&`ca#ra#ra#]}
STR JG7={>>@49,90,1l16EP=60CHO=40REV=10[c&drrd&d#rrd#&frrf&grr][f&grrg&g#rrg#&a#rra#&`crr]g&a#rra#&`crr`c&`drr`d#&`frr;`g&`frr`f&`d#rr`d#&`drr`d&a#rr<<}
STR JG8={l16@29,110,1EP=60q=10REV=70CHO=30[32r][44'"g"d#'^^'"g"d#'^^'"g"d#''"g"d#']EP.T(60,0,!1^1^1^1^1^1^1^1)[16'"g"d#'^^'"g"d#'^^'"g"d#''"g"d#']}
TR=14DL=HZ0;JG1;DL=ST1;JG2;JG3;DL=HZ3+8JG4;DL=BN2;JG5;DL=ST4;JG6;DL=ST4+10JG7;DL=BN3;JG8;
/*15&16*/STR BP1={If(CH==15){@1,90,0l8P=30EP=40CHO=50M.W(0,40,!4)REV=10[MidiDelay({SUB{g^^d^d#"g^^^^}`c^^f^gc^^^^},8,!2)[21r]]
EP.T(45,60,!1^1^1^1^1^1^1^1)[MidiDelay({SUB{g^^d^d#"g^^^^}`c^^f^gc^^^^},8,!2)[21r]]}Else{
>@49,90,1l8EP.T(0,30,!1^1^1^1^1^1^1^1)P=50CHO=40[8`cg`dg`d#g`fg]SUB{[8`cg`dg`d#g`fg]}>EP.T(30,40,!1^1^1^1^1^1^1^1)CHO.T(40,127,!1^1^1^1^1^1^1^1)[8`c`d`d#`c`d#`f`d#`g]<<}}
STR BP2={l16@82,110,0Reverb=40CHO=30EP=35BR=12If(CH==15){p%=100P=10}Else{p%=-100P=117}
[4[3l32'cd#"g'^^^v.T(80,127,!16^32)['cd#"g']l32'cd#"g'^rrrrrrrrv=127]l16'cd#"f''fd"g''fd"g'^'fd"g'^^'fd"g']
CHO.T(30,80,!1^1^1^1^1^1^1^1)EP.T(30,35,!1^1^1^1^1^1^1^1)
[4[3l32'cd#"g'^^^v.T(80,127,!16^32)['cd#"g']l32'cd#"g'^rrrrrrrrv=127
/*l24'cd#"g'^^rr'cd#"g''cd#"g'^^rrrl16*/]l16'cd#"f''fd"g''fd"g'^'fd"g'^^'fd"g']
/*[8[3'cd#"g'^^'cd#"g'rrrr]'cd#"f''fd"g''fd"g'^'fd"g'^^'fd"g']*/}
STR BP3={l16@82,110,0Reverb=40CHO=80EP=35BR=12If(CH==15){p%=100P=10}Else{p%=-100P=117}
[8[3l32'cd#"g'^^^v.T(80,127,!16^32)['cd#"g']l32'cd#"g'^rrrrrrrrv=127]l16'cd#"f''fd"g''fd"g'^'fd"g'^^'fd"g']}
STR BP4={l16@31,110,0REV=90CHO=110EP=40BR=12If(CH==15){p%=100P=10}Else{p%=-100P=117}
l16>SUB{"a#^r"a#^r"a#^"a#^r"a#^r"a#^c^rc^rc^c^rc^rc^}SUB{c^rc^rc^d^rd^rd^d#^rd#^rd#^f^rf^rf^}g#^rg#^rg#^a#^ra#^ra#^`c^r`c^r`c^`d#^r`d#^r`d#^
@82,110,0Reverb=40CHO=90EP=38[3[3l32'cd#"g""c'^^^v.T(80,127,!16^32)['cd#"g""c']l32'cd#"g""c'^rrrrrrrrv=127]l16'cd#"f""d#''fd"g""g''fd"g""g'^'fd"g""g'^^'fd"g""g']<}
STR BP5={l16@82,110,0Reverb=40CHO=90EP=40BR=12If(CH==15){p%=100P=10}Else{p%=-100P=117}
l16>SUB{"a#^r"a#^r"a#^"a#^r"a#^r"a#^c^rc^rc^c^rc^rc^}SUB{c^rc^rc^d^rd^rd^d#^rd#^rd#^f^rf^rf^}g#^rg#^rg#^a#^ra#^ra#^`c^r`c^r`c^`d#^r`d#^r`d#^
@82,110,0Reverb=40CHO=90EP=40[3[3l32'cd#"g""c'^^^v.T(80,127,!16^32)['cd#"g""c']l32'cd#"g""c'^rrrrrrrrv=127]l16'cd#"f""d#''fd"g""g''fd"g""g'^'fd"g""g'^^'fd"g""g']<}
STR BP6={p%=0If(CH==15){@1,90,0l8P=30EP=60CHO=70M.W(0,40,!4)REV=10[MidiDelay({SUB{g^^d^d#"g^^^^}`c^^f^gc^^^^},8,!2)[21r]]
EP=60[MidiDelay({SUB{g^^d^d#"g^^^^}`c^^f^gc^^^^},8,!2)[21r]]}Else{
>@49,90,1l8EP.T(20,40,!1^1^1^1^1^1^1^1)P=50CHO=40[8`cg`dg`d#g`fg]SUB{[8`cg`dg:`d#g`fg]}>EP.T(40,20,!1^1^1^1^1^1^1^1)CHO.T(40,127,!1^1^1^1^1^1^1^1)[8`c`d`d#`c:`d#`f`d#`g]rrrr<<}}
STR BP7={If(CH==15){}Else{>@49,90,1l8EP=60P=50CHO=40[8`cg`dg`d#g`fg]SUB{[16`cg`dg`d#g`fg]}>[16`c`d`d#`c`d#`f`d#`g]<
EP.T(60,0,!1^1^1^1^1^1^1^1)SUB{[8`cg`dg`d#g`fg]}>[8`c`d`d#`c`d#`f`d#`g]<<}}
STR BP8={l8P=64v=70BR=6
If(CH==15){/*@31,90,0*/@82,1,0v=80p%=200EP.T(70,50,!1^1^1,50,70,!1^1^1,70,50,!1^1^1,50,70,!1^1^1,70,50,!1^1^1^1)
CHO.T(70,0,!1^1^1^1^1^1^1^1,0,70,!1^1^1^1^1^1^1^1)
}Else{/*@31,110,0*/@82,110,0v=60p%=-200EP.T(50,70,!1^1,70,50,!1^1,50,70,!1^1,50,40,!1^1,50,70,!1^1,70,50,!1^1,50,70,!1^1,70,50,!1^1)
CHO.T(0,120,!1^1^1^1^1^1^1^1^1^1^1^1^1^1^1^1)}
[4['gd#c''gd#c'r'gd#c'r'gd#c''gd#c'r]['fd#"a#''fd#"a#'r'fd#"a#'r'fd#"a#''fd#"a#'r]]
CHO=100EP=70p%=0'g#d#c''g#d#c'r'g#d#c'r'g#d#c''g#d#c'r;'g#d#c''g#d#c'r'g#d#c'r'g#d#c'SUB{>`c^a#^^^^^^^`d#^`c^`d^`d#^<}'g#d#c'r
SUB{ggrgrggr}SUB{ddrdrddr}"a#"a#r"a#r"a#"a#rSUB{`d#`cr`dr`d#`fr}SUB{c"g#r"a#r"a#cr}fdrd#rd#fr
@31,110,0REV=90CHO=110EP=60BR=12If(CH==15){p%=100P=10}Else{p%=-100P=117}
>l16HAM2({"f^"g#c^"g#"fr;"g^"a#d^"a#"gr;"g#^cd#^c"g#r;"a#^df^d"a#r;})REV=0
y64=127"g^^"g"a#^^"a#d^^df^^fg^^^^^^^<y64=0}
STR BP9={>>p=64If(CH==15){}Else{@49,90,1l8EP=50P=50CHO=50l1'`c'^^^^^^^^^^^^^}<<}
STR BP10={l16@19,110,0Reverb=10CHO=30EP=90BR=12If(CH==15){p%=100P=10}Else{p%=-100P=117}
l8HAM({SUB{e^d#^d^c#^c^"a"a#^^^}g^g#^f^g^d#^fd^^^r})}
STR BP11={>>p=64If(CH==15){l4<<[8r]P=30CHO=40EP=60REV.W(0,80,!1^1)@55,110,8c^^^^^^^l2d#^^^'cd#'^^^>>}Else{@49,90,1l8EP=50P=50CHO=50l1'`c'^^^^^^^^}<<}
STR BP12={l8P=64v=70BR=6If(CH==15){@82,1,0v=80p%=200EP=70CHO=70}Else{@82,110,0v=60p%=-20EP=70CHO=120}
['gd#c''gd#c'r'gd#c'r'gd#c''gd#c'r]'g#d#c''g#d#c'r'g#d#c'r'g#d#c''g#d#c'r;'g#d#c''g#d#c'r'g#d#c'r'g#d#c'SUB{>`c^a#^^^^^^^`d#^`c^`d^`d#^<}'g#d#c'r
SUB{ggrgrggr}SUB{ddrdrddr}"a#"a#r"a#r"a#"a#rSUB{`d#`cr`dr`d#`fr}SUB{c"g#r"a#r"a#cr}fdrd#rd#fr}
STR BP13={l16@82,110,0Reverb=40CHO=80EP=40BR=12If(CH==15){p%=100P=10}Else{p%=-100P=117}
[8[3l32'cd#"g'^^^v.T(80,127,!16^32)['cd#"g']l32'cd#"g'^rrrrrrrrv=127]l16'cd#"f''fd"g''fd"g'^'fd"g'^^'fd"g']
>Reverb=40CHO=90EP=40[8[3l32'cd#"g""c'^^^v.T(80,127,!16^32)['cd#"g""c']l32'cd#"g""c'^rrrrrrrrv=127]l16'cd#"f""d#''fd"g""g''fd"g""g'^'fd"g""g'^^'fd"g""g']
l4'cd#"g""c'^^^^^^^<}
STR BHJJ={DL=HZ0;BP1;DL=HAZ;BP2;BP3;BP4;BP5;BP6;DL=ST3;BP7;DL=HZ2+8BP8;DL=BN2;BP9;DL=ST4-2BP10;DL=ST4;BP11;DL=ST4+10BP12;DL=BN3;BP13;}TR=15BHJJ;TR=16BHJJ;