DecodeMainProgram

%% Clear console, variables and close figures
clc, clear, close all

%% FSK Definitions
fstart = 1000;  % transmission band frequency start
fend = 5000;    % transmission band frequency end
Tsymbol = 0.1;  % symbol duration in seconds
fs = 44100;     % sampling frequency

%% Read Audio and plot spectrogram
[signalWav, fs] = audioread('dennis1m.wav');

figure(1)
spectrogram(signalWav, hanning(500), 0, 500, fs)

%% Decode Signal
[decodedSignal, amnt] = FSKdecoder(signalWav, fstart, fend, Tsymbol, fs);

%% SNR Beregning
[testSNR, matlabSNR] = ourSNR(signalWav, Tsymbol, fs);

%% Display Results
clc
disp(['Decoded signal: "' decodedSignal '". Afstanden er 11 meter.'])
disp(['ourSNR er beregnet til: ' num2str(testSNR) 'dB. Matlab beregnt SNR: ' num2str(matlabSNR) 'dB.'])