%本程序生成平方根升余弦濾波器的系數；
%濾波器參數為：滾降系數1.0，截斷符號數6，每符號樣點數為4，濾波器系數量化位數10；
clc;
clear;
R=1.0;									%滾降系數1.0
n_T=[-3 3];								%截斷符號數3
rate=4;									%每符號采樣點數4
T=1;
L=10;									%系數量化比特數10
t=n_T(1)*T+T/(2*rate):T/rate:n_T(2)*T;
for i=1:length(t)
    h(i)=-(cos((1+R)*pi*t(i)/T)+sin((1-R)*pi*t(i)/T)/(4*R*t(i)/T))*4*R/(pi*sqrt(T)*((4*R*t(i)/T)^2-1));
end;
h_max=4*R/pi;
h=h/h_max;

h_six=round(h*2^(L-1));
H_six=h_six/sum(h_six);                 %該數據用于觀察頻率響應；
% freqz(H_six,1,'whole');
save h.mat h;