code=[11111-1-111-11-11];
tao=6.5e-6;%脈沖寬度
fc=2e6;%載波頻率
fs=100e6;%采樣頻率

t=0:1/fs:tao%13個正弦波周期采樣，采樣間隔是1/fs
t1=0:1/fs:1/fc;%每個周期采樣
for?i=1:length（t）
????s（i）=sin（2*pi*fc*t（i））;
end

%產(chǎn)生13位巴克碼序列
k=1;
for?i=1:length（code）
????for?j=1:length（t1）-1
????????bake（k）=code（i）*1;
????????k=k+1;
????end
end
bake（k）=bake（k-1）;

k=1;
for?i=1:length（code）
????for?j=1:length（t1）-1
????????if?code（i）==1
????????????ccode（i）=1;
????????else
????????????ccode（i）=-1;
????????end
????????bbake（k）=ccode（i）*1;
??