módulo WIFI para comunicación de KL25Z midiendo corriente a través de una sonda amperimétrica con Android App neurGAI

Dependencies:   WiflyInterface mbed

Fork of wiflyServer by Gorka Bueno

Committer:
gbm
Date:
Thu Mar 17 09:29:32 2016 +0000
Revision:
1:a340ab744f01
Parent:
0:6d78e05ac19d
Child:
2:d5b61d09976a
m?dulo WIFI para comunicaci?n de KL25Z midiendo corriente a trav?s de una sonda amperim?trica con Android App neurGAI

Who changed what in which revision?

UserRevisionLine numberNew contents of line
gbm 1:a340ab744f01 1 //#define DEBUG
gbm 1:a340ab744f01 2 #include "mbed.h"
gbm 1:a340ab744f01 3 #include "WiflyInterface.h"
gbm 0:6d78e05ac19d 4
gbm 1:a340ab744f01 5 #if (defined(DEBUG))
gbm 1:a340ab744f01 6 #define DBG(x, ...) std::printf("[neurGAI : DBG]"x"\r\n", ##__VA_ARGS__);
gbm 1:a340ab744f01 7 #define WARN(x, ...) std::printf("[neurGAI : WARN]"x"\r\n", ##__VA_ARGS__);
gbm 1:a340ab744f01 8 #define ERR(x, ...) std::printf("[neurGAI : ERR]"x"\r\n", ##__VA_ARGS__);
gbm 1:a340ab744f01 9 #else
gbm 1:a340ab744f01 10 #define DBG(x, ...)
gbm 1:a340ab744f01 11 #define WARN(x, ...)
gbm 1:a340ab744f01 12 #define ERR(x, ...)
gbm 1:a340ab744f01 13 #endif
gbm 1:a340ab744f01 14
gbm 1:a340ab744f01 15 #define ECHO_SERVER_PORT 7
gbm 0:6d78e05ac19d 16
gbm 1:a340ab744f01 17 WiflyInterface wifly(D14, D15, D5, LED1, "NeurGai", "neurGai2016", WPA);
gbm 1:a340ab744f01 18
gbm 1:a340ab744f01 19 Ticker medidor;
gbm 1:a340ab744f01 20
gbm 1:a340ab744f01 21 AnalogIn sonda(A2); // la sonda amperimétrica debe conectarse entre los pines A2 y PTE30
gbm 1:a340ab744f01 22 AnalogOut salida_offset(PTE30);
gbm 0:6d78e05ac19d 23
gbm 1:a340ab744f01 24 int frecuencia_muestreo = 5000; // con 8000 Hz hace bien el muestreo, pero el volcado del debug no es completo
gbm 1:a340ab744f01 25 int numero_muestra = 0;
gbm 1:a340ab744f01 26 float valor_muestra;
gbm 1:a340ab744f01 27 float v_offset = 0;
gbm 1:a340ab744f01 28 float v_offset_medido = 0;
gbm 1:a340ab744f01 29 float potencia = 0;
gbm 1:a340ab744f01 30 float potencia_medida = 0;
gbm 1:a340ab744f01 31 float potencia_230V =0;
gbm 1:a340ab744f01 32 float corriente_medida = 0;
gbm 1:a340ab744f01 33 bool medido = false;
gbm 1:a340ab744f01 34 bool medido_y_enviado = false;
gbm 0:6d78e05ac19d 35
gbm 1:a340ab744f01 36 float pendiente = 201.206437;
gbm 1:a340ab744f01 37 float offset = 0;
gbm 1:a340ab744f01 38
gbm 1:a340ab744f01 39 int num_medida = 0;
gbm 1:a340ab744f01 40
gbm 1:a340ab744f01 41 TCPSocketServer server;
gbm 1:a340ab744f01 42 TCPSocketConnection client;
gbm 1:a340ab744f01 43
gbm 1:a340ab744f01 44 char buffer[256]; // string con los datos
gbm 1:a340ab744f01 45
gbm 1:a340ab744f01 46
gbm 1:a340ab744f01 47 void medir()
gbm 1:a340ab744f01 48 {
gbm 1:a340ab744f01 49 numero_muestra++;
gbm 1:a340ab744f01 50 valor_muestra = sonda.read();
gbm 1:a340ab744f01 51 v_offset = v_offset + valor_muestra;
gbm 1:a340ab744f01 52 potencia = potencia + pow((valor_muestra - v_offset_medido), 2);
gbm 1:a340ab744f01 53 if (numero_muestra == frecuencia_muestreo) // hemos llegado a un segundo
gbm 1:a340ab744f01 54 {
gbm 1:a340ab744f01 55 medidor.detach();
gbm 1:a340ab744f01 56 potencia_medida = potencia / frecuencia_muestreo;
gbm 1:a340ab744f01 57 corriente_medida = sqrt(potencia_medida);
gbm 1:a340ab744f01 58 v_offset_medido = v_offset / frecuencia_muestreo;
gbm 1:a340ab744f01 59 v_offset = 0;
gbm 1:a340ab744f01 60 potencia = 0;
gbm 1:a340ab744f01 61 numero_muestra = 0;
gbm 1:a340ab744f01 62 medido = true;
gbm 1:a340ab744f01 63 potencia_230V = (corriente_medida * pendiente + offset) * 230;
gbm 1:a340ab744f01 64 sprintf(buffer, "#%i&%f*\n", num_medida, potencia_230V);
gbm 1:a340ab744f01 65 DBG("%s %i", buffer, strlen(buffer));
gbm 1:a340ab744f01 66 int numDatosEnviados = client.send_all(buffer, strlen(buffer));
gbm 1:a340ab744f01 67 medido = false;
gbm 1:a340ab744f01 68 num_medida++;
gbm 1:a340ab744f01 69 medido_y_enviado = true;
gbm 1:a340ab744f01 70 DBG("datos enviados : %i", numDatosEnviados);
gbm 0:6d78e05ac19d 71 }
gbm 0:6d78e05ac19d 72 }
gbm 0:6d78e05ac19d 73
gbm 0:6d78e05ac19d 74 int main (void)
gbm 0:6d78e05ac19d 75 {
gbm 1:a340ab744f01 76 DBG("Empezando...");
gbm 0:6d78e05ac19d 77 wifly.init(); // use DHCP
gbm 0:6d78e05ac19d 78 while (!wifly.connect()); // join the network
gbm 1:a340ab744f01 79 DBG("\nLa direccion IP es %s", wifly.getIPAddress());
gbm 0:6d78e05ac19d 80
gbm 0:6d78e05ac19d 81 server.bind(ECHO_SERVER_PORT);
gbm 0:6d78e05ac19d 82 server.listen();
gbm 0:6d78e05ac19d 83
gbm 1:a340ab744f01 84 DBG("\nEsperando conexion...");
gbm 0:6d78e05ac19d 85 server.accept(client);
gbm 1:a340ab744f01 86 DBG("\nServidor aceptado...");
gbm 1:a340ab744f01 87 wait(1); //si no se le mete un pequeño retardo, se queda colgado. También vale con el DBG anterior
gbm 0:6d78e05ac19d 88
gbm 1:a340ab744f01 89 //configura el offset de voltaje a sumar a la sonda
gbm 1:a340ab744f01 90 salida_offset = 0.5;
gbm 1:a340ab744f01 91
gbm 0:6d78e05ac19d 92 while (true) {
gbm 1:a340ab744f01 93 DBG("Esperando dato...");
gbm 0:6d78e05ac19d 94 int n = client.receive(buffer, sizeof(buffer));
gbm 0:6d78e05ac19d 95 if (n <= 0) continue;
gbm 1:a340ab744f01 96 DBG("Recibido dato: %s Longitud %i", buffer, n);
gbm 0:6d78e05ac19d 97 buffer[n] = 0;
gbm 1:a340ab744f01 98 if (strcmp(buffer, "Pot?\n") == 0)
gbm 1:a340ab744f01 99
gbm 1:a340ab744f01 100 // activa el muestreo
gbm 1:a340ab744f01 101 medido_y_enviado = false;
gbm 1:a340ab744f01 102 medidor.attach(&medir, 1.0/frecuencia_muestreo);
gbm 1:a340ab744f01 103
gbm 1:a340ab744f01 104 // spin in a main loop. medidor will interrupt it to call medir
gbm 1:a340ab744f01 105 while (!medido_y_enviado)
gbm 1:a340ab744f01 106 wait(.1);
gbm 0:6d78e05ac19d 107 }
gbm 1:a340ab744f01 108 }