m=[0,2,4,7][t>>17&3],t%=65536*2,C=t,a=(t,T,c)=>T<0?0:sin(t*PI/64+sin(t*PI/64)*sin(C*PI/1228/16)*2)*.4**max(T/c%4,0)*min(T/c*16%32,1),l=[a(t*2**(-m/12),t,16384),a(t*2**((2-m)/12),t-16384,16384),a(t*2**((12-m)/12),t-32768,16384),a(t*2**((7-m)/12),t-49152,16384)],(l[0]+l[1]+l[2]+l[3])/4+sin(t*PI/512*2**(-m/12))*min(t/4096,1)*max((1-t/131072)*40,0)/60

((sin(t*PI/64*2**(["047","025"][t>>17&1][(t/2|0)%3]/12))*128&255)/128-1)**(t/16384%1)+sin(exp(1-t/16384%1)*90)*(1-t/16384%1)-random()*(t>>14&1)-random()*.1**(t/8192%1)

iterations=512,
t/"2241"[3&t>>14]%4096||(z=Array(iterations).fill(0).map(x=>random()*128)),((a,q)=>{let g=0;for(let i=0;i<a;i++){g+=sin((t+z[i])*q*PI/512*(i+1))/(1+i)}return g/(a+1)})(iterations,2**("00113317"[7&t>>14]/12)*(1+!!(t&131072)))*(1+(-cos(t*PI/2048/"2241"[3&t>>14])+1)/2)*(iterations+1)/4

t/=48000,c=sin,z=cbrt,R=random(),s={B:116,F:432,S:1,V:1},B=s.B*s.S,F=s.F,T=B*t/60,V=1e-3*sin(t),h=(x,y=.5)=>x%1>y?-1:1,o=(x,Y,Z=.01)=>Y--?o(abs(x-2*Z)-8*Z,Y-1):z(4*x+8*Z),r=(x,y)=>x.repeat(y),A='LLCG',B='JJBE',C='II9D',D='CB99',p=(x,y,z=0)=>F*2**((parseInt(x[y],36)-69)/12+z),e=(t, T)=>T>=0?h(t*p(r(A,2)+r(B,2)+r(C,4),2*T&31,5),2*T&1?.8:.4)*.2**(2*T/(H=1+!(T&1))%1)*min(64*T/H%32,1)+2*o(sin(PI*t*p(D,T/4&3,2))*.4**(g=T/4%1),16,.1)*.3**g:0,[e(y=t-(V=s.V?V:0),T)+e(y,T-1/3)/3+e(y,T-.5)/2+e(t/2-V,T-1),e(i=t+V,T)+e(i,T-1/4)/3+e(i,T-.5)/2+e(i/2,T-1)].map(x=>(x/4+(4954>>(4*T*(G=1+(T/16&1))&15)&1?z(c(3500*t)+47*c(R-.5)*.1**(1+c(8*PI*T*G)))*.3**(4*T*G%1):z(c(270*(X=2*T*G%1)**.3)+z(R-.5)*!(32*T*G&15)/4)*.4**X)/2+c(R-.5)*.01**(4*T*G%1)/2)/2)

(t>>9&6?0:9001/(t%4096)-t/9&8?-1:0)^t>>4&t*(3&t/(1+(t>>14)%8)^t>>(t>>9&8?19:20)*(t>>11))

((t&255)*((t*((t>>10|t>>14)&15))&192)>>7)+((t&4095)<2048?(((1<<18)/(t&4095)+10000)&128):0)

[a=i=>(t*(t>>(t>>i)&15)+2)%256/8,
a(7)+
a(8)+
a(9)+
a(10)+
a(11)+
a(12)+
a(13)+
a(14)]

a=(n,v,i=1)=>n&&sin(t*PI/256*(v**n)*i)%256/2/n+a(n-1,v,i),a(128,(2**(1/12))**(4.5),2**(t/1048576-2))

ejoi

biza

hodut

ufuva

//rem!x (44 khz)
p=v=>2**(v/12),z=12*(t>>18&1),(((t>>3&t>>8)^(t>>8&t>>7))&127)+(64*abs(sin(t/50*p([0,3,7,12,,19,,7][t>>11+(t>>13&3^t>>14&1)&7]+z))))+(sin(3e4/(t&16383))*20+32)+((sin(t*t)*20)&-t>>8&31)

return (t,s)=>(t*=s,t*(42&t>>10)&255)/128-1

return t=>(t*=8E3,t*(42&t>>10)&255)/128-1

return (t,s)=>(t*=s,t*(4|t>>13&3)>>(~t>>11&1)&128|t*(t>>11&t>>13)*(~t>>9&3)&127)/128-1

