clear;?????????????%清除工作空間的所有變量
close?all;?????????%關閉所有的Figure窗口?
%發送端
%%?生成數字基帶信號

N?=?1e6;

Fd?=?1e2;????%基帶信號的傳輸速率

Fs?=?40e2;

span?=?6;

Nj?=?N?+?span;

sps?=?Fs/Fd;

rolloff?=?0.5;

base?=?zeros（Nj1）;

base（1:N）?=?randi（[01]N1）;

Gain?=?4;

%base16x?=?zeros（1Fs/Fd/2*N）;

%?base16x（1:Fs/Fd/2:end）?=?base;?

%%?脈沖成形濾波器設計

TxFilter?=?comm.RaisedCosineTransmitFilter（‘RolloffFactor‘?rolloff?...
????‘OutputSamplesPerSymbol‘?sps?...
????‘FilterSpanInSymbols‘?span?...
????‘Gain‘?Gain）;

RxFilter?=?comm.RaisedCosineReceiveFilter（‘RolloffFactor‘?rolloff?...
????‘InputSamplesPerSymbol‘?sps?...
????‘FilterSpanInSymbols‘?span?...
????‘DecimationFactor‘?1?...
????‘Gain‘?1/Gain）;

BxShaped?=?TxFilter（base）;

figure

subplot（211）?

stem（base）;??xlim（[0?30]）;??title（‘數字基帶信號（前20個序列）‘）;

subplot（212）

plot（BxShaped）;??xlim（[0?2000]）;??title（‘成形后信號‘）;

%%?信道和接收端

SN??=?0:1:30;

Number?=?zeros（1length（SN））;

rat