%plotcsv({'walk_28_leander.csv', 'walk_29_leander.csv', 'walk_30_leander.csv', 'walk_31_leander.csv', 'walk_32_leander.csv', 'walk_33_leander.csv', 'walk_34_leander.csv', 'walk_35_leander.csv'})
%plotcsv({'walk_46_wannes.csv', 'walk_47_wannes.csv', 'walk_48_wannes.csv', 'walk_49_wannes.csv', 'walk_50_wannes.csv', 'walk_52_wannes.csv', 'walk_53_wannes.csv', 'walk_54_wannes.csv', 'walk_55_wannes.csv', 'walk_56_wannes.csv', 'walk_57_wannes.csv', 'walk_58_wannes.csv'})

function plotcsv( path )

Mc = cell(length(path),1);
for i=1:length(path)
    Mc{i} = csvread(path{i},1,0);
end

M=[];
for i=1:length(path)
    M = [M;Mc{i}];
end

t = 0:(length(M(:,1))-1);

figure % create new figure
subplot(2,1,1) % first subplot
hold all
plot(t(:),M(:,2),'r.-')
plot(t(:),M(:,3),'g.-')
plot(t(:),M(:,4),'b.-')
xlabel('Tijd')
legend('x','y','z')

M2 = [];
opeenvolgend = 0;
eersteIndex = -1;
laatsteIndex = -1;
indexen = []
for i=1:50:(size(M,1)-50)
    opeenvolgend = opeenvolgend+1
    if sum((M(i:(i+49),2).*M(i:(i+49),2)) > 50) | sum((M(i:(i+49),3).*M(i:(i+49),3)) > 50) | sum((M(i:(i+49),4).*M(i:(i+49),4)) > 50)
        if eersteIndex == -1
            eersteIndex = i;
        end
        laatsteIndex = i+49;
        M2 = [M2;M(i:(i+49),:)];
    else
        if eersteIndex ~= -1 && laatsteIndex - eersteIndex > 149
            indexen=[indexen;eersteIndex laatsteIndex];
        end
        opeenvolgend = 0;
        eersteIndex = -1;
        laatsteIndex = -1;
        M2 = [];
    end

    if opeenvolgend == 10
        eI = eersteIndex;
        lI = laatsteIndex;
        MT = M2;
    end

end

t = eI:lI;
subplot(2,1,2) % first subplot
hold all
plot(t(:),MT(:,2),'r.-')
plot(t(:),MT(:,3),'g.-')
plot(t(:),MT(:,4),'b.-')
xlabel('Tijd')
legend('x','y','z')

indexen