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

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)

t?0:r=Array(n=12288).fill(0),r2=c=1.047/1.02,cs=1.107/1.02,d=1.15,ds=1.243/1.02,e=1.318/1.02,f=1.389/1.02,fs=1.475/1.01,g=1.568/1.02,gs=1.655/1.02,a=1.754/1.02,as=1.856/1.02,b=1.977/1.02,A=(((t/1.98*[c,g/2][t>>15&1]&255)*(-t>>7&255)>>8&255)*(-t>>7&255)>>8&255)*(-t>>7&255)>>10,B=t*[0,0,g,a,g,f,e,d,e,e,e,e,0,0,0,0][t>>14&15]%256/5,B2=t*[0,0,c,d,c,as/2,a/2,g/2,a/2,a/2,a/2,a/2,0,0,0,0][t>>14&15]%256/8,C=t*[e,f,e,e,0,0,f,f,e,d,d,d,0,0,0,0][t>>13&15]%256/5,C2=t/2*[a,as,a,a,0,0,as,as,a,g,g,g,0,0,0,0][t>>13&15]%256/8,r2=[A,A,A,A+B+B2,A+B+B2,A+B+B2,A+B+B2,A+C+C2,A,A+B+B2,A+B+B2,A+B+B2,A+B+B2,A+C+C2,A,A+B+B2,A,A,A][t>>17]+r[t%n],r[t%n]=r2/3,r2

(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

(t-(t^t>>5)+t*(t>>14&14)&255)/6+(100*((t<<2|t>>5|t^63)&(t<<10|t>>11))&255)/6+((((1024/(t%4096))*256)&255)/3)+((t+(t&t^t>>6)-t*(t>>9&(t%16?2:6)&t>>9))&255)/6+(((t>>2)*(t>>5)|t>>5)&255)/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;
}

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

((t&255)*((t*((t>>10|t>>14)&15))&192)>>7)+((t&4095)<2048?(((1<<18)/(t&4095)+10000)&128):0)