/****************************************Libreias**************************************************/

#include <Wire.h>
#include <Adafruit_GFX.h>
#include <Adafruit_SSD1306.h>
#include <Adafruit_HTU21DF.h>
#include <RTClib.h>

//#include <Adafruit_MLX90614.h>
RTC_DS1307 rtc;

//...................................>>>>>>PARA PRUEBA<<<<<<........................................//
//..................................................................................................//

//...................................>>>>>>PARA PRUEBA<<<<<<........................................//
#include <DHT.h>
//..................................................................................................//

//...................................>>>>>>PARA PRUEBA<<<<<<........................................//
#define DHTPIN 25     // Pin donde está conectado el sensor
//..................................................................................................//
//...................................>>>>>>PARA PRUEBA<<<<<<........................................//
#define DHTTYPE DHT22   // Sensor DHT22
//..................................................................................................//

#define SCREEN_WIDTH 128 // OLED display ancho, en pixeles //para rptar texo usar display.setRotation(3); con argumentos de 0 a 3
#define SCREEN_HEIGHT 64 // OLED display height, en pixeles
#define OLED_RESET     4 // pin de reset # (or -1 if sharing Arduino reset pin)
#define SCREEN_ADDRESS 0x3C ///< direccion 0x3D for 128x64, 0x3C for 128x32
Adafruit_SSD1306 display(SCREEN_WIDTH,SCREEN_HEIGHT,&Wire,OLED_RESET);
#define button1    17                      // Button B1 is connected to Arduino pin 9
#define button2    16                     // Button B2 is connected to Arduino pin 8
 
//variables para el control en el menu
int selected = 0;
int entered = -1;

//*****************************************HTU21D****************************************************//
Adafruit_HTU21DF htu = Adafruit_HTU21DF();
//***************************************MLX90614***************************************************//
//Adafruit_MLX90614 termometroIR = Adafruit_MLX90614();
//...................................>>>>>>PARA PRUEBA<<<<<<........................................//
DHT dht(DHTPIN, DHTTYPE);
//..................................................................................................//


