clc
proby = [1 2 4 5 7 8 10 11 13 14 16 17 19 20 22 23 25 26 28 29 31 32 34 35];
klasa_lewa = [1 4 7];
klasa_prawa = [2 5 8 ];
acc =0;
oko=100;
klasa_kontrolna =[];
klasa = [] ;
%oko 1 = lewe
%oko 2 = prawe
%oko 100 = blizej nieokreslone oko
for i=1:length(proby)
    proba = k{proby(i)}';
    klasa_kontrolna(i) = str2double(dane_wynikowe.Events{proby(i),3});

    max1 = max(proba(:,1));
    max2 = max(proba(:,2));

    if(max1 > max2)
       oko = 1;
    elseif (max2 > max1)
       oko = 2;
    else
        oko = 100;
    end

    if oko == 1
        [FP1_pks, FP1_locs] = findpeaks(proba(:,1), 'NPeaks', 3, 'SortStr','descend','MinPeakDistance',30);
        if FP1_pks(2) > FP1_pks(1)*0.5
            if FP1_pks(3) > FP1_pks(1)*0.5
                klasa(i) = 7;
            else
                klasa(i) =4;
            end
        else
            klasa(i) =1;
        end
    elseif oko ==2
        [FP2_pks, FP2_locs] = findpeaks(proba(:,2), 'NPeaks', 3, 'SortStr','descend','MinPeakDistance',30);
        if FP2_pks(2) > FP2_pks(1)*0.5
            if FP2_pks(3) > FP2_pks(1)*0.5
                klasa(i) = 8;
            else
                klasa(i) =5;
            end
        else
            klasa(i) = 2;
        end
    end

    if klasa_kontrolna(i) == klasa(i)
        acc = acc +1;
    end
end

dok = (acc/length(proby))*100