//libraries
#include <Wire.h>
#include <Adafruit_GFX.h>
#include <Adafruit_SSD1306.h>

//OLED parameters
#define SCREEN_WIDTH 128 //width in pixels
#define SCREEN_HEIGTH 64
#define OLED_RESET -1 //Rest pin #(or -1 if sharing arduino reset pin) 
#define SCREEN_ADDRESS 0X3C //Sea datasheet for addesss

#define BUZZER 5
#define LED_1 15
#define PB_CANCEL 34
#define PB_OK 32
#define PB_UP 33
#define PB_DOWN 35

//Declare objects
Adafruit_SSD1306 display(SCREEN_WIDTH, SCREEN_HEIGTH, &Wire, OLED_RESET);

//global variable
int days = 0;
int hours = 0;
int minutes = 0;
int seconds = 0;

unsigned long timeNow = 0;
unsigned long timeLast = 0;

bool alarm_ennebled = true;
int n_alarms = 2;
int alarm_hours[] = {0, 1};
int alarm_minutes[] = {1, 10};
bool alarm_triggered[] = {false, false};

int n_notes = 8;
int C = 262;
int D = 294;
int E = 330;
int F = 349;
int G = 392;
int A = 440;
int B = 494;
int C_H = 523;
int notes[] = {C, D, E, F, G, A, B, C_H};

int current_mode = 0;
int max_modes = 4;
String modes[] = {"1 - Set Time", "2 - Set Alarm 1", "3 - Set Alarm 2", "4 - Disable Alarm"};

void setup() {
  //initialize serial monitor and OLED display
  pinMode(BUZZER, OUTPUT);
  pinMode(LED_1, OUTPUT);
  pinMode(PB_CANCEL, INPUT);
  pinMode(PB_OK, INPUT);
  pinMode(PB_DOWN, INPUT);
  pinMode(PB_UP, INPUT);

  Serial.begin(115200);

  if (!display.begin(SSD1306_SWITCHCAPVCC, SCREEN_ADDRESS)) {
    Serial.println(F("SSD1306 allocation failed"));
    for (;;); //Don't proceed loop forever
  }
  //
  //
  //turn on OLED display
  display.display();
  delay(500);

  //clear OLED display
  display.clearDisplay();

  print_line("Welcome to Medi", 10, 20, 2);// calling new printline function
  delay(500);
  display.clearDisplay();
}

void loop() {
  update_time_with_check_alarm();
  if (digitalRead(PB_OK) == LOW) {
    delay(200);
    go_to_menu();
  }

}

void print_line(String text, int column, int row, int text_size ) {
  //clear OLED display

  //display a costom message
  display.setTextSize(text_size); // normal 1:1 pixel scale
  display.setTextColor(SSD1306_WHITE); //draw white text
  display.setCursor(column, row); //start at top left coner, colomn, row
  display.println(text);

  display.display();

}

void print_time_now(void) {
  display.clearDisplay();
  print_line(String(days), 0, 0, 2);
  print_line(":", 20, 0, 2);
  print_line(String(hours), 30, 0, 2);
  print_line(":", 50, 0, 2);
  print_line(String(minutes), 60, 0, 2);
  print_line(":", 80, 0, 2);
  print_line(String(seconds), 90, 0, 2);
}
void update_time() {
  timeNow = millis() / 1000; // seconds passed from bootup , div 1000 as no need milli seconds
  seconds = timeNow - timeLast;

  if (seconds >= 60) {
    minutes += 1; //minitus = minites + 1
    timeLast += 60;
  }
  if (minutes == 60) {
    hours += 1;
    minutes = 0;
  }

  if (hours == 24) {
    days += 1;
    hours = 0;
  }
}

void ring_alarm() {
  display.clearDisplay();
  print_line("MEDICINE TIME!", 0, 0, 2);

  digitalWrite(LED_1, HIGH);

  bool break_happend = false;//if user release button too fast

  //Ring the bizze
  while (break_happend == false && digitalRead(PB_CANCEL) == HIGH) { /*Push buttonforalarm stop*/
    for (int i = 0; i < n_notes; i++) {
      if (digitalRead(PB_CANCEL) == LOW) {//to stop
        delay(200);//to stop bounsing efct push buttn
        break_happend = true;
        break;
      }
      tone(BUZZER, notes[i]);
      delay(500);
      noTone(BUZZER);
      delay(2);
    }
  }

  digitalWrite(LED_1, LOW);
  display.clearDisplay();
}

void update_time_with_check_alarm(void)  {
  update_time();
  print_time_now();

  if (alarm_ennebled == true) {
    for (int i = 0; i < n_alarms; i++) {
      if (alarm_triggered[i] == false && alarm_hours[i] == hours && alarm_minutes[i] == minutes) {
        ring_alarm();
        alarm_triggered[i] = true;
      }
    }
  }
}

int wait_for_button_press() {
  while (true) { /*to run as long as power on unles break*/
    if (digitalRead(PB_UP) == LOW) {
      delay(200);
      return PB_UP;
    }
    else if (digitalRead(PB_DOWN) == LOW) {
      delay(200);
      return PB_DOWN;
    }

    else if (digitalRead(PB_OK) == LOW) {
      delay(200);
      return PB_OK;
    }


    else if (digitalRead(PB_CANCEL) == LOW) {
      delay(200);
      return PB_CANCEL;
    }
    update_time();
  }
}

void go_to_menu() {
  while (digitalRead(PB_CANCEL) == HIGH) { /*stay menu till press cancel*/
    display.clearDisplay();
    print_line(modes[current_mode], 0, 0, 2);//display current mode

    int pressed = wait_for_button_press();

    if ( pressed == PB_UP) {
      delay(200);
      current_mode += 1 ;
      current_mode - current_mode % max_modes;//current mode reach max valu to put it zero
    }

    else if (pressed == PB_DOWN) {
      delay(200);
      current_mode -= 1 ;
      if (current_mode < 0) {
        current_mode = max_modes - 1;
      }
      
    }

    else if (pressed == PB_OK) {
      delay(200);
      Serial.print(current_mode);
      //run_mode (current_mode);// to run currentmode
    }
    else if (pressed == PB_CANCEL) {
      delay(200);
      break;
    }
  }
}