理論內容基本在上一堂課講清楚了，那么現在就該來看仿真程序了！通過程序來進一步的消化位定時算法！

每一次寫仿真程序都是一次完善的過程，仿真程序寫的再好，它也會出現或多或少的問題，同時還要必須不斷地向實際的情況去靠攏，這才是寫程序最終的目的仿真，這是基礎，最終能夠和實際產品應用才是目的，所以我們在學仿真的時候，一定要清楚程序和實際產品最終還有多大的距離。因此，每次寫程序都是一個長時間的不斷修訂的過程！大家如果走上算法研究的道路，務必記?。翰粩嗟耐晟品抡姝h境是一個漫長的過程，也是不斷深化自己理解的過程！

先看看網絡上的一段程序！

close all;clear all;

%%************** 程序主體 **************%%

N=20000; % 符號數

K=4; % 每個符號采4個樣點

Ns=K*N; % 總的采樣點數

w=[0.5,zeros(1,N-1)];

%環路濾波器輸出寄存器，初值設為0.5

n=[0.7 zeros(1,Ns-1)];

%NCO寄存器，初值設為0.9

n_temp=[n(1),zeros(1,Ns-1)];

u=[0.6,zeros(1,2*N-1)];

%NCO輸出的定時分數間隔寄存器，初值設為0.6

yI=zeros(1,2*N);

%I路內插后的輸出數據

yQ=zeros(1,2*N);

%Q路內插后的輸出數據

time_error=zeros(1,N);

%Gardner提取的時鐘誤差寄存器

i=1;

%用來表示Ts的時間序號,指示n,n_temp,nco,

k=1;

%用來表示Ti時間序號,指示u,yI,yQ

ms=1;

%用來指示T的時間序號,用來指示a,b以及w

strobe=zeros(1,Ns);

% 環路濾波器系數

c1=5.41*10^(-3);

c2=3.82*10^(-6);

%%% %%%PSK基帶數據%%% %%%

bitstream=(randi(2,N,1)-1);

psk2=pskmod(bitstream,2);

xI=zeros(1,Ns);

xQ=zeros(1,Ns);

xI(18*N) = real(psk2);

%8倍插值，后面2倍抽取實現輸入采樣信號是輸出插值符號速率的4倍

%即4個采樣點確定一個插值

xQ(18*N) = imag(psk2);

% 截短后的根升余弦匹配濾波器

h1 = rcosfir(0.8,[-8,8],4,1,'sqrt');

aI1 = conv(xI,h1);

bQ1 = conv(xQ,h1);

L = length(aI1);

%仿真輸入數據

aI = [aI1(22L),0,0]; %2倍抽取

bQ = [bQ1(22L),0,0];

%%%%%%% Gardner算法

ns=length(aI)-2;

while(i

n_temp(i+1) = n(i)-w(ms);

if(n_temp(i+1)>0)

n(i+1)=n_temp(i+1);

else

n(i+1)=mod(n_temp(i+1),1);

% 內插濾波器

FI1 = 0.5*aI(i+2)-0.5*aI(i+1)-0.5*aI(i)+0.5*aI(i-1);

FI2 = 1.5*aI(i+1)-0.5*aI(i+2)-0.5*aI(i)-0.5*aI(i-1);

FI3 = aI(i);

yI(k) = (FI1*u(k)+FI2)*u(k)+FI3;

FQ1 = 0.5*bQ(i+2)-0.5*bQ(i+1)-0.5*bQ(i)+0.5*bQ(i-1);

FQ2 = 1.5*bQ(i+1)-0.5*bQ(i+2)-0.5*bQ(i)-0.5*bQ(i-1);

FQ3 = bQ(i);

yQ(k) = (FQ1*u(k)+FQ2)*u(k)+FQ3;

strobe(k) = mod(k,2);

% 時鐘誤差提取模塊

if(strobe(k)==0)

% 每個符號計算一次時鐘誤差

if(k>2)

time_error(ms) = yI(k-1)*(yI(k)-yI(k-2))+yQ(k-1)*(yQ(k)-yQ(k-2));

else

time_error(ms) = (yI(k-1)*yI(k)+yQ(k-1)*yQ(k));

end

%環路濾波器,每個數據符號計算一次環路濾波器輸出

if(ms>1)

w(ms+1)=w(ms)+c1*(time_error(ms)-time_error(ms-1))+c2*time_error(ms);

else

w(ms+1)=w(ms)+c1*time_error(ms)+c2*time_error(ms);

end

ms=ms+1;

end

k=k+1;

u(k)=n(i)/w(ms);

end

i=i+1;

編輯：jq