#include "DHT.h"
#include <LiquidCrystal_I2C.h>

LiquidCrystal_I2C lcd(0x27, 20, 4);

#define pumpPin 8
#define fanPin 9
#define lampPin 10
#define buttonfanPin 11
#define buttonpumpPin 12
#define buttonlampPin 13
#define buttonmodePin 7
#define dhtPin 2
#define DHTTYPE DHT22
DHT dht(dhtPin, DHTTYPE);
int h;
int t;
unsigned long curTime = 0;
unsigned long pPre = 0;
unsigned long pfanPre = 0;
unsigned long pfan1Pre = 0;
unsigned long plampPre = 0;
unsigned long plamp1Pre = 0;
unsigned long pmodePre = 0;
int pTime = 1000;
int pfanTime = 1000;
int pfan1Time = 1000;
int plampTime = 1000;
int plamp1Time = 1000;
int pmodeTime = 50;

int ledPumpState = LOW;
int ledFanState = LOW;
int ledLampState = LOW;
int buttonFan = 0;
int buttonPump = 0;
int buttonLamp = 0;
int buttonMode = 0;
int bfanState = LOW;
int bpumpState = LOW;
int blampState = LOW;
int bmodeState = LOW;

void setup() {
  Serial.begin(115200);
  pinMode(pumpPin, OUTPUT);
  pinMode(fanPin, OUTPUT);
  pinMode(lampPin, OUTPUT);
  pinMode(dhtPin, INPUT);
  pinMode(buttonfanPin, INPUT_PULLUP);
  pinMode(buttonpumpPin, INPUT_PULLUP);
  pinMode(buttonlampPin, INPUT_PULLUP);
  pinMode(buttonmodePin, INPUT_PULLUP);

  dht.begin();
  lcd.begin(20, 4);
  lcd.init();
  lcd.backlight();

}

void loop() {
  curTime = millis();
  h = dht.readHumidity();
  t = dht.readTemperature();
  buttonMode = digitalRead(buttonmodePin);
///////////////////////////////////////////////switch mode
  if (curTime - pmodePre >= pmodeTime) {
    pmodePre = curTime;
    if (buttonMode == LOW) {
      if (bmodeState == LOW) {
        bmodeState = HIGH;
        bpumpState = LOW;
        bfanState = LOW;
        blampState = LOW;
        digitalWrite(pumpPin, bpumpState);
        digitalWrite(fanPin, bfanState);
        digitalWrite(lampPin, blampState);
      } else {
        bmodeState = LOW;
      }
    }
    if (bmodeState == LOW) {
      lcd.setCursor(0, 0);
      lcd.print("Mode : ");
      lcd.print("AUTO");
      lcd.print("         ");
      lcdShow();
      humControl();
      temperaturControl();
    } else {
      lcd.setCursor(0, 0);
      lcd.print("Mode : ");
      lcd.print("MANUAL");
      lcd.print("       ");
      manual();
    }
  }

}


void lcdShow() {
  lcd.setCursor(0, 1);
  lcd.print("Hum :");
  lcd.print(h);
  lcd.print("   ");
  lcd.setCursor(10, 1);
  lcd.print("Temp :");
  lcd.print(t);
  lcd.print("  ");
  lcd.setCursor(0, 2);
  if (digitalRead(9)) {
    lcd.print("Fan :on   ");
  } else {
    lcd.print("Fan :off  ");
  }
  lcd.setCursor(10, 2);
  if (digitalRead(10)) {
    lcd.print("Lamp :on  ");
  } else {
    lcd.print("Lamp :off ");
  }
  lcd.setCursor(0, 3);
  if (digitalRead(8)) {
    lcd.print("Pump:on            ");
  } else {
    lcd.print("Pump:off           ");
  }
}

void humControl() {

  if (h <= 40) {
    if (curTime - pPre >= pTime) {
      pPre = curTime;
      if (ledPumpState == LOW) {
        ledPumpState = HIGH;
        pTime = 3000;
      } else {
        ledPumpState = LOW;
        pTime = 1500;
      }
      digitalWrite(pumpPin, ledPumpState);
    }
  } else if (h > 40 && h < 80) {
    if (curTime - pPre >= pTime) {
      pPre = curTime;
      if (ledPumpState == LOW) {
        ledPumpState = HIGH;
        pTime = 1000;
      } else {
        ledPumpState = LOW;
        pTime = 2000;
      }
      digitalWrite(pumpPin, ledPumpState);
    }
  } else {
    digitalWrite(pumpPin, LOW);
  }
}

void temperaturControl() {
  ///////////////// lamp off, fan on (t>40), lamp on, fan off (t<20)
  if (t <= 20) {
    if (curTime - plampPre >= plampTime) {
      plampPre = curTime;
      if (ledLampState == LOW) {
        ledLampState = HIGH;
        plampTime = 500;
      } else {
        ledLampState = LOW;
        plampTime = 500;
      }
      digitalWrite(lampPin, ledLampState);
      digitalWrite(fanPin, LOW);
    }
  } else if (t >= 40) {
    if (curTime - pfanPre >= pfanTime) {
      pfanPre = curTime;
      if (ledFanState == LOW) {
        ledFanState = HIGH;
        pfanTime = 500;
      } else {
        ledFanState = LOW;
        pfanTime = 500;
      }
      digitalWrite(fanPin, ledFanState);
      digitalWrite(lampPin, LOW);
    }
  } else {
    if (curTime - plamp1Pre >= plamp1Time) {
      plamp1Pre = curTime;
      if (ledLampState == LOW) {
        ledLampState = HIGH;
        plamp1Time = 1000;
      } else {
        ledLampState = LOW;
        plamp1Time = 1000;
      }
      digitalWrite(lampPin, ledLampState);
    }
    if (curTime - pfan1Pre >= pfan1Time) {
      pfan1Pre = curTime;
      if (ledFanState == LOW) {
        ledFanState = HIGH;
        pfan1Time = 1000;
      } else {
        ledFanState = LOW;
        pfan1Time = 1000;
      }
      digitalWrite(fanPin, ledFanState);
    }
  }
}

void manual() {
  //////////////////////////////////////////mode manual
  buttonFan = digitalRead(buttonfanPin);
  delay(50);
  if (buttonFan == 0) {
    if (bfanState == LOW) {
      bfanState = HIGH;
    } else {
      bfanState = LOW;
    }
    digitalWrite(fanPin, bfanState);
  }
  buttonPump = digitalRead(buttonpumpPin);
  delay(50);
  if (buttonPump == 0) {
    if (bpumpState == LOW) {
      bpumpState = HIGH;
    } else {
      bpumpState = LOW;
    }
    digitalWrite(pumpPin, bpumpState);
  }
  buttonLamp = digitalRead(buttonlampPin);
  delay(50);
  if (buttonLamp == 0) {
    if (blampState == LOW) {
      blampState = HIGH;
    } else {
      blampState = LOW;
    }
    digitalWrite(lampPin, blampState);
  }
  lcd.setCursor(0, 1);
  if (bfanState) {
    lcd.print("Fan  : On           ");
  } else {
    lcd.print("Fan  : Off          ");
  }
  lcd.setCursor(0, 2);
  if (bpumpState) {
    lcd.print("Pump : On           ");
  } else {
    lcd.print("Pump : Off          ");
  }
  lcd.setCursor(0, 3);
  if (blampState) {
    lcd.print("Lamp : On           ");
  } else {
    lcd.print("Lamp : Off          ");
  }

}