final code

This commit is contained in:
Ly PECHVATTANA 2023-03-27 16:45:31 +07:00
parent f1c8a4da61
commit df2b3b2322
2 changed files with 24 additions and 3 deletions

BIN
graph/fig0.png Normal file

Binary file not shown.

After

Width:  |  Height:  |  Size: 53 KiB

View File

@ -11,6 +11,7 @@ outfile = "vocodedsound.wav";
[carrier_w, sr2_w] = audioread(carfile); [carrier_w, sr2_w] = audioread(carfile);
[carrier_wp, sr2_wp] = audioread(carfile); [carrier_wp, sr2_wp] = audioread(carfile);
if sr1 ~= sr2 if sr1 ~= sr2
disp('Your sampling rates dont match'); disp('Your sampling rates dont match');
endif endif
@ -22,7 +23,27 @@ audiowrite("vocodedsound_w.wav", y, sr1);
y_wp = chanvocoder(carrier_wp,modul, 512, 32, .2); y_wp = chanvocoder(carrier_wp,modul, 512, 32, .2);
audiowrite("vocodedsound_wp.wav", y, sr1); audiowrite("vocodedsound_wp.wav", y, sr1);
%Plot
figure;
subplot(3,1,1);
plot(modul);
xlabel("TIme in [s]");
ylabel("frequency in [dB]");
legend(modfile);
subplot(3,1,2);
plot(carrier,'-r');
xlabel("TIme in [s]");
ylabel("frequency in [dB]");
legend(carfile);
subplot(3,1,3);
plot(y,'-g');
xlabel("TIme in [s]");
ylabel("frequency in [dB]");
legend(outfile);
%spectogram %spectogram
frequencySpectrum(modul,sr1,1); %frequencySpectrum(modul,sr1,1);
frequencySpectrum(carrier,sr2,1); %frequencySpectrum(carrier,sr2,1);
frequencySpectrum(y,sr1,1); %frequencySpectrum(y,sr1,1);