西电电子信息系统综合实验一

实验任务

1.模拟不同白噪声(均匀、高斯、瑞利)

2.模拟雷达脉冲信号(单载波、BPSK、LFM)

3.模拟通信信号(QPSK、BPSK)

4.噪声与信号混合

5.混合信号频谱分析

注意:代码需一部分一部分进行运行

%% 模拟不同白噪声(均匀、高斯、瑞利)
%均匀白噪声
clear all;
close all;
clc;
a=2; %均匀分布下限
b=3; %均匀分布上限
fs=1e7; %采样率
t=1e-3; %随机序列长度
n=t*fs;
rand('state',0); %把均匀分布伪随机发生器置为0状态
u=rand(1,n); %产生0-1单位均匀信号
noise1=(b-a)*u+a; %广义均匀分布与单位均匀分布之间的关系
nexttile;
plot(noise1);
title('均匀分布噪声');
nexttile;
histogram(noise1,a:0.02:b); %直方图
title('均匀分布噪声直方图');

%高斯白噪声
fs=1e7; %采样率
t=1e-3; %随机序列长度
n=t*fs;
randn('state',0);
noise2=randn(1,n);
nexttile;
plot(noise2);
title('高斯分布噪声');
nexttile;
histogram(noise2);
title('高斯分布噪声直方图');

%瑞利白噪声
sigma=2; %瑞利分布参数sigma
t=1e-3; 
fs=1e7;
t1=0:1/fs:t-1/fs;
n=length(t1);
rand('state',0);
u=rand(1,n);
noise3=sqrt(2*log2(1./u))*sigma; %产生瑞利分布信号
nexttile;
plot(noise3);
title('瑞利分布噪声');
xlabel('t/s');
nexttile;
histogram(noise3,0:0.1:10);
title('瑞利分布噪声直方图')


%% 模拟雷达脉冲信号(单载波、BPSK、LFM)
%雷达脉冲信号单载波
%雷达脉冲信号单载波

T=1;
f=1e5;
t=0:1/f:(T-1/f);
n=length(t);

A_danpin=10;
f_danpin=1000;
y_danpin=A_danpin*cos(2*pi*f_danpin*t);
figure(1);
plot(t(1:1000),y_danpin(1:1000))
xlabel('t/s')
title('单载波');
grid on;
axis([0 0.01 -10.5 10.5])





%雷达脉冲信号BPSK

T=1;
f=1e5;
t=0:1/f:(T-1/f);
n= length(t);

binary_code='1001100110';
len_code=length(binary_code);

f_bpsk=1000;
T_bpsk=1/f_bpsk;
A_bpsk=10;
t_mayuan=0:1/f:(T_bpsk-1/f);
y_mayuan=A_bpsk*sin(2*pi*f_bpsk*t_mayuan);
t_bpsk=0:1/f:(T_bpsk*len_code-1/f);
y_bpsk= [];
for i=1:len_code
    tmp=str2num(binary_code(i));
    if tmp==0
        y_bpsk=[y_bpsk,y_mayuan];
    end
    if tmp==1
        y_bpsk=[y_bpsk,-y_mayuan];
    end
end
figure(2)
plot(t_bpsk,y_bpsk)
grid on;
xlabel('t/s');
title('BPSK信号');
axis([0 1e-2 -2*A_bpsk 2*A_bpsk]);

%雷达脉冲信号LFM

% T=1;
% f=1e5;
% t=0:1/f:(T-1/f);
% n=length(t);
% A_lfm=1;
% f_lfm=1000;
% k_lfm=800000;
% y_lfm=A_lfm*cos(2*pi*f_lfm*t+pi*k_lfm*t.^2);
% figure(3)
% plot(t(1:500),y_lfm(1:500));
% xlabel('t/s');
% title('LFM');
% axis([0 0.005 -A_lfm A_lfm]);

% 线性调频与脉冲压缩
set(0,'defaultfigurecolor','w')
% Chirp信号参数设置
Tr = 1e-6;%时宽
Br = 200e6;%带宽
Fs = 4*Br;%采样率
% Chirp信号参数导出
Kr = Br/Tr;%调频率
N =  round( Tr / (1/Fs) );%采样点数
t = linspace( -Tr/2 , Tr/2 , N);%在[-Tp/2,Tp/2]选取采样点
% Chirp信号生成
y_lfm = ( abs(t) < Tr/2 ) .* exp( 1j * pi * Kr * t.^2 ); 
f_chirp= Kr * t; %信号频率
phase_chirp = pi * Kr * t.^2;%信号相位
plot(t*1e6,y_lfm)
title('雷达LFM')


%% 模拟通信信号(QPSK、BPSK)
%QPSK
N=20;%比特数
T=1;%比特周期
fc=2;%载波频率
Fs=100;%抽样频率
bitstream=randi([0,1],1,N);%随机产生的比特数0、1
bitstream=2*bitstream-1;%单极性变为双极性(0到-1;1到1)
I=[];Q=[];
%奇数进I路,偶数进Q路
for i=1:N
    if mod(i,2)~=0
        I=[I,bitstream(i)];
    else
        Q=[Q,bitstream(i)];
    end
