www.pudn.com > yycl.rar > dsnl.m

%%%%¶ÌʱÄÜÁ¿ 
function dnl=dsnl(num_group,num_wav) 
global wav_path 
% num_group=11; 
% num_wav=1; 
sa_dsn=yjzh(num_group,num_wav); 
l_dsn=length(sa_dsn); 
jz1_dsn=0; 
for i=1:2000 
    jz1_dsn=jz1_dsn+sa_dsn(i); 
end 
jz_dsn=jz1_dsn/2000; 
for i=1:1000 
    sb_dsn(i)=sa_dsn(i); 
end 
jz2_dsn=minmax(sb_dsn); 
jz3_dsn=sum(jz2_dsn)/8; 
sm_dsn=sa_dsn-jz_dsn; 
% figure; 
% subplot(2,1,1) 
% plot(sa_dsn) 
% subplot(2,1,2) 
% plot(sm_dsn) 
 
m=fix(l_dsn/100); 
 
sb_dsn=sm_dsn(1:m*100); 
sc_dsn=reshape(sb_dsn,100,m); 
for i=1:100 
    for j=1:m 
        if abs(sc_dsn(i,j))0 
        qd2=i; 
        break; 
    end 
end 
zd2=0; 
for i=1:m 
    z=m-i+1; 
    if energy1(z)>0 
        zd2=z; 
        break; 
    end 
end 
dnl=[qd2 zd2]; 
% figure 
% subplot(3,1,1) 
% plot(sa_dsn) 
% subplot(3,1,2) 
% plot(energy4) 
% subplot(3,1,3) 
% plot(energy1) 
%