Krachtenplatform - script

Script krachtenplatform
clear; clear all;close all; clc;

%% opdracht 1 - Corrigeren voor drift en offset
load TN000004.afp
z4 = TN000004(:, 5) + TN000004(:, 6) + TN000004(:, 7) + TN000004(:, 8);

% Kracht in z-richitng (V) als functie van samplenummer plotten
figure (1)
plot (z4, 'b')
xlabel('Samplenummer')
ylabel('Kracht in z-richting [V]')
title ('Kracht Z')
hold on
% Kracht corrigeren voor drift en offset
gecorrigeerdsignaal = verwijderdrift(z4,1, 14627, 25813, 35996);

% Het gecorrigeerd signaal in zelfde figuur plotten
figure(1)
plot(gecorrigeerdsignaal, 'r')
legend ('Signaal', 'Gecorrigeerdsignaal')

% Het corrigeren is goed gedaan, omdat er nu een rechte lijn is.
% Je kunt verwijderdrift niet gebruiken als het geen rechte lijn is. Dan
% moet je de orde aanpassen

%% opdracht 2a - Kalibratielijn o.b.v. de gemeten data
%Range 1
load TN000006.afp;
z6 = TN000006(:, 5) + TN000006(:, 6) + TN000006(:, 7) + TN000006(:, 8);

figure (2)
plot (z6)
xlabel('Samplenummer')
ylabel('Kracht in z-richting [V]')
title ('range 1')
hold on

% Signaal corrigeren
gecorrigeerdsignaal1 = verwijderdrift(z6,1, 5955.4, 32726, 35996);
% Gecorrigeerd signaal plotten om te kijken of het goed is gegaan
figure (2)
plot(gecorrigeerdsignaal1)
legend ('Signaal', 'Gecorrigeerdsignaal')
hold on

massa1 = [0, 4.992 10.019 14.960 19.820 24.814 0]'; g = 9.81;
F1 = massa1.*g;

% Voor elk stapje moet je het gemiddelde van het gecorrigeerd signaal nemen
z1_1_1 = mean(gecorrigeerdsignaal1(1 : 5954.6,1)); %bij stap 1
z1_1_2 = mean(gecorrigeerdsignaal1(6219.3: 13251, 1)); %bij stap 2
z1_1_3 = mean(gecorrigeerdsignaal1(13592 : 18431, 1)); %bij stap 3
z1_1_4 = mean(gecorrigeerdsignaal1(18809 : 25198, 1)); %bij stap 4
z1_1_5 = mean(gecorrigeerdsignaal1(25388 : 28715, 1)); %bij stap 5
z1_1_6 = mean(gecorrigeerdsignaal1(29206 : 32117, 1)); %bij stap 6
z1_1_7 = mean(gecorrigeerdsignaal1(32798 : 36000, 1)); %bij stap 7