OLA音频变速算法的仿真与剖析

      前段时间，在尝试音乐节拍数的提取时，终于有了突破性的进展，效果基本上比市面上的许多商业软件还要好，在作节拍数检测时，高频信息作用不大，

通过重采样减小运算量。重采样让我想起了在学校里面做的变速变调算法，在这里顺便回顾一下。

      OLA(Overlap-and-Add, OLA)重叠叠加算法是音频变速算法中最简单的时域方法，它是后续时域算法(SOLA, SOLA-FS, TD-PSOLA, WSOLA)的基础。

      OLA分为分解与合成两个部分，公式看起来很复杂，所以不贴出了，基本思路从图中更能清晰的表现出来。

      

     

      分解阶段：语音首先分帧，帧长为N，假设帧移为Sa。

      合成阶段：分解出来的语音帧，以帧移为Ss的间隔重新合成起来，得到变速之后的音频。

      Rate = Ss/ Sa，如果Sa=Ss，则原速；Ss<Sa时，加速；Ss>Sa时，减速。

      功能性代码：

     

function [ RSound ] = OLA(Speech, Fs, Rate)
%OLA Summary of this function goes here
%   Detailed explanation goes here
    frame_ms = 25;
    frame_len = frame_ms * Fs /1000;
    window = hanning(frame_len);
    Sa = 1/2 * frame_len;
    AnalysisSplice = enframe(Speech, window, Sa);
    AnalysisSplice = AnalysisSplice';%each column corresponding to each frame data
    Ss = Rate*Sa;
    RSound = Synthesis(AnalysisSplice, Ss);
end

function  RSound = Synthesis(AnalysisSplice, Ss)
    [frame_len, nframes] = size(AnalysisSplice);
    N = Ss*(nframes - 1) + frame_len;
    RSound = zeros(1, N);
    for q = 1:nframes
       RSound(1 + (q-1)* Ss : frame_len + (q-1)*Ss) = RSound(1 + (q-1)* Ss   :  frame_len + (q-1)*Ss) +  AnalysisSplice(:,q)';
    end
end

Script执行代码：

clc;
clear;
close all;
Path = 'D:\Experiment\OLA\';
file = [Path, 'test.wav'];
faster = [Path, 'faster.wav'];
[Speech, Fs] = wavread(file);
Rate = 0.7;
%wavread wavwrite enframe function comes from voicebox tools
RSound = OLA(Speech,Fs,Rate);
wavwrite(RSound,Fs,faster);
figure;
subplot(2,1,1);
plot(Speech);
title('original');
axis([1 length(Speech) -0.5 0.5]);
subplot(2,1,2);
plot(RSound);
title('0.7 faster');
axis([1 length(Speech) -0.5 0.5]);

变速前后的时域波形对比图

      OLA算法在重叠部分会造成基频断裂，甚至语音失真。所以后期许多算法基于此缺点进行了相关的改进。

测试文件：

http://pan.baidu.com/s/1hq4540G

来自：http://www.cnblogs.com/welen

         http://blog.csdn.net/weiqiwu1986