t^(((t/((t-((((t>>7)*(t&8?1:0)))*(t&32768?1:0)+(((t>>8)*(t&16?1:0)))*(t&65536?1:0)+(((t>>9)*(t&32?1:0)))*(t&131072?1:0)+(((t>>10)*(t&64?1:0)))*(t&262144?1:0)+(((t>>11)*(t&128?1:0)))*(t&524288?1:0)+(((t>>12)*(t&256?1:0)))*(t&1048576?1:0)+(((t>>13)*(t&512?1:0)))*(t&2097152?1:0)))&128))|30000/(t&32760))+((3*t/4&t>>12)?128:0))

((((((0.25*(t-(t>>9&t>>2)))&127)-(t>>10&127))&128)+((((0.25*(t-(t>>9&t>>2)))&63)-(t>>10&63))&64)+((((0.25*(t-(t>>9&t>>2)))&31)-(t>>10&31))&32)+((((0.25*(t-(t>>9&t>>2)))&15)-(t>>10&15))&16)+((((0.25*(t-(t>>9&t>>2)))&7)-(t>>10&7))&8)+((((0.25*(t-(t>>9&t>>2)))&3)-(t>>10&3))&4)+((((0.25*(t-(t>>9&t>>2)))&1)-(t>>10&1))&2))&t>>13)

(t-(t^t>>5)+t*(t>>14&14)&255)/4+(100*((t<<2|t>>5|t^63)&(t<<10|t>>11))&255)/4+(((1024/(t%4096))*256)&255)/2

 const array=([0,4,7,9,11,4,7,9]);
const sn=([1,0])
const kic=4096
return t=>((((t*=8000, ((t/8*2**(array[(t>>11)%4]/12)%32))+(sinh(sin(t*PI/16*2**(array[(t>>12)%8]/12))*4)+32)%256*(1-t%2048/3000))+(t*random()*sn[(t>>10)%2]%32)%256*(1-t%1024/1500)+(sin(cbrt(t%kic)*8)*32)+32)&255)/127)-.5

an=(x,y)=>x>0?x%y:y-abs(x%y) //an stands for antinegative here, kinda like modulus but doesn't turn negatives into negatives
//for example, antinegative(-1, 10) will be 9 while (-1)%10 is -1
,(
t*((2**(1/12))**(an(t>>12&63^(t>>12&63)-5,15)*12/7+.24|0)) //the melody itself
%256-128) //waveform stuff
*(~t&4095)>>11 //the "synth" itself

BPM=160,SR=48000,T=t/15*BPM/SR*4096,an=(x,y)=>x<0?y-abs(x%y):x%y,n=(T>>19&7)<=6&&(T>>19&7)>=1?((T>>19&7)<=5&&(T>>19&7)>=2?PI/5:PI/5.12):E/4.6,magik=2**(1/12),c=T=>((((vTemp=t=>(t*n*magik**([8,0,-7,5,0,-7,8,0,-7,5,0,-7,8,0,5,-7,10,0,-7,5,0,-11,10,1,-7,7,3,-2,10,3,-2,7,12,0,-7,8,0,-7,12,0,-7,8,0,-7,12,0,8,-7,12,0,-7,8,0,-7,12,0,10,1,3,7,-2,3,5,7,8,-4,-11,5,-4,-11,8,-4,-7,5,-4,-11,10,-4,5,-7,7,-2,-9,3,-2,-9,7,-2,-9,3,-9,-2,8,7,5,10,12,0,-7,8,0,-7,12,0,-7,8,0,-7,12,0,8,-7,12,0,-7,8,0,-7,12,0,10,1,3,7,-2,3,5,7,][T>>12&127])))(t)*[1+(t&T>>13&1),5-(t&T>>11&7)][t&1]&127)-(64-(T>>7&48))&128)%256-(~T>>7&48))/256*[1.0002,1.0003][t&1]**(-T%4096)/2+(((vTemp(t)^vTemp(t)*5)/2&127)-(64-(T>>7&48))&128)/256*[1.0002,1.0003][t&1]**(-T%4096)/2,c2=T=>(((t/2*n*magik**(an(an(T>>12&63^(T>>12&63)-5,15)-(T>>17&2),15)/7*12+.24|0)&127)-(64-(T>>7&48)*1.1)&128)%256-(T>>7&48))*(1-T/4096%1/1.2)/256,filter=x=>sqrt(abs(x))*sign(x),kick=T=>3*sin(cbrt(tempv=T*4&(2**14/[1,,H=t/1.5&1,,S=((T>>19&3)!=3?1:sin(t*E>>4)*sin(t>>4)),,H,1,1,,H,,S,2,1,H,1,,H,,S,,H,,1,1,2,1,2,1,13,19][T>>12&31])-1)*3.5),bass=T=>t*magik**[5,5,7,3,5,5,5,3,1,1,3,3,-2,-2,-2,1][15&T>>15]*n,h=T=>t*magik**[0,7,7,10,5,5,7,3,3,5,2,2,3,2,0,5][15&T>>12^2]/1.5*2*n,b=T=>((bass(T)^bass(T)*2.5)/256%1-(bass(T)^bass(T)*2.5)/128%1)*filter((bass(T)/128+(T>>13&5)*E)%1-.5)+!!(T>>19&3)*(bass(T)^bass(T)*((T>>19&3^1)+2)+T/128)/512/(2**((T>>19&3)>=1))/(1+((T>>19^1&3)==3))%1-.5,HH=T=>an((h(T)/16%8-4)*(1-T/4096/'2211444122224441'[T>>12&15]%1),2+(T/524288%1)*1.5)-1-(T/524288%1)/1.5,max(min((c(T)*24+c2(T)*18+kick(T)*4*!!(T>>19&2)+b(T)*5+.5*sign(HH(T))/max(min(abs(HH(T)),.3),.1)/2)*(~T&2097152?min(T%4194304/524288,1):max(min(8-T%4194904/524288,1),0))/5*(~T>>13&1&T>>20^1?1:abs(T/4096%1-1)*2),1),-1)

