frames.m

LPC vocoder LPC vocoder with several option Graphical user interface Also included several .wav f

function [DATA,NFRAMES]=frames(Y,SHIFT,DUR)


%determine number of frames and pad with zeros where needed
L=size(Y,1);
NFRAMES=1;
while L>1
    L=L-SHIFT;
    if L>0
        NFRAMES=NFRAMES+1;
    end
    if L==1
        PAD=DUR-L;
    end
    if L<1
        PAD=DUR-(L+SHIFT);
    end
end
Y=[Y; zeros(PAD,1)]; %pad speech with zeros



%create data array (each column denotes a frame)
DATA=zeros(DUR,NFRAMES); %preallocate DATA for speed
for i=0:NFRAMES-1
    DATA(:,i+1)=Y(1+i*SHIFT:DUR+i*SHIFT);
end



k=NFRAMES;
n=0;
while DATA(:,k)==zeros(DUR,1);
    k=k-1;
    n=n+1;
end



DATA=DATA(:,1:(NFRAMES-n));
NFRAMES=NFRAMES-n;