end
%采用绘图比较I、Q比特流
bit_data=[];
for i=1:N
    bit_data=[bit_data,bitstream(i)*ones(1,T*Fs)];%在一个比特周期里面有T*Fs个1和采样点一模一样
end
I_data=[];Q_data=[];
for i=1:N/2
    %I路和Q路是原来比特周期的两倍,2Tb=Ts(码元周期),因此采样点个数为T*Fs*2
    I_data=[I_data,I(i)*ones(1,T*Fs*2)];
    Q_data=[Q_data,Q(i)*ones(1,T*Fs*2)];
end
%绘图
figure();
%时间轴
t=0:1/Fs:N*T-1/Fs;
subplot(3,1,1)
plot(t,bit_data);legend('Bitstream')%比特信息
subplot(3,1,2)
plot(t,I_data);legend('I Bitstream')%I路信息
subplot(3,1,3)
plot(t,Q_data);legend('Q Bitstream')%Q路信息
%载波信号
bit_t=0:1/Fs:2*T-1/Fs;%载波周期为2倍比特周期,定义时间轴
%定义I路和Q路的载波
I_carrier=[];Q_carrier=[];
for i=1:N/2
    I_carrier=[I_carrier,I(i)*cos(2*pi*fc*bit_t)];%I路载波信号
    Q_carrier=[Q_carrier,Q(i)*cos(2*pi*fc*bit_t+pi/2)];%Q路载波信号
end
%传输信号
QPSK_signal=I_carrier+Q_carrier;
%绘图
figure();%产生一个新图
subplot(3,1,1)
plot(t,I_carrier);legend('I signal')%I路信号
title('I路信号');
subplot(3,1,2)
plot(t,Q_carrier);legend('Q signal')%Q路信号
title('Q路信号')
subplot(3,1,3)
plot(t,QPSK_signal);legend('QPSK signal')%I路、Q路和的信号
title('I+Q路信号(QPSK)')


%BPSK
% N=1000; %信号长度
% fc=10; %载波频率
% fs=1000; %采样频率
% T=1/fs; %采样周期
% SNR=10; %信噪比
% 
% 
% %生成BPSK信号
% x=sign(randn(1,N)); %产生随机二进制序列
% BPSK_signal=x.*cos(2*fc*pi*(0:N-1)*T); %BPSK信号
% plot(BPSK_signal)
% title('BPSK信号')
% xlabel('t/s')
T=1;
f=1e5;
t=0:1/f:(T-1/f);
n= length(t);

binary_code='1010101010';
len_code=length(binary_code);

f_bpsk=1000;
T_bpsk=1/f_bpsk;
A_bpsk=10;
t_mayuan=0:1/f:(T_bpsk-1/f);
y_mayuan=A_bpsk*sin(2*pi*f_bpsk*t_mayuan);
t_bpsk=0:1/f:(T_bpsk*len_code-1/f);
BPSK_signal= [];
for i=1:len_code
    tmp=str2num(binary_code(i));
    if tmp==0
        BPSK_signal=[BPSK_signal,y_mayuan];
    end
    if tmp==1
        BPSK_signal=[BPSK_signal,-y_mayuan];
    end
end
figure(2)
plot(t_bpsk,BPSK_signal)
grid on;
xlabel('t/s');
title('BPSK信号');
axis([0 1e-2 -2*A_bpsk 2*A_bpsk]);


%% 实测通信信号(RadioML2018.01A)


%% 噪声与信号混合+频谱分析
% 雷达单载频+均匀白噪声
T=1;
f=1e5;
t=0:1/f:(T-1/f);
n=length(t);
noise_1=rand(1,n); %2倍扩大使结果更明显
signal_1=y_danpin+noise_1;
nexttile;
plot(t(1:1000),signal_1(1:1000));
title('雷达单载频+均匀白噪声')
xlabel('t/s')
nexttile;
plot(fftshift(abs(fft(signal_1))))
title('雷达单载频+均匀白噪声频谱图')
xlabel('f/Hz')

%雷达单载频+高斯白噪声
noise_2=randn(1,n);
signal_2=y_danpin+noise_2;
nexttile;
plot(t(1:1000),signal_2(1:1000));
title('雷达单载频+高斯白噪声')
xlabel('t/s')
nexttile;
plot(fftshift(abs(fft(signal_2))))
title('雷达单载频+高斯白噪声频谱图')
xlabel('f/Hz')

%雷达单载频+瑞利白噪声
sigma=3;
u=rand(1,n);
noise_3=sqrt(2*log2(1./u))*sigma;
signal_3=y_danpin+2*noise_3;
nexttile;
plot(t(1:1000),signal_3(1:1000));
title('雷达单载频+瑞利白噪声')
xlabel('t/s')
nexttile;
plot(fftshift(abs(fft(signal_3))))
title('雷达单载频+瑞利白噪声频谱图')
xlabel('f/Hz')


