SENSOR INFRARROJO - LED Y ALARMA

 SENSOR INFRARROJO - LED Y ALARMA - DIAGRAMA Y CODIGO

Este codigo usa el sensor IR de obstaculo HW-201, si necesita encender mas leds solo agregue el circuito de ese nuevo led y adicione el codigo necesario teniendo en cuenta el pin donde conectara el positivo del led.

CODIGO, CLICK AQUI PARA DESCARGAR ARCHIVO.

/*

 * Codigo que sirve para detectar objetos y

 * encender uno o mas leds segun se necesite

 * o activar alarmas o cualquier dispositivo actuador

 *

 */

 

// Define el pin donde está conectado el sensor de obstáculos

const int PinSensorIRObstaculos = 9;

 

// Define el pin donde está conectado el LED

const int PinLedEscalera = 13;

 

// Define el pin donde está conectado el buzzer

const int PinBuzzer = 8;

 

// Variable para almacenar la lectura del sensor

int Valor_de_PinSensorIRObstaculos = 0;

 

// Función que se ejecuta una vez al inicio del programa

void setup() {

  // Inicia la comunicación serial para poder ver mensajes en el monitor serial

  Serial.begin(9600);

 

  // Configura el pin del sensor como entrada

  pinMode(PinSensorIRObstaculos, INPUT);

 

  // Configura el pin del LED como salida

  pinMode(PinLedEscalera, OUTPUT);

 

  // Configura el pin del buzzer como salida

  pinMode(PinBuzzer, OUTPUT); // Define el pin del buzzer como salida

}

 

// Función que se ejecuta repetidamente

void loop() {

  // Imprime en la consola el mensaje "Lectura del sensor IR =" seguido del valor leído del sensor

  Serial.print("\t Lectura del sensor IR =");

  Serial.println(Valor_de_PinSensorIRObstaculos);

 

  // Si el sensor detecta un objeto (Valor_de_PinSensorIRObstaculos == LOW):

  if (Valor_de_PinSensorIRObstaculos == LOW) {

    // Enciende el LED

    digitalWrite(PinLedEscalera, HIGH);

    // Activa el buzzer con una frecuencia de 440Hz

    tone(PinBuzzer, 440);

  } else { // Si el sensor no detecta un objeto:

    // Apaga el LED

    digitalWrite(PinLedEscalera, LOW);

    // Apaga el buzzer

    noTone(PinBuzzer);

  }

 

  // Espera 10 milisegundos antes de volver a leer el sensor

  delay(10);

 

  // Lee el valor del sensor de obstáculos y lo guarda en la variable

  Valor_de_PinSensorIRObstaculos = digitalRead(PinSensorIRObstaculos);

}