chanshengfashexinhao.m

来自「此程序可以产生雷达的发射信号」· M 代码 · 共 31 行

close all;clear all ; clc;
%%%%%%%%%%产生雷达发射信号%%%%%%%%%%%%%%
code={1,1,1,1,1,-1,-1,1,1,-1,1,-1,1};   %13位巴克码
tao=10e-6; %脉冲宽度1μs
fc=28e6;   %调频信号起始频率
f0=30e6;   
fs=100e6;  %采样频率
ts=1/fs;   
B=4e6;     %调频信号宽度
t_tao=0:1/fs:tao-1/fs;
N=length(t_tao);
k=B/fs*2*pi/max(t_tao);
n=length(code);
pha=0;

s=zeros(1,n*N);
for i=1:n
  if code(i)==1
     pha=pi;
  else pha=0;
  end
  s(1,(i-1)*N+1:i*N)=cos(2*pi*fs*t_tao+k*cumsum(t_tao)+pha);
end

t=0:1/fs:13*tao-1/fs;
figure(1),subplot(2,1,1),plot(t,s),
xlabel('t(单位：S)'),title('混合调频信号(13位巴克码+线形调频)');
s_fft_result=abs(fft(s(1:N)));
subplot(2,1,2),plot((0:fs/N:fs/2-fs/N),abs(s_fft_result(1:N/2)));
xlabel('频率(单位：Hz)'),title('码内信号频谱');