code

sq=(f,p=0.5)=>2*((s*tone(f)%1)<p)-1, 
s=t/48000,
b=94,
r=-1/0,
tone=(note)=>440*(2**((note-9)/12)),
q=(a)=>s%(60/a)*a/60,
F=(a)=>sin(2*PI*s*a),
st=(j)=>F(tone(j)),
bass=(k)=>asin(sin(s*2*PI*440*(2**((k-9)/12))))/PI*2,
cyc=(p,l)=>(floor(p/60*s))%l,
dec=(s,r=1)=>(1-q(s))**r,
lfo=(f,a,w,p=0,o=0)=>
[sin(f*2*PI*s+p)*a+o,
sign(sin(f*2*PI*s+p))+o,
(s+p)%(1/f)*f*a+o,
random()][w], 
sum=(Ar)=>Ar.reduce((a,b)=>a+b,0),
R=random(),
Cho=(Ar,Fn)=>sum(Ar.map(Fn))/Ar.length,
ω=(a)=>{throw a},
p=(a,b)=>a!=b?a:r,
avg=(a)=>sum(a)/a.length,
Kick=_=>F(exp(q(_)*-19)*30/s),
Snare=(a)=>Kick(a)/2+R*dec(a,2)/2,
T=(M)=>(M[0].map((_,i) => M.reduce((A, R) => [...A, R[i]], []))),
Hat=_=>R*dec(_),
Chords={Maj:[0,4,7],
Min:[0,3,7],
Dim:[0,3,6],
Aug:[0,4,8],
Qua:[0,4,7,10],
Mi7:[0,3,7,10],
Ma7:[0,4,7,11],
Di7:[0,3,6,9],
mM7:[0,3,7,11]},
output=st(">@BEGJLN".charCodeAt(cyc(b*2,8))-64)*dec(b*2,2)+bass(">2;9".charCodeAt(cyc(b/4,4))-64)/2*dec(b/4,2)// the deafult code

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

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

10*(t>>6|t|t>>(t>>16))+(7&t>>11)*5*t&t>>4|t*(5|t>>13&3)>>(~t>>11&1)&128|t*(t>>11&t>>13)*(~t>>9&3)&127

5*t&t>>4|t*(4|t>>13&3)>>(~t>>11&1)&128|t*(t>>11&t>>13)*(~t>>9&3)&127

t%25-(t>>2|15*t|t%227)-t>>3|(t>>5&1333*(t<<5)|(t>>3)%1)/(t%18|t%1280)

~t>>3&(t>>11&1?5:4-(t>>12&1))*t&(t>>7)+t*(4|t>>13&3)>>(~t>>11&1)&128|t*(t>>11&t>>13)*(~t>>9&3)&127>>(t>>(t>>12&15))>>t

t-(t>>6)<<(t>>12)/t>>(t>>1+t<<t>>2)<<2

t*t>>(t>>12&t>>3)^(t>>1%t%t>>5)

t/t<<(t>>8^t^t>>2)

t^(t>>11)+t<<(t>>9&t>>10)&t<<2 

t/=4,a=random()*(3E4/(t&4095)),b=3E4/(t&4095),r=(3*t&t>>10)&127,
[b,a,b][(t>>12)&1]+r

 e=t/512,sin(e*(t&t>>12))%cos(e*(t&t>>12))

e=t/512,sin(e*(t&t>>12))*cos(e/(t&t>>12))

e=t/512,sin(e*(t&t>>12))/cos(e*(t&t>>12))

T=sin(24*cbrt(t%4096)),O=sin(24*cbrt(t%2048)),N=sin(24*cbrt(t%1024)),[T,T,O,N][t>>13&3]

x=t/64,(sin(sin(sin(x*2**(parseInt(('ABOBAI')[(t>>12)%6],36)/12)))+cos(x))*(-t>>6&127))+128

(((t/2*2**([5,8,12,15,19,15,12,8][t>>13&7]/12)*(t&262144?1:6/5)&128)+(t*(t&262144?1:6/5)&127&t>>8)*(t>1048575))*max(0,min(1,16-((t&1048575)/65536)))^(random()*128&~t>>8)*(t>2097151))*(t<4194304)

t/2/(1+(t>>17&7))**2&111&t>>12?t>>9:t>>7

t/2/(1+(t>>17&7))**2&111&t>>12?t>>9:t>>7

a=``, // insert pcm data between the backticks. doesnt matter if there are newlines
a.charCodeAt(t%a.length)