sr=48000,bpm=150,T=t/120*bpm/sr*16384,an=(x,y)=>x<0?y-abs(x%y):x%y,t?(()=>{if (T % 2048 == 0) {return (()=>{c = ((c^c * 2) / 3 + c / (c * 5 ^ c >> 2 | c) ^ c << 4); c ^= c >> 1; c ^= c << 17; c ^= c / 777 ^ c << 13; return c})()} else {return c}})():c=913/*the seed*/,t*2**an((an(c,28)/7*12|0)/12,1)%256/2+t*2**an(((an((~T>>15)+1,4)+2)/7*12|0)/12,1)/4%256/2

BPM=150,SR=40960,T=t/SR*4096/15*BPM,clamp=(l,x,h)=>min(max(x,l),h),sr=48000,pi=PI,a=()=>{v=[0,0];a=()=>{let a=0;for (let i=0; i<16; i++) {  a += ((t/128*2**(([0,3,5,8][i%4]+[0,2,-2,1][(T>>15)&3])/12)*2**int(i/4))%2-1)/2*.01**((T/65536*(16-i)/2|0)/4%1)};return a};v[0]=a();v[1]=v[0];b=()=>{let a = sin(5*cbrt(T&(2**12/[1,,H=t&2^1,,S=2**12,,H,1,1,,S,,2,2,1,H,1,,H,,S,,H,,1,1,2+H*(T>>17&1),1,2+H*(T>>17&1),1,t/3*4&42,t/3*4&55][T>>12&31])-1));v[0] = tanh(v[0])+a*6*2; v[1] = tanh(v[1])+a*6*2;return v};b();return v},a()

