random_binary.m

QPSK系统在无线通信信道中的仿真,通过对有若干条（大于2条）路径的无线多径衰落信道中的QPSK系统进行误码率性能仿真

function [x,bits]=random_binary(nbits,nsamples)
x=zeros(1,nbits*nsamples);
bits=round(rand(1,nbits));
for m=1:nbits
    for n=1:nsamples
        index=(m-1)*nsamples+n;
        x(1,index)=(-1)^bits(m);
    end
end