matlab qpsk调制与解调

function data = qpsk（bits flag）
% modulate bits into QPSK symbols or
% demodulate qpsk symbols into bits
% symbol is normalize to be with engery 1;
%Author Yi Jiang （SALUF） Jan. 17 2004
N = length（bits）;
if flag == 1  %modulate
    data = zeros（N/21）;
   for m = 1:N/2
      tmp = bits（m*2-1:m*2）;      if tmp == [0; 0]
         data（m） = 1+j;
      elseif tmp == [0; 1]
         data（m） = 1-