MATLAB绘制“问题儿童表情包”动图2

动图效果：

代码如下：

filename = '问题儿童.gif';
% 创建图形窗口并设置属性 
hFigure=figure('menubar','none','NumberTitle','off','position',... 
    [100 100 350 400],'name','问题儿童'); 
movegui(hFigure,'center');%居中 
%创建坐标轴，用于显示背景图片和文本 
hAxes=axes('visible','off','units','normalized','position',[0 0 1 1]);

%% 方块
rectangle('Position',[-26,65,52,46],'Curvature',[0.2 0.2],'edgecolor','k','facecolor','y','linewidth',3);
hold on
rectangle('Position',[-23,104,3,3],'Curvature',[1 1],'edgecolor','k','facecolor','k');
rectangle('Position',[20,104,3,3],'Curvature',[1 1],'edgecolor','k','facecolor','k');
rectangle('Position',[-23,70,3,3],'Curvature',[1 1],'edgecolor','k','facecolor','k');
rectangle('Position',[20,70,3,3],'Curvature',[1 1],'edgecolor','k','facecolor','k');

%% 头
theta=0:0.01:2*pi;
x=50*cos(theta); y=48*sin(theta);
h=plot(x,y,'k','linewidth',6);
h1=fill(x,y,'w');

%% 眼睛
theta=0:0.01:pi;
xL1=-20+8*cos(theta); yL1=6+9*sin(theta);
hL1=plot(xL1,yL1,'k','linewidth',3,'EraseMode','xor');

theta=0:0.01:pi;
xR1=20+8*cos(theta); yR1=6+9*sin(theta);
hR1=plot(xR1,yR1,'k','linewidth',3,'EraseMode','xor');

%% 嘴
x2=[0 -7 7 0]; y2=[-10 1 1 -10];
h2=plot(x2,y2,'k','linewidth',3,'EraseMode','xor');

%% 身体
x3=[28 35 -35 -28]; y3=[-39 -90 -90 -39];
h3=plot(x3,y3,'k','linewidth',5,'EraseMode','xor');
h31=fill(x3,y3,'w');

x32=[28 -28]; y32=[-39 -39];
h32=plot(x32,y32,'w','linewidth',5,'EraseMode','xor');

%% 爱心
t=linspace(-3,3,50);
x4=10+8*(sin(t)).^3;
y4=165+6.5*cos(t)-2.5*cos(2*t)-1*cos(3*t)-0.5*cos(4*t);

axis equal

strCell={'?','爱','你','呦'}; 

