[YK1,t1]=ovsav4(LFMD,lfm,N,ovr)

function [YK1,t1]=ovsav4(LFMD,lfm,N,ovr)
j=0;

  y1=zeros(1,10001);
  for i=2246:1:2758
    j=j+1;
    y1(i)=LFMD(j);
  end
 disp(y1);
  Q=length(lfm);
  disp(Q);
for k=1:1:N
     if k<=Q
     h(k)=lfm(k);
      else
         h(k)=0;
     end
     
end
Hn=fftshift(fft(h,N));
Hnc=conj(Hn);

  
 for k=1:1:N
     x(k)=y1(k);
    
 end
  Xn1=fftshift(fft(x,N));


 Yn1=(Xn1).*(Hnc);
   disp(Yn1);
yk1=ifftshift(ifft(Yn1,N));
 yk1(1:511)=0;
 n1=0;  
  for k=ovr+1:1:N+ovr
     n1=n1+1;
      x1(n1)=y1(k);
      
  end;
 Xn2=fftshift(fft(x1,N));
  Yn2=Xn2.*Hnc;
   disp(Yn2);
  yk2=ifftshift(ifft(Yn2,N));
  disp(yk2);
   yk2(1:511)=0;
  n1=0;  
  for k=(ovr*2)+1:1:N+(ovr*2)
     n1=n1+1;
     x2(n1)=y1(k);
     
  end;
  Xn3=fftshift(fft(x2,N));
   
  Yn3=Xn3.*Hnc;
    disp(Yn3);
    
  yk3=ifftshift(ifft(Yn3,N));
 
   yk3(1:511)=0;
   t2=1:1:4097;
   subplot(2,1,2)
   plot(t2,(yk3));
   
   n1=0;
   
  for k=(ovr*3)+1:1:N+(ovr*3)
      n1=n1+1;
      x3(n1)=y1(k);
  end;
  Xn4=fftshift(fft(x3,N));
  
  
  Yn4=Xn4.*Hnc;
   disp(Yn4);
  yk4=ifftshift(ifft(Yn4,N));
   disp(yk4);
   yk4(1:511)=0;
  n1=0;

   for k=(ovr*4)+1:1:N+(ovr*4)
      n1=n1+1;
      x4(n1)=y1(k);
     
  end;
   Xn5=fftshift(fft(x4,N));
  Yn5=Xn5.*Hnc;
    disp(Yn5);
 yk5=ifftshift(ifft(Yn5,N));
 disp(yk5);
  yk5(1:511)=0;
n1=0;

  for k= Q-1:1:N
      n1=n1+1;
      YK1(n1)=yk1(1,k);
  end;
  
  
  for k=0:1:N-Q+1
      n1=n1+1;
      YK1(n1)=yk2(k+Q-1);
  end
  
  
  
  for k=0:1:N-Q+1
      n1=n1+1;
      YK1(n1)=yk3(k+Q-1);
  end
  disp(YK1);
  

  for k=0:1:N-Q+1
      n1=n1+1;
      YK1(n1)=yk4(k+Q-1);
  end
 for k=0:1:N-Q+1
      n1=n1+1;
      YK1(n1)=yk5(k+Q-1);
  end
t1=linspace(0,21513,n1);
  YK1=abs(YK1);
end