(BPM=156,sampleRate=32000,tf=abs(t/sampleRate/180*3*32768*BPM),p=(1/sampleRate*128)*415*2**(2/12),
an=(v,b)=>v<0?(b-abs(v%b)):v%b,
// What you're seeing is feeshbread's Dead Data Reverb
t||(fb1=fb2=0,wsin=(phase)=>(-cos(phase/128*PI)+1)*128-.5,fx=[],dMax=1e6,lpf=lowPassFilter=(a,c)=>(lp_fxii=fxi++,fx[lp_fxii]??=0,fx[lp_fxii]+=(a-fx[lp_fxii])*c),hpf=highPassFilter=(a,c)=>a-lpf(a,c),bpf=bandPassFilter=(a,hc,lc)=>hpf(lpf(a,lc),hc),bbf=bandBoostFilter=(a,hc,lc,v)=>a+bpf(a,hc,lc)*v,n=noise=c=>(ni=fxi++,fx[ni]??=0,fx[ni]=fx[ni]+(random()-.5-fx[ni])*c),alpf=asyncLowPassFilter=(a,cu,cd)=>(si=fxi++,fx[si]??=0,sr=fx[si],fx[si]+=(a-sr)*(sr<a?cu:cd)),dly=multiTapdlay=(audio,heads,dw,fbfn=x=>x)=>{dly_fxii=fxi++;fx[dly_fxii]??=Array(dMax).fill(0);dly_wi=dt%dMax;dly_feed=audio;dly_out=0;for(let head of heads){dly_ri=(dMax+dt-round(head.t))%dMax;dly_feed+=fx[dly_fxii][dly_ri]*head.fb;dly_out+=fx[dly_fxii][dly_ri]*head.m;}fx[dly_fxii][dly_wi]=fbfn(dly_feed);return audio*(1-dw)+dly_out*dw;},cmp=(a,th,ra,at,rl,sc=a)=>(ci=fxi++,fx[ci],a/(alpf(max(abs(sc)-th,0),at,rl)/th*ra+1))),fxi=0,dt=t,q=(30*sampleRate)/(BPM*3/3),rvrbHeads=[[{t:1e3+wsin(t/210),m:.5,fb:.15},{t:1e4+wsin(t/250),m:.5,fb:.35},{t:17e3+wsin(t/300),m:.1,fb:.45},{t:37e3+wsin(t/380),m:.1,fb:.65},{t:q*1.005+wsin(t*1.005/256),m:1,fb:.25}],[{t:11e2-wsin(t/230),m:.5,fb:.15},{t:13e3-wsin(t/270),m:.5,fb:.35},{t:14e3-wsin(t/280),m:.1,fb:.45},{t:4e4-wsin(t/400),m:.1,fb:.65},{t:q*.995-wsin(t*.995/256),m:1,fb:.25}]],

d=echo=j=>16192+(sin(t*j/4096)*1e3)*j,r=tf/8,pt=r%4096,x=(j,wv,hs)=>(b=a=>(t*p/a*3.9*2**(((bt=[0,0,0,0,-4,-4,-2,-5][tf>>17&7])+[[0,5,7],[0,5,12],[0,5,7],[0,5,12],[0,9,11],[0,9,16],[0,7,9],[0,10,17]][tf>>17&7][(tf>>14&7)%3]+1)/12))%256-128,kc=(1-(r/1024)%1)*!(r>>10&3),tanh(cmp(bbf((tf>>20&3)*tanh(sin(14*sqrt(pt)**.65))*kc*222*(1-r/2048%1)**2+((tf>>18&3)==3)*hpf(n(.6)*120*(1-((r/1024)%1)**.5)**1.5,.1)+(tf>>20&2)*(atan(sin((2e6+(pt)*8)*(1-(1/((pt)*100+.1))*2)/70))*8*(max((1-pt/2048*2),0)**1.8)*(r>>12&1)+(fb1=hpf(fb1*.5+n(.2)*14*(1-((r/8192+.5)%1))**2,.2)))*24,.025,.2,-.5)+2*((r/4096%1*.8+.2)*(1-kc)**1.3)*(dly(fb2=hpf(bpf(-fb2+((e=a=>(((temp=t=>t*p*a/2.6*8*(2**(1/12))**((an(an(tf>>13&63^(tf>>13&63)-5,15)-(tf>>18&2),15)/7*12+.24|0)))(t)^temp(t)/2)/2&255)),e(1)+e(j)),.05,.9),.08)/2,hs,.55,x=>tanh(bpf(x,.01,.8)/180)*100)+bbf(1.3*lpf((b(4*j)+b(8))/4,(1-((r/1024)%1))**2*.3+.02)*(1-r/1024%1)**.1*(r/4096%1)**.1,.01,.5,-.3)),50,1,.01,.1e-3)/40))*1.1,[x(1,tanh,rvrbHeads[0]),x(1,atanh,rvrbHeads[1])])

