#include <stdio.h>
#include <Wire.h>
#include <TimeLib.h>
#include <PrayerTimes.h>
#include "RTClib.h"
#include <LiquidCrystal_I2C.h>

int timeAfterAthan = 1;  // min
int timeAfterSalat = 1; // min

int fh, fm;
int dh, dm;
int ah, am;
int mh, mm;
int ih, im;

int flag = 0;
int newMin = 0;

#define inRelay  6
#define outRelay 5

int nowHOUR;
int nowMIN;

RTC_DS3231 rtc;
LiquidCrystal_I2C lcd(0x27, 16, 2);

char daysOfTheWeek[7][12] = {"Sun", "Mon", "Tue", "Wed", "Thu", "Fri", "Sat"};
double times[sizeof(TimeName) / sizeof(char*)];

void setup() {
  Serial.begin(57600);
  if (! rtc.begin()) {
    Serial.println("Couldn't find RTC");
    Serial.flush();
    while (1) delay(10);
  }
  //rtc.adjust(DateTime(2022, 6, 8, 21, 40, 0));
  lcd.init();
  lcd.backlight();
  pinMode(inRelay, OUTPUT);
  pinMode(outRelay, OUTPUT);
  digitalWrite(inRelay, HIGH);
  digitalWrite(outRelay, HIGH);
  delay(1000);
  digitalWrite(inRelay, LOW);
  digitalWrite(outRelay, LOW);
  delay(1000);
  digitalWrite(inRelay, HIGH);
  digitalWrite(outRelay, HIGH);
  delay(1000);
  digitalWrite(inRelay, LOW);
  digitalWrite(outRelay, LOW);
  delay(1000);
  digitalWrite(inRelay, HIGH);
  digitalWrite(outRelay, HIGH);
  delay(1000);
  digitalWrite(inRelay, LOW);
  digitalWrite(outRelay, LOW);
  delay(10000);

  if (rtc.lostPower()) {
    Serial.println("RTC lost power, let's set the time!");
    rtc.adjust(DateTime(F(__DATE__), F(__TIME__)));
  }
}

