POST_23

/*  TITULO: Detector de presencia con sensor PIR

    AUTOR:

    MARIANO DEL CAMPO GARCÍA (@2016) --> INGENIERO TÉCNICO INDUSTRIAL ESPECIALIDAD ELECTRÓNICA
    - FACEBOOK: https://www.facebook.com/mariano.delcampogarcia
    - TWITTER: https://twitter.com/MarianoCampoGa
    - CORREO: marianodc83@gmail.com


    DESCRIPCIÓN DEL PROGRAMA

    El sensor PIR es un muy fácil de utilizar como sensor de movimiento por infrarrojos, puesto que
    la salida del sensor va a HIGH (NIVEL ALTO) si el movimiento está presente, y cuando esto sucede, se
    activarán un LED y un ZUMBADOR (Alarma luminosa y acústica). No hace falta conectar ninguna
    resistencia PULL-UP en la salida del sensor porque ya la lleva incorporada.


    ESQUEMA DE CONEXION

                                      +-----+
         +----[PWR]-------------------| USB |--+
         |                            +-----+  |
         |         GND/RST2  [ ][ ]            |
         |       MOSI2/SCK2  [ ][ ]  A5/SCL[ ] |
         |          5V/MISO2 [ ][ ]  A4/SDA[ ] |
         |                             AREF[ ] |
         |                              GND[ ] |
         | [ ]N/C                    SCK/13[ ] |
         | [ ]IOREF                 MISO/12[ ] |
         | [ ]RST                   MOSI/11[ ]~|
         | [ ]3V3    +---+               10[ ]~|
         | [ ]5v    -| A |-               9[ ]~|
         | [ ]GND   -| R |-               8[ ] |   LED(+)
         | [ ]GND   -| D |-                    |
         | [ ]Vin   -| U |-               7[ ] |   Salida del sensor PIR (terminal central)
         |          -| I |-               6[ ]~|   Zumbador(+)
         | [ ]A0    -| N |-               5[ ]~|
         | [ ]A1    -| O |-               4[ ] |
         | [ ]A2     +---+           INT1/3[ ]~|
         | [ ]A3                     INT0/2[ ] |
         | [ ]A4/SDA  RST SCK MISO     TX>1[ ] |
         | [ ]A5/SCL  [ ] [ ] [ ]      RX<0[ ] |
         |            [ ] [ ] [ ]              |
         |  UNO_R3    GND MOSI 5V  ____________/
          \_______________________/

  NOTAS:

   - Cátodo(-) del LED (pata más corta) a GND a través de una R=220 omhs.
   - Zumbador(-) a GND.
   - La alimentación y la masa del sensor PIR a +5V y GND respectivamente.
*/

  // Tiempo que tarda el sensor en calibrarse (10-60 segundos de acuerdo con la hoja de datos)
  int calibrationTime = 30;

  int ledPin = 8;    // PIN digital conectado al LED
  int pirPin = 7;    // PIN digital conectado a la salida del sensor PIR
  int buzzer = 6;    // PIN digital conectado al zumbador (buzzer)

  void setup()
  {
    pinMode(pirPin, INPUT); // PIN digital 7 como entrada
    pinMode(ledPin, OUTPUT); // PIN digital 8 como salida
    pinMode(buzzer, OUTPUT); // // PIN digital 6 como salida

    Serial.begin(9600);

    Serial.println("<< SENSOR PIR >>\n");

    // Damos un cierto tiempo al sensor para que se calibre
    Serial.print("CALIBRANDO");

    for(int i = 0; i < calibrationTime; i++)
    {
      Serial.print(".");
      delay(1000);
    }

    Serial.println("SENSOR OK");
  }

  void loop()
  {
    // Si el Sensor PIR detecta movimiento
    if(digitalRead(pirPin) == HIGH)
    {
      digitalWrite(ledPin, HIGH);   // LED encendido
      digitalWrite(buzzer, HIGH);   // BUZZER encendido
    }
    // Si el Sensor PIR no detecta movimiento
    else
    {
      digitalWrite(ledPin, LOW);  // LED apagado
      digitalWrite(buzzer, LOW);  // BUZZER apagado
    }
  }