prfpri.m

Programs developed during Radar Course

%Pulse Width
t=1e-1;
%PRI
pri=9*t;
%No. of Pulses
n=3;
%Sampling Frequency
fs=6e4;
%Carrier Frequency
fc=1e4;

t=linspace(0,pri,1000);

x=[ones(1,100) zeros(1,900)];
% plot(t,x);
X=[x x x];
T=linspace(0,n*pri,n*1000);
% plot(T,X)
F=abs(fftshift(fft(X)));
subplot(211)
plot(T,X)
axis([0 max(T) -0.5 1.5])
subplot(212)
% stem(F((length(F)/2-200:length(F)/2+200)));
stem(F)