#include <Adafruit_BME280.h>
#include <Adafruit_Sensor.h>
#include <Wire.h>
#include <LiquidCrystal_I2C.h>
#include <math.h>
#include <ESP8266WebServer.h>
#include <ESP8266WiFi.h>
#include <ESPAsyncTCP.h>
#include <OneWire.h>
#include <DallasTemperature.h>
 
Adafruit_BME280 bme;
#define D0 16
#define D1 5
#define D2 4
#define D3 0
#define D4 2
#define D5 14
#define D6 12
#define D7 13
#define D8 15
#define ONE_WIRE_BUS 2
const char* ssid = "your network";  // Enter SSID here
const char* password = "your password";  //Enter Password here
const char* PARAM_INPUT_1 = "input1";
const char* PARAM_INPUT_2 = "input2";
const char* PARAM_INPUT_3 = "input3";
int pwm_out_pin = D7; //PWM output pin
int sw1_ip1 = D6; //switch 1 i/p1
int sw1_ip2 = D5; //switch 2 i/p2
int val1 = 0;
int val2 = 0;
int sda_pin = D2; // pin to connect to SDA pin on LCD (can be any data pin)
int scl_pin = D1; // pin to connect to SCL pin on LCD (can be any data pin)
LiquidCrystal_I2C lcd(0x27,20,4); // start up LCD as 16 characters X 2 lines
unsigned long previousMillis = 0;
const long interval = 2000;
float temperature, humidity, pressure, altitude;
OneWire oneWire(ONE_WIRE_BUS);
DallasTemperature sensors(&oneWire);

DeviceAddress TopHeat = {0x28,0xFF,0x64,0x02,0xE8,0x3F,0xF3,0x00};
DeviceAddress BotHeat = {0x28,0xFF,0x64,0x02,0xE8,0x38,0x43,0x5C};
//the following 3 lines are only required for a static network address
IPAddress local_IP(192, 168, xx, xx);
IPAddress gateway(192, 168, xx, xx);       // Set your Gateway IP address
IPAddress subnet(255, 255, 255, 0);


ESP8266WebServer server(80);              

// Variable to store the HTTP request
String header;

//variables for boiling temperature calculations
const double hvapmeth = 35300.0;//vapour constant for methanol J/mol
const double hvapeth = 38560.0;//vapour constant for ethanol J/mol
const double hvapwater = 40800.0;//vapour constant for 
const double pvapsealev = 760.0;//pressure at sea level mmHG
const double ethbpsealev = 78.0;//boiling point of ethanol at sea level deg C 
const double methbpsealev = 64.7;//boiling point of methanol at sea level deg C
const double watbpsealev = 100.0;//boiling point of water at sea level deg C
float BPMeth = 0.0; //boiling point of methanol
float BPEth = 0.0; //boiling point of ethanol
float BPWater = 0.0; //boiling point of watervapabsol = 0.0;//initialise the absolute pressure variable
float pressure_mmhg = 0.0;
float pressure_mb = 0.0;
float bottom_heat = 0.0;
float top_heat = 0.0;
float xhd = 5.0;
float xht = -4.0;
float xtl = 10.0;
const int analogInPin = A0;
int power = 0;
int power_percent = 0;
String state = "";

