#include <Wire.h>

#include <LiquidCrystal_I2C.h>
#define I2C_ADDR    0x27
#define LCD_COLUMNS 16
#define LCD_LINES   2
LiquidCrystal_I2C lcd(I2C_ADDR, LCD_COLUMNS, LCD_LINES);

#include <Keypad.h>

const byte KEYPAD_ROWS = 4;
const byte KEYPAD_COLS = 4;
byte rowPins[KEYPAD_ROWS] = {5, 4, 3, 2};
byte colPins[KEYPAD_COLS] = {A3, A2, A1, A0};
char keys[KEYPAD_ROWS][KEYPAD_COLS] = {
  {'1', '2', '3', 'A'},
  {'4', '5', '6', 'B'},
  {'7', '8', '9', 'C'},
  {'*', '0', '#', 'D'}
};
Keypad kp = Keypad(makeKeymap(keys), rowPins, colPins, KEYPAD_ROWS, KEYPAD_COLS);

char tcl;

char clv[7];
char clv_m[7] = "031622";
byte indice = 0;

uint8_t heart[8] = {
  0b00000,
  0b01110,
  0b10001,
  0b10001,
  0b11111,
  0b11011,
  0b11111,
  0b00000,
};
int prp;
int alrm = 0;

int s1;
int s2;
int s3;
int s4;
int s5;
int s6;
int s7;



void setup() {
pinMode(6, INPUT);
pinMode(7, INPUT);
pinMode(8, INPUT);
pinMode(9, INPUT);
pinMode(10, INPUT);
pinMode(11, INPUT);
pinMode(12, INPUT);
pinMode(13, OUTPUT);

lcd.createChar(3, heart);

lcd.init();
lcd.backlight(); 


Wire.begin(1);
}

  
void loop() {
tcl = kp.getKey();
if(indice == 0){
  lcd.clear();
lcd.setCursor(0, 0);
  lcd.print("\x03");
lcd.setCursor(4, 0);
lcd.print("INGRESE");
lcd.setCursor(5, 1);
lcd.print("CLAVE");
  lcd.setCursor(15, 0);
  lcd.print("\x03");
}

if(tcl){
  clv[indice] = tcl;
  indice++;  
  lcd.setCursor(0, 0);
  lcd.print("INGRESANDO CLAVE");
  switch(indice){
    case (1):
  lcd.setCursor(5, 1);
  lcd.print(tcl);
  lcd.setCursor(6, 1);
  lcd.print("_____");
  break;
    case (2):
  lcd.setCursor(6, 1);
  lcd.print(tcl);
  break;
    case (3):
  lcd.setCursor(7, 1);
  lcd.print(tcl);
  break;
    case (4):
  lcd.setCursor(8, 1);
  lcd.print(tcl);
  break;
    case (5):
  lcd.setCursor(9, 1);
  lcd.print(tcl);
  break;
    case (6):
  lcd.setCursor(10, 1);
  lcd.print(tcl);
  break;
  default:
  //nada de nadax
  break;
  }
}

if (indice==6){
if(!strcmp(clv, clv_m)){
  
  lcd.setCursor(0, 0);
  lcd.print("-----ALARMA-----");
  lcd.setCursor(0, 1);
  lcd.print("----INICIADA----");
  for(prp; prp<=10; prp++){
digitalWrite(13, HIGH);
delay(250);
digitalWrite(13, LOW);
delay(1000);
  }
  alrm=1;
  indice = 0;
}

else{
    
  lcd.setCursor(0, 0);
  lcd.print("-------PIN------");
  lcd.setCursor(0, 1);
  lcd.print("---INCORRECTO---");
  delay(1000);
  indice = 0;
  
}
}

while(alrm == 1){
  tcl = kp.getKey();
  
s1= digitalRead(6);
s2= digitalRead(7);
s3= digitalRead(8);
s4= digitalRead(9);
s5= digitalRead(10);
s6= digitalRead(11);
s7= digitalRead(12);

if((s1||s2||s3||s4||s5||s6||s7) == 1){
digitalWrite(13, HIGH);
}
else{
digitalWrite(13, LOW);

}
if(tcl){
  clv[indice] = tcl;
  indice++;
  
  
  lcd.setCursor(0, 0);
  lcd.print("INGRESANDO CLAVE");
  switch(indice){
    case (1):
    lcd.clear();
  lcd.setCursor(0, 0);
  lcd.print("INGRESANDO CLAVE");
  lcd.setCursor(5, 1);
  lcd.print(tcl);
  lcd.setCursor(6, 1);
  lcd.print("_____");
  break;
    case (2):
  lcd.setCursor(6, 1);
  lcd.print(tcl);
  break;
    case (3):
  lcd.setCursor(7, 1);
  lcd.print(tcl);
  break;
    case (4):
  lcd.setCursor(8, 1);
  lcd.print(tcl);
  break;
    case (5):
  lcd.setCursor(9, 1);
  lcd.print(tcl);
  break;
    case (6):
  lcd.setCursor(10, 1);
  lcd.print(tcl);
  break;
  default:
  //nada de nadax
  break;
  }
}

if (indice==6){
if(!strcmp(clv, clv_m)){
  
  lcd.setCursor(0, 0);
  lcd.print("-----ALARMA-----");
  lcd.setCursor(0, 1);
  lcd.print("----APAGADA----");


digitalWrite(13, LOW);
delay(1000);
  
  alrm=0;
  indice = 0;

  }
  

else {
    
  lcd.setCursor(0, 0);
  lcd.print("------PIN-----");
  lcd.setCursor(0, 1);
  lcd.print("---INCORRECTO---");
  delay(1000);
  indice = 1;
  
}
}
}
}