#define DEBUG
#include <SoftwareSerial.h>
#include <Bounce2.h>
#include <stdio.h>
#include <DS1302.h>
#define AUTO 0
#define ON 1
#define OFF 2
const int fanTimeoutSecs = 120;
#define SRX 2
#define STX 3
#define FAN 4
#define HEATER 5
#define AUTO_SW 6
#define ON_SW 7
const int RST = 8;
const int DAT = 9;
const int CLK = 10;
SoftwareSerial m590Serial(SRX, STX);
Bounce debouncerAuto = Bounce();
Bounce debouncerOn = Bounce();
DS1302 rtc(RST, DAT, CLK);
int ch = 0;
String val = "";
String phoneNumber = "";
const char* phoneNumbers[] = {"79518821388", "79297770895"};
int numberPoolSize = sizeof(phoneNumbers) / sizeof(phoneNumbers[0]);
unsigned long timestamp;
unsigned long fanTimeout = (unsigned long)fanTimeoutSecs * 1000;
bool heaterOn;
bool fanOn;
uint8_t mode;
bool modeAuto, modeOn;
String dayAsString(const Time::Day day) {
switch (day) {
case Time::kSunday: return "Sunday";
case Time::kMonday: return "Monday";
case Time::kTuesday: return "Tuesday";
case Time::kWednesday: return "Wednesday";
case Time::kThursday: return "Thursday";
case Time::kFriday: return "Friday";
case Time::kSaturday: return "Saturday";
}
return "(unknown day)";
}
void printTime() {
Time t = rtc.time();
do {
t = rtc.time();
} while (t.yr < 2016);
const String day = dayAsString(t.day);
char buf[50];
snprintf(buf, sizeof(buf), "%s %04d-%02d-%02d %02d:%02d:%02d",
day.c_str(),
t.yr, t.mon, t.date,
t.hr, t.min, t.sec);
Serial.println(buf);
}
void setup() {
pinMode(HEATER, OUTPUT);
pinMode(FAN, OUTPUT);
pinMode(AUTO_SW, INPUT_PULLUP);
pinMode(ON_SW, INPUT_PULLUP);
digitalWrite(HEATER, 0);
digitalWrite(FAN, 0);
heaterOn = false;
fanOn = false;
debouncerAuto.attach(AUTO_SW);
debouncerAuto.interval(5);
debouncerOn.attach(ON_SW);
debouncerOn.interval(5);
InitModem();
rtc.writeProtect(false);
rtc.halt(false);
#ifdef DEBUG
Serial.print("Fan timeout in millis:");
Serial.print(fanTimeout);
Serial.println(".");
#endif
}
void loop() {
debouncerAuto.update();
debouncerOn.update();
modeAuto = !debouncerAuto.read();
modeOn = !debouncerOn.read();
if ((modeAuto) && (mode != AUTO)) {
mode = AUTO;
#ifdef DEBUG
Serial.println("Switching to AUTO.");
#endif
}
if ((modeOn) && (mode != ON)) {
mode = ON;
#ifdef DEBUG
Serial.println("Switching to ON.");
#endif
}
if ((!(modeAuto || modeOn)) && ( mode != OFF)) {
mode = OFF;
#ifdef DEBUG
Serial.println("Switching to OFF.");
#endif
}
switch (mode) {
case AUTO:
if (m590Serial.available()) {
while (m590Serial.available()) {
ch = m590Serial.read();
val += char(ch);
delay(20);
}
if (val.indexOf("+PBREADY") > -1)
InitModem();
if (val.indexOf("RING") > -1) {
if (CheckPhone()) {
m590Serial.println("ATH0");
#ifdef DEBUG
Serial.println("--- MASTER CALL DETECTED ---");
#endif
MasterCall();
} else {
#ifdef DEBUG
Serial.println("--- UNKNOWN CALL DETECTED ---");
#endif
m590Serial.println("ATH0");
}
} else if (val.indexOf("+CMT") > -1) {
if (CheckPhone()) {
#ifdef DEBUG
Serial.println("--- MASTER SMS DETECTED ---");
#endif
MasterSms();
}
}
val = "";
}
if (Serial.available()) {
while (Serial.available()) {
ch = Serial.read();
val += char(ch);
delay(20);
}
ConsolePrint();
val = "";
}
{
Time currentTime = rtc.time();
while (currentTime.yr < 2016) {
currentTime = rtc.time();
}
uint8_t cold;
switch (currentTime.mon) {
case 1:
cold = 3;
break;
case 2:
cold = 3;
break;
case 3:
cold = 2;
break;
case 4:
cold = 1;
break;
case 5:
cold = 1;
break;
case 6:
cold = 0;
break;
case 7:
cold = 0;
break;
case 8:
cold = 0;
break;
case 9:
cold = 1;
break;
case 10:
cold = 2;
break;
case 11:
cold = 3;
break;
case 12:
cold = 3;
break;
}
if (cold > 0) {
if ((!heaterOn) && (currentTime.hr == (20 - cold)) && (currentTime.min == 0)) {
digitalWrite(HEATER, 1);
digitalWrite(FAN, 1);
heaterOn = true;
fanOn = true;
}
if ((heaterOn) && (currentTime.hr == (7 + cold)) && (currentTime.min == 0)) {
digitalWrite(HEATER, 0);
heaterOn = false;
}
}
}
if ((fanOn) && !(heaterOn)) {
if (millis() - timestamp > fanTimeout) {
digitalWrite(FAN, 0);
fanOn = false;
#ifdef DEBUG
Serial.print("Fan switched off in AUTO mode due to timeout (");
Serial.print(fanTimeoutSecs);
Serial.println(" s.)");
#endif
}
}
break;
case ON:
if (!heaterOn) {
digitalWrite(HEATER, 1);
digitalWrite(FAN, 1);
heaterOn = true;
fanOn = true;
}
break;
case OFF:
if (heaterOn) {
digitalWrite(HEATER, 0);
heaterOn = false;
timestamp = millis();
}
if (fanOn) {
if (millis() - timestamp > fanTimeout) {
digitalWrite(FAN, 0);
fanOn = false;
#ifdef DEBUG
Serial.print("Fan switched off in OFF mode due to timeout (");
Serial.print(fanTimeoutSecs);
Serial.println(" s.)");
#endif
}
}
break;
}
}
void InitModem() {
delay(2000);
m590Serial.begin(9600);
m590Serial.println("AT+CLIP=1");
delay(100);
m590Serial.println("AT+CMGF=1");
delay(100);
m590Serial.println("AT+CSCS=\"GSM\"");
delay(100);
m590Serial.println("AT+CNMI=2,2");
delay(100);
Serial.begin(9600);
#ifdef DEBUG
Serial.println("M590 Modem initialized!");
#endif
}
bool CheckPhone() {
for (int i = 0; i < numberPoolSize; i++) {
if (val.indexOf(phoneNumbers[i]) > -1) {
phoneNumber = phoneNumbers[i];
#ifdef DEBUG
Serial.println("Phone number: +" + phoneNumber);
#endif
return true;
}
}
return false;
}
void MasterCall() {
}
void MasterSms() {
if ((val.indexOf("on") > -1) or (val.indexOf("ON") > -1) or (val.indexOf("On") > -1) or (val.indexOf("oN") > -1)) {
digitalWrite(HEATER, 1);
digitalWrite(FAN, 1);
heaterOn = true;
fanOn = true;
#ifdef DEBUG
Serial.println("Heater switched on in AUTO mode (SMS from " + phoneNumber + ").");
#endif
}
if ((val.indexOf("Off") > -1) or (val.indexOf("off") > -1) or (val.indexOf("oFF") > -1) or (val.indexOf("OFF") > -1)) {
digitalWrite(HEATER, 0);
heaterOn = false;
timestamp = millis();
#ifdef DEBUG
Serial.println("Heater switched off in AUTO mode (SMS from " + phoneNumber + ").");
#endif
}
}
void ConsolePrint() {
MasterSms();
if ((val.indexOf("clear") > -1) or (val.indexOf("Clear") > -1) or (val.indexOf("CLEAR") > -1)) {
m590Serial.println("AT+CMGD=0,4");
Serial.println("Clear: All messages removed");
}
if ((val.indexOf("gettime") > -1) or (val.indexOf("GetTime") > -1) or (val.indexOf("Gettime") > -1) or (val.indexOf("getTime") > -1)) {
printTime();
}
if ((val.indexOf("settime") > -1) or (val.indexOf("SetTime") > -1) or (val.indexOf("Settime") > -1) or (val.indexOf("setTime") > -1)) {
Serial.println("Enter year. Range: {2000, ..., 2099} :");
long y = 0;
while ((y < 2000) || (y > 2099))
y = Serial.parseInt();
Serial.print("Year is ");
Serial.println(y);
Serial.println("Enter month. Range: {1, ..., 12} :");
long mon = 0;
while ((mon < 1) || (mon > 12))
mon = Serial.parseInt();
Serial.print("Month is ");
Serial.println(mon);
Serial.println("Enter day of the month. Range: {1, ..., 31} :");
long d = 0;
while ((d < 1) || (d > 31))
d = Serial.parseInt();
Serial.print("Day of the month is ");
Serial.println(d);
Serial.setTimeout(65535);
Serial.println("Enter hour. Range: {0, ..., 23} :");
long h = 99;
do {
h = Serial.parseInt();
}
while ((h < 0) || (h > 23));
Serial.print(h);
Serial.println(" hours");
Serial.println("Enter minutes. Range: {0, ..., 59} :");
long m = 99;
while ((m < 0) || (m > 59))
m = Serial.parseInt();
Serial.print(m);
Serial.println(" minutes");
Serial.println("Enter seconds. Range: {0, ..., 59} :");
long s = 99;
while ((s < 0) || (s > 59))
s = Serial.parseInt();
Serial.print(s);
Serial.println(" seconds");
Serial.println("Enter weekday. Range: {1(Sunday), ..., 7(Saturday)} :");
long w = 0;
while ((w < 1) || (w > 7))
w = Serial.parseInt();
Serial.print("Weekday is ");
Serial.println(dayAsString(w));
Time newTime(y, mon, d, h, m, s, w);
rtc.time(newTime);
}
}
Comments
Post a Comment