void setup()
{
  Serial.begin(115200);
  sensors.begin();
  Wire.begin(sda_pin, scl_pin);
  lcd.init();
  lcd.backlight();
  lcd.home();
  lcd.clear();
  pinMode(sw1_ip1, INPUT);
  pinMode(sw1_ip2, INPUT);
  analogWrite(pwm_out_pin, 0);
  analogWriteFreq(100);
  
  // Initialize the sensor (it is important to get calibration values stored on the device).
 
  if (bme.begin(0x76)){
    lcd.println("BME280 init success");
    lcd.setCursor(0,0);
    delay(2000);
    lcd.clear();
  }
  else
  {
    // Oops, something went wrong, this is usually a connection problem,
    // see the comments at the top of this sketch for the proper connections.
 
    lcd.println("BME280 init fail");
   }
  Serial.println("Connecting to ");
  Serial.println(ssid);
 
  //Connect to your local wi-fi network
  delay(1000);
  WiFi.mode(WIFI_STA);
  if (!WiFi.config(local_IP, gateway, subnet)) {
     lcd.print("Connecting to ");
     }
        WiFi.begin(ssid, password);
        while (WiFi.status() != WL_CONNECTED) {
          delay(1000);
          Serial.println("Connecting WiFi..");
          }
  delay(2000);
 
  Serial.println("WiFi connected..!");
  Serial.print("Got IP: ");  Serial.println(WiFi.localIP());
  lcd.setCursor(0, 0);
  lcd.println("Address:http://");
  lcd.setCursor(0, 1);
  lcd.println(WiFi.localIP());
  delay(2000);

  server.on("/get", HTTP_GET, [] (WebServerRequest *request) {
    String inputMessage;
    String inputParam;
    // GET input1 value on <ESP_IP>/get?input1=<inputMessage>
    if (request->hasParam(PARAM_INPUT_1)) {
      inputMessage = request->getParam(PARAM_INPUT_1)->value();
      inputParam = PARAM_INPUT_1;
    }
    // GET input2 value on <ESP_IP>/get?input2=<inputMessage>
    else if (request->hasParam(PARAM_INPUT_2)) {
      inputMessage = request->getParam(PARAM_INPUT_2)->value();
      inputParam = PARAM_INPUT_2;
    }
    // GET input3 value on <ESP_IP>/get?input3=<inputMessage>
    else if (request->hasParam(PARAM_INPUT_3)) {
      inputMessage = request->getParam(PARAM_INPUT_3)->value();
      inputParam = PARAM_INPUT_3;
    }
    else {
      inputMessage = "No message sent";
      inputParam = "none";
    }
    Serial.println(inputMessage);
    request->send(200, "text/html", "HTTP GET request sent to your ESP on input field (" 
                                     + inputParam + ") with value: " + inputMessage +
                                     "<br><a href=\"/\">Return to Home Page</a>");
  });
 
 // server.on("/", handle_OnConnect);
//  server.onNotFound(handle_NotFound);

  server.onNotFound(notFound);
  server.begin();
  Serial.println("HTTP server started");
}

// void handle_NotFound(){
//  server.send(404, "text/plain", "Not found");
//}

//void handle_OnConnect() {
//  server.send(200, "text/html", SendHTML(top_heat,bottom_heat,pressure,power_percent)); 
//}


