derp

Dependencies:   FastPWM3 mbed

Committer:
bwang
Date:
Tue Apr 19 18:04:19 2016 +0000
Revision:
21:3bfff547c5e2
Parent:
16:46703e957b30
on the butt last night

Who changed what in which revision?

UserRevisionLine numberNew contents of line
bwang 0:bac9c3a3a6ca 1 #include "mbed.h"
bwang 0:bac9c3a3a6ca 2 #include "math.h"
bwang 0:bac9c3a3a6ca 3 #include "PositionSensor.h"
bwang 0:bac9c3a3a6ca 4 #include "FastPWM.h"
bwang 8:314074b56470 5
bwang 8:314074b56470 6 #define PWMA PA_8
bwang 8:314074b56470 7 #define PWMB PA_9
bwang 8:314074b56470 8 #define PWMC PA_10
bwang 8:314074b56470 9 #define EN PB_15
bwang 8:314074b56470 10
bwang 8:314074b56470 11 #define IA PA_4
bwang 8:314074b56470 12 #define IB PB_0
bwang 8:314074b56470 13
bwang 8:314074b56470 14 #define PI 3.141593f
bwang 8:314074b56470 15 #define CPR 4096
bwang 8:314074b56470 16 #define POS_OFFSET 4.5f
bwang 8:314074b56470 17
bwang 8:314074b56470 18 #define I_SCALE_RAW 25.0f //mv/A
bwang 8:314074b56470 19 #define R_UP 12000.0f //ohms
bwang 8:314074b56470 20 #define R_DOWN 3600.0f //ohms
bwang 8:314074b56470 21 #define R_BIAS 3600.0f //ohms
bwang 8:314074b56470 22 #define AVDD 3300.0f //mV
bwang 8:314074b56470 23
bwang 8:314074b56470 24 #define I_OFFSET (AVDD * R_DOWN * R_UP / (R_DOWN * R_UP + R_BIAS * (R_DOWN + R_UP)))
bwang 8:314074b56470 25 #define I_SCALE (R_BIAS * R_DOWN * I_SCALE_RAW / (R_DOWN * R_UP + R_BIAS * (R_DOWN + R_UP)))
bwang 8:314074b56470 26
bwang 8:314074b56470 27 #define K_LOOP 0.02
bwang 10:7624146c5945 28 #define KI_BASE 0.008
bwang 15:8eb1dfbf0d41 29 #define BUS_VOLTAGE 200.0
bwang 8:314074b56470 30
bwang 8:314074b56470 31 #define KP (K_LOOP / BUS_VOLTAGE)
bwang 8:314074b56470 32 #define KI (KI_BASE * K_LOOP / BUS_VOLTAGE)
bwang 8:314074b56470 33
bwang 8:314074b56470 34 #define INTEGRAL_MAX 1.0f
bwang 0:bac9c3a3a6ca 35
bwang 15:8eb1dfbf0d41 36 #define Q_REF_MAX (-100.0)
bwang 10:7624146c5945 37
bwang 1:7b61790f6be9 38 FastPWM *a;
bwang 1:7b61790f6be9 39 FastPWM *b;
bwang 1:7b61790f6be9 40 FastPWM *c;
bwang 0:bac9c3a3a6ca 41 DigitalOut en(EN);
bwang 0:bac9c3a3a6ca 42
bwang 15:8eb1dfbf0d41 43 DigitalIn throttle_in(PB_8);
bwang 0:bac9c3a3a6ca 44 PositionSensorEncoder pos(CPR, 0);
bwang 16:46703e957b30 45 Serial pc(USBTX, USBRX);
bwang 0:bac9c3a3a6ca 46
bwang 1:7b61790f6be9 47 int adval1, adval2;
bwang 8:314074b56470 48 float ia, ib, ic, alpha, beta, q;
bwang 10:7624146c5945 49 double vq = 0.0, q_integral = 0.0, last_q = 0.0;
bwang 10:7624146c5945 50
bwang 16:46703e957b30 51 float throttle_scaler = 0.0f;
bwang 16:46703e957b30 52
bwang 16:46703e957b30 53 int state = 0;
bwang 8:314074b56470 54
bwang 1:7b61790f6be9 55 extern "C" void TIM1_UP_TIM10_IRQHandler(void) {
bwang 8:314074b56470 56 if (TIM1->SR & TIM_SR_UIF) {
bwang 8:314074b56470 57 float p = pos.GetElecPosition() - POS_OFFSET;
bwang 8:314074b56470 58 if (p < 0) p += 2 * PI;
bwang 8:314074b56470 59
bwang 8:314074b56470 60 //float pos_dac = 0.85f * p / (2 * PI) + 0.05f;
bwang 8:314074b56470 61 //DAC->DHR12R2 = (unsigned int) (pos_dac * 4096);
bwang 8:314074b56470 62
bwang 8:314074b56470 63 float sin_p = sinf(p);
bwang 8:314074b56470 64 float cos_p = cosf(p);
bwang 8:314074b56470 65
bwang 4:a6669248ce4d 66 ADC1->CR2 |= 0x40000000;
bwang 4:a6669248ce4d 67 volatile int delay;
bwang 4:a6669248ce4d 68 for (delay = 0; delay < 35; delay++);
bwang 1:7b61790f6be9 69 adval1 = ADC1->DR;
bwang 1:7b61790f6be9 70 adval2 = ADC2->DR;
bwang 8:314074b56470 71
bwang 8:314074b56470 72 ia = ((float) adval1 / 4096.0f * AVDD - I_OFFSET) / I_SCALE;
bwang 8:314074b56470 73 ib = ((float) adval2 / 4096.0f * AVDD - I_OFFSET) / I_SCALE;
bwang 8:314074b56470 74 ic = -ia - ib;
bwang 8:314074b56470 75
bwang 8:314074b56470 76 float u = ib;
bwang 8:314074b56470 77 float v = ic;
bwang 8:314074b56470 78
bwang 8:314074b56470 79 alpha = u;
bwang 8:314074b56470 80 beta = 1 / sqrtf(3.0f) * u + 2 / sqrtf(3.0f) * v;
bwang 8:314074b56470 81
bwang 8:314074b56470 82 q = -alpha * sin_p - beta * cos_p;
bwang 15:8eb1dfbf0d41 83
bwang 15:8eb1dfbf0d41 84 if (throttle_in.read() == 0) {
bwang 16:46703e957b30 85 state = 0;
bwang 15:8eb1dfbf0d41 86 throttle_scaler = 0.0f;
bwang 15:8eb1dfbf0d41 87 en = 0;
bwang 15:8eb1dfbf0d41 88 } else {
bwang 16:46703e957b30 89 state = 1;
bwang 15:8eb1dfbf0d41 90 throttle_scaler = 1.0f;
bwang 15:8eb1dfbf0d41 91 en = 1;
bwang 15:8eb1dfbf0d41 92 }
bwang 8:314074b56470 93
bwang 10:7624146c5945 94 double q_err = Q_REF_MAX * (double) throttle_scaler - q;
bwang 15:8eb1dfbf0d41 95
bwang 10:7624146c5945 96 //DAC->DHR12R2 = (unsigned int) (q_err * 20 + 2048);
bwang 8:314074b56470 97
bwang 8:314074b56470 98 q_integral += q_err * KI;
bwang 8:314074b56470 99 if (q_integral > INTEGRAL_MAX) q_integral = INTEGRAL_MAX;
bwang 8:314074b56470 100 if (q_integral < -INTEGRAL_MAX) q_integral = -INTEGRAL_MAX;
bwang 8:314074b56470 101
bwang 8:314074b56470 102 vq = KP * q_err + q_integral;
bwang 8:314074b56470 103 if (vq < -1.0f) vq = -1.0f;
bwang 8:314074b56470 104 if (vq > 1.0f) vq = 1.0f;
bwang 15:8eb1dfbf0d41 105
bwang 9:4812c9e932ea 106 //DAC->DHR12R2 = (unsigned int) (vq * 2000 + 2048);
bwang 15:8eb1dfbf0d41 107
bwang 8:314074b56470 108 *a = 0.5f + 0.5f * vq * sinf(p);
bwang 8:314074b56470 109 *b = 0.5f + 0.5f * vq * sinf(p + 2 * PI / 3);
bwang 8:314074b56470 110 *c = 0.5f + 0.5f * vq * sinf(p - 2 * PI / 3);
bwang 1:7b61790f6be9 111 }
bwang 1:7b61790f6be9 112 TIM1->SR = 0x00;
bwang 1:7b61790f6be9 113 }
bwang 10:7624146c5945 114
bwang 8:314074b56470 115 int main() {
bwang 1:7b61790f6be9 116 //Enable clocks for GPIOs
bwang 1:7b61790f6be9 117 RCC->AHB1ENR |= RCC_AHB1ENR_GPIOAEN;
bwang 1:7b61790f6be9 118 RCC->AHB1ENR |= RCC_AHB1ENR_GPIOBEN;
bwang 1:7b61790f6be9 119 RCC->AHB1ENR |= RCC_AHB1ENR_GPIOCEN;
bwang 1:7b61790f6be9 120
bwang 1:7b61790f6be9 121 RCC->APB2ENR |= RCC_APB2ENR_TIM1EN; //enable TIM1 clock
bwang 1:7b61790f6be9 122
bwang 1:7b61790f6be9 123 a = new FastPWM(PWMA);
bwang 1:7b61790f6be9 124 b = new FastPWM(PWMB);
bwang 1:7b61790f6be9 125 c = new FastPWM(PWMC);
bwang 1:7b61790f6be9 126
bwang 1:7b61790f6be9 127 NVIC_EnableIRQ(TIM1_UP_TIM10_IRQn); //Enable TIM1 IRQ
bwang 1:7b61790f6be9 128
bwang 1:7b61790f6be9 129 TIM1->DIER |= TIM_DIER_UIE; //enable update interrupt
bwang 8:314074b56470 130 //TIM1->CR1 = 0x40; //CMS = 10, interrupt only when counting up
bwang 1:7b61790f6be9 131 TIM1->CR1 |= TIM_CR1_ARPE; //autoreload on,
bwang 1:7b61790f6be9 132 TIM1->RCR |= 0x01; //update event once per up/down count of tim1
bwang 1:7b61790f6be9 133 TIM1->EGR |= TIM_EGR_UG;
bwang 1:7b61790f6be9 134
bwang 1:7b61790f6be9 135 TIM1->PSC = 0x00; //no prescaler, timer counts up in sync with the peripheral clock
bwang 8:314074b56470 136 TIM1->ARR = 0x2EE0;
bwang 8:314074b56470 137 //TIM1->ARR = 0x1770; //15 Khz
bwang 1:7b61790f6be9 138 TIM1->CCER |= ~(TIM_CCER_CC1NP); //Interupt when low side is on.
bwang 1:7b61790f6be9 139 TIM1->CR1 |= TIM_CR1_CEN;
bwang 1:7b61790f6be9 140
bwang 10:7624146c5945 141 TIM5->CR1 |= TIM_CR1_ARPE;
bwang 10:7624146c5945 142 TIM5->EGR |= TIM_EGR_UG;
bwang 10:7624146c5945 143 TIM5->PSC = 0x00;
bwang 10:7624146c5945 144 TIM5->ARR = 0xFFFFFFFF;
bwang 10:7624146c5945 145 TIM5->CR1 |= TIM_CR1_CEN;
bwang 10:7624146c5945 146
bwang 1:7b61790f6be9 147 //ADC Setup
bwang 1:7b61790f6be9 148 RCC->APB2ENR |= RCC_APB2ENR_ADC1EN; // clock for ADC1
bwang 1:7b61790f6be9 149 RCC->APB2ENR |= RCC_APB2ENR_ADC2EN; // clock for ADC2
bwang 1:7b61790f6be9 150
bwang 1:7b61790f6be9 151 ADC->CCR = 0x00000006; //Regular simultaneous mode, 3 channels
bwang 1:7b61790f6be9 152
bwang 1:7b61790f6be9 153 ADC1->CR2 |= ADC_CR2_ADON; //ADC1 on
bwang 1:7b61790f6be9 154 ADC1->SQR3 = 0x0000004; //PA_4 as ADC1, sequence 0
bwang 0:bac9c3a3a6ca 155
bwang 1:7b61790f6be9 156 ADC2->CR2 |= ADC_CR2_ADON; //ADC2 ON
bwang 1:7b61790f6be9 157 ADC2->SQR3 = 0x00000008; //PB_0 as ADC2, sequence 1
bwang 1:7b61790f6be9 158
bwang 1:7b61790f6be9 159 GPIOA->MODER |= (1 << 8);
bwang 1:7b61790f6be9 160 GPIOA->MODER |= (1 << 9);
bwang 1:7b61790f6be9 161
bwang 1:7b61790f6be9 162 GPIOA->MODER |= (1 << 2);
bwang 1:7b61790f6be9 163 GPIOA->MODER |= (1 << 3);
bwang 1:7b61790f6be9 164
bwang 1:7b61790f6be9 165 GPIOA->MODER |= (1 << 0);
bwang 1:7b61790f6be9 166 GPIOA->MODER |= (1 << 1);
bwang 1:7b61790f6be9 167
bwang 1:7b61790f6be9 168 GPIOB->MODER |= (1 << 0);
bwang 1:7b61790f6be9 169 GPIOB->MODER |= (1 << 1);
bwang 1:7b61790f6be9 170
bwang 1:7b61790f6be9 171 GPIOC->MODER |= (1 << 2);
bwang 1:7b61790f6be9 172 GPIOC->MODER |= (1 << 3);
bwang 1:7b61790f6be9 173
bwang 1:7b61790f6be9 174 //DAC setup
bwang 1:7b61790f6be9 175 RCC->APB1ENR |= 0x20000000;
bwang 1:7b61790f6be9 176 DAC->CR |= DAC_CR_EN2;
bwang 1:7b61790f6be9 177
bwang 1:7b61790f6be9 178 GPIOA->MODER |= (1 << 10);
bwang 1:7b61790f6be9 179 GPIOA->MODER |= (1 << 11);
bwang 1:7b61790f6be9 180
bwang 8:314074b56470 181 *a = 0.0f;
bwang 8:314074b56470 182 *b = 0.0f;
bwang 8:314074b56470 183 *c = 0.0f;
bwang 2:eabe8feaaabb 184
bwang 8:314074b56470 185 en = 1;
bwang 0:bac9c3a3a6ca 186
bwang 15:8eb1dfbf0d41 187 throttle_in.mode(PullUp);
bwang 10:7624146c5945 188
bwang 16:46703e957b30 189 pc.baud(115200);
bwang 16:46703e957b30 190
bwang 16:46703e957b30 191 pc.printf("%s\n\r", "THE DENTIST controller Rev. A");
bwang 16:46703e957b30 192
bwang 0:bac9c3a3a6ca 193 for (;;) {
bwang 21:3bfff547c5e2 194 // pc.printf("%d %f\n\r", state, throttle_scaler);
bwang 21:3bfff547c5e2 195 // wait_ms(100);
bwang 0:bac9c3a3a6ca 196 }
bwang 0:bac9c3a3a6ca 197 }