bpsk.m

来自「matlab通信仿真」· M 代码 · 共 33 行

%BPSK
clear;
%f=0.01;

for i=1:8
    a(i)=rand;
    if a(i)>=0.5
        a(i)=1;
    else
        a(i)=0;
    end
end

for i=1:length(a)
    for j=1:1000
        b((i-1)*1000+j)=a(i);
    end
end

x=0:0.001:7.999;
y=sin(x.*2.3*pi+pi*b);

subplot(2,1,1);
plot(x,b,'linewidth',3);axis([0 8 -0.1 1.1]);
% 
% 
subplot(2,1,2);

plot(x,y,'linewidth',3);axis([0 8 -1.1 1.1]);