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

LiquidCrystal_I2C lcd(0x27,16,2);

#define ledrojo 13

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 };
uint8_t rowPins[ROWS] = { 9, 8, 7, 6 };
Keypad keypad = Keypad(makeKeymap(keys), rowPins, colPins, ROWS, COLS);

int botonAuno = 0;
int botonAdos = 0;

typedef enum GameScreen { INICIO = 0, LOGO, TITLE, GAMEPLAY, ENDING } GameScreen;
GameScreen menuUno = INICIO;

void setup() {
  lcd.init();
  lcd.backlight();
  pinMode(ledrojo, OUTPUT);
  Serial.begin(9600);
}

void loop() {
  char key = keypad.getKey();

  ControlBotonA(key);

  switch (menuUno) {
    case INICIO:
      //Serial.println("INICIO");
      lcd.setCursor(0,0);
      lcd.print("INICIO");
      break;

    case LOGO:
      lcd.setCursor(0,0);
      lcd.print("LOGO");
      //Serial.println("LOGO");
      break;

    case TITLE:
      lcd.setCursor(0,0);
      lcd.print("TITLE");
      //Serial.println("TITLE");
      break;

    case GAMEPLAY:
      lcd.setCursor(0,0);
      lcd.print("GAMEPLAY");
      //Serial.println("GAMEPLAY");
      break;

    case ENDING:
      lcd.setCursor(0,0);
      lcd.print("ENDING");
      //Serial.println("ENDING");
      break;

    default:
      break;
  }
}

void ControlBotonA(char key) {
  int velocidadPulsacion = 15;

  if (key == 'A') {
    for (int i = 0; i < velocidadPulsacion; i++) {
      botonAuno = 1;
      delay(velocidadPulsacion);
      botonAdos = 0;

      if (keypad.getKey() == 'A') {
        botonAdos = 1;
        botonAuno = 0;
        break;
      }
    }

    if (botonAuno == 1) {
      lcd.clear();
      digitalWrite(ledrojo, HIGH);
      switch (menuUno) {
        case INICIO:
          menuUno = LOGO;
          break;
        case LOGO:
          menuUno = TITLE;
          break;
        case TITLE:
          menuUno = GAMEPLAY;
          break;
        case GAMEPLAY:
          menuUno = ENDING;
          break;
        case ENDING:
          menuUno = INICIO;
          break;
        default:
          break;
      }
    }

    if (botonAdos == 1) {
      lcd.clear();
      digitalWrite(ledrojo, LOW);
      switch (menuUno) {
        case INICIO:
          menuUno = ENDING;
          break;
        case LOGO:
          menuUno = INICIO;
          break;
        case TITLE:
          menuUno = LOGO;
          break;
        case GAMEPLAY:
          menuUno = TITLE;
          break;
        case ENDING:
          menuUno = GAMEPLAY;
          break;
        default:
          break;
      }
    }
  }
}