《仿真和虚拟课件1.pptVIP

计算机仿真与虚拟技术 第一章 计算机仿真概念及其实现 第二章 计算机仿真硬件和软件 第三章 计算机仿真方法 第四章 虚拟现实的基本概念 第五章 虚拟现实系统的典型硬件装置 第六章 虚拟仪器 Evaluation only. Created with Aspose.Slides for .NET 3.5 Client Profile 5.2.0.0. Copyright 2004-2011 Aspose Pty Ltd. 仿真技术是当前应用最广泛的实用技术之一。 比如，工程界： 生物、医学界： 国防和军事界： 国民经济运行： 交通运输： Evaluation only. Created with Aspose.Slides for .NET 3.5 Client Profile 5.2.0.0. Copyright 2004-2011 Aspose Pty Ltd. 追击敌机问题 已知：敌机在100KM高空，以20KM/min的速度匀速直线行驶。 假设：（1）只要两机相距在10公里之内，我机就可以摧毁敌机； （2）如果10分钟之内没有捕捉到，就认为失败。 问：我方飞机应以怎样的速度，沿着什么航线飞行，需要多长时间可捕捉到目标。比如我机以30KM/min的速度，每1分钟改变一次方向，能不能捕捉到？我机以40KM/min的速度，每2分钟改变一次方向，能不能捕捉到？ Evaluation only. Created with Aspose.Slides for .NET 3.5 Client Profile 5.2.0.0. Copyright 2004-2011 Aspose Pty Ltd. MATLAB程序 vd=20; vw=30; time=1; % 我机以30KM/min的速度,每1分钟改变一次方向 i=1; ts=0; xw=0; yw=0; t(1)=0; W(1,:)=[0 0]; D(1,:)=[0 100]; xd=0; while 1 i=i+1; theta=atan((100-yw)/(xd-xw)); % 计算我机的方向 ctheta=cos(theta); stheta=sin(theta); A=[vw*ctheta vw*stheta]; global A [T,Y]=ode45(‘plane’,[ts,ts+time],[xw,yw]); % 计算我机的位置 n=length(Y); Evaluation only. Created with Aspose.Slides for .NET 3.5 Client Profile 5.2.0.0. Copyright 2004-2011 Aspose Pty Ltd. W(i,:)=Y(n,:); t(i)=ts+time; xd=vd*(ts+time); % 计算敌机的位置 D(i,1)=xd; D(i,2)=100; xw=Y(n,1); yw=Y(n,2); Displace=sqrt((xd-xw)*(xd-xw)+(100-yw)*(100-yw)); % 计算两者距离 if Displace10 disp (success); break end % 条件判断 ts=ts+time; if ts10 disp(fail); break end end figure(1) plot(W(:,1),W(:,2),g+,W(:,1),W(:,2),r,D(:,1),D(:,2),bo); Evaluation only. Created with Aspose.Slides for .NET 3.5 Client Profile 5.2.0.0. Copyright 2004-2011 Aspose Pty Ltd. 我机以30KM/min的速度,每1分钟改变一次方向,6分钟可捕捉到敌机 Evaluation only. Created with Aspose.Slides for .NET 3.5 Client Profile 5.2.0.0. Copyr