a=t>>13,
m=[0,7,12,15,12,7,0,10][a&7],
b=t*(2**(m/12)),
((b>>4&63)*(3-(t>>11&3))) + ((t>>6)&15)

r=t/2,bass=(tone,speed)=>(((tone>>7&1?speed/4>>tone/4:~(speed/4>>-tone/4-1))&255)-128)/128,a=t=>(bass(t/1.998,r)/4+bass(t/2.005,r)/4+bass(t/2.01,r)/4+bass(t/1.992,r)/4)/2+((t/513%2-1)/4+(t/510%2-1)/4+(t/509%2-1)/4+(t/515%2-1)/4)/2,a(t*2**(parseInt('aifh'[3&t>>17],36)/12)/2)

_=(((T=7*t/8)*2**((_=[[[0,3,7,12],[3,7,12,14],[7,12,14,17],[5,7,12,14]][T>>15&3][T>>12&3],[0,7,3,7,12,7,5,3,0,3,7,3,5,3,7,12][T>>14&15]])[0]/12)&(i=T>>12)&255)/2+(T*2**(_[1]/12)&-T>>5>>(i&3)&255)/2+(M=max)((I=min)(sin(sqrt(_=T%16384)**.1*(f=512)+(_=1-_/32768))*2*_**10*f,255),0)/max(255-i,1))*(i>252&&i<256?!(T>>11&1):1)^((t^t/2)*1.9&127)*(T>>14&1)*_**10*(i>128)^random()*(1-T/4096%1)**16*128*(i>192),I(M(_,0),255)

// 48000 sample rate, floatbeat
t/=48e3, // makes t count in seconds
note=n=>440*2**(n/12), // note number to hz, centered around 440hz (a4)
a=t=>abs(sin(t*PI))-.5, // basic half-sine wave
g=t=>(m=[0,4,0,-2][t&3],t<0?0:a(t*note(m))*(1-t%1)), // defining variables inside functions **is** possible! this function is for the small delay.
(g(t)+g(t-(r=.555))/2+g(t-r*2)/3+g(t-r*3)/4)

sin(sqrt(t%32768)**.25*190)*.1**(t/32768%1)*127+127 // A basic kick drum

min(max(sin(t*PI/128*(t>>12&t>>14&t))*(t/32768%1)*127+127+sin(sqrt(t%32768)**.1*900)*128*.1**(t/32768%1)+(random()*128-64)*(t>>15&1)*(1-t/32768%1)+(random()*32-16)*4*.01**(t/8192%1),0),255) // Kind of long JS one-liner

t/=4,a=((t*2**[5.9,6,5.75,6][t>>13&3]/24)*[1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,3,1,3,1,3,1,3,1,3,1,3,1,3,1,3][t>>11&31])*2,a|-t>>(t&32768?3:5)

t/=4,a=((t*2**[5.9,6,5.75,6][t>>13&3]/24)*[1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,3,1,3,1,3,1,3,1,3,1,3,1,3,1,3][t>>11&31])*2,(a&191)*(t&32768?1e3:4e3)/(t&(t&32768?2047:8191))

t/=4,a=((t*2**[5.9,6,5.75,6][t>>13&3]/24)*[1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,3,1,3,1,3,1,3,1,3,1,3,1,3,1,3][t>>11&31]),((a%128+a%127)&128)+64

t/=4,a=((t*2**[5.9,6,5.75,6][t>>13&3]/24)*[1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,3,1,3,1,3,1,3,1,3,1,3,1,3,1,3][t>>11&31])*2,a*t>>a

t/=4,a=((t*2**[5.9,6,5.75,6][t>>13&3]/24)*[1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,3,1,3,1,3,1,3,1,3,1,3,1,3,1,3][t>>11&31])*2,[a|-t>>5,a&t>>5]

(t*4/100)|t-5^t|t*7000&40

(t*4/100)|t-5^t|t*7000&400

N=4096,n=4**9,R=random()-.5,p=.27*t,typeof d=="undefined"?d=Array(512).fill(0):0,DR=(n,t=12,a=1)=>{P=n[p/2**t%n.length|0];return"K"==P?atan(2*tanh(sin(600*(f=a*p%N)**.024+8*(d[0]+=(R*1e-23**(p/N%1)**.8-d[0])/7)))*(h=1-a*p/N%1)**3+sin(100*f**.1)*min(1,5*h)*h**.2)/tanh(1)*.4:"C"==P?4*(d[1]+=d[2]+=(R-d[1]-2*d[2])/4)*1e-4**(a*p>>8&15?a*p/N%1:a*p/128%1)**.9:"H"==P?d[3]+=d[4]+=(R*1e-7**(a*p/N%1)-d[3]-d[4])/.89:0},k=t*2**([7,4,7-(l=p>>12&5),l][t&3]/12-2),tanh(p>n-4**7?p>n?1:~p>>10+(p>>13&1)&1:1)*(atan2(tanh(.6**(p*(1+(p>n))/N%1)*(d[5]+=(48*k%8>(~p>>4+(p<4**9)&127)+.3?6:~24*((k/6^2*k/3)%32&k/64%1*32)-d[5])/4)/56+3)+(p>n&&6*sinh(cos(PI*t*2**(-'0375'[p>>16&3]/12-9))*(74803>>(p>>11&15)&1))),PI)/2+(h=p>n-4**7?p>n?1:0:1)*DR(p>n?"K C  KC ":"K C  KCKK CK K  ",12)+h*(p>n/2&&DR("H",0,2))/2)