function Untitledkl
a=[1,1,1,1];
b=[1,1,1];
y=myFConv(a,b);
plot(y);
function y=myFConv(x,h);
y=zeros(1,length(x)+length(h)-1);
for n=0:length(y)-1;
    s=0;
    for k=0:min([n, length(x)-1, length(h)-1]);
        if(n-k+1<=length(x))
        s=s+h(k+1)*x(n-k+1);
        end
    end
    y(n+1)=s;
end