%雷达BPSK+均匀白噪声
nexttile;
signal_4=y_bpsk+noise_1(1:1000);
plot(t(1:1000),signal_4(1:1000));
title('雷达BPSK+均匀白噪声')
xlabel('t/s')
nexttile;
plot(fftshift(abs(fft(signal_4))))
title('雷达BPSK+均匀白噪声频谱图')
xlabel('f/Hz')

%雷达BPSK+高斯白噪声
nexttile;
signal_5=y_bpsk+noise_2(1:1000);
plot(t(1:1000),signal_5(1:1000));
title('雷达BPSK+高斯白噪声')
xlabel('t/s')
nexttile;
plot(fftshift(abs(fft(signal_5))))
title('雷达BPSK+高斯白噪声频谱图')
xlabel('f/Hz')


%雷达BPSK+瑞利白噪声
nexttile;
signal_6=y_bpsk+noise_3(1:1000);
plot(t(1:1000),signal_6(1:1000));
title('雷达BPSK+瑞利白噪声')
xlabel('t/s')
nexttile;
plot(fftshift(abs(fft(signal_6))))
title('雷达BPSK+瑞利白噪声频谱图')
xlabel('f/Hz')

%雷达LFM+均匀白噪声
nexttile;
signal_7=y_lfm+noise_1(1:800);
plot(t(1:500)   ,signal_7(1:500));
title('雷达LFM+均匀白噪声')
xlabel('t/s')
nexttile;
plot(fftshift(abs(fft(signal_7))))
title('雷达LFM+均匀白噪声频谱图')
xlabel('f/Hz')

%雷达LFM+高斯白噪声
nexttile;
signal_8=y_lfm+noise_2(1:800);
plot(t(1:500),signal_8(1:500));
title('雷达LFM+高斯白噪声')
xlabel('t/s')
nexttile;
plot(fftshift(abs(fft(signal_8))))
title('雷达LFM+高斯白噪声频谱图')
xlabel('f/Hz')


%雷达LFM+瑞利白噪声
nexttile;
signal_9=y_lfm+noise_3(1:800);
plot(t(1:500),signal_9(1:500));
title('雷达LFM+瑞利白噪声')
xlabel('t/s')
nexttile;
plot(fftshift(abs(fft(signal_9))))
title('雷达LFM+瑞利白噪声频谱图')
xlabel('f/Hz')

%模拟通信信号QPSK+均匀白噪声
nexttile;
signal_10=QPSK_signal+noise_1(1:2000);
plot(t(1:1000),signal_10(1:1000));
title('QPSK+均匀白噪声')
xlabel('t/s')
nexttile;
plot(fftshift(abs(fft(signal_10))))
title('QPSK+均匀白噪声频谱图')
xlabel('f/Hz')

%模拟通信信号QPSK+高斯白噪声
nexttile;
signal_11=QPSK_signal+noise_2(1:2000);
plot(t(1:1000),signal_11(1:1000));
title('QPSK+高斯白噪声')
xlabel('t/s')
nexttile;
plot(fftshift(abs(fft(signal_11))))
title('QPSK+高斯白噪声频谱图')
xlabel('f/Hz')

%模拟通信信号QPSK+瑞利白噪声
nexttile;
signal_12=QPSK_signal+noise_3(1:2000);
plot(t(1:1000),signal_12(1:1000));
title('QPSK+瑞利白噪声')
xlabel('t/s')
nexttile;
plot(fftshift(abs(fft(signal_12))))
title('QPSK+瑞利白噪声频谱图')
xlabel('f/Hz')

%模拟通信信号BPSK+均匀白噪声
nexttile;
signal_13=BPSK_signal+noise_1(1:1000);
plot(t(1:500),signal_13(1:500));
title('BPSK+均匀白噪声')
xlabel('t/s')
nexttile;
plot(fftshift(abs(fft(signal_13))))
title('BPSK+均匀白噪声频谱图')
xlabel('f/Hz')

%模拟通信信号BPSK+高斯白噪声
nexttile;
signal_14=BPSK_signal+noise_2(1:1000);
plot(t(1:500),signal_14(1:500));
title('BPSK+高斯白噪声')
xlabel('t/s')
nexttile;
plot(fftshift(abs(fft(signal_14))))
title('BPSK+高斯白噪声频谱图')
xlabel('f/Hz')

%模拟通信信号BPSK+瑞利白噪声
nexttile;
signal_15=BPSK_signal+noise_3(1:1000);
plot(t(1:500),signal_15(1:500));
title('BPSK+瑞利白噪声')
xlabel('t/s')
nexttile;
plot(fftshift(abs(fft(signal_15))))
title('BPSK+瑞利白噪声频谱图')
xlabel('f/Hz')



  • 0
    点赞
  • 1
    收藏
    觉得还不错? 一键收藏
  • 0
    评论

“相关推荐”对你有帮助么?

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值