Upload New File

src/test_effet_delay_filtre.m

+% test_effet_delay_filtre.m
+% Test de la fonction effet_delay_filtre
+
+clear; clc;
+
+% Charger le son
+fichier = fullfile('wav', 'piano_chord.wav');
+[x, Fe] = audioread(fichier); 
+
+% Paramètres
+t_delay = 0.25;  
+g = 0.9;
+K = 10;
+
+% Application de l'effet delay filtré
+y = effet_delay_filtre(x, t_delay, g, K, Fe);
+
+% Lecture et sauvegarde
+soundsc(y, Fe);
+audiowrite('piano_delay_filtre.wav', y, Fe);
+
+% Affichage
+figure;
+plot((1:length(y))/Fe, y);
+xlabel('Temps (s)');
+ylabel('Amplitude');
+title('Signal piano avec effet de delay filtré (K=10)');
+grid on;