怎么将 MATLAB动画转化为别的格式播放
机械振动MATLAB程序%理想中的弹性振子 简谐运动 动画演示
%Clear
rectangle('position',,'FaceColor',);
axis();
%画顶板
hold on
plot(,,'r','linewidth',2);
%画直线
y=2:.2:7;
M=length(y);
x=12+mod(1:M,2)*2;
x(1)=13;
x(end-3:end)=13;
D=plot(x,y);
%弹簧
C=0:.1:2*pi;r=0.35;
t1=r*sin(C);
F1=fill(13+r*cos(C),2+t1,'r');
% 球
set(gca,'ytick',);
set(gca,'yticklabels',num2str([-1:3]'));
plot(,,'black');
H1=plot(,,'y');
% 句柄[黄线]
Q=plot(0,3.8,'color','r');
% 运动曲线;
td=[];yd=[];
T=0;
text(2,9,'理想中的弹簧振子简谐振动','fontsize',16);
set(gcf,'doublebuffer','on');
while T<12;
pause(0.2);
Dy=(3/2-1/2*sin(pi*T))*1/2;
Y=-(y-2)*Dy+7;
Yf=Y(end)+t1;
td=;yd=;
set(D,'ydata',Y);
set(F1,'ydata',Yf,'facecolor',rand(1,3));
set(H1,'xdata',,'ydata',);
set(Q,'xdata',td,'ydata',yd) ;
T=T+0.1;
end
怎么将此MATLAB动画转化别的格式播放,求指教 我给你改了一下,可以录成avi的形式,保存在m文件的目录了,movie2avi函数还有一些设置你可以查阅帮助。%机械振动MATLAB程序
%理想中的弹性振子 简谐运动 动画演示
%Clear
nFrames = 121;
mov(1:nFrames) = struct('cdata', [],...
'colormap', []);
rectangle('position',,'FaceColor',);
axis();
%画顶板
hold on
plot(,,'r','linewidth',2);
%画直线
y=2:.2:7;
M=length(y);
x=12+mod(1:M,2)*2;
x(1)=13;
x(end-3:end)=13;
D=plot(x,y);
%弹簧
C=0:.1:2*pi;r=0.35;
t1=r*sin(C);
F1=fill(13+r*cos(C),2+t1,'r');
% 球
set(gca,'ytick',);
set(gca,'yticklabels',num2str([-1:3]'));
plot(,,'black');
H1=plot(,,'y');
% 句柄[黄线]
Q=plot(0,3.8,'color','r');
% 运动曲线;
td=[];yd=[];
T=0;
text(2,9,'理想中的弹簧振子简谐振动','fontsize',16);
set(gcf,'doublebuffer','on');
k=0;
while T<12;
pause(0.2);
Dy=(3/2-1/2*sin(pi*T))*1/2;
Y=-(y-2)*Dy+7;
Yf=Y(end)+t1;
td=;yd=;
set(D,'ydata',Y);
set(F1,'ydata',Yf,'facecolor',rand(1,3));
set(H1,'xdata',,'ydata',);
set(Q,'xdata',td,'ydata',yd) ;
%M(T) = getframe;
T=T+0.1;
k=k+1
mov(k) = getframe(gcf);
end
movie2avi(mov, 'myPeaks2.avi', 'compression', 'None','quality',100); madio 发表于 2013-8-7 17:25 static/image/common/back.gif
我给你改了一下,可以录成avi的形式,保存在m文件的目录了,movie2avi函数还有一些设置你可以查阅帮助。
蒽,好的,谢谢了,:) {:3_49:}{:3_49:}{:3_49:}{:3_49:}{:3_49:} {:3_46:}{:3_46:}{:3_46:}{:3_46:}{:3_46:}{:3_46:}
页:
[1]