Sensor Pulso Cardiacio

// Prueba del sensor de pulso: muestra la señal y las pulsaciones por minuto
// en el Trazador serie, y enciende el LED del pin 13 con cada latido.
const int PIN_PULSO = A0;
const int UMBRAL = 550;  // ajústalo mirando la señal en el Trazador serie

bool enLatido = false;
unsigned long ultimoLatido = 0;
int bpm = 0;

void setup() {
  pinMode(LED_BUILTIN, OUTPUT);
  Serial.begin(9600);
}

void loop() {
  int senal = analogRead(PIN_PULSO);

  if (senal > UMBRAL && !enLatido) {  // empieza un latido
    enLatido = true;
    unsigned long ahora = millis();
    unsigned long intervalo = ahora - ultimoLatido;
    if (intervalo > 300 && intervalo < 2000) {  // entre 30 y 200 latidos por minuto
      bpm = 60000UL / intervalo;
    }
    ultimoLatido = ahora;
  }
  if (senal < UMBRAL - 20) {  // terminó el latido
    enLatido = false;
  }
  digitalWrite(LED_BUILTIN, enLatido ? HIGH : LOW);

  // Formato para el Trazador serie: dos líneas, "Senal" y "BPM"
  Serial.print("Senal:");
  Serial.print(senal);
  Serial.print(",BPM:");
  Serial.println(bpm);
  delay(20);
}