鱼雷尾追弹道.rar

鱼雷尾追弹道.rar

%% 大作业一
%% 初始化
clc
clear all
close all
x=1000;                        %鱼雷初始位置
y=500;
t=0;
u=45*0.514;                    %鱼雷航速
v=15*0.514;                    %舰船航速
theta=pi*5/4;                  %舰船航向
[t_newx_newy_new]=zidao（txythetauv）;
while 1
 [t_newx_newy_new]=zidao（t_newx_newy_newthetauv）; %调用尾追自导函数
 plot（x_newy_new‘.‘）;
 xlabel（‘x坐标/m‘）;ylabel（‘y坐标/m‘）
 hold on
 plot（v*t_new*cos（theta）v*t_new*sin（theta）‘r.‘）;
 hold on
 if（（（v*t_new*sin（theta）-y_new）^2+（v*t_new*cos（theta）-x_new）^2）<0.5）   %判断鱼雷和目标距离在一定阈值内时认为攻击成功结束
     break; 
 end
 pause（0.01）
end
 disp（‘鱼雷命中目标用时（单位s）：‘）;
 disp（t_new）;
 disp（‘鱼雷命中目标位置（单位m）：‘）;
 disp（x_new）;
 disp（y_new）;
   

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----

     文件        789  2015-01-11 22:30  鱼雷尾追弹道\dandao.m

     文件        266  2015-01-08 23:45  鱼雷尾追弹道\zidao.m

     目录          0  2015-01-15 17:39  鱼雷尾追弹道

----------- ---------  ---------- -----  ----

                 1055                    3