#include <Keypad.h>
#include <LiquidCrystal_I2C.h>
#include <Servo.h>

#define Pinservo 10
#define I2C_ADDR    0x27
#define LCD_COLUMNS 16
#define LCD_LINES   2
#define pirPin 11
#define led 12
#define buzz 13

LiquidCrystal_I2C lcd(I2C_ADDR, LCD_COLUMNS, LCD_LINES);

Servo myservo;

const uint8_t ROWS = 4;
const uint8_t COLS = 4;
char keys[ROWS][COLS] = {
  { '1', '2', '3', 'A' },
  { '4', '5', '6', 'B' },
  { '7', '8', '9', 'C' },
  { '*', '0', '#', 'D' }
};

uint8_t colPins[COLS] = { 5, 4, 3, 2 }; // Pins connected to C1, C2, C3, C4
uint8_t rowPins[ROWS] = { 9, 8, 7, 6 }; // Pins connected to R1, R2, R3, R4

Keypad keypad = Keypad(makeKeymap(keys), rowPins, colPins, ROWS, COLS);

const String pass;
bool isBuatKode = false;
bool isKunci = false;
bool isBuzzer = false;
int statusPir = LOW;
int val = 0;
int attempt = 0;
unsigned long waktuSebelum1 = 0;
unsigned long waktuSebelum2 = 0;


void pesanAwal(){
  lcd.setCursor(3,0);
  String pesan = "Door Lock.";
  for(byte i = 0; i < pesan.length(); i++){
    lcd.print(pesan[i]);
    delay(100);
  }
  lcd.setCursor(0,1);
  lcd.print("== SMART ROOM ==");
  delay(2000);
}

void tungguScreen(int delayMillis) {
  lcd.setCursor(2, 1);
  lcd.print("[..........]");
  lcd.setCursor(3, 1);
  for (byte i = 0; i < 10; i++) {
    delay(delayMillis);
    lcd.print("=");
  }
}

void buatKode(){
  lcd.clear();
  lcd.setCursor(0,0);
  lcd.print("Enter Password :");
  String kodeBaru = masukkanKode();

  lcd.clear();
  lcd.setCursor(0,0);
  lcd.print("Confirm Password :");
  String confirm = masukkanKode();

  if(kodeBaru.equals(confirm)){
    lcd.clear();
    isBuatKode = true;
    pass = confirm;
  } else {
    lcd.clear();
    lcd.setCursor(0,0);
    lcd.print("Pass Tidak Cocok");
    lcd.setCursor(3,1);
    lcd.print("Coba Lagii");
    delay(2000);
    isBuatKode = false;
  }
}

void tutupKunci(bool value){
  isKunci = value;
  myservo.write(-180);
}

void bukaKunci(bool value){
  isKunci = value;
  myservo.write(90);
}

void setCode(){
  lcd.clear();
  lcd.setCursor(0,0);
  lcd.print("Enter Password :");
  String password = masukkanKode();
  tungguScreen(200);

  if(pass == password){
    if(isKunci){
      bukaKunci(false);
      lcd.clear();
      lcd.setCursor(1,0);
      lcd.print("Kunci terbuka");
      delay(5000);
      tutupKunci(true);
      lcd.clear();
    } else {
      tutupKunci(true);
      lcd.clear();
      lcd.setCursor(2,0);
      lcd.print("Kunci aktif.");
      delay(2000);
      lcd.clear();
    }
  } else {
    if(attempt < 4){
      attempt++;
      lcd.clear();
      Serial.println(attempt);
      tone(buzz, 1000, 200);
      delay(100);
      setCode();
    } else {    
      isBuzzer = true;
      tone(buzz, 1000);
      lcd.clear();
      delay(3000);
    }
    
  }
}

void menu(){
  char key = keypad.getKey();
  if(isKunci){
    lcd.setCursor(1,0);
    lcd.print("Tekan # untuk");
    lcd.setCursor(1,1);
    lcd.print("membuka kunci.");
  } else {
    lcd.setCursor(1,0);
    lcd.print("A = buat pass.");
    lcd.setCursor(0,1);
    lcd.print("# = kunci pintu.");
  }
  if(key == 'A'){
    buatKode();
  } else if(key == '#'){
    if(isBuzzer){
      noTone(buzz);
      setCode();
    }
    setCode();
  }
}

void setup() {
  // put your setup code here, to run once:
  Serial.begin(115200);
  lcd.init();
  lcd.backlight();
  pinMode(led, OUTPUT);
  pinMode(pirPin, INPUT);
  pinMode(buzz, OUTPUT);
  myservo.attach(Pinservo);

  pesanAwal();
}

String masukkanKode() {
  lcd.setCursor(4, 1);
  lcd.print("[______]");
  lcd.setCursor(5, 1);
  String result = "";
  while (result.length() < 6) {
    char key = keypad.getKey();
    if (key >= '0' && key <= '9') {
      lcd.print('*');
      result += key;
    }
  }
  return result;
}

void pir(){
  val = digitalRead(pirPin);
  if(val == HIGH){
    digitalWrite(led, HIGH);
    if(statusPir == LOW){
      Serial.println("Gerakan terdeteksi");
      statusPir = HIGH;
    }
  } else {
    digitalWrite(led, LOW);
    if(statusPir == HIGH){
      Serial.println("Gerakan tidak terdeteksi");
      statusPir = LOW;
    }
  }
}

void loop() {

  pir();
  
  unsigned long waktuSekarang2 = millis();
    if(isBuatKode){
      menu();
    } else {
      buatKode();
  }
}