clc;clear?all;close?all;
num=50000;
for?（SNR=0:10）
????bpsk=randsrc（1num[1-1]）;%產生BPSK基帶信號
????snr=1/（10^（SNR/10））;
????noise=sqrt（snr/2）*（randn（14*num））;
????sf=[1-11-1];%Walsh碼
????b_k=kron（bpsksf）;%利用函數進行擴頻，擴頻后BPSK基帶信號每個元素對應4個元素
????receive=b_k+noise;%含噪聲的接收信號
????m=1;
????for?i=1:4:length（b_k）-3?????%進行解擴處理
????????b_kr（i:i+3）=sf.*receive（i:i+3）;
????????b_jkt（m）=sum（b_kr（i:i+3））;