接上一個視頻
figure('name','肖 ');
axis([-60,60,-60,60]);%建立座標系
hold on; %保持當前圖形及軸系的所有特性
fill([-60 -60 60 60],[-60 60 60 -60],[1 0 0]);
r1=2.5;
axis off
%畫羽毛
a1=line([0 -3],[-20 20],'color','k','linewidth',2);
a2=line([0 3],[-20 20],'color','k','erasemode','none','linewidth',2);
a3=line([0 -3],[23 20],'color','k','erasemode','none','linewidth',2);
a4=line([0 3],[23 20],'color','k','erasemode','none','linewidth',2);
a=0:0.01:pi; %設置參數
a5=fill(3*cos(a),20+3*sin(a),[1 0 1]) %畫中間羽毛的圓弧
a6=fill([0 -3 0 3],[-20 20 23 20],[1 1 0]);
a7=fill([0 -3 0 3],[-20 20 23 20],[1 1 0]);
a=0:0.01:2*pi;
fill(r1*cos(a),r1*sin(a),[1 0 1]) %畫孔雀的頭
line([0 0],[-2.5 -6],'color','b','erasemode','background','linewidth',6);
line(-1,0.5,'linestyle','.','color','k');
line(1,0.5,'linestyle','.','color','k');
fill([0 -1.5 -3 -1 0 1 3 1.5 0],[1.5 2.2 5 4 7 4 5 2.2 1.5],[1 1 0]);
a=0:0.01:2*pi;
fill(7*cos(a),-16+10*sin(a),[0 0 1]) %畫孔雀的身體
%畫孔雀的兩隻腳
line([-4 -5.5],[-24 -28.5],'color','k','erasemode','background','linewidth',2);
line([4 5.5],[-24 -28.5],'color','k','erasemode','background','linewidth',2);
%孔雀開屏
t1=1;
while t1<11
pause(1);
dt=8.6/360*(2*pi);
%孔雀開屏展開左側羽毛
x1=41*cos(t1*dt+pi/2+4.3/360*(2*pi));
x2=43*cos(t1*dt+pi/2);
x3=41*cos(t1*dt+pi/2-4.3/360*(2*pi));
y1=41*sin(dt*t1+pi/2+4.3/360*(2*pi));
y2=43*sin(dt*t1+pi/2);
y3=41*sin(dt*t1+pi/2-4.3/360*(2*pi));
line([0 0+x1],[-20 -20+y1],'color','g','erasemode','none','linewidth',2);
line([0 0+x3],[-20 -20+y3],'color','g','linewidth',2);
line([0+x2 0+x1],[-20+y2 -20+y1],'color','g','erasemode','none','linewidth',2);
line([0+x2 0+x3],[-20+y2 -20+y3],'color','g','erasemode','none','linewidth',2);
fill([0 x1 x2 x3],[-20 -20+y1 -20+y2 -20+y3],[0 1 0]);
%孔雀開屏展開右側羽毛
x4=41*cos(-t1*dt+pi/2+4.3/360*(2*pi));
x5=43*cos(-t1*dt+pi/2);
x6=41*cos(-t1*dt+pi/2-4.3/360*(2*pi));
y4=41*sin(-dt*t1+pi/2+4.3/360*(2*pi));
y5=43*sin(-dt*t1+pi/2);
y6=41*sin(-dt*t1+pi/2-4.3/360*(2*pi));
line([0 0+x4],[-20 -20+y4],'color','g','linewidth',2);
line([0 0+x6],[-20 -20+y6],'color','g','erasemode','none','linewidth',2);
line([0+x5 0+x4],[-20+y5 -20+y4],'color','g','erasemode','none','linewidth',2);
line([0+x5 0+x6],[-20+y5 -20+y6],'color','g','erasemode','none','linewidth',2);
fill([0 x4 x5 x6],[-20 -20+y4 -20+y5 -20+y6],[0 1 0]);
%重置孔雀身體
a=0:0.01:2*pi;
fill(r1*cos(a),r1*sin(a),[0 0 1]) %畫孔雀頭
line([0 0],[-2.5 -6],'color','b','erasemode','background','linewidth',6);
line(-1,0.5,'linestyle','.','color','k');
line(1,0.5,'linestyle','.','color','k');
fill([0 -1.5 -3 -1 0 1 3 1.5 0],[1.5 2.2 5 4 7 4 5 2.2 1.5],[1 1 0]);
a=0:0.01:2*pi;
fill(7*cos(a),-16+10*sin(a),[0 0 1]) %畫孔雀身子
line([-4 -5.5],[-24 -28.5],'color','k','erasemode','background','linewidth',2);
line([4 5.5],[-24 -28.5],'color','k','erasemode','background','linewidth',2);
t1=t1+1;
end
text(-35,45,'電氣','fontsize',20,'color','k');
text(-35,-45,'再美也不及你的一瞬間','fontsize',20,'color','y');
閱讀更多 謨哩卡 的文章
