//declare pins
int inputPin = 39;
String input;

//declare variables for calculation
float mVIn=0;
int currentTemp;
float tenAVG;
float averageTemp;

//set max to 0 initially and min to be large
int maxTemp = 0;
int minTemp = 100000;
float resistance;

//declare counting index
unsigned long i = 0;
unsigned long x = 0;
int minuteIndex = 0;

//declare an array to store the last ten mins of temp.
float lastTenMins[600];
float lastTenAvg;

//converts mV to resistance
float mVToRes(float mV) {
    float volts = mV / 1000;
    float res = ((10000*volts)/(5-volts));
    return res;
}

//converts resistance to Degrees F
int resToTemp(float res) {
    float ratio = res / 10000;
    int temp;
   
    if (0 < ratio < 0.055) {
      temp = 100;
    } else if (0.055<ratio<= 0.060) {
      temp = 98;
    } else if (0.060<ratio<= 0.065) {
      temp = 95;
    } else if (0.065<ratio<=.072) {
      temp = 92;
    } else if (0.072<ratio<=0.076) {
       temp = 90;
    } else if (0.076<ratio<=0.084) {
        temp = 87;
    } else if (0.084<ratio<=0.089) {
        temp = 85;
    } else if (0.089<ratio<=0.097) {
        temp = 82;
    } else if (0.097<ratio<=0.107) {
        temp = 80;
    } else if (0.107<ratio<=0.118) {
        temp = 77;
    } else if (0.118 < ratio<=0.128) {
        temp = 75;
    } else if (0.128<ratio<=0.153) {
        temp = 70;
    } else if (0.153<ratio<=0.184){
        temp = 65;
    } else if (0.184<ratio<=0.224){
        temp = 60;
    } else if (0.224<ratio<=0.272){
        temp = 55;
    } else if (0.272<ratio<=0.334){
        temp = 50;
    } else if (0.334<ratio<=0.41){
        temp = 45;
    } else if (0.41<ratio<=0.507){
        temp = 40;
    } else if (0.507<ratio<=0.633) {
        temp=35;
    } else if (0.633<ratio<=0.71){
        temp = 33;
    } else if ((0.71<ratio) && (ratio<=0.794)) {
        temp = 30;
    } else if ((0.794<ratio)&&(ratio<=.8)){
        temp = 27;
    } else if ((0.8<ratio) && (ratio<=1)) {
        temp = 25;
    } else if ((1<ratio) && (ratio<=1.13)){
        temp = 23;
    } else if ((1.13<ratio) && (ratio<=1.3)){
        temp = 20;
    } else if ((1.3<ratio) && (ratio<=1.45)){
        temp = 18;
    } else if ((1.45<ratio)&&(ratio<=1.6)){
        temp = 15;
    } else if ((1.6<ratio) && (ratio<=1.8)){
        temp = 12;
    } else if ((1.8<ratio) && (ratio<=2)){
        temp = 10;
    } else if ((2<ratio) && (ratio<=2.35)){
        temp = 8;
    } else if ((2.35<ratio) && (ratio<=2.7)){
        temp = 5;
    } else if ((2.7<ratio) && (ratio<=3.2)){
        temp = 3;
    } else if (ratio>3.2) {
        temp = 0;
    }
    int f = ((temp * (1.8)) + 49);
    return f;
}

//converts the current temp, total measurements, and avg. to the new avg.
float tempToAvg(unsigned long j, unsigned long z, float temp, float avg) {
    unsigned long sum = avg * ((z*600) + j);
    float newAvg = ((sum + temp)/((z*600)+j+1));
    return newAvg;
}

//prints out the Summary information
void printSummary(float Max, float Min, float Avg, int current, float lastTenAverage, int seconds) {
        Serial.print("\n\n\n\n\n");
        Serial.println("SUMMARY\n");
        
        Serial.println("Time Since Program Initiation: ");
        Serial.print(seconds);
        Serial.println(" seconds");

        Serial.println("Average Temperature(F): ");
        Serial.println(Avg);

        Serial.println("Temperature Range: ");
        Serial.print(Min);
        Serial.print(" to ");
        Serial.println(Max);
        
        Serial.println("Last Ten Minutes Average Temperature(F): ");
        Serial.println(lastTenAverage);
        
        Serial.println("Current Temperature(F): ");
        Serial.println(current);
        
        Serial.print("\n\n\n\n\n");
       
}


//initialize pins and declare inputs/outputs
void setup() {
  Serial.begin(115200);
  pinMode(inputPin, INPUT);
  for (int x = 0; x<600; x++) {
    lastTenMins[x] = 0;
  }
}

void loop() {
    //read the input pin
    mVIn  = analogRead(inputPin);
   
    //calculate the resistance
    resistance = mVToRes(mVIn);
   
    //calculate the current temperature
    currentTemp = resToTemp(resistance);
    minuteIndex = i;
    lastTenMins[minuteIndex] = currentTemp;

    //Calculate Max and Min temperature
    if (currentTemp > maxTemp) {
        maxTemp = currentTemp;
    }
    if (currentTemp < minTemp) {
        minTemp = currentTemp;
    }

    //Calculate new running average
    averageTemp = tempToAvg(i, x, currentTemp, averageTemp);

    //Calculate last 10 mins average
    unsigned long sumTenMins = 0;
    for (int x = 0; x<600; x++) {
        sumTenMins = sumTenMins + lastTenMins[x];
    }
    float summ = sumTenMins;
    lastTenAvg = (summ/600);
   
    //calculate seconds since startup
    unsigned long mill = millis();
    unsigned long seconds = mill / 1000;
    
    //print data
    if (Serial.available()) {
        input = Serial.readStringUntil('\n');
        input.trim();
    if (input.equals("Summary") || input.equals("summary")){
        printSummary(maxTemp, minTemp, averageTemp, currentTemp, lastTenAvg, seconds);
       
    }} else {
        Serial.print("Current Temperature(F): ");
        Serial.println(currentTemp);
    }


  //increment the seconds counter
  if (i == 599) {
    i = 0;
    x = x+1;
  } else {
   i = i + 1;
  }
   delay(1000);
}