chirp信号matlab代码

chirp信号的matlab生成代，测试过没问题!

function mychirp
h=1.25*10^-8; %采样间隔时间1/80us
ptwidth=10^-6;%脉冲宽度1us
pcr=2*ptwidth;%脉冲周期2us
tcr=0:h:pcr;
pbwidth=10^7;%chirp信号带宽
y=chirp（tcr0ptwidthpbwidth）;%产生chirp信号
pluse=rectpuls（tcrpcr）.*y;%rectpuls产生矩形脉冲，占空比0.5pcr/（tcr-0.5pcr）
circle=10;%脉冲个数10
cirpluse=zeros（1circle*length（pluse））;%存放周期脉冲的初始数组
for i=1:circle
cirpluse（（（i-1）*length（pluse）+1）:i*length（pluse））=pluse;%得到周期脉冲
end
figure（1）;
subplot（211）
tt=0:（circle*pcr）/（（circle*length（pluse））-1）:（circle*pcr）;
plot（ttcirpluse）;
ffty=fft（cirpluse2*10^4 ）/100;%对chirp序列进行fft变换，幅度减小100倍2*10^4是FFT点数
f=tt/h;%各频率点
subplot（212）
%plot（ffty）;
plot（f（1:floor（length（f）/2））10*log10（abs（ffty（1:floor（length（f）/2）））））;
%可以修改各参数值，得到不同的信号

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----

     文件        754  2008-04-27 16:22  chirp\chirp\mychirp.asv

     文件        805  2008-04-27 16:26  chirp\chirp\mychirp.m

     文件      20498  2008-04-26 23:57  chirp\chirp\mychirpmdl.mdl

     文件      20369  2008-04-27 16:31  chirp\chirp\lfm.mdl

     文件        152  2008-04-27 12:59  chirp\chirp\mypluse.m

     文件        227  2008-04-27 12:06  chirp\chirp\mypluse.asv

     文件        323  2008-04-27 13:00  chirp\chirp\mychirp2.m

     文件      24496  2008-04-27 13:53  chirp\chirp\mychirp.fig

     目录          0  2008-04-26 23:57  chirp\chirp

     目录          0  2008-04-27 10:42  chirp

     文件      24485  2008-04-27 16:26  chirp\chirp\mychirpmatlab.fig

     文件        466  2008-04-27 16:48  chirp\chirp\读我.txt

----------- ---------  ---------- -----  ----

                92793                    13