t/=48E3,s=s=>2**(('023578'[s%7|0]||10)/12+(s/7|0)+7.5),o=(t,b)=>(O=[O=t>12&&sin(b*200)/4+(t*s('0035'[t/3&3])/4%1>t/3%1)/4*b||0,O],(T=>{for(i=0;i<9;i++)(N=t-3/8*i)<0||(n=N*s(N%3*4-(N/3&2)+7),O[i%2]+=N<132&&T(n+N%3/9*T(n/((N/3&3)+1)))*(1-N*4%1)/3*.6**i)})(t=>abs(t%1*4-2)-1),O),t>127?o(t+4):o(t>48?(a=t%1,x=t*2&7,(t/4|0)*3+(t>96?(t&3)+a-(x>3):[a,(t&3)+[a%(1/12),(a-1)**2,a,a-.5,a*3/2,a*2/3,a-1,a-1][x],[a*3/2,a,a*3/2,(a-1)**2,a,a-.5,a*2/3,a*2/4][x]][t/16-3|0])):t,t<24||(t*(t/8-13|0?2:1)%1)**.4)

max(0,min(128,(b=-t*1.0595**('0010010030705503'[t>>13&15]-12+3*(t>>18&1))&255,c=b**3>>5,sin(b*(.2+sin(t/6E6))*.2)*c+c)*(-t&8191)>>18))-((sqrt(t&8183)<<6&64)*(t>>15&1^t>>13)-(t&15))*(1048576<t)+(t&16383)*(-t>>3&511)/7E4*random()*(524288<t)

SAMPLE_RATE

t/=48000,
GlobalDetune=gd=14,//detune in ¢
ü=142,
c="charCodeAt",
Я=(A,os=0)=>(t+os*(60/A))/(60/A)%1,
Dec=(F,C=1,os=0)=>(1-Я(F,os))**C,
Cyc=(P,A,os=0)=>((t+os)/(60/P))%A,
Tu=a=>440*(2**(((a+gd/100)-9)/12)),//get Hz from note order
RandomPool=R=new Array(16).fill(0).map(a=>2*random()-1),
F=a=>sin(2*PI*t*a),//freq to sine
Sw=a=>F(Tu(a)),//Sine
St=a=>t%(1/(b=Tu(a)))*b*2-1,
Sq=(a,Du=1/2)=>(((St(a)+1)/2)<Du)*2-1,
MagNum=((2951594784).toString(2)),
Th=a=>{throw a},
IP=(N,Min,Max)=>N*(Max-Min)+Min,
LFO=(F,Min,Max,W)=>
[
IP((sin(2*PI*F*t)+1)/2,Min,Max),//Sw
IP(t%(1/F)*F,Min,Max),//St
IP(((asin(sin(2*PI*t*F))/PI*2)+1)/2,Min,Max),//Tr
IP((sign(sin(2*PI*F*t))+1)/2,Min,Max)//Sq
][W],
XOR=(T,A=1,B=2)=>((t*A*Tu(T)*256)^(t*B*Tu(T)*256))%256/256*2-1,
Bass=a=>parseInt((MagNum[(t*16*Tu(a))&31]))*2-1,
Tr=a=>asin(Sw(a))/PI*2,
p=(a,b)=>a!=b?a:-1/0,
FM=(B,M,C)=>F(Tu(B)+M*F(Tu(B+12*C))/t),
Proc=(Str,Ind)=>p(Str[c](Ind)-64,-32),
PT=(A,B)=>A.map(B).reduce((a,b)=>a+b)/A.length,
Counter=SC={Beat:(t/(60/ü))|0,BiB:3&(t/(60/ü))},SC.M=SC.Beat>>2,SC.sQ=((t/(60/ü))*4)|0,SC.sQC=SC.sQ&3,
/*
Get "Raddy"!
C D EF G A B
()*+,-./0123    __
456789:;<=>?     _
@ABCDEFGHIJK    
LMNOPQRSTUVW    ^
XYZ[\]^_`abc    ^^
*/
Kick=a=>F(+sqrt(3000*(100/ü)*exp(Dec(a,4)))/t),
Snare=a=>Kick(a)/2+R[0]*Dec(a,0.5)/2,
Mel1="4;@;G;@;4;@;G4;@8?D?K?D?8?D?K8?D1=D=L=D=1=D=L1=D-9@9E9@9-9@9E-9@",
Bass1=" 4 4 4 4 8 8 8 8 1 1 1 1 - - - -",
[C1,C2,C3]=["44 44 44  44 44 88 88 88  88 88 11 11 1   11 11 -- -- --  -- -- ",";; ;; ;;  ;; ;; 33 33 33  33 33 88 88 88  88 88 44 44 44  44 44 ","@@ @@ @@  @@ @@ DD DD DD  DD DD == == ==  == == EE EE EE  EE EE "],
(St(Proc(C1,Cyc(ü*4,64)))/3+St(Proc(C2,Cyc(ü*4,64)))/3+St(Proc(C3,Cyc(ü*4,64)))/3)/3+Tr(Proc(Bass1,Cyc(ü*2,32)))/3+FM(Proc(Mel1,Cyc(ü*4,64)),LFO(0.1,0,0.75,0),0)*Dec(ü*4,1.2)/3

