function h4complot(inFRET,uc,n)
%% Creates four upwards running trajectory plots with two timewidows for each correction
%    $uc is the two component vector which defines the corrections to be compared 
%      $n is the wanted trajectorie
%  
if nargin<3
error('provide correction to compare with and number of trajectorie in input structure')
end
if uc(1)==1
    ucident1='raw data';
elseif uc(1)==2
    ucident1='machine correction';
elseif uc(1)==3  
    ucident1='new correction';
else
    error('cannot find timeseries for first compare-parameter')
end

if uc(2)==1
    ucident2='raw data';
elseif uc(2)==2
    ucident2='machine correction';
elseif uc(2)==3  
    ucident2='new correction';
else
    error('no comparison possible for second entry in choosen compare-parameter')
end
ende=inFRET(uc(1),n).A_bleached;
%ende=length(inFRET(uc(1),n))
Y2=inFRET(uc(1),n).eff100(1:ende);
Y1=inFRET(uc(2),n).eff100(1:ende);
Y4=inFRET(uc(1),n).eff20(1:ende);
Y3=inFRET(uc(2),n).eff20(1:ende);
h=0.86;
w=0.22;
t=0.04;
tbox=0.92;
%% TW20
figure1=figure;
% Create plot 1
ax1 = axes('Parent',figure1);  
plot(Y1,'Parent', ax1,'DisplayName','tw100-1');
% modify axes 1
ax1 = gca ;
set(ax1, 'Parent',figure1,...
    'XTick',[],...
    'Position',[0.755 t w h],...
    'CameraUpVector',[1 0 0]);
box('on');
hold('all');
axis tight

% Create plot 2
ax2 = axes('Parent',figure1); 
plot(Y2,'Parent', ax2, 'DisplayName','tw100-2');
% modify axes 2
ax2 = gca;
set(ax2, 'Parent',figure1,'YTick',[0 0.25 0.5 1],...
    'XTick',[],...
    'Position',[0.51 t w h],...
    'CameraUpVector',[1 0 0]);

box('on');
hold('all');
axis tight



%% TW100
% Create plot 3
ax3 = axes('Parent',figure1); 
plot(Y3,'Parent', ax3, 'DisplayName','tw20-1');
% modify axes 3
ax3 = gca;
set(ax3, 'Parent',figure1,...
    'XTick',[],...
    'Position',[0.27 t w h],...
    'CameraUpVector',[1 0 0]);

box('on');
hold('all');
axis tight

% Create plot 4
ax4 = axes('Parent',figure1); 
plot(Y4,'Parent', ax4, 'DisplayName','tw20-2');
% Create axes 4
ax4 = gca;
set(ax4, 'Parent',figure1,'YTick',[0 0.25 0.5 1],...
    'Position',[0.01 t w h],...
    'CameraUpVector',[1 0 0],...
    'FontWeight','demi');

box('on');
hold('all');
axis tight


%% Textbox Titles

% Create textbox 1
annotation(figure1,'textbox','String',{ucident2,'tw=100' },'FontSize',14,...
    'FitBoxToText','off',...
    'LineStyle','none',...
    'Position',[0.76 tbox 0.3 0.05]);

% Create textbox 2
annotation(figure1,'textbox','String',{ucident1,'tw=100'},...
    'FontSize',14,...
    'FitBoxToText','off',...
    'LineStyle','none',...
    'Position',[0.57 tbox 0.3 0.05]);

% Create textbox 3
annotation(figure1,'textbox','String',{ucident2,'tw=20'},...
    'FontSize',14,...
    'FitBoxToText','off',...
    'LineStyle','none',...
    'Position',[0.28 tbox 0.3 0.05]);

% Create textbox 4
annotation(figure1,'textbox','String',{ucident1,'tw=20'},...
    'FontSize',14,...
    'FitBoxToText','off',...
    'LineStyle','--',...
    'Position',[0.02 tbox 0.97 0.05]);

maximize