d=(t&t>>12)*t/11025,sin(d*PI/2)*64+128

sin(t*(t&t>>12)/22050*PI)/2

https://dollchan.net/bytebeat/#v3b64q1ZKzk9JVbJSKrGzMzSwsdEA0iaaqhoW2hrGaiAxQ01dKMtUU1OpFgA

t/=y=48E3,t2=y*t,p=x=>2**(.76+x/12),x=T=>(255&-T/128)*(128&(a=t2*p([0,3,7,10][S=0|T/32768%4]),b=t2*p([0,2,7,10][S]),c=t2*p([0,3,10,8,0,3,8,7,0,3,7,5,0,3,7,12][0|T/32768%16]),[a,b,c][0|T/524288%3]+95*sin(t2/8E3)))/128,((t2*=1.175)?z=(z*32+x(t2-1)/8+(t>.35&&x(t2-(j=21751)))/12+(t>.7&&x(t2-2*j))/16+(t>1.05&&x(t2-3*j))/24)/33:z=0)*3

(t/=sr=48e3)?(B=1.4,t1=k/sr*140/60,p=t=>2**(parseInt(t,36)/12),y=x=w=S=((O-=sin((r+=s+=p("I8I8I8I8D3D3D3D3H1H1H1H1I3I3H1H1"[2*t1&31])/(PH=216e3)-s/600)/2%.5*76*.72**(t1*8%4)*.6**(sin(k/128e3+9)+1))/2+.5+O/17)/4+(P+=sin(k*p("88331131"[N=t1/2%8|0])/PH/2*(t1*2&1?300:150)%.5*72*.78**(t1*(t1/2&1?16:8)%4)*.5**(cos(k/32e3+5)+1)*2)-P/21)/11+sin((_1=k*2400*PI*p("BBAA88A8"[N])/PH)+sin(_1*12)*.01**(t1*(t1/2&1?t&3?4:2:2)%4)*3)/2+2.4)/B,y+=A[_=++k%d],x+=D[$=k%z],w+=R[ė=k%q],S+=K[ọ=k%Q],y+=A[_]=y/B,x+=D[$]=x/B,w+=R[ė]=w/B,S+=K[ọ]=S/B,[(y/8+x/4.5)/B*(L=t1%1)/2+(KI=sin(4*sin((t1%1)**.5*63))*.01**(t1%1))/2-.1,(w/5+S/6.25)/B*L/2+KI/3-.1]):(A=(a=t=>Array(t).fill(k=r=s=O=P=0).map(t=>t+.9))(d=18332),D=a(z=16643),R=a(q=14593),K=a(Q=20962))

BPM=150,SAMPRATE=40960,T=t/SAMPRATE*BPM/60*16384,fd=(x,y)=>x%256*(y&2047)/2048,I=3,err=0/0,A=[err,err,1,1,I,I,1,I,1,I,err,err,I,I,1,I,err,err,err,err,I,I,1,I,1,I,err,err,I,I,1,I][(T>>12)%32],B=[err,err,err,err,I,I,1,I,1,I,err,err,I,I,1,I][(T>>12)%16],ABsnarehi=fd(t*tan(t>>[A,B][(T>>17)%2])/8&128*([[err,err,1,1,2,2,1,2,1,2,err,err,2,2,1,2,err,err,err,err,2,2,1,2,1,2,err,err,2,2,1,2][(T>>12)%32],[err,err,1,1,2,2,1,2,1,2,err,err,2,2,1,2,err,err,err,err,2,2,1,2,1,2,err,err,2,2,1,2][(T>>12)%32]][(T>>17)%2]>0),-T>>[2,2,2,2,2,2,1,2,1,2,2,2,2,2,1,2,2,2,2,2,2,2,1,2,1,2,2,2,2,2,1,2,/**/2,2,2,2,2,2,1,2,1,2,2,2,2,2,1,2,2,2,2,2,2,2,1,2,1,2,2,2,2,2,1,2][(T>>12)%64]),A=32768,ABkick=((sqrt(T%(A/2**[-1,-1,,,,,,,,,2,2,,,,,2,2,2,2,,,,,,,2,2,,,,][(T>>12)%32]))*64)^(sqrt(T%(A/2**[-1,-1,,,,,,,,,2,2,,,,,2,2,2,2,,,,,,,2,2,,,,][(T>>12)%32]))*16))%256|0,AB=ABkick/2+ABsnarehi

