MaciekToDobryChłopak

                Never    
clear all;
close all;
[sound Fs] = wavread('male.wav');
plot(sound);
time=0.01;
a = 2;
D = time * Fs;
y = zeros((length(sound)+D),1);
b = zeros((length(sound)+D),1);
for i=1:length(sound)
    
    b = sound(i);
    if i>D
        b = b + a.*sound(i-D);
    end
    
    y(i) = b*(-a) + sound(i);
end

for i=length(sound)+1:length(y)
    b =  a.*sound(i-D);
    y(i) = b*(1-a);
end
wavwrite(y,'result_poglos');
figure;
plot(y);

////////////////////////////////////
https://zapodaj.net/167056c66846e.png.html

Raw Text