Paclay-Saris pod racers / Mbed 2 deprecated Algo_charges_fictives_4

Dependencies:   mbed

Committer:
Mecaru
Date:
Thu Jun 06 15:40:53 2019 +0000
Revision:
17:4a65cce4ac4f
Parent:
15:f8c5007343f9
Child:
18:daba0b3777c0
avec bluetooth (marche pas)

Who changed what in which revision?

UserRevisionLine numberNew contents of line
SolalNathan 0:5d6051eeabfe 1 #include "mbed.h"
SolalNathan 2:b2ce001ff8f5 2 #include <math.h>
SolalNathan 2:b2ce001ff8f5 3
SolalNathan 2:b2ce001ff8f5 4 // Définition des ports séries
Mecaru 13:bed77b03701d 5 //Serial pc(USBTX, USBRX, 115200);
Mecaru 13:bed77b03701d 6 Serial pc(PC_10, PC_11, 115200);
SolalNathan 2:b2ce001ff8f5 7 Serial lidar(PC_6, PC_7, 115200);
SolalNathan 2:b2ce001ff8f5 8
SolalNathan 2:b2ce001ff8f5 9 // Définition des variables globales
Mecaru 12:594a1b936f4b 10 float tableau_distance0[360] = {};
Mecaru 12:594a1b936f4b 11 float tableau_distance1[360] = {};
Mecaru 12:594a1b936f4b 12 uint8_t tableau_en_cours = 0; //tableau en cours de remplissage
Mecaru 12:594a1b936f4b 13 uint8_t flag_fin_tour_lidar=0;
SolalNathan 2:b2ce001ff8f5 14 int compteur_tours_lidar = 0;
Mecaru 6:83dafe088914 15 int affiche_lidar = 0;
Mecaru 11:e227edfced99 16 bool run = false;
Mecaru 17:4a65cce4ac4f 17 bool stop = true;
SolalNathan 2:b2ce001ff8f5 18
SolalNathan 2:b2ce001ff8f5 19 // Défintion des pwm
SolalNathan 2:b2ce001ff8f5 20 PwmOut pwm_lidar(PB_15); // pwm du Lidar
SolalNathan 2:b2ce001ff8f5 21 PwmOut pwm_moteur(PE_6); // pwm de la propulsion
SolalNathan 2:b2ce001ff8f5 22 PwmOut pwm_direction(PE_5); // pwm de la direction
SolalNathan 2:b2ce001ff8f5 23
SolalNathan 2:b2ce001ff8f5 24 void interrupt_lidar_rx(void);
SolalNathan 0:5d6051eeabfe 25
Mecaru 4:60e7e1c1d1d8 26
SolalNathan 2:b2ce001ff8f5 27 float distance(float x_1, float x_2, float y_1, float y_2)
SolalNathan 2:b2ce001ff8f5 28 {
SolalNathan 2:b2ce001ff8f5 29 // Fonction qui renvoie la distance entre deux points (norme 2)
Mecaru 12:594a1b936f4b 30 float norm2;
SolalNathan 2:b2ce001ff8f5 31 norm2 = sqrt((x_1 - x_2)*(x_1 - x_2) + (y_1 - y_2)*(y_1 - y_2));
SolalNathan 2:b2ce001ff8f5 32 return norm2;
SolalNathan 2:b2ce001ff8f5 33 }
Mecaru 12:594a1b936f4b 34
Mecaru 12:594a1b936f4b 35 void update_direction(float* list_lidar_var, float* vecteur)
SolalNathan 2:b2ce001ff8f5 36 {
Mecaru 14:e1e393537fb6 37 pc.printf("Update commence\n\r");
SolalNathan 2:b2ce001ff8f5 38 // Fonction de mise à jour de la direction
SolalNathan 2:b2ce001ff8f5 39 float direction[2];
Mecaru 12:594a1b936f4b 40 int i;
Mecaru 12:594a1b936f4b 41 float list_lidar[360];
Mecaru 12:594a1b936f4b 42 uint8_t liste_fictifs[360];
Mecaru 12:594a1b936f4b 43 for(i=0; i<360; i++) list_lidar[i]=list_lidar_var[i];
Mecaru 12:594a1b936f4b 44
Mecaru 13:bed77b03701d 45 //pour les essais
Mecaru 13:bed77b03701d 46 //for(i=0; i<360; i++)
Mecaru 13:bed77b03701d 47 // list_lidar[i]=00;
Mecaru 13:bed77b03701d 48
Mecaru 13:bed77b03701d 49 //list_lidar[0]=100;
Mecaru 13:bed77b03701d 50 //list_lidar[90]=20.0;
Mecaru 13:bed77b03701d 51 //list_lidar[270]=100.0;
Mecaru 13:bed77b03701d 52 //list_lidar[45]=20.0;
Mecaru 13:bed77b03701d 53 //list_lidar[315]=100;
Mecaru 13:bed77b03701d 54 ///////////////////
Mecaru 13:bed77b03701d 55
Mecaru 12:594a1b936f4b 56
Mecaru 12:594a1b936f4b 57 direction[0] = 1;
Mecaru 12:594a1b936f4b 58 direction[1] = 0;
SolalNathan 2:b2ce001ff8f5 59 float avg_x, avg_y, sum_inv_dist;
Mecaru 9:a15fc52284ff 60 //list_lidar[180] = 50; // [mm], point fictif qui pousse la voiture
Mecaru 10:c8d93dc5993c 61 //Définition des points fictifs poussant la voiture
Mecaru 12:594a1b936f4b 62
Mecaru 12:594a1b936f4b 63 for (i=0; i<360; i++) {
Mecaru 9:a15fc52284ff 64 liste_fictifs[i] = 0;
Mecaru 12:594a1b936f4b 65 }
Mecaru 17:4a65cce4ac4f 66 for (i=90; i<=270; i++) {
Mecaru 17:4a65cce4ac4f 67 //for (int i=0; i<180; i++){ //test
Mecaru 17:4a65cce4ac4f 68 liste_fictifs[i] = 1;
Mecaru 17:4a65cce4ac4f 69 }
Mecaru 15:f8c5007343f9 70 //liste_fictifs[180] = 1;
Mecaru 11:e227edfced99 71
SolalNathan 2:b2ce001ff8f5 72 avg_x = 0;
SolalNathan 2:b2ce001ff8f5 73 avg_y = 0;
Mecaru 12:594a1b936f4b 74
SolalNathan 2:b2ce001ff8f5 75 // Calcul de la direction à prende en fonction des charges fictives
Mecaru 12:594a1b936f4b 76 for (i=0; i<360; i++) {
SolalNathan 2:b2ce001ff8f5 77 int theta;
SolalNathan 2:b2ce001ff8f5 78 float r, x, y;
SolalNathan 2:b2ce001ff8f5 79 theta = i;
Mecaru 12:594a1b936f4b 80 if (liste_fictifs[theta] == 1) {
Mecaru 15:f8c5007343f9 81 r = 500;
Mecaru 12:594a1b936f4b 82 } else {
Mecaru 10:c8d93dc5993c 83 //r = 0; //test
Mecaru 12:594a1b936f4b 84 if(theta != 0) r = list_lidar[360-theta];
Mecaru 12:594a1b936f4b 85 else r = list_lidar[0];
Mecaru 12:594a1b936f4b 86
Mecaru 17:4a65cce4ac4f 87 }
Mecaru 12:594a1b936f4b 88
Mecaru 12:594a1b936f4b 89 if (r != 0) {
Mecaru 12:594a1b936f4b 90
Mecaru 12:594a1b936f4b 91 //x = 0;
Mecaru 12:594a1b936f4b 92 //y = 0;
Mecaru 12:594a1b936f4b 93 x = r*cosf((float)theta*3.14/180);
Mecaru 12:594a1b936f4b 94 y = r*sinf((float)theta*3.14/180);
Mecaru 12:594a1b936f4b 95 //sum_inv_dist += 1/pow(r, 2);
Mecaru 12:594a1b936f4b 96 //avg_x -= x/pow(r,2);
Mecaru 12:594a1b936f4b 97 //avg_y -= y/pow(r,2);
Mecaru 15:f8c5007343f9 98 float puissance = 0.5*cosf(2*theta*3.14/180) + 1.5;
Mecaru 12:594a1b936f4b 99 avg_x = avg_x - x/pow(r,puissance);
Mecaru 12:594a1b936f4b 100 avg_y = avg_y - y/pow(r,puissance);
Mecaru 12:594a1b936f4b 101
Mecaru 12:594a1b936f4b 102 //pc.printf("Angle:%i r:%4.2f x:%4.2f y:%4.2f %4.2f %4.2f\n\r", theta, r, x,y, avg_x,avg_y);
SolalNathan 2:b2ce001ff8f5 103 }
Mecaru 12:594a1b936f4b 104 }
Mecaru 12:594a1b936f4b 105
Mecaru 8:2ce9493549e8 106 //avg_x /= sum_inv_dist;
Mecaru 8:2ce9493549e8 107 //avg_y /= sum_inv_dist;
SolalNathan 2:b2ce001ff8f5 108 direction[0] = avg_x;
SolalNathan 2:b2ce001ff8f5 109 direction[1] = avg_y;
Mecaru 15:f8c5007343f9 110 pc.printf("Update termine\n\r");
SolalNathan 2:b2ce001ff8f5 111 // mise à jour de la direction
SolalNathan 2:b2ce001ff8f5 112 for(i=0; i<2; i++)
SolalNathan 2:b2ce001ff8f5 113 vecteur[i] = direction[i];
Mecaru 11:e227edfced99 114
SolalNathan 2:b2ce001ff8f5 115 }
Mecaru 12:594a1b936f4b 116
SolalNathan 2:b2ce001ff8f5 117 float angle_servo(float *direction)
SolalNathan 2:b2ce001ff8f5 118 {
SolalNathan 2:b2ce001ff8f5 119 // Calcul basé sur la régression expérimental pour obetenir l'angle
SolalNathan 2:b2ce001ff8f5 120 // le pwm à donner au moteur en fonction de l'angle voulue
Mecaru 12:594a1b936f4b 121
SolalNathan 2:b2ce001ff8f5 122 float angle;
SolalNathan 2:b2ce001ff8f5 123 double pwm;
SolalNathan 2:b2ce001ff8f5 124 float x, y;
SolalNathan 2:b2ce001ff8f5 125 x = direction[0];
SolalNathan 2:b2ce001ff8f5 126 y = direction[1];
Mecaru 15:f8c5007343f9 127 //x = 1;
Mecaru 15:f8c5007343f9 128 //y = 1;
Mecaru 15:f8c5007343f9 129 angle = atan2(y,x);
Mecaru 15:f8c5007343f9 130 angle = angle*180/3.14;
Mecaru 15:f8c5007343f9 131 pc.printf("Angle : %f\n\r",angle);
Mecaru 15:f8c5007343f9 132 //pwm = 14.662756 * angle + 1453.08; // à refaire
Mecaru 15:f8c5007343f9 133 pwm = -13.30 * angle + 1376.75;
Mecaru 12:594a1b936f4b 134
Mecaru 6:83dafe088914 135 //if (pwm < 1115) printf("trop petit\n\r");
Mecaru 6:83dafe088914 136 //if (pwm > 1625) printf("trop grand\n\r");
Mecaru 9:a15fc52284ff 137 //if (angle > 5*3.14/180){
Mecaru 9:a15fc52284ff 138 // pwm = 1745;
Mecaru 9:a15fc52284ff 139 //}
Mecaru 9:a15fc52284ff 140 //else{
Mecaru 9:a15fc52284ff 141 // if (angle < -5*3.14/180){
Mecaru 9:a15fc52284ff 142 // pwm = 1080;
Mecaru 9:a15fc52284ff 143 // }
Mecaru 9:a15fc52284ff 144 // else{
Mecaru 9:a15fc52284ff 145 // pwm = 1453;
Mecaru 9:a15fc52284ff 146 // }
Mecaru 9:a15fc52284ff 147 //}
Mecaru 12:594a1b936f4b 148
SolalNathan 2:b2ce001ff8f5 149 return pwm;
SolalNathan 2:b2ce001ff8f5 150 }
SolalNathan 0:5d6051eeabfe 151
Mecaru 12:594a1b936f4b 152 void afficher_lidar(float *tableau_distances_var)
Mecaru 4:60e7e1c1d1d8 153 {
Mecaru 4:60e7e1c1d1d8 154 //Affiche les données du lidar dans la liaison série
Mecaru 4:60e7e1c1d1d8 155 int angle;
Mecaru 12:594a1b936f4b 156 float tableau_distances[360];
Mecaru 12:594a1b936f4b 157 for(angle=0; angle<360; angle++) tableau_distances[angle]=tableau_distances_var[angle];
Mecaru 12:594a1b936f4b 158
Mecaru 12:594a1b936f4b 159 for(angle=0; angle<360; angle++) {
Mecaru 7:dc7e66870bd0 160 float distance = tableau_distances[angle];
Mecaru 7:dc7e66870bd0 161 pc.printf("%i,%f\n\r",angle,distance);
Mecaru 12:594a1b936f4b 162 }
Mecaru 4:60e7e1c1d1d8 163 }
Mecaru 4:60e7e1c1d1d8 164
Mecaru 12:594a1b936f4b 165 int main()
Mecaru 12:594a1b936f4b 166 {
Mecaru 12:594a1b936f4b 167
SolalNathan 2:b2ce001ff8f5 168 pc.printf("\r-------------------------\n\r");
Mecaru 12:594a1b936f4b 169
SolalNathan 2:b2ce001ff8f5 170 float dir[2]; // direction
SolalNathan 2:b2ce001ff8f5 171 float pwm_direction_value;
Mecaru 12:594a1b936f4b 172
Mecaru 12:594a1b936f4b 173
SolalNathan 2:b2ce001ff8f5 174 int i;
Mecaru 12:594a1b936f4b 175
Mecaru 7:dc7e66870bd0 176
Mecaru 7:dc7e66870bd0 177
Mecaru 7:dc7e66870bd0 178
Mecaru 7:dc7e66870bd0 179
SolalNathan 2:b2ce001ff8f5 180 // pwm du LIDAR
SolalNathan 2:b2ce001ff8f5 181 pwm_lidar.period_us(40);
Mecaru 5:32434b497a9b 182 pwm_lidar.pulsewidth_us(40); // vitesse fixe
Mecaru 12:594a1b936f4b 183
Mecaru 11:e227edfced99 184 //pwm moteur
SolalNathan 0:5d6051eeabfe 185 pwm_moteur.period_ms(20);
SolalNathan 2:b2ce001ff8f5 186
SolalNathan 2:b2ce001ff8f5 187 // pwm de la direction
SolalNathan 2:b2ce001ff8f5 188 pwm_direction.period_ms(20);
Mecaru 6:83dafe088914 189 pwm_direction.pulsewidth_us(1480); // correspond à un vitesse faible
SolalNathan 2:b2ce001ff8f5 190
SolalNathan 2:b2ce001ff8f5 191 // récupération du premier batch de données (7 bytes) du LIDAR
SolalNathan 2:b2ce001ff8f5 192 lidar.putc(0xA5);
SolalNathan 2:b2ce001ff8f5 193 lidar.putc(0x20);
Mecaru 12:594a1b936f4b 194 for(i=0; i<7; i++)
SolalNathan 2:b2ce001ff8f5 195 lidar.getc();
SolalNathan 2:b2ce001ff8f5 196
SolalNathan 2:b2ce001ff8f5 197 pc.printf("FIN intit \n\r");
SolalNathan 2:b2ce001ff8f5 198
Mecaru 12:594a1b936f4b 199 lidar.attach(&interrupt_lidar_rx, Serial::RxIrq);
Mecaru 12:594a1b936f4b 200
Mecaru 12:594a1b936f4b 201 while (1) {
Mecaru 12:594a1b936f4b 202 //printf("pwm_moteur = %f, pwm_direction = %f", pwm_moteur, pwm_direction);
Mecaru 12:594a1b936f4b 203
Mecaru 12:594a1b936f4b 204 if(pc.readable()) {
Mecaru 12:594a1b936f4b 205 char entree = pc.getc();
Mecaru 12:594a1b936f4b 206 pc.printf("%c \n\r",entree);
Mecaru 12:594a1b936f4b 207 if (entree == 'a') {
Mecaru 12:594a1b936f4b 208 run = true;
Mecaru 17:4a65cce4ac4f 209 stop = false;
Mecaru 12:594a1b936f4b 210 }
Mecaru 12:594a1b936f4b 211 if (entree == 'z') {
Mecaru 12:594a1b936f4b 212 run = false;
Mecaru 12:594a1b936f4b 213 }
Mecaru 11:e227edfced99 214 }
Mecaru 12:594a1b936f4b 215
Mecaru 12:594a1b936f4b 216
Mecaru 13:bed77b03701d 217 if(0) {
Mecaru 12:594a1b936f4b 218 if(tableau_en_cours == 0)
Mecaru 12:594a1b936f4b 219 afficher_lidar(tableau_distance1);
Mecaru 12:594a1b936f4b 220 else afficher_lidar(tableau_distance0);
Mecaru 12:594a1b936f4b 221
Mecaru 12:594a1b936f4b 222 affiche_lidar = 0;
Mecaru 11:e227edfced99 223 }
Mecaru 12:594a1b936f4b 224
Mecaru 12:594a1b936f4b 225 if(flag_fin_tour_lidar==1) {
Mecaru 12:594a1b936f4b 226 flag_fin_tour_lidar=0;
Mecaru 12:594a1b936f4b 227 if(tableau_en_cours == 0)
Mecaru 12:594a1b936f4b 228 update_direction(tableau_distance1, dir); // mise à jour à la direction
Mecaru 12:594a1b936f4b 229 else update_direction(tableau_distance0, dir); // mise à jour à la direction
Mecaru 12:594a1b936f4b 230 pc.printf("direction,%f,%f\n\r",dir[0],dir[1]);
Mecaru 12:594a1b936f4b 231 pwm_direction_value = angle_servo(dir); // calcul du pwm
Mecaru 12:594a1b936f4b 232 }
Mecaru 12:594a1b936f4b 233
Mecaru 17:4a65cce4ac4f 234 if (run==true) {
Mecaru 12:594a1b936f4b 235 // vitesse constante
Mecaru 17:4a65cce4ac4f 236 if (stop==false) {
Mecaru 17:4a65cce4ac4f 237 pwm_moteur.pulsewidth_us(1440);
Mecaru 17:4a65cce4ac4f 238 stop=true;
Mecaru 17:4a65cce4ac4f 239 }
Mecaru 12:594a1b936f4b 240 pwm_direction.pulsewidth_us(pwm_direction_value); // commande du pwm du moteur
Mecaru 12:594a1b936f4b 241 } else {
Mecaru 17:4a65cce4ac4f 242 stop=false;
Mecaru 12:594a1b936f4b 243 pwm_moteur.pulsewidth_us(1480);
Mecaru 12:594a1b936f4b 244 }
Mecaru 12:594a1b936f4b 245
Mecaru 11:e227edfced99 246 }
Mecaru 11:e227edfced99 247 }
SolalNathan 2:b2ce001ff8f5 248
SolalNathan 2:b2ce001ff8f5 249 void interrupt_lidar_rx(void)
Mecaru 12:594a1b936f4b 250 {
SolalNathan 2:b2ce001ff8f5 251
Mecaru 5:32434b497a9b 252 int SEUIL = 0; // Seuil de qualité
Mecaru 12:594a1b936f4b 253
SolalNathan 2:b2ce001ff8f5 254 static uint8_t data[5],i=0;
SolalNathan 2:b2ce001ff8f5 255 uint16_t Quality;
SolalNathan 2:b2ce001ff8f5 256 uint16_t Angle;
SolalNathan 2:b2ce001ff8f5 257 uint16_t Distance;
SolalNathan 2:b2ce001ff8f5 258 uint16_t Angle_d;
Mecaru 12:594a1b936f4b 259 static uint16_t Angle_d_old=0;
SolalNathan 2:b2ce001ff8f5 260 uint16_t Distance_d;
Mecaru 6:83dafe088914 261 affiche_lidar ++;
SolalNathan 2:b2ce001ff8f5 262 data[i] = lidar.getc();
SolalNathan 2:b2ce001ff8f5 263 i++;
Mecaru 12:594a1b936f4b 264 if(i==5) {
SolalNathan 2:b2ce001ff8f5 265 i=0;
SolalNathan 2:b2ce001ff8f5 266 Quality = data[0] & 0xFC;
SolalNathan 2:b2ce001ff8f5 267 Quality = Quality >> 2;
Mecaru 12:594a1b936f4b 268
SolalNathan 2:b2ce001ff8f5 269 Angle = data[1] & 0xFE;
SolalNathan 2:b2ce001ff8f5 270 Angle = (Angle>>1) | ((uint16_t)data[2] << 7);
Mecaru 12:594a1b936f4b 271
SolalNathan 2:b2ce001ff8f5 272 Distance = data[3];
SolalNathan 2:b2ce001ff8f5 273 Distance = Distance | ((uint16_t)data[4] << 8);
Mecaru 12:594a1b936f4b 274
SolalNathan 2:b2ce001ff8f5 275 Angle_d = Angle/64; // in degree
SolalNathan 2:b2ce001ff8f5 276 Distance_d = Distance>>2; // in mm
SolalNathan 2:b2ce001ff8f5 277
Mecaru 12:594a1b936f4b 278 // On vérifie que l'on écrit pas en dehors du tableau
Mecaru 8:2ce9493549e8 279 //Angle_d = 360 - Angle_d;
SolalNathan 2:b2ce001ff8f5 280 if(Angle_d>359) Angle_d=359;
Mecaru 12:594a1b936f4b 281
Mecaru 12:594a1b936f4b 282 if(Angle < (Angle_d_old - 180)) {
Mecaru 12:594a1b936f4b 283 tableau_en_cours=1-tableau_en_cours;
Mecaru 12:594a1b936f4b 284 flag_fin_tour_lidar=1;
Mecaru 12:594a1b936f4b 285 }
Mecaru 12:594a1b936f4b 286
SolalNathan 2:b2ce001ff8f5 287 if (Quality < SEUIL) {
SolalNathan 2:b2ce001ff8f5 288 // Fiabilisation des données du LIDAR naïve
Mecaru 12:594a1b936f4b 289 if(tableau_en_cours==0)
Mecaru 12:594a1b936f4b 290 tableau_distance0[Angle_d] = tableau_distance0[Angle_d_old];
Mecaru 12:594a1b936f4b 291 else tableau_distance1[Angle_d] = tableau_distance1[Angle_d_old];
Mecaru 12:594a1b936f4b 292 } else if(tableau_en_cours==0)
Mecaru 12:594a1b936f4b 293 tableau_distance0[Angle_d] = Distance_d;
Mecaru 12:594a1b936f4b 294 else tableau_distance1[Angle_d] = Distance_d;
Mecaru 12:594a1b936f4b 295
Mecaru 12:594a1b936f4b 296 Angle_d_old = Angle;
Mecaru 7:dc7e66870bd0 297
Mecaru 7:dc7e66870bd0 298 //tableau_distance[Angle_d] = Distance_d;
SolalNathan 2:b2ce001ff8f5 299 }
SolalNathan 2:b2ce001ff8f5 300 }