function?[?base_info?]?=?base_shape（?fdfsfIn?）
%%?平方根升余弦濾波器滾降系數(shù)0.5，延遲3個采樣點
flt=rcosine（fdfs‘sqrt‘0.5）;??
%%?輸入序列累加
data_len=length（In）;
for?i=1:data_len
????Xn（i）=mod（sum（In（1:i））8）;
end
%%?計算實部
seq_Q=sin（pi/4*Xn）;
%%?計算虛部
seq_I=cos（pi/4*Xn）;
%%?增采樣
R=fs/fd;
up_seq_Q=upsample（seq_QR）;
up_seq_I=upsample（seq_IR）;
%%?8倍升抽樣升余弦成型濾波
rcos_Q=conv（up_seq_Qflt）;
rcos_I=conv（up_seq_Iflt）;
%%?提升
rcos_Q_up=interp（rcos_Qf/fs）;
rcos_I_up=interp（rcos_If/fs）;

base_info=rcos_Q_up+j*rcos_I_up;
end