//***************************************Imagenes**************************************************//
static const uint8_t nerv[] PROGMEM = {
0X00,0X00,0X00,0X00,0X00,0X00,0X00,0X7E,0X00,0X00,0X00,0X00,0X00,0X00,0X00,0X00,
0X00,0X00,0X00,0X00,0X00,0X00,0X03,0XFF,0XC0,0X00,0X00,0X00,0X00,0X00,0X00,0X00,
0X00,0X00,0X00,0X00,0X00,0X00,0X0F,0XE7,0XF0,0X00,0X00,0X00,0X00,0X00,0X00,0X00,
0X00,0X00,0X00,0X00,0X00,0X00,0X1F,0X00,0XFC,0X00,0X00,0X00,0X00,0X00,0X00,0X00,
0X00,0X00,0X00,0X00,0X00,0X00,0X76,0X00,0X7E,0X00,0X00,0X00,0X00,0X00,0X00,0X00,
0X00,0X00,0X00,0X00,0X00,0X00,0XEC,0X00,0X3F,0X00,0X00,0X00,0X00,0X00,0X00,0X00,
0X00,0X00,0X00,0X00,0X00,0X00,0XCC,0X00,0X3F,0X80,0X00,0X00,0X00,0X00,0X00,0X00,
0X00,0X00,0X00,0X00,0X00,0X01,0X98,0X00,0X1F,0X80,0X00,0X00,0X00,0X00,0X00,0X00,
0X00,0X00,0X00,0X00,0X00,0X03,0X98,0X00,0X1F,0XC0,0X00,0X00,0X00,0X00,0X00,0X00,
0X00,0X00,0X00,0X00,0X00,0X00,0XF8,0X00,0X1F,0X40,0X00,0X00,0X00,0X00,0X00,0X00,
0X00,0X00,0X00,0X00,0X00,0X04,0XD8,0X00,0X1F,0X20,0X00,0X00,0X00,0X00,0X00,0X00,
0X00,0X00,0X00,0X00,0X00,0X04,0XF8,0X00,0X3F,0X20,0X00,0X00,0X00,0X00,0X00,0X00,
0X00,0X00,0X00,0X00,0X00,0X00,0XFC,0X00,0X3F,0X20,0X00,0X00,0X00,0X00,0X00,0X00,
0X00,0X00,0X00,0X00,0X00,0X08,0XFC,0X00,0X7F,0X10,0X00,0X00,0X00,0X00,0X00,0X00,
0X00,0X00,0X00,0X00,0X00,0X08,0XFE,0X00,0XFF,0X10,0X00,0X00,0X00,0X00,0X00,0X00,
0X00,0X00,0X00,0X00,0X00,0X08,0XFF,0X81,0XFF,0X90,0X00,0X00,0X00,0X00,0X00,0X00,
0X00,0X00,0X00,0X00,0X00,0X09,0XFF,0XFF,0XFF,0X90,0X00,0X00,0X00,0X00,0X00,0X00,
0X00,0X00,0X00,0X00,0X00,0X0B,0XFF,0XFF,0XFF,0XF0,0X00,0X00,0X00,0X00,0X00,0X00,
0X00,0X00,0X00,0X00,0X00,0X0F,0XFF,0XFF,0XFF,0XF0,0X00,0X00,0X00,0X00,0X00,0X00,
0X00,0X00,0X00,0X00,0X00,0X07,0XFF,0XFF,0XFF,0XE0,0X00,0X00,0X00,0X00,0X00,0X00,
0X00,0X00,0X00,0X00,0X00,0X07,0XFF,0XE7,0XFF,0XE0,0X00,0X00,0X00,0X00,0X00,0X00,
0X00,0X00,0X00,0X00,0X00,0X03,0XFC,0X00,0X3F,0XE0,0X00,0X00,0X00,0X00,0X00,0X00,
0X00,0X00,0X00,0X00,0X00,0X03,0XF0,0X00,0X0F,0XC0,0X00,0X00,0X00,0X00,0X00,0X00,
0X00,0X00,0X00,0X00,0X00,0X01,0XE0,0X81,0X07,0X80,0X00,0X00,0X00,0X00,0X00,0X00,
0X00,0X00,0X00,0X00,0X00,0X00,0XE0,0X81,0X07,0X00,0X00,0X00,0X00,0X00,0X00,0X00,
0X00,0X00,0X00,0X00,0X00,0X00,0X20,0X81,0X06,0X00,0X00,0X00,0X00,0X00,0X00,0X00,
0X00,0X00,0X00,0X00,0X00,0X00,0X20,0X81,0X04,0X00,0X00,0X00,0X00,0X00,0X00,0X00,
0X00,0X00,0X00,0X00,0X00,0X00,0X20,0X81,0X04,0X00,0X00,0X00,0X00,0X00,0X00,0X00,
0X00,0X00,0X00,0X00,0X00,0X00,0X10,0X00,0X08,0X00,0X00,0X00,0X00,0X00,0X00,0X00,
0X00,0X00,0X00,0X00,0X00,0X00,0X18,0X00,0X18,0X00,0X00,0X00,0X00,0X00,0X00,0X00,
0X00,0X00,0X00,0X00,0X00,0X00,0X0E,0X00,0X70,0X00,0X00,0X00,0X00,0X00,0X00,0X00,
0X00,0X00,0X00,0X00,0X00,0X00,0X01,0XFF,0X80,0X00,0X00,0X00,0X00,0X00,0X00,0X00,

};

//************************************ Fin del codigo del menu *************************************//
void setup() {
  Serial.begin(115200);
//pines 
  pinMode(26,INPUT_PULLUP); // boton de arriba
  pinMode(27,INPUT_PULLUP);// boton de abajo
  pinMode(14,INPUT_PULLUP);// boton enter
  pinMode(12,INPUT_PULLUP);// boton atras
  pinMode(button1, INPUT_PULLUP);
  pinMode(button2, INPUT_PULLUP);
//************************************Comprueba que este la pantalla********************************//
  
  if (!display.begin(SSD1306_SWITCHCAPVCC, SCREEN_ADDRESS)) {
    Serial.println(F("SSD1306 allocation failed"));
    for (;;); // Don't proceed, loop forever
  }
//*************************************Inicia el  HTU21D********************************************//
/*if (!htu.begin()) {
    Serial.println("Couldn't find sensor!");
    while (1);
  }
*/
if (!rtc.begin()) {
    Serial.println(F("Couldn't find RTC"));
    while (1);
  }
//**************************************Inicia el MLX90614******************************************//
//termometroIR.begin();
//*************************************Mensaje de inicio********************************************//
display.clearDisplay();
display.setTextSize(2);
display.setTextColor(SSD1306_WHITE);
display.setCursor(2, 20);
display.println(F("Bienvenido"));
display.display(); //Muestra la imagen 
delay(2000);
display.clearDisplay(); //Borra el buffer
display.drawBitmap(0,0,nerv,128,32,1);
display.display(); //Muestra la imagen 
delay(2000);
display.clearDisplay();
//...................................>>>>>>PARA PRUEBA<<<<<<........................................//

//****************************************Inicia el DHT*********************************************//
dht.begin();
//..................................................................................................//
}
char Time[]     = "  :  :  ";
char Calendar[] = "  /  /20  ";
char temperature[] = " 00.00";
char temperature_msb;
byte i, second, minute, hour, day, date, month, year, temperature_lsb;
 