return (t)=>(
GlobalDetune=gd=0,//detune in ¢
ü=142,
Clam=a=>min(max(a,0),1),
Clamp=A=>min(max(A,-1),1),
c="charCodeAt",
Я=(A,os=0)=>(t+os*(60/A))/(60/A)%1,
Dec=(F,C=1,os=0)=>(1-Я(F,os))**C,
Cyc=(P,A,os=0)=>((t+os)/(60/P))%A|0,
Tu=a=>440*(2**(((a+gd/100)-9)/12)),//get Hz from note order
RandomPool=R=new Array(16).fill(0).map(a=>2*random()-1),
F=a=>sin(2*PI*t*a),//freq to sine
Sw=a=>F(Tu(a)),//Sine
 St=a=>t%(1/(b=Tu(a)))*b*2-1,
 Sq=(a,Du=1/2)=>(((St(a)+1)/2)<Du)*2-1,
 MagNum=((2951594784).toString(2)),
Th=a=>{throw a},
 IP=(N,Min,Max)=>N*(Max-Min)+Min,
 LFO=(F,Min,Max,W)=>
[IP((sin(2*PI*F*t)+1)/2,Min,Max),IP(t%(1/F)*F,Min,Max),IP(((asin(sin(2*PI*t*F))/PI*2)+1)/2,Min,Max),IP((sign(sin(2*PI*F*t))+1)/2,Min,Max)][W],
XOR=(T,A=1,B=2)=>((t*A*Tu(T)*256)^(t*B*Tu(T)*256))%256/256*2-1,
Bass=a=>parseInt((MagNum[(t*16*Tu(a))&31]))*2-1,
Tr=a=>asin(Sw(a))/PI*2,
p=(a,b)=>a!=b?a:-1/0,
FM=(B,M,C)=>F(Tu(B)+M*F(Tu(B+12*C))/t),
 Proc=(Str,Ind)=>p(Str[c](Ind)-64,-32),
 PT=(A,B)=>A.map(B).reduce((a,b)=>a+b)/A.length,
 Counter=SC={Beat:(t/(60/ü)),BiB:3&(t/(60/ü))},
 SC.M=SC.Beat>>2,
 SC.sQ=((t/(60/ü))*4)|0,
SC.sQC=SC.sQ&3,
 Fifth=a=>[0,7,12].map(a),
O=(a,b)=>b>1?sin(Tu(a)*2*PI*t+O(a,b-1)):sin(Tu(a)+sin(Tu(a))),
kick=(a,H=1)=>(u=t%(60/a),Clamp(.9997**(48000*u)*sin((u*48000)**.5)*H)),
r=(x,y=12288,z=0.5)=>(t?0:a=Array(y).fill(0),b=x%256+a.shift(),a.push(b*z),b),
DP= "K K S  S SKKS SSK K S  S SKKS SSK K S  S SK   S  SKKS  S SK   S",
DP2="R R R R R R R R R R R R R R R R R R R R R R R R R R R R R R R R ",
//DP2="H H H H H H H H H H H H H H H H H H H H H H H H H H H H H H H H ",
DM=a=>(
a=="H"?R[2]*Dec(ü*4,3):
a=="K"?kick(ü*4,2):
a=="S"?snare(ü*4):
a=="R"?Ride(ü*4):0),
Debug=(a,b)=>(t*38775.4648)%1024?a:Th(b),
/*
Get "Raddy"!
C D EF G A B
()*+,-./0123    __
456789:;<=>?     _
@ABCDEFGHIJK    
LMNOPQRSTUVW    ^
XYZ[\]^_`abc    ^^
*/
ParseNote=a=>ParseInt(a&255,16)-128,


Ride=a=>Sw(43)*Dec(a,2)/2,
snare=a=>Clamp(kick(a,8)/2+R[1]*Dec(a,4)/2),
SRise=SC.Beat>=32?(SC.Beat<36?snare(ü/4):0):Clam(SC.Beat/8-3)*snare(ü*4),
Mel1="4;@;G;@;4;@;G4;@8?D?K?D?8?D?K8?D1=D=L=D=1=D=L1=D-9@9E9@9-9@9E-9@",
Bass1=" 4 4 4 4 8 8 8 8 1 1 1 1 - - - -",
 [C1,C2,C3]=["44 44 44  44 44 88 88 88  88 88 11 11 11  11 11 -- -- --  -- -- ",";; ;; ;;  ;; ;; 33 33 33  33 33 88 88 88  88 88 44 44 44  44 44 ","@@ @@ @@  @@ @@ DD DD DD  DD DD == == ==  == == EE EE EE  EE EE "],
 Arp="=@DIKID@=@DIKID@=@DIKID@=@DIKID@8?DFGFD?8?DFGFD?8?DFGFD?8?DFGFD?;BGIKIGB;BGIKIGB;BGIKIGB;BGIKIGB6=BDEDB=6=BDEDB=6=BDEDB=6=BDEDB=",
 Bassline=(XOR(Proc(C1,Cyc(ü*4,64)))/3+XOR(Proc(C2,Cyc(ü*4,64)))/3+XOR(Proc(C3,Cyc(ü*4,64)))/3),
r(SRise+Dec(ü*4,1)*FM(Proc(Mel1,Cyc(ü*4,64)),LFO(0.3,0,0.8,2),1)/2,12288,0.4)+
(DM(DP[Cyc(ü*4,64)])/2+DM(DP2[Cyc(ü*4,64)])/2)/2
)