spread.m

一些基于CDMA的编码程序

% Program CDMA-7
%
% spread.m
%
% Data spread function
%

function [iout,qout] = spread(idata,qdata,code1)

% -----------------------------------------------------------

% idata  : ich data sequence
% qdata  : qch data sequence 
% iout   : ich output data sequence
% qout   : qch output data sequence
% code1  : spread code sequence 

% ------------------------------------------------------------

switch nargin
case { 0 ,1 }
    error('lack of input argument');
case 2
    code1 = qdata;
    qdata = idata;
end

[hn,vn] = size(idata);
[hc,vc] = size(code10;

if hn > hc
    error('lack of spread code sequences');
end

iout = zeros(hn,vn*vc);
qout = zeros(hn,vn*vc);

for ii = 1:hn
    iout(ii,:) = reshape(rot90(code1(ii,:),3)*idata(ii,:),1,vn*vc);
    qout(ii,:) = reshape(rot90(code1(ii,:),3)*qdata(ii,:),1,vn*vc);
end

% -------------------------------- end of file  --------------------