《matlab小球跳动程序.pdf》由会员分享,可在线阅读,更多相关《matlab小球跳动程序.pdf(7页珍藏版)》请在得力文库 - 分享文档赚钱的网站上搜索。
1、figure(1);axis(-5.1,5,-0.05,1.05);hold on;axis(off);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);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
2、,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,-,makersize,50)%line(-5,5,0.5,0.5,color,b,linestyle,-,markersize
3、,50)%line(-5,5,0.75,0.75,color,b,linestyle,-,markersize,50)head=line(-5,1,color,r,linestyle,.,erasemode,xor,markersize,60);%body=line(-5,1,color,b,linestyle,-,erasemode,none);while 1 t=4;dt=0.001;w=0;dw=0.001;w=0;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)end end end