digital.m

产生一个输入的二进制信源 然后进行OOK FSK PSK调制 最后绘出调制后波形及频谱

%OOK，PSK，FSK调制，文件名digital.m
clear all;
close all;

A=1;
fc=2;   %2Hz;
N_sample=8;
N=500;   %码元数
Ts=1;   %1Baud/s

dt=Ts/fc/N_sample;   %波形采样间隔；
T=Ts-dt;
t=0:dt:N*Ts-dt;
Lt=length(t);

%产生二进制信源
d=sign(randn(1,N));
dd=sigexpand((d+1)/2,fc*N_sample);
gt=ones(1,fc*N_sample);   %NRZ波形
d_NRZ=conv(dd,gt);

figure(1)
subplot(221);   %输入NRZ信号波形（单极性）
plot(t,d_NRZ(1:length(t)));
axis([0 10 0 1.2]);ylabel('输入信号');

subplot(222);   %输入NRZ频谱
[f,d_NRZf]=T2F(t,d_NRZ(1:length(t)));
plot(f,10*log10(abs(d_NRZf).^2/T));
axis([-2 2 -50 10]);ylabel('输入信号功率谱密度(dB/Hz)');

ook(A,Lt,fc,t,T,d_NRZ);   %调用OOK调制程序
psk(A,Lt,fc,t,T,d_NRZ);   %调用PSK调制程序
fsk(A,Lt,fc,t,T,d_NRZ);   %调用FSK调制程序