EnLight (Sunset) v1

/*
   EnLight v1

   Developer: Microbob 
   Contact: microbob@is88.com
*/
#include <LiquidCrystal.h>
#include <CurieTime.h>
#include "constants.h"

LiquidCrystal lcd(12, 11, 5, 4, 3, 2); //LCD init

unsigned long togg;
unsigned int in;
String instr;

unsigned int temp;
String tempstr;
unsigned long prevMil = millis();

unsigned int timeData[6];
bool dirLeft = true;
unsigned long rotDur;

unsigned int calibP = 0;
unsigned int maxBri = 0;
unsigned int minBri = 1023;

unsigned int unHour, unMin, unSec;

unsigned int pos;
unsigned int turn = 0;

#include "voids.h"
void setup() {
  // put your setup code here, to run once:
  Serial.begin(9600);
  lcd.begin(16, 2);

  pinMode(bri, OUTPUT);
  pinMode(func, INPUT);


  lcd.print("Please Open a");
  lcd.setCursor(0, 1);
  lcd.print("Serial Session");
  Serial.println("Type in anything and press <Enter> to continue");
  unsigned int briLev = 0, increment = 5;
  while (Serial.available() == 0) {
    brightness(briLev);
    briLev += increment;
    if (briLev == 255 || briLev < 5)
      increment *= -1;
    delay(25);
  }
  brightness(0);
  lcd.clear();
  serialFlush();

  initHeaders("Introduction");
  Serial.println("Welcome to your EnLight!\n");
  Serial.println("This setup process may run (autonomously) for a max. of 24 hours");
  Serial.println("The user part won't take you more than a few minutes,");
  Serial.println("the rest will be the system calibrating itself to the sun\n");
  Serial.println("Type in \"r\" and press <Enter> when you are ready to continue.");
  Serial.println("Type in anything else and press <Enter> if you want to quit");
  Serial.println("NOTE: Always press <Enter> after you type something in to submit it");
  Serial.println("\nPress the RESET button (if accessible),");
  Serial.println("unplug and replug power to the device,");
  Serial.println("or reopen a serial connection to completely restart/reset at any time");
  while (true) {
    input(false);
    if (in == 114)
      break;
    else if (in == 0)
      continue;
    else {
      Serial.println("\nPress the RESET button (if accessible) to restart,");
      Serial.println("Or unplug and replug power to the device to restart");
      Serial.println("END");
      Serial.flush();
      exit(0);
    }
  }

  calTime();
  calDir();
  calDur();

  while (true) {
    Serial.println("\n\n\n");
    Serial.println("+++++++++++++++++++++++++++++++++++");
    Serial.println("+++++  Manual setup complete  +++++");
    Serial.println("+++++++++++++++++++++++++++++++++++");
    Serial.println("\nHere's your last chance to (re)calibrate anything.");
    Serial.println("1) Time");
    Serial.println("2) Rotation Direction");
    Serial.println("3) Length of Direction");
    Serial.println("\nType in the corresponding number to recalibrate,");
    Serial.println("or type in [y] to continue.");
    input(false);
    if (in == 49)
      calTime();
    else if (in == 50)
      calDir();
    else if (in == 51)
      calDur();
    else if (in == 114)
      break;
  }

  Serial.println("\n\n\n");
  Serial.println("The rest will the device calibrating itself to the sun.");
  Serial.println("This can take up to 24 hours.");
  Serial.println("This is because the system needs to wait for it to be 12:00 PM");
  Serial.println("and start collecting data about the brightness at different");
  Serial.println("points of the suns set.");
  Serial.println("\nPLEASE KEEP POWER TO THIS DEVICE!!!!!");
  Serial.println("The LCD will show the status of the device.");
  Serial.println("\nEnjoy your device and save some power!");
  Serial.println("END");


  brightness(100);
  calibState("Starting...");

  bool from12 = false;
  if (hour() == 12 && minute() == 0 && second() == 0)
    from12 = true;
  else if (hour() < 12) {
    temp = map(hour() * 60 + minute(), 0, 720, 0, 100);
    while (hour() != 12 && minute() != 0 && second() != 0) {
      if (temp > map(hour() * 60 + minute(), 0, 720, 0, 100)) {
        temp = map(hour() * 60 + minute(), 0, 720, 0, 100);
        calibState("Waiting...");
      }
    }
    from12 = true;
  }

  if (from12) {
    while (hour() != 0) {
      if (millis() - prevMil >= 1000) {
        temp = briIn();
        prevMil = millis();
        maxBri = max(temp, maxBri);
        minBri = min(temp, minBri);

        temp = map(hour() * 60 + minute(), 720, 1439, 0, 100);
        if (calibP != temp)
          calibState("Collecting...");
      }
    }
  }
  else {
    unHour = hour();
    unMin = minute();
    unSec = second();

    while (hour() != 0) {
      if (millis() - prevMil >= 1000) {
        temp = briIn();
        prevMil = millis();
        maxBri = max(temp, maxBri);
        minBri = min(temp, minBri);

        temp = map(hour() * 60 + minute(), unHour * 60 + unMin, 1439, 0, 33);
        if (calibP != temp)
          calibState("Collecting...");
      }
    }
    temp = map(hour() * 60 + minute(), 0, 720, 33, 66);
    while (hour() == 12 && minute() == 0 && second() == 0) {
      if (temp > map(hour() * 60 + minute(), 0, 720, 0, 100)) {
        temp = map(hour() * 60 + minute(), 0, 720, 33, 66);
        calibState("Waiting...");
      }
    }
    while (hour() != unHour && minute() != unMin && second() != unSec) {
      if (millis() - prevMil >= 1000) {
        temp = briIn();
        prevMil = millis();
        maxBri = max(temp, maxBri);
        minBri = min(temp, minBri);

        temp = map(hour() * 60 + minute(), 720, 1439, 66, 100);
        if (calibP != temp)
          calibState("Collecting...");
      }
    }
  }

  temp = 100;
  calibState("Complete!");
  delay(1000);

  lcd.clear();
  lcd.print("Starting...");
  delay(1000);

  pos = map(briIn(), 200, 1439, 1, 5);
  drive();
  delay(rotDur / 5 * pos);
  sdrive();
  turn = pos;
}

void loop() {
  // put your main code here, to run repeatedly:
  do {
    if (millis() - prevMil >= 60000) {
      temp = map(briIn(), 200, 1439, 1, 5);
      if (temp != pos) {
        drive();
        delay(rotDur / 5 * (temp - turn));
        sdrive();
        turn = temp - turn;
      }


      lcd.clear();
      lcd.print("Operating...");
      lcd.setCursor(0,1);
      lcd.print(String(map(hour() * 60 + minute(), 720, 1439, 0, 100))+"%");
    }
  } while (turn != 5 || hour() < 22);

  turn = 0;
  while (hour() != 7 && minute() != 30 && second() != 0) {
    if (millis() - prevMil >= 1000) {
      temp = map(hour() * 60 + minute(), 720, 1439, 0, 50);
      if (calibP != temp)
        calibState("Waiting...");
    }
  }
  odrive();

  temp = map(hour() * 60 + minute(), 0, 720, 0, 100);
  while (hour() != 12 && minute() != 0 && second() != 0) {
    if (temp > map(hour() * 60 + minute(), 0, 720, 0, 100)) {
      temp = map(hour() * 60 + minute(), 0, 720, 50, 100);
      calibState("Waiting...");
    }
  }

  pos = map(briIn(), 200, 1439, 1, 5);
  drive();
  delay(rotDur / 5 * pos);
  sdrive();
  turn = pos;
}