run_protocol6

#!/usr/bin/octave -qf

%%beat is the folder containing all the functions needed for the BEAT project PI algos
addpath("beat/Functions")
addpath("beat/AdditionalFunctions")

arg_list = argv ();

if nargin != 3
  printf ("ERROR: Provided %d parameters, but expecting 3\n", nargin)
  printf ("Usage:\n")
  printf ("\t run_protocol6 jointAngle.csv platformData.csv out_folder\n")
  exit(1)
endif

printf ("csv file: %s\n", arg_list{1});
printf ("platform data: %s\n", arg_list{2});
printf ("result folder : %s\n", arg_list{3});

if ~exist(arg_list{3}, 'dir')
  error ("ERROR: folder %s does not exist", arg_list{3});
endif
pkg load io
pkg load signal

printf("Running kinematic_routine_perturbati;on\n");
kinematic_routine_perturbation(arg_list{1}, arg_list{2}, arg_list{3});

printf("Running posturographic_routine_perturbation\n");
posturographic_routine_perturbation(arg_list{2}, arg_list{3});

printf("Running step_perturbation\n");
step_perturbation(arg_list{2}, arg_list{3});
printf("All done\n");