diamond.m

这是机械工业张德丰《MATLAB与外部程序接口编程》随书源码

function diamond()
%实现点沿圆周运动的动画
t=0:pi/2000:pi*2;
x=sin(t);
y=cos(t);
plot(y,x,'b');
axis equal
n=length(t);
h=line('color','g','linestyle','.',...
    'marker','.','markersize',50,'erasemode','xor');
i=1;
while i
    set(h,'xdata',y(i),'ydata',x(i));
    drawnow;
    i=i+1;
    if i>n 
        i=1;
    end
end