Dokument [PDF, 9,1 MB] - FB 4 Allgemein - Fachhochschule ...

20. Anhang 221
else i_t = 3 * i;
end
amp_terz_spek = tabelle(:,10);
amp_terz_spek((length(amp_terz_spek)+1)) = ↵
tabelle(length(tabelle),10);
terz_string = ['Terzmittelfrequenzen [',num2str(tabelle(1,1)), ↵
'; ', num2str(tabelle(length(tabelle),1)), ']'];
gp_terz_dB = 10*log10( sum( 10.^(tabelle(:,10)./10)));
figure(i_t);
set(gcf,'name', dateiname);
stairs(log_f_stairs, amp_terz_spek, 'k');
title(['Unbewertetes Terzspektrum; Kanal: ', kanal, ';AVG = ', ↵
num2str(mittelungsanzahl,3), '; GP: ', ↵
num2str(gp_terz_dB,'%5.1f'), ' dB; ', terz_string]);
xlabel('f [Hz]');
ylabel('Lp [dB]');
set(gca, 'xlim', [log_f_stairs(1), ↵
log10(tabelle(length(tabelle),6))]);
set(gca, 'xscale', 'linear');
set(gca, 'xtick', log_f_mn);
set(gca, 'xticklabel', oktav_m);
set(gca, 'fontsize', 10);
set(gca, 'xgrid', 'on');
set(gca, 'ygrid', 'on');
m_2 = menu('Weitere MAT-Datei ?', 'JA', 'NEIN');
end %- while-Schleife
end
if m_1 == 2 %- Darstellung Multidiagrammen
i = 0;
k = 0;
while m_2 == 1
clear F_gesamt aps_lin_mittel_dB_gesamt c1x c1;
i = i + 1;
k = k + 1;
[dateiname, pfad] = uigetfile('*.mat', 'MAT-Ergebnisdatei ↵
wählen');
load(strcat(pfad,dateiname));
gp_fig = 1;
terz_fig = 1;
%- Wenn eine konvertierte HP-Datei geladen wird
if exist ('c1x');
aps_lin_mittel_dB_gesamt = 20*log10(sqrt(c1./2));
F_gesamt = c1x;
gp_aps_lin_mittel_dB_gesamt = 0;
mittelungsanzahl = 0;
kanal = '--';
fenster_typ = 'hanning';
ueberlappung = '--';
kalibrierfaktor = 0;
delta_f = 0;
abtastrate = 0;
gp_z = 0;
gp_fig = 0;
terz_fig = 0;
end
Fachhochschule Düsseldorf Diplomarbeit 2002/03, Terence Klitz