%?%?參數設置

?Winsiz?=?256;
?Shift?=?32;
?base?=?0;
%?Mode?=?;
%?Gray?=?;

[Sg??Fs]?=?wavread（‘H:\MASC\data\001\neutral\phrase\1011.wav‘）;

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

????z?=?fft（s）;
????z?=?z（1:（Winsiz/2）+1）;
????z?=?z.*conj（z）;
????z?=?10?*?log10（z）;
????A（:i）?=?z;
end