matlab动画制作源代码

clear all; close all;
t1=linspace(0,2*pi);
x1=-9;y1=0;r1=1;
hf1=fill(r1*cos(t1)+x1,r1*sin(t1)+y1,'r');%画太阳
hold on; axis([-10,10,-10,10]);axis off
hf2=fill([-1 -1 1 1],[-10 -8 -8 -10],'y');%画树
hf3=fill([-2,2,0],[-8,-8,-6],'g');
sita1=pi;%第一次生长
for i=0:6;%白天
tc=rand(1,3);
title('日复一日，小树慢慢慢慢地长大。。。。','color',tc,'fontweight','bold');
set(gcf, 'color', 'w');
x2=0;y2=0;r2=9;
x1=r2*cos(sita1-pi/6*i)+x2;
y1=r2*sin(sita1-pi/6*i)+y2;
set(hf1,'xdata',r1*cos(t1)+x1,'ydata',r1*sin(t1)+y1);
pause(0.5);
end
delete(hf1);
sita1=pi;%晚上
hf4=fill(r1*cos(t1)+x1,r1*sin(t1)+y1,'b');
x11=-8;
hf41=fill(r1*cos(t1)+x11,r1*sin(t1)+y1,'k');
for i=0:6;%wanshang
tc=rand(1,3);
title('日复一日，小树慢慢慢慢地长大。。。。','color',tc,'fontweight','bold');
set(gcf, 'color', 'k');
x2=0;y2=0;r2=9;
x1=r2*cos(sita1-pi/6*i)+x2;
x11=8*cos(sita1-pi/6*i)+x2;
y1=r2*sin(sita1-pi/6*i)+y2;
set(hf4,'xdata',r1*cos(t1)+x1,'ydata',r1*sin(t1)+y1);
set(hf41,'xdata',r1*cos(t1)+x11,'ydata',r1*sin(t1)+y1);
pause(0.5);
end
delete(hf4);
delete(hf41);
delete(hf2);%树生长
delete(hf3);
hf5=fill([-1.2 -1.2 1.2 1.2],[-10 -7 -7 -10],'y');
hf6=fill([-2.5 0 2.5],[-7 -4.5 -7],'g');
hf7=fill([-2 0 2],[-4.5 -2.5 -4.5],'g');
hf1=fill(r1*cos(t1)+x1,r1*sin(t1)+y1,'r');%第二天白天
i=0;sita1=pi;
for i=0:6;
tc=rand(1,3);
title('日复一日，小树慢慢慢慢地长大。。。。','color',tc,'fontweight','bold');
set(gcf, 'color', 'w');
x2=0;y2=0;r2=9;
x1=r2*cos(sita1-pi/6*i)+x2;
y1=r2*sin(sita1-pi/6*i)+y2;
set(hf1,'xdata',r1*cos(t1)+x1,'ydata',r1*sin(t1)+y1);
pause(0.5);
end
delete(hf1);
i=0;sita1=pi;%第二天晚上
hf4=fill(r1*cos(t1)+x1,r1*sin(t1)+y1,'b')
x11=-8;
hf41=fill(r1*cos(t1)+x11,r1*sin(t1)+y1,'k');
for i=0:6;%wanshang
tc=rand(1,3);
title('日复一日，小树慢慢慢慢地长大。。。。','color',tc,'fontweight','bold');
set(gcf, 'color', 'k');
x2=0;y2=0;r2=9;
x1=r2*cos(sita1-pi/6*i)+x2;
x11=8*cos(sita1-pi/6*i)+x2;
y1=r2*sin(sita1-pi/6*i)+y2;
set(hf4,'xdata',r1*cos(t1)+x1,'ydata',r1*sin(t1)+y1);
set(hf41,'xdata',r1*cos(t1)+x11,'ydata',r1*sin(t1)+y1);
pause(0.5);
end
delete(hf5);%树生长
delete(hf6);
delete(hf7);
hf8=fill([-1.4 -1.4 1.4 1.4],[-10 -6 -6 -10],'y');
hf9=fill([-3 0 3],[-6 -3 -6],'g');
hf10=fill([-2.5 0 2.5],[-3 -0.5 -3],'g');
hf11=fill([-2 0 2],[-0.5 1.5 -0.5],'g');
hf99=hf9;hf1010=hf10;hf1111=hf11;
delete(hf4);
delete(hf41);
pause(1);
hf1=fill(r1*cos(t1)+x1,r1*sin(t1)+y1,'r');
i=0;sita1=pi;
for i=0:6;
tc=rand(1,3);
a=title('经过了很多很多年，树终于长成了一片森林','color',tc,'fontweight','bold');
set(gcf, 'color', 'w');
x2=0;y2=0;r2=9;
x1=r2*cos(sita1-pi/6*i)+x2;
y1=r2*sin(sita1-pi/6*i)+y2;
set(hf1,'xdata',r1*cos(t1)+x1,'ydata',r1*sin(t1)+y1);
for j=0:3
s=randint(1,1,[-1-3*j,1+3*j]);
hf5=fill([-1.2+s -1.2+s 1.2+s 1.2+s],[-10 -7 -7 -10],'y');
hf

6=fill([-2.5+s 0+s 2.5+s],[-7 -4.5 -7],'g');
hf7=fill([-2+s 0+s 2+s],[-4.5 -2.5 -4.5],'g');
pause(0.2);
hf8=fill([-1.4+s -1.4+s 1.4+s 1.4+s],[-10 -6 -6 -10],'y');
hf9=fill([-3+s 0+s 3+s],[-6 -3 -6],'g');
hf10=fill([-2.5+s 0+s 2.5+s],[-3 -0.5 -3],'g');
hf11=fill([-2+s 0+s 2+s],[-0.5 1.5 -0.5],'g');
h6(i+1,j+1)=hf6;
h7(i+1,j+1)=hf7;
h9(i+1,j+1)=hf9;
h10(i+1,j+1)=hf10;
h11(i+1,j+1)=hf11;
end
pause(0.5);

end
delete(hf1);
delete(a);
W=fill([-10 -10 10 10],[-10 10 10 -10],'k');
X=text(-4,4,'然','color','r','fontsize',30);
pause(1);
Y=text(2,4,'而','color','r','fontsize',30);
pause(1);
Z1='利益冲昏了我们的头脑';
for i=1:10
Z(i)=text(-10+i*1.7,-4,Z1(i),'color','r','fontsize',30);
pause(0.5);
end
pause(1);
delete(X);
delete(Y);
delete(Z);
delete(W);
hf1=fill(r1*cos(0)+x1,r1*sin(0)+y1,'r');
delete(h11);
pause(0.4);
delete(h10);
pause(0.4);
delete(h9);
pause(0.4);
delete(h7);
pause(0.4);
delete(h6);
pause(1);
delete(hf99);
delete(hf1010);
delete(hf1111);
pause(2);
W=fill([-10 -10 10 10],[-10 10 10 -10],'k');
Z2='保护树木，保卫我们的家园!';
for i=1:13
text(-8+i*2-13*(i>5),4+(i>5)*(-8),Z2(i),'color','w','fontsize',30);
pause(0.5);
end