u=(~t>>7&31),c=2**(1/12),cs=2**(2/12),d=2**(3/12),ds=2**(4/12),e=2**(5/12),f=2**(6/12),fs=2**(7/12),g=2**(8/12),gs=2**(9/12),a=2**(10/12),as=2**(11/12),b=2**(12/12),

(32&t/2*
[,gs/4,cs/2,e/2,gs/2, cs/2,e/2,gs/2,cs, e/2,gs/2,cs,e,  gs/2,cs,e,gs, cs,e,gs,cs*2, e,gs,cs*2,e*2, gs,cs*2,e*2,gs*2 ,,gs*2
,,,

gs/4,c/2,ds/2,gs/2, c/2,ds/2,gs/2,c, ds/2,gs/2,c,ds, gs/2,c,ds,gs, c,ds,gs,c*2, ds,gs,c*2,ds*2,  gs,c*2,ds*2,gs*2 ,,gs*2
,,,

cs/2,f/2,gs/2,cs, f/2,gs/2,cs,f, gs/2,cs,f,gs, cs,f,gs,cs*2, f,gs,cs*2,f*2, gs,cs*2,f*2,gs*2, cs*2,f*2,gs*2,cs*4 ,,cs*4
,,,

cs/2,fs/2,a/2,c, cs,fs,a,cs*2, cs*2,fs*2,a*2,cs*4, ,cs*4
,,,

c/2,e/2,g/2,c ,c,e,g,c*2, c*2,e*2,g*2,c*4, ,c*4
]
[(t>>12&127)])/32*u
+
(32&t/2*
[cs/4,,gs/4,,cs/4,,gs/4,,cs/4,,gs/4,,cs/4,,gs/4,,cs/4,,gs/4,,cs/4,,gs/4,,cs/4,,gs/4,,cs/4,,gs/4,,

c/4,,gs/4,,c/4,,gs/4,,c/4,,gs/4,,c/4,,gs/4,,c/4,,gs/4,,c/4,,gs/4,,c/4,,gs/4,,c/4,,gs/4,,

b/8,,gs/4,,b/8,,gs/4,,b/8,,gs/4,,b/8,,gs/4,,b/8,,gs/4,,b/8,,gs/4,,b/8,,gs/4,,b/8,,gs/4,,

a/8,,a/4,,a/8,,a/4,,a/8,,a/4,,a/8,,a/4
,,

a/8,,a/4,,a/8,,a/4,,a/8,,a/4,,a/8,,a/4
,,]
[t>>12&127])/32*u
+
(32&t/2*
[,,,,,,,,,,,,,,,,,,,,,,,,,,,,cs/2,,, 
,,,,,,,,,,,,,,,,,,,,,,,,,,,,,c/2,,, 
,,,,,,,,,,,,,,,,,,,,,,,,,,,,,b/8,,]
[t>>12&127])/32*u
+

(32&t/2*
[,,,,,,,,,,,,,,,,,,,,,,,,,,,,gs,,gs, 
,,,,,,,,,,,,,,,,,,,,,,,,,,,,,gs,,gs, 
,,,,,,,,,,,,,,,,,,,,,,,,,,,,,cs*2,,cs*2
,,,,,,,,,,,,,,cs*2,,cs*2
,,,,,,,,,,,,,,cs*2,,cs*2,]
[t>>12&127])/32*u
+
(32&t/2*
[,,,,,,,,,,,,,,,,,,,,,,,,,,,,c*2,,c*2, 
,,,,,,,,,,,,,,,,,,,,,,,,,,,,,c,,c, 
,,,,,,,,,,,,,,,,,,,,,,,,,,,,,f*2,,f*2
,,,,,,,,,,,,,,fs*2,,fs*2
,,,,,,,,,,,,,,g*2,,g*2,]
[t>>12&127])/32*u
+
(32&t/2*
[,,,,,,,,,,,,,,,,,,,,,,,,,,,,e*2,,e*2, 
,,,,,,,,,,,,,,,,,,,,,,,,,,,,,e*2,,e*2, 
,,,,,,,,,,,,,,,,,,,,,,,,,,,,,gs*2,,gs*2]
[t>>12&12])/32*u

 t?0:(fx=bz=new Float64Array(4e6),$b=[]),fxi=callCount=0,