void display_day(){
  switch(day){
    case 1:  draw_text(40, 0, " SUNDAY  ", 1); break;
    case 2:  draw_text(40, 0, " MONDAY  ", 1); break;
    case 3:  draw_text(40, 0, " TUESDAY ", 1); break;
    case 4:  draw_text(40, 0, "WEDNESDAY", 1); break;
    case 5:  draw_text(40, 0, "THURSDAY ", 1); break;
    case 6:  draw_text(40, 0, " FRIDAY  ", 1); break;
    default: draw_text(40, 0, "SATURDAY ", 1);
  }
}
 
void DS3231_display(){
  // Convert BCD to decimal
  second = (second >> 4) * 10 + (second & 0x0F);
  minute = (minute >> 4) * 10 + (minute & 0x0F);
  hour   = (hour >> 4)   * 10 + (hour & 0x0F);
  date   = (date >> 4)   * 10 + (date & 0x0F);
  month  = (month >> 4)  * 10 + (month & 0x0F);
  year   = (year >> 4)   * 10 + (year & 0x0F);
  // End conversion
 
  Time[7]     = second % 10 + 48;
  Time[6]     = second / 10 + 48;
  Time[4]     = minute % 10 + 48;
  Time[3]     = minute / 10 + 48;
  Time[1]     = hour   % 10 + 48;
  Time[0]     = hour   / 10 + 48;
  Calendar[9] = year   % 10 + 48;
  Calendar[8] = year   / 10 + 48;
  Calendar[4] = month  % 10 + 48;
  Calendar[3] = month  / 10 + 48;
  Calendar[1] = date   % 10 + 48;
  Calendar[0] = date   / 10 + 48;
  if(temperature_msb < 0){
    temperature_msb = abs(temperature_msb);
    temperature[0] = '-';
  }
  else
    temperature[0] = ' ';
  temperature_lsb >>= 6;
  temperature[2] = temperature_msb % 10  + 48;
  temperature[1] = temperature_msb / 10  + 48;
  if(temperature_lsb == 0 || temperature_lsb == 2){
    temperature[5] = '0';
    if(temperature_lsb == 0) temperature[4] = '0';
    else                     temperature[4] = '5';
  }
  if(temperature_lsb == 1 || temperature_lsb == 3){
    temperature[5] = '5';
    if(temperature_lsb == 1) temperature[4] = '2';
    else                     temperature[4] = '7';
  }
 
  draw_text(4,  14, Calendar, 2);                     // Display the date (format: dd/mm/yyyy)
  draw_text(16, 35, Time, 2);                         // Display the time
 
}
 
void blink_parameter(){
  byte j = 0;
  while(j < 10 && digitalRead(button1) && digitalRead(button2)){
    j++;
    delay(25);
  }
}
 
byte edit(byte x_pos, byte y_pos, byte parameter){
  char text[3];
  sprintf(text,"%02u", parameter);
  while(!digitalRead(button1));                      // Wait until button B1 released
  while(true){
    while(!digitalRead(button2)){                    // If button B2 is pressed
      parameter++;
      if(i == 0 && parameter > 31)                   // If date > 31 ==> date = 1
        parameter = 1;
      if(i == 1 && parameter > 12)                   // If month > 12 ==> month = 1
        parameter = 1;
      if(i == 2 && parameter > 99)                   // If year > 99 ==> year = 0
        parameter = 0;
      if(i == 3 && parameter > 23)                   // If hours > 23 ==> hours = 0
        parameter = 0;
      if(i == 4 && parameter > 59)                   // If minutes > 59 ==> minutes = 0
        parameter = 0;
      sprintf(text,"%02u", parameter);
      draw_text(x_pos, y_pos, text, 2);
      delay(200);                                    // Wait 200ms
    }
    draw_text(x_pos, y_pos, "  ", 2);
    blink_parameter();
    draw_text(x_pos, y_pos, text, 2);
    blink_parameter();
    if(!digitalRead(button1)){                       // If button B1 is pressed
      i++;                                           // Increament 'i' for the next parameter
      return parameter;                              // Return parameter value and exit
    }
  }
}