t/=(_____________________________=t/t)+(_____________________________/(_____________________________+_____________________________+_____________________________)),Array(trunc(____________________________________________________________________________________________________=E)*_____________________________+_____________________________+_____________________________).fill().map((_,__)=>(___=sin)((_=t)*(____=PI*____________________________________________________________________________________________________)/(_____=(x,_)=>x**_)(____________=(_____________________________/_____________________________)+(_____________________________/_____________________________),_____________________________________________________=_____(____________,____________+(____________>>(____________/____________))))*_____(___________	

f=(t%65536/3>>7&63)/(70+(cos(t*PI/65536/3)+.94)*200)/3+.01,a=i=>i&&(t*2**(([0,4,7,11][t&3]-'0075'[t>>16&3])/12)+f*i*7)%256/100+a(i-1),(a(100)/128-1)*-cbrt(t%8192-13E3)/32*min(1,abs(asin(sin(t*PI/8192)))*48),
//NEW CODE STARTS BELOW, Original by Decent-Manager-6169
M=(a(100)/128-1)*-cbrt(t%8192-13E3)/32*min(1,abs(asin(sin(t*PI/8192)))*48)*2,
SINL=sin((a(1)-1)*((t>>13&63)+15)/8),
SINR=sin((a(1)-1.5)*((t>>13&63)+15)/8),
dr=min(1,max(-1,sin(t/256/('4475'[t>>16&3]/5))/((t>>10&31)+1)*8)),sn=
(sin(t/128/('4475'[t>>16&3]/5))+
sin(t*random())/((t>>8&31)+.5))/((t>>10&31)+1)*3,
sn2=
(sin(t/128/('4475'[t>>16&3]/5))+
sin(t*random())/((t>>10&31)+.5))/((t>>8&31)+1)*3,
sn3=
(sin(t/128/('4475'[t>>16&3]/5))+
sin(t*random())/((t>>10&31)+.5))/((t>>10&31)+1)*3,
sn4=
(sin(t/128/('4475'[t>>16&3]/5))+
sin(t*random())/((t>>10&31)+.5))/((t>>10&31)+1)*3,
drsn=[dr,sn3][t>>15&1],
drsn2=[dr,sn4][t>>15&1],
SO=[[SINL,SINR],
[M/(t>>12&127)*128,-M/(t>>12&127)*128,],
[M+dr+sn,-M+dr+sn2],
[M+dr+sn,-M+dr+sn2],
[sin(min(.1,max(-.1,(M)))*8*((t/8192&7)+1)),sin(min(.1,max(-.1,(-M)))*8*((t/8192&7)+1))]
,
[sin(min(.1,max(-.1,(M)))*8*((t/8192&7)+1))+drsn,sin(min(.1,max(-.1,(-M)))*8*((t/8192&7)+1))+drsn2]
,[sin(min(.1,max(-.1,(M)))*8*((t/8192&7)+1))+drsn,sin(min(.1,max(-.1,(-M)))*8*((t/8192&7)+1))+drsn2],
[sin(M*(3+sin(t*PI/8192))),sin(M*(2+sin(t*PI/8192)))],
[sin(M*(3+sin(t*PI/8192)))+drsn,sin(M*(2+sin(t*PI/8192)))+drsn2]],
SO[(t>>19)%SO.length]

BPM=160,SR=48000,T=t/15*BPM/SR*4096,an=(x,y)=>x<0?y-abs(x%y):x%y,n=(T>>19&7)<=6&&(T>>19&7)>=1?((T>>19&7)<=5&&(T>>19&7)>=2?PI/5:PI/5.12):E/4.6,magik=2**(1/12),c=T=>((((vTemp=t=>(t*n*magik**([8,0,-7,5,0,-7,8,0,-7,5,0,-7,8,0,5,-7,10,0,-7,5,0,-11,10,1,-7,7,3,-2,10,3,-2,7,12,0,-7,8,0,-7,12,0,-7,8,0,-7,12,0,8,-7,12,0,-7,8,0,-7,12,0,10,1,3,7,-2,3,5,7,8,-4,-11,5,-4,-11,8,-4,-7,5,-4,-11,10,-4,5,-7,7,-2,-9,3,-2,-9,7,-2,-9,3,-9,-2,8,7,5,10,12,0,-7,8,0,-7,12,0,-7,8,0,-7,12,0,8,-7,12,0,-7,8,0,-7,12,0,10,1,3,7,-2,3,5,7,][T>>12&127])))(t)*[1+(t&T>>13&1),5-(t&T>>11&7)][t&1]&127)-(64-(T>>7&48))&128)%256-(~T>>7&48))/256*[1.0002,1.0003][t&1]**(-T%4096)/2+(((vTemp(t)^vTemp(t)*5)/2&127)-(64-(T>>7&48))&128)/256*[1.0002,1.0003][t&1]**(-T%4096)/2,c2=T=>(((t/2*n*magik**(an(an(T>>12&63^(T>>12&63)-5,15)-(T>>17&2),15)/7*12+.24|0)&127)-(64-(T>>7&48)*1.1)&128)%256-(T>>7&48))*(1-T/4096%1/1.2)/256,filter=x=>sqrt(abs(x))*sign(x),kick=T=>3*sin(cbrt(tempv=T*4&(2**14/[1,,H=t/1.5&1,,S=((T>>19&3)!=3?1:sin(t*E>>4)*sin(t>>4)),,H,1,1,,H,,S,2,1,H,1,,H,,S,,H,,1,1,2,1,2,1,13,19][T>>12&31])-1)*3.5),bass=T=>t*magik**[5,5,7,3,5,5,5,3,1,1,3,3,-2,-2,-2,1][15&T>>15]*n,h=T=>t*magik**[0,7,7,10,5,5,7,3,3,5,2,2,3,2,0,5][15&T>>12^2]/1.5*2*n,b=T=>((bass(T)^bass(T)*2.5)/256%1-(bass(T)^bass(T)*2.5)/128%1)*filter((bass(T)/128+(T>>13&5)*E)%1-.5)+!!(T>>19&3)*(bass(T)^bass(T)*((T>>19&3^1)+2)+T/128)/512/(2**((T>>19&3)>=1))/(1+((T>>19^1&3)==3))%1-.5,HH=T=>an((h(T)/16%8-4)*(1-T/4096/'2211444122224441'[T>>12&15]%1),2+(T/524288%1)*1.5)-1-(T/524288%1)/1.5,max(min((c(T)*24+c2(T)*18+kick(T)*4*!!(T>>19&2)+b(T)*5+.5*sign(HH(T))/max(min(abs(HH(T)),.3),.1)/2)*(~T&2097152?min(T%4194304/524288,1):max(min(8-T%4194904/524288,1),0))/5*(~T>>13&1&T>>20^1?1:abs(T/4096%1-1)*2),1),-1)

t?0:z1=[],callCount=0,lpf=lowPassFilter=(a,c)=>(call=callCount++,z1[call]??=0,z1[call]+=(a-z1[call])*c),hpf=highPassFilter=(a,c)=>a-lpf(a,c),pitches={st:1,downtones:4.8},pn=(x,a)=>2**((parseInt(x[a],36)+pitches.st)/12)/pitches.downtones,a=t=>t<0?0:hpf((((t*pn("0CV0COHJ8OMQAMTY",t>>13&15)&127)+32&128)-64)*abs(t/1048576%1-.5)**(t/8192%1),.005),s=(()=>{let s=0;for(let i=0;i<50;i++){s+=a(t-i*12288)/(abs(t/1048576%2-1)+1.25)**i}return s})()/256+(t/128*pn("000000008888AAAA",t>>13&15)&1)/4*"1001001010"[t>>13&7],lpf(s,min(t/1048576,1));

BPM=156,SR=24000,T=t/SR*4096*BPM/15,_p=1.95,a=[0,3,5,7,0,3,-4,-2],a1=[3,7,9,11,3,7,0,2],a2=[7,10,12,14,7,10,3,5],B=a=>(_p/1.5*t*2**(a[i=7&T>>15]/12)&-T>>6)%256/5,S=(s,p)=>.7*(((p/1.5*_p*t*2**([a,a1,a2,a1][3&T>>s][i]/12)&255)-128)*(T>>6&255^255)>>7&255)/2,kick=T=>128-abs((3e5/(T&(2**14/[2,4,1,15,4,2,4,17,1,2,4,15,1,8>>(T>>11&2),8>>(T>>11&2),t*_p&T>>4&31][T>>13&15])-1)&255)-128)*2,kick2=T=>sin(5*cbrt(T&(2**12/[1,,H=t*_p&2,,SS=(~T>>19&4?2**12:sin(t>>5)),,H,1,1,,SS,,2,2,1,H,1,,H,,SS,,H,,1,1,2+H*(T>>17&1),1,2+H*(T>>17&1),1,t/3*4&42,t/3*4&55][T>>12&31])-1))*(T>>19&6)*500,b=T=>t*2**(a[T>>15&7]/12)/1.5*_p,h=T=>(p1=(((t*_p/3*[1,1,1,1,1,1,1,1.2,1.2,1.2,1.2,1.2,1.2,1.2,1.2,1.35,1.35,1.35,1.35,1.35,1.35,1.35,1.35,1.5,1.5,1.5,1.5,1.5,1.5,1.5,1.5][(T>>12)%32])&127)+[112,96,80,64,112,96,80,112,96,80,64,112,112,96,80,64,112,96,80,64,112,96,80,64,64,80,96,112,116,120,128][(T>>12)%32]&128),p2=(log2(T/64%256)*1024*3/3.5&128)*(1+(T>>13&1))+(p1*((T>>13)&1)&128),p3=((t*_p*(2+((t*_p/3*[1,1,1,1,1,1,1,1.2,1.2,1.2,1.2,1.2,1.2,1.2,1.2,1.35,1.35,1.35,1.35,1.35,1.35,1.35,1.35,1.5,1.5,1.5,1.5,1.5,1.5,1.5,1.5][(T>>12)%32])>>7&1))/3*[1,1,1,1,1,1,1,1.2,1.2,1.2,1.2,1.2,1.2,1.2,1.2,1.35,1.35,1.35,1.35,1.35,1.35,1.35,1.35,1.5,1.5,1.5,1.5,1.5,1.5,1.5,1.5][(T>>12)%32])&127)-((t*_p*2*(2+((t*_p/3*[1,1,1,1,1,1,1,1.2,1.2,1.2,1.2,1.2,1.2,1.2,1.2,1.35,1.35,1.35,1.35,1.35,1.35,1.35,1.35,1.5,1.5,1.5,1.5,1.5,1.5,1.5,1.5][(T>>12)%32])>>7&1))/3*[1,1,1,1,1,1,1,1.2,1.2,1.2,1.2,1.2,1.2,1.2,1.2,1.35,1.35,1.35,1.35,1.35,1.35,1.35,1.35,1.5,1.5,1.5,1.5,1.5,1.5,1.5,1.5][(T>>12)%32])&192)+96+(~T>>19&1?p1:p2)&224),min(max(((B(a)+B(a1)+B(a2)-(h(T)*1.3-128)*(~T>>17&1)+[S(14,1)+S(15,2),2*(S(9,1)+S(14,2))*(1-T%8192/9E3)][1&T>>13]+(kick(T)*!!(T>>19&12)-kick2(T)*((T>>19&15)>=2))/2+(hihatPrepare=T=>(random()-.5)*(1-T/4096%1)*128*(2-abs(((T/131072+2)%4)-2))*(T>>18&1))(T))+(((b(T)^b(T)*2)%256/2)+(b(T)/2%256*(T>>12&127)>>5^b(T)/2)%256*!!(T>>19&7)/2))/1.5,0),255)

// filter buffer
let filter = new Float32Array(131072);

// settings
var settings = {
  BPM: 240,
  SPD: 1,
  FRQ: 440
};

var length = 16;
var BPS = settings.BPM * settings.SPD / 60;


function P(time, note, pitch) {
  return 2 ** ((note - 69) / 12 + pitch) * settings.FRQ;
}

// oscillators
function Square(input, duty = 0.5) {
  return input % 1 > duty ? -1 : 1;
}

function Saw(input) {
  return 2 * input % 2 - 1;
}

function Sine(input) {
  return sin(4 * PI * input);
}

function Triangle(input) {
  return abs(input % 2 - 1) - 0.5;
}

function Noise(input) {
  return sin((255 * input | 0) ** 3);
}

// filters
function lowPass(buff, input, strength) {
  return filter[buff] += (input - filter[buff]) * strength;
}

function highPass(buff, input, strength) {
  return lowPass(buff, input, strength) - input;
}

function bandPass(buff, input, strength) {
  return highPass(buff + 1, lowPass(buff, input, strength), strength);
}


function MIDI(
  noFilter = 1, filt, buff, strength_,
  time, func, offset, note, pitch,
  strength, vol = 1
) {
  var code = (time * BPS - offset) > 0
    ? func(time * P(time, note, pitch))
        * strength ** ((time * BPS - offset) % length) ** 0.7
        / 8 * vol
    : 0;

  return !noFilter ? filt(buff, code, strength_) : code;
}


return function(time) {
  return [
    // melody
    [1, null, null, null, time, Square, 0,  -4, 5, 0.5, 2],
    [1, null, null, null, time, Square, 1,   3, 5, 0.5, 2],
    [1, null, null, null, time, Square, 2,  10, 5, 0.5, 2],
    [1, null, null, null, time, Square, 3,  11, 5, 0.5, 2],
    [1, null, null, null, time, Square, 4,  15, 5, 0.4, 2],
    [1, null, null, null, time, Square, 6,   8, 5, 0.4, 2],
    [1, null, null, null, time, Square, 7,  10, 5, 0.4, 2],
    [1, null, null, null, time, Square, 8,  -1, 5, 0.5, 2],
    [1, null, null, null, time, Square, 9,   3, 5, 0.5, 2],
    [1, null, null, null, time, Square, 10,  4, 5, 0.5, 2],
    [1, null, null, null, time, Square, 11,  8, 5, 0.2, 2],
    [1, null, null, null, time, Square, 12, 10, 5, 0.5, 2],
    [1, null, null, null, time, Square, 13,  6, 5, 0.2, 2],
    [1, null, null, null, time, Square, 14,  1, 5, 0.4, 2],
    [1, null, null, null, time, Square, 15,  3, 5, 0.4, 2],

    // bass
    [1, null, null, null, time, Saw,  0, -4, 3, 0.7, 3],
    [1, null, null, null, time, Saw,  8, -8, 3, 0.7, 3],
    [1, null, null, null, time, Saw, 12, -6, 3, 0.7, 3],

    // triangle blips
    [1, null, null, null, time, Triangle,  4,   -4, 9, 0.01, 8],
    [1, null, null, null, time, Triangle,  4.25,-4, 9, 0.01, 8],
    [1, null, null, null, time, Triangle,  4.5, -4, 9, 0.01, 8],
    [1, null, null, null, time, Triangle,  4.75,-4, 9, 0.01, 8],
    [1, null, null, null, time, Triangle,  5,   -4, 9, 0.01, 8],
    [1, null, null, null, time, Triangle,  5.25,-4, 9, 0.01, 8],

    [1, null, null, null, time, Triangle, 12,   -6, 9, 0.01, 8],
    [1, null, null, null, time, Triangle, 12.25,-6, 9, 0.01, 8],
    [1, null, null, null, time, Triangle, 12.5, -6, 9, 0.01, 8],
    [1, null, null, null, time, Triangle, 12.75,-6, 9, 0.01, 8],
    [1, null, null, null, time, Triangle, 13,   -6, 9, 0.01, 8],
    [1, null, null, null, time, Triangle, 13.25,-6, 9, 0.01, 8],
  ]
  .map(([noFilter, filt, buff, strength_, time, func, offset, note, speed, strength, vol]) =>
    MIDI(noFilter, filt, buff, strength_, time, func, offset, note, speed, strength, vol)
  )
  .reduce((a, b) => a + b);
};

(T=3*t/5)?c:(L='length',c=1+int(random()*4|0),a=new Array(round(12288*(C=1+int(2*random())))-1).fill(0),w={t:(t,n)=>{var o=PI*t/128;return sin(o+sin(o+sin(o)))*n},o:t=>sin((t|0)**3)},f=(t,n)=>t/n,add=(...n)=>n.map(t=>f(t,n.length)).reduce((t,n)=>t+n)),p=2**([[0,3,7,-4],[8,10,12,7]][T*c&8191?C:C=(int(2*random()))][(T*c&4095?count2:count2=int(random()*4))&3]/12+1)*2**(c/12),s=(n,o)=>add(w.t(n?t*p-o:t*p+o,min(1,T*c/512%16)*.1**(T*c/8192%1)**2),w.o(4*t)*(T*c&8191?C:C=int(random()*3)&1)*1E-36**(T*C/4**7%1)),[add(s(1,t/64),s(0,t/128)),add(s(0,t/64),s(1,t/128))].map(n=>a[t%a[L]]+=(2*tanh(n)-a[t%a[L]|0])/6).reduce((n,o)=>[n*(1+sin(t/8**5+1)/2),o*(1+cos(t/8**5+2)/2)].map(x=>x*min(t/4**8,1)))

t||(A=x=>new Float32Array(x),n=8192,L='length',a=A(4**7),b=A(n),c=A(6144)),FF=A(512),p=t/n%8%3,c=[[0,4,7,11]],RR=random(),N=(x,y)=>x/y,LP=(x,y,z)=>FF[x]+=(y-FF[x])*z,HP=(x,y,z)=>LP(x,y,z)-y,F=(...x)=>x.map(i=>N(i,x.length)).reduce((a,b)=>a+b),f=(x,y=1)=>{r=x*PI/128;return sin(r+sin(r+sin(r)*y))*y},h=(l,d=0)=>[c[0],c[0],[-7,-3,0,4],[-5,-1,2,6]][t>>16&3].map(i=>f(t*2**(i/12+d)+l,min(3*p,1)*.3**p/8)).reduce((a,b)=>a+b)+f(~t*2**(-'0075'[t>>16&3]/12-1)+l,min(t/8**5%2,1))/20,v1=h(1)+h(t/64,-1),v2=h(-1,-1)+h(t/64),P=t%a[L]|0,Q=t%b[L]|0,R=t%c[L]|0,[v1,v2].map(i=>b[Q]=b[Q]*.6+i,c[R]=c[R]*.7+b[Q]*.6,a[P]=a[P]*.8+c[R]*.7,a[P]+b[Q]+c[R]).reduce((a,b)=>[a,b].map(x=>tanh(F(HP(0,2*x,.1)*8,8*((t>>11&15^12?4752>>(t>>12&15):1)&1?3*LP(1,tanh(4*sin(t/41)+8*sin(RR-.5)*(1+sin(4*PI*t/n+3)))*.2**(2*t/n%1),.1):sin(.8*(t%n)**.5)*2E-5**(t/n%1)),HP(2,sin(RR-.5),5)*4E-5**(t/4096%1)*.4)/2)))

x=t&t>>12,y=t/4096,z=!(~t>>13&15),(y/x%1==y%x/x)*(y/2**!z%1)**.5*127+(50*(t%2**(13-z))**.5&128)

p=[1.5,1.8,2,1,1,2,1,1,1.6,1,1,1.5,1,1,1.2,1][(t>>12)%16]*[1,1,1.5,1.35][3&t>>17],f=a=>((0xAFEDC320>>(a*t))&1)*255,g=a=>f(p/16*a)/(1024+(t&4095))*1024,[g(.99),g(1.01)]

t%=786432,r=(x,y=12288,z=0.5)=>(t?0:a=Array(y).fill(0),b=x%256+a.shift(),a.push(b*z),b),pI=parseInt,A=r(sin(t/20480*2*PI*528*2**(pI("J HJC AC7 570   5 35A   5 35D   "[t>>12&31],36)/12))||0,6144)/2,(t&16384?(t&16383):(t&8191))?0:S=Array.from({length:s=int(81920/(528*2**((pI("8CJ 8CJ 6AH 6AD 8CJ 8CJ BFM BFI"[t>>13&31],36)||0)/12)))},()=>random()),S[t%s]=S[t%s]/2+S[(t+1)%s]/2,B=r(S[t%s]-.5),D={K:sin(cbrt(t&4095)*8)/(1+((t/256)&15))},D.S=D.K/2+(D.H=(random()-.5)*(-t>>4&255)/256),C=D["K SKH SK  SKS   "[t>>12&15]]||0,[B+A,B+C][t>>19&1]

(4*(x=t>>6^t>>13)^t)+t>>(y=t>>11)%8|t%32^y<<x-t/3.12524|y<<6

t?0:v=Array(r=48e3).fill(0),f=floor,s=f(t/12e3),m=sin(t/((25+f(t/192e3)%4)-s%16))+v.shift(),b=sin((s%4?1e2:1e4)/(t%12e3)),n=!(f(t/6e3)%2)*(random()*((t/48e3%1)-1))/2,v.push(m/3),(m+b+(f(t/r)%2)*n)/3

sin(t/([25,25,22,23][0|t/48e3%4]-(0|t/12e3%2)))*(t/6e3%1-1)-sin(t/1e5)/1.5-1

#include<stdio.h>
#include<stdlib.h>
#include<math.h>

#define r 48000

//Set output length (in seconds) here!
#define time_seconds 30

int main(){
  double t;
  double out;
  double a[r]={0};

  FILE *f = fopen("bb.raw","wb");

  while(t<(r*time_seconds)){
    out=sin(t/(25-floor(fmod(t/12000,16))))/3+a[(int)fmod(t,r)];
    a[(int)fmod(t,r)]=out/1.4;
    fwrite(&out,sizeof(double),1,f);
    t++;
  }
  fclose(f);
  return 0;
}

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)

(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))

-----BEGIN PGP SIGNED MESSAGE-----
Hash: SHA512

this is part 2/2.

song chooser:
sr=44100,t||(oldt=0,realt=0,olddiff=0,song=0),songNames=["42 melody","sierpenski harmony","street surfer"],songCode=[(t)=>(t*(42&t>>10)),(t)=>(t&t>>8),(t)=>(t&4096?t/2*(t^t%255)|t>>5:t/8|(t&8192?4*t:t))],difference=t-oldt,oldt=t,difference,realt++,sign(difference)!=sign(olddiff)?(song+=sign(difference),realt=0):difference/olddiff==2?(song+=sign(difference),realt=0):0,olddiff=difference,song=min(songCode.length-1,max(0,song)),realt%1024?songCode[song](floor(realt*8000/sr)):(()=>{throw songNames.map((a,b)=>((b==song?"\n>\xa0":"\n\xa0\xa0")+a)).join("")})()

from original: "detect your samplerate [link to "unnamed, for song chooser (detect your samplerate)"], then put it into sr and the sample rate part (important! it will not work otherwise)

use the play buttons to select the song"
released january 1, 2024. bytebeat, 44100hz.
remix of (just includes) stephanshi's minification of a beat by skurk & raer, erroneously referred to as "street surfer". original skurk beat at https://www.pouet.net/topic.php?post=388479 , raer's modification at https://www.pouet.net/topic.php?post=388494 , and stephanshi's minification at https://dollchan.net/bytebeat

unnamed, for song chooser (detect your samplerate):
sr=100000,
t||(realt=0),realt++,(()=>{throw floor(sr*realt/t)})()

released january 1, 2024. bytebeat, 100000hz.
original.

uwa!!:
old version: sr=48000,tempo=280,
t?0:(R=new Array(RL=floor(sr*0.3)),RI=0,N1={N:0,D:0,L:0,wave:(p)=>(4*((p%1)-(p%0.5))-1),l:0.1,d:.4},N2={N:0,D:0,L:0,wave:(p)=>(4*((p%1)-(p%0.5))-1),l:.05,d:.5},D={N:0,D:0,L:0,wave:random,l:0,d:.1,p:1}),nl=(sr*60)/tempo,ni=floor(t/nl)%32,pt=floor(t/(nl*32)),n1=[22,,20,22,15,,13,15,10,,8,10,5,,,,8,,6,8,13,,,,8,,6,8,16,,,],n2=!(pt&1)?[-4,,-2,,0,,,,-4,,-2,,0,,,,-5,,-3,,-1,,,,-7,,-5,,-3]:[-4,,-2,,0,,,,-4,,-2,,0,,,,-3,,-1,,1,,,,-7,,-5,,-3],DA={l:.05,d:.1},DB={l:.2,d:.1},DC={l:.4,d:.04},d=[DA,,DC,DA,DB,,,DC,DA,,DC,DA,DB,,,,DA,,DC,DA,DB,,,DC,DA,,DC,DA,DB,,,,DA],U=(N,n)=>(floor(t%nl)==0?(N.p?(N.l=n[ni]?.l||N.l,N.d=n[ni]?.d||N.d):(N.N=2**(n[ni]/12)||N.N),N.D=typeof n[ni]=="undefined"?N.D:sr*N.d):(N.D--)),P=(N)=>(l=N.l**(sr/48000),N.L=(1-l)*N.L+l*N.wave(t*(440/sr)*N.N)*max(0.,N.D/sr/N.d)),U(N1,pt<4?n1:pt<6?[]:pt<8?n1:[]),U(N2,pt<8?n2:[]),U(D,pt<4?[]:pt<8?d:[]),RI=++RI%RL,R[RI]=0.3*(R[RI]||0)+P(N1)*.4+P(N2)*.2+P(D)*.9

new version: sr=48000,tempo=280,
t?0:(R=new Array(RL=floor(sr*0.3)),RI=0,N1={N:0,D:0,L:0,wave:(p)=>(4*((p%1)-(p%0.5))-1),l:0.1,d:.4},N2={N:0,D:0,L:0,wave:(p)=>(4*((p%1)-(p%0.5))-1),l:.05,d:.5},D={N:0,D:0,L:0,wave:(()=>(random()-0.5)),l:0,d:.1,p:1}),nl=(sr*60)/tempo,ni=floor(t/nl)%32,pt=floor(t/(nl*32)),n1=[22,,20,22,15,,13,15,10,,8,10,3,,,,8,,6,8,13,,,,8,,6,8,16,,,],n2=!(pt&1)?[-13,,-9,,-2,,,,-13,,-9,,-2,,,,-15,,-11,,-4,,,,-15,,-11,,-7]:[-13,,-9,,-2,,,,-13,,-9,,-2,,,,-10,,-6,,1,,,,-10,,-6,,-3],DA={l:.05,d:.1},DB={l:.2,d:.1},DC={l:.4,d:.04},d=[DA,,DC,DA,DB,,DC,DA,,,DC,DA,DB,,,,DA,,DC,DA,DB,,DC,DA,,,DC,DA,DB,,,,DA],U=(N,n)=>(floor(t%nl)==0?(N.p?(N.l=n[ni]?.l||N.l,N.d=n[ni]?.d||N.d):(N.N=2**(n[ni]/12)||N.N),N.D=typeof n[ni]=="undefined"?N.D:sr