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

#define NOTE_B0  31
#define NOTE_C1  33
#define NOTE_CS1 35
#define NOTE_D1  37
#define NOTE_DS1 39
#define NOTE_E1  41
#define NOTE_F1  44
#define NOTE_FS1 46
#define NOTE_G1  49
#define NOTE_GS1 52
#define NOTE_A1  55
#define NOTE_AS1 58
#define NOTE_B1  62
#define NOTE_C2  65
#define NOTE_CS2 69
#define NOTE_D2  73
#define NOTE_DS2 78
#define NOTE_E2  82
#define NOTE_F2  87
#define NOTE_FS2 93
#define NOTE_G2  98
#define NOTE_GS2 104
#define NOTE_A2  110
#define NOTE_AS2 117
#define NOTE_B2  123
#define NOTE_C3  131
#define NOTE_CS3 139
#define NOTE_D3  147
#define NOTE_DS3 156
#define NOTE_E3  165
#define NOTE_F3  175
#define NOTE_FS3 185
#define NOTE_G3  196
#define NOTE_GS3 208
#define NOTE_A3  220
#define NOTE_AS3 233
#define NOTE_B3  247
#define NOTE_C4  262
#define NOTE_CS4 277
#define NOTE_D4  294
#define NOTE_DS4 311
#define NOTE_E4  330
#define NOTE_F4  349
#define NOTE_FS4 370
#define NOTE_G4  392
#define NOTE_GS4 415
#define NOTE_A4  440
#define NOTE_AS4 466
#define NOTE_B4  494
#define NOTE_C5  523
#define NOTE_CS5 554
#define NOTE_D5  587
#define NOTE_DS5 622
#define NOTE_E5  659
#define NOTE_F5  698
#define NOTE_FS5 740
#define NOTE_G5  784
#define NOTE_GS5 831
#define NOTE_A5  880
#define NOTE_AS5 932
#define NOTE_B5  988
#define NOTE_C6  1047
#define NOTE_CS6 1109
#define NOTE_D6  1175
#define NOTE_DS6 1245
#define NOTE_E6  1319
#define NOTE_F6  1397
#define NOTE_FS6 1480
#define NOTE_G6  1568
#define NOTE_GS6 1661
#define NOTE_A6  1760
#define NOTE_AS6 1865
#define NOTE_B6  1976
#define NOTE_C7  2093
#define NOTE_CS7 2217
#define NOTE_D7  2349
#define NOTE_DS7 2489
#define NOTE_E7  2637
#define NOTE_F7  2794
#define NOTE_FS7 2960
#define NOTE_G7  3136
#define NOTE_GS7 3322
#define NOTE_A7  3520
#define NOTE_AS7 3729
#define NOTE_B7  3951
#define NOTE_C8  4186
#define NOTE_CS8 4435
#define NOTE_D8  4699
#define NOTE_DS8 4978

LiquidCrystal_I2C lcd1(0x27, 16, 2); // LCD1 untuk tebakan & angka acak
LiquidCrystal_I2C lcd2(0x20, 16, 2); // LCD2 untuk saldo

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] = {9, 8, 7, 6};
byte colPins[COLS] = {5, 4, 3, 10};

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

int tebakan[4];
int angkaAcak[4];
int saldo = 0;

const int tombolSaldo = 2;
const int buzzer = 13;
bool tombolTekan = false;

void setup() {
  lcd1.init();
  lcd1.backlight(); 
  lcd2.init(); 
  lcd2.backlight(); 
  pinMode(tombolSaldo, INPUT_PULLUP); 
  pinMode(buzzer , OUTPUT);
  randomSeed(analogRead(0)); 
  inisialisasiTebakan();
  tampilkanTebakan();        // tampilkan tebakan kosong
  tampilkanAngkaAcakKosong(); // tampilkan acak kosong
  tampilkanSaldo();
}