it's perfectly 150 bpm if at 40960 hz

BPM=172,
SAMPRATE=40960,
T=t/SAMPRATE*BPM/60*16384,
fd=(x,y)=>x%256*(y&2047)/2048,
I=3,
err=0/0,
bt=(len,spd)=>(T>>spd)%len,

Pseq=(arr,spd)=>t*2**(parseInt(arr[bt(arr.length,spd)],36)/12),

wave=(amp,pitch,T)=>amp*sin(T*PI/pitch)+amp,

cwave=(amp,pitch,T)=>amp*cbrt(sin(T*PI/pitch))+amp,

mel='077A557335223205',
melBass='0357',

s=x=>((Pseq(mel,13)/x)%127+(Pseq(mel,13)/x)%128)/2^((Pseq(mel,13)/x*2)%127+(Pseq(mel,13)/x*2)%128)/2,


A=[err,err,1,1,I,I,1,I,1,I,err,err,I,I,1,I,err,err,err,err,I,I,1,I,1,I,err,err,I,I,1,I][(T>>12)%32],B=[err,err,err,err,I,I,1,I,1,I,err,err,I,I,1,I][(T>>12)%16],ABsnarehi=fd(t*tan(t>>[A,B][(T>>17)%2])/8&128*([[err,err,1,1,2,2,1,2,1,2,err,err,2,2,1,2,err,err,err,err,2,2,1,2,1,2,err,err,2,2,1,2][(T>>12)%32],[err,err,1,1,2,2,1,2,1,2,err,err,2,2,1,2,err,err,err,err,2,2,1,2,1,2,err,err,2,2,1,2][(T>>12)%32]][(T>>17)%2]>0),-T>>[2,2,2,2,2,2,1,2,1,2,2,2,2,2,1,2,2,2,2,2,2,2,1,2,1,2,2,2,2,2,1,2,/**/2,2,2,2,2,2,1,2,1,2,2,2,2,2,1,2,2,2,2,2,2,2,1,2,1,2,2,2,2,2,1,2][(T>>12)%64]),A=32768,ABkick=((sqrt(T%(A/2**[-1,-1,,,,,,,,,2,2,,,,,2,2,2,2,,,,,,,2,2,,,,][(T>>12)%32]))*64)^(sqrt(T%(A/2**[-1,-1,,,,,,,,,2,2,,,,,2,2,2,2,,,,,,,2,2,,,,][(T>>12)%32]))*16))%256|0,
AB=ABkick/2+ABsnarehi,

ins=((s(4)*(s(3.98)-s(3.96)+s(4.02)-s(4.04)&32))/3&255)/2,

bass=(((cwave(128,128,Pseq(melBass,16))+cwave(128,127,Pseq(melBass,16)))+wave(128,256,Pseq(melBass,16))+wave(128,255,Pseq(melBass,16)))/12)|(Pseq(melBass,16)/8%64+Pseq(melBass,16)/7.8%64)/2,

b=Pseq(melBass,16)*(Pseq(melBass,16)&T>>12)/256^Pseq(melBass,16)*(Pseq(melBass,16)&T>>13)/256,
sfx=128+sin(b/20.5)*((b>>5)%32)*4,

((ins)/1.75-2+(bass-8)+AB/1.1+(sfx-96)/4)+16

