masquetonale.m

来自「A partir d un son, permet de reperer les」· M 代码 · 共 18 行

function [ SommeTonale ] = MasqueTonale(f) %f en khz

load TonaleTraited.mat;

k=1;

fB=bark(f*1000);
fhz=f*1000;

SommeTonale=0;

while (TonaleTraited(k,1)~=0)
    if ( (fB-3 <= bark(TonaleTraited(k,1)*16000/512)) & (fB+8 > bark(TonaleTraited(k,1)*16000/512)) )
        SommeTonale=SommeTonale+10^(Masquage(fhz,TonaleTraited(k,1)*16000/512,TonaleTraited(k,2))/10);
    end
    k=k+1;
end