timestretchpsola.m

来自「matlab code, discrete time processing vv」· M 代码 · 共 28 行

% ELEC 484 Final Project
% time_stretch_PSOLA.m
%Mike Blarowski
%Darko Stelkic
% (7.3.3) Time stetching using Pitch Synchronous Overlap and Add (PSOLA)
clear all
close all

[x,f_s,nbits]=wavread('brass_jazz.wav');

y=zeros(1,length(x));

m=PitchMarker(x);
alpha=1.6;
beta=1;

y=psola(x,m,alpha,beta);


wavwrite(y, f_s, '7_3_3_PSOLA_brass_jazz-stretch.wav');

alpha=0.6;
beta=1;

y=psola(x,m,alpha,beta);


wavwrite(y, f_s, '7_3_3_PSOLA_brass_jazz-shrink.wav');