bpskd.m

来自「几个常用通信和雷达信号的matlab仿真」· M 代码 · 共 31 行

function bpsk=bpskd(g,f) 
%Modulation  BPSK 
%Example: 
%bpskd([1 0 1 1 0],2) 
t=0:2*pi/99:2*pi; 
cp=[];sp=[]; 
mod=[];bit=[]; 
 
for n=1:length(g); 
    if g(n)==0;  
        die=-ones(1,100);   
        se=zeros(1,100);   
    else g(n)==1; 
        die=ones(1,100);    
        se=ones(1,100);     
    end 
    c=sin(f*t); 
    cp=[cp die];     
    mod=[mod c];     
    bit=[bit se]; 
end 
 
bpsk=cp.*mod; 
subplot(2,1,1);plot(bit,'LineWidth',1.5);grid on; 
title('Binary Signal'); 
axis([0 100*length(g) -2.5 2.5]); 
 
 
subplot(2,1,2);plot(bpsk,'LineWidth',1.5);grid on; 
title('BPSK modulation'); 
axis([0 100*length(g) -2.5 2.5]);