Richard Roos / Mbed 2 deprecated TotalControlEmg2

Dependencies:   HIDScope MODSERIAL QEI TextLCD mbed

Committer:
RemcoDas
Date:
Mon Oct 19 10:09:42 2015 +0000
Revision:
30:8ae855348d22
Parent:
29:9610df479f89
Final werkend met EMG

Who changed what in which revision?

UserRevisionLine numberNew contents of line
Bartvaart 5:b400209df739 1 #include "Filterdesigns.h"
Bartvaart 6:8197f9446daf 2 #include "Filter.h"
Bartvaart 6:8197f9446daf 3
Bartvaart 7:040591b3f019 4 // Inputwaardes
Bartvaart 13:b01231e0b743 5 //Notch 50Hz
Bartvaart 13:b01231e0b743 6
Bartvaart 7:040591b3f019 7 // Filter1a: 50Hz Notch
RemcoDas 30:8ae855348d22 8 double v1_50a_L = 0, v2_50a_L = 0;
RemcoDas 30:8ae855348d22 9 double v1_50a_R = 0, v2_50a_R = 0;
Bartvaart 15:c1a8f28d6583 10 const double a1_50a = -1.52337295428, a2_50a = 0.93195385841;
Bartvaart 15:c1a8f28d6583 11 const double b0_50a = 1.00000000000, b1_50a = -1.61854514929, b2_50a = 1.0;
Bartvaart 6:8197f9446daf 12 const double gain_50a = 1.000000;
Bartvaart 6:8197f9446daf 13
Bartvaart 6:8197f9446daf 14 // Filter1b: 50Hz Notch
RemcoDas 30:8ae855348d22 15 double v1_50b_L = 0, v2_50b_L = 0;
RemcoDas 30:8ae855348d22 16 double v1_50b_R = 0, v2_50b_R = 0;
Bartvaart 15:c1a8f28d6583 17 const double a1_50b = -1.60486796113, a2_50b = 0.93780356783;
Bartvaart 15:c1a8f28d6583 18 const double b0_50b = 1.00000000000, b1_50b = -1.61854514929, b2_50b = 1.0;
Bartvaart 15:c1a8f28d6583 19 const double gain_50b = 0.934872;
Bartvaart 6:8197f9446daf 20
Bartvaart 13:b01231e0b743 21 //HighPass 20Hz
Bartvaart 13:b01231e0b743 22
Bartvaart 13:b01231e0b743 23 // Filter2a: 20Hz HighPass
RemcoDas 30:8ae855348d22 24 double v1_HP_L = 0, v2_HP_L = 0;
RemcoDas 30:8ae855348d22 25 double v1_HP_R = 0, v2_HP_R = 0;
Bartvaart 21:8fe8419de3e9 26 const double a1_HP = -0.76475499450, a2_HP = 0.27692273367;
Bartvaart 21:8fe8419de3e9 27 const double b0_HP = 1.00000000000, b1_HP = -2.0, b2_HP = 1.00000000000;
Bartvaart 21:8fe8419de3e9 28 const double gain_HP = 0.510419;
Bartvaart 6:8197f9446daf 29
Bartvaart 13:b01231e0b743 30 //LowPass 3Hz
Bartvaart 13:b01231e0b743 31
Bartvaart 13:b01231e0b743 32 // Filter3a: 3Hz LowPass
RemcoDas 30:8ae855348d22 33 double v1_LP_L = 0, v2_LP_L = 0;
RemcoDas 30:8ae855348d22 34 double v1_LP_R = 0, v2_LP_R = 0;
Bartvaart 15:c1a8f28d6583 35 const double a1_LP = -1.93503824887, a2_LP = 0.93708289663;
Bartvaart 15:c1a8f28d6583 36 const double b0_LP = 1.00000000000, b1_LP = 2.0, b2_LP = 1.00000000000;
Bartvaart 15:c1a8f28d6583 37 const double gain_LP = 0.000511;
Bartvaart 6:8197f9446daf 38
RemcoDas 30:8ae855348d22 39
Bartvaart 6:8197f9446daf 40
RemcoDas 30:8ae855348d22 41 double FilterdesignsLeft(double u){ // input u, oude y waarde
RemcoDas 30:8ae855348d22 42 double y = 0;
Bartvaart 5:b400209df739 43 //u = input waarde
Bartvaart 5:b400209df739 44 //y = output waarde
Bartvaart 16:8f175d2a472f 45
Bartvaart 5:b400209df739 46 // Op deze manier worden de waardes ingelezen in Filter. Zorg dus voor dezelfde volgorde, zodat de waardes goed uitgelezen worden!:
Bartvaart 5:b400209df739 47 // Filter(double u, double &v1, double &v2, const double a1, const double a2, const double b0, const double b1, const double b2, const double gain)
Bartvaart 6:8197f9446daf 48
Bartvaart 5:b400209df739 49 // 50Hz Notch filter
RemcoDas 30:8ae855348d22 50 double y50a = Filter(u, v1_50a_L, v2_50a_L, a1_50a, a2_50a, b0_50a, b1_50a, b2_50a, gain_50a);
RemcoDas 30:8ae855348d22 51 double y50b = Filter(y50a, v1_50b_L, v2_50b_L, a1_50b, a2_50b, b0_50b, b1_50b, b2_50b, gain_50b);
RemcoDas 30:8ae855348d22 52
RemcoDas 30:8ae855348d22 53 // High Pass filter. Tot 20Hz wordt weggefliterd
RemcoDas 30:8ae855348d22 54 double yHP = Filter(y50b, v1_HP_L, v2_HP_L, a1_HP, a2_HP, b0_HP, b1_HP, b2_HP, gain_HP);
RemcoDas 30:8ae855348d22 55
RemcoDas 30:8ae855348d22 56 // Absolute waarde wordt genomen
RemcoDas 30:8ae855348d22 57 double y1 = fabs(yHP);
RemcoDas 30:8ae855348d22 58
RemcoDas 30:8ae855348d22 59 // Low Pass filter. Alles vanaf 5Hz wordt weggefilterd
RemcoDas 30:8ae855348d22 60 double yLP = Filter(y1, v1_LP_L, v2_LP_L, a1_LP, a2_LP, b0_LP, b1_LP, b2_LP, gain_LP);
Bartvaart 6:8197f9446daf 61
RemcoDas 30:8ae855348d22 62 y = 10 * yLP;
RemcoDas 30:8ae855348d22 63 return y;
RemcoDas 30:8ae855348d22 64 }
RemcoDas 30:8ae855348d22 65
RemcoDas 30:8ae855348d22 66 double FilterdesignsRight(double u){ // input u, oude y waarde
RemcoDas 30:8ae855348d22 67 //u = input waarde
RemcoDas 30:8ae855348d22 68 //y = output waarde
RemcoDas 30:8ae855348d22 69
RemcoDas 30:8ae855348d22 70 // Op deze manier worden de waardes ingelezen in Filter. Zorg dus voor dezelfde volgorde, zodat de waardes goed uitgelezen worden!:
RemcoDas 30:8ae855348d22 71 // Filter(double u, double &v1, double &v2, const double a1, const double a2, const double b0, const double b1, const double b2, const double gain)
RemcoDas 30:8ae855348d22 72
RemcoDas 30:8ae855348d22 73 // 50Hz Notch filter
RemcoDas 30:8ae855348d22 74 double y50a = Filter(u, v1_50a_R, v2_50a_R, a1_50a, a2_50a, b0_50a, b1_50a, b2_50a, gain_50a);
RemcoDas 30:8ae855348d22 75 double y50b = Filter(y50a, v1_50b_R, v2_50b_R, a1_50b, a2_50b, b0_50b, b1_50b, b2_50b, gain_50b);
RemcoDas 30:8ae855348d22 76
RemcoDas 30:8ae855348d22 77 // High Pass filter. Tot 20Hz wordt weggefliterd !!! WAT IS HIER INPUT U? !!!
RemcoDas 30:8ae855348d22 78 double yHP = Filter(u, v1_HP_R, v2_HP_R, a1_HP, a2_HP, b0_HP, b1_HP, b2_HP, gain_HP);
Bartvaart 6:8197f9446daf 79
Bartvaart 5:b400209df739 80 // Absolute waarde wordt genomen.
Bartvaart 15:c1a8f28d6583 81 double y1 = fabs(yHP);
Bartvaart 6:8197f9446daf 82
Bartvaart 6:8197f9446daf 83 // Low Pass filter. Alles vanaf 5Hz wordt weggefilterd
RemcoDas 30:8ae855348d22 84 double yLP = Filter(y1, v1_LP_R, v2_LP_R, a1_LP, a2_LP, b0_LP, b1_LP, b2_LP, gain_LP);
Bartvaart 6:8197f9446daf 85
RemcoDas 30:8ae855348d22 86 double y = 10 * yLP;
Bartvaart 17:cfe44346645c 87 return y;
RemcoDas 30:8ae855348d22 88 }
RemcoDas 30:8ae855348d22 89