bianma.m

语音PCM编码

function f=bianma(y)
%编码
t=length(y);
f=zeros(t,8);
z=sign(y);
y=y*128;
y=fix(y);
y=abs(y);
for i=1:length(y)
   for j=6:-1:0
      f(i,8-j)=fix(y(i)/(2^j));
      y(i)=mod(y(i),(2^j));
   end;
if(z(i)==-1)
   f(i,1)=0;
else
   f(i,1)=1;   
end;
end;