#define buzzer 3 // Connect buzzer to pin 3
#define button 4 // Connect push button to pin 4
#define relay 5 // Connect relay to pin 5
#define reed_switch 2 // Connect reed switch to pin 2 (for interupt)
#define status_LED 6
bool button_history = false;
bool latch = false;
bool door_state = false;
int milli;
int seconds;
int minutes;
bool LED_state;
void(* resetFunc) (void) = 0; // To reset Arduino via code

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

LiquidCrystal_I2C lcd(0x27, 16, 2); // set the LCD address to 0x27 for a 16 chars and 2 line display

void setup() {
  lcd.noCursor();
  lcd.noBlink();
  Serial.begin(9600);
  lcd.init();
  lcd.backlight();
  BOOTUP();
  pinMode(buzzer, OUTPUT);
  pinMode(button, INPUT);
  pinMode(reed_switch, INPUT);
  pinMode(relay, OUTPUT);
  pinMode(status_LED, OUTPUT);

  HOME();
  BUTTON_TRUE();
}

void loop() {
  // scroll 13 positions (string length) to the left
  // to move it offscreen left:

  SANITIZE();

}

void BOOTUP() {
  String BootupMSG_T = "-BrillBox-";
  String BootupMSG_B = "Version 1";
  lcd.setCursor(3, 0);
  lcd.print(BootupMSG_T);

  lcd.setCursor(4, 1);
  lcd.print(BootupMSG_B);

  delay(2000);

  for (int positionCounter = 0; positionCounter < BootupMSG_T.length() + 3; positionCounter++) {
    // scroll one position left:
    lcd.scrollDisplayLeft();
    // wait a bit:
    delay(200);
  }
  lcd.clear();
}

void HOME() {
  //Serial.println("entered into HOME()");
  bool button_state = digitalRead(button);
  //Serial.println(button_state);
  //Serial.println(button_history);

  if (button_state == true) {
    button_history = true;
    return;
  }

  while (button_history == false) {
    bool button_state = digitalRead(button);

    if (button_state == true) {
      button_history = true;
      return;
    }

    //Serial.println("In while loop");
    String HOME_T = "BrillBox:";
    String HOME_B = "Press To Start";
    lcd.setCursor(0, 0);
    lcd.print(HOME_T);

    lcd.setCursor(1, 1);
    lcd.print(HOME_B);
    delay(500);
    lcd.clear();
    lcd.setCursor(0, 0);
    lcd.print(HOME_T);
    delay(600);
  }
}

void BUTTON_TRUE() {
  lcd.clear();
  String BT_T = "Preparing to";
  String BT_B = "Sterilize ";
  lcd.setCursor(2, 0);
  lcd.print(BT_T);

  lcd.setCursor(4, 1);
  lcd.print(BT_B);
  delay(1000);
  //check if door is closed (for safety reasons)

  while (latch == false) {
    lcd.clear();
    latch = digitalRead(reed_switch);
    if (latch == true) {
      break;
    }
    Serial.println(latch);
    String LATCH_T = "Please Close";
    String LATCH_B = "Door";

    lcd.setCursor(2, 0);
    lcd.print(LATCH_T);

    lcd.setCursor(6, 1);
    lcd.print(LATCH_B);
    delay(500);

    latch = digitalRead(reed_switch);
    if (latch == true) {
      break;
    }

    lcd.clear();
    delay(500);
  }

}

void SANITIZE() {

  digitalWrite(buzzer, LOW);


  door_state = digitalRead(reed_switch);

  if (door_state == false) {
    digitalWrite(relay, LOW);
    LID_OPEN();
  }

  //lcd.clear();
  String SANTIZIE_T = "Sterilizing: ";
  lcd.setCursor(2, 0);
  lcd.print(SANTIZIE_T);
  lcd.setCursor(5, 1);
  lcd.print(14 - minutes);
  lcd.print(":");
  if (seconds > 49) {
    lcd.print("0");
    lcd.print(59 - seconds);
  }
  if (seconds < 50) {
    lcd.print(59 - seconds);
  }


  digitalWrite(relay, HIGH);
  milli++;
  if (milli >= 10) {
    seconds++;
    if (LED_state == false) {
      digitalWrite(status_LED, HIGH);
      LED_state == true;
    }
    else {
      digitalWrite(status_LED, LOW);
      LED_state == false;
    }
    milli = 0;

  }
  if (seconds >= 60) {
    lcd.clear();
    minutes ++;
    seconds = 0;
  }
  if (minutes >= 15) {
    minutes = 0;
    void DONE();
  }
  Serial.println(milli);
  Serial.println(seconds);
  Serial.println(minutes);
  delay(100);


}

