???[xfs]=wavread（‘39.wav‘）;
???lfft?=?1024;???%?FFT?length?
???lfft2?=?lfft/2;
???winlgh?=?256??
???frmlgh?=?32;??
???noverlap?=?winlgh?-?frmlgh;
???x?=?2.0*x/max（abs（x））;
???etime?=?length（x）/fs;
???spec?=?abs（spectrogram（x?winlgh?noverlap?lfft?fs））;
???%subplot（211）;
?