radar.m

来自「Electronic Communication Systems的Matlab源」· M 代码 · 共 45 行

function parabolic(eff,freq,d_min,d_max)
%
%
% Computes received power over a range of target distances
% 
% eff = Efficieny
% freq = frequency in hertz
% r_min = Minimum dish diameter
% r_max = Maximum dish diameter
%
% example fucntion call
% parabolic(0.6,4e9,1.8,4)
%
%

% speed of light
c= 3e8;

Pt=input('Enter the Transmitter power in watts  ');
G=input('Enter the antenna gain  ');
f=input('Enter the Transmitter frequency  ');
sigma=input('Enter the radar cross-section of the target in square meters  ');
r_min=input('Enter the minimum range in meters  ');
r_max=input('Enter the maximum range in meters  ');

%
r_step=(r_max-r_min)/100;
r=r_min:r_step:r_max;
%
% Compute gain in received power
%
Pr = Pt*sigma*((c*G/f).^2)./((4*pi).^3)./(r.^4);

%

clf
figure(1)

plot(r,Pr);
title('Receiver power over a range of target distances')
ylabel('Receiver Power')
xlabel('Range in meters')
grid
%