那么如何用walsh碼完成多用戶的擴頻呢？用了以后效果會有哪些改變呢？這也是后續需要展示的程序以及理論講解的內容。本文先給出之前程序涉及到了的函數內容！首先用到了func_hrollfcoef函數。由于涉及函數比較多，本文超過2000字。請大家務必仔細敲對代碼，確保程序能正確運行！為了讓代碼能夠放在一行中，將程序的字體采用了最小號！

首秀是func_hrollfcoef函數！

function ［xh］ = func_hrollfcoef（irfn，ipoint，sr，alfs，ncc）

xi=zeros（1，irfn*ipoint+1）;

xq=zeros（1，irfn*ipoint+1）;

point = ipoint;

tr = sr ;

tstp = 1.0 。/ tr 。/ ipoint;

n = ipoint .* irfn;

mid = （ n 。/ 2 ） + 1;

sub1 = 4.0 .* alfs .* tr;% 4*alpha*R_s

for i = 1 ： n

icon = i - mid;

ym = icon;

if icon == 0.0

xt = （1.0-alfs+4.0.*alfs./pi）.* tr; % h（0）

else

sub2 =16.0.*alfs.*alfs.*ym.*ym./ipoint./ipoint;

if sub2 ~= 1.0

x1=sin（pi*（1.0-alfs）/ipoint*ym）。/pi./（1.0-sub2）。/ym./tstp;

x2=cos（pi*（1.0+alfs）/ipoint*ym）。/pi.*sub1./（1.0-sub2）;

xt = x1 + x2; % h（t） plot（（1:length（xh）），xh）

else % （4alphaRst）^2 = 1plot（（1:length（xh）），xh）

xt = alfs.*tr.*（（1.0-2.0/pi）.*cos（pi/4.0/alfs）+（1.0+2.0./pi）.*sin（pi/4.0/alfs））。/sqrt（2.0）;

end % if sub2 ~= 1.0

end% if icon == 0.0

if ncc == 0 % in the case of receiver

xh（ i ） = xt 。/ ipoint 。/ tr;% normalization

elseif ncc == 1 % in the case of transmitter

xh（ i ） = xt 。/ tr; % normalization

else

error（‘ncc error’）;

end % if ncc == 0

end % for i = 1 ： n

責任編輯：haq