clear all
clc
close all

load Voluntario_01_antepe_edit.csv
load Voluntario_01_retrope_edit.csv

v1a_fz = Voluntario_01_antepe_edit(:,14);
v1r_fz = Voluntario_01_retrope_edit(:,14);

inicio_a = 4697;
fim_a = 4876;

inicio_r = 4828;
fim_r = 5029;

nlin_v1a = length(v1a_fz(inicio_a:fim_a,:));
ta =[(0:nlin_v1a-1)/800]';


v1a_fz_pisada1 = v1a_fz(inicio_a:fim_a,:);
plot(ta, v1a_fz_pisada1, 'b')
hold on
v1r_fz_pisada1 = v1r_fz(inicio_r:fim_r,:);

nlin_v1r = length(v1r_fz(inicio_r:fim_r,:));
tr =[(0:nlin_v1r-1)/800]';
plot(tr, v1r_fz_pisada1, 'r')
xlabel('Tempo [s]')
ylabel('Força [N]')

figure
plot(v1a_fz_pisada1, 'b')
hold on
plot(v1r_fz_pisada1, 'r')
xlabel('Frames')
ylabel('Força [N]')

impulso_antepe = trapz(ta,v1a_fz_pisada1)
impulso_retrope = trapz(tr,v1r_fz_pisada1)

itransiente_antepe = trapz(ta(1:33,:), v1a_fz_pisada1(1:33,:))
itransiente_retrope = trapz(tr(1:33,:), v1r_fz_pisada1(1:33,:))