% FRITZ BRAUSE 2010
% RS232 ASCII-Datenstrom vom Controller auslesen
% Datenformat pro Sensorinformation :
% X12345/n    <-  X als Sensor-ID, 12345 als Sensorwert, '/n' Abschluß
% Der Datenstrom kann so um beliebig viele Sensoren (z.B. Y,Z usw.) erweitert werden

%% Initialisierung
clear;                  % Variablen löschen
port='COM5';            % Port öffnen
s=serial(port);
fopen(s);

%hold on;               % Hier nicht nötig
z=1;

%% Datenstrom auslesen

for i=1:1000
 wert=fscanf(s,'%c',1);             % Ein Zeichen auslesen

 
 if wert=='X'                       % X-Wert im Datenstrom gefunden
 
    wert=fscanf(s);                 % folgenden Zahlenwert auslesen
    display (wert);                 % Zur Kontrolle ausgeben
  
    ausgabe(z)=str2double(wert);    % in double wandeln
    z=z+1;                          % Index erhöhen

 end

end

%% Plot

plot(ausgabe,'.-');     % Die gefundenen Werte plotten

%% Alles wieder schließen

fclose(s);              % Port schließen
delete(s);
clear s;