void loop() {
  DateTime now = rtc.now();

  set_calc_method(Makkah);
  set_asr_method(Shafii);
  set_high_lats_adjust_method(AngleBased);
  set_fajr_angle(18.5);
  set_isha_angle(15);

  //JEDDAH MODIFIED BY DR JABER
  float latitude = 21.588657;
  float longitude = 39.219734;

  get_prayer_times(now.year(), now.month(), now.day(), latitude, longitude, 3, times);

  get_float_time_parts(times[0], fh, fm);
  get_float_time_parts(times[2], dh, dm);
  get_float_time_parts(times[3], ah, am);
  get_float_time_parts(times[5], mh, mm);
  get_float_time_parts(times[6], ih, im);
  im = im * 10;
  /*
    for (int i = 0; i < sizeof(times) / sizeof(double); i++) {
    //char tmp[10];
    int hourss, minutess;
    get_float_time_parts(times[i], hourss, minutess);
    Serial.print(i);
    Serial.print(" \t ");
    Serial.print(TimeName[i]);
    //Serial.print(" \t\t ");
    //Serial.print(times[i]);
    Serial.print(" \t\t");
    Serial.print(hourss);
    Serial.print(":");
    Serial.print(minutess);
    Serial.println();

    }
  */
  nowHOUR = now.hour();
  nowMIN = now.minute();
  Serial.print(now.year(), DEC);
  Serial.print('/');
  Serial.print(now.month(), DEC);
  Serial.print('/');
  Serial.print(now.day(), DEC);
  Serial.print(" (");
  Serial.print(daysOfTheWeek[now.dayOfTheWeek()]);
  Serial.print(") ");
  Serial.print(nowHOUR, DEC);
  Serial.print(':');
  Serial.print(nowMIN, DEC);
  Serial.print(':');
  Serial.print(now.second(), DEC);
  Serial.println();
  lcd.clear();
  lcd.setCursor(0, 0);
  lcd.print(nowHOUR);
  if (nowMIN < 10) {
    lcd.print(":0");
  }
  else {
    lcd.print(":");
  }
  lcd.print(nowMIN);
  lcd.print(" ");
  lcd.print(daysOfTheWeek[now.dayOfTheWeek()]);
  lcd.print(" ");
  //Prayer Time if statments
  //*********************************************************************************
  ////////////////////////////////////////////////////////////////////
  if (nowHOUR <= fh) {
    lcd.print(fh);
    lcd.print(":");
    lcd.print(fm);
    if (nowHOUR == fh && nowMIN == fm) {
      lcd.setCursor(10, 1);
      lcd.print("OUT");
      //turn ON out Relay
      digitalWrite(inRelay, LOW);
      digitalWrite(outRelay, HIGH);
    }
    if (nowHOUR == fh && nowMIN == fm + timeAfterAthan) {
      lcd.setCursor(10, 1);
      lcd.print("IN ");
      //turn ON in Relay
      digitalWrite(inRelay, HIGH);
      digitalWrite(outRelay, LOW);
      flag = 1;
    }
  }
  ////////////////////////////////////////////////////////////////////
  //*********************************************************************************
  ////////////////////////////////////////////////////////////////////
  else if (nowHOUR <= dh) {
    lcd.print(dh);
    lcd.print(":");
    lcd.print(dm);
    if (nowHOUR == dh && nowMIN == dm) {
      lcd.setCursor(10, 1);
      lcd.print("OUT");
      //turn ON out Relay
      digitalWrite(inRelay, LOW);
      digitalWrite(outRelay, HIGH);
    }
    if (nowHOUR == dh && nowMIN == dm + timeAfterAthan) {
      lcd.setCursor(10, 1);
      lcd.print("IN ");
      //turn ON in Relay
      digitalWrite(inRelay, HIGH);
      digitalWrite(outRelay, LOW);
      flag = 1;
    }
  }
  ////////////////////////////////////////////////////////////////////
  //*********************************************************************************
  ////////////////////////////////////////////////////////////////////
  else if (nowHOUR <= ah) {
    lcd.print(ah);
    lcd.print(":");
    lcd.print(am);
    if (nowHOUR == ah && nowMIN == am) {
      lcd.setCursor(10, 1);
      lcd.print("OUT");
      //turn ON out Relay
      digitalWrite(inRelay, HIGH);
      digitalWrite(outRelay, LOW);
    }
    if (nowHOUR == ah && nowMIN == am + timeAfterAthan) {
      lcd.setCursor(10, 1);
      lcd.print("IN ");
      //turn ON in Relay
      digitalWrite(inRelay, HIGH);
      digitalWrite(outRelay, LOW);
      flag = 1;
    }
  }
  ////////////////////////////////////////////////////////////////////
  //*********************************************************************************
  ////////////////////////////////////////////////////////////////////
  else if (nowHOUR <= mh) {
    lcd.print(mh);
    lcd.print(":");
    lcd.print(mm);
    if (nowHOUR == mh && nowMIN == mm) {
      lcd.setCursor(10, 1);
      lcd.print("OUT");
      //turn ON  out Relay
      digitalWrite(inRelay, LOW);
      digitalWrite(outRelay, HIGH);
    }
    if (nowHOUR == mh && nowMIN == mm + timeAfterAthan) {
      lcd.setCursor(10, 1);
      lcd.print("IN ");
      //turn ON  in Relay
      digitalWrite(inRelay, HIGH);
      digitalWrite(outRelay, LOW);
      flag = 1;
    }
  }
  ////////////////////////////////////////////////////////////////////
  //*********************************************************************************
  ////////////////////////////////////////////////////////////////////
  else if (nowHOUR <= ih) {
    lcd.print(ih);
    lcd.print(":");
    lcd.print(im);
    if (nowHOUR == ih && nowMIN == im) {
      lcd.setCursor(10, 1);
      lcd.print("OUT");
      //turn ON out Relay
      digitalWrite(inRelay, LOW);
      digitalWrite(outRelay, HIGH);
    }
    if (nowHOUR == ih && nowMIN == im + timeAfterAthan) {
      lcd.setCursor(10, 1);
      lcd.print("IN ");
      //turn ON in Relay
      digitalWrite(inRelay, HIGH);
      digitalWrite(outRelay, LOW);
      flag = 1;
    }
  }

  else if (nowHOUR > ih) {
    lcd.print(fh);
    lcd.print(":");
    lcd.print(fm);
  }
  ////////////////////////////////////////////////////////////////////
  //*********************************************************************************
  lcd.setCursor(0, 1);
  lcd.print(now.day());
  lcd.print("/");
  lcd.print(now.month());
  lcd.print("/");
  lcd.print(now.year());
  lcd.print(" ");

  if (flag == 1) {
    newMin = newMin + 10;
    if (newMin >= timeAfterSalat * 60) { // 600 = 10 min
      lcd.setCursor(10, 1);
      lcd.print("   ");
      digitalWrite(inRelay, LOW);
      digitalWrite(outRelay, LOW);
      flag = 0;
    }
  }

  delay(10000);
}