A = readtable('Bazooka17_10.xlsx');             % definiert die Tabelle


x = A (:, 1);                         % Datum/Zeit
y = A (:, 2);                         % Druck in bar Parr
x1 = A (:, 3);                        % Datum/Zeit
y1 = A (:, 4);                        % Druck in bar Wika
x2 = A (:, 5);                        % Datum Zeit
y2 = A (:, 6);                        % Temperatur in °C Star oddy 71
x3 = A (:, 5);                        % Datum Zeit
y3 = A (:, 7);                        % Druck in bar Star oddy 71
x4 = A (:, 8);                        % Datum Zeit
y4 = A (:, 9);                        % Temperatur in bar Star oddy 69
x5 = A (:, 8);                        % Datum Zeit
y5 = A (:, 10);                       % Druck in bar Star oddy 69
x6 = A (:,11);                        % Datum Zeit
y6 = A (:,12);                        % Isco Pressure
x7 = A (:,11);                        % Datum Zeit
y7 = A (:,13);                        % Isco Flowrate
x8 = A (:,11);                        % Datum Zeit
y8 = A (:,14);                        % Isco Volume
x9 = A (:,15);                        % Datum Zeit
y9 = A (:,16);                        % Bronckhorst Massflow
x10 = A (:,17);                       % Datum Zeit
y10 = A (:,18);                       % Sand mass cumulativ





f1 = figure;                           % figure 

ax1 = subplot(2,1,1);                  % top subplot
ax2 = subplot(2,2,3);                  % bottom subplot
ax3 = subplot(2,2,4);

plot(ax1,x,y,x1,y1,x3,y3,x5,y5,x6,y6);           % welche Daten
title(ax1,'Pressure');                           % Titel
xlabel(ax1,'Time []');                           % Titel x-Achse
ylabel(ax1,'Pressure [bar]');                    % Titel y-Achse
xlim(ax1,[43025.41,43025.45]);                           % Intervall x
% ylim(ax1,[,]);                             % Intervall y
lgd = legend (ax1,'Parr','Wika','Star Oddy 71','Star Oddy 69','Isco Pressure','Isco Flowrate','Isco Volume');    % Legende
lgd.FontSize = 10;
lgd.TextColor = 'k';

plot(ax2,x9,y9);
title (ax2,'Gasflow in');
xlabel(ax2,'Time []');
ylabel(ax2,'gasflow [% max]');
xlim(ax2,[43025.41,43025.45]);
% ylim(ax2,[,]);  
% lgd = legend (ax2,'Star Oddy 71','Star Oddy 69');
% lgd.FontSize = 10;
% lgd.TextColor = 'k';

plot(ax3,x10,y10);
title (ax3,'Sandproduction');
xlabel(ax3,'Time');
ylabel(ax3,'Mass [kg]');
% xlim(ax3,[43025.41,43025.45]);
% ylim(ax3,[,]);  
% lgd = legend ('Bronckhorst');
lgd.FontSize = 10;
lgd.TextColor = 'k';