// Wellerman - 64000 Hz
r=t*.95,i=32768,l=16384,u=8192,c=4096, // global variables
x=j=>(s=(a,b,c,d,e,f)=>(!e?(t*2**(parseInt(a,36)/12)/b*f&c)-(c/2):t*2**(parseInt(a,36)/12)/b*f%d-(d/2))*(t>=0)|0,s2=(a,b,c,d,e,f)=>(!e?a*f/b&c:a*f/b%d)-((!e?c:d)/2)*(t>=0), // for melodies and basses
w=r=>(t>=false)&&(e=a=>s('000000337777777788555588CC7777 700000033777777777755332200      CC  CC 8AA77777788555588CC7777  CC  CC 8AA7777777755332200     7'[127&r>>13],a,48,64,true,.35),e(1)+e(j))*(1-r%l/l)*2+24,w(r)/1.4+w(r-(f=24576))/2.8+w(r-f*2)/4.2+w(r-f*3)/6.4) // melody
-(b=r=>(t>=null)*(q=w=>s('CCCCHHCCCCCC77CC883355CC883377CC'[31&r>>15],4*w,54,64,true,.175/2)*4*(1-r/l%.5)*(r/i%1)*2,q(1)+q(j/2))/3,b(r)+b(r-(d=l)*(t>=0))/2+b(r-d*2*(t>=0))/3+b(r-d*3*(t>=0))/4)-32 // bass
+(144*sin(cbrt(r%i)*7)*(1-r/16384%1)*!(r&l)) // kick
+(20*((sin(t>>2)*t&255)?sin((t>>2)**3)*2&1?-1:1:0)*!!(r&i)*(1-r/i%1)) // snare
+((n=k=>(k*random()-(k/2)),n(42))*(1-r/u%1)), // hihat
[x(1.005),x(.995)].map(y=>min(max(y,-128),127)) // unstereo version: min(max(x(1),-128),127)