void draw_text(byte x_pos, byte y_pos, char *text, byte text_size) {
  display.setCursor(x_pos, y_pos);
  display.setTextSize(text_size);
  display.print(text);
  display.display();
}
void op1(){
  //...................................>>>>>>PARA PRUEBA<<<<<<........................................//
  /***************************************DHT sensor*******************************************/
  float h = dht.readHumidity(); //Leemos la Humedad
  float t = dht.readTemperature(); //Leemos la temperatura en grados Celsius
  float f = dht.readTemperature(true); //Leemos la temperatura en grados Fahrenheit

//..................................................................................................//
 display.clearDisplay();
    display.setTextSize(1);
    display.setTextColor(SSD1306_WHITE);
    //******************** Mensaje de monitoreo************************
    display.setCursor(25,0);
    display.println(F("Monitoreando"));
    //**********************Temperatura********************************
    display.setCursor(0,8);
    display.println("Temp1:");
    display.setCursor(34,8);
    display.print(t);
    display.setCursor(67,8);
    display.println("Temp2:");
    display.setCursor(101,8);
    display.print(t);
    //display.setCursor(103,8); //simbolo
   // display.display(); 
   //display.startscrollright(0x00, 0x0F);
  //delay(10000);
  //display.stopscroll();
  //delay(100);
  //**********************Humedad************************************
    display.setCursor(0,17);
    display.println("Humedad:");
    display.setCursor(47,17);
    display.print(h);
    //*********************Vibracion***********************************
    display.setCursor(0,25);
    display.println("Vibracion:");
    display.setCursor(59,25);
    display.print(h);


}

