clear;clc;
close?all;
fs=0.01;
t=-4:fs:4;
T=1;
y0=rectpuls（tT）;
?figure
plot（ty0）;
axis（[-4?4?-1?2]）;
title（‘單脈沖矩形信號(hào)‘）;
xlabel（‘t‘）;
ylabel（‘y0‘）;
grid?on;

%模糊函數(shù)
j=sqrt（-1）;
bx=[];
for?ft=-0.1*fs:fs/10:0.1*fs;
????y=y0.*exp（-j*2*pi*ft*t）;
????chi=abs（xcorr（y0y））;
????bx=[chi;bx];
end;
??figure
?mesh（bx）;
?xlabel（‘t/T‘）;
ylabel（‘vT‘）;
zlabel（‘|x（tv|）‘）
title（‘單載頻矩形脈沖信號(hào)模糊函