((lpf=function(i,f){
fxii=fxi++,
fx[fxii]??=0,
fx[fxii]+=((i)-fx[fxii])*f
return fx[fxii]
},

hpf=highpass=function(i,f)
{
        return i - lpf(i, f)
},

bpf=bandpass=function(i,hf,lf)
{
        return hpf(lpf(i,hf),lf)
},

nf=notch=function(i,hf,lf)
{
        return (hpf(i,hf)+lpf(i,lf))/1.75
},

lbf=lowBoost=function(i,f,v)
{
        return i+lpf(i,f)*v
},

hbf=highBoost=function(i,f,v)
{
        return i+hpf(i,f)*v
},

bbf=bandBoost=function(i,hf,lf,v)
{
        return i+bpf(i,hf,lf)*v
},

//feeshbread - 6th Wave (filters)

lpf2=function(i,f)
{
        return lpf(lpf(i,f),f)
},

hpf2=function(i,f)
{
        return hpf(hpf(i,f),f)
},

lpr=function(i,f,r)
{
        let call=callCount++;
        t?0:(bz[call+'lp6']=0,bz[call+'lp12']=0);
        let ct=min(f,.999);
        let R=r+r/(1-ct);

        (bz[call+'lp6']+=ct*(i-bz[call+'lp6']+R*(bz[call+'lp6']-bz[call+'lp12'])))
        bz[call+'lp12']+=ct*(bz[call+'lp6']-bz[call+'lp12'])

        return bz[call+'lp12'];
        
},

hpr=function(i,f,r)
{
        return i-lpr(i,f,r)
},

bpr=function(i,hf,lf,r)
{
        return (hpr(lpr(i,lf,r),hf,r))/4
},

nfr=function(i,hf,lf,r)
{
        return (hpr(i,hf,r)+lpr(i,lf,r))/1.75
},

lbr=function(i,f,r,v)
{
        return i+lpr(i,f,r)*v
},

hbr=function(i,f,r,v)
{
        return i+hpr(i,f,r)*v
},

lbr=function(i,hf,lf,r,v)
{
        return i+bpr(i,hf,lf,r)*v
},

(ech$ = 0),
(lp$ = 0),
(echo = (delay, code) => (
        ech$++,
        ($b[ech$] ??= Array(delay).fill(0)),
        (ech = (code % 256) + $b[ech$][t % delay]),
        ($b[ech$][t % delay] = ech / 1.0625),
        ech / 2
)),
(rv = delayReverb =
        (delay, code,lr) => {
                let out = [0, 0];
                for (let $i = 0; $i <= ($A = 6); $i++) {
                        ((out[0] += echo(
                                        delay + $i * ($i * 2 ** 4 + 1),
                                        lpf(code, 1 - $i / 10),
                                )),
                                (out[1] += echo(
                                        delay + $i * ($i * 2 ** 3 + 1),
                                        lpf(code, 1 - $i / 10),
                                )));
                }
                return tanh(atan(bpf(((out[lr] / $A + out[lr] / $A) * 2) / $A, .8, .001))) / 1.5
        }))),

n=$=>2**($/12),

//Goofer Doofer note converter

noteConverter=note=>{
        const notes = {
                C:0,
                D:2,
                E:4,
                F:5,
                G:7,
                A:9,
                B:11,
        };
        if (note[1] === '#') return notes[note[0]]+12*note[2]+1;
        if (note[1] === '-') return notes[note[0]]+12*note[2]-1;
        return notes[note[0]]+12*note[1]
},

bpm=130,sr=24e3,spb=3276

t/4^t/4+(t>>7)

t*(0xAFEDC320>>t/(6-(t>>10&13))&1)?128:0-random()-.5*.9992**(t&16>>4)>>t

(t|t>>9|t>>8)*t&(t>>9|t>>10)

t%0.011025*t

(t>>2)*(t&(t&32768?16:24)|t>>(t>>8&28))|t*((t>>10|t%16*t>>5)&8*t>>10&18)|t>>2

((t*(t>>17&1?t>>16&1?24:21:16)/65.536)*(t&4096?t&8192?2:3:4))

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)

// 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

r=(x,y=12288,z=0.5)=>(t?0:a=Array(y).fill(0),b=x%256+a.shift(),a.push(b*z),b),
Arpeg=r(5/4*[1,9/8,3/2,2,9/4,3,4,9/2,,,,,,,,,6,9/2,4,3,9/4,2,3/2,9/8][t>>10&23]*t&128,12288)/8,R=(a,b)=>Array(a).fill(b),
t?0:F=[1,1,1,...R(3,64/63),28/27,28/27,...R(4,16/15),...R(4,12/11),
9/8,9/8,9/8,8/7,8/7,8/7,7/6,7/6,...R(4,6/5),...R(4,11/9),
5/4,5/4,5/4,9/7,9/7,9/7,21/16,21/16,...R(4,4/3),...R(4,11/8),
...R(8,7/5),...R(8,3/2)],
Riser=(F[t>>13]*t*5/4&64)+(t*5/4&64),
lp=(inp,w)=>{t?0:d=0;if(w==0)return inp;out=inp+d;d=out/(1+1/w);return d/w},
r=random,
m=(t>>12&31)==16?(t>>4&255)/64:0,
Drum=((lp((r()-.5),m)*((parseInt ("8ea88e88ea8e88e8f088e8ee8cef8caa"[t>>12&31],16)>>(3&-t>>10))&1)+asin(sin(sqrt(t&16383)))/PI)+1)*64,
t>>13>=64?0:Riser/2+Arpeg+Drum

pt=(1.1-t/2**16%1)**(1/16),((random()*(-t>>8&255)/256)-.5)/2+abs(sin(t*PI/51.2*2**([9,16,23,9,16,23,9,16,23,9,16,23,4,4,4,4][t>>12]/12)*pt/2))

f=a=>sin(2**(a/12)*t/14.5),R=(x,y=12288,z=0.5)=>(t?0:g=Array(y).fill(0),p=x%256+g.shift(),g.push(p*z),p),R(f(parseInt('ejho'[t>>12&31],36))||0)/3