setacelppar.m

来自「ITU-T G.723.1 Speech Coder: Matlab imple」· M 代码 · 共 33 行

function ACELPpar = SetACELPpar (N, ACELPpar)
% ACELP parameters

% $Id: SetACELPpar.m 1.3 2004/07/05 G.723.1-v2r1a $

% Pulse gain table
if (ischar (ACELPpar.g))
  ACELPpar.g = load (ACELPpar.g);
end

% Mark out of range grid values with a NaN
[NTrack, NGridI] = size (ACELPpar.Grid);
for (i = 1:NTrack)
  for (j = 1:NGridI)
    Grid = ACELPpar.Grid{i,j};
    I = (Grid > N);
    Grid(I) = NaN;
    ACELPpar.Grid{i,j} = Grid;
  end
end

% Pitch repetition offset
if (ischar (ACELPpar.POffs))
  ACELPpar.POffs = load (ACELPpar.POffs);
end

% Pitch repetition gain table
if (ischar (ACELPpar.Pg))
  ACELPpar.Pg = load (ACELPpar.Pg);
end

return