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

20. Anhang 219
20.15.4 Mat_lesen_darstellen
%---------------------------------------------------------------------
%- Mat_lesen_darstellen
%- Programm zum Einlesen der MAT-Ergebnisdateien
%- 17.03.2003 Terence Klitz
%---------------------------------------------------------------------
%-
%- Dieses Programm dient der Darstellung der Spektren, die mit dem
%- Programm Wav_Analyse_Programm_auto.m erstellt wurden. Dazu
%- werden die MAT-Dateien eingelesen.
%- Dargestellt werden das unbewertete APS, das unbewertete Terzspektrum
%- und der zeitliche Verlauf des Gesamtschalldruckpegels.
%-
%- Es können bis zu 6 Dateinen in einem Fenster geplottet werden
%- Es können Einzeldiagramme oder Multidiagramme geplottet werden.
%- Bei den Einzeldiagrammen wird jedes Spektrum einer MAT-Datei, das
%- dargestellt werden soll in einem eigenen Fenster geplottet.
%- Bei den Multidiagrammen werden die jeweiligen Spektren mehrerer
%- MAT-Dateien jeweils einem Fenster geplottet, z.B. alle APS oder
%- alle Terzspektren.
%- Bei den Multidiagrammen kann bei Bedarf ein Vergleichsterzspektrum
%- in das erstelle Terzspektrum hinzugefügt werden.
%- Das Vergleichsspektrum muss als Textdatei vorliegen, in der nur zwei
%- Spalten zulässig sind. Beide Spalten sind durch einen Tabulator
%- zu trennen. In der ersten Spalte stehen die Nennterzmittenfrequenzen,
%- in der zweiten Spalte jeweiligen Pegel.
%-
%- Zusätzlich können auch HP-MAT-Dateien eingelesen werden.
%-
%- Das Programm ist entsprechend dem Inhalt der MAT-Dateien erweiterbar.
%---------------------------------------------------------------------
clear all;
close all;
clc;
ant = 'j'
%- Auswahlmenü
m_1 = menu('Diagrammwahl', 'Einzeldiagramme', 'Multidiagramme','Abbruch')
m_2 = 1;
if m_1 == 1; %- Darstellung von Einzeldiagrammen
i = 0;
while m_2 == 1
clear F_gesamt aps_lin_mittel_dB_gesamt;
i = i + 1;
%- MAT-Datei wählen
[dateiname, pfad] = uigetfile('*.mat', 'MAT-Ergebnisdatei ↵
wählen');
load(strcat(pfad,dateiname));
%- Den Pfad merken
cd(pfad);
figure(i)
f_min = F_gesamt(1);
f_max = F_gesamt(length(F_gesamt));
freq_string_2 = ['Frequenzspanne [', num2str(f_min), '; ', ↵
num2str(f_max), '] Hz'];
Fachhochschule Düsseldorf Diplomarbeit 2002/03, Terence Klitz