rcos_shaped.m

QPSK调制matlab程序 包括基带成型滤波器 （升余弦滤波器）

function [seq_shaped]=rcos_shaped(seq,fre_cutoff,Fs,alpha)
%				RCOS_SHAPED	形成升弦基波，seq为已抽样数序，fre_cutoff为
%				截至频率，此时为原始数据率的一半Fd/2，Fs为抽样频率，alpha
%				升余弦系数

order=16;	% 阶数
b=firrcos(order,fre_cutoff,alpha,Fs,'rolloff');	% 此时带来相移order/2(even) or order+1/2(odd)
len=length(seq);
seq(len+1:len+order)=seq(len);			    % 延拓order个点
seq_shaped1=filter(b,1,seq);				% 滤波
seq_shaped2=seq_shaped1(order/2+1:len+order/2);	% 取中间len个值作为输出，即近似地移除了相移
seq_shaped=seq_shaped2/max(abs(seq_shaped2));   % 归一化