%this script makes figureplots and saves figure
clear all
close all
clc

%fil som skal loades
filename= 'P4_Kc2_5_41.lvm';
%hvor bilde lagres
dir = 'c:\users\knutage\desktop\Master oppgave\Master_source\bilder\matlabfig\P4\tuning\';

%set x akse
starttime=300;
endtime= 450;
%set akse span(y akse)
par.Air_span    = [2.5, 3.5];
par.Water_span  = [0,   7.5];
par.P1_span     = [0,   50];
par.P2_span     = [0,   50];
par.P3_span     = [0,   50];
par.P4_span     = [22,   35];
par.dp_span     = [-1,  6];
par.slug_span   = [0,   6];
par.sp_span     = [0,   50];
par.valve_span  = [0,   40];


%% Processing data:
%step1: plot
[t, P1, P2, P3, P4]= plotter(filename, starttime, endtime, par,1.5 );
[P4f]=filterplotter(t,P4,4, 1/(4*4));
figure(1)
hold on 
plot(t,P4f,'-r')
legend('P4','SP','P4(filtered)','Location', 'NorthWest')

%step2 :save
save_figure(1, dir)
