%?%?參數(shù)設(shè)置
?Winsiz?=?512;
?Shift?=?32;
?base?=?0;
?resolution=2048;

[Sg??Fs]?=?wavread（‘D:\project\pop2_8k_8.wav‘）;

t1=clock;
n?=?floor（（length（Sg）?-?Winsiz）/Shift）+1;
A?=?zeros（resolution/2+1??n）;
for?i?=?1:n
????n1?=?（i-1）*Shift?+?1;
????n2?=?n1?+?Winsiz?-?1;
????s?=?zeros（1?resolution）;
????s（1:Winsiz）?=?（Sg（n1:n2）-mean（Sg（n1:n2）））.*hamming（Winsiz）;

?屬性????????????大小?????日期????時間???名稱
-----------?---------??----------?-----??----

?????文件????????761??2009-06-17?17:51??spectrogram_fft.m

-----------?---------??----------?-----??----

??????????????????761????????????????????1