for i = 384:length(x)
    plot(x,z,'.',x(i),z(i),'ro')
    i
   % xlim([0 14]);
    pause
end