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

t*(t&16384?6:5)*(5-(3&t>>(t&4096?7:14)))>>(3&t>>9)|t>>3

hB=T=>t*[1,0.9,1,1.125,1.2,1.125,1.2,1.35,1.5,1.35,1.6,1.5,1.8,1.6,1.5,1.6,1.35,1.5,1.6,1.8,2,2.25,2.4,2.7,1.125,1.2,1.35,1.5,1.875,2,2.25,2.4][(T>>13)&31]*(1+(T>>18&1))*2,j=t%4096,r=(x,y,z,n)=>(t||(a=Array(n).fill(y)),c=x+a[t*2%n],a[t%n]=c*z,c),h=hB(t)/16^hB(t)/16+16,B=(b=t*[1,1.2,1.35,1.5][(t>>16)%4]/4*((t>>18&1)+1))^b*4,kick=256-(1e6/(t>>1&8191)%256),A=max(min((r(h%256/4-B%256/4+64,32,.75,4096))-kick,255),0)

(Code)

u=150, k=2600, r=5200, C=(u,k,r)=>(u=u.charCodeAt(t&t>>u+2)%r), 5+k/2&t>>10*(26&t>>10)-t*(t>>9&(t%16?4:8)&k<<5)|t>>4|t>>(k*2)[[r*.5&k]>>10]|r-k/u+(u/3)-13/cos(t*2)*(4096-(t&4096))|(42&t>>10)*(t*(((t&4096?t%65536<59392?7:t>>6:16)+(1&t>>14))>>(3&-t>>(t&2048?2:10))|t>>(t&8240?t&4096?4:3:2)))*t|max(0,t&t*cos(t&4096?4:3)*round(1,10*sin(0.5-t)))|r*(t>>204)

(((t^t>>5|t^t>>6)&t>>4)>>8)*(t^t>>8)

t/=4,t*((t&4096?t%65536<59392?7:t&7:16)+(1&t>>14))>>(3&-t>>(t&2048?2:10))|t>>(t&16384?t&4096?10:3:2)|30000/(t&4095)+random()*(-t>>6&31)*3

p=3*(t-(t>>10&4|t>>13&3|t>>17&6|t>>14&4)*t/((t>>16&7)+4))/1.56,d=3*(t-(t>>10&4|t>>13&3|t>>a17&6|t>>14&4)*t/((t>>16&7)+4))*1.91,(p&255)/3+(d&255)/2.5

t*=20,[1,1,1,2,3.5,4.1,2.51,1.9][t>>11&7]*t/128*(-t>>16&15)%+(t>>10)

(t*(t>>17&1?t>>16&1?9/8:1:3/4)|t>>6^t>>8|t>>12)%256^1E5/(t%16384)

t*((t&4096?t%65536<59392?7:t&7:16)^(1&t>>14))>>(3&-t>>(t&2048?2:10))