matlab動(dòng)畫(huà)演示17個(gè)實(shí)例

1、1.彈性蹦球演示程序figure(1);%定義函數(shù)axis(-5.1,5,-0.05,1.05);%繪制二維圖形hold on;%保持當(dāng)前圖形及軸系所有的特性axis(off);%覆蓋坐標(biāo)刻度，并填充背景%通過(guò)填充繪出臺(tái)階及兩邊的擋板fill(4.12,4.22,4.22,4.12,-0.05,-0.05,1.05,1.05,y);fill(-5,-3.2,-3.2,-5,-0.05,-0.05,0,0,g);fill(-3.2,-2.8,-2.8,-3.2,-0.05,-0.05,0.2,0.2,g);fill(-3.2,-1.4,-1.4,-3.2,0.2,0.2,0.25,0.25,g)

2、;fill(-1.4,-1,-1,-1.4,0.2,0.2,0.45,0.45,g);fill(-1.4,0.4,0.4,-1.4,0.45,0.45,0.5,0.5,g);fill(0.4,0.8,0.8,0.4,0.45,0.45,0.7,0.7,g);fill(0.4,2.0,2.0,0.4,0.7,0.7,0.75,0.75,g);fill(2.0,2.3,2.3,2.0,-0.05,-0.05,0.75,0.75,g);fill(2.3,4.12,4.12,2.3,-0.05,-0.05,0,0,g);%x2=line(-5,5,0.25,0.25,color,g,linestyle

3、,-, markersize,50)%設(shè)置臺(tái)階邊框線，顏色，擦試方式%line(-5,5,0.5,0.5,color,b,linestyle,-, markersize,50)%設(shè)置球與地面接觸面的顏色，擦試方式%line(-5,5,0.75,0.75,color,b,linestyle,-, markersize,50)%設(shè)置球與地面接觸面的顏色，擦試方式head=line(-5,1,color,r,linestyle,.,erasemode,xor, markersize,60);%設(shè)置小球顏色，大小，線條和擦試方式%body=line(-5,1,color,b,linestyle,-,e

4、rasemode,none); %描繪軌跡線%設(shè)置初始條件while 1t=4;dt=0.001;w=0;dw=0.001;w=0;%設(shè)置球彈起的初始位置%設(shè)置球彈起的高度while t=4.12 t=dt+t;if w=2.11 t=t-dt;if w=1.11 t=t-dt;if w=-0.62 t=t-dt;if w=-2.31 t=t-dt;if w=-4 t=t-dt;if w199) endendend2.嫦娥奔月演示程序figure(name,嫦娥一號(hào)與月亮、地球關(guān)系);%設(shè)置標(biāo)題名字s1=0:.01:2*pi;hold on;axis equal;%建立坐標(biāo)系axis off

5、% 除掉Axesr1=10;%月亮到地球的平均距離r2=3;%嫦娥一號(hào)到月亮的平均距離w1=1;%設(shè)置月亮公轉(zhuǎn)角速度w2=12%設(shè)置嫦娥一號(hào)繞月亮公轉(zhuǎn)角速度t=0;%初始時(shí)刻為pausetime=.002;%設(shè)置暫停時(shí)間sita1=0;sita2=0;%設(shè)置開(kāi)始它們都在水平線上set(gcf,doublebuffer,on) %消除抖動(dòng)plot(-20,18,color,r,marker,.,markersize,40);text(-17,18,地球);%對(duì)地球進(jìn)行標(biāo)識(shí)p1=plot(-20,16,color,b,marker,.,markersize,20);text(-17,16,月亮);