void DONE() {
  lcd.clear();

  String DONE_T = "Sterilization";
  String DONE_B = "Complete";
  int counter;

  while (latch == true) {
    latch = digitalRead(reed_switch);

    lcd.setCursor(1, 0);
    lcd.print(DONE_T);
    lcd.setCursor(3, 1);
    lcd.print(DONE_B);

    if (counter < 3) { // Beep buzzer 3 times after done (so it does not get annoying)
      digitalWrite(buzzer, HIGH);
      digitalWrite(status_LED, HIGH);
      counter++;
    }

    delay(500);

    lcd.clear();
    digitalWrite(buzzer, LOW);
    digitalWrite(status_LED, LOW);
    delay(500);
  }
  button_history = false;
  HOME();
  BUTTON_TRUE();
}

void LID_OPEN() {
  Serial.println("In LID_OPEN");

  latch = digitalRead(reed_switch);

  if (latch == true) {
    return;
  }

  //Screen 1:
  String LCD_OPEN_T1 = "-Warning-";
  //No LCD_OPEN_T1
  //Screen 2:
  String LCD_OPEN_T2 = "Sterilizing";
  String LCD_OPEN_B2 = "Stopped";
  //Screen 3:
  String LCD_OPEN_T3 = "Please Close";
  String LCD_OPEN_B3 = "Door";

  while (latch == false) {
    delay(1000);
    lcd.clear();
    Serial.println("In LID_OPEN While LOOP");
    latch = digitalRead(reed_switch);

    lcd.setCursor(3, 0);
    lcd.print(LCD_OPEN_T1);
    digitalWrite(buzzer, HIGH);
    digitalWrite(status_LED, HIGH);


    if (latch == true) {
      break;
    }
    latch = 1;//digitalRead(reed_switch);
    delay(500);
    digitalWrite(buzzer, LOW);
    digitalWrite(status_LED, LOW);
    lcd.clear();
    delay(500);
    lcd.setCursor(3, 0);
    lcd.print(LCD_OPEN_T1);
    latch = digitalRead(reed_switch);

    if (latch == true) {
      break;
    }
    digitalWrite(buzzer, HIGH);
    digitalWrite(status_LED, HIGH);
    delay(500);
    digitalWrite(buzzer, LOW);
    digitalWrite(status_LED, LOW);
    lcd.clear();
    delay(500);

    lcd.setCursor(3, 0);
    lcd.print(LCD_OPEN_T1);
    latch = digitalRead(reed_switch);

    if (latch == true) {
      break;
    }
    digitalWrite(buzzer, HIGH);
    digitalWrite(status_LED, HIGH);
    delay(500);

    digitalWrite(buzzer, LOW);
    digitalWrite(status_LED, LOW);
    lcd.clear();
    if (latch == true) {
      break;
    }
    delay(500);

    lcd.setCursor(2, 0);
    lcd.print(LCD_OPEN_T2);
    lcd.setCursor(4, 1);
    lcd.print(LCD_OPEN_B2);
    latch = digitalRead(reed_switch);

    if (latch == true) {
      break;
    }
    digitalWrite(buzzer, HIGH);
    digitalWrite(status_LED, HIGH);
    delay(1000);
    if (latch == true) {
      break;
    }

    lcd.clear();

    lcd.setCursor(2, 0);
    lcd.print(LCD_OPEN_T3);

    lcd.setCursor(6, 1);
    lcd.print(LCD_OPEN_B3);

    latch = digitalRead(reed_switch);

    if (latch == true) {
      break;
    }
    digitalWrite(buzzer, LOW);
    digitalWrite(status_LED, LOW);
    delay(750);
  }
  return;
}