void op2(){
  //******************************************Opcion 2************************************************/
//...................................>>>>>>PARA PRUEBA<<<<<<........................................//
  /***************************************DHT sensor*******************************************/
  float h = dht.readHumidity(); //Leemos la Humedad
  float t = dht.readTemperature(); //Leemos la temperatura en grados Celsius
  float f = dht.readTemperature(true); //Leemos la temperatura en grados Fahrenheit

    display.clearDisplay();
    display.setTextSize(1);
    display.setTextColor(SSD1306_WHITE);
    //******************** Mensaje de monitoreo************************
    display.setCursor(0,0);
    display.println(F("Variables tiempo real"));
    //**********************Temperatura********************************
    display.setCursor(0,8);
    display.println("Temperatura:");
    display.setCursor(71,8);
    display.print(t);
    display.setCursor(103,8);
    //display.print((char)0xB0);
    //**********************Humedad************************************
    display.setCursor(0,17);
    display.println("Humedad:");
    display.setCursor(47,17);
    display.print(h);
    //*********************Vibracion***********************************
    display.setCursor(0,25);
    display.println("Vibracion:");
    display.setCursor(59,25);
    display.print(h);
} 
void op3(){
    
  display.display();
   display.setTextColor(WHITE, BLACK);
if(!digitalRead(button1)){                         // If button B1 is pressed
    i = 0;
    while(!digitalRead(button1));                    // Wait for button B1 release
    while(true){
      while(!digitalRead(button2)){                  // While button B2 pressed
        day++;                                       // Increment day
        if(day > 7) day = 1;
        display_day();                               // Call display_day function
        delay(200);                                  // Wait 200 ms
      }
      draw_text(40, 0, "         ", 1);
      blink_parameter();                             // Call blink_parameter function
      display_day();                                 // Call display_day function
      blink_parameter();                             // Call blink_parameter function
      if(!digitalRead(button1))                      // If button B1 is pressed
        break;
    }
 
    date   = edit(4, 14, date);                      // Edit date
    month  = edit(40, 14, month);                    // Edit month
    year   = edit(100, 14, year);                    // Edit year
    hour   = edit(16, 35, hour);                     // Edit hours
    minute = edit(52, 35, minute);                   // Edit minutes
 
    // Convert decimal to BCD
    minute = ((minute / 10) << 4) + (minute % 10);
    hour = ((hour / 10) << 4) + (hour % 10);
    date = ((date / 10) << 4) + (date % 10);
    month = ((month / 10) << 4) + (month % 10);
    year = ((year / 10) << 4) + (year % 10);
    // End conversion
 
    // Write data to DS3231 RTC
    Wire.beginTransmission(0x68);               // Start I2C protocol with DS3231 address
    Wire.write(0);                              // Send register address
    Wire.write(0);                              // Reset sesonds and start oscillator
    Wire.write(minute);                         // Write minute
    Wire.write(hour);                           // Write hour
    Wire.write(day);                            // Write day
    Wire.write(date);                           // Write date
    Wire.write(month);                          // Write month
    Wire.write(year);                           // Write year
    Wire.endTransmission();                     // Stop transmission and release the I2C bus
    delay(200);                                 // Wait 200ms
  }
 
  Wire.beginTransmission(0x68);                 // Start I2C protocol with DS3231 address
  Wire.write(0);                                // Send register address
  Wire.endTransmission(false);                  // I2C restart
  Wire.requestFrom(0x68, 7);                    // Request 7 bytes from DS3231 and release I2C bus at end of reading
  second = Wire.read();                         // Read seconds from register 0
  minute = Wire.read();                         // Read minuts from register 1
  hour   = Wire.read();                         // Read hour from register 2
  day    = Wire.read();                         // Read day from register 3
  date   = Wire.read();                         // Read date from register 4
  month  = Wire.read();                         // Read month from register 5
  year   = Wire.read();                         // Read year from register 6
  Wire.beginTransmission(0x68);                 // Start I2C protocol with DS3231 address
  Wire.write(0x11);                             // Send register address
  Wire.endTransmission(false);                  // I2C restart
  Wire.requestFrom(0x68, 2);                    // Request 2 bytes from DS3231 and release I2C bus at end of reading
  temperature_msb = Wire.read();                // Read temperature MSB
  temperature_lsb = Wire.read();                // Read temperature LSB
  display_day();
  DS3231_display();    // Diaplay time & calendar

 
}
void op4(){
     display.clearDisplay();
    display.setTextSize(1);
    display.setTextColor(SSD1306_WHITE);
    display.setCursor(0, 0);
    display.println(F("Otros"));

}
//Codigo del menu 
void displaymenu() {
 
  int up = digitalRead(26);//Pin del ESP32
  int down = digitalRead(27);//Pin del ESP32
  int enter = digitalRead(14);//Pin del ESP32
  int back = digitalRead(12);//Pin del ESP32

  if (down == LOW && up == LOW) {
  };
  if (down == LOW) {
    selected = selected + 1;
    delay(200);
  };
  if (up == LOW) {
    selected = selected - 1;
    delay(200);
  };
  if (enter == LOW) {
    entered = selected;
    display.clearDisplay();
  };
  if (back == LOW) {
    entered = -1;
 
  };
  const char *options[4] = {
    " Monitoreo",
    " Variables",
    " Config. Fecha",
    " Otros",
};
if (entered == -1) {
    display.clearDisplay();
    display.setTextSize(1);
    display.setTextColor(SSD1306_WHITE);
    display.setCursor(20, 0);
    display.println(F("Menu Principal"));
    
    display.println("");
    for (int i = 0; i < 4; i++) {
      if (i == selected) {
        display.setTextColor(SSD1306_BLACK, SSD1306_WHITE);
        display.println(options[i]);
        }else if (i != selected) {
        display.setTextColor(SSD1306_WHITE);
        display.println(options[i]);
      }
  

  //para hacer que cuando llegue abajo regrese al inicio
  if(selected >=4){
selected = 0;
entered = -1;
  }

if(selected <= -1){
selected = 3;
entered = -1;
  
  }
 
  }
  
}

//******************************************Opcion 1************************************************//
    else if (entered == 0) {
 op1();
    
}
//******************************************Opcion 2************************************************//
  else if (entered == 1) {
 op2();
  }
//******************************************Opcion 3************************************************//
  else if (entered == 2) {
  op3();
  }
//******************************************Opcion 4************************************************//
   else if (entered == 3) {
  op4();
  } 

  display.display();
}
void loop() {
   displaymenu();
  //comportamiento de las variables de control del programa
  Serial.println("selected=");Serial.println(selected); 
  Serial.println("entered=");Serial.println(entered);


 //**************************************Codigo de lectura MLX90614*********************************//
 // Obtener temperaturas grados Celsius
  //float temperaturaAmbiente = termometroIR.readAmbientTempC();
  //float temperaturaObjeto = termometroIR.readObjectTempC();
 
  // Mostrar información
  //Serial.print("Temp. ambiente => ");
 // Serial.print(temperaturaAmbiente);
  //Serial.println("ºC");
 
 // Serial.print("Temp. objeto => ");
 // Serial.print(temperaturaObjeto);
 //Serial.println("ºC");
  
 // delay(2000);
 
  // Si quieres mostrar la información en grados Fahrenheit utiliza las funciones
  // readAmbientTempF() para temperatura ambiente
  // readObjectTempF() para temperatura del objeto

//*****************************Fin del Codigo de lectura MLX90614**********************************//
    




           
}