6、%對(duì)月亮進(jìn)行標(biāo)識(shí)p1=plot(-20,14,color,w,marker,.,markersize,13);text(-17,14,嫦娥一號(hào));%對(duì)嫦娥一號(hào)進(jìn)行標(biāo)識(shí)plot(0,0,color,r,marker,.,markersize,60);%畫(huà)地球plot(r1*cos(s1),r1*sin(s1);%畫(huà)月亮公轉(zhuǎn)軌道set(gca,xlim,-20 20,ylim,-20 20);p1=plot(r1*cos(sita1),r1*sin(sita1),color,b,marker,.,markersize,30);%畫(huà)月亮初始位置l1=plot(r1*cos(sita1)+r2*cos

7、(s1),r1*sin(sita1)+r2*sin(s1);%畫(huà)嫦娥一號(hào)繞月亮公轉(zhuǎn)軌道p2x=r1*cos(sita1)+r2*cos(sita2);p2y=r1*sin(sita1)+r2*sin(sita2);p2=plot(p2x,p2y,w,marker,.,markersize,20);%畫(huà)嫦娥一號(hào)的初始位置orbit=line(xdata,p2x,ydata,p2y,color,r);%畫(huà)嫦娥一號(hào)的運(yùn)動(dòng)軌跡while 1set(p1,xdata,r1*cos(sita1),ydata,r1*sin(sita1);%設(shè)置月亮的運(yùn)動(dòng)過(guò)程set(l1,xdata,r1*cos(sita1

8、)+r2*cos(s1),ydata,r1*sin(sita1)+r2*sin(s1);%設(shè)置嫦娥一號(hào)繞月亮的公轉(zhuǎn)軌道的運(yùn)動(dòng)過(guò)程ptempx=r1*cos(sita1)+r2*cos(sita2);ptempy=r1*sin(sita1)+r2*sin(sita2);set(p2,xdata,ptempx,ydata,ptempy);%設(shè)置嫦娥一號(hào)的運(yùn)動(dòng)過(guò)程p2x=p2x ptempx;p2y=p2y ptempy;set(orbit,xdata,p2x,ydata,p2y);%設(shè)置嫦娥一號(hào)運(yùn)動(dòng)軌跡的顯示過(guò)程sita1=sita1+w1*pausetime;%月亮相對(duì)地球轉(zhuǎn)過(guò)的角度sita2=

9、sita2+w2*pausetime;%嫦娥一號(hào)相對(duì)月亮轉(zhuǎn)過(guò)的角度pause(pausetime);%暫停一會(huì)drawnowend3.曲柄連桿機(jī)構(gòu)充氣球動(dòng)畫(huà)演示程序hf=figure(name,打氣筒吹氣球);set(hf,color,g);axis(-10,10,-4,4);hold onaxis off; %除掉坐標(biāo)xa0=-2.5;%活塞左頂點(diǎn)坐標(biāo)xa1=-1.8;%活塞右頂點(diǎn)坐標(biāo)xb0=-2;%連桿左頂點(diǎn)坐標(biāo)xb1=5;%連桿右頂點(diǎn)坐標(biāo)x3=5.6;%轉(zhuǎn)輪坐標(biāo)y3=0;%轉(zhuǎn)輪坐標(biāo)x4=xb1;%設(shè)置連桿頭的初始位置橫坐標(biāo)y4=0;%設(shè)置連桿頭的初始位置縱坐標(biāo)x5=xa1;y5=0;x6

10、=x3;%設(shè)置連軸初始橫坐標(biāo)y6=0;%設(shè)置連軸初始縱坐標(biāo)a=0.7;b=0.7c=0.7a1=line(xa0;xa1,0;0,color,m,linestyle,-,linewidth,20); %設(shè)置活塞a8=line(-2.7;2.3,0.3;0.3,color,b,linestyle,-,linewidth,5);%設(shè)置打氣筒a9=line(-2.6;2.3,-0.3;-0.3,color,b,linestyle,-,linewidth,5);%設(shè)置打氣筒a10=line(-2.6;-2.6,-0.1;-0.37,color,b,linestyle,-,linewidth,5);%設(shè)

11、置打氣筒a11=line(2.0;2.0,0.1;0.37,color,b,linewidth,5);%設(shè)置打氣筒a12=line(2.0;2.0,-0.1;-0.37,color,b,linewidth,5);%設(shè)置打氣筒a13=line(-2.6;-2.6,0.1;0.37,color,b,linestyle,-,linewidth,5);%設(shè)置打氣筒a14=line(-2.7;-2.7,0.1;-0.1,color,b,linestyle,-,linewidth,9);%設(shè)置氣筒嘴a16=line(-3.2;-3.2,0.1;-0.1,color,r,linestyle,-,linewi

12、dth,25);%設(shè)置氣筒嘴a2=line(xb0;xb1,0;0,color,m,linewidth,5);%設(shè)置連桿a5=line(x5,y5,color,black,linestyle,.,markersize,25);%設(shè)置連桿活塞連接頭a4=line(x4,y4,color,black,linestyle,.,markersize,25);%設(shè)置連桿連接頭a6=line(xb1;x3,0;0,color,b,linestyle,-,linewidth,7);%設(shè)置連桿連接軸a7=line(x3,0,color,m,linestyle,.,markersize,50);%設(shè)置運(yùn)動(dòng)中心a

13、3=line(x3,y3,color ,0.5 0.6 0.3,linestyle,.,markersize,85);%設(shè)置手輪len1=6.8;%連桿長(zhǎng)len2=0.7;%活塞長(zhǎng) r=1.3;%運(yùn)動(dòng)半徑dd=0.01;d=-4;plot(d,0,color,r,marker,.,markersize,10);pausetime=.0001s=0;ds=1;t=0;dt=0.015*pi; while t0) s=s+ds; d=d-dd; if s200 s=0; d=0; end set(gcf,doublebuffer,on);%消除震動(dòng) plot(d,0,color,r,marker,

14、.,markersize,s);%畫(huà)氣球 set(gcf,doublebuffer,on) %消除抖動(dòng) pause(pausetime);%暫停一會(huì) drawnow; end endx=-8.0 -7.0 -6.0 -5.5 -4.5 -3.5 -3.7 -3-4 -5.5 -6.5 -7.5 -9.1 -7.3 ;y=-1.8 -1.2 -2.8 -1.5 -2.8 -0.5 -0.7 0.7 0.2 1.5 0.81.2 1.90.5; fill(x,y,r); text(-6,0,pa,fontsize,22);4.打樁機(jī)動(dòng)畫(huà)演示程序clear; %清除工作區(qū)clc; %清除命令區(qū)fig

15、ure(name,武工院打樁機(jī)); %設(shè)置標(biāo)題axis (0 ,10,0,10); %建立坐標(biāo)系hold on;axis off; %除掉坐標(biāo)text(3,9.8,武工院打樁機(jī),fontsize,20,color,r);%畫(huà)打樁機(jī)支架c1=line(1;5.5, 0.15;0.15,color,k,linewidth,8);c2=line(1.7;5.2, 1.5;0.15,color,k,linewidth,4);c3=line(1.8;5.2, 0.1;8,color,k,linewidth,4);c4=line(1.7;5.2, 1.5;8,color,k,linewidth,2);c5

16、=line(1.2;1.8, 0.5;0.5,color,k,linewidth,13);fill(4.9,5.3,5.3,4.9,8.0,8.0,0.3,0.3,1,0.1,0.5);fill(4.4,4.6,5.6,5.8,5.6,4.6,8.4,8.3,8.3,8.4,8.0,8.0,1,0.1,0.5)%畫(huà)打樁機(jī)運(yùn)動(dòng)部分和水泥樁b1=line(8;8,1;6,color,b,linewidth,6);b2=line(5.5,5.5,7.9,8,color,k,linewidth,1);b3=line(5.3,5.55,7.9,7.9,color,k,linewidth,3);b4=li

17、ne(5.5,5.5,7.9,6.3,color,k,linewidth,3);b5=line(5.5,5.5,7,6.6,color,k,linewidth,10);b6=line(5.5,5.5,6.6,6.3,color,k,linewidth,12);pausetime=1.6; %設(shè)置暫停時(shí)間pause(pausetime);%吊裝水泥樁s=0; ds=0.01;pausetime1=.002;while s2.5 %水泥樁向左移動(dòng) s=s+ds; set(b1,xdata,8-s;8-s,ydata,1;6); pause(pausetime1);endpausetime2=1;p

18、ause(pausetime2);s=0; ds=0.01;while s1 %水泥樁向下移動(dòng) s=s+ds; set(b1,xdata,5.5;5.5,ydata,1-s;6-s); pause(pausetime1);endpause(pausetime2);s=0; ds=0.01;while s1.3 %打樁機(jī)運(yùn)動(dòng)部分下移與水泥樁頂端相接觸 s=s+ds; set(b2,xdata,5.5;5.5,ydata,7.9-s,8); set(b3,xdata,5.3;5.55,ydata,7.9-s,7.9-s); set(b4,xdata,5.5;5.5,ydata,7.9-s,6.3-

19、s); set(b5,xdata,5.5;5.5,ydata,7-s,6.6-s); set(b6,xdata,5.5;5.5,ydata,6.6-s,6.3-s); pause(pausetime1);end%打樁機(jī)開(kāi)始打樁pausetime3=.4;pause(pausetime2);s=0; ds=0.06;%設(shè)定打樁進(jìn)度while s4a=0; da=0.01;pausetime4=.0002; while a.4 %兩個(gè)子循環(huán)設(shè)置打樁機(jī)鐵鍾上下反復(fù)運(yùn)動(dòng) a=a+da; set(b5,xdata,5.5;5.5,ydata,5.7-s+a,5.3-s+a); pause(pauseti

20、me4);enda=0; while a,erasemode,xor,markersize,10);% %繪制箭頭三角形pause(1);%下面是開(kāi)關(guān)閉合的過(guò)程t=0;y=7.7;while y6.7 %電路總循環(huán)控制開(kāi)關(guān)動(dòng)作條件 x=4+sqrt(2)*cos(pi/4*(1-t); y=6.7+sqrt(2)*sin(pi/4*(1-t); set(a,xdata,4;x,ydata,6.7;y); drawnow; t=t+0.1;end%下面是開(kāi)關(guān)閉合后模擬大致電流流向的過(guò)程pause(1);light=line(10,4.3,color,y,marker,.,markersize,4

21、0,erasemode,xor);%畫(huà)燈絲發(fā)出的光：黃色%畫(huà)電流的各部分h=line(1;1,5.2;5.6,color,r,linestyle,-,linewidth,4,erasemode,xor);g=line(1,5.7,color,b,linestyle,erasemode,xor,markersize,10);%給循環(huán)初值t=0;m2=5.7;n=5.7;while n6.3;%確定電流豎向循環(huán)范圍m=1;n=0.05*t+5.7;set(h,xdata,m;m,ydata,n-0.5;n-0.1);set(g,xdata,m,ydata,n);t=t+0.01;drawnow;e

22、ndt=0;while t2;%在轉(zhuǎn)角處的停頓時(shí)間 m=1.2-0.2*cos(pi/4)*t); n=6.3+0.2*sin(pi/4)*t); set(h,xdata,m-0.5;m-0.1,ydata,n;n); set(g,xdata,m,ydata,n); t=t+0.05;drawnow;endt=0;while t,markersize,10,erasemode,xor); %繪制第二個(gè)箭頭 set(g,xdata,1.2,ydata,6.5);drawnow;endpause(0.5);t=0;while m8 % 確定第二個(gè)箭頭的循環(huán)范圍 m=1.1+0.05*t; n=6.

23、5; set(g,xdata,m+0.1,ydata,6.5); set(h,xdata,m-0.4;m,ydata,6.5;6.5); t=t+0.05;drawnow;endt=0;while t2 %在轉(zhuǎn)角后的停頓時(shí)間 m=8.1+0.2*cos(pi/2-pi/4*t); n=6.3+0.2*sin(pi/2-pi/4*t); set(g,xdata,m,ydata,n); set(h,xdata,m;m,ydata,n+0.1;n+0.5); t=t+0.05;drawnow;endt=0;while t,markersize,10,erasemode,xor); g=line(8.

24、3,6.3,color,b,linestyle,v,markersize,10,erasemode,xor); set(g,xdata,8.3,ydata,6.3);drawnow;endpause(0.5);t=0;while n1 %確定箭頭的運(yùn)動(dòng)范圍 m=8.3; n=6.3-0.05*t; set(g,xdata,m,ydata,n); set(h,xdata,m;m,ydata,n+0.1;n+0.5); t=t+0.04;drawnow;endt=0;while t2%箭頭的起始時(shí)間 m=8.1+0.2*cos(pi/4*t); n=1-0.2*sin(pi/4*t); set(g

25、,xdata,m,ydata,n); set(h,xdata,m+0.1;m+0.5,ydata,n;n); t=t+0.05;drawnow;endt=0;while t0.5 t=t+0.5;%繪制第四個(gè)箭頭 g=line(8.1,0.8,color,b,linestyle,v,markersize,10,erasemode,xor); g=line(8.1,0.8,color,b,linestyle,1.2 %箭頭的運(yùn)動(dòng)范圍 m=8.1-0.05*t; n=0.8; set(g,xdata,m,ydata,n); set(h,xdata,m+0.1;m+0.5,ydata,n;n); t

26、=t+0.04;drawnow;endt=0;while t2 %停頓時(shí)間 m=1.2-0.2*sin(pi/4*t); n=1+0.2*cos(pi/4*t); set(g,xdata,m,ydata,n); set(h,xdata,m;m+0.5,ydata,n-0.1;n-0.5); t=t+0.05;drawnow;endt=0;while t0.5 %畫(huà)第五個(gè)箭頭 t=t+0.5; g=line(1,1,color,b,linestyle,markersize,10,erasemode,xor); g=line(1,1,color,b,linestyle,markersize,10,

27、erasemode,xor); set(g,xdata,1,ydata,1);drawnow;endt=0;while n6.3%循環(huán)范圍 m=1; n=1+0.05*t; set(g,xdata,m,ydata,n); set(h,xdata,m;m,ydata,n-0.5;n-0.1); t=t+0.04;drawnow;end%下面是開(kāi)關(guān)斷開(kāi)后的情況t=0;y=6.7;while y7.7 %開(kāi)關(guān)的斷開(kāi) x=4+sqrt(2)*cos(pi/4*t); y=6.7+sqrt(2)*sin(pi/4*t); set(a,xdata,4;x,ydata,6.7;y); drawnow; t=

28、t+0.1;endpause(0.5);%開(kāi)關(guān)延時(shí)作用nolight=line(10,4.3,color,y,marker,.,markersize,40,erasemode,xor);end6.電梯動(dòng)畫(huà)演示程序figure(name,自控電梯);axis(-2.0,15.0,-2.0,15.0)hold onfill(-2,15,15,-2,-2,-2,15,15,0.5,0.2,0.3);x1=8 8 10 10;y1=6 0 0 6;x2=10 10 12 12;text(-1,8,上升,fontsize,10,color,c);text(4,8,下降,fontsize,10,color

29、,c);text(6,12.5,控制電機(jī),fontsize,10,color,c);text(12.5,3,電梯,fontsize,10,color,c);text(5,4.5,關(guān)閉,fontsize,10,color,c);text(5,1.5,打開(kāi),fontsize,10,color,c);l1=line(2;5.5,11;11,color,c,linestyle,-,linewidth,2);l2=line(2;2,9;11,color,c,linestyle,-,linewidth,2);l3=line(1;1,7;9,color,c,linestyle,-,linewidth,2);

30、l4=line(3;3,7;9,color,c,linestyle,-,linewidth,2);l5=line(1;3,9;9,color,c,linestyle,-,linewidth,2);%繪制導(dǎo)線k1=line(2;1,6;7,color,r,linestyle,-,linewidth,2);%單刀雙擲開(kāi)關(guān)k2=line(4;5,3;4,color,b,linestyle,-,linewidth,2);%單刀雙擲開(kāi)關(guān)g1=line(7.7;8,3;3,color,b,linestyle,-,linewidth,2);g2=line(7.7;7.7,3;4,color,b,linest

31、yle,-,linewidth,2);g3=line(7.4;7.7,2;4,color,b,linestyle,-,linewidth,2);g4=line(7.4;7.4,2;4,color,b,linestyle,-,linewidth,2);g5=line(7.1;7.4,2;4,color,b,linestyle,-,linewidth,2);g6=line(7.1;7.1,2;4,color,b,linestyle,-,linewidth,2);g7=line(6.8;7.1,2;4,color,b,linestyle,-,linewidth,2);g8=line(6.8;6.8,

32、2;4,color,b,linestyle,-,linewidth,2);g9=line(6.5;6.8,2;4,color,b,linestyle,-,linewidth,2);g10=line(6.5;6.5,2;3,color,b,linestyle,-,linewidth,2);g11=line(6.0;6.5,3;3,color,b,linestyle,-,linewidth,2);g12=line(6;6,2;4,color,c,linestyle,-,linewidth,2);g13=line(5;6,2;2,color,c,linestyle,-,linewidth,2);g1

33、4=line(5;6,4;4,color,c,linestyle,-,linewidth,2);%繪制電梯門(mén)伸縮控制開(kāi)關(guān)door1=patch(x1,y1,0 1 1);door2=patch(x2,y1,0 1 1);%畫(huà)電梯的兩面門(mén)t=0:pi/100:2*pi;fill(6+0.5*sin(t),11+cos(t),0.7,0.85,0.9);%電機(jī)左端fill(8.5+0.5*sin(t),11+cos(t),0.7,0.85,0.9);%電機(jī)右端e0=line(9;10,11;11,color,r,linewidth,2);%e1=line(10;10,6;11,color,b,li

34、newidth,2);%連接電機(jī)中軸和電梯的線%畫(huà)電機(jī)的表面（用八根不同顏色的線代替，每根之間相差pi/4）%為簡(jiǎn)便起見(jiàn)，初始條件下可將八根線分成兩組放在電機(jī)的頂端和底端s1=line(6;8.5,12;12,color,c,linestyle,-,linewidth,2);s2=line(6;8.5,10;10,color,m,linestyle,-,linewidth,2);s3=line(6;8.5,12;12,color,b,linestyle,-,linewidth,2);s4=line(6;8.5,10;10,color,w,linestyle,-,linewidth,2);s5=

35、line(6;8.5,12;12,color,k,linestyle,-,linewidth,2);s6=line(6;8.5,10;10,color,g,linestyle,-,linewidth,2);s7=line(6;8.5,12;12,color,r,linestyle,-,linewidth,2);s8=line(6;8.5,10;10,color,b,linestyle,-,linewidth,2);a=0; %設(shè)定電機(jī)運(yùn)轉(zhuǎn)的初始角度da=0.05;%設(shè)定電機(jī)正轉(zhuǎn)的條件s=0; %設(shè)定門(mén)運(yùn)動(dòng)的初始條件ds=0.05;%設(shè)定門(mén)運(yùn)動(dòng)的周期while s5 %條件表達(dá)式(當(dāng)0s5時(shí)，電

36、機(jī)正轉(zhuǎn),門(mén)上升)a=a+da;xa1=6+abs(0.5*sin(a); %當(dāng)線運(yùn)動(dòng)到電機(jī)背面時(shí)會(huì)覆蓋電機(jī)左端，用abs可解決這一問(wèn)題增強(qiáng)逼真感)xa2=8.5+0.5*sin(a);ya1=11+cos(a);ya2=11+cos(a);%設(shè)定s1的兩端點(diǎn)坐標(biāo)（s1是對(duì)應(yīng)0的線）xb1=6+0.5*abs(sin(a+pi);xb2=8.5+0.5*sin(a+pi);yb1=11+cos(a+pi);yb2=11+cos(a+pi); %設(shè)定s2的兩端點(diǎn)坐標(biāo)（s2是對(duì)應(yīng)pi的線）xc1=6+abs(0.5*sin(a+pi/2);xc2=8.5+0.5*sin(a+pi/2);yc1=11

37、+cos(a+pi/2);yc2=11+cos(a+pi/2);%設(shè)定s3的兩端點(diǎn)坐標(biāo)（s3是對(duì)應(yīng)pi/2的線）xd1=6+0.5*abs(sin(a-pi/2);xd2=8.5+0.5*sin(a-pi/2);yd1=11+cos(a-pi/2);yd2=11+cos(a-pi/2);%設(shè)定s4的兩端點(diǎn)坐標(biāo)（s4是對(duì)應(yīng)-pi/2的線）xe1=6+abs(0.5*sin(a+pi/4);xe2=8.5+0.5*sin(a+pi/4);ye1=11+cos(a+pi/4);ye2=11+cos(a+pi/4);%設(shè)定s5的兩端點(diǎn)坐標(biāo)（s5是對(duì)應(yīng)pi/4的線）xf1=6+0.5*abs(sin(a+pi*3/4);xf2=8.5+0.5*sin(a+pi*3/4);yf1=11+cos(a+pi*3/4);yf2=11+cos(a+pi*3/4);%設(shè)定s6的兩端點(diǎn)坐標(biāo)（s6是對(duì)應(yīng)pi*3/4的線）xg1=6+abs(0.5*sin(a-pi*3/4);xg2=8.5+0.5*sin(a-3*pi/4);yg1=11+cos(a-3*pi/