function [GFPOD_0, GFP_0, OD_0, GFPOD_end, GFP_end, OD_end]=sendertest(GFP, OD, time, anz, a, sav)
    for i=1:1:anz
        GFP_sub=GFP((i-1)*8+1:i*8, 1:12);
        OD_sub=OD((i-1)*8+1:i*8, 1:12);
        [GFP_ratio_out(:,:,i), GFP_out(:,:,i), OD_out(:,:,i), GFP_ratio_err_out(:,:,i), GFP_err_out(:,:,i), OD_err_out(:,:,i)]=one_plate(GFP_sub, OD_sub);
    end
    
    GFPOD_0= GFP_ratio_out(:,:,1);
    GFP_0(:,:)= GFP_out(:,:,1);
    OD_0(:,:)= OD_out(:,:,1);
    GFPOD_err_0= GFP_ratio_err_out(:,:,1);
    GFP_err_0(:,:)= GFP_err_out(:,:,1);
    OD_err_0(:,:)= OD_err_out(:,:,1);
    
    GFPOD_10(:,:)= GFP_ratio_out(:,:,18);
    GFP_10(:,:)= GFP_out(:,:,18);
    OD_10(:,:)= OD_out(:,:,18);
    GFPOD_err_10(:,:)= GFP_ratio_err_out(:,:,18);
    GFP_err_10(:,:)= GFP_err_out(:,:,18);
    OD_err_10(:,:)= OD_err_out(:,:,18);

    
    GFPOD_end(:,:)= GFP_ratio_out(:,:,anz);
    GFP_end(:,:)= GFP_out(:,:,anz);
    OD_end(:,:)= OD_out(:,:,anz);
    GFPOD_err_end(:,:)= GFP_ratio_err_out(:,:,anz);
    GFP_err_end(:,:)= GFP_err_out(:,:,anz);
    OD_err_end(:,:)= OD_err_out(:,:,anz);
    
    if (sav == 1)
        
        %Export of data files
        save gfpod_0.txt GFPOD_0 -ASCII;
        save gfp_0.txt GFP_0 -ASCII;
        save od_0.txt OD_0 -ASCII;
        save gfpod_end.txt GFPOD_end -ASCII;
        save gfp_end.txt GFP_end -ASCII;
        save od_end.txt OD_end -ASCII;
        save gfpod_10.txt GFPOD_10 -ASCII;
        save gfp_10.txt GFP_10 -ASCII;
        save od_10.txt OD_10 -ASCII;

        %Export of error files
        save gfpod_err_0.txt GFPOD_err_0 -ASCII;
        save gfp_err_0.txt GFP_err_0 -ASCII;
        save od_err_0.txt OD_err_0 -ASCII;
        save gfpod_err_10.txt GFPOD_err_10 -ASCII;
        save gfp_err_10.txt GFP_err_10 -ASCII;
        save od_err_10.txt OD_err_10 -ASCII;    
        save gfpod_err_end.txt GFPOD_err_end -ASCII;
        save gfp_err_end.txt GFP_err_end -ASCII;
        save od_err_end.txt OD_err_end -ASCII;
    
    end
    if (a==1)
    figure

    hold all
    for k=1:1:8
        for j=1:1:anz
            sender_GFP_ratio(k,j)=GFP_ratio_out(k,1,j);
        end
    plot(time(:,1),sender_GFP_ratio(k,:), 'LineWidth', 2);
    end
    legend('0 h', '1 h', '2 h', '3 h', '4 h', '5 h', '6 h', '7 h', 'Location', 'EastOutside');
    xlabel('time [h]');
    ylabel('GFP/OD');
    title('Sender GFP/OD')

    hold off
    
    figure
    
    hold all
    for k=1:1:8
        for j=1:1:anz
            sender_GFP(k,j)=GFP_out(k,1,j);
        end
    plot(time(:,1),sender_GFP(k,:), 'LineWidth', 2);
    end
    legend('0 h', '1 h', '2 h', '3 h', '4 h', '5 h', '6 h', '7 h', 'Location', 'EastOutside');
    xlabel('time [h]');
    ylabel('GFP');
    title('Sender GFP')

    hold off
    
    figure
    
    hold all
    for k=1:1:8
        for j=1:1:anz
            sender_OD(k,j)=OD_out(k,1,j);
        end
    plot(time(:,1),sender_OD(k,:), 'LineWidth', 2);
    end
    legend('0 h', '1 h', '2 h', '3 h', '4 h', '5 h', '6 h', '7 h', 'Location', 'EastOutside');
    xlabel('time [h]');
    ylabel('OD');
    title('Sender OD')

    hold off
    
    figure

    hold all
    for k=1:1:8
        for j=1:1:anz
            amplifier_GFP_ratio(k,j)=GFP_ratio_out(k,2,j);
        end
    plot(time(:,1),amplifier_GFP_ratio(k,:), 'LineWidth', 2);
    end
    legend('0 h', '1 h', '2 h', '3 h', '4 h', '5 h', '6 h', '7 h', 'Location', 'EastOutside');
    xlabel('time [h]');
    ylabel('GFP/OD');
    title('Amplifier GFP/OD')

    hold off
    
    figure
    
    hold all
    for k=1:1:8
        for j=1:1:anz
            amplifier_GFP(k,j)=GFP_out(k,2,j);
        end
    plot(time(:,1),amplifier_GFP(k,:), 'LineWidth', 2);
    end
    legend('0 h', '1 h', '2 h', '3 h', '4 h', '5 h', '6 h', '7 h', 'Location', 'EastOutside');
    xlabel('time [h]');
    ylabel('GFP');
    title('Amplifier GFP')

    hold off
    
    figure
    
    hold all
    for k=1:1:8
        for j=1:1:anz
            amplifier_OD(k,j)=OD_out(k,2,j);
        end
    plot(time(:,1),amplifier_OD(k,:), 'LineWidth', 2);
    end
    legend('0 h', '1 h', '2 h', '3 h', '4 h', '5 h', '6 h', '7 h', 'Location','EastOutside');
    xlabel('time [h]');
    ylabel('OD');
    title('Amplifier OD')

    hold off
    
    
        figure

    hold all
    for k=1:1:8
        for j=1:1:anz
            ai_1_1_GFP_ratio(k,j)=GFP_ratio_out(k,3,j);
        end
    plot(time(:,1),ai_1_1_GFP_ratio(k,:), 'LineWidth', 2);
    end
    legend('0 M', '50 pM', '100 pM', '200 pM', '300 pM', '400 pM', '500 pM', '600 pM', 'Location', 'EastOutside');
    xlabel('time [h]');
    ylabel('GFP/OD');
    title('AI-1 GFP/OD')

    hold off
    
    figure
    
    hold all
    for k=1:1:8
        for j=1:1:anz
            ai_1_1_GFP(k,j)=GFP_out(k,3,j);
        end
    plot(time(:,1),ai_1_1_GFP(k,:), 'LineWidth', 2);
    end
    legend('0 M', '50 pM', '100 pM', '200 pM', '300 pM', '400 pM', '500 pM', '600 pM', 'Location', 'EastOutside');
    xlabel('time [h]');
    ylabel('GFP');
    title('AI-1 GFP')

    hold off
    
    figure
    
    hold all
    for k=1:1:8
        for j=1:1:anz
            ai_1_1_OD(k,j)=OD_out(k,3,j);
        end
    plot(time(:,1),ai_1_1_OD(k,:), 'LineWidth', 2);
    end
    legend('0 M', '50 pM', '100 pM', '200 pM', '300 pM', '400 pM', '500 pM', '600 pM', 'Location', 'EastOutside');
    xlabel('time [h]');
    ylabel('OD');
    title('AI-1 OD')

    hold off
    
    figure

    hold all
    for k=1:1:7
        for j=1:1:anz
            ai_1_2_GFP_ratio(k,j)=GFP_ratio_out(k,4,j);
        end
    plot(time(:,1),ai_1_2_GFP_ratio(k,:), 'LineWidth', 2);
    end
    legend('700 pM', '800 pM', '900 pM', '1 nM', '2.5 nM', '5 nM', '10 nM', 'Location', 'EastOutside');
    xlabel('time [h]');
    ylabel('GFP/OD');
    title('AI-1 GFP/OD')

    hold off
    
    figure
    
    hold all
    for k=1:1:7
        for j=1:1:anz
            ai_1_1_GFP(k,j)=GFP_out(k,4,j);
        end
    plot(time(:,1),ai_1_1_GFP(k,:), 'LineWidth', 2);
    end
    legend('700 pM', '800 pM', '900 pM', '1 nM', '2.5 nM', '5 nM', '10 nM', 'Location', 'EastOutside');    legend('5 nM', '10 nM', '25 nM', '50 pM', '75 nM', '100 nM', 'Location', 'NorthWest');
    xlabel('time [h]');
    ylabel('GFP');
    title('AI-1 GFP')

    hold off
    
    figure
    
    hold all
    for k=1:1:7
        for j=1:1:anz
            ai_1_1_OD(k,j)=OD_out(k,4,j);
        end
    plot(time(:,1),ai_1_1_OD(k,:), 'LineWidth', 2);
    end
    legend('700 pM', '800 pM', '900 pM', '1 nM', '2.5 nM', '5 nM', '10 nM', 'Location', 'EastOutside');
    xlabel('time [h]');
    ylabel('OD');
    title('AI-1 OD')

    hold off
    
    end
    
end