for k=1:9
    if k==1
        set(h,'xdata',x,'ydata',y);
        set(h1,'xdata',x,'ydata',y);
        set(hL1,'xdata',xL1,'ydata',yL1);
        set(hR1,'xdata',xR1,'ydata',yR1);
        set(h2,'xdata',x2,'ydata',y2);
        set(h3,'xdata',x3,'ydata',y3);
        set(h31,'xdata',x3,'ydata',y3);
        set(h32,'xdata',x32,'ydata',y32);
        strTemp=strCell{1};%取每一条诗句 
        str=[strTemp;10*ones(1,length(strTemp))];%在每句后添加一个换行符 
        str=str(:)';%获取添加了换行符的诗句字符串
        str1=str(1);%获取一句中的每个字 
        t=text('Horizontal','right',... 
            'FontName','宋体','FontSize',35,'Color','k');
        set(t,'string',str1,'position',[8 90],'EraseMode','none'); 
    end
    if k==2
        set(h,'xdata',x,'ydata',y+15);
        set(h1,'xdata',x,'ydata',y+15);
        set(hL1,'xdata',xL1,'ydata',yL1+15);
        set(hR1,'xdata',xR1,'ydata',yR1+15);
        set(h2,'xdata',x2,'ydata',y2+15);
        set(h3,'xdata',x3,'ydata',y3+15);
        set(h31,'xdata',x3,'ydata',y3+15);
        set(h32,'xdata',x32,'ydata',y32+15);
        strTemp=strCell{2};%取每一条诗句 
        str=[strTemp;10*ones(1,length(strTemp))];%在每句后添加一个换行符 
        str=str(:)';%获取添加了换行符的诗句字符串
        str1=str(1);%获取一句中的每个字 
        t=text('Horizontal','right',... 
            'FontName','华文行楷','FontSize',30,'Color','k');
        set(t,'string',str2,'position',[10 160],'EraseMode','none'); 
    end
    if k==3
        set(h,'xdata',x,'ydata',y);
        set(h1,'xdata',x,'ydata',y);
        set(hL1,'xdata',xL1,'ydata',yL1);
        set(hR1,'xdata',xR1,'ydata',yR1);
        set(h2,'xdata',x2,'ydata',y2);
        set(h3,'xdata',x3,'ydata',y3);
        set(h31,'xdata',x3,'ydata',y3);
        set(h32,'xdata',x32,'ydata',y32);
        set(t,'string',str2,'position',[-15 130],'EraseMode','none');
    end
    if k==4
        set(h,'xdata',x,'ydata',y+15);
        set(h1,'xdata',x,'ydata',y+15);
        set(hL1,'xdata',xL1,'ydata',yL1+15);
        set(hR1,'xdata',xR1,'ydata',yR1+15);
        set(h2,'xdata',x2,'ydata',y2+15);
        set(h3,'xdata',x3,'ydata',y3+15);
        set(h31,'xdata',x3,'ydata',y3+15);
        set(h32,'xdata',x32,'ydata',y32+15);
        strTemp=strCell{3};%取每一条诗句 
        str=[strTemp;10*ones(1,length(strTemp))];%在每句后添加一个换行符 
        str=str(:)';%获取添加了换行符的诗句字符串
        str3=str(1);%获取一句中的每个字 
        t=text('Horizontal','right',... 
            'FontName','华文行楷','FontSize',30,'Color','k');
        set(t,'string',str3,'position',[10 160]); 
    end
    if k==5      
        set(h,'xdata',x,'ydata',y);
        set(h1,'xdata',x,'ydata',y);
        set(hL1,'xdata',xL1,'ydata',yL1);
        set(hR1,'xdata',xR1,'ydata',yR1);
        set(h2,'xdata',x2,'ydata',y2);
        set(h3,'xdata',x3,'ydata',y3);
        set(h31,'xdata',x3,'ydata',y3);
        set(h32,'xdata',x32,'ydata',y32);
        set(t,'string',str3,'position',[10 130]);
    end
    if k==6
        set(h,'xdata',x,'ydata',y+15);
        set(h1,'xdata',x,'ydata',y+15);
        set(hL1,'xdata',xL1,'ydata',yL1+15);
        set(hR1,'xdata',xR1,'ydata',yR1+15);
        set(h2,'xdata',x2,'ydata',y2+15);
        set(h3,'xdata',x3,'ydata',y3+15);
        set(h31,'xdata',x3,'ydata',y3+15);
        set(h32,'xdata',x32,'ydata',y32+15);
        strTemp=strCell{4};%取每一条诗句 
        str=[strTemp;10*ones(1,length(strTemp))];%在每句后添加一个换行符 
        str=str(:)';%获取添加了换行符的诗句字符串
        str4=str(1);%获取一句中的每个字 
        t=text('Horizontal','right',... 
            'FontName','华文行楷','FontSize',30,'Color','k');
        set(t,'string',str4,'position',[10 160]);         
    end
    if k==7
        set(h,'xdata',x,'ydata',y);
        set(h1,'xdata',x,'ydata',y);
        set(hL1,'xdata',xL1,'ydata',yL1);
        set(hR1,'xdata',xR1,'ydata',yR1);
        set(h2,'xdata',x2,'ydata',y2);
        set(h3,'xdata',x3,'ydata',y3);
        set(h31,'xdata',x3,'ydata',y3);
        set(h32,'xdata',x32,'ydata',y32);
        set(t,'string',str4,'position',[35 130]);
    end
    if k==8
        set(h,'xdata',x,'ydata',y+15);
        set(h1,'xdata',x,'ydata',y+15);
        set(hL1,'xdata',xL1,'ydata',yL1+15);
        set(hR1,'xdata',xR1,'ydata',yR1+15);
        set(h2,'xdata',x2,'ydata',y2+15);
        set(h3,'xdata',x3,'ydata',y3+15);
        set(h31,'xdata',x3,'ydata',y3+15);
        set(h32,'xdata',x32,'ydata',y32+15);
        h41=plot(x4,y4,'k','linewidth',4,'EraseMode','xor');
        h42=fill(x4,y4,'r');
    end
    if k==9
        set(h,'xdata',x,'ydata',y);
        set(h1,'xdata',x,'ydata',y);
        set(hL1,'xdata',xL1,'ydata',yL1);
        set(hR1,'xdata',xR1,'ydata',yR1);
        set(h2,'xdata',x2,'ydata',y2);
        set(h3,'xdata',x3,'ydata',y3);
        set(h31,'xdata',x3,'ydata',y3);
        set(h32,'xdata',x32,'ydata',y32);
        set(h41,'xdata',x4+40,'ydata',y4-35);
        set(h42,'xdata',x4+40,'ydata',y4-35);
    end
    
    axis equal
    axis off;%关闭坐标轴显示
    axis([-90 90 -74 180]);
    drawnow; % 刷新屏幕
    pause(0.2)
    
%下面语句是将静态图像的每一帧进行叠加存储，并写入到filename文件夹中
f=getframe(gcf);
imind=frame2im(f);
[imind,cm] = rgb2ind(imind,256);
if k==1
imwrite(imind,cm,filename,'gif', 'Loopcount',inf,'DelayTime',0.2);
else
imwrite(imind,cm,filename,'gif','WriteMode','append','DelayTime',0.2);
end

end