pcm.m

pcm编码 有关线性、A律、mu律的pcm编码的matlab实现

function ypcm=pcm(Y,name)
%均匀量化
x=Y;
s=sign(x);                              %求得每一序列值的符号
x=abs(x);                               %求序列的绝对值
ypcm=x;

%舍掉后八位
ypcm=ypcm.*(2^7);    
ypcm=floor(ypcm);
ypcm=ypcm.*s;

%写入编码压缩文件
fid=fopen([name,'.p'],'wb');
fwrite(fid,ypcm,'int8');
fclose(fid);