asid/octave/cutoffmapping.m

9 lines
230 B
Mathematica
Raw Permalink Normal View History

2022-06-03 08:47:05 +00:00
freq=400+(2200-400).*(linspace(0,1,256).^3);
cutoff=round(0.1554976142066175*freq);
low=bitand(cutoff,7);
high=bitshift(cutoff,-3);
f=fopen("cutoffmapping.dat","w");
fwrite(f,low(:),"uchar");
fwrite(f,high(:),"uchar");
fclose(f);