clear all
h = animatedline;%动画线
axis([0 4*pi -1 1])
box on
x = linspace(0,4*pi,200);for k = 1:length(x)y = sin(x(k));addpoints(h,x(k),y);%将数据添加到动画线中drawnow%画出动画线f=getframe(gcf);  imind=frame2im(f);[imind,cm] = rgb2ind(imind,256);if k == 1;imwrite(imind,cm,'test.gif','GIF', 'Loopcount',inf,'DelayTime',1);elseimwrite(imind,cm,'test.gif','GIF','WriteMode','append','DelayTime',1);end
end

close all; clear all;
%创建avi文件对象
aviobj = VideoWriter('test.avi','Uncompressed AVI');
open(aviobj)
%动画部分代码
t = linspace(0,2.5*pi,40);
fact = 10*sin(t);
fig=figure;
[x,y,z] = peaks;
for k=1:length(fact)h = surf(x,y,fact(k)*z);axis([-3 3 -3 3 -80 80])axis offcaxis([-90 90])%获取当前画面F = getframe(fig);%加入avi对象中writeVideo(aviobj,F);%转成gif图片,只能用256色im = frame2im(F);[I,map] = rgb2ind(im,256);%写入 GIF89a 格式文件    if k == 1;imwrite(I,map,'test.gif','GIF', 'Loopcount',inf,'DelayTime',0.1);elseimwrite(I,map,'test.gif','GIF','WriteMode','append','DelayTime',0.1);end
end
close(fig);
%关闭avi对象close(aviobj);

clear all
close allmov=VideoWriter('mult_1.avi');
open(mov);
N=50;
om=0.1;
X = linspace(0,12.4,N);
Y = 0*X;
Z2= 0*X;
for it=1:100Z = cos(X-it*om);Y2= cos(X-it*om);stem3(X,Y,Z,'r','fill')hold onstem3(X,Y2,Z2,'k','fill')hold on;line(X,Y,Z2);for ix=1:Nhold on;plot([X(ix) X(ix)],[0 Y2(ix)],'k');end;hold offview(-25,30);xlim([X(1) X(end)]);ylim([-1 1])zlim([-1 1])set(gcf,'Color',[1 1 1],'nextplot','replacechildren', 'Visible','off')axis offFF=getframe(gcf);% With "VideoWriter" use "writevideo" to add frames to the videowriteVideo(mov,FF);im = frame2im(FF);[I,map] = rgb2ind(im,256);%写入 GIF89a 格式文件    if it == 1;imwrite(I,map,'test.gif','GIF', 'Loopcount',inf,'DelayTime',0.1);elseimwrite(I,map,'test.gif','GIF','WriteMode','append','DelayTime',0.1);end
end;
% Close the video file
close(mov);