random_binary.m

来自「AWGN多径信道中的QPSK系统进行BER性能仿真」· M 代码 · 共 13 行

%file: random_binary.m
function [x,bits] = random_binary(nbits,nsamples)
%This function genrates a random binary waveform of length nbits
%sample at a rate of nsamples/bit.
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
%End of function file.