%基帶濾波器，升余弦濾波器，滾降系數(shù)α=0.2
function y=filter(n)
%*** 設(shè)計(jì)4碼元成型濾波器 α=0.2的升余弦濾波器 ***%
n1=30;
a=0.2;
filength=180;
filterL=n;
filterl=filterL+1;
%filterl=40;%=filterL+1;
x3=ones(1,n1*(1+a));
x3(1:n1*(1-a))=0;
rfa=linspace(0,1,2*n1*a);%生成12點(diǎn)線性向量，在0-1之間且包括0和1
raisecosinf1=0.5*(cos(rfa*pi)+1);%12個(gè)點(diǎn)的升余弦yuxian
raisecosinf(1,1:n1*(1-a))=1;
raisecosinf(1,(n1*(1-a)+1):n1*(1+a))=raisecosinf1;
raisecosinf(filength+2-n1*(1+a):filength)=fliplr(raisecosinf(2:n1*(1+a)));
                                            %反轉(zhuǎn)應(yīng)從第2個(gè)點(diǎn)開始
%作IDFT變換求得濾波器的時(shí)域特性，生成15個(gè)點(diǎn)的時(shí)域序列作為濾波器系數(shù)
raisecosint1=ifft(raisecosinf);
raisecosint3=raisecosint1(1:filterl/2);
raisecosint2=fliplr(raisecosint3);
raisecosint(1:filterl/2)=raisecosint2(1:filterl/2);
raisecosint(filterl/2+1:filterl-1)=raisecosint3(2:filterl/2);

y=raisecosint;