#include <Wire.h>
#include <LiquidCrystal_I2C.h>
#include <Keypad.h>
#include <ESP32Servo.h>
#include <RTClib.h>
#include <TM1637Display.h>
#include <EEPROM.h>

// LCD I2C
LiquidCrystal_I2C lcd(0x27, 20, 4);

// RTC DS1307
RTC_DS1307 rtc;

// TM1637 Display
#define CLK 16   // GPIO 16
#define DIO 17   // GPIO 17
TM1637Display display(CLK, DIO);

// Servo
Servo myServo;

// Keypad setup
const byte ROWS = 4;
const byte COLS = 4;
char keys[ROWS][COLS] = {
  {'1','2','3','A'},
  {'4','5','6','B'},
  {'7','8','9','C'},
  {'*','0','#','D'}
};
byte rowPins[ROWS] = {12, 13, 14, 27};  // GPIO 12, 13, 14, 27
byte colPins[COLS] = {25, 26, 32, 33};  // GPIO 25, 26, 32, 33
Keypad keypad = Keypad(makeKeymap(keys), rowPins, colPins, ROWS, COLS);

// Pin sensor/output
#define PIR_PIN 4        // GPIO 4
#define LED_PIN 19       // GPIO 19
#define BUZZER_PIN 18    // GPIO 18
#define SERVO_PIN 15     // GPIO 15

// Variabel setting
int ledDelay = 3;         // Waktu delay untuk LED
int servoDeg = 90;        // Posisi servo
int buzzerTime = 2;       // Waktu buzzer menyala

unsigned long ledStartTime = 0;
unsigned long buzzerStartTime = 0;
bool ledState = false;
bool buzzerState = false;
bool servoMoved = false;

void setup() {
  Wire.begin();
  Serial.begin(115200); // Serial monitor untuk debugging
  lcd.init();
  lcd.backlight();

  // Inisialisasi RTC
  if (!rtc.begin()) {
    lcd.clear();
    lcd.setCursor(0, 0);
    lcd.print("RTC gagal");
    while (1); // Stop eksekusi jika RTC tidak ditemukan
  }

  // Cek apakah waktu sudah diset di RTC
  if (!rtc.isrunning()) {
    lcd.clear();
    lcd.setCursor(0, 0);
    lcd.print("RTC belum diset");
    rtc.adjust(DateTime(F(__DATE__), F(__TIME__)));
  }

  display.setBrightness(7);
  myServo.attach(SERVO_PIN);
  pinMode(PIR_PIN, INPUT);
  pinMode(LED_PIN, OUTPUT);
  pinMode(BUZZER_PIN, OUTPUT);

  // Initialize EEPROM with size
  EEPROM.begin(512);  // Size of EEPROM memory in bytes
  
  // Load settings from EEPROM
  loadSettings();

  displayMenu();
}

void loop() {
  showTime();  // Menampilkan waktu pada seven segment display

  char key = keypad.getKey();
  if (key) {
    if (key == 'A') handleInput("waktu delay LED", &ledDelay, "detik");
    else if (key == 'B') handleInput("derajat servo", &servoDeg, "\xDF"); // ° simbol
    else if (key == 'C') handleInput("waktu buzzer", &buzzerTime, "detik");
  }

  bool pir = digitalRead(PIR_PIN);           // Deteksi pergerakan
  
  // Menampilkan waktu pada Seven Segment (HHMM)
  showTime();

  // Logika untuk mengaktifkan LED dan Buzzer berdasarkan PIR
  if (pir) {  // Jika ada pergerakan
    if (!ledState) {
      ledStartTime = millis();  // Set waktu mulai LED menyala
      digitalWrite(LED_PIN, HIGH);   // Nyalakan LED
      ledState = true;
    }

    if (!buzzerState) {
      buzzerStartTime = millis();  // Set waktu mulai buzzer menyala
      digitalWrite(BUZZER_PIN, HIGH);  // Nyalakan Buzzer
      buzzerState = true;
    }

    if (!servoMoved) {
      myServo.write(servoDeg);  // Aktifkan servo untuk bergerak
      servoMoved = true; // Tandai bahwa servo sudah bergerak
    }
  }

  // Cek apakah LED sudah waktunya mati
  if (ledState && millis() - ledStartTime >= ledDelay * 1000) {
    digitalWrite(LED_PIN, LOW);   // Matikan LED
    ledState = false;
  }

  // Cek apakah buzzer sudah waktunya mati
  if (buzzerState && millis() - buzzerStartTime >= buzzerTime * 1000) {
    digitalWrite(BUZZER_PIN, LOW);  // Matikan Buzzer
    buzzerState = false;
  }

  // Jika semua sudah selesai, kembalikan servo ke posisi semula
  if (servoMoved && !ledState && !buzzerState) {
    myServo.write(0);  // Servo kembali ke posisi awal
    servoMoved = false;  // Reset gerakan servo
  }
}

void showTime() {
  DateTime now = rtc.now();   // Ambil waktu dari RTC

  int jam = now.hour();       // Ambil jam
  int menit = now.minute();   // Ambil menit

  int tampil = jam * 100 + menit;  // Format HHMM

  // Menampilkan waktu pada Seven Segment (HH:MM)
  display.showNumberDecEx(tampil, 0b11100000, true); // HH:MM format
}

void displayMenu() {
  lcd.clear();
  lcd.setCursor(0, 0); lcd.print("A : waktu delay LED");
  lcd.setCursor(0, 1); lcd.print("B : derajat servo");
  lcd.setCursor(0, 2); lcd.print("C : waktu buzzer");
  lcd.setCursor(0, 3); lcd.print("Tekan A/B/C");
}

void handleInput(String label, int* targetVar, String satuan) {
  lcd.clear();
  lcd.setCursor(0, 0); lcd.print(label);
  lcd.setCursor(0, 1); lcd.print("D = OK");

  String input = "";

  // Menggunakan loop untuk menerima input dan memperbarui layar
  while (true) {
    char key = keypad.getKey();
    if (key >= '0' && key <= '9') {
      if (input.length() < 4) {
        input += key;
        lcd.setCursor(0, 2); 
        lcd.print("Input: " + input + " " + satuan + "   ");
      }
    }
    if (key == 'D') {
      if (input.length() > 0) {
        *targetVar = input.toInt();
        lcd.setCursor(0, 3); 
        lcd.print("Tersimpan: " + input + " " + satuan + "   ");
        delay(1000);

        // Simpan pengaturan ke EEPROM
        saveSettings();
      }
      displayMenu();  // Menampilkan menu kembali setelah input selesai
      break;  // Keluar dari loop input
    }
  }
}

void saveSettings() {
  // Simpan pengaturan ke EEPROM
  EEPROM.write(0, ledDelay);
  EEPROM.write(1, servoDeg);
  EEPROM.write(2, buzzerTime);
  
  EEPROM.commit();  // Pastikan perubahan disimpan ke EEPROM
}

void loadSettings() {
  // Muat pengaturan dari EEPROM
  ledDelay = EEPROM.read(0);
  servoDeg = EEPROM.read(1);
  buzzerTime = EEPROM.read(2);
}