>>482
fixed
s=x=>2**((x+.15)/12),d=12168,g=15&t>>15,a=t=>(p=t*s([2,4,5,9,2,4,5,9,2,4,5,9,12,9,7,5,0,2,4,7,0,2,4,7,0,2,4,7,0,2,4,0,-2,0,2,5,-2,0,2,5,-2,0,2,5,-2,0,2,-2,-3,-1,1,4,-3,-1,1,4,-3,-1,1,7,-3,-1,1,9][(t>>13)%64]),(p*2&128)/1.5)*(1-t%8192/12e3),//sequence melody
b=t*s([2,2,2,5,0,0,0,0,-2,-2,-2,-2,-3,-3,-3,1][g])/4,//sequence bass
m=[2,2,2,0,0,0,0,0,-2,-2,-2,-2,-3,-3,-3,1][g],
m2=[5,5,5,5,4,4,4,4,2,2,2,2,1,1,1,4][g],
m3=[9,9,9,9,7,7,7,7,5,5,5,5,4,4,4,7][g],
L=a(t)/1+a(t-d)/2+a(t-d*3)/4+a(t-d*5)/8,//stereo delay effect was helped by kouzerumatsu
R=a(t)/1+a(t-d*2)/2+a(t-d*4)/4+a(t-d*6)/8,
k=((b%256)+(b%254))/6.5,//bass
x='1112111111111112'[g],//decay rate on motif
mtf=(s([m,m2,m3][(t>>10)%3])*t&32)/1.5*(1-t*x%65536/65e3/x),//motif
ns=random()*[10,0,10,0,16,0,10,0][7&t>>12]*1.15,//snare
dr=(4e3/(t*'1 121121 1 21124'[15&t>>13]%8192)**.1&32)*1.4,//drum
cr=(t*sin(t>>3)&-t>>8&255)/3.75*(t&32768)/32e3,//crash
h=(t/4096>128?k:0)+(t/4096>256?mtf:0)+(t/4096>384?ns+dr:0)+(t/4096>512?cr:0),//extends
[L/1.9+h,R/1.9+h]//output
//date: 27 FEB 2023 By Rio zack, date fixed 1 MAR 2023