void loop()
{
  unsigned long currentMillis;
  currentMillis = millis();
 // Loop here getting pressure readings every 5 seconds.
  if (currentMillis - previousMillis >= interval) {
    previousMillis = currentMillis;
//  lcd.clear();
  int set_power = analogRead(analogInPin);
    power = set_power/4;
    power_percent = set_power/10;
    analogWrite(pwm_out_pin, power);
    sensors.requestTemperatures();
    top_heat = sensors.getTempC(TopHeat);
    bottom_heat = sensors.getTempC(BotHeat);  
    temperature = bme.readTemperature();
    pressure = bme.readPressure() / 100.0F;
    val1 = digitalRead(sw1_ip1);
    val2 = digitalRead(sw1_ip2);
//    lcd.home();
    pressure_mmhg = pressure * 0.75; //set pressure in mmhg
          //calculating for Methanol
    float Tm = 64.7 + 273;
    float Tmx = 1/Tm;
    float pvapT1 = 760;                //sea level pressure mmhg
    float a = log(pvapT1/pressure_mmhg); //first part of calculation
    float r = 8.3145;                  // r factor in joules/Kmol
    float b = hvapmeth/r;              //
    float c = b * Tmx;
    float d = a + c;
    BPMeth = (b/d)-273;
           //calculating for Ethanol
    float Te = 78.0 + 273;
    float Tex = 1/Te;
    float e = hvapeth/r;              //
    float f = e * Tex;
    float g = a + f;
    BPEth = (e/g)-273;
           //calculating for water
    float Tw = 100.0 + 273;
    float Twx = 1/Tw;
    float h = hvapwater/r;              //
    float i = h * Twx;
    float j = a + i;
    BPWater = (h/j)-273;
           // calculate the cut points
    float headV = (BPMeth + xhd);
    float heartV = (BPEth - xht);
    float tailV = (BPEth + xtl);
    float headF = ((((BPMeth + xhd) / 16)- headV) * 16) / 0.0625;
    float heartF = ((((BPEth - xht) / 16)- heartV) * 16) / 0.0625;
    float tailF = ((((BPEth + xtl) / 16)- tailV) * 16) / 0.0625;
      if (top_heat <= headV){
        state = "Foresh";
      }
      if (top_heat >= headV && top_heat <= heartV){
        state = "Heads ";
      }
      if (top_heat >= heartV && top_heat <= tailV){
        state = "Hearts";
      }
      if (top_heat >= tailV){
        state = "Tails ";
      }
                
    if (val1 && val2){
      Serial.println("switches off");
      Serial.print("pressure=");
      Serial.print(pressure,2);
      Serial.print(" mB");
      Serial.println();
      Serial.print("Vap=");
      Serial.print(top_heat,2);
      Serial.print(" DegC");
      Serial.print("Keg=");
      Serial.print(bottom_heat,2);
      Serial.print(" DegC");
      Serial.println();
      lcd.setCursor(0, 0);               // set cursor to zero position on line 1
      lcd.println(" Still Measurements ");
      lcd.setCursor(0, 1);               // set cursor to zero position on line 1
      lcd.print("Vap = ");
      lcd.print(top_heat,2);
      lcd.print("Deg C    ");
      lcd.setCursor(0, 2);               // set cursor to zero position on line 2
      lcd.print("Keg = ");
      lcd.print(bottom_heat,2);
      lcd.print("Deg C    ");
      lcd.setCursor(0, 3);               // set cursor to zero position on line 3
      lcd.print("pres=");
      lcd.print(pressure,2);
      lcd.print("mB");
      lcd.print(" ");
      lcd.print(state);
      }
    if (val1 && !val2){
      Serial.println("switch1on");
      Serial.print("Meths Boil=");
      Serial.print(BPMeth);
      Serial.print(" DegC");
      Serial.println();
      Serial.print("Eth Boil=");
      Serial.print(BPEth);
      Serial.print(" DegC");
      Serial.println();
      Serial.print("Water Boil=");
      Serial.print(BPWater);
      Serial.print(" DegC");
      Serial.println();
      lcd.setCursor(0, 0);               // set cursor to zero position on line 1
      lcd.println("  Boiling Points    ");
      lcd.setCursor(0, 1);               // set cursor to zero position on line 1
      lcd.print("Methanol=");
      lcd.print(BPMeth,2);
      lcd.print(" DegC ");
      lcd.setCursor(0, 2);               // set cursor to zero position on line 2
      lcd.print("Ethanol =");
      lcd.print(BPEth,2);
      lcd.print(" DegC ");
      lcd.setCursor(0, 3);               // set cursor to zero position on line 3
      lcd.print("Water   =");
      lcd.print(BPWater,2);
      lcd.print(" DegC ");
      }
    if (val2 && !val1){
      Serial.println("switch2on");
      Serial.print(headV);
      Serial.println();
      Serial.print(heartV);
      Serial.println();
      Serial.print(tailV);
      Serial.println();
      lcd.setCursor(0, 0);
      lcd.println("  Still Setup       ");
      lcd.setCursor(0, 1);               // set cursor to zero position on line 1
      lcd.print("Heads Val=");
      lcd.print(headV);
      lcd.print("Deg C");
      lcd.setCursor(0, 2);               // set cursor to zero position on line 2
      lcd.print("Heart Val=");
      lcd.print(heartV);
      lcd.print("Deg C");
      lcd.setCursor(0, 3);               // set cursor to zero position on line 3
      lcd.print("Tails Val=");
      lcd.print(tailV);
      lcd.print("Deg C");
      }
   
  }
  server.handleClient();
}
String SendHTML(float top_heat,float bottom_heat,float pressure,float power_percent){
  String ptr = "<!DOCTYPE html>";
  ptr +="<html>";
  ptr +="<head>";
  ptr +="<title>Distil Controller</title>";
  ptr +="<meta name='viewport' content='width=device-width, initial-scale=1.0'>";
  ptr +="<link href='https://fonts.googleapis.com/css?family=Open+Sans:300,400,600' rel='stylesheet'>";
  ptr +="<style>";
  ptr +="html { font-family: 'Open Sans', sans-serif; display: block; margin: 0px auto; text-align: center;color: #444444;}";
  ptr +="body{margin: 0px;} ";
  ptr +="h1 {margin: 50px auto 30px;} ";
  ptr +=".side-by-side{display: table-cell;vertical-align: middle;position: relative;}";
  ptr +=".text{font-weight: 600;font-size: 19px;width: 200px;}";
  ptr +=".reading{font-weight: 300;font-size: 50px;padding-right: 25px;}";
  ptr +=".top_heat .reading{color: #F29C1F;}";
  ptr +=".bottom_heat .reading{color: #3B97D3;}";
  ptr +=".pressure .reading{color: #26B99A;}";
  ptr +=".power_percent .reading{color: #955BA5;}";
  ptr +=".superscript{font-size: 17px;font-weight: 600;position: absolute;top: 10px;}";
  ptr +=".data{padding: 10px;}";
  ptr +=".container{display: table;margin: 0 auto;}";
  ptr +=".icon{width:65px}";
  ptr +="</style>";
  ptr +="<script>\n";
  ptr +="setInterval(loadDoc,4000);\n";
  ptr +="function loadDoc() {\n";
  ptr +="var xhttp = new XMLHttpRequest();\n";
  ptr +="xhttp.onreadystatechange = function() {\n";
  ptr +="if (this.readyState == 4 && this.status == 200) {\n";
  ptr +="document.body.innerHTML =this.responseText}\n";
  ptr +="};\n";
  ptr +="xhttp.open(\"GET\", \"/\", true);\n";
  ptr +="xhttp.send();\n";
  ptr +="}\n";
  ptr +="</script>\n";
  ptr +="</head>";
  ptr +="<body>";
  ptr +="<h1>Still Controller</h1>";
  ptr +="<div class='container'>";
  ptr +="<div class='data top_heat'>";
  ptr +="<div class='side-by-side icon'>";
  ptr +="<svg enable-background='new 0 0 19.438 54.003'height=54.003px id=Layer_1 version=1.1 viewBox='0 0 19.438 54.003'width=19.438px x=0px xml:space=preserve xmlns=http://www.w3.org/2000/svg xmlns:xlink=http://www.w3.org/1999/xlink y=0px><g><path d='M11.976,8.82v-2h4.084V6.063C16.06,2.715,13.345,0,9.996,0H9.313C5.965,0,3.252,2.715,3.252,6.063v30.982";
  ptr +="C1.261,38.825,0,41.403,0,44.286c0,5.367,4.351,9.718,9.719,9.718c5.368,0,9.719-4.351,9.719-9.718";
  ptr +="c0-2.943-1.312-5.574-3.378-7.355V18.436h-3.914v-2h3.914v-2.808h-4.084v-2h4.084V8.82H11.976z M15.302,44.833";
  ptr +="c0,3.083-2.5,5.583-5.583,5.583s-5.583-2.5-5.583-5.583c0-2.279,1.368-4.236,3.326-5.104V24.257C7.462,23.01,8.472,22,9.719,22";
  ptr +="s2.257,1.01,2.257,2.257V39.73C13.934,40.597,15.302,42.554,15.302,44.833z'fill=#F29C21 /></g></svg>";
  ptr +="</div>";
  ptr +="<div class='side-by-side text'>Vapour Temperature</div>";
  ptr +="<div class='side-by-side reading'>";
  ptr +=(int)top_heat;
  ptr +="<span class='superscript'>&deg;C</span></div>";
  ptr +="</div>";
  ptr +="<div class='data bottom_heat'>";
  ptr +="<div class='side-by-side icon'>";
  ptr +="<svg enable-background='new 0 0 29.235 40.64'height=40.64px id=Layer_1 version=1.1 viewBox='0 0 29.235 40.64'width=29.235px x=0px xml:space=preserve xmlns=http://www.w3.org/2000/svg xmlns:xlink=http://www.w3.org/1999/xlink y=0px><path d='M14.618,0C14.618,0,0,17.95,0,26.022C0,34.096,6.544,40.64,14.618,40.64s14.617-6.544,14.617-14.617";
  ptr +="C29.235,17.95,14.618,0,14.618,0z M13.667,37.135c-5.604,0-10.162-4.56-10.162-10.162c0-0.787,0.638-1.426,1.426-1.426";
  ptr +="c0.787,0,1.425,0.639,1.425,1.426c0,4.031,3.28,7.312,7.311,7.312c0.787,0,1.425,0.638,1.425,1.425";
  ptr +="C15.093,36.497,14.455,37.135,13.667,37.135z'fill=#3C97D3 /></svg>";
  ptr +="</div>";
  ptr +="<div class='side-by-side text'>Keg Temperature</div>";
  ptr +="<div class='side-by-side reading'>";
  ptr +=(int)bottom_heat;
  ptr +="<span class='superscript'>&deg;C</span></div>";
  ptr +="</div>";
  ptr +="<div class='data pressure'>";
  ptr +="<div class='side-by-side icon'>";
  ptr +="<svg enable-background='new 0 0 40.542 40.541'height=40.541px id=Layer_1 version=1.1 viewBox='0 0 40.542 40.541'width=40.542px x=0px xml:space=preserve xmlns=http://www.w3.org/2000/svg xmlns:xlink=http://www.w3.org/1999/xlink y=0px><g><path d='M34.313,20.271c0-0.552,0.447-1,1-1h5.178c-0.236-4.841-2.163-9.228-5.214-12.593l-3.425,3.424";
  ptr +="c-0.195,0.195-0.451,0.293-0.707,0.293s-0.512-0.098-0.707-0.293c-0.391-0.391-0.391-1.023,0-1.414l3.425-3.424";
  ptr +="c-3.375-3.059-7.776-4.987-12.634-5.215c0.015,0.067,0.041,0.13,0.041,0.202v4.687c0,0.552-0.447,1-1,1s-1-0.448-1-1V0.25";
  ptr +="c0-0.071,0.026-0.134,0.041-0.202C14.39,0.279,9.936,2.256,6.544,5.385l3.576,3.577c0.391,0.391,0.391,1.024,0,1.414";
  ptr +="c-0.195,0.195-0.451,0.293-0.707,0.293s-0.512-0.098-0.707-0.293L5.142,6.812c-2.98,3.348-4.858,7.682-5.092,12.459h4.804";
  ptr +="c0.552,0,1,0.448,1,1s-0.448,1-1,1H0.05c0.525,10.728,9.362,19.271,20.22,19.271c10.857,0,19.696-8.543,20.22-19.271h-5.178";
  ptr +="C34.76,21.271,34.313,20.823,34.313,20.271z M23.084,22.037c-0.559,1.561-2.274,2.372-3.833,1.814";
  ptr +="c-1.561-0.557-2.373-2.272-1.815-3.833c0.372-1.041,1.263-1.737,2.277-1.928L25.2,7.202L22.497,19.05";
  ptr +="C23.196,19.843,23.464,20.973,23.084,22.037z'fill=#26B999 /></g></svg>";
  ptr +="</div>";
  ptr +="<div class='side-by-side text'>Pressure</div>";
  ptr +="<div class='side-by-side reading'>";
  ptr +=(int)pressure;
  ptr +="<span class='superscript'>mB</span></div>";
  ptr +="</div>";
  ptr +="<div class='data power_percent'>";
  ptr +="<div class='side-by-side icon'>";
  ptr +="<svg enable-background='new 0 0 58.422 40.639'height=40.639px id=Layer_1 version=1.1 viewBox='0 0 58.422 40.639'width=58.422px x=0px xml:space=preserve xmlns=http://www.w3.org/2000/svg xmlns:xlink=http://www.w3.org/1999/xlink y=0px><g><path d='M58.203,37.754l0.007-0.004L42.09,9.935l-0.001,0.001c-0.356-0.543-0.969-0.902-1.667-0.902";
  ptr +="c-0.655,0-1.231,0.32-1.595,0.808l-0.011-0.007l-0.039,0.067c-0.021,0.03-0.035,0.063-0.054,0.094L22.78,37.692l0.008,0.004";
  ptr +="c-0.149,0.28-0.242,0.594-0.242,0.934c0,1.102,0.894,1.995,1.994,1.995v0.015h31.888c1.101,0,1.994-0.893,1.994-1.994";
  ptr +="C58.422,38.323,58.339,38.024,58.203,37.754z'fill=#955BA5 /><path d='M19.704,38.674l-0.013-0.004l13.544-23.522L25.13,1.156l-0.002,0.001C24.671,0.459,23.885,0,22.985,0";
  ptr +="c-0.84,0-1.582,0.41-2.051,1.038l-0.016-0.01L20.87,1.114c-0.025,0.039-0.046,0.082-0.068,0.124L0.299,36.851l0.013,0.004";
  ptr +="C0.117,37.215,0,37.62,0,38.059c0,1.412,1.147,2.565,2.565,2.565v0.015h16.989c-0.091-0.256-0.149-0.526-0.149-0.813";
  ptr +="C19.405,39.407,19.518,39.019,19.704,38.674z'fill=#955BA5 /></g></svg>";
  ptr +="</div>";
  ptr +="<div class='side-by-side text'>Power Percent</div>";
  ptr +="<div class='side-by-side reading'>";
  ptr +=(int)power_percent;
  ptr +="<span class='superscript'>%</span></div>";
  ptr +="</div>";
  ptr +="</div>";
  ptr +="<form action="/get">";
  ptr +="input1: <input type="text" name="input1">";
  ptr +="<input type="submit" value="Submit">";
  ptr +="</form><br>";
  ptr +="<form action="/get">";
  ptr +="input2: <input type="text" name="input2">";
  ptr +="<input type="submit" value="Submit">";
  ptr +="</form><br>";
  ptr +="<form action="/get">";
  ptr +="input3: <input type="text" name="input3">";
  ptr +="<input type="submit" value="Submit">";
  ptr +="</form>";
  ptr +="</body>";
  ptr +="</html>";
  return ptr;
}