close?all;clear?all;
fc=2;snr=20;?fs=40;
N=100000;?%符號總數
Ts=1;?%符號周期
B=1/Ts;?%波特率
ts=1/fs;?%采樣周期
t=0:ts:N*Ts-ts;?t=t.‘;?Lt=length（t）;?N_sample=Ts*fs?;?%產生發送信號?
B=randint（1N）;?sym=[-1;1];?A=sym（B+1）;??
[Zr2delay]=sq_loop（Afsfcsnrt）;???????????%平方環

for?i=1:1:length（Zr2）????%將恢復序列置成1，-1序列，便于符號定時
????if?Zr2（i）>=0
????????Zr3（i）=1;
????else
????????Zr3（i）=-1;
????end
end
rec=timing（Zr3fs）;?????????%符號定時
rec=rec‘;?
for?i=1:1:N-delay???????????%考慮延時，得到恢復的序列
????rec2（i）=rec（i+delay）;
????source2（i）=A（i）;
end
errbit=sum（rec2~=source2）;
ber=errbit/length（rec2）;???%計算誤碼率

?屬性????????????大小?????日期????時間???名稱
-----------?---------??----------?-----??----
?????文件?????????660??2013-12-21?09:32??main.m
?????文件????????1122??2013-12-19?23:47??sq_loop.m
?????文件?????????864??2013-12-19?23:51??timing.m
?????文件?????????173??2013-12-07?23:15??Untitled.mat
?????文件??????168448??2013-12-24?09:34??實驗報告.doc
?????目錄???????????0??2014-07-01?19:12??載波恢復與符號定時\
?????文件?????????660??2013-12-21?09:32??載波恢復與符號定時\main.m
?????文件????????1122??2013-12-19?23:47??載波恢復與符號定時\sq_loop.m
?????文件?????????864??2013-12-19?23:51??載波恢復與符號定時\timing.m