Parte 1:
/*************************************************************************************************************
*
* Title :
* Version : v14
* Last updated : 04.08.15
* Target : Arduino UNO
* Web : http://www.gaffer.it/Arduino.html
* Installato il : 08 SETTEMBRE 2015
* NOTE : ACCENSIONE RITARDATA DI 90 SEC AL VOID SETUP
**************************************************************************************************************/
// INIZIO
#include <SPI.h>
#include <Ethernet.h>
#include <HttpClient.h>
#include <Xively.h>
#include "EmonLib.h" // Include Emon Library
// MAC address for your Ethernet shield
byte mac[] = { 0xDE, 0xAD, 0xBE, 0xEF, 0xFE, 0xED };
// Your Xively key to let you upload data
char xivelyKey[] = "xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx";
/*
D1= ING Controlo Stato caldaia da D6
D2= OUT sempre hight per visualizzazione stato resistenza su xively
D3= ING DHT11
D6= OUT uscita in parallelo a D8 per visualizzazione stato caldaia su xively
D7= OUT relay ventola
D8= OUT relay caldaia
D9= ING Controllo Stato resistenza 2Kw interna al bollitore
*/
// Analog pin which we're monitoring (0 and 1 are used by the Ethernet shield)
// A0 Libero per Ethernet shield
// A1 Libero per Ethernet shield
int sensorPin_A2 = 2; //H2O_IN
float mediaA2; // media valori di A2
//A3 Amperometro Produzione Fotovoltaico FV
//A4 Amperometro Consumi in Casa
int sensorPin_A5 = 5; //H20_OUT
float mediaA5; // media valori di A5
int sensorPin_D1 = digitalRead(1); //STATO CALDAIA
int sensorPin_D3 = digitalRead(3); //DHT11
int sensorPin_D9 = digitalRead(9); //STATO RESISTENZA
const float AnaRef = 5.0; // valore tensione pin di riferimento tensione AREF(5V)
const unsigned int Risoluzione = 1024; // risoluzione (10 bit)
const float RangeMin = 2.0; // temperatura minima °C sensore LM35DZ (alim. 5V, out con res. 2k in serie)
const float RangeMax = 100.0; // temperatura massima °C sensore LM35DZ (alim. 5V, out con res. 2k in serie)
const float Incremento = 0.01; // incremento (10 mV/°C)
float Volt = 0; // valore sensori analogici in volt
const float Isteresi = 1.0; // isteresi (1 °C)
float TA = 0.0; // TA = temperatura aria
float TAM = 2.0; // soglia inferiore temperatura aria (min 2 °C = RangeMin) TAM=TempAriaMin
float TAMAX = 30.0; // soglia superiore temperatura aria (max 100 °C = RangeMax) TAMAX=TempAriaMax
float ToutW = 0.0; // temperatura acqua "TempAcquaOUTtermosolare" = ToutW
float TWMIN = 2.0; // soglia inferiore temperatura acqua (min 2 °C) TWMIN=TempAcquaMin
float TWMAX = 43.0; // soglia superiore temperatura acqua (max 100 °C) TWMAX=TempAcquaMax
float TinW = 0.0; // temperatura acqua in ingresso al termosolare "TempAcquaINGtermosolare" = TinW
EnergyMonitor emon1; // Create an instance CORRENTE GENERATA DAL FOTOVOLTAICO
float media_emon1;
EnergyMonitor emon2; // Create an instance CORRENTE CONSUMATA IN CASA
float media_emon2;
extern unsigned long timer0_millis;
float ConteggioMillis;
// Define the strings for our datastream IDs
char sensorId[] = "2-Temperatura_esterna";
char sensorId1[] = "3-Umidita_esterna";
char sensorId2[] = "6-H2O_Out";
char sensorId3[] = "5-H2O_In";
char sensorId4[] = "4-Ambiente";
char sensorId5[] = "0-Energia_Produzione";
char sensorId6[] = "1-Energia_Consumo";
char sensorId7[] = "7-Caldaia";
char sensorId8[] = "8-R2KW";
XivelyDatastream datastreams[] = {
XivelyDatastream(sensorId, strlen(sensorId), DATASTREAM_FLOAT),
XivelyDatastream(sensorId1, strlen(sensorId1), DATASTREAM_FLOAT),
XivelyDatastream(sensorId2, strlen(sensorId2), DATASTREAM_FLOAT),
XivelyDatastream(sensorId3, strlen(sensorId3), DATASTREAM_FLOAT),
XivelyDatastream(sensorId4, strlen(sensorId4), DATASTREAM_FLOAT),
XivelyDatastream(sensorId5, strlen(sensorId5), DATASTREAM_FLOAT),
XivelyDatastream(sensorId6, strlen(sensorId6), DATASTREAM_FLOAT),
XivelyDatastream(sensorId7, strlen(sensorId7), DATASTREAM_FLOAT),
XivelyDatastream(sensorId8, strlen(sensorId8), DATASTREAM_FLOAT),
//XivelyDatastream(sensorId10, strlen(sensorId10), DATASTREAM_FLOAT),
};
// Finally, wrap the datastreams into a feed
XivelyFeed feed(xxxxxxxxx, datastreams, 9 /* number of datastreams */);
EthernetClient client;
XivelyClient xivelyclient(client);
/////////////////////////////////FINE INIZIALIZZAZIONE XIVELY
//
// FILE: dht11_test1.pde
// PURPOSE: DHT11 library test sketch for Arduino
// DHT11 connesso a pin DIGITALE 3
//
//Celsius to Fahrenheit conversion
double Fahrenheit(double celsius)
{
return 1.8 * celsius + 32;
}
//Celsius to Kelvin conversion
double Kelvin(double celsius)
{
return celsius + 273.15;
}
// dewPoint function NOAA
// reference: http://wahiduddin.net/calc/density_algorithms.htm
double dewPoint(double celsius, double humidity)
{
double C= 373.15/(273.15 + celsius);
double SUM = -7.90298 * (C-1);
SUM += 5.02808 * log10(C);
SUM += -1.3816e-7 * (pow(10, (11.344*(1-1/C)))-1) ;
SUM += 8.1328e-3 * (pow(10,(-3.49149*(C-1)))-1) ;
SUM += log10(1013.246);
double VP = pow(10, SUM-3) * humidity;
double T = log(VP/0.61078); // temp var
return (241.88 * T) / (17.558-T);
}
// delta max = 0.6544 wrt dewPoint()
// 5x faster than dewPoint()
// reference: http://en.wikipedia.org/wiki/Dew_point
double dewPointFast(double celsius, double humidity)
{
double a = 17.271;
double b = 237.7;
double temp = (a * celsius) / (b + celsius) + log(humidity/100);
double Td = (b * temp) / (a - temp);
return Td;
}
#include <dht11.h>
dht11 DHT11;
#define DHT11PIN 3 // PIN DIGITALE 3
void setup() //////// SETUP SETUP SETUP SETUP SETUP SETUP SETUP SETUP
{
delay (90000); //RITARDO ACCENSIONE ARDUINO PER PERMETTERE AL MODEM TIM DI ALLINEARSI
Serial.begin(9600);
Serial.println(F("DHT11 TEST PROGRAM "));
Serial.print(F("LIBRARY VERSION: "));
Serial.println(F(DHT11LIB_VERSION));
Serial.println();
Serial.println("Starting single datastream upload to Xively...");
Serial.println();
while (Ethernet.begin(mac) != 1)
{
Serial.println("Error getting IP address via DHCP, trying again...");
delay(15000);
}
/////////////////////////////////////////////////////////
ConteggioMillis=1;
analogReference(DEFAULT); // DEFAULT (5V), INTERNAL (1,1V), EXTERNAL (0÷5V)
//////////////////////////////////////////////////////////
pinMode(A2, INPUT); // sensore A2 di temp. acqua ING termosolare (TinW)
pinMode(A3, INPUT); // TA Fotovoltaico (Produzione_Energia)
pinMode(A4, INPUT); // TA Casa (Consumo_Energia)
pinMode(A5, INPUT); // sensore A1 di temp. acqua OUT termosolare (ToutW)
pinMode(1, INPUT); //*D1 ingresso controllo stato caldaia da D6
pinMode(2, OUTPUT); // D2 uscita per relè in parallelo alla resistenza 2Kw installata sul bollitore
pinMode(3, INPUT); //*D3 ingresso controllo stato ventola da D5?????????????
pinMode(4, OUTPUT); // TENTATIVO DI NON FAR BLOCCARE LA SCHEDA ETHERNET http://forum.arduino.cc//index.php?topic=186039.15
pinMode(6, OUTPUT); //*USCITA IN PARALLELO AL RELE ACQUA PER VISUALIZZAZIONE WEB STATO CALDAIA
pinMode(7, OUTPUT); // relay ventola ON/OFF
pinMode(8, OUTPUT); // relay caldaia ON/OFF
pinMode(9, INPUT); // D9 ingresso per relè in parallelo alla resistenza da 2Kw installata sul bollitore
pinMode(10, OUTPUT); // TENTATIVO DI NON FAR BLOCCARE LA SCHEDA ETHERNET http://forum.arduino.cc//index.php?topic=186039.15
//////////////// AMPEROMETRI
emon1.current(3, 500); // Current: A3 -CORRENTE GENERATA DAL FOTOVOLTAICO- input pin, calibration (118 valore di calibrazione da gtrovare manualmente)
emon2.current(4, 500); // Current: A4 -CORRENTE CONSUMATA IN CASA- input pin, calibration (118 valore di calibrazione da gtrovare manualmente)
///////////////////////////
}