figure(1); %画背景
　　axis([0.5 10.5 -0.5 7]); %定义坐标轴范围 
　　axis('off'); %覆盖坐标轴刻度
　　title('多米诺骨牌效应'); %加题目
　　line([0;10.5],[1.9;1.9],'color','g','linestyle','-','linewidth',10); %画地面
　　for i="1:9"
　　string(i)=line([i;i],[2.05;3.2],'color','r','linestyle','-','erasemode','xor','linewidth',11); %画九个砖块
　　end 
　　t=pi/2; %设置砖块运动初始位置
　　dt=pi/1200;
　　while t>=pi/3 %设置砖块在碰撞前的运动
　　set(string(1),'xdata',[1;1+1.2*cos(t)],'ydata',[2.18;1.2*sin(t)+2.18]);
　　t=t-dt;
　　drawnow;
　　end
　　for i="1:8"   %设置前面8块砖块的运动 
　　t=pi/2;
　　t1=pi/3;
　　dt=pi/1200;
　　dt1=4*dt/3;
　　while t>=pi/3  
　　t=t-dt;
　　t1=t1-dt1;
　　set(string(i),'xdata',[i;i+1.2*cos(t1)],'ydata',[2.18;1.2*sin(t1)+2.18]);
　　set(string(i+1),'xdata',[i+1;i+1+1.2*cos(t)],'ydata',[2.18;1.2*sin(t)+2.18]);
　　drawnow;
　　end
　　end
　　t=pi/3;
　　while t>=0  %设置第9块砖块的运动
　　set(string(9),'xdata',[9;9+1.2*cos(t)],'ydata',[2.18;1.2*sin(t)+2.18]);
　　t=t-dt;
　　drawnow;
　　end 

*博客内容为网友个人发布，仅代表博主个人观点，如有侵权请联系工作人员删除。