/*cuborz if it was an old x rooms soundtrack*/BPM=160,SAMPRATE=43690+2/3,T=t/SAMPRATE*BPM/60*16384,fm=(x,y,z)=>sin(x*PI/128+sin(x*PI/128*y)*z),fd=(x,y)=>x%256*(y&2047)/2048,bass=fd(fd(fm(t/4*[1,1.2,1.35,1.5][(T>>16)%4]*(1+(T/262144&1)),6,abs(((T+262144)/16384%32)-16)),T/8),-T/2),high=fm(t*[1,1.5,1.5,1.8,1.35,1.35,1.5,1.2,1.2,1.35,1.125,1.125,1.2,1.125,1,1.35][(T>>13)%16],3,abs(((T+262144)/16384%32)-16)/4),kick=fm(sqrt(T/64%256)*192,1,abs(((T+262144)/16384%32)-16)/4),snare=fd(fm(t*sin(t>>3-(T>>15&1)),1,abs(((T+262144)/16384%32)-16)),-T/8)*(T>>14&1),beat=(kick+snare)/2,medium=bass/2+high/4,ra=bass/2+beat,raa=medium/2+beat,bass2=fd(fd(sin(64*sin(t*PI/128/4*[1,1.2,1.35,1.5][(T>>16)%4]*(1+(T/262144&1)))+64/abs(((T+262144)/16384%32)-16),3),T/8),-T/2),medium2=bass2/2+high/4,ultra=abs((([1,1.5,1.5,1.8,1.35,1.35,1.5,1.2,1.2,1.35,1.125,1.125,1.2,1.125,1,1.35][(T>>13+(T>>12&3^T>>13&5))%16]/12)*t*16&95)-64)+(t*sqrt(tan([t/1.25>>3,t/1.25>>1][T>>15&1]))&128)/2*(1-T/16384%1)*(T>>14&1)+((t*2**("0357"[T>>16&3]/12)*.25&255)+(T>>8)&256)/4+(sign(sin(1.8**(-T/512%16+7)))*32+32)*(1-T/8192%1),I=3,err=0/0,A=[err,err,1,1,I,I,1,I,1,I,err,err,I,I,1,I,err,err,err,err,I,I,1,I,1,I,err,err,I,I,1,I][(T>>12)%32],B=[err,err,err,err,I,I,1,I,1,I,err,err,I,I,1,I][(T>>12)%16],ABsnarehi=fd(t*tan(t>>[A,B][(T>>17)%2])/8&128*([[err,err,1,1,2,2,1,2,1,2,err,err,2,2,1,2,err,err,err,err,2,2,1,2,1,2,err,err,2,2,1,2][(T>>12)%32],[err,err,1,1,2,2,1,2,1,2,err,err,2,2,1,2,err,err,err,err,2,2,1,2,1,2,err,err,2,2,1,2][(T>>12)%32]][(T>>17)%2]>0),-T>>[2,2,2,2,2,2,1,2,1,2,2,2,2,2,1,2,2,2,2,2,2,2,1,2,1,2,2,2,2,2,1,2,/**/2,2,2,2,2,2,1,2,1,2,2,2,2,2,1,2,2,2,2,2,2,2,1,2,1,2,2,2,2,2,1,2][(T>>12)%64]),A=32768,ABkick=((sqrt(T%(A/2**[-1,-1,,,,,,,,,2,2,,,,,2,2,2,2,,,,,,,2,2,,,,][(T>>12)%32]))*64)^(sqrt(T%(A/2**[-1,-1,,,,,,,,,2,2,,,,,2,2,2,2,,,,,,,2,2,,,,][(T>>12)%32]))*16))%256|0,AB=ABkick/2+ABsnarehi,ABkickFloat=ABkick/128-1,ABsnarehiFloat=ABsnarehi/128-1,ABFloat=AB/128-1,[bass,ra,medium,raa,bass2,medium2,ra/2+bass2/2+medium/2,medium2/2+kick/2,ultra/128-1,ultra/128-1+(medium2+medium)/2+0.5,ultra/128-1+(medium2+medium)/2+0.5+raa/2,medium2,medium2+snare/2,ABFloat+medium+0.5,ABFloat+ultra/128,ABsnarehiFloat+ultra/128][(T>>19)%16]

(()=>{for(x=i=0;i<48;i++)x+=(t/2**(((_=t-12288*i)>>14&15^4)*(1+(t>>15&3))/12)*7%255/(1.5+(t>>13&1))+32)/(.6+i);return max(0,min(255,(a+=b+=x/4-i/2-a/($=512)-b/$*8)/$+63*sin(9e4/(t%16384+1e3))))})((t/=1.5)?0:a=b=0)

(()=>{for(i=o=0;32>i;i++)o+=t*2**([0,3,7,12,0,3,7,12,0,3,8,12,0,3,8,12,4,8,13,16,4,8,13,16,3,6,10,15,-1,3,11,7][(t-127*i)>>12&31]/12-7)%1;return 108*o/(1+i)})()

t?4*tanh(a+=b+=(((c+=d+=(2**([-2,18,-2,18,-3,9,6,-3][7&t/5200]/12)-d)/300)/480%1-.5)*(1-t/5200%1)**.1-a-b/2-2)/18**(1-cos(PI*t/12e3)/4))+3.82+sin(3e5/(t%(n=20800)+3e3))/2*(1-t/n%1)**3:a=b=c=d=0