void loop() { 
  if (digitalRead(tombolSaldo) == LOW && !tombolTekan) {
    saldo += 500;
    tampilkanSaldo(); 
    tombolTekan = true; 
    delay(200); 
  } else if (digitalRead(tombolSaldo) == HIGH) {
    tombolTekan = false;
  }
  
  bacaTebakan(); 

  if (tebakanSiap()) {
    generateAngkaAcak();
    tampilkanAngkaAcak();
    generateAngkaAcak();
    tampilkanAngkaAcak();
    generateAngkaAcak();
    tampilkanAngkaAcak();
    evaluasiHasil();
    tampilkanSaldo();
    delay(1000);
    clearTebakan();
    tampilkanTebakan();
    tampilkanAngkaAcakKosong();
  }
}

void bacaTebakan() {
  char key = keypad.getKey();
  
  if (saldo <= 0 && key && key >= '0' && key <= '9') {
    lcd2.clear();
    lcd2.setCursor(0, 0);
    lcd2.print("Saldo anda");
    lcd2.setCursor(0, 1);
    lcd2.print("kosong!");
    delay(1000); // kasih jeda sebentar biar user baca
    tampilkanSaldo();
    return; // keluar dari fungsi, abaikan input
  }

  if (key && key >= '0' && key <= '9') {
    for (int i = 0; i < 4; i++) {
      if (tebakan[i] == -1) {
        tebakan[i] = key - '0';
        tampilkanTebakan();
        break;
      }
    }
  }
}


bool tebakanSiap() {
  for (int i = 0; i < 4; i++) {
    if (tebakan[i] == -1)
      return false;
  }
  return true;
}

void clearTebakan() {
  for (int i = 0; i < 4; i++) {
    tebakan[i] = -1;
  }
}

void generateAngkaAcak() {
  for (int i = 0; i < 4; i++) {
    angkaAcak[i] = random(0, 10);
  }
}

void tampilkanTebakan() {
  lcd1.setCursor(0, 0);
  lcd1.print("Tebak: ");
  for (int i = 0; i < 4; i++) {
    if (tebakan[i] == -1) {
      lcd1.print("_");
    } else {
      lcd1.print(tebakan[i]);
    }
  }
}

void tampilkanAngkaAcak() {
  lcd1.setCursor(0, 1);
  lcd1.print("Acak : ");
  for (int i = 0; i < 4; i++) {
    lcd1.print(angkaAcak[i]);
  }
  delay(200);
}

void tampilkanAngkaAcakKosong() {
  lcd1.setCursor(0, 1);
  lcd1.print("Acak : ____");
}

void tampilkanSaldo() {
  lcd2.clear();
  lcd2.setCursor(0, 0);
  lcd2.print("Saldo: ");
  lcd2.print(saldo);
}

void evaluasiHasil() {
  int cocok = 0;

  for (int i = 0; i < 4; i++) {
    if (tebakan[i] == angkaAcak[i]) {
      cocok++;
    }
  }

  if (cocok == 4) {
    saldo *= 2;
    soundMenang();
  } else if (cocok == 3) {
    saldo = saldo * 3 / 2;
    soundMenang();
  } else if (cocok == 1) {
    saldo /= 2;
    soundKalah();
  } else if (cocok == 0) {
    saldo = 0;
    soundKalah();
  }
}

void inisialisasiTebakan() {
  for (int i = 0; i < 4; i++) {
    tebakan[i] = -1;
  }
}

void soundKalah() {
  // Play a Wah-Wah-Wah-Wah sound
  tone(buzzer, NOTE_DS5);
  delay(300);
  tone(buzzer, NOTE_D5);
  delay(300);
  tone(buzzer, NOTE_CS5);
  delay(300);
  for (byte i = 0; i < 10; i++) {
    for (int pitch = -10; pitch <= 10; pitch++) {
      tone(buzzer, NOTE_C5 + pitch);
      delay(6);
    }
  }
  noTone(buzzer);
}

void soundMenang() {
  tone(buzzer, NOTE_E4);
  delay(150);
  tone(buzzer, NOTE_G4);
  delay(150);
  tone(buzzer, NOTE_E5);
  delay(150);
  tone(buzzer, NOTE_C5);
  delay(150);
  tone(buzzer, NOTE_D5);
  delay(150);
  tone(buzzer, NOTE_G5);
  delay(150);
  noTone(buzzer);
}