DC motor control program using TA7291P type driver and rotary encoder with A, B phase.
Dependencies: QEI mbed-rtos mbed
main.cpp@13:4116d4b6c2a5, 2012-12-02 (annotated)
- Committer:
- kosaka
- Date:
- Sun Dec 02 07:28:39 2012 +0000
- Revision:
- 13:4116d4b6c2a5
- Parent:
- 12:9747752435d1
- Child:
- 14:1196c2d455ae
polished a bit
Who changed what in which revision?
User | Revision | Line number | New contents of line |
---|---|---|---|
kosaka | 1:b91aeb5673f3 | 1 | // DC motor control program using H-bridge driver (ex. TA7291P) and 360 resolution rotary encoder with A, B phase. |
kosaka | 13:4116d4b6c2a5 | 2 | // ver. 121202a by Kosaka lab. |
kosaka | 0:fe068497f773 | 3 | #include "mbed.h" |
kosaka | 0:fe068497f773 | 4 | #include "rtos.h" |
kosaka | 0:fe068497f773 | 5 | #include "QEI.h" |
kosaka | 0:fe068497f773 | 6 | #define PI 3.14159265358979 // def. of PI |
kosaka | 0:fe068497f773 | 7 | /*********** User setting for control parameters (begin) ***************/ |
kosaka | 4:6ccbf4d3cb6d | 8 | //#define SIMULATION // Comment this line if not simulation |
kosaka | 3:b6b9b8c7dce6 | 9 | #define USE_PWM // H bridge PWM mode: Vref=Vcc, FIN,2 = PWM or 0. Comment if use Vref=analog mode |
kosaka | 8:b8b31e9b60c2 | 10 | #define PWM_FREQ 10000.0 //[Hz], pwm freq. available if USE_PWM is defined. |
kosaka | 8:b8b31e9b60c2 | 11 | #define USE_CURRENT_CONTROL // Current control on. Comment if current control off. |
kosaka | 8:b8b31e9b60c2 | 12 | #define CONTROL_MODE 0 // 0:PID control, 1:Frequency response, 2:Step response, 3. u=Rand to identify G(s), 4) FFT identification |
kosaka | 11:0984c90b820b | 13 | #define DEADZONE_PLUS 1. // deadzone of plus side |
kosaka | 11:0984c90b820b | 14 | #define DEADZONE_MINUS -1.5 // deadzone of minus side |
kosaka | 0:fe068497f773 | 15 | #define GOOD_DATA // Comment this line if the length of data TMAX/TS2 > 1000 |
kosaka | 6:16bee943a9fa | 16 | //#define R_SIN // Comment this line if r=step, not r = sin |
kosaka | 0:fe068497f773 | 17 | float _freq_u = 0.3; // [Hz], freq. of Frequency response, or Step response |
kosaka | 1:b91aeb5673f3 | 18 | float _rmax=100./180.*PI; // [rad], max. of reference signal |
kosaka | 8:b8b31e9b60c2 | 19 | float _Kp4th=20; // P gain for PID from motor volt. to angle. |
kosaka | 8:b8b31e9b60c2 | 20 | float _Ki4th=20; // I gain for PID from motor volt. to angle. |
kosaka | 8:b8b31e9b60c2 | 21 | float _Kd4th=5; // D gain for PID from motor volt. to angle. |
kosaka | 8:b8b31e9b60c2 | 22 | float _Kp4i=10.0; // P gain for PID from motor volt. to motor current. |
kosaka | 8:b8b31e9b60c2 | 23 | float _Ki4i=10.0; // I gain for PID from motor volt. to motor current. |
kosaka | 8:b8b31e9b60c2 | 24 | float _Kd4i=0.0; // D gain for PID from motor volt. to motor current. |
kosaka | 11:0984c90b820b | 25 | #define iTS 0.0001 // [s], iTS, sampling time[s] of motor current i control PID using timer interrupt |
kosaka | 11:0984c90b820b | 26 | #define thTS 0.001 // [s], thTS>=0.001[s], sampling time[s] of motor angle th PID using rtos-timer |
kosaka | 8:b8b31e9b60c2 | 27 | #define TS2 0.01 // [s], TS2>=0.001[s], sampling time[s] to save data to PC using thread. But, max data length is 1000. |
kosaka | 0:fe068497f773 | 28 | #define TMAX 10 // [s], experiment starts from 0[s] to TMAX[s] |
kosaka | 0:fe068497f773 | 29 | #define UMAX 3.3 // [V], max of control input u |
kosaka | 0:fe068497f773 | 30 | #define UMIN -3.3 // [V], max of control input u |
kosaka | 8:b8b31e9b60c2 | 31 | #define IMAX 0.5 // [A], max of motor current i |
kosaka | 8:b8b31e9b60c2 | 32 | #define IMIN -0.5 // [A], max of motor current i |
kosaka | 3:b6b9b8c7dce6 | 33 | #define DEADTIME 0.0001 // [s], deadtime to be set between plus volt. to/from minus |
kosaka | 3:b6b9b8c7dce6 | 34 | // H bridge port setting |
kosaka | 3:b6b9b8c7dce6 | 35 | #define FIN_PORT p21 // FIN (IN1) port of mbed |
kosaka | 3:b6b9b8c7dce6 | 36 | #define RIN_PORT p22 // RIN (IN2) port of mbed |
kosaka | 3:b6b9b8c7dce6 | 37 | #define VREF_PORT p18 // Vref port of mbed (available if USE_PWM is not defined) |
kosaka | 0:fe068497f773 | 38 | DigitalOut debug_p17(p17); // p17 for debug |
kosaka | 8:b8b31e9b60c2 | 39 | AnalogIn v_shunt_r(p19); // *3.3 [V], Volt of shunt R_SHUNT[Ohm]. The motor current i = v_shunt_r/R_SHUNT [A] |
kosaka | 8:b8b31e9b60c2 | 40 | #define R_SHUNT 1.25 // [Ohm], shunt resistanse |
kosaka | 8:b8b31e9b60c2 | 41 | //AnalogIn VCC(p19); // *3.3 [V], Volt of VCC for motor |
kosaka | 8:b8b31e9b60c2 | 42 | //AnalogIn VCC2(p20); // *3.3 [V], Volt of (VCC-R i), R=2.5[Ohm]. R is for preventing too much i when deadtime is failed. |
kosaka | 0:fe068497f773 | 43 | |
kosaka | 5:2e53814aae4c | 44 | #define N_ENC (24*4) // "*4": QEI::X4_ENCODING. Number of pulses in one revolution(=360 deg) of rotary encoder. |
kosaka | 0:fe068497f773 | 45 | QEI encoder (p29, p30, NC, N_ENC, QEI::X4_ENCODING); |
kosaka | 0:fe068497f773 | 46 | // QEI(PinName channelA, mbed pin for channel A input. |
kosaka | 0:fe068497f773 | 47 | // PinName channelB, mbed pin for channel B input. |
kosaka | 0:fe068497f773 | 48 | // PinName index, mbed pin for channel Z input. (index channel input Z phase th=0), (pass NC if not needed). |
kosaka | 0:fe068497f773 | 49 | // int pulsesPerRev, Number of pulses in one revolution(=360 deg). |
kosaka | 0:fe068497f773 | 50 | // Encoding encoding = X2_ENCODING, X2 is default. X2 uses interrupts on the rising and falling edges of only channel A where as |
kosaka | 0:fe068497f773 | 51 | // X4 uses them on both channels. |
kosaka | 0:fe068497f773 | 52 | // ) |
kosaka | 0:fe068497f773 | 53 | // void reset (void) |
kosaka | 0:fe068497f773 | 54 | // Reset the encoder. |
kosaka | 0:fe068497f773 | 55 | // int getCurrentState (void) |
kosaka | 0:fe068497f773 | 56 | // Read the state of the encoder. |
kosaka | 0:fe068497f773 | 57 | // int getPulses (void) |
kosaka | 0:fe068497f773 | 58 | // Read the number of pulses recorded by the encoder. |
kosaka | 0:fe068497f773 | 59 | // int getRevolutions (void) |
kosaka | 0:fe068497f773 | 60 | // Read the number of revolutions recorded by the encoder on the index channel. |
kosaka | 0:fe068497f773 | 61 | /*********** User setting for control parameters (end) ***************/ |
kosaka | 0:fe068497f773 | 62 | |
kosaka | 0:fe068497f773 | 63 | |
kosaka | 0:fe068497f773 | 64 | Serial pc(USBTX, USBRX); // Display on tera term in PC |
kosaka | 0:fe068497f773 | 65 | LocalFileSystem local("local"); // save data to mbed USB disk drive in PC |
kosaka | 0:fe068497f773 | 66 | //Semaphore semaphore1(1); // wait and release to protect memories and so on |
kosaka | 0:fe068497f773 | 67 | //Mutex stdio_mutex; // wait and release to protect memories and so on |
kosaka | 8:b8b31e9b60c2 | 68 | Ticker controller_ticker; // Timer interrupt using TIMER3, TS<0.001 is OK. Priority is higher than rtosTimer. |
kosaka | 0:fe068497f773 | 69 | |
kosaka | 3:b6b9b8c7dce6 | 70 | #ifdef USE_PWM // H bridge PWM mode: Vref=Vcc, FIN,2 = PWM or 0. |
kosaka | 3:b6b9b8c7dce6 | 71 | PwmOut FIN(FIN_PORT); // PWM for FIN, RIN=0 when forward rotation. H bridge driver PWM mode |
kosaka | 3:b6b9b8c7dce6 | 72 | PwmOut RIN(RIN_PORT); // PWM for RIN, FIN=0 when reverse rotation. H bridge driver PWM mode |
kosaka | 3:b6b9b8c7dce6 | 73 | #else // H bridge Vref=analog mode |
kosaka | 3:b6b9b8c7dce6 | 74 | DigitalOut FIN(FIN_PORT);// FIN for DC motor H bridge driver. FIN=1, RIN=0 then forward rotation |
kosaka | 3:b6b9b8c7dce6 | 75 | DigitalOut RIN(RIN_PORT);// RIN for DC motor H bridge driver. FIN=0, RIN=1 then reverse rotation |
kosaka | 3:b6b9b8c7dce6 | 76 | #endif |
kosaka | 4:6ccbf4d3cb6d | 77 | AnalogOut analog_out(VREF_PORT);// Vref for DC motor H bridge driver. DA converter for control input [0.0-1.0]% in the output range of 0.0 to 3.3[V] |
kosaka | 4:6ccbf4d3cb6d | 78 | |
kosaka | 0:fe068497f773 | 79 | unsigned long _count; // sampling number |
kosaka | 0:fe068497f773 | 80 | float _time; // time[s] |
kosaka | 1:b91aeb5673f3 | 81 | float _r; // reference signal |
kosaka | 8:b8b31e9b60c2 | 82 | float _th=0; // [rad], motor angle, control output of angle controller |
kosaka | 8:b8b31e9b60c2 | 83 | float _i=0; // [A], motor current, control output of current controller |
kosaka | 0:fe068497f773 | 84 | float _e=0; // e=r-y for PID controller |
kosaka | 0:fe068497f773 | 85 | float _eI=0; // integral of e for PID controller |
kosaka | 8:b8b31e9b60c2 | 86 | float _iref; // reference current iref [A], output of angle th_contorller |
kosaka | 8:b8b31e9b60c2 | 87 | float _u; // control input[V], motor input volt. |
kosaka | 8:b8b31e9b60c2 | 88 | float _ei=0; // e=r-y for current PID controller |
kosaka | 8:b8b31e9b60c2 | 89 | float _eiI=0; // integral of e for current PID controller |
kosaka | 0:fe068497f773 | 90 | unsigned char _f_u_plus=1;// sign(u) |
kosaka | 0:fe068497f773 | 91 | unsigned char _f_umax=0;// flag showing u is max or not |
kosaka | 8:b8b31e9b60c2 | 92 | unsigned char _f_imax=0;// flag showing i is max or not |
kosaka | 0:fe068497f773 | 93 | float debug[10]; // for debug |
kosaka | 0:fe068497f773 | 94 | float disp[10]; // for printf to avoid interrupted by quicker process |
kosaka | 0:fe068497f773 | 95 | #ifdef GOOD_DATA |
kosaka | 0:fe068497f773 | 96 | float data[1000][5]; // memory to save data offline instead of "online fprintf". |
kosaka | 0:fe068497f773 | 97 | unsigned int count3; // |
kosaka | 8:b8b31e9b60c2 | 98 | unsigned int count2=(int)(TS2/iTS); // |
kosaka | 0:fe068497f773 | 99 | #endif |
kosaka | 0:fe068497f773 | 100 | |
kosaka | 7:613febb8f028 | 101 | extern "C" void mbed_reset(); |
kosaka | 3:b6b9b8c7dce6 | 102 | |
kosaka | 3:b6b9b8c7dce6 | 103 | void u2Hbridge(float u){// input u to H bridge driver |
kosaka | 3:b6b9b8c7dce6 | 104 | float duty; |
kosaka | 3:b6b9b8c7dce6 | 105 | unsigned int f_deadtime, f_in, r_in; |
kosaka | 0:fe068497f773 | 106 | |
kosaka | 0:fe068497f773 | 107 | if( u > 0 ){ // forward: rotate to plus |
kosaka | 11:0984c90b820b | 108 | u += DEADZONE_PLUS; // deadzone compensation |
kosaka | 3:b6b9b8c7dce6 | 109 | duty = u/3.3; // Vref |
kosaka | 8:b8b31e9b60c2 | 110 | if(_f_u_plus==0){ // if plus to/from minus, set FIN=RIN=0/1 for deadtime 100[us]. |
kosaka | 3:b6b9b8c7dce6 | 111 | f_deadtime = 1; // deadtime is required |
kosaka | 3:b6b9b8c7dce6 | 112 | _f_u_plus=1; |
kosaka | 3:b6b9b8c7dce6 | 113 | }else{ |
kosaka | 3:b6b9b8c7dce6 | 114 | f_deadtime = 0; // deadtime is required |
kosaka | 3:b6b9b8c7dce6 | 115 | } |
kosaka | 3:b6b9b8c7dce6 | 116 | f_in=1; r_in=0; // set forward direction |
kosaka | 0:fe068497f773 | 117 | }else if( u < 0 ){ // reverse: rotate to minus |
kosaka | 11:0984c90b820b | 118 | u += DEADZONE_MINUS;// deadzone compensation |
kosaka | 3:b6b9b8c7dce6 | 119 | duty = -u/3.3; |
kosaka | 8:b8b31e9b60c2 | 120 | if(_f_u_plus==1){ // if plus to/from minus, set FIN=RIN=0/1 for deadtime 100[us]. |
kosaka | 3:b6b9b8c7dce6 | 121 | f_deadtime = 1; // deadtime is required |
kosaka | 3:b6b9b8c7dce6 | 122 | _f_u_plus=0; |
kosaka | 3:b6b9b8c7dce6 | 123 | }else{ |
kosaka | 3:b6b9b8c7dce6 | 124 | f_deadtime = 0; // deadtime is required |
kosaka | 3:b6b9b8c7dce6 | 125 | } |
kosaka | 3:b6b9b8c7dce6 | 126 | f_in=0; r_in=1; // set reverse direction |
kosaka | 0:fe068497f773 | 127 | }else{// if( u == 0 ){ // stop mode |
kosaka | 3:b6b9b8c7dce6 | 128 | duty = 0; |
kosaka | 3:b6b9b8c7dce6 | 129 | f_deadtime = 0; // deadtime is required |
kosaka | 3:b6b9b8c7dce6 | 130 | f_in=0; r_in=0; // set FIN & RIN |
kosaka | 0:fe068497f773 | 131 | } |
kosaka | 3:b6b9b8c7dce6 | 132 | |
kosaka | 3:b6b9b8c7dce6 | 133 | if( f_deadtime==1 ){// making deadtime |
kosaka | 3:b6b9b8c7dce6 | 134 | FIN=0; RIN=0; // set upper&lower arm zero |
kosaka | 3:b6b9b8c7dce6 | 135 | wait(DEADTIME); |
kosaka | 3:b6b9b8c7dce6 | 136 | } |
kosaka | 3:b6b9b8c7dce6 | 137 | #ifdef USE_PWM // H bridge PWM mode: Vref=Vcc, FIN,2 = PWM or 0 |
kosaka | 3:b6b9b8c7dce6 | 138 | FIN = duty*(float)f_in; RIN = duty*(float)r_in; // setting pwm FIN & RIN |
kosaka | 4:6ccbf4d3cb6d | 139 | analog_out = 1; // setting Vref=UMAX, but Vref=Vcc is better. |
kosaka | 3:b6b9b8c7dce6 | 140 | #else // Analog mode: Vref=analog, FIN, RIN = 1 or 0) |
kosaka | 3:b6b9b8c7dce6 | 141 | FIN = f_in; RIN = r_in; // setting FIN & RIN |
kosaka | 3:b6b9b8c7dce6 | 142 | analog_out = duty; // setting Vref : PID write DA, range is 0-1. Output voltage 0-3.3v |
kosaka | 3:b6b9b8c7dce6 | 143 | #endif |
kosaka | 0:fe068497f773 | 144 | } |
kosaka | 0:fe068497f773 | 145 | |
kosaka | 8:b8b31e9b60c2 | 146 | void th_controller(void const *argument) { // if rtos. current controller & velocity controller |
kosaka | 0:fe068497f773 | 147 | float e_old, wt; |
kosaka | 8:b8b31e9b60c2 | 148 | float y, u; |
kosaka | 0:fe068497f773 | 149 | |
kosaka | 11:0984c90b820b | 150 | // y_old = _th; // y_old=y(t-TS) is older than y by 1 sampling time TS[s]. update data |
kosaka | 0:fe068497f773 | 151 | #ifdef SIMULATION |
kosaka | 11:0984c90b820b | 152 | y = _th + thTS/0.1*(0.2*_iref*100-_th); //=(1-TS/0.1)*_y + 0.2*TS/0.1*_iref; // G = 0.2/(0.1s+1) |
kosaka | 0:fe068497f773 | 153 | #else |
kosaka | 0:fe068497f773 | 154 | // semaphore1.wait(); // |
kosaka | 0:fe068497f773 | 155 | y = (float)encoder.getPulses()/(float)N_ENC*2.0*PI; // get angle [rad] from encoder |
kosaka | 0:fe068497f773 | 156 | // semaphore1.release(); // |
kosaka | 0:fe068497f773 | 157 | #endif |
kosaka | 8:b8b31e9b60c2 | 158 | #define RMIN 0 |
kosaka | 0:fe068497f773 | 159 | wt = _freq_u *2.0*PI*_time; |
kosaka | 11:0984c90b820b | 160 | if(wt>2.0*PI){ wt -= 2.0*PI*(float)((int)(wt/(2.0*PI)));} |
kosaka | 1:b91aeb5673f3 | 161 | _r = sin(wt ) * (_rmax-RMIN)/2.0 + (_rmax+RMIN)/2.0; |
kosaka | 11:0984c90b820b | 162 | //debug[0] =1; |
kosaka | 1:b91aeb5673f3 | 163 | #ifndef R_SIN |
kosaka | 1:b91aeb5673f3 | 164 | if( _r>=(_rmax+RMIN)/2.0 ) _r = _rmax; |
kosaka | 1:b91aeb5673f3 | 165 | else _r = 0; |
kosaka | 0:fe068497f773 | 166 | #endif |
kosaka | 11:0984c90b820b | 167 | e_old = _e; // e_old=e(t-TS) is older than e by 1 sampling time TS[s]. update data |
kosaka | 0:fe068497f773 | 168 | _e = _r - y; // error e(t) |
kosaka | 11:0984c90b820b | 169 | if( _e<((360.0/N_ENC)/180*PI) && _e>-((360.0/N_ENC)/180*PI) ){ // e is inside minimum precision? |
kosaka | 11:0984c90b820b | 170 | _e = 0; |
kosaka | 11:0984c90b820b | 171 | } |
kosaka | 8:b8b31e9b60c2 | 172 | if( _f_imax==0 ){ // u is saturated? |
kosaka | 11:0984c90b820b | 173 | // if( _e>((360.0/N_ENC)/180*PI) || _e<-((360.0/N_ENC)/180*PI) ){ // e is inside minimum precision? |
kosaka | 8:b8b31e9b60c2 | 174 | _eI = _eI + thTS*_e; // integral of e(t) |
kosaka | 11:0984c90b820b | 175 | // } |
kosaka | 0:fe068497f773 | 176 | } |
kosaka | 11:0984c90b820b | 177 | u = _Kp4th*_e + _Kd4th*(_e-e_old)/thTS + _Ki4th*_eI; // PID output u(t) |
kosaka | 0:fe068497f773 | 178 | |
kosaka | 6:16bee943a9fa | 179 | #if CONTROL_MODE==1||CONTROL_MODE==2 // frequency response, or Step response |
kosaka | 0:fe068497f773 | 180 | wt = _freq_u *2.0*PI*_time; |
kosaka | 0:fe068497f773 | 181 | if(wt>2*PI) wt -= 2*PI*(float)((int)(wt/2.0*PI)); |
kosaka | 0:fe068497f773 | 182 | u = sin(wt ) * (UMAX-UMIN)/2.0 + (UMAX+UMIN)/2.0; |
kosaka | 0:fe068497f773 | 183 | #endif |
kosaka | 0:fe068497f773 | 184 | #if CONTROL_MODE==2 // Step response |
kosaka | 0:fe068497f773 | 185 | if( u>=0 ) u = UMAX; |
kosaka | 0:fe068497f773 | 186 | else u = UMIN; |
kosaka | 0:fe068497f773 | 187 | #endif |
kosaka | 6:16bee943a9fa | 188 | #if CONTROL_MODE==3 // u=rand() to identify motor transfer function G(s) from V to angle |
kosaka | 8:b8b31e9b60c2 | 189 | if(count2==(int)(TS2/iTS)){ |
kosaka | 6:16bee943a9fa | 190 | u = ((float)rand()/RAND_MAX*2.0-1.0) * (UMAX-1.5)/2.0 + (UMAX+1.5)/2.0; |
kosaka | 6:16bee943a9fa | 191 | }else{ |
kosaka | 8:b8b31e9b60c2 | 192 | u = _iref; |
kosaka | 6:16bee943a9fa | 193 | } |
kosaka | 6:16bee943a9fa | 194 | #endif |
kosaka | 7:613febb8f028 | 195 | #if CONTROL_MODE==4 // FFT identification, u=repetive signal |
kosaka | 11:0984c90b820b | 196 | if(count2==(int)(TS2/thTS)){ |
kosaka | 7:613febb8f028 | 197 | u = data[count3][4]; |
kosaka | 7:613febb8f028 | 198 | }else{ |
kosaka | 8:b8b31e9b60c2 | 199 | u = _iref; |
kosaka | 7:613febb8f028 | 200 | } |
kosaka | 7:613febb8f028 | 201 | #endif |
kosaka | 8:b8b31e9b60c2 | 202 | // u is saturated? for anti-windup |
kosaka | 8:b8b31e9b60c2 | 203 | if( u>IMAX ){ |
kosaka | 8:b8b31e9b60c2 | 204 | _eI -= (u-IMAX)/_Ki4th; if(_eI<0){ _eI=0;} |
kosaka | 8:b8b31e9b60c2 | 205 | u = IMAX; |
kosaka | 8:b8b31e9b60c2 | 206 | // _f_imax = 1; |
kosaka | 8:b8b31e9b60c2 | 207 | } else if( u<IMIN ){ |
kosaka | 8:b8b31e9b60c2 | 208 | _eI -= (u-IMIN)/_Ki4th; if(_eI>0){ _eI=0;} |
kosaka | 8:b8b31e9b60c2 | 209 | u = IMIN; |
kosaka | 8:b8b31e9b60c2 | 210 | // _f_imax = 1; |
kosaka | 8:b8b31e9b60c2 | 211 | }else{ |
kosaka | 8:b8b31e9b60c2 | 212 | _f_imax = 0; |
kosaka | 8:b8b31e9b60c2 | 213 | } |
kosaka | 8:b8b31e9b60c2 | 214 | //-------- update data |
kosaka | 8:b8b31e9b60c2 | 215 | _th = y; |
kosaka | 8:b8b31e9b60c2 | 216 | _iref = u; |
kosaka | 8:b8b31e9b60c2 | 217 | } |
kosaka | 8:b8b31e9b60c2 | 218 | void i_controller() { // if ticker. current controller & velocity controller |
kosaka | 8:b8b31e9b60c2 | 219 | void u2Hbridge(float); // input u to H bridge (full bridge) driver |
kosaka | 8:b8b31e9b60c2 | 220 | #ifdef USE_CURRENT_CONTROL |
kosaka | 8:b8b31e9b60c2 | 221 | float e_old; |
kosaka | 8:b8b31e9b60c2 | 222 | float y, u; |
kosaka | 8:b8b31e9b60c2 | 223 | |
kosaka | 8:b8b31e9b60c2 | 224 | // _iref=_r*180/PI; // step response from v to i, useful to tune PID gains. |
kosaka | 8:b8b31e9b60c2 | 225 | debug_p17 = 1; // for debug: processing time check |
kosaka | 8:b8b31e9b60c2 | 226 | // if(debug_p17 == 1) debug_p17=0;else debug_p17=1; // for debug: sampling time check |
kosaka | 8:b8b31e9b60c2 | 227 | |
kosaka | 8:b8b31e9b60c2 | 228 | _count+=1; |
kosaka | 8:b8b31e9b60c2 | 229 | // current PID controller |
kosaka | 8:b8b31e9b60c2 | 230 | y = v_shunt_r/R_SHUNT; // get i [A] from shunt resistance |
kosaka | 8:b8b31e9b60c2 | 231 | if(_f_u_plus==0){ y=-y;} |
kosaka | 8:b8b31e9b60c2 | 232 | |
kosaka | 11:0984c90b820b | 233 | e_old = _ei; // e_old=e(t-TS) is older than e by 1 sampling time TS[s]. update data |
kosaka | 8:b8b31e9b60c2 | 234 | _ei = _iref - y; // error e(t) |
kosaka | 8:b8b31e9b60c2 | 235 | if( _f_umax==0 ){ |
kosaka | 8:b8b31e9b60c2 | 236 | _eiI = _eiI + iTS*_ei; // integral of e(t) |
kosaka | 8:b8b31e9b60c2 | 237 | } |
kosaka | 8:b8b31e9b60c2 | 238 | u = _Kp4i*_e + _Kd4i*(_ei-e_old)/iTS + _Ki4i*_eiI; // PID output u(t) |
kosaka | 8:b8b31e9b60c2 | 239 | |
kosaka | 8:b8b31e9b60c2 | 240 | // u is saturated? for anti-windup |
kosaka | 8:b8b31e9b60c2 | 241 | if( u>UMAX ){ |
kosaka | 8:b8b31e9b60c2 | 242 | _eiI -= (u-UMAX)/_Ki4i; if(_eiI<0){ _eiI=0;} |
kosaka | 8:b8b31e9b60c2 | 243 | u = UMAX; |
kosaka | 8:b8b31e9b60c2 | 244 | // _f_umax = 1; |
kosaka | 8:b8b31e9b60c2 | 245 | } else if( u<UMIN ){ |
kosaka | 8:b8b31e9b60c2 | 246 | _eiI -= (u-UMIN)/_Ki4i; if(_eiI>0){ _eiI=0;} |
kosaka | 8:b8b31e9b60c2 | 247 | u = UMIN; |
kosaka | 8:b8b31e9b60c2 | 248 | // _f_umax = 1; |
kosaka | 8:b8b31e9b60c2 | 249 | }else{ |
kosaka | 8:b8b31e9b60c2 | 250 | _f_umax = 0; |
kosaka | 8:b8b31e9b60c2 | 251 | } |
kosaka | 8:b8b31e9b60c2 | 252 | //-------- update data |
kosaka | 8:b8b31e9b60c2 | 253 | _i = y; |
kosaka | 8:b8b31e9b60c2 | 254 | _u = u; |
kosaka | 8:b8b31e9b60c2 | 255 | #else |
kosaka | 12:9747752435d1 | 256 | _u = _iref/IMAX*VMAX; // without current control. |
kosaka | 8:b8b31e9b60c2 | 257 | #endif |
kosaka | 8:b8b31e9b60c2 | 258 | |
kosaka | 8:b8b31e9b60c2 | 259 | u2Hbridge(_u); // input u to TA7291 driver |
kosaka | 0:fe068497f773 | 260 | |
kosaka | 0:fe068497f773 | 261 | //-------- update data |
kosaka | 8:b8b31e9b60c2 | 262 | _time += iTS; // time |
kosaka | 8:b8b31e9b60c2 | 263 | debug[0]=v_shunt_r; if(_f_u_plus==0){ debug[0]=-debug[0];} |
kosaka | 0:fe068497f773 | 264 | #ifdef GOOD_DATA |
kosaka | 8:b8b31e9b60c2 | 265 | if(count2==(int)(TS2/iTS)){ |
kosaka | 8:b8b31e9b60c2 | 266 | // j=0; if(_count>=j&&_count<j+1000){i=_count-j; data[i][0]=_r; data[i][1]=debug[0]; data[i][2]=_th; data[i][3]=_time; data[i][4]=_u;} |
kosaka | 2:e056793d6fc5 | 267 | if( count3<1000 ){ |
kosaka | 8:b8b31e9b60c2 | 268 | data[count3][0]=_r; data[count3][1]=debug[0]; data[count3][2]=_th; data[count3][3]=_time; data[count3][4]=_u; |
kosaka | 8:b8b31e9b60c2 | 269 | // data[count3][0]=_iref; data[count3][1]=debug[0]; data[count3][2]=_i; data[count3][3]=_time; data[count3][4]=_u; |
kosaka | 2:e056793d6fc5 | 270 | count3++; |
kosaka | 2:e056793d6fc5 | 271 | } |
kosaka | 0:fe068497f773 | 272 | count2 = 0; |
kosaka | 0:fe068497f773 | 273 | } |
kosaka | 0:fe068497f773 | 274 | count2++; |
kosaka | 0:fe068497f773 | 275 | #endif |
kosaka | 0:fe068497f773 | 276 | //-------- update data |
kosaka | 0:fe068497f773 | 277 | |
kosaka | 0:fe068497f773 | 278 | debug_p17 = 0; // for debug: processing time check |
kosaka | 0:fe068497f773 | 279 | } |
kosaka | 0:fe068497f773 | 280 | |
kosaka | 13:4116d4b6c2a5 | 281 | void init_controller(){ // initialize controller parameters and signals |
kosaka | 3:b6b9b8c7dce6 | 282 | u2Hbridge(0); // initialize H bridge to stop mode |
kosaka | 0:fe068497f773 | 283 | _count=0; |
kosaka | 0:fe068497f773 | 284 | _time = 0; // time |
kosaka | 8:b8b31e9b60c2 | 285 | _eI = _eiI = 0; // reset integrater |
kosaka | 1:b91aeb5673f3 | 286 | encoder.reset(); // set encoder counter zero |
kosaka | 8:b8b31e9b60c2 | 287 | _th = (float)encoder.getPulses()/(float)N_ENC*2.0*PI; // get angle [rad] from encoder |
kosaka | 13:4116d4b6c2a5 | 288 | #ifdef USE_PWM |
kosaka | 13:4116d4b6c2a5 | 289 | FIN.period( 1.0 / PWM_FREQ ); // PWM period [s]. Common to all PWM |
kosaka | 13:4116d4b6c2a5 | 290 | #endif |
kosaka | 13:4116d4b6c2a5 | 291 | } |
kosaka | 13:4116d4b6c2a5 | 292 | void moror_control() { // motor control ON for TMAX seconds. |
kosaka | 13:4116d4b6c2a5 | 293 | RtosTimer timer_controller(th_controller); |
kosaka | 13:4116d4b6c2a5 | 294 | FILE *fp; // save data to PC |
kosaka | 13:4116d4b6c2a5 | 295 | float t=0; |
kosaka | 13:4116d4b6c2a5 | 296 | #ifdef GOOD_DATA |
kosaka | 13:4116d4b6c2a5 | 297 | int i; |
kosaka | 13:4116d4b6c2a5 | 298 | |
kosaka | 13:4116d4b6c2a5 | 299 | count3=0; |
kosaka | 13:4116d4b6c2a5 | 300 | #endif |
kosaka | 13:4116d4b6c2a5 | 301 | init_controller(); // initialize controller parameters and signals |
kosaka | 8:b8b31e9b60c2 | 302 | _r = _r + _th; |
kosaka | 1:b91aeb5673f3 | 303 | // if( _r>2*PI ) _r -= _r-2*PI; |
kosaka | 0:fe068497f773 | 304 | |
kosaka | 0:fe068497f773 | 305 | if ( NULL == (fp = fopen( "/local/data.csv", "w" )) ){ error( "" );} // save data to PC |
kosaka | 13:4116d4b6c2a5 | 306 | |
kosaka | 13:4116d4b6c2a5 | 307 | // start control (ON) |
kosaka | 8:b8b31e9b60c2 | 308 | controller_ticker.attach(&i_controller, iTS ); // Sampling period[s] of i_controller |
kosaka | 11:0984c90b820b | 309 | timer_controller.start((unsigned int)(thTS*1000.)); // Sampling period[ms] of th controller |
kosaka | 0:fe068497f773 | 310 | |
kosaka | 0:fe068497f773 | 311 | while ( _time <= TMAX ) { |
kosaka | 0:fe068497f773 | 312 | // BUG!! Dangerous if TS2<0.1 because multi interrupt by fprintf is not prohibited! 1st aug of fprintf will be destroyed. |
kosaka | 0:fe068497f773 | 313 | // fprintf returns before process completed. |
kosaka | 0:fe068497f773 | 314 | //BUG fprintf( fp, "%8.2f, %8.4f,\t%8.1f,\t%8.2f\r\n", disp[3], disp[1], disp[0], tmp); // save data to PC (para, y, time, u) |
kosaka | 0:fe068497f773 | 315 | #ifndef GOOD_DATA |
kosaka | 11:0984c90b820b | 316 | fprintf( fp, "%f, %f, %f, %f, %f\r\n", _r, debug[0], _th, _time, _u); // save data to PC (para, y, time, u) |
kosaka | 0:fe068497f773 | 317 | #endif |
kosaka | 13:4116d4b6c2a5 | 318 | Thread::wait((unsigned int)((TS2-(_time-t))*1000.)); //[ms] |
kosaka | 13:4116d4b6c2a5 | 319 | t = _time; |
kosaka | 0:fe068497f773 | 320 | } |
kosaka | 13:4116d4b6c2a5 | 321 | // stop control (OFF) |
kosaka | 8:b8b31e9b60c2 | 322 | controller_ticker.detach(); // timer interrupt stop |
kosaka | 0:fe068497f773 | 323 | timer_controller.stop(); // rtos timer stop |
kosaka | 13:4116d4b6c2a5 | 324 | |
kosaka | 13:4116d4b6c2a5 | 325 | init_controller(); // initialize controller parameters and signals |
kosaka | 0:fe068497f773 | 326 | #ifdef GOOD_DATA |
kosaka | 0:fe068497f773 | 327 | for(i=0;i<1000;i++){ fprintf( fp, "%f, %f, %f, %f, %f\r\n", data[i][0],data[i][1],data[i][2],data[i][3],data[i][4]);} // save data to PC (para, y, time, u) |
kosaka | 0:fe068497f773 | 328 | #endif |
kosaka | 0:fe068497f773 | 329 | fclose( fp ); // release mbed USB drive |
kosaka | 0:fe068497f773 | 330 | } |
kosaka | 0:fe068497f773 | 331 | |
kosaka | 13:4116d4b6c2a5 | 332 | void thread_print2PC(void const *argument) { // print to PC (tera term) |
kosaka | 0:fe068497f773 | 333 | while (true) { |
kosaka | 11:0984c90b820b | 334 | pc.printf("%8.1f[s]\t%8.5f[V]\t%4d [deg]\t%8.2f\r\n", _time, _u, (int)(_th/(2*PI)*360.0), _r);//debug[0]*3.3/R_SHUNT); // print to tera term |
kosaka | 13:4116d4b6c2a5 | 335 | Thread::wait(1); |
kosaka | 0:fe068497f773 | 336 | } |
kosaka | 0:fe068497f773 | 337 | } |
kosaka | 0:fe068497f773 | 338 | |
kosaka | 13:4116d4b6c2a5 | 339 | int main() { |
kosaka | 13:4116d4b6c2a5 | 340 | Thread print2PC(thread_print2PC,NULL,osPriorityBelowNormal); |
kosaka | 13:4116d4b6c2a5 | 341 | // osStatus set_priority(osPriority osPriorityBelowNormal ); |
kosaka | 13:4116d4b6c2a5 | 342 | // Priority of Thread (RtosTimer has no priority?) |
kosaka | 13:4116d4b6c2a5 | 343 | // osPriorityIdle = -3, ///< priority: idle (lowest)--> then, mbed ERROR!! |
kosaka | 13:4116d4b6c2a5 | 344 | // osPriorityLow = -2, ///< priority: low |
kosaka | 13:4116d4b6c2a5 | 345 | // osPriorityBelowNormal = -1, ///< priority: below normal |
kosaka | 13:4116d4b6c2a5 | 346 | // osPriorityNormal = 0, ///< priority: normal (default) |
kosaka | 13:4116d4b6c2a5 | 347 | // osPriorityAboveNormal = +1, ///< priority: above normal |
kosaka | 13:4116d4b6c2a5 | 348 | // osPriorityHigh = +2, ///< priority: high |
kosaka | 13:4116d4b6c2a5 | 349 | // osPriorityRealtime = +3, ///< priority: realtime (highest) |
kosaka | 13:4116d4b6c2a5 | 350 | // osPriorityError = 0x84 ///< system cannot determine priority or thread has illegal priority |
kosaka | 0:fe068497f773 | 351 | #if CONTROL_MODE==0 // PID control |
kosaka | 0:fe068497f773 | 352 | char f; |
kosaka | 0:fe068497f773 | 353 | float val; |
kosaka | 0:fe068497f773 | 354 | #endif |
kosaka | 7:613febb8f028 | 355 | #if CONTROL_MODE==4 // FFT identification, u=repetive signal |
kosaka | 7:613febb8f028 | 356 | int i, j; |
kosaka | 7:613febb8f028 | 357 | float max_u; |
kosaka | 7:613febb8f028 | 358 | #endif |
kosaka | 7:613febb8f028 | 359 | |
kosaka | 0:fe068497f773 | 360 | while(true){ |
kosaka | 7:613febb8f028 | 361 | #if CONTROL_MODE==4 // FFT identification, u=repetive signal |
kosaka | 7:613febb8f028 | 362 | max_u = 0; |
kosaka | 7:613febb8f028 | 363 | for( i=0;i<1000;i++ ){ // u=data[i][4]: memory for FFT identification input signal. |
kosaka | 7:613febb8f028 | 364 | data[i][4] = sin(_freq_u*2*PI * i*TS2); // _u_freq = 10/2 * i [Hz] |
kosaka | 7:613febb8f028 | 365 | if( data[i][4]>max_u ){ max_u=data[i][4];} |
kosaka | 7:613febb8f028 | 366 | } |
kosaka | 7:613febb8f028 | 367 | for( j=1;j<50;j++ ){ |
kosaka | 7:613febb8f028 | 368 | for( i=0;i<1000;i++ ){ |
kosaka | 7:613febb8f028 | 369 | data[i][4] += sin((float)(j+1)*_freq_u*2*PI * i*TS2); |
kosaka | 7:613febb8f028 | 370 | if( data[i][4]>max_u ){ max_u=data[i][4];} |
kosaka | 7:613febb8f028 | 371 | } |
kosaka | 7:613febb8f028 | 372 | } |
kosaka | 7:613febb8f028 | 373 | for( i=0;i<1000;i++ ){ |
kosaka | 7:613febb8f028 | 374 | // data[i][4] *= UMAX/max_u; |
kosaka | 7:613febb8f028 | 375 | data[i][4] = (data[i][4]/max_u+3)/4*UMAX; |
kosaka | 7:613febb8f028 | 376 | } |
kosaka | 7:613febb8f028 | 377 | #endif |
kosaka | 13:4116d4b6c2a5 | 378 | pc.printf("Control start!!\r\n"); |
kosaka | 13:4116d4b6c2a5 | 379 | moror_control(); // motor control ON for TMAX seconds. |
kosaka | 13:4116d4b6c2a5 | 380 | pc.printf("Control completed!!\r\n\r\n"); |
kosaka | 0:fe068497f773 | 381 | |
kosaka | 13:4116d4b6c2a5 | 382 | // Change parameters using tera term |
kosaka | 0:fe068497f773 | 383 | #if CONTROL_MODE>=1 // frequency response, or Step response |
kosaka | 7:613febb8f028 | 384 | pc.printf("Input u(t) Frequency[Hz]? (if 9, reset mbed)..."); |
kosaka | 0:fe068497f773 | 385 | pc.scanf("%f",&_freq_u); |
kosaka | 0:fe068497f773 | 386 | pc.printf("%8.3f[Hz]\r\n", _freq_u); // print to tera term |
kosaka | 7:613febb8f028 | 387 | if(_freq_u==9){ mbed_reset();} |
kosaka | 0:fe068497f773 | 388 | #else // PID control |
kosaka | 1:b91aeb5673f3 | 389 | // #ifdef R_SIN |
kosaka | 1:b91aeb5673f3 | 390 | // pc.printf("Reference signal r(t) Frequency[Hz]?..."); |
kosaka | 1:b91aeb5673f3 | 391 | // pc.scanf("%f",&_freq_u); |
kosaka | 1:b91aeb5673f3 | 392 | // pc.printf("%8.3f[Hz]\r\n", _freq_u); // print to tera term |
kosaka | 1:b91aeb5673f3 | 393 | // #endif |
kosaka | 8:b8b31e9b60c2 | 394 | pc.printf("th-loop: Kp=%f, Ki=%f, Kd=%f, r=%f[deg], %f Hz\r\n",_Kp4th, _Ki4th, _Kd4th, _rmax*180./PI, _freq_u); |
kosaka | 8:b8b31e9b60c2 | 395 | pc.printf(" i-loop: Kp=%f, Ki=%f, Kd=%f\r\n",_Kp4i, _Ki4i, _Kd4i); |
kosaka | 8:b8b31e9b60c2 | 396 | pc.printf("Which number do you like to change?\r\n ... 0)no change, 1)Kp, 2)Ki, 3)Kd, 4)r(t) freq.[Hz], 5)r(t) amp.[deg].\r\n 6)iKp, 7)iKi, 8)iKd, 9)reset mbed ?"); |
kosaka | 0:fe068497f773 | 397 | f=pc.getc()-48; //int = char-48 |
kosaka | 0:fe068497f773 | 398 | pc.printf("\r\n Value?... "); |
kosaka | 11:0984c90b820b | 399 | if(f>=1&&f<=8){ pc.scanf("%f",&val);} |
kosaka | 13:4116d4b6c2a5 | 400 | pc.printf("%8.3f\r\n", val); |
kosaka | 8:b8b31e9b60c2 | 401 | if(f==1){ _Kp4th = val;} |
kosaka | 8:b8b31e9b60c2 | 402 | if(f==2){ _Ki4th = val;} |
kosaka | 8:b8b31e9b60c2 | 403 | if(f==3){ _Kd4th = val;} |
kosaka | 1:b91aeb5673f3 | 404 | if(f==4){ _freq_u = val;} |
kosaka | 1:b91aeb5673f3 | 405 | if(f==5){ _rmax = val/180.*PI;} |
kosaka | 8:b8b31e9b60c2 | 406 | if(f==6){ _Kp4i = val;} |
kosaka | 8:b8b31e9b60c2 | 407 | if(f==7){ _Ki4i = val;} |
kosaka | 8:b8b31e9b60c2 | 408 | if(f==8){ _Kd4i = val;} |
kosaka | 7:613febb8f028 | 409 | if(f==9){ mbed_reset();} |
kosaka | 8:b8b31e9b60c2 | 410 | pc.printf("th-loop: Kp=%f, Ki=%f, Kd=%f, r=%f[deg], %f Hz\r\n",_Kp4th, _Ki4th, _Kd4th, _rmax*180./PI, _freq_u); |
kosaka | 8:b8b31e9b60c2 | 411 | pc.printf(" i-loop: Kp=%f, Ki=%f, Kd=%f\r\n",_Kp4i, _Ki4i, _Kd4i); |
kosaka | 0:fe068497f773 | 412 | #endif |
kosaka | 0:fe068497f773 | 413 | } |
kosaka | 0:fe068497f773 | 414 | } |