%?對一個語音信號進行分幀，并研究分幀后的短時能量和過零率特性
%讀音頻文件
clear?all;
[filenamepathname]=uigetfile（‘*.wav‘‘請選擇語音文件:‘）;
[soundfs]=wavread（[pathnamefilename]）;
a=size（sound（:2））;
Tn=（a（1）-1）/fs;????%語音持續時間?
t=0:1/fs:Tn;
figure（1）
subplot（4?1?1）plot（tsound（:2））xlabel（‘t（s）‘）ylabel（‘sound‘）
%分幀
N=fs*20*10.^（-3）;%用KZ表示?20個基頻幀長
frame_shift=N/3；%幀移
frame_array=enframe（sound（:2）hamming（N）frame_shift）;
subplot（412）p