Homeduino: universeller LAN/WLAN-Arduino für die Hausautomat

Problemlösungen und Hinweise von allgemeinem Interesse zur Haussteuerung mit HomeMatic

Moderator: Co-Administratoren

Ardubert Homedu
Beiträge: 142
Registriert: 17.07.2016, 10:40
Hat sich bedankt: 3 Mal
Danksagung erhalten: 1 Mal

Re: Homeduino: universeller LAN/WLAN-Arduino für die Hausaut

Beitrag von Ardubert Homedu » 13.09.2017, 08:12

Hast du mal nen Link?
Ich dachte immer der bme wäre dem dht22
Gegenüber So eine gewaltige Verbesserung?

Ich bastel den Grade in den homeduino mit rein...
Wenn der auch nicht so gut ist mach ich mir die Arbeit
Evtl. Doch nicht...

Welche lib wird den beim Weatherman verwendet?

MFG. Flo

Ardubert Homedu
Beiträge: 142
Registriert: 17.07.2016, 10:40
Hat sich bedankt: 3 Mal
Danksagung erhalten: 1 Mal

Re: Homeduino: universeller LAN/WLAN-Arduino für die Hausaut

Beitrag von Ardubert Homedu » 13.09.2017, 21:44

Hallo,

Habe den BME280 jetzt doch in den Homeduino mit eingebaut, :)

ABER
Die Übertragung in die ccu läuft,,,
Die Anzeige am TFT leider nicht.... es wird nur die Temp angezeigt...
Vieleicht kann mich da mal jemand aufklären was ich falsch mache...

Ich vermute das ich was übersehe,, die Temp. ist als D79 verwendet
die anderen 3 Datenpunkte sind dann also D80 D81 D82
Der Scetch geht ja Original nur bis 79..

Ich habe oben die IO Kennung um die 3 Zeilen erweitert,,, auch die Anzeigetexte,,,

Aber ich kann sie am TFT nicht herdrücken,,, geht nur Temp D79
Ich muss also noch irgendwo was erweitern...

komme aber leider nicht dahinter wo oder was...

Code: Alles auswählen

const String Version = "  Blanko"; /*Stand: 2015.09.07 / Verfasser: Eugen Stall
erprobt fuer Arduino Mega 2560 mit Arduino 1.6.5r2 

Erweiterung MAX6675 / ADS1115 / ESP-01 / BME280 - Ardubert Homedu Stand: 13.09.2017 mit Arduino 1.8.4
hier ist immer die aktuelle Version:
http://www.stall.biz/project/homeduino-4-0-das-universelle-mess-und-aktormodul-fuer-die-hausautomation
das folgende homeduino-programm sendet messdaten zur ccu (homeduino als webclient) ...
und empfängt ausgabedaten für die homeduino-outputs (homeduino als webserver)
_________________            ________________
|port 8181 server|<---------<| client        |
|                |           |               |
| CCU            |           |     Homeduino | 
|                |           |               |
|          client|>--------->|server port 80 | 
|________________|           |_______________|

/Quellen:Arduino website plus http://arduino.cc/en/Tutorial/WebClient und ...
 http://tushev.org/articles/arduino/item/52-how-it-works-ds18b20-and-arduino und ...  */
//#############################################################################################
//#############################################################################################
//Auswahl der verwendeten Shields: 
#define tft_display //"tft_display" oder "lcd_display"                         <<user-eingabe<< 
                    //"lcd_display" auch wenn kein display verwendet wird 
#define w5100      //"cc3000"  Wifi-Modul or "w5100" ethernet shield or "esp8266" WiFi       <<user-eingabe<< 
 
char ccu_ip[31] = "192.168.0.225";      //IP der CCU                          <<user-eingabe<< 
//MAC-Adresse dieses Homeduinos ,bei mehreren Homeduinos MAC-.Adresse ändern!!:
// no need for a user specified MAC adress at ESP8266. ESP-01 has a preprogrammed MAC
byte mac[] = { 0xAC, 0xCC, 0xCC, 0xCC, 0xAC, 0xAB };  //                       <<user-eingabe<<

byte homeduino[] = { 192, 168, 0, 238 }; //IP des Homeduino,wenn DHCP versagt <<user-eingabe<< 

char ap_ssid[] = "XXXXXXXXX"; //SSID WLAN in Anführungszeichen                      <<user-eingabe<< 

char ap_password[] = "XXXXXXXXX"; //Passwort WLAN in Anführungszeichen          <<user-eingabe<< 

//xyz ist indiv. Bezeichnung dieses homeduino, keine sonderzeichen, öäüß...
const String homeduino_nummer = "blanko";  //                                     <<user-eingabe<< 
const String hm_systemvariable = "HD_" + homeduino_nummer +"_";
//#############################################################################################
//#############################################################################################
//I/O-Kennung: hier wird die Funktion aller verwendbaren IO´s mit einer Kennziffer festgelegt 
//dabei haben alle IO´s die Standardfunktionen plus spez. Sonderfunktionen
//     Standardfunktionen sind:
//     '0' =andere Nutzg; '1' =dig_in; '2' =dig_out; '3' =1wire '4' =DHTxx; '5' =U_Schall 
//      '8' =I2C , MAX6675 , ADS1115 , BME280 ;

const byte iomodus_D[83] = { 0,0,
 31, //D2 :      Std-fkt; '15' = IR_Rx??  '6' =ImpCount; '31' =tft;   <<user IO-Shield20<< 
 31, //D3 :      Std-fkt; '7' = 433_Rx??  '6' =ImpCount; '31' =tft;   <<user IO-Shield20<< 
 31, //D4 :      Std-fkt; '7' = 433_Tx??  '30' =lcd;     '31' =tft;   <<user IO-Shield20<< 
 31, //D5 :      Std-fkt;                 '30' =lcd;     '31' =tft;   <<user IO-Shield20<< 
 31, //D6 :      Std-fkt; '9' = buzzer    '30' =lcd;     '31' =tft;   <<user IO-Shield20<< 
 31, //D7 :      Std-fkt;                 '30' =lcd;     '31' =tft;   <<user IO-Shield20<< 
 31, //D8 :      Std-fkt;                 '30' =lcd;     '31' =tft;   <<user IO-Shield20<< 
 31, //D9 :      Std-fkt; '16' = IR_Tx??  '30' =lcd;     '31' =tft;   <<user IO-Shield20<< 
 20, //D10 :     Std-fkt; '20' = W5100 SS-Pin;
 0,  //D11 :     Std-fkt;  
 0,  //D12 :     Std-fkt;  
 0,  //D13 :     Std-fkt;
 0,  //D14/TX3 : Std-fkt; '0' =ESP8266;   '12' = rfid3;                <<user IO-Shield-Plus<< 
 0,  //D15/RX3 : Std-fkt; '0' =ESP8266;   '12' = rfid3;                <<user IO-Shield-Plus<< 
 0,  //D16/TX2 : Std-fkt; '0' =ESP8266;   '12' = rfid2;                <<user IO-Shield-Plus<< 
 0,  //D17/RX2 : Std-fkt; '0' =ESP8266;   '12' = rfid2;                <<user IO-Shield-Plus<< 
 0,  //D18/TX1 : Std-fkt; '6' =ImpCount;  '21' =CC3000                 <<user IO-Shield-Plus<< 
 0,  //D19/RX1 : Std-fkt; '6' =ImpCount;                               <<user IO-Shield-Plus<< 
 8,  //D20/SDA : Std-fkt; '6' =ImpCount;  '8' =I2C , ADS1115; ;        <<user IO-Shield-Plus<< 
 8,  //D21/SCL : Std-fkt; '6' =ImpCount;  '8' =I2C , ADS1115; ;        <<user IO-Shield-Plus<< 
 0,  //D22 :     
 0,  //D23 :     
 0,  //D24 :     
 0,  //D25 :     
 0,  //D26 :     
 0,  //D27 :     
 0,  //D28 :     
 0,  //D29 :     
 0,  //D30 :     
 0,  //D31 :     
 0,  //D32 :
 0,  //D33 :     
 0,  //D34 :     
 0,  //D35 :     
 0,  //D36 :
 0,  //D37 :     
 0,  //D38 :
 0,  //D39 :
 0,  //D40 :
 0,  //D41 :
 0,  //D42 :
 0,  //D43 :
 0,  //D44 :
 0,  //D45 :
 0,  //D46 :
 0,  //D47 :                           // Nicht verwendbar wenn MAX6675 Sensor verwendet wird
 0,  //D48 :                           // Nicht verwendbar wenn MAX6675 Sensor verwendet wird
 0,  //D49 :     '8'  = Für MAX6675    // Nicht verwendbar wenn MAX6675 Sensor verwendet wird
 20, //MISO      '20' =W5100;  '21' =CC3000;   ICSP-Stecker
 20, //MOSI      '20' =W5100;  '21' =CC3000;   ICSP-Stecker
 20, //SCK       '20' =W5100;  '21' =CC3000;   ICSP-Stecker
 0, //SS                      '21' =CC3000;
 31, //D54 A0 :  Std-fkt; '10' =analog; '11' =NTC; '31' =tft; '30' =lcd; <<user IO-Shield-20<< 
 31, //D55 A1 :  Std-fkt; '10' =analog; '11' =NTC; '31' =tft;         <<user IO-Shield-20<< 
 31, //D56 A2 :  Std-fkt; '10' =analog; '11' =NTC; '31' =tft;         <<user IO-Shield-20<< 
 31, //D57 A3 :  Std-fkt; '10' =analog; '11' =NTC; '31' =tft;         <<user IO-Shield-20<< 
 31, //D58 A4 :  Std-fkt; '10' =analog; '11' =NTC; '31' =tft;         <<user IO-Shield-20<< 
 0,  //D59 A5 :  Std-fkt; '10' =analog; '11' =NTC;                    <<user IO-Shield-20<< 
 0,0,  
 0,  //D62 A8 :  Std-fkt; '10' =analog; '11' =NTC;                    <<user IO-Shield-Plus<< 
 0,  //D63 A9 :  Std-fkt; '10' =analog; '11' =NTC;                    <<user IO-Shield-Plus<< 
 0,  //D64 A10 : Std-fkt; '10' =analog; '11' =NTC;                    <<user IO-Shield-Plus<< 
 0,  //D65 A11 : Std-fkt; '10' =analog; '11' =NTC;                    <<user IO-Shield-Plus<< 
 0,  //D66 A12 : Std-fkt; '10' =analog; '11' =NTC;                    <<user IO-Shield-Plus<< 
 0,  //D67 A13 : Std-fkt; '10' =analog; '11' =NTC;                    <<user IO-Shield-Plus<< 
 0,  //D68 A14 : Std-fkt; '10' =analog; '11' =NTC;                    <<user IO-Shield-Plus<< 
 0,  //D69 A15 : Std-fkt; '10' =analog; '11' =NTC;                    <<user IO-Shield-Plus<< 
 0,  // '0' =andere Nutzg;   D70 '8' =I2C;                            <<user IO-Shield-Plus<< 
 0,  // '0' =andere Nutzg;   D71 '8' =I2C;                            <<user IO-Shield-Plus<< 
 0,  // '0' =andere Nutzg;   D72 '8' =I2C;                            <<user IO-Shield-Plus<< 
 0,  // '0' =andere Nutzg;   D73 '8' =I2C;                            <<user IO-Shield-Plus<< 
 0,  // '0' =andere Nutzg;   D74 '8' = Für MAX6675                    <<user IO-Shield-Plus<< 
 0,  // '0' =andere Nutzg;   D75 '8' = Für ADS1115 A0                 <<user IO-Shield-Plus<< 
 0,  // '0' =andere Nutzg;   D76 '8' = Für ADS1115 A1                 <<user IO-Shield-Plus<< 
 0,  // '0' =andere Nutzg;   D77 '8' = Für ADS1115 A2                 <<user IO-Shield-Plus<<  
 0,  // '0' =andere Nutzg;   D78 '8' = Für ADS1115 A3                 <<user IO-Shield-Plus<<  
 8,  // '0' =andere Nutzg;   D79 '8' = Für BME280   Temperatur        <<user IO-Shield-Plus<< 
 8,  // '0' =andere Nutzg;   D80 '8' = Für BME280   Druck             <<user IO-Shield-Plus<< 
 8,  // '0' =andere Nutzg;   D81 '8' = Für BME280   Höhe              <<user IO-Shield-Plus<< 
 8,  // '0' =andere Nutzg;   D82 '8' = Für BME280   Luftfeuchte       <<user IO-Shield-Plus<< 
}; 
//#############################################################################################
//hier werden Sensoren am I2C-Eingang aktiviert

const byte iomodus_baro =  0; //'0' =nc; '1' =BMP180,                    <<user IO-Shield-Plus<<
const byte iomodus_lux  =  0; //'0' =nc; '1' =BH1750,                    <<user IO-Shield-Plus<<

const byte iomodus_max1 =  0; //'0' =nc; '1' =MAX6675,                   
const byte iomodus_ads1 =  0; //'0' =nc; '1' =ADS1115,                  
const byte iomodus_bme  =  1; //'0' =nc; '1' =BME280,                 

//#############################################################################################
//hier werden die Kennwerte fuer die Impulszaehler festgelegt
volatile unsigned long pulsecounter[6] = 
{ 0, //Zaehlerstand fuer D2 -Impulseingang bei Reset                    <<user IO-Shield20<<
 0, //Zaehlerstand fuer D3 -Impulseingang bei Reset                     <<user IO-Shield20<<
 0, //Zaehlerstand fuer D21-Impulseingang bei Reset                     <<user IO-Shield-Plus<< 
 3, //Zaehlerstand fuer D20-Impulseingang bei Reset                     <<user IO-Shield-Plus<< 
 4711, //Zaehlerstand fuer D19-Impulseingang bei Reset                  <<user IO-Shield-Plus<< 
 5 //Zaehlerstand fuer D18-Impulseingang bei Reset                      <<user IO-Shield-Plus<< 
}; 
//hier wird der Teilerfaktor für die Impulszaehler festgelegt
const int pulsedivider[6] = 
{6, //Teilerfaktor D2 :                                                 <<user IO-Shield20<<
 1, //Teilerfaktor D3 :                                                 <<user IO-Shield20<<
 1, //Teilerfaktor D21 :                                                <<user IO-Shield-Plus<<
 1, //Teilerfaktor D20 :                                                <<user IO-Shield-Plus<<
 2, //Teilerfaktor D19 :                                                <<user IO-Shield-Plus<<
 1, //Teilerfaktor D18 :                                                <<user IO-Shield-Plus<<
}; 
//#############################################################################################
//#############################################################################################
//hier werden die anzeigetexte für lcd und tft display festgelegt 
String display_message[83] = {
"0","0",         //                              '0' =keine anzeige
"0",  //anzeigetext fuer port D02
"0",  //anzeigetext fuer port D03
"0","0","0","0","0","0",  // ports belegt durch lcd-shield     
"0",  // belegt durch ethernet W5100-shield, lcd-Shield PIN D10 abbiegen! 
"0",  //anzeigetext fuer port D11                             <<user IO-Shield-20<<
"0",  //anzeigetext fuer port D12                             <<user IO-Shield-20<<
"0",  //anzeigetext fuer port D13                             <<user IO-Shield-20<<
"0",  //anzeigetext fuer port D14 /TX3                        <<user IO-Shield-Plus<<
"0",  //anzeigetext fuer port D15 /RX3                        <<user IO-Shield-Plus<<
"0",  //anzeigetext fuer port D16 /TX2                        <<user IO-Shield-Plus<<
"0",  //anzeigetext fuer port D17 /RX2                        <<user IO-Shield-Plus<<
"0",  //anzeigetext fuer port D18 /TX1 /impulszaehler S03     <<user IO-Shield-Plus<<
"0",  //anzeigetext fuer port D19 /RX1 /impulszaehler S02     <<user IO-Shield-Plus<<
"0",  //anzeigetext fuer port D20 /SDA /impulszaehler S01     <<user IO-Shield-Plus<<
"0",  //anzeigetext fuer port D21 /SCL /impulszaehler S00     <<user IO-Shield-Plus<<
"0",  //anzeigetext fuer port D22                             <<user IO-Shield-Plus<<
"0",  //anzeigetext fuer port D23                             <<user IO-Shield-Plus<<
"0",  //anzeigetext fuer port D24                             <<user IO-Shield-Plus<<
"0",  //anzeigetext fuer port D25                             <<user IO-Shield-Plus<<
"0",  //anzeigetext fuer port D26                             <<user IO-Shield-Plus<<
"0",  //anzeigetext fuer port D27                             <<user IO-Shield-Plus<<
"0",  //anzeigetext fuer port D28                             <<user IO-Shield-Plus<<
"0",  //anzeigetext fuer port D29                             <<user IO-Shield-Plus<<
"0",  //anzeigetext fuer port D30
"0",  //anzeigetext fuer port D31
"0",  //anzeigetext fuer port D32
"0",  //anzeigetext fuer port D33
"0",  //anzeigetext fuer port D34
"0",  //anzeigetext fuer port D35
"0",  //anzeigetext fuer port D36
"0",  //anzeigetext fuer port D37   
"0",  //anzeigetext fuer port D38
"0",  //anzeigetext fuer port D39
"0",  //anzeigetext fuer port D40
"0",  //anzeigetext fuer port D41
"0",  //anzeigetext fuer port D42
"0",  //anzeigetext fuer port D43
"0",  //anzeigetext fuer port D44
"0",  //anzeigetext fuer port D45
"0",  //anzeigetext fuer port D46
"0",  //anzeigetext fuer port D47        
"0",  //anzeigetext fuer port D48
"0",  //anzeigetext fuer port D49        
"0","0","0","0",
"0",  // port belegt durch lcd-shield
"0",  //anzeigetext fuer port D55 /A1                         <<user IO-Shield-20<<
"0",  //anzeigetext fuer port D56 /A2                         <<user IO-Shield-20<<
"0",  //anzeigetext fuer port D57 /A3                         <<user IO-Shield-20<<
"0",  //anzeigetext fuer port D58 /A4                         <<user IO-Shield-20<<
"0",  //anzeigetext fuer port D59 /A5                         <<user IO-Shield-20<<
"0","0",
"0",  //anzeigetext fuer port D62 /A8                         <<user IO-Shield-Plus<<
"0",  //anzeigetext fuer port D63 /A9                         <<user IO-Shield-Plus<<
"0",  //anzeigetext fuer port D64 /A10                        <<user IO-Shield-Plus<<
"0",  //anzeigetext fuer port D65 /A11                        <<user IO-Shield-Plus<<
"0",  //anzeigetext fuer port D66 /A12                        <<user IO-Shield-Plus<<
"0",  //anzeigetext fuer port D67 /A13                        <<user IO-Shield-Plus<<
"0",  //anzeigetext fuer port D68 /A14                        <<user IO-Shield-Plus<<
"0",  //anzeigetext fuer port D69 /A15                        <<user IO-Shield-Plus<<
// die folgenden Anzeigetexte sind für Module mit mehreren Datenpunkten z.b. I2C-Module
"L-Druck/mB:",  //anzeigetext fuer   D70 I2C 
"L-Temp./C :",  //anzeigetext fuer   D71 I2C 
"Lux/lx    :",   //anzeigetext fuer  D72I2C 
"UV-Index  :",  //anzeigetext fuer   D73 I2C
"MAX6675 ",     //anzeigetext fuer   D74  Für MAX6675             MAX6675,
"ADS1115 A0  ",  //anzeigetext fuer          D75  Für ADS1115 A0
"ADS1115 A1  ",  //anzeigetext fuer          D76  Für ADS1115 A1
"ADS1115 A2  ",  //anzeigetext fuer          D77  Für ADS1115 A2
"ADS1115 A3  ",  //anzeigetext fuer          D78  Für ADS1115 A3
"BME280 Temperatur: ",  //anzeigetext fuer   D79  Für MBE280 Temperatur
"BME280 Druck: ",       //anzeigetext fuer   D80  Für MBE280 Druck
"BME280 Höhe: ",        //anzeigetext fuer   D81  Für MBE280 Höhe
"BME280 Feuchte: ",     //anzeigetext fuer   D81  Für MBE280 Feuchte
};
//#############################################################################################
//#############################################################################################
//hier werden die Zugangsberechtigungen für den RDM6300 Rfid-Reader und FOBs festgelegt
const byte fob_anzahl = 20;
const String fob[3*fob_anzahl] = {
"2381286","eugen","1",   // '0' = kein Tueroeffner                      <<user IO-Shield-Plus<<
"2381287","eugen","1",   // '1' = Tueroeffner1 D22                      <<user IO-Shield-Plus<<
"2381381","eugen","2",   // '2' = Tueroeffner2 D23                      <<user IO-Shield-Plus<<
"2380830","leonie","3",  // '3' = beide Tueroeffner                     <<user IO-Shield-Plus<<
"2409284","fabian","2"   //                                             <<user IO-Shield-Plus<<
"2409385","fabian","2"   //                                             <<user IO-Shield-Plus<<
"2409289","fabian","2"   //                                             <<user IO-Shield-Plus<<
"2519298","not used","0" //                                             <<user IO-Shield-Plus<<
"2519208","not used","0" //                                             <<user IO-Shield-Plus<<
"2519388","not used","0" //                                             <<user IO-Shield-Plus<<
"2519488","not used","0" //                                             <<user IO-Shield-Plus<<
"2511288","not used","0" //                                             <<user IO-Shield-Plus<<
"2529288","not used","0" //                                             <<user IO-Shield-Plus<<
"2619288","not used","0" //                                             <<user IO-Shield-Plus<<
"2719288","not used","0" //                                             <<user IO-Shield-Plus<<
"3519208","not used","0" //                                             <<user IO-Shield-Plus<<
"2519088","not used","0" //                                             <<user IO-Shield-Plus<<
"2519088","not used","0" //                                             <<user IO-Shield-Plus<<
"2510288","not used","0" //                                             <<user IO-Shield-Plus<<
"2510288","not used" "0" //                                             <<user IO-Shield-Plus<<
};
const unsigned long unlock_time1 = 5000; //oeffnungszeit rfid1 in ms    <<user IO-Shield-Plus<<
const unsigned long unlock_time2 = 5000; //oeffnungszeit rfid2 in ms    <<user IO-Shield-Plus<<
const boolean oeffner_polarity = 1;   // '1' normal, '0'  invers        <<user IO-Shield-Plus<<
//#############################################################################################
//#############################################################################################
//#############################################################################################

#include <SPI.h>
#include <Wire.h> 
#include <OneWire.h>   //für Temperatursensoren DS18B20
                       //http://www.hacktronics.com/code/OneWire.zip
#include <NewPing.h>   //für Ultraschallsensoren SR04
                       //https://arduino-new-ping.googlecode.com/files/NewPing_v1.5.zip
#include "DHT.h"       //für Temperatursensoren SHT22
                       //https://github.com/adafruit/DHT-sensor-library/archive/master.zip
#include <AS_BH1750.h> //für I2C-Luxmeter
                       //https://github.com/hexenmeister/AS_BH1750/archive/master.zip
#include <SFE_BMP180.h>//für I2C-Barometer
                       //https://github.com/sparkfun/BMP180_Breakout/archive/master.zip
#include <RCSwitch.h>  // läuft noch nicht!
#include <EEPROM.h>

#include <WiFiEsp.h>   //https://github.com/bportaluri/WiFiEsp
                       //für ESP-01 Modul

#include "max6675.h"   //   MAX6675

#include <Adafruit_ADS1015.h>                       

#include <Adafruit_Sensor.h>    // BME280
#include <Adafruit_BME280.h>    // BME280


//#include <IRremote.h>// läuft noch nicht!

//der folgende Bereich ist bei verwendung w5100 auszukommentieren
//ausblenden mit " #if defined (5100)" funktioniert leider nicht!! 
/*
//Initialisierung des CC3000 Wifi auf dem IO-Shield-Plus  
#include <SFE_CC3000.h>// fuer cc3000 wifi
                 // http://github.com/sparkfun/SFE_CC3000_Library/archive/master.zip
#include <SFE_CC3000_Client.h>
// Pins
#define CC3000_INT 18  // int-Pin mit Wifi Shield ist D3, mit breakout auf IO-Shield-Plus D18
#define CC3000_EN 46   // en-Pin mit Wifi Shield ist D5, mit breakout auf IO-Shield-Plus  D46
#define CC3000_CS 53   // cs-Pin mit Wifi Shield ist D10, mit breakout auf IO-Shield-Plus D53
SFE_CC3000 wifi = SFE_CC3000(CC3000_INT, CC3000_EN, CC3000_CS);
SFE_CC3000_Client client = SFE_CC3000_Client(wifi);
unsigned int ap_security = WLAN_SEC_WPA2; // Security of network
unsigned int timeout = 30000; // Milliseconds
char server[] = "192,168,178,50"; // Remote host site
*/

#if defined (w5100)  //************************************************************************ 
//der folgende Bereich ist die Initialisierung des LAN bei Verwendung des LAN-Shields
#include <Ethernet.h> 
EthernetClient client;
EthernetServer server(80);
#endif  //************************************************************************************* 

#if defined (esp8266)
    WiFiEspClient client;
    WiFiEspServer server(80);
#endif 
    unsigned long reqCount = 0;

//********************************************************************************************

#if defined(tft_display)  
#include <Adafruit_GFX.h>    //Quelle: https://github.com/adafruit/Adafruit-GFX-Library
#include <Adafruit_TFTLCD.h> //Quelle:   https://github.com/buhosoft/TFTLCD-Library
#include <stdint.h>
#include "TouchScreen.h"      
//Quelle: http://www.smokeandwires.co.nz/blog/a-2-4-tft-touchscreen-shield-for-arduino/
#define YP A1  // must be an analog pin, use "An" notation!
#define XM A2  // must be an analog pin, use "An" notation!
#define YM 7   // can be a digital pin
#define XP 6   // can be a digital pin
#define MINPRESSURE 10
#define MAXPRESSURE 1000
TouchScreen ts = TouchScreen(XP, YP, XM, YM, 330);

//***********************************************************************
// color definitions for e.g. ILI9327 TFT
#define BLACK   0x0000
#define BLUE    0x001F
#define RED     0xF800
#define GREEN   0x07E0
#define CYAN    0x07FF
#define MAGENTA 0xF81F
#define YELLOW  0xFFE0
#define WHITE   0xFFFF

/*
// color definitions for e.g. ILI9341 TFT tft_type =
#define BLACK   0xFFFF  
#define BLUE    0xFFE0 
#define RED     0x07FF 
#define GREEN   0xF81F 
#define CYAN    0xF800 
#define MAGENTA 0x07E0 
#define YELLOW  0x001F 
#define WHITE   0x0000 
*/

 #define default_color WHITE //standard text color on TFTs   <-- User Eingabe
//********************************************************************************

#define LCD_CS A3 // Chip Select goes to Analog 3
#define LCD_CD A2 // Command/Data goes to Analog 2
#define LCD_WR A1 // LCD Write goes to Analog 1
#define LCD_RD A0 // LCD Read goes to Analog 0

#define tft_rotation 1 //3 oder 1 abhägig vom tft-shield typ               <<user-eingabe<< 

#define LCD_RESET A4 // Can alternately just connect to Arduino's reset pin
Adafruit_TFTLCD tft(LCD_CS, LCD_CD, LCD_WR, LCD_RD, LCD_RESET);
int touch_y;
const byte zeilenzahl = 6;
int px,py,pz;
boolean touch, touch_alt;
unsigned long next_touch_time = 0;
boolean centertouch = 1;
boolean receivingcommand = false;
int espbyte = 0;

/*
//2,4'' display
const long int px_A = 901,  py_A = 183;  //touch-koordinaten oben-links                
const long int px_B = 192,  py_B = 189;  //touch-koordinaten oben-rechts              
const long int px_C = 936,  py_C = 860;  //touch-koordinaten unten-links              
#define schriftgroesse 3 
#define tft_type 1   // 1 ist 2,4''display   2 ist 3.95''display
 */
//3,95'' display und 3,5 display
const long int px_A = 105, py_A = 915;  //touch-koordinaten oben-links               
const long int px_B =920,  py_B = 908;  //touch-koordinaten oben-rechts             
const long int px_C =105,  py_C = 116;  //touch-koordinaten unten-links       
/*
const long int px_A = 962, py_A = 137;  //touch-koordinaten oben-links               
const long int px_B =92,  py_B = 127;  //touch-koordinaten oben-rechts             
const long int px_C =969,  py_C = 907;  //touch-koordinaten unten-links 
*/
#define schriftgroesse 3  
#define tft_type 2   // 1 ist 2,4''display   2 ist 3.95''display

//**************************************************************************************

//*********************************************************************************************
long int p_x, p_y ;   //normierte aktuelle touch-koordinaten: 
                      //oben links ist 0,0 und unten rechts ist 1000,1000
#endif  //*************************************************************************************

#if defined(lcd_display)  //*******************************************************************
//https://www.dfrobot.com/wiki/index.php?title=Arduino_LCD_KeyPad_Shield_%28SKU:_DFR0009%29
#include <LiquidCrystal.h> 
LiquidCrystal lcd(8, 9, 4, 5, 6, 7); // initialize library with numbers of the interface pins
const byte zeilenzahl = 2;
#endif  //*************************************************************************************

int x, x_alt;
byte zeile_pointer[6];
String zeile_data[6] = {"     ","     ","     ","     ","     ","     "};
String display_zeile_alt[6],display_zeile[6];
String taster;

char zeichen,buffer[50];
boolean fob_da =0;
String zeich, fob_hex, fob_dec,Name, lcd_rfid_message, oeffner, Value;
unsigned long fob_zahl,time_rfid3 = 0,time_rfid2 = 0; 
byte zeichen_zahl;

//********************************************************************************************* 
AS_BH1750 sensor; //Initialize BH1750 Luxmeter library
float lux;
long Lux;
int laenge;
SFE_BMP180 pressure;
char status;
double T,P,p0;
boolean reading = false;
String command = String(200);
String baro_string,baroT_string, lux_string;
//********************************************************************************************* 

const float ALTITUDE = 579.0; // eigene seehoehe in metern              <<user IO-Shield-Plus<<
#define SEALEVELPRESSURE_HPA (1013.25)

//********************************************************************************************* 
                         //  BME280
     
Adafruit_BME280 bme; // I2C

float bmeT = 0;
float bmeP = 0;
float bmeA = 0;
float bmeH = 0;

//*********************************************************************************************
boolean last_digital_value_D[80];
float last_value_D[80],last_IR_value,last_RF_value;
unsigned long next_Time[80];  
double last_baro_value,last_baroT_value;
boolean complete_loop =1; // wenn 1, dann einmal komplett durchlaufen
String befehl,sub_command = String(20),parameter = String(20),header = String(20);
int param,port_pin;
boolean port_data;
boolean value;
String I;
int analogwert;
//**********************************************************************
                       //  ADS1115
Adafruit_ADS1115 ads;

float adc0 = 0;
float adc1 = 0;
float adc2 = 0;
float adc3 = 0;

//**********************************************************************
               //   MAX6675          MAX6675,
// hier sind einzutragen welche Pins für den MAX Verwendet werden sollen
int thermoDO = 47;   // D47 - SO   --> auf MAX6675
int thermoCS = 48;   // D48 - CS   --> auf MAX6675
int thermoCLK = 49;  // D49 - SCK  --> auf MAX6675
float thermo_C = 0;
//********************************************************************************************* 
float tempNTC;
const float B_wert = 3950; //aus dem Datenblatt des NTC //<<user-eingabe<<
const float Tn = 298.15; //25°Celsius in °Kelvin 
const float Rv = 10000; //Vorwiderstand
const float Rn = 10000; //NTC-Widerstand bei 25°C
float Rt,temp_tur,humidity;
 
const float delta_onewire = 0.2; //Deltas für Sendeauslösung 
const float delta_DHT = 0.2; //in °C 
const float delta_us = 3.0; // in cm
const float delta_analog = 1.0; // in inkrement
const float delta_ntc = 0.5; //in °C
const float delta_lux = 15; //in lux
const float delta_counter = 1; //in counter inkrement
const double delta_baro = 0.5; //in mB
const double delta_baroT = 0.5; //in °C
const float delta_max = 1.0; // in °C                 //   MAX6675     MAX6675,
const float delta_ads0 = 1.0; // in inkrement          // ADS1115  A0
const float delta_ads1 = 1.0; // in inkrement          // ADS1115  A1
const float delta_ads2 = 1.0; // in inkrement          // ADS1115  A2
const float delta_ads3 = 1.0; // in inkrement          // ADS1115  A3
const float delta_bmeT = 1.0; // in °C          // BME280  Temperatur
const float delta_bmeP = 1.0; // in hPa         // BME280  Druck
const float delta_bmeH = 1.0; // in %           // BME280  Feuchte
const float delta_bmeA = 1.0; // in m           // BME280  Höhe

long duration, cm; //variable für Ultraschallsensor
unsigned long time_sr04;
 
unsigned long next_full_loop = 0;
unsigned long delta_time = 3600000; // jede Stunde werden alle Inputs aktualisiert
unsigned long delta_tx = 1000; //in ms, minimaler Abstand der Telegramme an die CCU
unsigned long next_tx = 0, time_wait = 0; 

int rf_key;
String rfkey;
RCSwitch mySwitch = RCSwitch();

unsigned zaehlwert;
unsigned last_zaehlwert[6] = {0,0,0,0,0,0};
boolean ccu_presence;

//#############################################################################################
//#############################################################################################
void setup() 
{Serial.begin(9600); 
//+++++++ einrichtung der interrupts fuer impulszahler D2,D3,D18,D19,D20,D21
 if ((pulsedivider[0] > 0) && (iomodus_D[2] == 6)) 
   {pinMode(2, INPUT_PULLUP); attachInterrupt(0, ISR_0, FALLING);}
 if ((pulsedivider[1] > 0) && (iomodus_D[3] == 6)) 
   {pinMode(3, INPUT_PULLUP); attachInterrupt(1, ISR_1, FALLING);} 
 if ((pulsedivider[2] > 0) && (iomodus_D[21] == 6)) 
   {pinMode(21, INPUT_PULLUP); attachInterrupt(2, ISR_2, FALLING);}
 if ((pulsedivider[3] > 0) && (iomodus_D[20] == 6)) 
   {pinMode(20, INPUT_PULLUP); attachInterrupt(3, ISR_3, FALLING);}
 if ((pulsedivider[4] > 0) && (iomodus_D[19] == 6)) 
   {pinMode(19, INPUT_PULLUP); attachInterrupt(4, ISR_4, FALLING);}

 #if defined (w5100)  //************************************************************************* 
 if ((pulsedivider[5] > 0) && (iomodus_D[18] == 6))  //interrupt reserviert fuer cc3000
   {pinMode(18, INPUT_PULLUP); attachInterrupt(5, ISR_5, FALLING);}
 #endif  //*************************************************************************************

//+++++++ rfid initialisieren
 if ((iomodus_D[15] == 12) && (iomodus_D[14] == 12)){Serial3.begin(9600);}
 if ((iomodus_D[17] == 12) && (iomodus_D[16] == 12)){Serial2.begin(9600);}

#if defined (lcd_display)  //******************************************************************
//+++++++ lcd initialisieren
 lcd.begin(16, 2); delay(200);  //16 zeichen in 2 zeilen
 lcd.setCursor(0,0);
 lcd.print(" Homeduino 4.0  ");
#endif  
//*************************************************************************************
 //************************************************************************************
#if defined (tft_display) 
//+++++++ tft initialisieren
 tft.reset();
 int identifier = tft.readID();                       // chip erkennung  bzw display nur weiss??
// int identifier = 0x9341; tft.begin(identifier);
 if (identifier == 0)
  {Serial.print(F("Unknown LCD driver chip: "));
    Serial.println(identifier, HEX);
    Serial.print(F("I try use ILI9341 LCD driver "));
    identifier = 0x9341;
  }
 tft.begin(identifier);
 Serial.print(F("TFT identifier:" )); Serial.println(identifier, HEX);   
 delay(100);
 
 tft.fillScreen(BLACK); tft.setRotation(tft_rotation);
 if (tft_type ==1) //2,4'' display 320x240
   {tft_print (1,"  Homeduino",4,YELLOW);
    tft_print (2,"     5.04",4,YELLOW);
    String wlan_ssid = " Connecting to WLAN: " + String::String(ap_ssid);
    tft_print (4,wlan_ssid,1,WHITE);
    tft_print (5," Blanko",4,CYAN);
    tft.drawRect(0,0, 319, 240, GREEN);
   } 
  if (tft_type ==2)  //3,95'' display 480x320
   {tft_print (1,"   Homeduino",5,YELLOW);
    tft_print (2,"      5.04",5,YELLOW);
    String wlan_ssid = " Connecting to WLAN: " + String::String(ap_ssid);
    tft_print (4,wlan_ssid,2,WHITE);
    tft_print (5,"  Blanko",5,BLUE);
    tft.drawRect(0,0, 480, 320, BLUE);
  }  
#endif  //*************************************************************************************

for(int i=0; i<zeilenzahl; i++)
   {zeile_pointer[i] = EEPROM.read(i);  //anzeige-pointer aus eeprom holen
    if (zeile_pointer[i] >82) {zeile_pointer[i] = 0;}  //wenn eeprom erstes mal benutzt wird
   } 

#if defined (w5100)  //************************************************************************
//hier folgt die LAN Initialisierung 
char myIpString[24];
 if (Ethernet.begin(mac) == 0) // start the Ethernet connection:
   {Serial.println("Failed to configure Ethernet using DHCP"); Ethernet.begin(mac, homeduino);}
    delay(1000);// give the Ethernet shield a second to initialize:
    Serial.println("connecting..."); // if you get a connection, report back via serial:
 if (client.connect(ccu_ip, 8181)) {}
   else {Serial.println("connection failed");} // if you didn't get a connection to the server:
 client.stop(); 
 IPAddress myIp = Ethernet.localIP();
 sprintf(myIpString, "%d.%d.%d.%d", myIp[0], myIp[1], myIp[2], myIp[3]); 
 I = myIpString;
 befehl = "GET /xy.exe?antwort=dom.GetObject('"+hm_systemvariable+"IP"+"').State('"+ I + "')";
 set_sysvar(); 
 server.begin();
#endif  //*************************************************************************************

#if defined (cc3000)  //**********************************************************************
// hier folgt die CC3000 Initialisierung 
 ConnectionInfo connection_info;
 char myIpString[24]; 
 Serial.println("SparkFun CC3000 - WebClient");
 if ( wifi.init() ) {Serial.println("init complete");} 
 else {Serial.println("problem with init!");}
 // Connect using DHCP
 if (!wifi.connect(ap_ssid, ap_security, ap_password, timeout)) 
   {Serial.println("no connection to AP");}
 //build IP address
 if ( !wifi.getConnectionInfo(connection_info) ) {Serial.println("no connection details");} 
   else {sprintf(myIpString, "%d.%d.%d.%d", connection_info.ip_address[0], 
   connection_info.ip_address[1],connection_info.ip_address[2], connection_info.ip_address[3]); 
         I = myIpString;
        }
 befehl = "GET /xy.exe?antwort=dom.GetObject('"+hm_systemvariable+"IP"+"').State('" + I + "')";
 set_sysvar(); 
 client.stop();
#endif  //*************************************************************************************

//************************************************************************   
#if defined (esp8266)  


       char myIpString[24]; 
       pinMode(22,OUTPUT); digitalWrite(22,1); // Reset-Pin auf 1 setzen
       Serial2.begin(115200); // Standard baudrate for current ESP-01 modules with Espressif firmware. Old ones use 9600 baud
        // initialize ESP module to different baudrate. HANDLE WITH CARE!!! Only enable next lines if you know what you are doing!
//        Serial2.write("AT+UART_DEF=115200,8,1,0,0\r\n"); //Modify default baudrate of 115200 (current Espressif FW) to reduce ESP Timeout Problems
//        Auf_OK_warten(); //Only throws OK when the module is reconfigured for the first time. On subsequent boots a Timeout occurs because the comm-rate already IS @ the target rate
//        Serial2.end();
//        delay(3000); 
//        Serial2.begin(115200); 
        
       Serial.println(F("Resetting ESP-01 module"));
       digitalWrite(22,0); delay(100); digitalWrite(22,1); delay(1000);//reset-Impuls ausgeben und Bootmeldungen abwarten
       Serial.println(F("Espressif ESP8266 - WebClient"));

        Serial2.write("AT\r\n");
        Auf_OK_warten(); //wait until reset is completed and ESP-01 responds again

      // initialize ESP module
        WiFi.init(&Serial2);
      
       // check for the presence of the shield
        if (WiFi.status() == WL_NO_SHIELD) {
          Serial.println(F("WiFi shield not present"));
          tft_print (4," No WLAN shield! STOP!!!",2,(RED));
          tft_print (3,"",3,BLACK);
            if (tft_type ==5) //2,8'' Elegoo display 320x240
            {tft.drawRect(0,0, 320, 240, (RED));}
          // don't continue
          while (true);
        }

            // attempt to connect to WiFi network
          while ( status != WL_CONNECTED) {
            Serial.print(F("Attempting to connect to WPA SSID: "));
            Serial.println(ap_ssid); 
            tft_print (4," WLAN shield ok- connecting",2,(MAGENTA));
            if (tft_type ==5) {tft.drawRect(0,0, 320, 240, (MAGENTA));}               //2,8'' Elegoo display 320x240
            // Connect to WPA/WPA2 network
            status = WiFi.begin(ap_ssid, ap_password);
            }

              // you're connected now, so print out the data
            Serial.println(F("You're connected to the network"));
            
             // print the SSID of the network you're attached to
              Serial.print(F("SSID: "));
              Serial.println(WiFi.SSID());
            
              // print your WiFi shield's IP address
              IPAddress ip = WiFi.localIP();
              Serial.print(F("IP Address: "));
              Serial.println(ip);
              sprintf(myIpString, "%d.%d.%d.%d", ip[0], ip[1], ip[2], ip[3]);
              I = myIpString;
              // print my MAC address
              byte mac[6];
              WiFi.macAddress(mac);
              char buf[20];
              sprintf(buf, "%02X:%02X:%02X:%02X:%02X:%02X", mac[5], mac[4], mac[3], mac[2], mac[1], mac[0]);
              Serial.print(F("MAC address: "));
              Serial.println(buf);
#endif
              
#if defined DEBUG
              Serial.print(F("String IP Address: "));
              Serial.println(myIpString);
#endif
  
#if defined (esp8266)              
              // print the received signal strength
              long rssi = WiFi.RSSI();
              Serial.print(F("Signal strength (RSSI):"));
              Serial.print(rssi);
              Serial.println(F(" dBm"));
              delay(6000); //let the Wifi connection establish itself
              Serial.println(F("Announcing my IP"));
              befehl = "GET /xy.exe?antwort=dom.GetObject('"+hm_systemvariable+"IP"+"').State('"+ I + "')";
              set_sysvar(); 
              server.begin();
#endif       

#if defined (lcd_display)  //****************************************************************** 
//bei erfolgreichem einloggen ausgabe ip-adresse 
lcd.setCursor(0,1);
lcd.print(myIpString);
delay(3000);
#endif  
//*************************************************************************************
//**************************************************************************************
#if defined (tft_display) 
//bei erfolgreichem einloggen ausgabe ip-adresse 
 
if (tft_type ==1) //2,4'' display
  {tft.setCursor(8, 230); //fusszeile
   tft.setTextColor(GREEN);  
   tft.setTextSize(1);
   tft.print(Version + "           Homeduino IP: "); tft.print(myIpString);
  }
if (tft_type ==2) //3,95'' display 480x320
  {tft.setCursor(1, 300); //fusszeile
   tft.setTextColor(BLUE);  
   tft.setTextSize(2);
   tft.print(Version + " IP:"); tft.print( myIpString); // tft.print("  dBm:");tft.print(rssi);   //fuer wifi dbm anzeige
  }
#endif  
//*************************************************************************************
for (int i = 0; i < 80; i++) {next_Time[i]=0;} //
 //delay(2000);
//****************************************************************************************
                                //ADS1115
ads.begin();  

                                     //BME280
 status = bme.begin(0x76);   
    if (!status) {
        Serial.println("Could not find a valid BME280 sensor, check wiring!");
        while (1);
    }
}
//#############################################################################################
//#############################################################################################
void loop() 
{complete_loop = 0;
 if (millis() > next_full_loop) //mindestens jede Stunde eine komplette Aktualisierung
   {complete_loop = 1; next_full_loop = millis() + delta_time; 
    if (next_full_loop < millis()) {complete_loop = 0;} //wichtig wegen Zahlensprung 
                                                        //von millis() alle 50 Tage
   } 
//*********************************************************************************************
 for (int i = 2; i < 70; i++) //behandlung aller Ports D2 bis D69 
 {while ((iomodus_D[i] == 0) || (iomodus_D[i] >29 )) {i++;}  // unbenutzte pins überspringen
  datenempfang(); //nach jeder Messung auf Datenempfang schalten
  display_data(); //display ausgeben und abfragen
 //******************************************************************************************** 
 if (iomodus_D[i] == 1) //behandlung digitaleingänge 
   {if (millis() > next_Time[i])
      {next_Time[i] = next_Time[i] +1000;  //digitaleingänge nicht häufiger als alle 1000ms abfragen
       pinMode(i, INPUT_PULLUP); 
       digitalWrite(i, HIGH);
       value =digitalRead(i);
       for (int m=0; m < zeilenzahl; m++)
         {if (zeile_pointer[m] == i) 
            {if (value ==0) {zeile_data[m] = "LOW";} else {zeile_data[m] = "HIGH";}}}
       if ((!value == last_digital_value_D[i]) || complete_loop) 
         {I = String(i);
          befehl="GET /xy.exe?antwort=dom.GetObject('"+hm_systemvariable+"D"+I+"').State("+value+")";
          set_sysvar();
          last_digital_value_D[i] = value;
         }
      } 
   }
//********************************************************************************************* 
 if (iomodus_D[i] == 3) //behandlung onewire 
   {if (millis() > next_Time[i])
      {next_Time[i] = next_Time[i] +10000;  //onewire nicht häufiger als alle 10s abfragen 
       pinMode(i, INPUT_PULLUP);
       digitalWrite(i,HIGH);
       OneWire ds(i); 
       #define DS18S20_ID 0x10
       #define DS18B20_ID 0x28 
       byte present = 0;   byte data[12];    byte addr[8];
       temp_tur = 1000.0;
       if (!ds.search(addr)) { ds.reset_search(); temp_tur = -1000.0; } //find a device
       if ((OneWire::crc8( addr, 7) != addr[7]) && (temp_tur > -1000.0)) {temp_tur = -1000.0; }
       if ((addr[0] != DS18S20_ID && addr[0] != DS18B20_ID)&& (temp_tur > -1000.0)) 
         {temp_tur = -1000.0;}
       if (temp_tur > -1000.0) 
         {ds.reset(); 
          ds.select(addr); 
          ds.write(0x44, 1); // Start conversion
          //delay(850); // Wait some time...
          time_wait = millis() +850;                       //wahrend der 2s wartezeit, daten empfangen
          while (millis() < time_wait) {datenempfang();display_data;} //und display weiter bedienen 
          present = ds.reset(); 
          ds.select(addr);
          ds.write(0xBE); // Issue Read scratchpad command
          for ( int k = 0; k < 9; k++) { data[k] = ds.read(); } // Receive 9 bytes
          temp_tur = ( (data[1] << 8) + data[0] )*0.0625; // Calculate temperature value 18B20
          //temp_tur = ( (data[1] << 8) + data[0] )*0.5 // Calculate temperature value 18S20
         }
       for (int m=0; m < zeilenzahl; m++)
         {if (zeile_pointer[m] == i) {zeile_data[m] = String(temp_tur,1);}
         }
       if ((temp_tur > (last_value_D[i] + delta_onewire)) 
                            || (temp_tur < (last_value_D[i] - delta_onewire)) || complete_loop) 
         {I = String(i);
          befehl="GET /xy.exe?antwort=dom.GetObject('"+hm_systemvariable+"D"+I+"').State("+temp_tur+")";
          set_sysvar();
          last_value_D[i] = temp_tur;
         }
      }   
  }
//********************************************************************************************* 
 if (iomodus_D[i] == 4) //behandlung DHT temperatur- und feuchtesensoren
   {if (millis() > next_Time[i])
      {next_Time[i] = next_Time[i] +60000;  //DHT nicht häufiger als alle 30s abfragen 
       DHT dht(i, DHT22); //je nach verwendetem sensor "DHT11", "DHT22" (AM2302),"DHT 21" (AM2301)
       dht.begin();
       //delay(2000); // Sensor readings may also be up to 2 seconds 'old' (its a very slow sensor)
       time_wait = millis() +2000;                       //wahrend der 2s wartezeit, daten empfangen
       while (millis() < time_wait) {datenempfang();display_data;} //und display weiter bedienen 
       humidity = dht.readHumidity(); // Read temperature as Celsius
       temp_tur = dht.readTemperature(); 
       if (isnan(humidity) || isnan(temp_tur) ) // Check if any reads failed and 
         {//Serial.println("Failed to read from DHT sensor!");
          temp_tur = -1000;
         }
        for (int m=0; m < zeilenzahl; m++)
         {if (zeile_pointer[m] == i) {zeile_data[m] = (String(temp_tur,1) + "C  " + String(humidity,1) + "%F");}
         }
       if ((temp_tur > (last_value_D[i] + delta_DHT))|| (temp_tur < (last_value_D[i] - delta_DHT)) 
                                                  || complete_loop) 
         {I = String(i);
          befehl="GET /xy.exe?antwort=dom.GetObject('"+hm_systemvariable+"D"+I+"').State('"+temp_tur+"')";
          set_sysvar();
           befehl="GET /xy.exe?antwort=dom.GetObject('"+hm_systemvariable+"D"+I+"_1').State('"+humidity+"')";
          set_sysvar();
          last_value_D[i] = temp_tur;
        } 
     }
   } 
 //******************************************************************************************** 
 if (iomodus_D[i] == 5) //behandlung ultraschallsensoren 
   {if (millis() > next_Time[i])
      {next_Time[i] = next_Time[i] +2000;  //ultraschall nicht häufiger als alle 2s abfragen 
 //achtung: zu beachten 
 //bei verwendung der US-Sensoren beim IO-Shield-Plus sind die 150-Ohm-Schutzwiderstände 
 //zu überbrücken (Jumper setzen!), entsprechend beim IO-Shield20 der Jumper 4-5 zu setzen!! 
       NewPing sonar(i, i, 200); // NewPing setup of pin and maximum distance.
       unsigned int uS = sonar.ping(); // Send ping, get ping time in microseconds (uS).
       int cm = uS / US_ROUNDTRIP_CM;
       for (int m=0; m < zeilenzahl; m++)
         {if (zeile_pointer[m] == i) {zeile_data[m] = String(cm);}}
          if ((cm > (last_value_D[i] + delta_us)) || (cm < (last_value_D[i] - delta_us)) || complete_loop) 
            {I = String(i);
             befehl = "GET /xy.exe?antwort=dom.GetObject('"+hm_systemvariable+"D"+I+"').State("+cm+")";
             set_sysvar();
             last_value_D[i] = cm;
            } 
      }
   }
//********************************************************************************************* 
 if (iomodus_D[i] == 10) //behandlung analogeingänge 
   {if (millis() > next_Time[i])
      {next_Time[i] = next_Time[i] +60000;  //analogeingänge nicht häufiger als alle 1000ms abfragen 

            analogwert = analogRead(i); 
          //  analogwert = map(analogwert ,0,1023,0,100 ) * 1.03 + 25;                  // skalieren
     
       for (int m=0; m < zeilenzahl; m++)
         {if (zeile_pointer[m] == i) {zeile_data[m] = String(analogwert);}}
       if ((analogwert > (last_value_D[i] + delta_analog)) 
                || (analogwert < (last_value_D[i] - delta_analog)) || complete_loop) 
         {I = String(i);
          befehl="GET /xy.exe?antwort=dom.GetObject('"+hm_systemvariable+"D"+I+"').State("+analogwert+")";
          set_sysvar();
          last_value_D[i] = analogwert;
         }
      }
   } 
//*********************************************************************************************
 if (iomodus_D[i] == 11) //behandlung NTC 
   {if (millis() > next_Time[i])
      {next_Time[i] = next_Time[i] +10000;  //NTC-eingänge nicht häufiger als alle 10s abfragen
       Rt = Rv/((1024.0/analogRead(i))- 1.0);
       tempNTC = (B_wert * Tn / ( B_wert + (Tn * log(Rt/Rn)))) -Tn +25.0 ;
       for (int m=0; m < zeilenzahl; m++)
         {if (zeile_pointer[m] == i) {zeile_data[m] = String(tempNTC,1);}}
          if ((tempNTC > (last_value_D[i] + delta_ntc)) || (tempNTC < (last_value_D[i] - delta_ntc)) 
                                                   || complete_loop) 
            {I = String(i);
             befehl="GET /xy.exe?antwort=dom.GetObject('"+hm_systemvariable+"D"+I+"').State("+tempNTC+")";
             set_sysvar();
             last_value_D[i] = tempNTC;
            } 
      }
   }     
//********************************************************************************************* 
 if (iomodus_D[i] == 6) //behandlung impulszahler D2,D3,D21,D20,D19,D18 
   {byte offset =23;
    if (i ==2) {offset = 4;} if (i ==3) {offset = 6;}
    zaehlwert = pulsecounter[offset - i ] / pulsedivider[offset - i ];
    for (int m=0; m < zeilenzahl; m++)
      {if (zeile_pointer[m] == i) {zeile_data[m] = String(zaehlwert);}}
       if ((pulsedivider[offset -i] > 0) && ((zaehlwert > (last_zaehlwert[offset - i]+ delta_counter) 
                           || complete_loop))) 
         {I = String(offset -i);
          befehl="GET /xy.exe?antwort=dom.GetObject('"+hm_systemvariable+"imp"+I+"').State("+zaehlwert+")";
          set_sysvar();
          last_zaehlwert[offset - i] = zaehlwert;
         } 
   } 
//*********************************************************************************************
//behandlung I2C sensoren an pin 20(sda) und pin 21 (scl)
 if ((iomodus_D[i] == 8)&&(i == 20))
   {i++;  // da I2C Bus 2 eingaenge belegt
  
//***********************************************************************************************
// behandlung Luxmeter BH1750 an SCL pin21 und SDA pin 20 
// for normal sensor resolution (1 lx resolution, 0-65535 lx, 120ms, no PowerDown) 
//use: sensor.begin(RESOLUTION_NORMAL, false); 
    if (iomodus_lux ==1)
      {if (millis() > next_Time[72])
         {next_Time[72] = next_Time[72] +60000;  //luxmeter nicht häufiger als alle 5s abfragen 
          if(!sensor.begin()) { Serial.println("Sensor not present"); }
          lux = sensor.readLightLevel(); //delay(1000);
          Lux = (int)lux;
          //Serial.print("Helligkeit/lux: "); Serial.print(lux); Serial.println();
          lux_string = "      " + String(Lux);
          int laenge = lux_string.length();
          lux_string = lux_string.substring(laenge -6,laenge);
          for (int m=0; m < zeilenzahl; m++)
            {if (zeile_pointer[m] == 72) {zeile_data[m] = lux_string;}}
             if (((Lux > (last_value_D[72] + delta_lux)) || (Lux < (last_value_D[72] - delta_lux)) 
                                                || complete_loop)) 
               {befehl="GET /xy.exe?antwort=dom.GetObject('" + hm_systemvariable+"lux"+"').State("+Lux+")";
                set_sysvar();
                last_value_D[72] = Lux;
               }
         } 
       } 
       
//*************************************************************************************************
   //behandlung barometer BMP180 an SCL pin21 und SDA pin 20
    if (iomodus_baro ==1)
      {if (millis() > next_Time[70])
         {next_Time[70] = next_Time[70] +60000;  //barometer nicht häufiger als alle 30s abfragen 
          if (pressure.begin()) {status = pressure.startTemperature();}
          if (status) {delay(status); status = pressure.getTemperature(T);} //messung T
          if (status) {status = pressure.startPressure(3);} // //messung P mit resolution 0 bis 3
          if (status) {delay(status); status = pressure.getPressure(P,T);}
          if (status) {p0 = pressure.sealevel(P,ALTITUDE);} // umrechnung auf N.N.
//Serial.print("Hoehe/m: "); Serial.print(ALTITUDE); Serial.print(" Temperatur/C: "); 
//Serial.print(T); Serial.print(" Normaldruck /mb: "); Serial.println(p0); 
          baro_string = "     " + String(p0);
          laenge = baro_string.length();
          baro_string = baro_string.substring(laenge -7,laenge -1);
          baroT_string = "      " + String(T);
          laenge = baroT_string.length();
          baroT_string = baroT_string.substring(laenge -7,laenge -1);
          for (int m=0; m < zeilenzahl; m++) {if (zeile_pointer[m] == 70) {zeile_data[m] = baro_string;}}
          if ((p0 > (last_baro_value + delta_baro)) || (p0 < (last_baro_value - delta_baro)) 
                                                || complete_loop) 
            {befehl="GET /xy.exe?antwort=dom.GetObject('"+hm_systemvariable+"baro"+"').State("+p0+")";
             set_sysvar();
             last_baro_value = p0;
             last_value_D[70] = p0;
            }
          for (int m=0; m < zeilenzahl; m++) {if (zeile_pointer[m] == 71) {zeile_data[m] = baroT_string;}}  
          if ((T > (last_baroT_value + delta_baroT)) || (p0 < (last_baroT_value - delta_baroT)) 
                                                     || complete_loop) 
            {befehl="GET /xy.exe?antwort=dom.GetObject('"+hm_systemvariable+"baroT"+"').State("+T+")";
             set_sysvar();
             last_baroT_value = T;
             last_value_D[71] = T;
            } 
         }
      } 

//**********************************************************************************************
                         //         ADS1115   nr1
                            
       if (iomodus_ads1 ==1)
      {if (millis() > next_Time[75])
         {next_Time[75] = next_Time[75] +2000;  //ADS1115 nicht häufiger als alle 1s abfragen 

        
    adc0 = ads.readADC_SingleEnded(0);
   //   adc0 = map(adc0 ,210,32000,0,5760 )  ;                          // skalieren
    
    adc1 = ads.readADC_SingleEnded(1);
    //  adc1 = map(adc1 ,0,1023,0,100 )  * 1.03 + 25;                  // skalieren
    
    adc2 = ads.readADC_SingleEnded(2);
    //  adc2 = map(adc2 ,0,1023,0,100 )  * 1.03 + 25;                  // skalieren
    
    adc3 = ads.readADC_SingleEnded(3);
    //  adc3 = map(adc3 ,0,1023,0,100 )  * 1.03 + 25;                  // skalieren
    
    //  Serial.print("AIN0: "); Serial.println(adc0);
    //  Serial.print("AIN1: "); Serial.println(adc1);
    //  Serial.print("AIN2: "); Serial.println(adc2);
    //  Serial.print("AIN3: "); Serial.println(adc3);
    //  Serial.println(" ");

          
          for (int m=0; m < zeilenzahl; m++)
            {if (zeile_pointer[m] == 75) {zeile_data[m] = adc0;}}
             if (((adc0 > (last_value_D[75] + delta_ads0)) || (adc0 < (last_value_D[75] - delta_ads0)) 
                                                || complete_loop))                       
               {befehl="GET /xy.exe?antwort=dom.GetObject('" + hm_systemvariable+"D75"+"').State("+adc0+")";
                set_sysvar();
                last_value_D[75] = adc0;
               }

               for (int m=0; m < zeilenzahl; m++)
                {if (zeile_pointer[m] == 76) {zeile_data[m] = adc1;}}
             if (((adc1 > (last_value_D[76] + delta_ads1)) || (adc1 < (last_value_D[76] - delta_ads1)) 
                                                || complete_loop))          
               {befehl="GET /xy.exe?antwort=dom.GetObject('" + hm_systemvariable+"D76"+"').State("+adc1+")";
                set_sysvar();
                last_value_D[76] = adc1;
               }

               for (int m=0; m < zeilenzahl; m++)
                {if (zeile_pointer[m] == 77) {zeile_data[m] = adc2;}}
             if (((adc2 > (last_value_D[77] + delta_ads2)) || (adc2 < (last_value_D[77] - delta_ads2)) 
                                                || complete_loop))
               {befehl="GET /xy.exe?antwort=dom.GetObject('" + hm_systemvariable+"D77"+"').State("+adc2+")";
                set_sysvar();
                last_value_D[77] = adc2;
               }

               for (int m=0; m < zeilenzahl; m++)
                {if (zeile_pointer[m] == 78) {zeile_data[m] = adc3;}}
             if (((adc3 > (last_value_D[78] + delta_ads3)) || (adc3 < (last_value_D[78] - delta_ads3)) 
                                                || complete_loop))
               {befehl="GET /xy.exe?antwort=dom.GetObject('" + hm_systemvariable+"D78"+"').State("+adc3+")";
                set_sysvar();
                last_value_D[78] = adc3;
               }
         } 
       }
//**********************************************************************************************
                         //        BME280
                            
       if (iomodus_bme ==1)
      {if (millis() > next_Time[79])
         {next_Time[79] = next_Time[79] +5000;  //BME280 nicht häufiger als alle 10s abfragen 

/*
    Serial.print("Temperature = ");
    Serial.print(bme.readTemperature());
    Serial.println(" *C");

    Serial.print("Pressure = ");

    Serial.print(bme.readPressure() / 100.0F);
    Serial.println(" hPa");

    Serial.print("Approx. Altitude = ");
    Serial.print(bme.readAltitude(SEALEVELPRESSURE_HPA));
    Serial.println(" m");

    Serial.print("Humidity = ");
    Serial.print(bme.readHumidity());
    Serial.println(" %");

    Serial.println();
*/    
       
    bmeT = bme.readTemperature();
       
    bmeP = bme.readPressure()  / 100.0F ;
      
    bmeA = bme.readAltitude(SEALEVELPRESSURE_HPA);
     
    bmeH = bme.readHumidity();
  
 
          for (int m=0; m < zeilenzahl; m++)
            {if (zeile_pointer[m] == 79) {zeile_data[m] = bmeT;}}
             if (((bmeT > (last_value_D[79] + delta_bmeT)) || (bmeT < (last_value_D[79] - delta_bmeT)) 
                                                || complete_loop))                       
               {befehl="GET /xy.exe?antwort=dom.GetObject('" + hm_systemvariable+"D79"+"').State("+bmeT+")";
                set_sysvar();
                last_value_D[79] = bmeT;
               }

               for (int m=0; m < zeilenzahl; m++)
                {if (zeile_pointer[m] == 80) {zeile_data[m] = bmeP;}}
             if (((bmeP > (last_value_D[80] + delta_bmeP)) || (bmeP < (last_value_D[80] - delta_bmeP)) 
                                                || complete_loop))          
               {befehl="GET /xy.exe?antwort=dom.GetObject('" + hm_systemvariable+"D80"+"').State("+bmeP+")";
                set_sysvar();
                last_value_D[80] = bmeP;
               }

               for (int m=0; m < zeilenzahl; m++)
                {if (zeile_pointer[m] == 81) {zeile_data[m] = bmeA;}}
             if (((bmeA > (last_value_D[81] + delta_bmeA)) || (bmeA < (last_value_D[81] - delta_bmeA)) 
                                                || complete_loop))
               {befehl="GET /xy.exe?antwort=dom.GetObject('" + hm_systemvariable+"D81"+"').State("+bmeA+")";
                set_sysvar();
                last_value_D[81] = bmeA;
               }

               for (int m=0; m < zeilenzahl; m++)
                {if (zeile_pointer[m] == 82) {zeile_data[m] = bmeH;}}
             if (((bmeH > (last_value_D[82] + delta_bmeH)) || (bmeH < (last_value_D[82] - delta_bmeH)) 
                                                || complete_loop))
               {befehl="GET /xy.exe?antwort=dom.GetObject('" + hm_systemvariable+"D82"+"').State("+bmeH+")";
                set_sysvar();
                last_value_D[82] = bmeH;
               } 
         } 
       }  
  }  
//*********************************************************************************************
 if (iomodus_D[3] == 7) //behandlung 433Mhz-rx 
   {if (mySwitch.available()) 
      {int value = mySwitch.getReceivedValue();
       if (value == 0) {client.print("Unknown encoding");} 
          else {Serial.print("Pin D3 received : ");
                Serial.print (mySwitch.getReceivedValue() );
                Serial.print (" / ");
                Serial.print( mySwitch.getReceivedBitlength() );
                Serial.print("bit Protocol: ");
                Serial.println( mySwitch.getReceivedProtocol() + " \n\r" );
               }
      mySwitch.resetAvailable();
     }
   } 
  //******************************************************************************************* 
 if ((iomodus_D[i] == 12) && (i==22))  //behandlung rfid3 tueroeffner an D22 des Mega
   {pinMode(i,OUTPUT);
    if (millis()< time_rfid3)         //D22-als normal-Ausgang für tueröffner schalten
      {Value = " AUF"; 
       if (oeffner_polarity) {digitalWrite(i, HIGH);} else {digitalWrite(i,LOW);}
       }
         else {Value = "  ZU"; if (!oeffner_polarity) 
                               {digitalWrite(i, HIGH);} else {digitalWrite(i,LOW);}}
       for (int m=0; m < zeilenzahl; m++)
         {if (zeile_pointer[m] == i) {zeile_data[m] = Value;}}
    }
  if ((iomodus_D[i] == 12) && (i==23))  //behandlung rfid2 tueroeffner  an D23 des Mega
    {pinMode(i,OUTPUT);
     if (millis()< time_rfid2)         //D23-als normal-Ausgang für tueröffner schalten
       {Value = " AUF"; if (oeffner_polarity) 
                          {digitalWrite(i, HIGH);} 
                          else {digitalWrite(i,LOW);}}
       else {Value = "  ZU"; if (!oeffner_polarity) {digitalWrite(i, HIGH);} 
                                                    else {digitalWrite(i,LOW);}} 
     for (int m=0; m < zeilenzahl; m++)
       {if (zeile_pointer[m] == i) {zeile_data[m] = Value;}
       }
    }
 //******************************************************************************************** 
  if (iomodus_D[i] == 12) //behandlung rfid-modul RDM6300 
    {int m = 0; fob_zahl=0;  fob_hex ="";
     if (i == 15){while((Serial3.available()>0)&&(m <11 ))  //behandlung rfid3
                       {fob_da=1;  m++;  zeichen = Serial3.read();
                        if (m>4)  //die ersten 4 zeichen ignorieren
                          {fob_hex += zeichen; fob_zahl = hexToDec(fob_hex);}
                        if (m > 10) //Datenübertragung fertig, dann buffer leeren 
                          {while(Serial3.available()>0) {zeichen = Serial3.read();}}
             }
         }  
           
   /*  if (i == 17){while((Serial2.available()>0)&&(m <11 ))//behandlung rfid2
                      {fob_da=1;  m++;  zeichen = Serial2.read();
                       if (m>4)  //die ersten 4 zeichen ignorieren
                         {fob_hex += zeichen; fob_zahl = hexToDec(fob_hex);}
                       if (m > 10) //Datenübertragung fertig, dann buffer leeren 
                         {while(Serial2.available()>0) {zeichen = Serial2.read();}}
            }
           }
  */  
    
     if (fob_da)
       {fob_dec = ""; 
        sprintf(buffer,"%lu", fob_zahl); //zahl umwandeln in string
        for(int k = 0; k<7; k++) {fob_dec += buffer[k];} 
        Name = "";  //gueltigen namen und oeffner aus tabelle ermitteln  
        for (int k = 0; k < fob_anzahl; k++) {if (fob_dec == fob[3*k]) 
                                                {Name += fob[(3*k)+1];
                                                 oeffner= fob[(3*k)+2]; 
                                                 break;
                                                }
                                              }
        if ((Name != "") && ((oeffner =="1") ||(oeffner =="3"))) 
          {time_rfid3 = millis() + unlock_time1;}
        if ((Name != "") && ((oeffner =="2") ||(oeffner =="3")))  
          {time_rfid2 = millis() + unlock_time2;}
        if (Name == "") {Name = fob_dec;}
        lcd_rfid_message = Name + "          "; //lcd mmeldung modifizieren für rfid
        lcd_rfid_message = lcd_rfid_message.substring(0,9);
         
        for (int n=0; n < zeilenzahl; n++)
          {if (zeile_pointer[n] == i) 
             {display_message[i]= lcd_rfid_message; zeile_data[n] = fob_dec;}
          }
           
     //Serial.println(Name + " " + fob_dec);
        I = String(i);
        befehl="GET /xy.exe?antwort=dom.GetObject('"+hm_systemvariable+"D"+I+"').State('"+Name+"')";
        set_sysvar();
        fob_da =0;
       }
     delay(500);  
    }
   
//**********************************************************************************************
        //MAX6675           

 if (iomodus_max1 ==1)

      {if (millis() > next_Time[74])
                {next_Time[74] = next_Time[74] +5000;  //MAX6675 nicht häufiger als alle 5s abfragen 
                
         MAX6675 thermocouple(thermoCLK, thermoCS, thermoDO); 
         thermo_C = thermocouple.readCelsius()  -2.5 ;   // Sensor Lesen und Korrekturwert
         
        // Serial.print("C = "); Serial.println(thermo_C);
      
                for (int m=0; m < zeilenzahl; m++)
            {if (zeile_pointer[m] == 74) {zeile_data[m] = thermo_C;}}
             if (((thermo_C > (last_value_D[74] + delta_max)) || (thermo_C < (last_value_D[74] - delta_max)) 
                                                || complete_loop)) 
                                         
               {befehl="GET /xy.exe?antwort=dom.GetObject('" + hm_systemvariable+"D74"+"').State("+thermo_C+")";
                set_sysvar();
                last_value_D[74] = thermo_C;
               }
         } 
       }   
                            
//**************************   ende loop  *****************************************************
 }
} 
//#############################################################################################
//#############################################################################################
//#############################  Unterprogramme   #############################################

void datenempfang() //Unterprogramm datenempfang: daten von ccu an homeduino senden
{command = ""; 

#if defined (w5100)  //************************************************************************
 EthernetClient client = server.available();   //mit W5100
#endif  //************************************************************************************* 

#if defined (cc3000)  //***********************************************************************
 SFE_CC3000_Client client = SFE_CC3000_Client(wifi);   //mit CC3000
#endif  //************************************************************************************* 

#if defined (esp8266)  //***********************************************************************
  WiFiEspClient client = server.available();   //using ESP8266 (ESP-01 module)
#endif  //************************************************************************************* 

 if (client) // an http request ends with a blank line
   {boolean currentLineIsBlank = true;
    while (client.connected())
      {if (client.available()) 
         {char c = client.read();
          if (reading && c == ' ') reading =false;
          if (c == '?') reading = true; // beginn der Befehlssequenz 
          if (reading) 
            {if (command.length() < 100) //read char by char HTTP request
               {command = command + c; } //store characters to string
            } 
          if (c == '\n' && currentLineIsBlank) break;
          if (c == '\n') {currentLineIsBlank = true;} 
            else if (c != '\r') { currentLineIsBlank = false;}
         } 
       } 
     client.println(command);
     delay(1); 
     client.stop();
//*********************************************************************************************
    if (command.length() > 2) //behandlung Datenempfang von ccu: port auf 0/1 setzen 
      {Serial.println(command); //empfangenen befehl ausgeben
       client.print(command); //befehl dann dekodieren 
       int colonPosition = command.indexOf(':');
       sub_command = command.substring(2,colonPosition); //portpin erkennen
       Serial.print("D" + sub_command + " :");
       port_pin = sub_command.toInt();
       command = command.substring((colonPosition+1)); //Rest-command bilden
       if (((iomodus_D[port_pin] == 2)||(iomodus_D[port_pin] == 12)) && (command == "0")) 
         {for (int m=0; m < zeilenzahl; m++)
            {if (zeile_pointer[m] == port_pin) {zeile_data[m] = " LOW";}
            }
          pinMode(port_pin, OUTPUT); digitalWrite(port_pin, LOW); Serial.println(command);
         }
       if ((iomodus_D[port_pin] == 2) && (command == "1")) 
         {for (int m=0; m < zeilenzahl; m++)
            {if (zeile_pointer[m] == port_pin) {zeile_data[m] = " HIGH";}
            }
          pinMode(port_pin, OUTPUT); digitalWrite(port_pin, HIGH); Serial.println(command);}
          if ((iomodus_D[port_pin] == 7) && (port_pin ==4)) 
            {rf_send(command); Serial.println(command);} 
          if ((iomodus_D[port_pin] == 5) && (port_pin ==9)) 
            {ir_send(command); Serial.println(command);} 
      }
  } 
} 
//*********************************************************************************************

void set_sysvar() // subroutine HTTP request absetzen:
{while (millis() < next_tx) {} //warten bis time > next_tx oder timeout
 next_tx = millis() +delta_tx;  
   
  befehl += " HTTP/1.1\r\nHost:";  //zusaetzlich wegen neuer CCU-firmware
  befehl += ccu_ip;
  befehl += "\r\nConnection: close\r\n\r\n";
                                                    
 if (client.connect(ccu_ip, 8181)) 
   {byte transmitbytes = 0;
    unsigned long breakMillis = millis();
    Serial.println(befehl);
    transmitbytes = client.println(befehl);
    while (transmitbytes != (befehl.length() + 2)) {
      Serial.println(F("Transmission failed! Retrying..."));
      delay(10);
      transmitbytes = client.println(befehl);
      if ((millis() - breakMillis) > 100) {Serial.println(F("Transmission failed 10 times!!! Check the WLAN connection to your CCU!")); break;}
      }
    client.println();
    client.flush();
    client.stop();
   } else {Serial.println(F("connection failed"));}
}

//*********************************************************************************************
void rf_send(String rf_command) // subroutine rf telegramm senden
{
}
//*********************************************************************************************
void ir_send(String ir_command) // subroutine ir telegramm senden
{
}
//*********************************************************************************************
//hier sind die interrupt-service-routinen fuer die impulszaehler  //**************************
void ISR_0() //Interrupt an D2
{pulsecounter[0]++;}
void ISR_1() //Interrupt an D3
{pulsecounter[1]++;}
void ISR_2() //Interrupt an D21
{pulsecounter[2]++;}
void ISR_3() //Interrupt an D20
{pulsecounter[3]++;}
void ISR_4() //Interrupt an D19
{pulsecounter[4]++;}
void ISR_5() //Interrupt an D18 
{pulsecounter[5]++;}
//*********************************************************************************************
//Unterprogramm:  Converting from Hex (unsigned long) to Decimal: *****************************
//Quelle https://github.com/benrugg/Arduino-Hex-Decimal-Conversion/blob/master/hex_dec.ino
unsigned long hexToDec(String hexString) 
{unsigned long decValue = 0;
 int nextInt;
 for (int k = 0; k < hexString.length(); k++) 
   {nextInt = int(hexString.charAt(k));
    if (nextInt >= 48 && nextInt <= 57) nextInt = map(nextInt, 48, 57, 0, 9);
    if (nextInt >= 65 && nextInt <= 70) nextInt = map(nextInt, 65, 70, 10, 15);
    if (nextInt >= 97 && nextInt <= 102) nextInt = map(nextInt, 97, 102, 10, 15);
    nextInt = constrain(nextInt, 0, 15);
    decValue = (decValue * 16) + nextInt;
  }
 return decValue;
}

//*********************************************************************************************
void display_data() //gibt daten auf dem lcd oder tft display aus

//*********************************************************************************************
#if defined (lcd_display)  //behandlung lcd-display: erkennung des tasters und lcd-anzeige
{x = analogRead (0);  //abfrage A0
 if (x < (x_alt -100))  {tastererkennung();}
 x_alt = x; 
 for (int m = 0; m < zeilenzahl; m++)
   {while (zeile_data[m].length() < 5) {zeile_data[m] = " " + zeile_data[m];}
    if (display_message[zeile_pointer[m]] == "0") {zeile_data[m] = "                ";}
    display_zeile[m] =  display_message[zeile_pointer[m]] + zeile_data[m];
   
    if (display_zeile[m] != display_zeile_alt[m])  //datenausgabe auf display nur wenn aenderung 
      {lcd.setCursor(0,m); lcd.print (display_zeile[m]); display_zeile_alt[m] = display_zeile[m];}
   } 
} 
//*********************************************************************************************
void tastererkennung()
{if (x < 60) 
   {taster == "right"; 
    zeile_pointer[0]--;  if (zeile_pointer[0] ==1) {zeile_pointer[0] = 79;}
    while((iomodus_D[zeile_pointer[0]] ==0) || (iomodus_D[zeile_pointer[0]] >19))
         {zeile_pointer[0]--; if (zeile_pointer[0] ==1) {zeile_pointer[0] =79;} }
    EEPROM.write(0,zeile_pointer[0]);//delay(4);
   } 
   else if (x < 200) 
          {taster == "up";
           zeile_pointer[0]++;  if (zeile_pointer[0] ==80) {zeile_pointer[0] = 2;}
           while((iomodus_D[zeile_pointer[0]] ==0) || (iomodus_D[zeile_pointer[0]] >19))
               {zeile_pointer[0]++; if (zeile_pointer[0] ==80) {zeile_pointer[0] = 2;} }
           EEPROM.write(0,zeile_pointer[0]);//delay(4);
          } 
          else if (x < 400) 
                   {taster == "down";
                    zeile_pointer[1]++; if (zeile_pointer[1] ==80) {zeile_pointer[1] = 2;}
                    while((iomodus_D[zeile_pointer[1]] ==0) || (iomodus_D[zeile_pointer[1]] >19))
                         {zeile_pointer[1]++; if (zeile_pointer[1] ==80) {zeile_pointer[1] = 2;} } 
                    EEPROM.write(1,zeile_pointer[1]);//delay(4);     
                   } 
                  else if (x < 600)
                         {taster == "left";
                          zeile_pointer[1]--;
                          if (zeile_pointer[1] ==1) {zeile_pointer[1] = 79;}
                          while((iomodus_D[zeile_pointer[1]] ==0) || (iomodus_D[zeile_pointer[1]] >19))
                               {zeile_pointer[1]--; if (zeile_pointer[1] ==1) {zeile_pointer[1] =79;} }
                          EEPROM.write(1,zeile_pointer[1]);//delay(4);
                         } 
                         else if (x < 800)
                                {taster = "select";}
                                else {taster ="";}
}
#endif  //************************************************************************************* 

//*********************************************************************************************
#if defined (tft_display)  //behandlung tft toucheingabe und  display 2.4''
 {if (millis() > next_touch_time)  //touch-display abfragen
   {TSPoint p = ts.getPoint();// a point object holds x y and z coordinates
    px = p.x; py = p.y; pz =p.z;  
    pinMode(XM, OUTPUT);   pinMode(YP, OUTPUT);
    if (pz > MINPRESSURE && pz < MAXPRESSURE ) 
      {Serial.print("px : ");Serial.print( px); Serial.print("  py : " ); Serial.print(py);
       Serial.print("  pz : " ); Serial.print(pz);
       if (abs(px_B - px_A) > 100) {p_x = (1000 *(px- px_A))/(px_B -px_A); p_y = (1000 *(py - py_A))/(py_C -py_A);} 
         else {p_x = (1000 *(py -py_A))/(py_B - py_A); p_y = (1000 *(px - px_A)) /(px_C - px_A);}
       Serial.print("  p_x : ");Serial.print( p_x); Serial.print("  p_y : " ); Serial.print(p_y);
       if (p_y < 154) {touch_y = 0;}   //p_y = 1000 entspricht 6,5 Zeilen 
         else {if (p_y < 308) {touch_y = 1;}
                 else {if (p_y < 462) {touch_y = 2;}
                         else {if (p_y < 616) {touch_y = 3;}
                                 else {if (p_y < 770) {touch_y = 4;}
                                         else {touch_y = 5;}}}}}


             Serial.print("     touch_y "); Serial.print(touch_y); Serial.println();
       centertouch = 1;
       if (p_x < 333) {zeile_pointer_minus();  Serial.println(zeile_pointer[touch_y]); centertouch = 0;}
       if (p_x > 666) {zeile_pointer_plus();  Serial.println(zeile_pointer[touch_y]); centertouch = 0;} //reserve center area for other action
       if ((centertouch) && ((iomodus_D[zeile_pointer[touch_y]]) == 2)) {
        port_pin = zeile_pointer[touch_y];

        next_touch_time = millis() + 200;
        if (((iomodus_D[port_pin]) == 2) && (digitalRead(port_pin) == LOW)) {
            command = "1"; SetOutputPort ();} 
          else {
            command = "0"; SetOutputPort ();} //toggle output pin
        centertouch = 0;}
      }
      for (int m = 0; m < zeilenzahl; m++)  //datenausgabe auf tft-display
      {while (zeile_data[m].length() < 7) {zeile_data[m] = " " + zeile_data[m];}
       display_zeile[m] =  display_message[zeile_pointer[m]] + zeile_data[m];
       if (display_zeile[m] != display_zeile_alt[m]) //displayausgabe nur wenn aenderung 
         {tft_print (m,display_zeile[m],schriftgroesse,default_color); display_zeile_alt[m] = display_zeile[m];
        }
      }
   } 
}
//*********************************************************************************************
//mit diesem Unterprogramm wird auf dem tft display ein zeilen-display 6 x 16  emuliert
void tft_print (int line, String textline, int font_size, long int color)
{if (tft_type ==1)
   {tft.fillRect(0,38*line, 319, 38, BLACK); //x0,y0, width,heights  //zeile loeschen
    tft.setCursor(0, 38*line+6);              //und dann erst schreiben
   }
 if (tft_type ==2)
   {tft.fillRect(0,50*line, 479, 50, BLACK); //x0,y0, width,heights  //zeile loeschen
    tft.setCursor(5, 50*line+6);              //und dann erst schreiben
   }  
 tft.setTextColor(color);  
 tft.setTextSize(font_size);
 tft.print(textline);
}
//**************************************************************************************
//mit diesen Unterprogrammen wird der zeile_pointer im eeprom abgelegt
void zeile_pointer_plus()
{next_touch_time = millis() + 200; 
  zeile_pointer[touch_y]++;  if (zeile_pointer[touch_y] >79) {zeile_pointer[touch_y] = 2;}
 while((iomodus_D[zeile_pointer[touch_y]] ==0) || (iomodus_D[zeile_pointer[touch_y]] >19))
  {zeile_pointer[touch_y]++; if (zeile_pointer[touch_y] >79) {zeile_pointer[touch_y] = 2;} }
 EEPROM.write(touch_y,zeile_pointer[touch_y]);//delay(4);
}
void zeile_pointer_minus()
{next_touch_time = millis() + 200; 
  zeile_pointer[touch_y]--;  if (zeile_pointer[touch_y] <2) {zeile_pointer[touch_y] = 79;}
 while((iomodus_D[zeile_pointer[touch_y]] ==0) || (iomodus_D[zeile_pointer[touch_y]] >19))
   {zeile_pointer[touch_y]--; if (zeile_pointer[touch_y] <2) {zeile_pointer[touch_y] =79;}  }
 EEPROM.write(touch_y,zeile_pointer[touch_y]);//delay(4);
}      
#endif  
//***************************************************************************************************** 

#if defined (esp8266)
// just needed in case you want to communicate with the ESP-01 without using the ESPwifi lib */
   void Auf_OK_warten()
{ Serial2.flush(); 
  boolean Ook = false;
  boolean Kok = false;
  unsigned long Counter = 0;
  
  while(!Kok)
  {
    if (Serial2.available())     espbyte = Serial2.read();
    if (espbyte == 79) Ook = true;
    if (espbyte == 75) Kok = true;
    Counter++;
    if (Counter > 200000){Serial.print(F("Timeout while communicating with ESP-01 module!\n\r")); break;}
  }
  if (Ook && Kok) Serial.println();
}
#endif
//*************************************************************************************
      int freeRam () { //just for debugging
          extern int __heap_start, *__brkval; 
          int v; 
          int fr = (int) &v - (__brkval == 0 ? (int) &__heap_start : (int) __brkval); 
          Serial.print(F("Free ram: "));
          Serial.println(fr);
       }
//*************************************************************************************
      void SetOutputPort () {
               if (((iomodus_D[port_pin] == 2)||(iomodus_D[port_pin] == 12)) && (command == "0")) 
               {for (int m=0; m < zeilenzahl; m++)
                  {if (zeile_pointer[m] == port_pin) {zeile_data[m] = " Aus";} // display_value[port_pin] = " LOW";}
                  }
                pinMode(port_pin, OUTPUT); digitalWrite(port_pin, LOW); Serial.println(command);
               }
             if ((iomodus_D[port_pin] == 2) && (command == "1")) 
               {for (int m=0; m < zeilenzahl; m++)
                  {if (zeile_pointer[m] == port_pin) {zeile_data[m] = "   An";} // display_value[port_pin] = " HIGH";}
                  }
                pinMode(port_pin, OUTPUT); digitalWrite(port_pin, HIGH); Serial.println(command);}
          String I = String(port_pin);
          befehl = "GET /xy.exe?antwort=dom.GetObject('"+hm_systemvariable+"D"+I+"').State('"+command+"')";
          set_sysvar();
       }
 
//*************************************************************************************
#if defined (esp8266)

void sendHttpResponse(WiFiEspClient client)
    {
    if (receivingcommand == true) {
         
          Serial.println(F("Sending command response"));
          // send a standard http response header
          // use \r\n instead of many println statements to speedup data send
          client.print(F( "HTTP/1.1 200 OK\r\n"
                          "Content-Type: text/html\r\n"
                          "Connection: close\r\n"             // the connection will be closed after completion of the response
//                          "Refresh: 10\r\n"                   // refresh the page automatically every 10 sec. Useful for tests if you compare command to received command
                          "\r\n"));
          client.print(F("<!DOCTYPE HTML>\r\n"
                         "<html>\r\n"
                         "<h1>Welcome at "));
          client.print(hm_systemvariable);
          client.print(F( "</h1>\r\n"
                          "Requests received: "));
          client.print(++reqCount);
          client.print(F( "<br>\r\n"
                          "<br>\r\n"
                          "Command received: "));
          client.print(command);
          client.print(F( "<br>\r\n"
                          "<br>\r\n"
                          "Command length: "));
          client.print(command.length());
          client.print(F( " out of a maximum of 100"
                          "<br>\r\n"
                          "<br>\r\n"
                          "</html>\r\n"));
          client.flush();
          next_tx = millis() +delta_tx;
         
          receivingcommand = false;
         }
         else {
              Serial.println(F("Sending 404 response after invalid request"));
              client.print(F("HTTP/1.1 404 \r\n" //shortest possible answer
              "\r\n"));
              next_tx = millis() +delta_tx;
              }
    }
 #endif
IMG_20170913_212126.jpg
Danke
mfg. Flo

dondaik
Beiträge: 12928
Registriert: 16.01.2009, 18:48
Wohnort: Steingaden
Hat sich bedankt: 1604 Mal
Danksagung erhalten: 222 Mal

Re: Homeduino: universeller LAN/WLAN-Arduino für die Hausaut

Beitrag von dondaik » 14.09.2017, 00:06

man ist lange her, glaube ich habe für alle werte ein gerät / index gemacht gemacht...
und dann sind da noch verschiedene zähler zb:

for (int i = 0; i < 80; i++) {next_Time=0;} //

die erweitert wurden....

so auf die schnell. :-(
-------
!!! der download der handbüchern auf den seiten von eq3 und das lesen der tips und tricks kann das hm-leben sehr erleichtern - das nutzen der suche nach schlagworten ebenso :mrgreen: !!!
wer schreibfehler findet darf sie behalten.

Ardubert Homedu
Beiträge: 142
Registriert: 17.07.2016, 10:40
Hat sich bedankt: 3 Mal
Danksagung erhalten: 1 Mal

Re: Homeduino: universeller LAN/WLAN-Arduino für die Hausaut

Beitrag von Ardubert Homedu » 14.09.2017, 21:13

Hallo,

Habe jetzt die Änderungen doch noch gefunden...
Es lag u.a am Unterprogramm das den zeilepointer im eeprom ablegt... :?
wieder was gelernt

Der BME280 (4Pin - 1,8 bis 5V) läuft nun auch am Homeduino ...

Code: Alles auswählen

const String Version = "  Blanko"; /*Stand: 2015.09.07 / Verfasser: Eugen Stall
erprobt fuer Arduino Mega 2560 mit Arduino 1.6.5r2 
Erweiterung  Digital Out TFT Toggle / MAX6675 / ADS1115 / ESP-01 / BME280 - Ardubert Homedu Stand: 14.09.2017 mit Arduino 1.8.4
hier ist immer die aktuelle Version:
http://www.stall.biz/project/homeduino-4-0-das-universelle-mess-und-aktormodul-fuer-die-hausautomation
das folgende homeduino-programm sendet messdaten zur ccu (homeduino als webclient) ...
und empfängt ausgabedaten für die homeduino-outputs (homeduino als webserver)
_________________            ________________
|port 8181 server|<---------<| client        |
|                |           |               |
| CCU            |           |     Homeduino | 
|                |           |               |
|          client|>--------->|server port 80 | 
|________________|           |_______________|

/Quellen:Arduino website plus http://arduino.cc/en/Tutorial/WebClient und ...
 http://tushev.org/articles/arduino/item/52-how-it-works-ds18b20-and-arduino und ...  */
//#############################################################################################
//#############################################################################################
//Auswahl der verwendeten Shields: 
#define tft_display //"tft_display" oder "lcd_display"                         <<user-eingabe<< 
                    //"lcd_display" auch wenn kein display verwendet wird 
#define w5100      //"cc3000"  Wifi-Modul or "w5100" ethernet shield or "esp8266" WiFi       <<user-eingabe<< 
 
char ccu_ip[31] = "192.168.0.225";      //IP der CCU                          <<user-eingabe<< 
//MAC-Adresse dieses Homeduinos ,bei mehreren Homeduinos MAC-.Adresse ändern!!:
// no need for a user specified MAC adress at ESP8266. ESP-01 has a preprogrammed MAC
byte mac[] = { 0xAC, 0xCC, 0xCC, 0xCC, 0xAC, 0xAB };  //                       <<user-eingabe<<

byte homeduino[] = { 192, 168, 0, 238 }; //IP des Homeduino,wenn DHCP versagt <<user-eingabe<< 

char ap_ssid[] = "XXXXXXXXXX"; //SSID WLAN in Anführungszeichen                      <<user-eingabe<< 

char ap_password[] = "XXXXXXXXXX"; //Passwort WLAN in Anführungszeichen          <<user-eingabe<< 

//xyz ist indiv. Bezeichnung dieses homeduino, keine sonderzeichen, öäüß...
const String homeduino_nummer = "blanko";  //                                     <<user-eingabe<< 
const String hm_systemvariable = "HD_" + homeduino_nummer +"_";
//#############################################################################################
//#############################################################################################
//I/O-Kennung: hier wird die Funktion aller verwendbaren IO´s mit einer Kennziffer festgelegt 
//dabei haben alle IO´s die Standardfunktionen plus spez. Sonderfunktionen
//     Standardfunktionen sind:
//     '0' =andere Nutzg; '1' =dig_in; '2' =dig_out; '3' =1wire '4' =DHTxx; '5' =U_Schall 
//      '8' =I2C , MAX6675 , ADS1115 , BME280 ;

const byte iomodus_D[83] = { 0,0,
 31, //D2 :      Std-fkt; '15' = IR_Rx??  '6' =ImpCount; '31' =tft;   <<user IO-Shield20<< 
 31, //D3 :      Std-fkt; '7' = 433_Rx??  '6' =ImpCount; '31' =tft;   <<user IO-Shield20<< 
 31, //D4 :      Std-fkt; '7' = 433_Tx??  '30' =lcd;     '31' =tft;   <<user IO-Shield20<< 
 31, //D5 :      Std-fkt;                 '30' =lcd;     '31' =tft;   <<user IO-Shield20<< 
 31, //D6 :      Std-fkt; '9' = buzzer    '30' =lcd;     '31' =tft;   <<user IO-Shield20<< 
 31, //D7 :      Std-fkt;                 '30' =lcd;     '31' =tft;   <<user IO-Shield20<< 
 31, //D8 :      Std-fkt;                 '30' =lcd;     '31' =tft;   <<user IO-Shield20<< 
 31, //D9 :      Std-fkt; '16' = IR_Tx??  '30' =lcd;     '31' =tft;   <<user IO-Shield20<< 
 20, //D10 :     Std-fkt; '20' = W5100 SS-Pin;
 0,  //D11 :     Std-fkt;  
 0,  //D12 :     Std-fkt;  
 0,  //D13 :     Std-fkt;
 0,  //D14/TX3 : Std-fkt; '0' =ESP8266;   '12' = rfid3;                <<user IO-Shield-Plus<< 
 0,  //D15/RX3 : Std-fkt; '0' =ESP8266;   '12' = rfid3;                <<user IO-Shield-Plus<< 
 0,  //D16/TX2 : Std-fkt; '0' =ESP8266;   '12' = rfid2;                <<user IO-Shield-Plus<< 
 0,  //D17/RX2 : Std-fkt; '0' =ESP8266;   '12' = rfid2;                <<user IO-Shield-Plus<< 
 0,  //D18/TX1 : Std-fkt; '6' =ImpCount;  '21' =CC3000                 <<user IO-Shield-Plus<< 
 0,  //D19/RX1 : Std-fkt; '6' =ImpCount;                               <<user IO-Shield-Plus<< 
 8,  //D20/SDA : Std-fkt; '6' =ImpCount;  '8' =I2C , ADS1115; ;        <<user IO-Shield-Plus<< 
 8,  //D21/SCL : Std-fkt; '6' =ImpCount;  '8' =I2C , ADS1115; ;        <<user IO-Shield-Plus<< 
 0,  //D22 :     
 0,  //D23 :     
 0,  //D24 :     
 0,  //D25 :     
 0,  //D26 :     
 0,  //D27 :     
 0,  //D28 :     
 0,  //D29 :     
 0,  //D30 :     
 0,  //D31 :     
 0,  //D32 :
 0,  //D33 :     
 0,  //D34 :     
 0,  //D35 :     
 0,  //D36 :
 0,  //D37 :     
 0,  //D38 :
 0,  //D39 :
 0,  //D40 :
 0,  //D41 :
 0,  //D42 :
 0,  //D43 :
 0,  //D44 :
 0,  //D45 :
 0,  //D46 :
 0,  //D47 :                           // Nicht verwendbar wenn MAX6675 Sensor verwendet wird
 0,  //D48 :                           // Nicht verwendbar wenn MAX6675 Sensor verwendet wird
 0,  //D49 :     '8'  = Für MAX6675    // Nicht verwendbar wenn MAX6675 Sensor verwendet wird
 20, //MISO      '20' =W5100;  '21' =CC3000;   ICSP-Stecker
 20, //MOSI      '20' =W5100;  '21' =CC3000;   ICSP-Stecker
 20, //SCK       '20' =W5100;  '21' =CC3000;   ICSP-Stecker
 0, //SS                      '21' =CC3000;
 31, //D54 A0 :  Std-fkt; '10' =analog; '11' =NTC; '31' =tft; '30' =lcd; <<user IO-Shield-20<< 
 31, //D55 A1 :  Std-fkt; '10' =analog; '11' =NTC; '31' =tft;         <<user IO-Shield-20<< 
 31, //D56 A2 :  Std-fkt; '10' =analog; '11' =NTC; '31' =tft;         <<user IO-Shield-20<< 
 31, //D57 A3 :  Std-fkt; '10' =analog; '11' =NTC; '31' =tft;         <<user IO-Shield-20<< 
 31, //D58 A4 :  Std-fkt; '10' =analog; '11' =NTC; '31' =tft;         <<user IO-Shield-20<< 
 0,  //D59 A5 :  Std-fkt; '10' =analog; '11' =NTC;                    <<user IO-Shield-20<< 
 0,0,  
 0,  //D62 A8 :  Std-fkt; '10' =analog; '11' =NTC;                    <<user IO-Shield-Plus<< 
 0,  //D63 A9 :  Std-fkt; '10' =analog; '11' =NTC;                    <<user IO-Shield-Plus<< 
 0,  //D64 A10 : Std-fkt; '10' =analog; '11' =NTC;                    <<user IO-Shield-Plus<< 
 0,  //D65 A11 : Std-fkt; '10' =analog; '11' =NTC;                    <<user IO-Shield-Plus<< 
 0,  //D66 A12 : Std-fkt; '10' =analog; '11' =NTC;                    <<user IO-Shield-Plus<< 
 0,  //D67 A13 : Std-fkt; '10' =analog; '11' =NTC;                    <<user IO-Shield-Plus<< 
 0,  //D68 A14 : Std-fkt; '10' =analog; '11' =NTC;                    <<user IO-Shield-Plus<< 
 0,  //D69 A15 : Std-fkt; '10' =analog; '11' =NTC;                    <<user IO-Shield-Plus<< 
 0,  // '0' =andere Nutzg;   D70 '8' =I2C;                            <<user IO-Shield-Plus<< 
 0,  // '0' =andere Nutzg;   D71 '8' =I2C;                            <<user IO-Shield-Plus<< 
 0,  // '0' =andere Nutzg;   D72 '8' =I2C;                            <<user IO-Shield-Plus<< 
 0,  // '0' =andere Nutzg;   D73 '8' =I2C;                            <<user IO-Shield-Plus<< 
 0,  // '0' =andere Nutzg;   D74 '8' = Für MAX6675                    <<user IO-Shield-Plus<< 
 0,  // '0' =andere Nutzg;   D75 '8' = Für ADS1115 A0                 <<user IO-Shield-Plus<< 
 0,  // '0' =andere Nutzg;   D76 '8' = Für ADS1115 A1                 <<user IO-Shield-Plus<< 
 0,  // '0' =andere Nutzg;   D77 '8' = Für ADS1115 A2                 <<user IO-Shield-Plus<<  
 0,  // '0' =andere Nutzg;   D78 '8' = Für ADS1115 A3                 <<user IO-Shield-Plus<<  
 8,  // '0' =andere Nutzg;   D79 '8' = Für BME280   Temperatur        <<user IO-Shield-Plus<< 
 8,  // '0' =andere Nutzg;   D80 '8' = Für BME280   Druck             <<user IO-Shield-Plus<< 
 8,  // '0' =andere Nutzg;   D81 '8' = Für BME280   Höhe              <<user IO-Shield-Plus<< 
 8,  // '0' =andere Nutzg;   D82 '8' = Für BME280   Luftfeuchte       <<user IO-Shield-Plus<< 
}; 
//#############################################################################################
//hier werden Sensoren am I2C-Eingang aktiviert

const byte iomodus_baro =  0; //'0' =nc; '1' =BMP180,                    <<user IO-Shield-Plus<<
const byte iomodus_lux  =  0; //'0' =nc; '1' =BH1750,                    <<user IO-Shield-Plus<<

const byte iomodus_max1 =  0; //'0' =nc; '1' =MAX6675,                   
const byte iomodus_ads1 =  0; //'0' =nc; '1' =ADS1115,                  
const byte iomodus_bme  =  1; //'0' =nc; '1' =BME280,                 

//#############################################################################################
//hier werden die Kennwerte fuer die Impulszaehler festgelegt
volatile unsigned long pulsecounter[6] = 
{ 0, //Zaehlerstand fuer D2 -Impulseingang bei Reset                    <<user IO-Shield20<<
 0, //Zaehlerstand fuer D3 -Impulseingang bei Reset                     <<user IO-Shield20<<
 0, //Zaehlerstand fuer D21-Impulseingang bei Reset                     <<user IO-Shield-Plus<< 
 3, //Zaehlerstand fuer D20-Impulseingang bei Reset                     <<user IO-Shield-Plus<< 
 4711, //Zaehlerstand fuer D19-Impulseingang bei Reset                  <<user IO-Shield-Plus<< 
 5 //Zaehlerstand fuer D18-Impulseingang bei Reset                      <<user IO-Shield-Plus<< 
}; 
//hier wird der Teilerfaktor für die Impulszaehler festgelegt
const int pulsedivider[6] = 
{6, //Teilerfaktor D2 :                                                 <<user IO-Shield20<<
 1, //Teilerfaktor D3 :                                                 <<user IO-Shield20<<
 1, //Teilerfaktor D21 :                                                <<user IO-Shield-Plus<<
 1, //Teilerfaktor D20 :                                                <<user IO-Shield-Plus<<
 2, //Teilerfaktor D19 :                                                <<user IO-Shield-Plus<<
 1, //Teilerfaktor D18 :                                                <<user IO-Shield-Plus<<
}; 
//#############################################################################################
//#############################################################################################
//hier werden die anzeigetexte für lcd und tft display festgelegt 
String display_message[83] = {
"0","0",         //                              '0' =keine anzeige
"0",  //anzeigetext fuer port D02
"0",  //anzeigetext fuer port D03
"0","0","0","0","0","0",  // ports belegt durch lcd-shield     
"0",  // belegt durch ethernet W5100-shield, lcd-Shield PIN D10 abbiegen! 
"0",  //anzeigetext fuer port D11                             <<user IO-Shield-20<<
"0",  //anzeigetext fuer port D12                             <<user IO-Shield-20<<
"0",  //anzeigetext fuer port D13                             <<user IO-Shield-20<<
"0",  //anzeigetext fuer port D14 /TX3                        <<user IO-Shield-Plus<<
"0",  //anzeigetext fuer port D15 /RX3                        <<user IO-Shield-Plus<<
"0",  //anzeigetext fuer port D16 /TX2                        <<user IO-Shield-Plus<<
"0",  //anzeigetext fuer port D17 /RX2                        <<user IO-Shield-Plus<<
"0",  //anzeigetext fuer port D18 /TX1 /impulszaehler S03     <<user IO-Shield-Plus<<
"0",  //anzeigetext fuer port D19 /RX1 /impulszaehler S02     <<user IO-Shield-Plus<<
"0",  //anzeigetext fuer port D20 /SDA /impulszaehler S01     <<user IO-Shield-Plus<<
"0",  //anzeigetext fuer port D21 /SCL /impulszaehler S00     <<user IO-Shield-Plus<<
"0",  //anzeigetext fuer port D22                             <<user IO-Shield-Plus<<
"0",  //anzeigetext fuer port D23                             <<user IO-Shield-Plus<<
"0",  //anzeigetext fuer port D24                             <<user IO-Shield-Plus<<
"0",  //anzeigetext fuer port D25                             <<user IO-Shield-Plus<<
"0",  //anzeigetext fuer port D26                             <<user IO-Shield-Plus<<
"0",  //anzeigetext fuer port D27                             <<user IO-Shield-Plus<<
"0",  //anzeigetext fuer port D28                             <<user IO-Shield-Plus<<
"0",  //anzeigetext fuer port D29                             <<user IO-Shield-Plus<<
"0",  //anzeigetext fuer port D30
"0",  //anzeigetext fuer port D31
"0",  //anzeigetext fuer port D32
"0",  //anzeigetext fuer port D33
"0",  //anzeigetext fuer port D34
"0",  //anzeigetext fuer port D35
"0",  //anzeigetext fuer port D36
"0",  //anzeigetext fuer port D37   
"0",  //anzeigetext fuer port D38
"0",  //anzeigetext fuer port D39
"0",  //anzeigetext fuer port D40
"0",  //anzeigetext fuer port D41
"0",  //anzeigetext fuer port D42
"0",  //anzeigetext fuer port D43
"0",  //anzeigetext fuer port D44
"0",  //anzeigetext fuer port D45
"0",  //anzeigetext fuer port D46
"0",  //anzeigetext fuer port D47        
"0",  //anzeigetext fuer port D48
"0",  //anzeigetext fuer port D49        
"0","0","0","0",
"0",  // port belegt durch lcd-shield
"0",  //anzeigetext fuer port D55 /A1                         <<user IO-Shield-20<<
"0",  //anzeigetext fuer port D56 /A2                         <<user IO-Shield-20<<
"0",  //anzeigetext fuer port D57 /A3                         <<user IO-Shield-20<<
"0",  //anzeigetext fuer port D58 /A4                         <<user IO-Shield-20<<
"0",  //anzeigetext fuer port D59 /A5                         <<user IO-Shield-20<<
"0","0",
"0",  //anzeigetext fuer port D62 /A8                         <<user IO-Shield-Plus<<
"0",  //anzeigetext fuer port D63 /A9                         <<user IO-Shield-Plus<<
"0",  //anzeigetext fuer port D64 /A10                        <<user IO-Shield-Plus<<
"0",  //anzeigetext fuer port D65 /A11                        <<user IO-Shield-Plus<<
"0",  //anzeigetext fuer port D66 /A12                        <<user IO-Shield-Plus<<
"0",  //anzeigetext fuer port D67 /A13                        <<user IO-Shield-Plus<<
"0",  //anzeigetext fuer port D68 /A14                        <<user IO-Shield-Plus<<
"0",  //anzeigetext fuer port D69 /A15                        <<user IO-Shield-Plus<<
// die folgenden Anzeigetexte sind für Module mit mehreren Datenpunkten z.b. I2C-Module
"L-Druck/mB:",  //anzeigetext fuer   D70 I2C 
"L-Temp./C :",  //anzeigetext fuer   D71 I2C 
"Lux/lx    :",   //anzeigetext fuer  D72I2C 
"UV-Index  :",  //anzeigetext fuer   D73 I2C
"MAX6675 ",     //anzeigetext fuer   D74  Für MAX6675             MAX6675,
"ADS1115 A0  ",  //anzeigetext fuer          D75  Für ADS1115 A0
"ADS1115 A1  ",  //anzeigetext fuer          D76  Für ADS1115 A1
"ADS1115 A2  ",  //anzeigetext fuer          D77  Für ADS1115 A2
"ADS1115 A3  ",  //anzeigetext fuer          D78  Für ADS1115 A3
"BME280 Temperatur:",   //anzeigetext fuer   D79  Für MBE280 Temperatur
"BME280 Druck:     ",   //anzeigetext fuer   D80  Für MBE280 Druck
"BME280 Hoehe:     ",   //anzeigetext fuer   D81  Für MBE280 Höhe
"BME280 Feuchte:   ",   //anzeigetext fuer   D82  Für MBE280 Feuchte
};
//#############################################################################################
//#############################################################################################
//hier werden die Zugangsberechtigungen für den RDM6300 Rfid-Reader und FOBs festgelegt
const byte fob_anzahl = 20;
const String fob[3*fob_anzahl] = {
"2381286","eugen","1",   // '0' = kein Tueroeffner                      <<user IO-Shield-Plus<<
"2381287","eugen","1",   // '1' = Tueroeffner1 D22                      <<user IO-Shield-Plus<<
"2381381","eugen","2",   // '2' = Tueroeffner2 D23                      <<user IO-Shield-Plus<<
"2380830","leonie","3",  // '3' = beide Tueroeffner                     <<user IO-Shield-Plus<<
"2409284","fabian","2"   //                                             <<user IO-Shield-Plus<<
"2409385","fabian","2"   //                                             <<user IO-Shield-Plus<<
"2409289","fabian","2"   //                                             <<user IO-Shield-Plus<<
"2519298","not used","0" //                                             <<user IO-Shield-Plus<<
"2519208","not used","0" //                                             <<user IO-Shield-Plus<<
"2519388","not used","0" //                                             <<user IO-Shield-Plus<<
"2519488","not used","0" //                                             <<user IO-Shield-Plus<<
"2511288","not used","0" //                                             <<user IO-Shield-Plus<<
"2529288","not used","0" //                                             <<user IO-Shield-Plus<<
"2619288","not used","0" //                                             <<user IO-Shield-Plus<<
"2719288","not used","0" //                                             <<user IO-Shield-Plus<<
"3519208","not used","0" //                                             <<user IO-Shield-Plus<<
"2519088","not used","0" //                                             <<user IO-Shield-Plus<<
"2519088","not used","0" //                                             <<user IO-Shield-Plus<<
"2510288","not used","0" //                                             <<user IO-Shield-Plus<<
"2510288","not used" "0" //                                             <<user IO-Shield-Plus<<
};
const unsigned long unlock_time1 = 5000; //oeffnungszeit rfid1 in ms    <<user IO-Shield-Plus<<
const unsigned long unlock_time2 = 5000; //oeffnungszeit rfid2 in ms    <<user IO-Shield-Plus<<
const boolean oeffner_polarity = 1;   // '1' normal, '0'  invers        <<user IO-Shield-Plus<<
//#############################################################################################
//#############################################################################################
//#############################################################################################

#include <SPI.h>
#include <Wire.h> 
#include <OneWire.h>   //für Temperatursensoren DS18B20
                       //http://www.hacktronics.com/code/OneWire.zip
#include <NewPing.h>   //für Ultraschallsensoren SR04
                       //https://arduino-new-ping.googlecode.com/files/NewPing_v1.5.zip
#include "DHT.h"       //für Temperatursensoren SHT22
                       //https://github.com/adafruit/DHT-sensor-library/archive/master.zip
#include <AS_BH1750.h> //für I2C-Luxmeter
                       //https://github.com/hexenmeister/AS_BH1750/archive/master.zip
#include <SFE_BMP180.h>//für I2C-Barometer
                       //https://github.com/sparkfun/BMP180_Breakout/archive/master.zip
#include <RCSwitch.h>  // läuft noch nicht!
#include <EEPROM.h>

#include <WiFiEsp.h>   //https://github.com/bportaluri/WiFiEsp
                       //für ESP-01 Modul

#include "max6675.h"   //   MAX6675

#include <Adafruit_ADS1015.h>                       

#include <Adafruit_Sensor.h>    // BME280
#include <Adafruit_BME280.h>    // BME280


//#include <IRremote.h>// läuft noch nicht!

//der folgende Bereich ist bei verwendung w5100 auszukommentieren
//ausblenden mit " #if defined (5100)" funktioniert leider nicht!! 
/*
//Initialisierung des CC3000 Wifi auf dem IO-Shield-Plus  
#include <SFE_CC3000.h>// fuer cc3000 wifi
                 // http://github.com/sparkfun/SFE_CC3000_Library/archive/master.zip
#include <SFE_CC3000_Client.h>
// Pins
#define CC3000_INT 18  // int-Pin mit Wifi Shield ist D3, mit breakout auf IO-Shield-Plus D18
#define CC3000_EN 46   // en-Pin mit Wifi Shield ist D5, mit breakout auf IO-Shield-Plus  D46
#define CC3000_CS 53   // cs-Pin mit Wifi Shield ist D10, mit breakout auf IO-Shield-Plus D53
SFE_CC3000 wifi = SFE_CC3000(CC3000_INT, CC3000_EN, CC3000_CS);
SFE_CC3000_Client client = SFE_CC3000_Client(wifi);
unsigned int ap_security = WLAN_SEC_WPA2; // Security of network
unsigned int timeout = 30000; // Milliseconds
char server[] = "192,168,178,50"; // Remote host site
*/

#if defined (w5100)  //************************************************************************ 
//der folgende Bereich ist die Initialisierung des LAN bei Verwendung des LAN-Shields
#include <Ethernet.h> 
EthernetClient client;
EthernetServer server(80);
#endif  //************************************************************************************* 

#if defined (esp8266)
    WiFiEspClient client;
    WiFiEspServer server(80);
#endif 
    unsigned long reqCount = 0;

//********************************************************************************************

#if defined(tft_display)  
#include <Adafruit_GFX.h>    //Quelle: https://github.com/adafruit/Adafruit-GFX-Library
#include <Adafruit_TFTLCD.h> //Quelle:   https://github.com/buhosoft/TFTLCD-Library
#include <stdint.h>
#include "TouchScreen.h"      
//Quelle: http://www.smokeandwires.co.nz/blog/a-2-4-tft-touchscreen-shield-for-arduino/
#define YP A1  // must be an analog pin, use "An" notation!
#define XM A2  // must be an analog pin, use "An" notation!
#define YM 7   // can be a digital pin
#define XP 6   // can be a digital pin
#define MINPRESSURE 10
#define MAXPRESSURE 1000
TouchScreen ts = TouchScreen(XP, YP, XM, YM, 330);

//***********************************************************************
// color definitions for e.g. ILI9327 TFT
#define BLACK   0x0000
#define BLUE    0x001F
#define RED     0xF800
#define GREEN   0x07E0
#define CYAN    0x07FF
#define MAGENTA 0xF81F
#define YELLOW  0xFFE0
#define WHITE   0xFFFF

/*
// color definitions for e.g. ILI9341 TFT tft_type =
#define BLACK   0xFFFF  
#define BLUE    0xFFE0 
#define RED     0x07FF 
#define GREEN   0xF81F 
#define CYAN    0xF800 
#define MAGENTA 0x07E0 
#define YELLOW  0x001F 
#define WHITE   0x0000 
*/

 #define default_color WHITE //standard text color on TFTs   <-- User Eingabe
//********************************************************************************

#define LCD_CS A3 // Chip Select goes to Analog 3
#define LCD_CD A2 // Command/Data goes to Analog 2
#define LCD_WR A1 // LCD Write goes to Analog 1
#define LCD_RD A0 // LCD Read goes to Analog 0

#define tft_rotation 1 //3 oder 1 abhägig vom tft-shield typ               <<user-eingabe<< 

#define LCD_RESET A4 // Can alternately just connect to Arduino's reset pin
Adafruit_TFTLCD tft(LCD_CS, LCD_CD, LCD_WR, LCD_RD, LCD_RESET);
int touch_y;
const byte zeilenzahl = 6;
int px,py,pz;
boolean touch, touch_alt;
unsigned long next_touch_time = 0;
boolean centertouch = 1;
boolean receivingcommand = false;
int espbyte = 0;

/*
//2,4'' display
const long int px_A = 901,  py_A = 183;  //touch-koordinaten oben-links                
const long int px_B = 192,  py_B = 189;  //touch-koordinaten oben-rechts              
const long int px_C = 936,  py_C = 860;  //touch-koordinaten unten-links              
#define schriftgroesse 3 
#define tft_type 1   // 1 ist 2,4''display   2 ist 3.95''display
 */
//3,95'' display und 3,5 display
const long int px_A = 105, py_A = 915;  //touch-koordinaten oben-links               
const long int px_B =920,  py_B = 908;  //touch-koordinaten oben-rechts             
const long int px_C =105,  py_C = 116;  //touch-koordinaten unten-links       
/*
const long int px_A = 962, py_A = 137;  //touch-koordinaten oben-links               
const long int px_B =92,  py_B = 127;  //touch-koordinaten oben-rechts             
const long int px_C =969,  py_C = 907;  //touch-koordinaten unten-links 
*/
#define schriftgroesse 3  
#define tft_type 2   // 1 ist 2,4''display   2 ist 3.95''display

//**************************************************************************************

//*********************************************************************************************
long int p_x, p_y ;   //normierte aktuelle touch-koordinaten: 
                      //oben links ist 0,0 und unten rechts ist 1000,1000
#endif  //*************************************************************************************

#if defined(lcd_display)  //*******************************************************************
//https://www.dfrobot.com/wiki/index.php?title=Arduino_LCD_KeyPad_Shield_%28SKU:_DFR0009%29
#include <LiquidCrystal.h> 
LiquidCrystal lcd(8, 9, 4, 5, 6, 7); // initialize library with numbers of the interface pins
const byte zeilenzahl = 2;
#endif  //*************************************************************************************

int x, x_alt;
byte zeile_pointer[6];
String zeile_data[6] = {"     ","     ","     ","     ","     ","     "};
String display_zeile_alt[6],display_zeile[6];
String taster;

char zeichen,buffer[50];
boolean fob_da =0;
String zeich, fob_hex, fob_dec,Name, lcd_rfid_message, oeffner, Value;
unsigned long fob_zahl,time_rfid3 = 0,time_rfid2 = 0; 
byte zeichen_zahl;

//********************************************************************************************* 
AS_BH1750 sensor; //Initialize BH1750 Luxmeter library
float lux;
long Lux;
int laenge;
SFE_BMP180 pressure;
char status;
double T,P,p0;
boolean reading = false;
String command = String(200);
String baro_string,baroT_string, lux_string;
//********************************************************************************************* 

const float ALTITUDE = 579.0; // eigene seehoehe in metern              <<user IO-Shield-Plus<<
#define SEALEVELPRESSURE_HPA (1013.25)

//********************************************************************************************* 
                         //  BME280
     
Adafruit_BME280 bme; // I2C

float bmeT = 0;
float bmeP = 0;
float bmeA = 0;
float bmeH = 0;

//*********************************************************************************************
boolean last_digital_value_D[83];
float last_value_D[83],last_IR_value,last_RF_value;
unsigned long next_Time[83];  
double last_baro_value,last_baroT_value;
boolean complete_loop =1; // wenn 1, dann einmal komplett durchlaufen
String befehl,sub_command = String(20),parameter = String(20),header = String(20);
int param,port_pin;
boolean port_data;
boolean value;
String I;
int analogwert;
//**********************************************************************
                       //  ADS1115
Adafruit_ADS1115 ads;

float adc0 = 0;
float adc1 = 0;
float adc2 = 0;
float adc3 = 0;

//**********************************************************************
               //   MAX6675          MAX6675,
// hier sind einzutragen welche Pins für den MAX Verwendet werden sollen
int thermoDO = 47;   // D47 - SO   --> auf MAX6675
int thermoCS = 48;   // D48 - CS   --> auf MAX6675
int thermoCLK = 49;  // D49 - SCK  --> auf MAX6675
float thermo_C = 0;
//********************************************************************************************* 
float tempNTC;
const float B_wert = 3950; //aus dem Datenblatt des NTC //<<user-eingabe<<
const float Tn = 298.15; //25°Celsius in °Kelvin 
const float Rv = 10000; //Vorwiderstand
const float Rn = 10000; //NTC-Widerstand bei 25°C
float Rt,temp_tur,humidity;
 
const float delta_onewire = 0.2; //Deltas für Sendeauslösung 
const float delta_DHT = 0.2; //in °C 
const float delta_us = 3.0; // in cm
const float delta_analog = 1.0; // in inkrement
const float delta_ntc = 0.5; //in °C
const float delta_lux = 15; //in lux
const float delta_counter = 1; //in counter inkrement
const double delta_baro = 0.5; //in mB
const double delta_baroT = 0.5; //in °C
const float delta_max = 1.0; // in °C                 //   MAX6675     MAX6675,
const float delta_ads0 = 1.0; // in inkrement          // ADS1115  A0
const float delta_ads1 = 1.0; // in inkrement          // ADS1115  A1
const float delta_ads2 = 1.0; // in inkrement          // ADS1115  A2
const float delta_ads3 = 1.0; // in inkrement          // ADS1115  A3
const float delta_bmeT = 1.0; // in °C          // BME280  Temperatur
const float delta_bmeP = 1.0; // in hPa         // BME280  Druck
const float delta_bmeH = 1.0; // in %           // BME280  Feuchte
const float delta_bmeA = 1.0; // in m           // BME280  Höhe

long duration, cm; //variable für Ultraschallsensor
unsigned long time_sr04;
 
unsigned long next_full_loop = 0;
unsigned long delta_time = 3600000; // jede Stunde werden alle Inputs aktualisiert
unsigned long delta_tx = 1000; //in ms, minimaler Abstand der Telegramme an die CCU
unsigned long next_tx = 0, time_wait = 0; 

int rf_key;
String rfkey;
RCSwitch mySwitch = RCSwitch();

unsigned zaehlwert;
unsigned last_zaehlwert[6] = {0,0,0,0,0,0};
boolean ccu_presence;

//#############################################################################################
//#############################################################################################
void setup() 
{Serial.begin(9600); 
//+++++++ einrichtung der interrupts fuer impulszahler D2,D3,D18,D19,D20,D21
 if ((pulsedivider[0] > 0) && (iomodus_D[2] == 6)) 
   {pinMode(2, INPUT_PULLUP); attachInterrupt(0, ISR_0, FALLING);}
 if ((pulsedivider[1] > 0) && (iomodus_D[3] == 6)) 
   {pinMode(3, INPUT_PULLUP); attachInterrupt(1, ISR_1, FALLING);} 
 if ((pulsedivider[2] > 0) && (iomodus_D[21] == 6)) 
   {pinMode(21, INPUT_PULLUP); attachInterrupt(2, ISR_2, FALLING);}
 if ((pulsedivider[3] > 0) && (iomodus_D[20] == 6)) 
   {pinMode(20, INPUT_PULLUP); attachInterrupt(3, ISR_3, FALLING);}
 if ((pulsedivider[4] > 0) && (iomodus_D[19] == 6)) 
   {pinMode(19, INPUT_PULLUP); attachInterrupt(4, ISR_4, FALLING);}

 #if defined (w5100)  //************************************************************************* 
 if ((pulsedivider[5] > 0) && (iomodus_D[18] == 6))  //interrupt reserviert fuer cc3000
   {pinMode(18, INPUT_PULLUP); attachInterrupt(5, ISR_5, FALLING);}
 #endif  //*************************************************************************************

//+++++++ rfid initialisieren
 if ((iomodus_D[15] == 12) && (iomodus_D[14] == 12)){Serial3.begin(9600);}
 if ((iomodus_D[17] == 12) && (iomodus_D[16] == 12)){Serial2.begin(9600);}

#if defined (lcd_display)  //******************************************************************
//+++++++ lcd initialisieren
 lcd.begin(16, 2); delay(200);  //16 zeichen in 2 zeilen
 lcd.setCursor(0,0);
 lcd.print(" Homeduino 4.0  ");
#endif  
//*************************************************************************************
 //************************************************************************************
#if defined (tft_display) 
//+++++++ tft initialisieren
 tft.reset();
 int identifier = tft.readID();                       // chip erkennung  bzw display nur weiss??
// int identifier = 0x9341; tft.begin(identifier);
 if (identifier == 0)
  {Serial.print(F("Unknown LCD driver chip: "));
    Serial.println(identifier, HEX);
    Serial.print(F("I try use ILI9341 LCD driver "));
    identifier = 0x9341;
  }
 tft.begin(identifier);
 Serial.print(F("TFT identifier:" )); Serial.println(identifier, HEX);   
 delay(100);
 
 tft.fillScreen(BLACK); tft.setRotation(tft_rotation);
 if (tft_type ==1) //2,4'' display 320x240
   {tft_print (1,"  Homeduino",4,YELLOW);
    tft_print (2,"     5.04",4,YELLOW);
    String wlan_ssid = " Connecting to WLAN: " + String::String(ap_ssid);
    tft_print (4,wlan_ssid,1,WHITE);
    tft_print (5," Blanko",4,CYAN);
    tft.drawRect(0,0, 319, 240, GREEN);
   } 
  if (tft_type ==2)  //3,95'' display 480x320
   {tft_print (1,"   Homeduino",5,YELLOW);
    tft_print (2,"      5.04",5,YELLOW);
    String wlan_ssid = " Connecting to WLAN: " + String::String(ap_ssid);
    tft_print (4,wlan_ssid,2,WHITE);
    tft_print (5,"  Blanko",5,BLUE);
    tft.drawRect(0,0, 480, 320, BLUE);
  }  
#endif  //*************************************************************************************

for(int i=0; i<zeilenzahl; i++)
   {zeile_pointer[i] = EEPROM.read(i);  //anzeige-pointer aus eeprom holen
    if (zeile_pointer[i] >82) {zeile_pointer[i] = 0;}  //wenn eeprom erstes mal benutzt wird
   } 

#if defined (w5100)  //************************************************************************
//hier folgt die LAN Initialisierung 
char myIpString[24];
 if (Ethernet.begin(mac) == 0) // start the Ethernet connection:
   {Serial.println("Failed to configure Ethernet using DHCP"); Ethernet.begin(mac, homeduino);}
    delay(1000);// give the Ethernet shield a second to initialize:
    Serial.println("connecting..."); // if you get a connection, report back via serial:
 if (client.connect(ccu_ip, 8181)) {}
   else {Serial.println("connection failed");} // if you didn't get a connection to the server:
 client.stop(); 
 IPAddress myIp = Ethernet.localIP();
 sprintf(myIpString, "%d.%d.%d.%d", myIp[0], myIp[1], myIp[2], myIp[3]); 
 I = myIpString;
 befehl = "GET /xy.exe?antwort=dom.GetObject('"+hm_systemvariable+"IP"+"').State('"+ I + "')";
 set_sysvar(); 
 server.begin();
#endif  //*************************************************************************************

#if defined (cc3000)  //**********************************************************************
// hier folgt die CC3000 Initialisierung 
 ConnectionInfo connection_info;
 char myIpString[24]; 
 Serial.println("SparkFun CC3000 - WebClient");
 if ( wifi.init() ) {Serial.println("init complete");} 
 else {Serial.println("problem with init!");}
 // Connect using DHCP
 if (!wifi.connect(ap_ssid, ap_security, ap_password, timeout)) 
   {Serial.println("no connection to AP");}
 //build IP address
 if ( !wifi.getConnectionInfo(connection_info) ) {Serial.println("no connection details");} 
   else {sprintf(myIpString, "%d.%d.%d.%d", connection_info.ip_address[0], 
   connection_info.ip_address[1],connection_info.ip_address[2], connection_info.ip_address[3]); 
         I = myIpString;
        }
 befehl = "GET /xy.exe?antwort=dom.GetObject('"+hm_systemvariable+"IP"+"').State('" + I + "')";
 set_sysvar(); 
 client.stop();
#endif  //*************************************************************************************

//************************************************************************   
#if defined (esp8266)  


       char myIpString[24]; 
       pinMode(22,OUTPUT); digitalWrite(22,1); // Reset-Pin auf 1 setzen
       Serial2.begin(115200); // Standard baudrate for current ESP-01 modules with Espressif firmware. Old ones use 9600 baud
        // initialize ESP module to different baudrate. HANDLE WITH CARE!!! Only enable next lines if you know what you are doing!
//        Serial2.write("AT+UART_DEF=115200,8,1,0,0\r\n"); //Modify default baudrate of 115200 (current Espressif FW) to reduce ESP Timeout Problems
//        Auf_OK_warten(); //Only throws OK when the module is reconfigured for the first time. On subsequent boots a Timeout occurs because the comm-rate already IS @ the target rate
//        Serial2.end();
//        delay(3000); 
//        Serial2.begin(115200); 
        
       Serial.println(F("Resetting ESP-01 module"));
       digitalWrite(22,0); delay(100); digitalWrite(22,1); delay(1000);//reset-Impuls ausgeben und Bootmeldungen abwarten
       Serial.println(F("Espressif ESP8266 - WebClient"));

        Serial2.write("AT\r\n");
        Auf_OK_warten(); //wait until reset is completed and ESP-01 responds again

      // initialize ESP module
        WiFi.init(&Serial2);
      
       // check for the presence of the shield
        if (WiFi.status() == WL_NO_SHIELD) {
          Serial.println(F("WiFi shield not present"));
          tft_print (4," No WLAN shield! STOP!!!",2,(RED));
          tft_print (3,"",3,BLACK);
            if (tft_type ==5) //2,8'' Elegoo display 320x240
            {tft.drawRect(0,0, 320, 240, (RED));}
          // don't continue
          while (true);
        }

            // attempt to connect to WiFi network
          while ( status != WL_CONNECTED) {
            Serial.print(F("Attempting to connect to WPA SSID: "));
            Serial.println(ap_ssid); 
            tft_print (4," WLAN shield ok- connecting",2,(MAGENTA));
            if (tft_type ==5) {tft.drawRect(0,0, 320, 240, (MAGENTA));}               //2,8'' Elegoo display 320x240
            // Connect to WPA/WPA2 network
            status = WiFi.begin(ap_ssid, ap_password);
            }

              // you're connected now, so print out the data
            Serial.println(F("You're connected to the network"));
            
             // print the SSID of the network you're attached to
              Serial.print(F("SSID: "));
              Serial.println(WiFi.SSID());
            
              // print your WiFi shield's IP address
              IPAddress ip = WiFi.localIP();
              Serial.print(F("IP Address: "));
              Serial.println(ip);
              sprintf(myIpString, "%d.%d.%d.%d", ip[0], ip[1], ip[2], ip[3]);
              I = myIpString;
              // print my MAC address
              byte mac[6];
              WiFi.macAddress(mac);
              char buf[20];
              sprintf(buf, "%02X:%02X:%02X:%02X:%02X:%02X", mac[5], mac[4], mac[3], mac[2], mac[1], mac[0]);
              Serial.print(F("MAC address: "));
              Serial.println(buf);
#endif
              
#if defined DEBUG
              Serial.print(F("String IP Address: "));
              Serial.println(myIpString);
#endif
  
#if defined (esp8266)              
              // print the received signal strength
              long rssi = WiFi.RSSI();
              Serial.print(F("Signal strength (RSSI):"));
              Serial.print(rssi);
              Serial.println(F(" dBm"));
              delay(6000); //let the Wifi connection establish itself
              Serial.println(F("Announcing my IP"));
              befehl = "GET /xy.exe?antwort=dom.GetObject('"+hm_systemvariable+"IP"+"').State('"+ I + "')";
              set_sysvar(); 
              server.begin();
#endif       

#if defined (lcd_display)  //****************************************************************** 
//bei erfolgreichem einloggen ausgabe ip-adresse 
lcd.setCursor(0,1);
lcd.print(myIpString);
delay(3000);
#endif  
//*************************************************************************************
//**************************************************************************************
#if defined (tft_display) 
//bei erfolgreichem einloggen ausgabe ip-adresse 
 
if (tft_type ==1) //2,4'' display
  {tft.setCursor(8, 230); //fusszeile
   tft.setTextColor(GREEN);  
   tft.setTextSize(1);
   tft.print(Version + "           Homeduino IP: "); tft.print(myIpString);
  }
if (tft_type ==2) //3,95'' display 480x320
  {tft.setCursor(1, 300); //fusszeile
   tft.setTextColor(BLUE);  
   tft.setTextSize(2);
   tft.print(Version + " IP:"); tft.print( myIpString); // tft.print("  dBm:");tft.print(rssi);   //fuer wifi dbm anzeige
  }
#endif  
//*************************************************************************************
for (int i = 0; i < 83; i++) {next_Time[i]=0;} //
 //delay(2000);
//****************************************************************************************
                                //ADS1115
ads.begin();  

                                     //BME280
 status = bme.begin(0x76);   
    if (!status) {
        Serial.println("Could not find a valid BME280 sensor, check wiring!");
        while (1);
    }
}
//#############################################################################################
//#############################################################################################
void loop() 
{complete_loop = 0;
 if (millis() > next_full_loop) //mindestens jede Stunde eine komplette Aktualisierung
   {complete_loop = 1; next_full_loop = millis() + delta_time; 
    if (next_full_loop < millis()) {complete_loop = 0;} //wichtig wegen Zahlensprung 
                                                        //von millis() alle 50 Tage
   } 
//*********************************************************************************************
 for (int i = 2; i < 73; i++) //behandlung aller Ports D2 bis D69 
 {while ((iomodus_D[i] == 0) || (iomodus_D[i] >29 )) {i++;}  // unbenutzte pins überspringen
  datenempfang(); //nach jeder Messung auf Datenempfang schalten
  display_data(); //display ausgeben und abfragen
 //******************************************************************************************** 
 if (iomodus_D[i] == 1) //behandlung digitaleingänge 
   {if (millis() > next_Time[i])
      {next_Time[i] = next_Time[i] +1000;  //digitaleingänge nicht häufiger als alle 1000ms abfragen
       pinMode(i, INPUT_PULLUP); 
       digitalWrite(i, HIGH);
       value =digitalRead(i);
       for (int m=0; m < zeilenzahl; m++)
         {if (zeile_pointer[m] == i) 
            {if (value ==0) {zeile_data[m] = "LOW";} else {zeile_data[m] = "HIGH";}}}
       if ((!value == last_digital_value_D[i]) || complete_loop) 
         {I = String(i);
          befehl="GET /xy.exe?antwort=dom.GetObject('"+hm_systemvariable+"D"+I+"').State("+value+")";
          set_sysvar();
          last_digital_value_D[i] = value;
         }
      } 
   }
//********************************************************************************************* 
 if (iomodus_D[i] == 3) //behandlung onewire 
   {if (millis() > next_Time[i])
      {next_Time[i] = next_Time[i] +10000;  //onewire nicht häufiger als alle 10s abfragen 
       pinMode(i, INPUT_PULLUP);
       digitalWrite(i,HIGH);
       OneWire ds(i); 
       #define DS18S20_ID 0x10
       #define DS18B20_ID 0x28 
       byte present = 0;   byte data[12];    byte addr[8];
       temp_tur = 1000.0;
       if (!ds.search(addr)) { ds.reset_search(); temp_tur = -1000.0; } //find a device
       if ((OneWire::crc8( addr, 7) != addr[7]) && (temp_tur > -1000.0)) {temp_tur = -1000.0; }
       if ((addr[0] != DS18S20_ID && addr[0] != DS18B20_ID)&& (temp_tur > -1000.0)) 
         {temp_tur = -1000.0;}
       if (temp_tur > -1000.0) 
         {ds.reset(); 
          ds.select(addr); 
          ds.write(0x44, 1); // Start conversion
          //delay(850); // Wait some time...
          time_wait = millis() +850;                       //wahrend der 2s wartezeit, daten empfangen
          while (millis() < time_wait) {datenempfang();display_data;} //und display weiter bedienen 
          present = ds.reset(); 
          ds.select(addr);
          ds.write(0xBE); // Issue Read scratchpad command
          for ( int k = 0; k < 9; k++) { data[k] = ds.read(); } // Receive 9 bytes
          temp_tur = ( (data[1] << 8) + data[0] )*0.0625; // Calculate temperature value 18B20
          //temp_tur = ( (data[1] << 8) + data[0] )*0.5 // Calculate temperature value 18S20
         }
       for (int m=0; m < zeilenzahl; m++)
         {if (zeile_pointer[m] == i) {zeile_data[m] = String(temp_tur,1);}
         }
       if ((temp_tur > (last_value_D[i] + delta_onewire)) 
                            || (temp_tur < (last_value_D[i] - delta_onewire)) || complete_loop) 
         {I = String(i);
          befehl="GET /xy.exe?antwort=dom.GetObject('"+hm_systemvariable+"D"+I+"').State("+temp_tur+")";
          set_sysvar();
          last_value_D[i] = temp_tur;
         }
      }   
  }
//********************************************************************************************* 
 if (iomodus_D[i] == 4) //behandlung DHT temperatur- und feuchtesensoren
   {if (millis() > next_Time[i])
      {next_Time[i] = next_Time[i] +60000;  //DHT nicht häufiger als alle 30s abfragen 
       DHT dht(i, DHT22); //je nach verwendetem sensor "DHT11", "DHT22" (AM2302),"DHT 21" (AM2301)
       dht.begin();
       //delay(2000); // Sensor readings may also be up to 2 seconds 'old' (its a very slow sensor)
       time_wait = millis() +2000;                       //wahrend der 2s wartezeit, daten empfangen
       while (millis() < time_wait) {datenempfang();display_data;} //und display weiter bedienen 
       humidity = dht.readHumidity(); // Read temperature as Celsius
       temp_tur = dht.readTemperature(); 
       if (isnan(humidity) || isnan(temp_tur) ) // Check if any reads failed and 
         {//Serial.println("Failed to read from DHT sensor!");
          temp_tur = -1000;
         }
        for (int m=0; m < zeilenzahl; m++)
         {if (zeile_pointer[m] == i) {zeile_data[m] = (String(temp_tur,1) + "C  " + String(humidity,1) + "%F");}
         }
       if ((temp_tur > (last_value_D[i] + delta_DHT))|| (temp_tur < (last_value_D[i] - delta_DHT)) 
                                                  || complete_loop) 
         {I = String(i);
          befehl="GET /xy.exe?antwort=dom.GetObject('"+hm_systemvariable+"D"+I+"').State('"+temp_tur+"')";
          set_sysvar();
           befehl="GET /xy.exe?antwort=dom.GetObject('"+hm_systemvariable+"D"+I+"_1').State('"+humidity+"')";
          set_sysvar();
          last_value_D[i] = temp_tur;
        } 
     }
   } 
 //******************************************************************************************** 
 if (iomodus_D[i] == 5) //behandlung ultraschallsensoren 
   {if (millis() > next_Time[i])
      {next_Time[i] = next_Time[i] +2000;  //ultraschall nicht häufiger als alle 2s abfragen 
 //achtung: zu beachten 
 //bei verwendung der US-Sensoren beim IO-Shield-Plus sind die 150-Ohm-Schutzwiderstände 
 //zu überbrücken (Jumper setzen!), entsprechend beim IO-Shield20 der Jumper 4-5 zu setzen!! 
       NewPing sonar(i, i, 200); // NewPing setup of pin and maximum distance.
       unsigned int uS = sonar.ping(); // Send ping, get ping time in microseconds (uS).
       int cm = uS / US_ROUNDTRIP_CM;
       for (int m=0; m < zeilenzahl; m++)
         {if (zeile_pointer[m] == i) {zeile_data[m] = String(cm);}}
          if ((cm > (last_value_D[i] + delta_us)) || (cm < (last_value_D[i] - delta_us)) || complete_loop) 
            {I = String(i);
             befehl = "GET /xy.exe?antwort=dom.GetObject('"+hm_systemvariable+"D"+I+"').State("+cm+")";
             set_sysvar();
             last_value_D[i] = cm;
            } 
      }
   }
//********************************************************************************************* 
 if (iomodus_D[i] == 10) //behandlung analogeingänge 
   {if (millis() > next_Time[i])
      {next_Time[i] = next_Time[i] +60000;  //analogeingänge nicht häufiger als alle 1000ms abfragen 

            analogwert = analogRead(i); 
          //  analogwert = map(analogwert ,0,1023,0,100 ) * 1.03 + 25;                  // skalieren
     
       for (int m=0; m < zeilenzahl; m++)
         {if (zeile_pointer[m] == i) {zeile_data[m] = String(analogwert);}}
       if ((analogwert > (last_value_D[i] + delta_analog)) 
                || (analogwert < (last_value_D[i] - delta_analog)) || complete_loop) 
         {I = String(i);
          befehl="GET /xy.exe?antwort=dom.GetObject('"+hm_systemvariable+"D"+I+"').State("+analogwert+")";
          set_sysvar();
          last_value_D[i] = analogwert;
         }
      }
   } 
//*********************************************************************************************
 if (iomodus_D[i] == 11) //behandlung NTC 
   {if (millis() > next_Time[i])
      {next_Time[i] = next_Time[i] +10000;  //NTC-eingänge nicht häufiger als alle 10s abfragen
       Rt = Rv/((1024.0/analogRead(i))- 1.0);
       tempNTC = (B_wert * Tn / ( B_wert + (Tn * log(Rt/Rn)))) -Tn +25.0 ;
       for (int m=0; m < zeilenzahl; m++)
         {if (zeile_pointer[m] == i) {zeile_data[m] = String(tempNTC,1);}}
          if ((tempNTC > (last_value_D[i] + delta_ntc)) || (tempNTC < (last_value_D[i] - delta_ntc)) 
                                                   || complete_loop) 
            {I = String(i);
             befehl="GET /xy.exe?antwort=dom.GetObject('"+hm_systemvariable+"D"+I+"').State("+tempNTC+")";
             set_sysvar();
             last_value_D[i] = tempNTC;
            } 
      }
   }     
//********************************************************************************************* 
 if (iomodus_D[i] == 6) //behandlung impulszahler D2,D3,D21,D20,D19,D18 
   {byte offset =23;
    if (i ==2) {offset = 4;} if (i ==3) {offset = 6;}
    zaehlwert = pulsecounter[offset - i ] / pulsedivider[offset - i ];
    for (int m=0; m < zeilenzahl; m++)
      {if (zeile_pointer[m] == i) {zeile_data[m] = String(zaehlwert);}}
       if ((pulsedivider[offset -i] > 0) && ((zaehlwert > (last_zaehlwert[offset - i]+ delta_counter) 
                           || complete_loop))) 
         {I = String(offset -i);
          befehl="GET /xy.exe?antwort=dom.GetObject('"+hm_systemvariable+"imp"+I+"').State("+zaehlwert+")";
          set_sysvar();
          last_zaehlwert[offset - i] = zaehlwert;
         } 
   } 
//*********************************************************************************************
//behandlung I2C sensoren an pin 20(sda) und pin 21 (scl)
 if ((iomodus_D[i] == 8)&&(i == 20))
   {i++;  // da I2C Bus 2 eingaenge belegt
  
//***********************************************************************************************
// behandlung Luxmeter BH1750 an SCL pin21 und SDA pin 20 
// for normal sensor resolution (1 lx resolution, 0-65535 lx, 120ms, no PowerDown) 
//use: sensor.begin(RESOLUTION_NORMAL, false); 
    if (iomodus_lux ==1)
      {if (millis() > next_Time[72])
         {next_Time[72] = next_Time[72] +60000;  //luxmeter nicht häufiger als alle 5s abfragen 
          if(!sensor.begin()) { Serial.println("Sensor not present"); }
          lux = sensor.readLightLevel(); //delay(1000);
          Lux = (int)lux;
          //Serial.print("Helligkeit/lux: "); Serial.print(lux); Serial.println();
          lux_string = "      " + String(Lux);
          int laenge = lux_string.length();
          lux_string = lux_string.substring(laenge -6,laenge);
          for (int m=0; m < zeilenzahl; m++)
            {if (zeile_pointer[m] == 72) {zeile_data[m] = lux_string;}}
             if (((Lux > (last_value_D[72] + delta_lux)) || (Lux < (last_value_D[72] - delta_lux)) 
                                                || complete_loop)) 
               {befehl="GET /xy.exe?antwort=dom.GetObject('" + hm_systemvariable+"lux"+"').State("+Lux+")";
                set_sysvar();
                last_value_D[72] = Lux;
               }
         } 
       } 
       
//*************************************************************************************************
   //behandlung barometer BMP180 an SCL pin21 und SDA pin 20
    if (iomodus_baro ==1)
      {if (millis() > next_Time[70])
         {next_Time[70] = next_Time[70] +60000;  //barometer nicht häufiger als alle 30s abfragen 
          if (pressure.begin()) {status = pressure.startTemperature();}
          if (status) {delay(status); status = pressure.getTemperature(T);} //messung T
          if (status) {status = pressure.startPressure(3);} // //messung P mit resolution 0 bis 3
          if (status) {delay(status); status = pressure.getPressure(P,T);}
          if (status) {p0 = pressure.sealevel(P,ALTITUDE);} // umrechnung auf N.N.
//Serial.print("Hoehe/m: "); Serial.print(ALTITUDE); Serial.print(" Temperatur/C: "); 
//Serial.print(T); Serial.print(" Normaldruck /mb: "); Serial.println(p0); 
          baro_string = "     " + String(p0);
          laenge = baro_string.length();
          baro_string = baro_string.substring(laenge -7,laenge -1);
          baroT_string = "      " + String(T);
          laenge = baroT_string.length();
          baroT_string = baroT_string.substring(laenge -7,laenge -1);
          for (int m=0; m < zeilenzahl; m++) {if (zeile_pointer[m] == 70) {zeile_data[m] = baro_string;}}
          if ((p0 > (last_baro_value + delta_baro)) || (p0 < (last_baro_value - delta_baro)) 
                                                || complete_loop) 
            {befehl="GET /xy.exe?antwort=dom.GetObject('"+hm_systemvariable+"baro"+"').State("+p0+")";
             set_sysvar();
             last_baro_value = p0;
             last_value_D[70] = p0;
            }
          for (int m=0; m < zeilenzahl; m++) {if (zeile_pointer[m] == 71) {zeile_data[m] = baroT_string;}}  
          if ((T > (last_baroT_value + delta_baroT)) || (p0 < (last_baroT_value - delta_baroT)) 
                                                     || complete_loop) 
            {befehl="GET /xy.exe?antwort=dom.GetObject('"+hm_systemvariable+"baroT"+"').State("+T+")";
             set_sysvar();
             last_baroT_value = T;
             last_value_D[71] = T;
            } 
         }
      } 

//**********************************************************************************************
                         //         ADS1115   nr1
                            
       if (iomodus_ads1 ==1)
      {if (millis() > next_Time[75])
         {next_Time[75] = next_Time[75] +2000;  //ADS1115 nicht häufiger als alle 1s abfragen 

        
    adc0 = ads.readADC_SingleEnded(0);
   //   adc0 = map(adc0 ,210,32000,0,5760 )  ;                          // skalieren
    
    adc1 = ads.readADC_SingleEnded(1);
    //  adc1 = map(adc1 ,0,1023,0,100 )  * 1.03 + 25;                  // skalieren
    
    adc2 = ads.readADC_SingleEnded(2);
    //  adc2 = map(adc2 ,0,1023,0,100 )  * 1.03 + 25;                  // skalieren
    
    adc3 = ads.readADC_SingleEnded(3);
    //  adc3 = map(adc3 ,0,1023,0,100 )  * 1.03 + 25;                  // skalieren
    
    //  Serial.print("AIN0: "); Serial.println(adc0);
    //  Serial.print("AIN1: "); Serial.println(adc1);
    //  Serial.print("AIN2: "); Serial.println(adc2);
    //  Serial.print("AIN3: "); Serial.println(adc3);
    //  Serial.println(" ");

          
          for (int m=0; m < zeilenzahl; m++)
            {if (zeile_pointer[m] == 75) {zeile_data[m] = adc0;}}
             if (((adc0 > (last_value_D[75] + delta_ads0)) || (adc0 < (last_value_D[75] - delta_ads0)) 
                                                || complete_loop))                       
               {befehl="GET /xy.exe?antwort=dom.GetObject('" + hm_systemvariable+"D75"+"').State("+adc0+")";
                set_sysvar();
                last_value_D[75] = adc0;
               }

               for (int m=0; m < zeilenzahl; m++)
                {if (zeile_pointer[m] == 76) {zeile_data[m] = adc1;}}
             if (((adc1 > (last_value_D[76] + delta_ads1)) || (adc1 < (last_value_D[76] - delta_ads1)) 
                                                || complete_loop))          
               {befehl="GET /xy.exe?antwort=dom.GetObject('" + hm_systemvariable+"D76"+"').State("+adc1+")";
                set_sysvar();
                last_value_D[76] = adc1;
               }

               for (int m=0; m < zeilenzahl; m++)
                {if (zeile_pointer[m] == 77) {zeile_data[m] = adc2;}}
             if (((adc2 > (last_value_D[77] + delta_ads2)) || (adc2 < (last_value_D[77] - delta_ads2)) 
                                                || complete_loop))
               {befehl="GET /xy.exe?antwort=dom.GetObject('" + hm_systemvariable+"D77"+"').State("+adc2+")";
                set_sysvar();
                last_value_D[77] = adc2;
               }

               for (int m=0; m < zeilenzahl; m++)
                {if (zeile_pointer[m] == 78) {zeile_data[m] = adc3;}}
             if (((adc3 > (last_value_D[78] + delta_ads3)) || (adc3 < (last_value_D[78] - delta_ads3)) 
                                                || complete_loop))
               {befehl="GET /xy.exe?antwort=dom.GetObject('" + hm_systemvariable+"D78"+"').State("+adc3+")";
                set_sysvar();
                last_value_D[78] = adc3;
               }
         } 
       }
//**********************************************************************************************
                         //        BME280
                            
       if (iomodus_bme ==1)
      {if (millis() > next_Time[79])
         {next_Time[79] = next_Time[79] +5000;  //BME280 nicht häufiger als alle 10s abfragen 

/*
    Serial.print("Temperature = ");
    Serial.print(bme.readTemperature());
    Serial.println(" *C");

    Serial.print("Pressure = ");

    Serial.print(bme.readPressure() / 100.0F);
    Serial.println(" hPa");

    Serial.print("Approx. Altitude = ");
    Serial.print(bme.readAltitude(SEALEVELPRESSURE_HPA));
    Serial.println(" m");

    Serial.print("Humidity = ");
    Serial.print(bme.readHumidity());
    Serial.println(" %");

    Serial.println();
*/    
       
    bmeT = bme.readTemperature();
       
    bmeP = bme.readPressure()  / 100.0F ;
      
    bmeA = bme.readAltitude(SEALEVELPRESSURE_HPA);
     
    bmeH = bme.readHumidity();
  
 
          for (int m=0; m < zeilenzahl; m++)
            {if (zeile_pointer[m] == 79) {zeile_data[m] = bmeT;}}
             if (((bmeT > (last_value_D[79] + delta_bmeT)) || (bmeT < (last_value_D[79] - delta_bmeT)) 
                                                || complete_loop))                       
               {befehl="GET /xy.exe?antwort=dom.GetObject('" + hm_systemvariable+"D79"+"').State("+bmeT+")";
                set_sysvar();
                last_value_D[79] = bmeT;
               }

               for (int m=0; m < zeilenzahl; m++)
                {if (zeile_pointer[m] == 80) {zeile_data[m] = bmeP;}}
             if (((bmeP > (last_value_D[80] + delta_bmeP)) || (bmeP < (last_value_D[80] - delta_bmeP)) 
                                                || complete_loop))          
               {befehl="GET /xy.exe?antwort=dom.GetObject('" + hm_systemvariable+"D80"+"').State("+bmeP+")";
                set_sysvar();
                last_value_D[80] = bmeP;
               }

               for (int m=0; m < zeilenzahl; m++)
                {if (zeile_pointer[m] == 81) {zeile_data[m] = bmeA;}}
             if (((bmeA > (last_value_D[81] + delta_bmeA)) || (bmeA < (last_value_D[81] - delta_bmeA)) 
                                                || complete_loop))
               {befehl="GET /xy.exe?antwort=dom.GetObject('" + hm_systemvariable+"D81"+"').State("+bmeA+")";
                set_sysvar();
                last_value_D[81] = bmeA;
               }

               for (int m=0; m < zeilenzahl; m++)
                {if (zeile_pointer[m] == 82) {zeile_data[m] = bmeH;}}
             if (((bmeH > (last_value_D[82] + delta_bmeH)) || (bmeH < (last_value_D[82] - delta_bmeH)) 
                                                || complete_loop))
               {befehl="GET /xy.exe?antwort=dom.GetObject('" + hm_systemvariable+"D82"+"').State("+bmeH+")";
                set_sysvar();
                last_value_D[82] = bmeH;
               } 
         } 
       }  
  }  
//*********************************************************************************************
 if (iomodus_D[3] == 7) //behandlung 433Mhz-rx 
   {if (mySwitch.available()) 
      {int value = mySwitch.getReceivedValue();
       if (value == 0) {client.print("Unknown encoding");} 
          else {Serial.print("Pin D3 received : ");
                Serial.print (mySwitch.getReceivedValue() );
                Serial.print (" / ");
                Serial.print( mySwitch.getReceivedBitlength() );
                Serial.print("bit Protocol: ");
                Serial.println( mySwitch.getReceivedProtocol() + " \n\r" );
               }
      mySwitch.resetAvailable();
     }
   } 
  //******************************************************************************************* 
 if ((iomodus_D[i] == 12) && (i==22))  //behandlung rfid3 tueroeffner an D22 des Mega
   {pinMode(i,OUTPUT);
    if (millis()< time_rfid3)         //D22-als normal-Ausgang für tueröffner schalten
      {Value = " AUF"; 
       if (oeffner_polarity) {digitalWrite(i, HIGH);} else {digitalWrite(i,LOW);}
       }
         else {Value = "  ZU"; if (!oeffner_polarity) 
                               {digitalWrite(i, HIGH);} else {digitalWrite(i,LOW);}}
       for (int m=0; m < zeilenzahl; m++)
         {if (zeile_pointer[m] == i) {zeile_data[m] = Value;}}
    }
  if ((iomodus_D[i] == 12) && (i==23))  //behandlung rfid2 tueroeffner  an D23 des Mega
    {pinMode(i,OUTPUT);
     if (millis()< time_rfid2)         //D23-als normal-Ausgang für tueröffner schalten
       {Value = " AUF"; if (oeffner_polarity) 
                          {digitalWrite(i, HIGH);} 
                          else {digitalWrite(i,LOW);}}
       else {Value = "  ZU"; if (!oeffner_polarity) {digitalWrite(i, HIGH);} 
                                                    else {digitalWrite(i,LOW);}} 
     for (int m=0; m < zeilenzahl; m++)
       {if (zeile_pointer[m] == i) {zeile_data[m] = Value;}
       }
    }
 //******************************************************************************************** 
  if (iomodus_D[i] == 12) //behandlung rfid-modul RDM6300 
    {int m = 0; fob_zahl=0;  fob_hex ="";
     if (i == 15){while((Serial3.available()>0)&&(m <11 ))  //behandlung rfid3
                       {fob_da=1;  m++;  zeichen = Serial3.read();
                        if (m>4)  //die ersten 4 zeichen ignorieren
                          {fob_hex += zeichen; fob_zahl = hexToDec(fob_hex);}
                        if (m > 10) //Datenübertragung fertig, dann buffer leeren 
                          {while(Serial3.available()>0) {zeichen = Serial3.read();}}
             }
         }  
           
   /*  if (i == 17){while((Serial2.available()>0)&&(m <11 ))//behandlung rfid2
                      {fob_da=1;  m++;  zeichen = Serial2.read();
                       if (m>4)  //die ersten 4 zeichen ignorieren
                         {fob_hex += zeichen; fob_zahl = hexToDec(fob_hex);}
                       if (m > 10) //Datenübertragung fertig, dann buffer leeren 
                         {while(Serial2.available()>0) {zeichen = Serial2.read();}}
            }
           }
  */  
    
     if (fob_da)
       {fob_dec = ""; 
        sprintf(buffer,"%lu", fob_zahl); //zahl umwandeln in string
        for(int k = 0; k<7; k++) {fob_dec += buffer[k];} 
        Name = "";  //gueltigen namen und oeffner aus tabelle ermitteln  
        for (int k = 0; k < fob_anzahl; k++) {if (fob_dec == fob[3*k]) 
                                                {Name += fob[(3*k)+1];
                                                 oeffner= fob[(3*k)+2]; 
                                                 break;
                                                }
                                              }
        if ((Name != "") && ((oeffner =="1") ||(oeffner =="3"))) 
          {time_rfid3 = millis() + unlock_time1;}
        if ((Name != "") && ((oeffner =="2") ||(oeffner =="3")))  
          {time_rfid2 = millis() + unlock_time2;}
        if (Name == "") {Name = fob_dec;}
        lcd_rfid_message = Name + "          "; //lcd mmeldung modifizieren für rfid
        lcd_rfid_message = lcd_rfid_message.substring(0,9);
         
        for (int n=0; n < zeilenzahl; n++)
          {if (zeile_pointer[n] == i) 
             {display_message[i]= lcd_rfid_message; zeile_data[n] = fob_dec;}
          }
           
     //Serial.println(Name + " " + fob_dec);
        I = String(i);
        befehl="GET /xy.exe?antwort=dom.GetObject('"+hm_systemvariable+"D"+I+"').State('"+Name+"')";
        set_sysvar();
        fob_da =0;
       }
     delay(500);  
    }
   
//**********************************************************************************************
        //MAX6675           

 if (iomodus_max1 ==1)

      {if (millis() > next_Time[74])
                {next_Time[74] = next_Time[74] +5000;  //MAX6675 nicht häufiger als alle 5s abfragen 
                
         MAX6675 thermocouple(thermoCLK, thermoCS, thermoDO); 
         thermo_C = thermocouple.readCelsius()  -2.5 ;   // Sensor Lesen und Korrekturwert
         
        // Serial.print("C = "); Serial.println(thermo_C);
      
                for (int m=0; m < zeilenzahl; m++)
            {if (zeile_pointer[m] == 74) {zeile_data[m] = thermo_C;}}
             if (((thermo_C > (last_value_D[74] + delta_max)) || (thermo_C < (last_value_D[74] - delta_max)) 
                                                || complete_loop)) 
                                         
               {befehl="GET /xy.exe?antwort=dom.GetObject('" + hm_systemvariable+"D74"+"').State("+thermo_C+")";
                set_sysvar();
                last_value_D[74] = thermo_C;
               }
         } 
       }   
                            
//**************************   ende loop  *****************************************************
 }
} 
//#############################################################################################
//#############################################################################################
//#############################  Unterprogramme   #############################################

void datenempfang() //Unterprogramm datenempfang: daten von ccu an homeduino senden
{command = ""; 

#if defined (w5100)  //************************************************************************
 EthernetClient client = server.available();   //mit W5100
#endif  //************************************************************************************* 

#if defined (cc3000)  //***********************************************************************
 SFE_CC3000_Client client = SFE_CC3000_Client(wifi);   //mit CC3000
#endif  //************************************************************************************* 

#if defined (esp8266)  //***********************************************************************
  WiFiEspClient client = server.available();   //using ESP8266 (ESP-01 module)
#endif  //************************************************************************************* 

 if (client) // an http request ends with a blank line
   {boolean currentLineIsBlank = true;
    while (client.connected())
      {if (client.available()) 
         {char c = client.read();
          if (reading && c == ' ') reading =false;
          if (c == '?') reading = true; // beginn der Befehlssequenz 
          if (reading) 
            {if (command.length() < 100) //read char by char HTTP request
               {command = command + c; } //store characters to string
            } 
          if (c == '\n' && currentLineIsBlank) break;
          if (c == '\n') {currentLineIsBlank = true;} 
            else if (c != '\r') { currentLineIsBlank = false;}
         } 
       } 
     client.println(command);
     delay(1); 
     client.stop();
//*********************************************************************************************
    if (command.length() > 2) //behandlung Datenempfang von ccu: port auf 0/1 setzen 
      {Serial.println(command); //empfangenen befehl ausgeben
       client.print(command); //befehl dann dekodieren 
       int colonPosition = command.indexOf(':');
       sub_command = command.substring(2,colonPosition); //portpin erkennen
       Serial.print("D" + sub_command + " :");
       port_pin = sub_command.toInt();
       command = command.substring((colonPosition+1)); //Rest-command bilden
       if (((iomodus_D[port_pin] == 2)||(iomodus_D[port_pin] == 12)) && (command == "0")) 
         {for (int m=0; m < zeilenzahl; m++)
            {if (zeile_pointer[m] == port_pin) {zeile_data[m] = " LOW";}
            }
          pinMode(port_pin, OUTPUT); digitalWrite(port_pin, LOW); Serial.println(command);
         }
       if ((iomodus_D[port_pin] == 2) && (command == "1")) 
         {for (int m=0; m < zeilenzahl; m++)
            {if (zeile_pointer[m] == port_pin) {zeile_data[m] = " HIGH";}
            }
          pinMode(port_pin, OUTPUT); digitalWrite(port_pin, HIGH); Serial.println(command);}
          if ((iomodus_D[port_pin] == 7) && (port_pin ==4)) 
            {rf_send(command); Serial.println(command);} 
          if ((iomodus_D[port_pin] == 5) && (port_pin ==9)) 
            {ir_send(command); Serial.println(command);} 
      }
  } 
} 
//*********************************************************************************************

void set_sysvar() // subroutine HTTP request absetzen:
{while (millis() < next_tx) {} //warten bis time > next_tx oder timeout
 next_tx = millis() +delta_tx;  
   
  befehl += " HTTP/1.1\r\nHost:";  //zusaetzlich wegen neuer CCU-firmware
  befehl += ccu_ip;
  befehl += "\r\nConnection: close\r\n\r\n";
                                                    
 if (client.connect(ccu_ip, 8181)) 
   {byte transmitbytes = 0;
    unsigned long breakMillis = millis();
    Serial.println(befehl);
    transmitbytes = client.println(befehl);
    while (transmitbytes != (befehl.length() + 2)) {
      Serial.println(F("Transmission failed! Retrying..."));
      delay(10);
      transmitbytes = client.println(befehl);
      if ((millis() - breakMillis) > 100) {Serial.println(F("Transmission failed 10 times!!! Check the WLAN connection to your CCU!")); break;}
      }
    client.println();
    client.flush();
    client.stop();
   } else {Serial.println(F("connection failed"));}
}

//*********************************************************************************************
void rf_send(String rf_command) // subroutine rf telegramm senden
{
}
//*********************************************************************************************
void ir_send(String ir_command) // subroutine ir telegramm senden
{
}
//*********************************************************************************************
//hier sind die interrupt-service-routinen fuer die impulszaehler  //**************************
void ISR_0() //Interrupt an D2
{pulsecounter[0]++;}
void ISR_1() //Interrupt an D3
{pulsecounter[1]++;}
void ISR_2() //Interrupt an D21
{pulsecounter[2]++;}
void ISR_3() //Interrupt an D20
{pulsecounter[3]++;}
void ISR_4() //Interrupt an D19
{pulsecounter[4]++;}
void ISR_5() //Interrupt an D18 
{pulsecounter[5]++;}
//*********************************************************************************************
//Unterprogramm:  Converting from Hex (unsigned long) to Decimal: *****************************
//Quelle https://github.com/benrugg/Arduino-Hex-Decimal-Conversion/blob/master/hex_dec.ino
unsigned long hexToDec(String hexString) 
{unsigned long decValue = 0;
 int nextInt;
 for (int k = 0; k < hexString.length(); k++) 
   {nextInt = int(hexString.charAt(k));
    if (nextInt >= 48 && nextInt <= 57) nextInt = map(nextInt, 48, 57, 0, 9);
    if (nextInt >= 65 && nextInt <= 70) nextInt = map(nextInt, 65, 70, 10, 15);
    if (nextInt >= 97 && nextInt <= 102) nextInt = map(nextInt, 97, 102, 10, 15);
    nextInt = constrain(nextInt, 0, 15);
    decValue = (decValue * 16) + nextInt;
  }
 return decValue;
}

//*********************************************************************************************
void display_data() //gibt daten auf dem lcd oder tft display aus

//*********************************************************************************************
#if defined (lcd_display)  //behandlung lcd-display: erkennung des tasters und lcd-anzeige
{x = analogRead (0);  //abfrage A0
 if (x < (x_alt -100))  {tastererkennung();}
 x_alt = x; 
 for (int m = 0; m < zeilenzahl; m++)
   {while (zeile_data[m].length() < 5) {zeile_data[m] = " " + zeile_data[m];}
    if (display_message[zeile_pointer[m]] == "0") {zeile_data[m] = "                ";}
    display_zeile[m] =  display_message[zeile_pointer[m]] + zeile_data[m];
   
    if (display_zeile[m] != display_zeile_alt[m])  //datenausgabe auf display nur wenn aenderung 
      {lcd.setCursor(0,m); lcd.print (display_zeile[m]); display_zeile_alt[m] = display_zeile[m];}
   } 
} 
//*********************************************************************************************
void tastererkennung()
{if (x < 60) 
   {taster == "right"; 
    zeile_pointer[0]--;  if (zeile_pointer[0] ==1) {zeile_pointer[0] = 79;}
    while((iomodus_D[zeile_pointer[0]] ==0) || (iomodus_D[zeile_pointer[0]] >19))
         {zeile_pointer[0]--; if (zeile_pointer[0] ==1) {zeile_pointer[0] =79;} }
    EEPROM.write(0,zeile_pointer[0]);//delay(4);
   } 
   else if (x < 200) 
          {taster == "up";
           zeile_pointer[0]++;  if (zeile_pointer[0] ==80) {zeile_pointer[0] = 2;}
           while((iomodus_D[zeile_pointer[0]] ==0) || (iomodus_D[zeile_pointer[0]] >19))
               {zeile_pointer[0]++; if (zeile_pointer[0] ==80) {zeile_pointer[0] = 2;} }
           EEPROM.write(0,zeile_pointer[0]);//delay(4);
          } 
          else if (x < 400) 
                   {taster == "down";
                    zeile_pointer[1]++; if (zeile_pointer[1] ==80) {zeile_pointer[1] = 2;}
                    while((iomodus_D[zeile_pointer[1]] ==0) || (iomodus_D[zeile_pointer[1]] >19))
                         {zeile_pointer[1]++; if (zeile_pointer[1] ==80) {zeile_pointer[1] = 2;} } 
                    EEPROM.write(1,zeile_pointer[1]);//delay(4);     
                   } 
                  else if (x < 600)
                         {taster == "left";
                          zeile_pointer[1]--;
                          if (zeile_pointer[1] ==1) {zeile_pointer[1] = 79;}
                          while((iomodus_D[zeile_pointer[1]] ==0) || (iomodus_D[zeile_pointer[1]] >19))
                               {zeile_pointer[1]--; if (zeile_pointer[1] ==1) {zeile_pointer[1] =79;} }
                          EEPROM.write(1,zeile_pointer[1]);//delay(4);
                         } 
                         else if (x < 800)
                                {taster = "select";}
                                else {taster ="";}
}
#endif  //************************************************************************************* 

//*********************************************************************************************
#if defined (tft_display)  //behandlung tft toucheingabe und  display 2.4''
 {if (millis() > next_touch_time)  //touch-display abfragen
   {TSPoint p = ts.getPoint();// a point object holds x y and z coordinates
    px = p.x; py = p.y; pz =p.z;  
    pinMode(XM, OUTPUT);   pinMode(YP, OUTPUT);
    if (pz > MINPRESSURE && pz < MAXPRESSURE ) 
      {Serial.print("px : ");Serial.print( px); Serial.print("  py : " ); Serial.print(py);
       Serial.print("  pz : " ); Serial.print(pz);
       if (abs(px_B - px_A) > 100) {p_x = (1000 *(px- px_A))/(px_B -px_A); p_y = (1000 *(py - py_A))/(py_C -py_A);} 
         else {p_x = (1000 *(py -py_A))/(py_B - py_A); p_y = (1000 *(px - px_A)) /(px_C - px_A);}
       Serial.print("  p_x : ");Serial.print( p_x); Serial.print("  p_y : " ); Serial.print(p_y);
       if (p_y < 154) {touch_y = 0;}   //p_y = 1000 entspricht 6,5 Zeilen 
         else {if (p_y < 308) {touch_y = 1;}
                 else {if (p_y < 462) {touch_y = 2;}
                         else {if (p_y < 616) {touch_y = 3;}
                                 else {if (p_y < 770) {touch_y = 4;}
                                         else {touch_y = 5;}}}}}


             Serial.print("     touch_y "); Serial.print(touch_y); Serial.println();
       centertouch = 1;
       if (p_x < 333) {zeile_pointer_minus();  Serial.println(zeile_pointer[touch_y]); centertouch = 0;}
       if (p_x > 666) {zeile_pointer_plus();  Serial.println(zeile_pointer[touch_y]); centertouch = 0;} //reserve center area for other action
       if ((centertouch) && ((iomodus_D[zeile_pointer[touch_y]]) == 2)) {
        port_pin = zeile_pointer[touch_y];

        next_touch_time = millis() + 200;
        if (((iomodus_D[port_pin]) == 2) && (digitalRead(port_pin) == LOW)) {
            command = "1"; SetOutputPort ();} 
          else {
            command = "0"; SetOutputPort ();} //toggle output pin
        centertouch = 0;}
      }
      for (int m = 0; m < zeilenzahl; m++)  //datenausgabe auf tft-display
      {while (zeile_data[m].length() < 7) {zeile_data[m] = " " + zeile_data[m];}
       display_zeile[m] =  display_message[zeile_pointer[m]] + zeile_data[m];
       if (display_zeile[m] != display_zeile_alt[m]) //displayausgabe nur wenn aenderung 
         {tft_print (m,display_zeile[m],schriftgroesse,default_color); display_zeile_alt[m] = display_zeile[m];
        }
      }
   } 
}
//*********************************************************************************************
//mit diesem Unterprogramm wird auf dem tft display ein zeilen-display 6 x 16  emuliert
void tft_print (int line, String textline, int font_size, long int color)
{if (tft_type ==1)
   {tft.fillRect(0,38*line, 319, 38, BLACK); //x0,y0, width,heights  //zeile loeschen
    tft.setCursor(0, 38*line+6);              //und dann erst schreiben
   }
 if (tft_type ==2)
   {tft.fillRect(0,50*line, 479, 50, BLACK); //x0,y0, width,heights  //zeile loeschen
    tft.setCursor(5, 50*line+6);              //und dann erst schreiben
   }  
 tft.setTextColor(color);  
 tft.setTextSize(font_size);
 tft.print(textline);
}
//**************************************************************************************
//mit diesen Unterprogrammen wird der zeile_pointer im eeprom abgelegt
void zeile_pointer_plus()
{next_touch_time = millis() + 200; 
  zeile_pointer[touch_y]++;  if (zeile_pointer[touch_y] >82) {zeile_pointer[touch_y] = 2;}     // 82 bei Port Erweiterung ändern 4x
 while((iomodus_D[zeile_pointer[touch_y]] ==0) || (iomodus_D[zeile_pointer[touch_y]] >19))
  {zeile_pointer[touch_y]++; if (zeile_pointer[touch_y] >82) {zeile_pointer[touch_y] = 2;} }
 EEPROM.write(touch_y,zeile_pointer[touch_y]);//delay(4);
}
void zeile_pointer_minus()
{next_touch_time = millis() + 200; 
  zeile_pointer[touch_y]--;  if (zeile_pointer[touch_y] <2) {zeile_pointer[touch_y] = 82;}
 while((iomodus_D[zeile_pointer[touch_y]] ==0) || (iomodus_D[zeile_pointer[touch_y]] >19))
   {zeile_pointer[touch_y]--; if (zeile_pointer[touch_y] <2) {zeile_pointer[touch_y] =82;}  }
 EEPROM.write(touch_y,zeile_pointer[touch_y]);//delay(4);
}      
#endif  
//***************************************************************************************************** 

#if defined (esp8266)
// just needed in case you want to communicate with the ESP-01 without using the ESPwifi lib */
   void Auf_OK_warten()
{ Serial2.flush(); 
  boolean Ook = false;
  boolean Kok = false;
  unsigned long Counter = 0;
  
  while(!Kok)
  {
    if (Serial2.available())     espbyte = Serial2.read();
    if (espbyte == 79) Ook = true;
    if (espbyte == 75) Kok = true;
    Counter++;
    if (Counter > 200000){Serial.print(F("Timeout while communicating with ESP-01 module!\n\r")); break;}
  }
  if (Ook && Kok) Serial.println();
}
#endif
//*************************************************************************************
      int freeRam () { //just for debugging
          extern int __heap_start, *__brkval; 
          int v; 
          int fr = (int) &v - (__brkval == 0 ? (int) &__heap_start : (int) __brkval); 
          Serial.print(F("Free ram: "));
          Serial.println(fr);
       }
//*************************************************************************************
      void SetOutputPort () {
               if (((iomodus_D[port_pin] == 2)||(iomodus_D[port_pin] == 12)) && (command == "0")) 
               {for (int m=0; m < zeilenzahl; m++)
                  {if (zeile_pointer[m] == port_pin) {zeile_data[m] = " Aus";} // display_value[port_pin] = " LOW";}
                  }
                pinMode(port_pin, OUTPUT); digitalWrite(port_pin, LOW); Serial.println(command);
               }
             if ((iomodus_D[port_pin] == 2) && (command == "1")) 
               {for (int m=0; m < zeilenzahl; m++)
                  {if (zeile_pointer[m] == port_pin) {zeile_data[m] = "   An";} // display_value[port_pin] = " HIGH";}
                  }
                pinMode(port_pin, OUTPUT); digitalWrite(port_pin, HIGH); Serial.println(command);}
          String I = String(port_pin);
          befehl = "GET /xy.exe?antwort=dom.GetObject('"+hm_systemvariable+"D"+I+"').State('"+command+"')";
          set_sysvar();
       }
 
//*************************************************************************************
#if defined (esp8266)

void sendHttpResponse(WiFiEspClient client)
    {
    if (receivingcommand == true) {
         
          Serial.println(F("Sending command response"));
          // send a standard http response header
          // use \r\n instead of many println statements to speedup data send
          client.print(F( "HTTP/1.1 200 OK\r\n"
                          "Content-Type: text/html\r\n"
                          "Connection: close\r\n"             // the connection will be closed after completion of the response
//                          "Refresh: 10\r\n"                   // refresh the page automatically every 10 sec. Useful for tests if you compare command to received command
                          "\r\n"));
          client.print(F("<!DOCTYPE HTML>\r\n"
                         "<html>\r\n"
                         "<h1>Welcome at "));
          client.print(hm_systemvariable);
          client.print(F( "</h1>\r\n"
                          "Requests received: "));
          client.print(++reqCount);
          client.print(F( "<br>\r\n"
                          "<br>\r\n"
                          "Command received: "));
          client.print(command);
          client.print(F( "<br>\r\n"
                          "<br>\r\n"
                          "Command length: "));
          client.print(command.length());
          client.print(F( " out of a maximum of 100"
                          "<br>\r\n"
                          "<br>\r\n"
                          "</html>\r\n"));
          client.flush();
          next_tx = millis() +delta_tx;
         
          receivingcommand = false;
         }
         else {
              Serial.println(F("Sending 404 response after invalid request"));
              client.print(F("HTTP/1.1 404 \r\n" //shortest possible answer
              "\r\n"));
              next_tx = millis() +delta_tx;
              }
    }
 #endif
IMG_20170914_210303.jpg
Viel Spaß damit

mfg. Flo

dondaik
Beiträge: 12928
Registriert: 16.01.2009, 18:48
Wohnort: Steingaden
Hat sich bedankt: 1604 Mal
Danksagung erhalten: 222 Mal

Re: Homeduino: universeller LAN/WLAN-Arduino für die Hausaut

Beitrag von dondaik » 14.09.2017, 21:39

na geht doch ...
doch druck und höhe identisch ?
-------
!!! der download der handbüchern auf den seiten von eq3 und das lesen der tips und tricks kann das hm-leben sehr erleichtern - das nutzen der suche nach schlagworten ebenso :mrgreen: !!!
wer schreibfehler findet darf sie behalten.

Ardubert Homedu
Beiträge: 142
Registriert: 17.07.2016, 10:40
Hat sich bedankt: 3 Mal
Danksagung erhalten: 1 Mal

Re: Homeduino: universeller LAN/WLAN-Arduino für die Hausaut

Beitrag von Ardubert Homedu » 14.09.2017, 22:15

??
Druck 549.10
höhe 949.01
:)
sollte passen oder?

mfg. Flo


lustiger zufall :D

dondaik
Beiträge: 12928
Registriert: 16.01.2009, 18:48
Wohnort: Steingaden
Hat sich bedankt: 1604 Mal
Danksagung erhalten: 222 Mal

Re: Homeduino: universeller LAN/WLAN-Arduino für die Hausaut

Beitrag von dondaik » 14.09.2017, 22:49

die 9 war hier undeutlich ... schau auf deinem telefon oder im WWW - es gibt zwei werte NN und den druck vor ort ....
-------
!!! der download der handbüchern auf den seiten von eq3 und das lesen der tips und tricks kann das hm-leben sehr erleichtern - das nutzen der suche nach schlagworten ebenso :mrgreen: !!!
wer schreibfehler findet darf sie behalten.

dondaik
Beiträge: 12928
Registriert: 16.01.2009, 18:48
Wohnort: Steingaden
Hat sich bedankt: 1604 Mal
Danksagung erhalten: 222 Mal

Re: Homeduino: universeller LAN/WLAN-Arduino für die Hausaut

Beitrag von dondaik » 15.09.2017, 08:05

moin,
habe gerade mal durch das prg geblättert, ich nutze nur die lokale höhe als referenz...

doch dein prg bring mich auf eine idee, den ad-wandler an den esp8266 angeschlossen und der luftsensor ist wieder nutzbar !!!... wochende gerettet :-)
-------
!!! der download der handbüchern auf den seiten von eq3 und das lesen der tips und tricks kann das hm-leben sehr erleichtern - das nutzen der suche nach schlagworten ebenso :mrgreen: !!!
wer schreibfehler findet darf sie behalten.

linadd
Beiträge: 6
Registriert: 17.09.2016, 20:34

Re: Homeduino: universeller LAN/WLAN-Arduino für die Hausaut

Beitrag von linadd » 15.09.2017, 09:48

Hallo,
habe den bme280 auch am laufen. Läuft seit 4 Monaten.Die Trendanzeige funktioniert nicht so richtig. Ich denke das liegt an den langen Messinterwallen. Bei kurzen Messinterwallen hatte ich im seriellen Monitor immer Datenfluss,

Code: Alles auswählen

const String Version = "hduino412_LAN_170728_280"; 
/*Version = "hduino412_LAN  eig_red
 * Systemvariablen mit +display_message[i] werden direktangezeigt,z.B.
 //befehl="GET /xy.exe?antwort=dom.GetObject('"+hm_systemvariable+"D"+I+"').State("+tempNTC+")";
   befehl="GET /xy.exe?antwort=dom.GetObject('"+display_message[i]+"').State("+tempNTC+")";
-BME280 und Wettertrend integriert  

-HNTC eingefügt für hohe Temperatur
-Lux geandert kein negativ Wert mehr
-Türen als Eingang zugefügt D24,D25
-tft eingestellt
-touch ist geaendert fuer 2,4" immer aendern bei Bildschirmgroeße
-Zeile 408  tft Treiber geaendert aufint identifier = 0x9341; tft.begin(identifier);
Stand: 2015.09.07 / Verfasser: Eugen Stall
erprobt fuer Arduino Mega 2560 mit Arduino 1.6.5r2 übertragen am 26.03.2016
hier ist immer die aktuelle Version:
http://www.stall.biz/project/homeduino-4-0-das-universelle-mess-und-aktormodul-fuer-die-hausautomation
das folgende homeduino-programm 8 sendet messdaten zur ccu (homeduino als webclient) ...
und empfängt ausgabedaten für die homeduino-outputs (homeduino als webserver)
_________________            ________________
|port 8181 server|<---------<| client        |
|                |           |               |
| CCU            |           |     Homeduino | 
|                |           |               |
|          client|>--------->|server port 80 | 
|________________|           |_______________|

/Quellen:Arduino website plus http://arduino.cc/en/Tutorial/WebClient und ...
 http://tushev.org/articles/arduino/item/52-how-it-works-ds18b20-and-arduino und ...  */
//#############################################################################################
//#############################################################################################
//Auswahl der verwendeten Shields: 
#define tft_display //"tft_display" oder "lcd_display"                         <<tft_display<< 
                    //"lcd_display" auch wenn kein display verwendet wird 
#define w5100       //"cc3000"  Wifi-Modul oder "w5100" ethernet shield        <<w5100<< 

byte ccu[] = { 192, 168, 1, 10 };      //IP der CCU                          <<192, 168, 1, 10<< 
//MAC-Adresse dieses Homeduinos ,bei mehreren Homeduinos MAC-.Adresse ändern!!:
byte mac[] = { 0xAC, 0xCC, 0xCC, 0xCC, 0xAC, 0xBC };  //                       <<0xAC, 0xCC, 0xCC, 0xCC, 0xAC, 0xBC<<

byte homeduino[] = { 192, 168, 1, 12 }; //IP des Homeduino,wenn DHCP versagt <<192, 168, 1, 12<< 

char ap_ssid[] = "ssid"; //SSID WLAN in Anführungszeichen                      <<user-eingabe<< 

char ap_password[] = "password"; //Passwort WLAN in Anführungszeichen          <<user-eingabe<< 

//xyz ist indiv. Bezeichnung dieses homeduino, keine sonderzeichen, öäüß...
const String homeduino_nummer = "xyz";  //                                     <<a<< 
const String hm_systemvariable = "homeduino_" + homeduino_nummer +"_";
//#############################################################################################
//#############################################################################################
//I/O-Kennung: hier wird die Funktion aller verwendbaren IO´s mit einer Kennziffer festgelegt 
//dabei haben alle IO´s die Standardfunktionen plus spez. Sonderfunktionen
//     Standardfunktionen sind:
//     '0' =andere Nutzg; '1' =dig_in; '2' =dig_out; '3' =1wire '4' =DHTxx; '5' =U_Schall 

const byte iomodus_D[80] = { 0,0,
 31, //D2 :      Std-fkt; '15' = IR_Rx??  '6' =ImpCount; '31' =tft;   <<user IO-Shield20<< 
 31, //D3 :      Std-fkt; '7' = 433_Rx??  '6' =ImpCount; '31' =tft;   <<user IO-Shield20<< 
 31, //D4 :      Std-fkt; '7' = 433_Tx??  '30' =lcd;     '31' =tft;   <<user IO-Shield20<< 
 31, //D5 :      Std-fkt;                 '30' =lcd;     '31' =tft;   <<user IO-Shield20<< 
 31, //D6 :      Std-fkt; '9' = buzzer    '30' =lcd;     '31' =tft;   <<user IO-Shield20<< 
 31, //D7 :      Std-fkt;                 '30' =lcd;     '31' =tft;   <<user IO-Shield20<< 
 31, //D8 :      Std-fkt;                 '30' =lcd;     '31' =tft;   <<user IO-Shield20<< 
 31, //D9 :      Std-fkt; '16' = IR_Tx??  '30' =lcd;     '31' =tft;   <<user IO-Shield20<< 
 20, //D10 :     Std-fkt; '20' = W5100 SS-Pin;
 0,  //D11 :     Std-fkt;  
 0,  //D12 :     Std-fkt;  
 0,  //D13 :     Std-fkt;
 0,  //D14/TX3 : Std-fkt; '0' =ESP8266;   '12' = rfid3;                <<user IO-Shield-Plus<< 
 0,  //D15/RX3 : Std-fkt; '0' =ESP8266;   '12' = rfid3;                <<user IO-Shield-Plus<< 
 0,  //D16/TX2 : Std-fkt; '0' =ESP8266;   '12' = rfid2;                <<user IO-Shield-Plus<< 
 0,  //D17/RX2 : Std-fkt; '0' =ESP8266;   '12' = rfid2;                <<user IO-Shield-Plus<< 
 6,  //D18/TX1 : Std-fkt; '6' =ImpCount;  '21' =CC3000                 <<user IO-Shield-Plus<< 
 6,  //D19/RX1 : Std-fkt; '6' =ImpCount;                               <<user IO-Shield-Plus<< 
 8,  //D20/SDA : Std-fkt; '6' =ImpCount;  '8' =I2C;                    <<user IO-Shield-Plus<< 
 8,  //D21/SCL : Std-fkt; '6' =ImpCount;  '8' =I2C;                    <<user IO-Shield-Plus<< 
 0,  //D22 :     Std-fkt; '12' = rfid3-oeffner;                        <<user IO-Shield-Plus<< 
 0,  //D23 :     Std-fkt; '12' = rfid2-oeffner;                        <<user IO-Shield-Plus<< 
 2,  //D24 :     Std-fkt;                                              <<user IO-Shield-Plus<< 
 2,  //D25 :     Std-fkt;                                              <<user IO-Shield-Plus<< 
 2,  //D26 :     Std-fkt;                                              <<user IO-Shield-Plus<< 
 2,  //D27 :     Std-fkt;                                              <<user IO-Shield-Plus<< 
 1,  //D28 :     Std-fkt;                                              <<user IO-Shield-Plus<< 
 1,  //D29 :     Std-fkt;                                              <<user IO-Shield-Plus<< 
 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
 20, //MISO      '20' =W5100;  '21' =CC3000;   ICSP-Stecker
 20, //MOSI      '20' =W5100;  '21' =CC3000;   ICSP-Stecker
 20, //SCK       '20' =W5100;  '21' =CC3000;   ICSP-Stecker
 0, //SS                      '21' =CC3000;
 31, //D54 A0 :  Std-fkt; '10' =analog; '11' =NTC; '31' =tft; '30' =lcd; ser IO-Shield-20<< 
 31, //D55 A1 :  Std-fkt; '10' =analog; '11' =NTC; '31' =tft;         <<user IO-Shield-20<< 
 31, //D56 A2 :  Std-fkt; '10' =analog; '11' =NTC; '31' =tft;         <<user IO-Shield-20<< 
 31, //D57 A3 :  Std-fkt; '10' =analog; '11' =NTC; '31' =tft;         <<user IO-Shield-20<< 
 31, //D58 A4 :  Std-fkt; '10' =analog; '11' =NTC; '31' =tft;         <<user IO-Shield-20<< 
 0,  //D59 A5 :  Std-fkt; '10' =analog; '11' =NTC;                    <<user IO-Shield-20<< 
 0,0,  
 13,  //D62 A8 :  Std-fkt; '10' =analog; '11' =NTC; '13' =HNTC;       <<user IO-Shield-Plus<< 
 11,  //D63 A9 :  Std-fkt; '10' =analog; '11' =NTC; '13' =HNTC;       <<user IO-Shield-Plus<< 
 11,  //D64 A10 : Std-fkt; '10' =analog; '11' =NTC;                    <<user IO-Shield-Plus<< 
 11,  //D65 A11 : Std-fkt; '10' =analog; '11' =NTC;                    <<user IO-Shield-Plus<< 
 11,  //D66 A12 : Std-fkt; '10' =analog; '11' =NTC;                    <<user IO-Shield-Plus<< 
 11,  //D67 A13 : Std-fkt; '10' =analog; '11' =NTC;                    <<user IO-Shield-Plus<< 
 1,  //D68 A14 : Std-fkt; '10' =analog; '11' =NTC;                    <<user IO-Shield-Plus<< 
 1,  //D69 A15 : Std-fkt; '10' =analog; '11' =NTC;                    <<user IO-Shield-Plus<< 
 8,  // '0' =andere Nutzg;    '8' =I2C;                               <<user IO-Shield-Plus<< 
 8,  // '0' =andere Nutzg;    '8' =I2C;                               <<user IO-Shield-Plus<< 
 8,  // '0' =andere Nutzg;    '8' =I2C;                               <<user IO-Shield-Plus<< 
 8,  // '0' =andere Nutzg;    '8' =I2C;                               <<user IO-Shield-Plus<< 
 8,  // '0' =andere Nutzg;                                            <<user IO-Shield-Plus<< 
 8,  // '0' =andere Nutzg;                                            <<user IO-Shield-Plus<< 
 8,  // '0' =andere Nutzg;                                            <<user IO-Shield-Plus<< 
 0,  // '0' =andere Nutzg;                                            <<user IO-Shield-Plus<< 
 0,  // '0' =andere Nutzg;                                            <<user IO-Shield-Plus<< 
 0,  // '0' =andere Nutzg;                                            <<user IO-Shield-Plus<< 
}; 
//#############################################################################################
//hier werden Sensoren am I2C-Eingang aktiviert
const byte iomodus_baro = 0; //'0' =nc; '1' =BMP180,                   <<user IO-Shield-Plus<<
const byte iomodus_lux =  1; //'0' =nc; '1' =BH1750,                   <<user IO-Shield-Plus<<
const byte iomodus_280 = 1;  //'0' =nc; '1' =BME280,                   <<user IO-Shield-Plus<<
//#############################################################################################
//hier werden die Kennwerte fuer die Impulszaehler festgelegt
volatile unsigned long pulsecounter[6] = 
{ 0, //Zaehlerstand fuer D2 -Impulseingang bei Reset                    <<user IO-Shield20<<
 0, //Zaehlerstand fuer D3 -Impulseingang bei Reset                     <<user IO-Shield20<<
 0, //Zaehlerstand fuer D21-Impulseingang bei Reset                     <<user IO-Shield-Plus<< 
 0, //Zaehlerstand fuer D20-Impulseingang bei Reset                     <<user IO-Shield-Plus<< 
 0, //Zaehlerstand fuer D19-Impulseingang bei Reset                     <<user IO-Shield-Plus<< 
 0, //Zaehlerstand fuer D18-Impulseingang bei Reset                     <<user IO-Shield-Plus<< 
}; 
//hier wird der Teilerfaktor für die Impulszaehler festgelegt
const int pulsedivider[6] = 
{1, //Teilerfaktor D2 :                                                 <<user IO-Shield20<<
 1, //Teilerfaktor D3 :                                                 <<user IO-Shield20<<
 1, //Teilerfaktor D21 :                                                <<user IO-Shield-Plus<<
 1, //Teilerfaktor D20 :                                                <<user IO-Shield-Plus<<
 20, //Teilerfaktor D19 :                                              <<user IO-Shield-Plus<<
 20, //Teilerfaktor D18 :                                              <<user IO-Shield-Plus<<
}; 
//#############################################################################################
//#############################################################################################
//hier werden die anzeigetexte für lcd und tft display festgelegt 
String display_message[80] = {
"0","0",         //                              '0' =keine anzeige
"2 Status :",   //anzeigetext fuer port D02
"3 Status :",   //anzeigetext fuer port D03
"0","0","0","0","0","0",  // ports belegt durch lcd-shield     
"0",  // belegt durch ethernet W5100-shield, lcd-Shield PIN D10 abbiegen! 
"11 Status :",  //anzeigetext fuer port D11                             <<user IO-Shield-20<<
"12 Status :",  //anzeigetext fuer port D12                             <<user IO-Shield-20<<
"13 Status :",  //anzeigetext fuer port D13                             <<user IO-Shield-20<<
"14 Status :",  //anzeigetext fuer port D14 /TX3                        <<user IO-Shield-Plus<<
"15 Status :",  //anzeigetext fuer port D15 /RX3                        <<user IO-Shield-Plus<<
"16 Status :",  //anzeigetext fuer port D16 /TX2                        <<user IO-Shield-Plus<<
"17 Status :",  //anzeigetext fuer port D17 /RX2                        <<user IO-Shield-Plus<<
"Strom",  //anzeigetext fuer port D18 /TX1 /impulszaehler S03     <<user IO-Shield-Plus<<
"Solar",  //anzeigetext fuer port D19 /RX1 /impulszaehler S02     <<user IO-Shield-Plus<<
"20 I2C SDA:",  //anzeigetext fuer port D20 /SDA /impulszaehler S01     <<user IO-Shield-Plus<<
"21 I2C SCL:",  //anzeigetext fuer port D21 /SCL /impulszaehler S00     <<user IO-Shield-Plus<<
"22 Status :",  //anzeigetext fuer port D22                             <<user IO-Shield-Plus<<
"23 Status :",  //anzeigetext fuer port D23                             <<user IO-Shield-Plus<<
"24 weiss",     //anzeigetext fuer port D24                             <<user IO-Shield-Plus<<
"25 greun",     //anzeigetext fuer port D25                             <<user IO-Shield-Plus<<
"26 rot",       //anzeigetext fuer port D26                             <<user IO-Shield-Plus<<
"27 blau",      //anzeigetext fuer port D27                             <<user IO-Shield-Plus<<
"28 TuerK",     //anzeigetext fuer port D28                             <<user IO-Shield-Plus<<
"29 TuerH",     //anzeigetext fuer port D29                             <<user IO-Shield-Plus<<
"0","0","0","0","0","0","0","0","0","0","0","0","0","0","0","0","0","0","0","0","0","0","0","0",
"0",  // port belegt durch lcd-shield
"55 Status:",   //anzeigetext fuer port D55 /A1                         <<user IO-Shield-20<<
"56 Status:",   //anzeigetext fuer port D56 /A2                         <<user IO-Shield-20<<
"57 Status :",  //anzeigetext fuer port D57 /A3                         <<user IO-Shield-20<<
"58 Status :",  //anzeigetext fuer port D58 /A4                         <<user IO-Shield-20<<
"59 Status :",  //anzeigetext fuer port D59 /A5                         <<user IO-Shield-20<<
"0","0",
"TOfen",        //anzeigetext fuer port D62 /A8                         <<user IO-Shield-Plus<<
"TRaum",        //anzeigetext fuer port D63 /A9                         <<user IO-Shield-Plus<<
"TVL",          //anzeigetext fuer port D64 /A10                        <<user IO-Shield-Plus<<
"TRL",          //anzeigetext fuer port D65 /A11                        <<user IO-Shield-Plus<<
"TWW",          //anzeigetext fuer port D66 /A12                        <<user IO-Shield-Plus<<
"TAus",         //anzeigetext fuer port D67 /A13                        <<user IO-Shield-Plus<<
"68 in1",       //anzeigetext fuer port D68 /A14                        <<user IO-Shield-Plus<<
"69 in2",       //anzeigetext fuer port D69 /A15                        <<user IO-Shield-Plus<<
// die folgenden Anzeigetexte sind für Module mit mehreren Datenpunkten z.b. I2C-Module
"Druck/mB:",    //anzeigetext fuer I2C 
"Temp./C :",    //anzeigetext fuer I2C 
"Lux/lx  :",       //anzeigetext fuer I2C 
"Feucht/%:",    //anzeigetext fuer I2C
"Druck NN:",      //anzeigetext fuer 
"Trend:",       //anzeigetext fuer 
"delta_p0:",  //anzeigetext fuer 
"77 Status :",  //anzeigetext fuer 
"78 Status :",  //anzeigetext fuer 
"79 Status :"   //anzeigetext fuer   
};
//#############################################################################################
//#############################################################################################
//hier werden die Zugangsberechtigungen für den RDM6300 Rfid-Reader und FOBs festgelegt

//#############################################################################################
//#############################################################################################
//#############################################################################################

#include <SPI.h>
#include <Wire.h> 
#include <OneWire.h>   //für Temperatursensoren DS18B20
                       //http://www.hacktronics.com/code/OneWire.zip
#include <NewPing.h>   //für Ultraschallsensoren SR04
                       //https://arduino-new-ping.googlecode.com/files/NewPing_v1.5.zip
#include "DHT.h"       //für Temperatursensoren SHT22
                       //https://github.com/adafruit/DHT-sensor-library/archive/master.zip
#include <AS_BH1750.h> //für I2C-Luxmeter
                       //https://github.com/hexenmeister/AS_BH1750/archive/master.zip
#include <SFE_BMP180.h>//für I2C-Barometer
                       //https://github.com/sparkfun/BMP180_Breakout/archive/master.zip
#include <RCSwitch.h>  // läuft noch nicht!
#include <EEPROM.h>
#include <BME280_t.h>  //für I2C-Barometer BME280 Sensor

//#include <IRremote.h>// läuft noch nicht!

//der folgende Bereich ist bei verwendung w5100 auszukommentieren
//ausblenden mit " #if defined (5100)" funktioniert leider nicht!! 
/*
//Initialisierung des CC3000 Wifi auf dem IO-Shield-Plus  
#include <SFE_CC3000.h>// fuer cc3000 wifi
                 // http://github.com/sparkfun/SFE_CC3000_Library/archive/master.zip
#include <SFE_CC3000_Client.h>
// Pins
#define CC3000_INT 18  // int-Pin mit Wifi Shield ist D3, mit breakout auf IO-Shield-Plus D18
#define CC3000_EN 46   // en-Pin mit Wifi Shield ist D5, mit breakout auf IO-Shield-Plus  D46
#define CC3000_CS 53   // cs-Pin mit Wifi Shield ist D10, mit breakout auf IO-Shield-Plus D53
SFE_CC3000 wifi = SFE_CC3000(CC3000_INT, CC3000_EN, CC3000_CS);
SFE_CC3000_Client client = SFE_CC3000_Client(wifi);
unsigned int ap_security = WLAN_SEC_WPA2; // Security of network
unsigned int timeout = 30000; // Milliseconds
char server[] = "192,168,178,50"; // Remote host site
*/
#if defined (w5100)  //************************************************************************ 
//der folgende Bereich ist die Initialisierung des LAN bei Verwendung des LAN-Shields
#include <Ethernet.h> 
EthernetClient client;
EthernetServer server(80);
#endif  //************************************************************************************* 

#if defined(tft_display)  //*******************************************************************
//#include <Adafruit_GFX.h>    //Quelle: https://github.com/adafruit/Adafruit-GFX-Library
//#include <Adafruit_TFTLCD.h> //Quelle:   https://github.com/buhosoft/TFTLCD-Library
#include <stdint.h>
//#include "TouchScreen.h" 
#include <SPFD5408_Adafruit_GFX.h>   
#include <SPFD5408_Adafruit_TFTLCD.h> 
#include <SPFD5408_TouchScreen.h>  
//Quelle: http://www.smokeandwires.co.nz/blog/a-2-4-tft-touchscreen-shield-for-arduino/
//2,4"-display TouchScreen
#define YP A2  // must be an analog pin, use "An" notation!
#define XM A3  // must be an analog pin, use "An" notation!
#define YM 8   // can be a digital pin
#define XP 9   // can be a digital pin
//3,95"-display TouchScreen
//#define YP A1  // must be an analog pin, use "An" notation!
//#define XM A2  // must be an analog pin, use "An" notation 
//#define YM 7   // can be a digital pin
//#define XP 6   // can be a digital pin
#define MINPRESSURE 10
#define MAXPRESSURE 1000
TouchScreen ts = TouchScreen(XP, YP, XM, YM, 330);
#define BLACK   0x0000
#define BLUE    0x001F
#define RED     0xF800
#define GREEN   0x07E0
#define CYAN    0x07FF
#define MAGENTA 0xF81F
#define YELLOW  0xFFE0
#define WHITE   0xFFFF
#define LCD_CS A3 // Chip Select goes to Analog 3
#define LCD_CD A2 // Command/Data goes to Analog 2
#define LCD_WR A1 // LCD Write goes to Analog 1
#define LCD_RD A0 // LCD Read goes to Analog 0
#define tft_rotation 3 //3 oder 1 abhägig vom tft-shield typ               <<user-eingabe<< 
#define LCD_RESET A4 // Can alternately just connect to Arduino's reset pin
Adafruit_TFTLCD tft(LCD_CS, LCD_CD, LCD_WR, LCD_RD, LCD_RESET);
int touch_y;
const byte zeilenzahl = 6;
int px,py,pz;
boolean touch, touch_alt;
unsigned long next_touch_time = 0;


//2,4'' display
const long int px_A = 934,  py_A = 882;  //touch-koordinaten oben-links                
const long int px_B = 213,  py_B = 818;  //touch-koordinaten oben-rechts              
const long int px_C = 936,  py_C = 117;  //touch-koordinaten unten-links              
#define schriftgroesse 3 
#define tft_type 1   // 1 ist 2,4''display   2 ist 3.95''display
 
//3,95'' display
//const long int px_A = 203,  py_A = 720;  //touch-koordinaten oben-links               
//const long int px_B = 189,  py_B = 85;  //touch-koordinaten oben-rechts             
//const long int px_C = 880,  py_C = 740;  //touch-koordinaten unten-links              
//#define schriftgroesse 4  
//#define tft_type 2   // 1 ist 2,4''display   2 ist 3.95''display

long int p_x, p_y ;   //normierte aktuelle touch-koordinaten: 
                      //oben links ist 0,0 und unten rechts ist 1000,1000
#endif  //*************************************************************************************

#if defined(lcd_display)  //*******************************************************************
//https://www.dfrobot.com/wiki/index.php?title=Arduino_LCD_KeyPad_Shield_%28SKU:_DFR0009%29
#include <LiquidCrystal.h> 
LiquidCrystal lcd(8, 9, 4, 5, 6, 7); // initialize library with numbers of the interface pins
const byte zeilenzahl = 2;
#endif  //*************************************************************************************

int x, x_alt;
byte zeile_pointer[6];
String zeile_data[6] = {"     ","     ","     ","     ","     ","     "};
String display_zeile_alt[6],display_zeile[6];
String taster;

char zeichen,buffer[50];
boolean fob_da =0;
String zeich, fob_hex, fob_dec,Name, lcd_rfid_message, oeffner, Value;
unsigned long fob_zahl,time_rfid3 = 0,time_rfid2 = 0; 
byte zeichen_zahl;

//BH1750_Sensor********************************************************************************
AS_BH1750 sensor;          //Initialize BH1750 Luxmeter library
float lux;
long Lux;
int laenge;
float sensivity = 2.00;   // The range in sensitivity scaling is 0.45 to 3.68.  Default is 1.00
//BMP180_Sensor********************************************************************************
const float ALTITUDE = 540.0; // eigene seehoehe in metern              <<user IO-Shield-Plus<<
SFE_BMP180 pressure;
char status;
double T,P,p0,F;
boolean reading = false;
String command = String(200);
String baro_string,baroT_string, lux_string;
//********************************************************************************************* 
boolean last_digital_value_D[80];
float last_value_D[80],last_IR_value,last_RF_value;
unsigned long next_Time[80];  
double last_baro_value,last_baroT_value;
boolean complete_loop =1; // wenn 1, dann einmal komplett durchlaufen
String befehl,sub_command = String(20),parameter = String(20),header = String(20);
int param,port_pin;
boolean port_data;
boolean value;
String I;
int analogwert;
//*********************************************************************************************
float tempNTC;
float temphNTC;
const float B_wert = 3950; //aus dem Datenblatt des NTC //<<user-eingabe<<
const float Tn = 298.15; //25°Celsius in °Kelvin 
const float Rv = 10000; //Vorwiderstand
const float Rn = 10000; //NTC-Widerstand bei 25°C
float Rt,temp_tur,humidity;
 
const float delta_onewire = 0.2; //          Deltas für Sendeauslösung 
const float delta_DHT = 0.2;     //in °C 
const float delta_us = 3.0;      // in cm
const float delta_analog = 2.0;  // in inkrement
const float delta_ntc = 0.5;     //in °C
const float delta_hntc = 20.0;   //in °C
const float delta_lux = 5;       //in lux
const float delta_counter = 5;   //in counter inkrement
const float delta_baro = 1.0;    //in mB
const float delta_baroT = 0.5;   //in °C
//BME280******************************************************************************
float korrTemp = 0;           // Korrekturwert fuer die Temperaturmessung BME280
float korrFeucht = 0;         // Korrekturwert fuer die Feuchtigkeitsmessung BME20
float temp = 0, feucht = 0, druck = 0, reldruck = 0, altitude1 = 0;//BME280 
String  temp_string, feucht_string, druck_string, reldruck_string;
double last_temp_value, last_feucht_value, last_druck_value, last_reldruck_value;
const float delta_feucht = 2.0; //in %    ab % ubertragen an CCU
//int renew = 20000; // Aktualisierungsintervall in Millisekunden (20 Sekunden)

//fuer Wettertrend********************************************************************

double p0_old, delta_p0, baro_wert_alt,p_mittel;
double p[5] = {1000.00,1000.00,1000.00,1000.00,1000.00};

double t[5] ={ 20.0,30.0,40.0,50.0,60.0 };
long baro_ctr = 0;
            

String wettertrend = "not valid";
String wettertrend_alt = "not_valid";
String wettertrendd = "not valid";
String wettertrendd_alt = "not_valid";
String trend_string, delta_p0_string;
unsigned long next_time_baro = 120000;
unsigned long delta_time_baro = 240000; //240000 Sekunden 6 Minuten

unsigned long baro_abtastzeit_alt = 0;
unsigned long baro_abtastzeit = 0;
unsigned long delta_baro_abtastzeit = 0;

 
BME280 <> BMESensor;
//************************************************************************************ 
long duration, cm; //variable für Ultraschallsensor
unsigned long time_sr04;
 
unsigned long next_full_loop = 0;
unsigned long delta_time = 3600000; // jede Stunde werden alle Inputs aktualisiert
unsigned long delta_tx = 500; //in ms, minimaler Abstand der Telegramme an die CCU
unsigned long next_tx = 0, time_wait = 0; 

int rf_key;
String rfkey;
RCSwitch mySwitch = RCSwitch();

unsigned zaehlwert;
unsigned last_zaehlwert[6] = {0,0,0,0,0,0};
//#############################################################################################
//#############################################################################################
void setup() 
{Serial.begin(9600); 
//+++++++ einrichtung der interrupts fuer impulszahler D2,D3,D18,D19,D20,D21
 if ((pulsedivider[0] > 0) && (iomodus_D[2] == 6)) 
   {pinMode(2, INPUT_PULLUP); attachInterrupt(0, ISR_0, FALLING);}
 if ((pulsedivider[1] > 0) && (iomodus_D[3] == 6)) 
   {pinMode(3, INPUT_PULLUP); attachInterrupt(1, ISR_1, FALLING);} 
 if ((pulsedivider[2] > 0) && (iomodus_D[21] == 6)) 
   {pinMode(21, INPUT_PULLUP); attachInterrupt(2, ISR_2, FALLING);}
 if ((pulsedivider[3] > 0) && (iomodus_D[20] == 6)) 
   {pinMode(20, INPUT_PULLUP); attachInterrupt(3, ISR_3, FALLING);}
 if ((pulsedivider[4] > 0) && (iomodus_D[19] == 6)) 
   {pinMode(19, INPUT_PULLUP); attachInterrupt(4, ISR_4, FALLING);}

 #if defined (w5100)  //************************************************************************* 
 if ((pulsedivider[5] > 0) && (iomodus_D[18] == 6))  //interrupt reserviert fuer cc3000
   {pinMode(18, INPUT_PULLUP); attachInterrupt(5, ISR_5, FALLING);}
 #endif  //*************************************************************************************

//+++++++ rfid initialisieren
 if ((iomodus_D[15] == 12) && (iomodus_D[14] == 12)){Serial3.begin(9600);}
 if ((iomodus_D[17] == 12) && (iomodus_D[16] == 12)){Serial2.begin(9600);}

#if defined (lcd_display)  //******************************************************************
//+++++++ lcd initialisieren
 lcd.begin(16, 2); delay(200);  //16 zeichen in 2 zeilen
 lcd.setCursor(0,0);
 lcd.print(" Homeduino 4.0  ");
#endif  //*************************************************************************************

#if defined (tft_display)  //******************************************************************
//+++++++ tft initialisieren
 tft.reset();
 //int identifier = tft.readID();  tft.begin(identifier);    // Orginal
   int identifier = 0x9341; tft.begin(identifier);           // geaendert
 Serial.print(" tft identifier:" ); Serial.println(identifier);   
 delay(100);
 tft.fillScreen(BLACK); tft.setRotation(tft_rotation);
 if (tft_type ==1) //2,4'' display
   {tft_print (1,"  Homeduino",4,YELLOW);
    tft_print (2,"     4.0",4,YELLOW);
    tft_print (5,"www.stall.biz",4,CYAN);
    tft.drawRect(0,0, 319, 240, GREEN);
   } 
  if (tft_type ==2)  //3,95'' display
   {tft_print (1,"   Homeduino",5,YELLOW);
    tft_print (2,"      4.0",5,YELLOW);
    tft_print (5," www.stall.biz",5,CYAN);
    tft.drawRect(5,5, 475, 310, GREEN);
   }   
#endif  //*************************************************************************************

for(int i=0; i<zeilenzahl; i++)
   {zeile_pointer[i] = EEPROM.read(i);  //anzeige-pointer aus eeprom holen
    if (zeile_pointer[i] >79) {zeile_pointer[i] = 0;}  //wenn eeprom erstes mal benutzt wird
   } 

#if defined (w5100)  //************************************************************************
//hier folgt die LAN Initialisierung 
char myIpString[24];
 if (Ethernet.begin(mac) == 0) // start the Ethernet connection:
   {Serial.println("Failed to configure Ethernet using DHCP"); Ethernet.begin(mac, homeduino);}
    delay(1000);// give the Ethernet shield a second to initialize:
    Serial.println("connecting..."); // if you get a connection, report back via serial:
 if (client.connect(ccu, 8181)) {}
   else {Serial.println("connection failed");} // if you didn't get a connection to the server:
 client.stop(); 
 IPAddress myIp = Ethernet.localIP();
 sprintf(myIpString, "%d.%d.%d.%d", myIp[0], myIp[1], myIp[2], myIp[3]); 
 I = myIpString;
 befehl = "GET /xy.exe?antwort=dom.GetObject('"+hm_systemvariable+"IP"+"').State('"+ I + "')";
 set_sysvar(); 
 server.begin();
#endif  //*************************************************************************************

#if defined (cc3000)  //**********************************************************************
// hier folgt die CC3000 Initialisierung 
 ConnectionInfo connection_info;
 char myIpString[24]; 
 Serial.println("SparkFun CC3000 - WebClient");
 if ( wifi.init() ) {Serial.println("init complete");} 
 else {Serial.println("problem with init!");}
 // Connect using DHCP
 if (!wifi.connect(ap_ssid, ap_security, ap_password, timeout)) 
   {Serial.println("no connection to AP");}
 //build IP address
 if ( !wifi.getConnectionInfo(connection_info) ) {Serial.println("no connection details");} 
   else {sprintf(myIpString, "%d.%d.%d.%d", connection_info.ip_address[0], 
   connection_info.ip_address[1],connection_info.ip_address[2], connection_info.ip_address[3]); 
         I = myIpString;
        }
 befehl = "GET /xy.exe?antwort=dom.GetObject('"+hm_systemvariable+"IP"+"').State('" + I + "')";
 set_sysvar(); 
 client.stop();
#endif  //*************************************************************************************

#if defined (lcd_display)  //****************************************************************** 
//bei erfolgreichem einloggen ausgabe ip-adresse 
lcd.setCursor(0,1);
lcd.print(myIpString);
delay(3000);
#endif  //*************************************************************************************

#if defined (tft_display) //*******************************************************************
//bei erfolgreichem einloggen ausgabe ip-adresse 
tft.fillScreen(BLACK);
if (tft_type ==1) //2,4'' display
  {tft.setCursor(8, 230); //fusszeile
   tft.setTextColor(GREEN);  
   tft.setTextSize(1);
   tft.print(Version + "   Homeduino IP: "); tft.print( myIpString);
  }
if (tft_type ==2) //3,95'' display
  {tft.setCursor(1, 300); //fusszeile
   tft.setTextColor(GREEN);  
   tft.setTextSize(2);
   tft.print(Version + " IP: "); tft.print( myIpString);
  }
#endif  //*************************************************************************************
for (int i = 0; i < 80; i++) {next_Time[i]=0;} //
 //delay(2000);
}
//#############################################################################################
//#############################################################################################
void loop() 
{complete_loop = 0;
 if (millis() > next_full_loop) //mindestens jede Stunde eine komplette Aktualisierung
   {complete_loop = 1; next_full_loop = millis() + delta_time; 
    if (next_full_loop < millis()) {complete_loop = 0;} //wichtig wegen Zahlensprung 
                                                        //von millis() alle 50 Tage
   } 
//*********************************************************************************************
 for (int i = 2; i < 70; i++) //behandlung aller Ports D2 bis D69 
 {while ((iomodus_D[i] == 0) || (iomodus_D[i] >29 )) {i++;}  // unbenutzte pins überspringen
  datenempfang(); //nach jeder Messung auf Datenempfang schalten
  display_data(); //display ausgeben und abfragen
 //******************************************************************************************** 
 if (iomodus_D[i] == 1) //behandlung digitaleingänge 
   {if (millis() > next_Time[i])
      {next_Time[i] = next_Time[i] +1000;  //digitaleingänge nicht häufiger als alle 1000ms abfragen
       pinMode(i, INPUT_PULLUP); 
       digitalWrite(i, HIGH);
       value =digitalRead(i);
       for (int m=0; m < zeilenzahl; m++)
         {if (zeile_pointer[m] == i) 
            {if (value ==0) {zeile_data[m] = "LOW";} else {zeile_data[m] = "HIGH";}}}
       if ((!value == last_digital_value_D[i]) || complete_loop) 
         {I = String(i);
          befehl="GET /xy.exe?antwort=dom.GetObject('"+hm_systemvariable+"D"+I+"').State("+value+")";
          //befehl="GET /xy.exe?antwort=dom.GetObject('"+display_message[i]+"').State("+value+")";
          set_sysvar();
          last_digital_value_D[i] = value;
         }
      } 
   }
//********************************************************************************************* 

 // one Wire Sensoren hier einfügen
 
//********************************************************************************************* 
 if (iomodus_D[i] == 4) //behandlung DHT temperatur- und feuchtesensoren
   {if (millis() > next_Time[i])
      {next_Time[i] = next_Time[i] +30000;  //DHT nicht häufiger als alle 30s abfragen 
       DHT dht(i, DHT22); //je nach verwendetem sensor "DHT11", "DHT22" (AM2302),"DHT 21" (AM2301)
       dht.begin();
       //delay(2000); // Sensor readings may also be up to 2 seconds 'old' (its a very slow sensor)
       time_wait = millis() +2000;                       //wahrend der 2s wartezeit, daten empfangen
       while (millis() < time_wait) {datenempfang();display_data;} //und display weiter bedienen 
       humidity = dht.readHumidity(); // Reed feuchtigkeit in %
       temp_tur = dht.readTemperature();// Read temperature as Celsius
       if (isnan(humidity) || isnan(temp_tur) ) // Check if any reads failed and 
         {//Serial.println("Failed to read from DHT sensor!");
          temp_tur = -1000;
         }
       for (int m=0; m < zeilenzahl; m++)
         {if (zeile_pointer[m] == i) {zeile_data[m] = String(humidity,1);}
         }
       if (( humidity > (last_value_D[i] + delta_DHT))|| ( humidity < (last_value_D[i] - delta_DHT)) 
                                                  || complete_loop) 
         {I = String(i);
          //befehl="GET /xy.exe?antwort=dom.GetObject('"+hm_systemvariable+"D"+I+"').State("+humidity+")";
          befehl="GET /xy.exe?antwort=dom.GetObject('"+display_message[i]+"').State("+humidity+")";
          set_sysvar();
          //befehl="GET /xy.exe?antwort=dom.GetObject('"+hm_systemvariable+"D"+I+"_1').State("+temp_tur+")";
          befehl="GET /xy.exe?antwort=dom.GetObject('"+display_message[i]+"_1').State("+temp_tur+")";
          set_sysvar();
          last_value_D[i] = humidity;
        } 
     }
   } 

//******************************************************************************************** 
 
// Ultraschall hier einfügen
 
//********************************************************************************************* 
 if (iomodus_D[i] == 10) //behandlung analogeingänge 
   {if (millis() > next_Time[i])
      {next_Time[i] = next_Time[i] +1000;  //analogeingänge nicht häufiger als alle 1000ms abfragen 
       analogwert =analogRead(i);
       for (int m=0; m < zeilenzahl; m++)
         {if (zeile_pointer[m] == i) {zeile_data[m] = String(analogwert);}}
       if ((analogwert > (last_value_D[i] + delta_analog)) 
                || (analogwert < (last_value_D[i] - delta_analog)) || complete_loop) 
         {I = String(i);
          befehl="GET /xy.exe?antwort=dom.GetObject('"+hm_systemvariable+"D"+I+"').State("+analogwert+")";
          //befehl="GET /xy.exe?antwort=dom.GetObject('"+display_message[i]+"D"+I+"').State("+analogwert+")";
          set_sysvar();
          last_value_D[i] = analogwert;
         }
      }
   } 
//*********************************************************************************************
 if (iomodus_D[i] == 11) //behandlung NTC 
   {if (millis() > next_Time[i])
      {next_Time[i] = next_Time[i] +120000;  //NTC-eingänge nicht häufiger als alle 60s abfragen
       Rt = Rv/((1024.0/analogRead(i))- 1.0);
       tempNTC = (B_wert * Tn / ( B_wert + (Tn * log(Rt/Rn)))) -Tn +25.0 ;
       for (int m=0; m < zeilenzahl; m++)
         {if (zeile_pointer[m] == i) {zeile_data[m] = String(tempNTC,1);}}
          if ((tempNTC > (last_value_D[i] + delta_ntc)) || (tempNTC < (last_value_D[i] - delta_ntc)) 
                                                   || complete_loop) 
            {I = String(i);
             //befehl="GET /xy.exe?antwort=dom.GetObject('"+hm_systemvariable+"D"+I+"').State("+tempNTC+")";
             befehl="GET /xy.exe?antwort=dom.GetObject('"+display_message[i]+"').State("+tempNTC+")";
             set_sysvar();
             last_value_D[i] = tempNTC;
            } 
      }
   }     
//*********************************************************************************************
if (iomodus_D[i] == 13) //behandlung HNTC 
   {if (millis() > next_Time[i])
      {next_Time[i] = next_Time[i] +180000;  //HNTC-eingänge nicht häufiger als alle 180s abfragen
       Rt = Rv/((1024.0/analogRead(i))- 1.0);
       temphNTC = (B_wert * Tn / ( B_wert + (Tn * log(Rt/Rn)))) -Tn +25.0 ;
       for (int m=0; m < zeilenzahl; m++)
         {if (zeile_pointer[m] == i) {zeile_data[m] = String(temphNTC,1);}}
          if ((temphNTC > (last_value_D[i] + delta_hntc)) || (temphNTC < (last_value_D[i] - delta_hntc)) 
                                                          || complete_loop) 
            {I = String(i);
             //befehl="GET /xy.exe?antwort=dom.GetObject('"+hm_systemvariable+"D"+I+"').State("+temphNTC+")";
             befehl="GET /xy.exe?antwort=dom.GetObject('"+display_message[i]+"').State("+temphNTC+")";
             set_sysvar();
             last_value_D[i] = temphNTC;
            } 
      }
   }     
//********************************************************************************************* 
 if (iomodus_D[i] == 6) //behandlung impulszahler D2,D3,D21,D20,D19,D18 
   {byte offset =23;
    if (i ==2) {offset = 4;} if (i ==3) {offset = 6;}
    zaehlwert = pulsecounter[offset - i ] / pulsedivider[offset - i ];
    for (int m=0; m < zeilenzahl; m++)
      {if (zeile_pointer[m] == i) {zeile_data[m] = String(zaehlwert);}}
       if ((pulsedivider[offset -i] > 0) && ((zaehlwert > (last_zaehlwert[offset - i]+ delta_counter) 
                           || complete_loop))) 
         {I = String(offset -i);
         // befehl="GET /xy.exe?antwort=dom.GetObject('"+hm_systemvariable+"imp"+I+"').State("+zaehlwert+")";
          befehl="GET /xy.exe?antwort=dom.GetObject('"+display_message[i]+"_imp"+I+"').State("+zaehlwert+")";
          set_sysvar();
          last_zaehlwert[offset - i] = zaehlwert;
         } 
   } 
//*********************************************************************************************
//behandlung I2C sensoren an pin 20(sda) und pin 21 (scl)
 if ((iomodus_D[i] == 8)&&(i == 20))
   {i++;  // da I2C Bus 2 eingaenge belegt//behandlung I2C sensoren an pin
  
//behandlung Luxmeter BH1750 an SCL pin21 und SDA pin 20 ***********************************
// for normal sensor resolution (1 lx resolution, 0-65535 lx, 120ms, no PowerDown) 
//use: sensor.begin(RESOLUTION_NORMAL, false); 
    if (iomodus_lux ==1)
      {if (millis() > next_Time[72])
         {next_Time[72] = next_Time[72] +30000;  //luxmeter nicht häufiger als alle 30s abfragen 
          if(!sensor.begin()) { Serial.println("Sensor not present"); }
          lux = sensor.readLightLevel()/sensivity; //geteilt durch empfidlichkeit
          Lux = (int)lux;
          Lux = (unsigned int)lux;
          //Serial.print("Helligkeit/lux: "); Serial.print(lux); Serial.println();
          lux_string = "      " + String(Lux);
          int laenge = lux_string.length();
          lux_string = lux_string.substring(laenge -6,laenge);//mit wieviel Stell der Wert auf dem Display angezeigt wird
          for (int m=0; m < zeilenzahl; m++)
            {if (zeile_pointer[m] == 72) {zeile_data[m] = lux_string;}}
             if (((Lux > (last_value_D[72] + delta_lux)) || (Lux < (last_value_D[72] - delta_lux)) 
                                                         || complete_loop)) 
               {befehl="GET /xy.exe?antwort=dom.GetObject('" + hm_systemvariable+"lux"+"').State("+Lux+")";
               //{befehl="GET /xy.exe?antwort=dom.GetObject('" +display_message[i]+"lux"+"').State("+Lux+")";
                set_sysvar();
                last_value_D[72] = Lux;
               }
           } 
       } 
   //behandlung barometer BMP180 an SCL pin21 und SDA pin 20
    if (iomodus_baro ==1)
      {if (millis() > next_Time[70])
         {next_Time[70] = next_Time[70] +30000;  //barometer nicht häufiger als alle 30s abfragen 
          if (pressure.begin()) {status = pressure.startTemperature();}
          if (status) {delay(status); status = pressure.getTemperature(T);} //messung T
          if (status) {status = pressure.startPressure(3);} // //messung P mit resolution 0 bis 3
          if (status) {delay(status); status = pressure.getPressure(P,T);}
          if (status) {p0 = pressure.sealevel(P,ALTITUDE);} // umrechnung auf N.N.
//Serial.print("Hoehe/m: "); Serial.print(ALTITUDE); Serial.print(" Temperatur/C: "); 
//Serial.print(T); Serial.print(" Normaldruck /mb: "); Serial.println(p0); 
          baro_string = "     " + String(p0);
          laenge = baro_string.length();
          baro_string = baro_string.substring(laenge -7,laenge -1);
          baroT_string = "      " + String(T);
          laenge = baroT_string.length();
          baroT_string = baroT_string.substring(laenge -7,laenge -1);
          for (int m=0; m < zeilenzahl; m++) {if (zeile_pointer[m] == 70) {zeile_data[m] = baro_string;}}
          if ((p0 > (last_baro_value + delta_baro)) || (p0 < (last_baro_value - delta_baro)) 
                                                    || complete_loop) 
            {befehl="GET /xy.exe?antwort=dom.GetObject('"+hm_systemvariable+"baro"+"').State("+p0+")";
            //{befehl="GET /xy.exe?antwort=dom.GetObject('"+display_message[i]+"baro"+"').State("+p0+")";
             set_sysvar();
             last_baro_value = p0;
             last_value_D[70] = p0;
            }
          for (int m=0; m < zeilenzahl; m++) {if (zeile_pointer[m] == 71) {zeile_data[m] = baroT_string;}}  
          if ((T > (last_baroT_value + delta_baroT)) || (T < (last_baroT_value - delta_baroT)) 
                                                     || complete_loop) 
            {befehl="GET /xy.exe?antwort=dom.GetObject('"+hm_systemvariable+"baroT"+"').State("+T+")";
            //{befehl="GET /xy.exe?antwort=dom.GetObject('"+display_message[i]+"baroT"+"').State("+T+")";
             set_sysvar();
             last_baroT_value = T;
             last_value_D[71] = T;
            } 
         }
      } 
//BME280*****************************************************************************
//behandlung barometer BME280 an SCL pin21 und SDA pin 20

{if ((millis() > next_time_baro) || complete_loop){
 next_time_baro = millis() + delta_time_baro;
 
   if (iomodus_280 ==1)
  
   (BMESensor.begin());

    {    
          BMESensor.refresh();         // read current sensor data
          Serial.println(" ");
          temp = BMESensor.temperature + korrTemp;  // Auslesen der Werte aus dem BME280 und berrechnen der Werte
          feucht = BMESensor.humidity + korrFeucht;
          druck = BMESensor.pressure  / 100.0F;
          float relativepressure = BMESensor.seaLevelForAltitude(ALTITUDE);
          reldruck = relativepressure  / 100.0F;
          p[0] = relativepressure  / 100.0F;//rel Druck
          //altitude1 = BMESensor.pressureToAltitude(relativepressure);
        
//Serial.print("Hoehe/m: "); Serial.print(altitude1); Serial.print(" Temperatur/C: "); 
//Serial.print(temp); Serial.print(" Normaldruck /mb: "); Serial.println(relpressure1);
//Serial.print("Feuchte/%"); Serial.print(feucht); 

          temp_string = "     " + String(temp);  //mit wieviel Stell der Wert auf dem Display angezeigt wird
          laenge = temp_string.length();
          temp_string = temp_string.substring(laenge -7,laenge -1);
          
          feucht_string = "      " + String(feucht);
          laenge = feucht_string.length();
          feucht_string = feucht_string.substring(laenge -7,laenge -1);

          druck_string = "      " + String(druck);
          laenge = druck_string.length();
          druck_string = druck_string.substring(laenge -7,laenge -1);

          reldruck_string = "      " + String(reldruck);
          laenge = reldruck_string.length();
          reldruck_string = reldruck_string.substring(laenge -7,laenge -1);
          
          for (int m=0; m < zeilenzahl; m++) {if (zeile_pointer[m] == 71) {zeile_data[m] = temp_string;}}  
          if ((temp > (last_temp_value + delta_baroT)) || (temp < (last_baro_value - delta_baroT)) 
                                                    || complete_loop) 
            {befehl="GET /xy.exe?antwort=dom.GetObject('"+hm_systemvariable+"temp"+"').State("+temp+")";
            //{befehl="GET /xy.exe?antwort=dom.GetObject('"+display_message[i]+"temp"+"').State("+T+")";
             set_sysvar();
             last_temp_value = temp;
             last_value_D[71] = temp;
            }
            
          for (int m=0; m < zeilenzahl; m++) {if (zeile_pointer[m] == 73) {zeile_data[m] = feucht_string;}}  
          if ((feucht > (last_feucht_value + delta_feucht)) || (feucht < (last_feucht_value - delta_feucht)) 
                                                       || complete_loop) 
            {befehl="GET /xy.exe?antwort=dom.GetObject('"+hm_systemvariable+"feucht"+"').State("+feucht+")";
            //{befehl="GET /xy.exe?antwort=dom.GetObject('"+display_message[i]+"feucht"+"').State("+feucht+")";
             set_sysvar();
             last_feucht_value = feucht;
             last_value_D[73] = feucht;
             }
             
          for (int m=0; m < zeilenzahl; m++) {if (zeile_pointer[m] == 70) {zeile_data[m] = druck_string;}}  
          if ((druck > (last_druck_value + delta_baro)) || (druck < (last_druck_value - delta_baro)) 
                                                     || complete_loop)
            {befehl="GET /xy.exe?antwort=dom.GetObject('"+hm_systemvariable+"druck"+"').State("+druck+")";
            //{befehl="GET /xy.exe?antwort=dom.GetObject('"+display_message[i]+"druck"+"').State("+druck+")";
             set_sysvar();
             last_druck_value = druck;
             last_value_D[70] = druck;
            }
            
          for (int m=0; m < zeilenzahl; m++) {if (zeile_pointer[m] == 74) {zeile_data[m] = reldruck_string;}}  
          if ((reldruck> (last_reldruck_value + delta_baro)) || (reldruck < (last_reldruck_value - delta_baro)) 
                                                     || complete_loop) 
            {befehl="GET /xy.exe?antwort=dom.GetObject('"+hm_systemvariable+"reldruck"+"').State("+reldruck+")";
            //{befehl="GET /xy.exe?antwort=dom.GetObject('"+display_message[i]+"reldruck"+"').State("+reldruck+")";
             set_sysvar();
             last_reldruck_value = reldruck;
             last_value_D[74] = reldruck;
            }
       
      
     
//BME280-Wettertrend'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
 //{ delay(2000);
 
  //  next_time_baro = millis() + delta_time_baro  ;// Aktivirzeit|| complete_loop)
         
  p[4] = p[3]; p[3] = p[2]; p[2] = p[1]; p[1] = p[0]; t[3] = t[2]; t[2] = t[1]; t[1] = t[0]; //Umspeichern 
     
  t[0] = ((float) (millis()) /1000); baro_ctr++;  //baro_ctr nur für beginn nach reset wichtig, damit "not valid" angezeigt wird
   
   //berechnung steigung mit linearer regression
   double A = 0; double B = 0; double C = 0; double D = 0;
   for ( int i = 0; i < 5; i++) {A +=  t[i] * p[i];   B += t[i];   C += p[i];   D += t[i]*t[i];}
   delta_p0 = 3600 * (5 * A - B * C) / (5 * D - B * B);    //delta_p0 in hPa/h 
   delta_p0 = constrain(delta_p0, -5.0, 5.0);
  if (baro_ctr > 4) { baro_ctr = 5;
          wettertrendd = "stark_fallend";
          if (delta_p0 > -1.0 ) {wettertrendd = "fallend";}  
          if (delta_p0 > -0.2 ) {wettertrendd = "stabil";}  
          if (delta_p0 > 0.2 ) {wettertrendd = "steigend";}  
          if (delta_p0 > 1.0 ) {wettertrendd = "stark_steigend";}
          wettertrend = "-2";
          if (delta_p0 > -1.0 ) {wettertrend = "-1";}  
          if (delta_p0 > -0.2 ) {wettertrend = "0";}  
          if (delta_p0 > 0.2 ) {wettertrend = "+1";}  
          if (delta_p0 > 1.0 ) {wettertrend = "+2";}   
         } else {wettertrend = "not valid";}
         
  
     
    Serial.print("  delta_p0: ");  Serial.print(delta_p0); Serial.print("  wettertrend: ");  Serial.print(wettertrend);Serial.print("  wettertrendd: ");  Serial.println(wettertrendd);
            
  //if ((p_mittel > (baro_wert_alt + delta_baro)) || (p_mittel < (baro_wert_alt - delta_baro))|| (wettertrend_alt != wettertrend) || complete_loop)
  
  

          trend_string = "      " + String(wettertrend);     //mit wieviel Stell der Wert auf dem Display angezeigt wird
          laenge = trend_string.length();
          trend_string = trend_string.substring(laenge -7,laenge -0);

          delta_p0_string = "      " + String(delta_p0);
          laenge = delta_p0_string.length();
          delta_p0_string = delta_p0_string.substring(laenge -7,laenge -0);

           for (int m=0; m < zeilenzahl; m++) {if (zeile_pointer[m] == 75) {zeile_data[m] = trend_string;}}

           for (int m=0; m < zeilenzahl; m++) {if (zeile_pointer[m] == 76) {zeile_data[m] = delta_p0_string;}}
               
          {befehl="GET /xy.exe?antwort=dom.GetObject('"+hm_systemvariable+"deltap0"+"').State("+delta_p0+")";
           set_sysvar();    

     //if  ((wettertrend_alt != wettertrend) || complete_loop)
           
           befehl="GET /xy.exe?antwort=dom.GetObject('"+hm_systemvariable+"trend"+"').State("+wettertrend+")";
           set_sysvar();
           befehl="GET /xy.exe?antwort=dom.GetObject('"+hm_systemvariable+"trendd"+"').State("+wettertrendd+")";
           set_sysvar();
           
          
          //wettertrend_alt = wettertrend;
          }
        }

     }
    }
   }
//BME280_Force_Mode****************************************************************************



//*********************************************************************************************
 
// 433 MHz Modul hier einfügen

//******************************************************************************************* 

// Behandlung rfid3 tueroeffner an D22 und D23 des Mega einfügen
 
//******************************************************************************************** 

// Behandlung rfid-modul RDM6300

//**************************   ende loop  *****************************************************
 }
} 
//#############################################################################################
//#############################################################################################
//#############################  Unterprogramme   #############################################

void datenempfang() //Unterprogramm datenempfang: daten von ccu an homeduino senden
{command = ""; 

#if defined (w5100)  //************************************************************************
 EthernetClient client = server.available();   //mit W5100
#endif  //************************************************************************************* 

#if defined (cc3000)  //***********************************************************************
 SFE_CC3000_Client client = SFE_CC3000_Client(wifi);   //mit CC3000
#endif  //************************************************************************************* 

 if (client) // an http request ends with a blank line
   {boolean currentLineIsBlank = true;
    while (client.connected())
      {if (client.available()) 
         {char c = client.read();
          if (reading && c == ' ') reading =false;
          if (c == '?') reading = true; // beginn der Befehlssequenz 
          if (reading) 
            {if (command.length() < 100) //read char by char HTTP request
               {command = command + c; } //store characters to string
            } 
          if (c == '\n' && currentLineIsBlank) break;
          if (c == '\n') {currentLineIsBlank = true;} 
            else if (c != '\r') { currentLineIsBlank = false;}
         } 
       } 
     client.println(command);
     delay(1); 
     client.stop();
//*********************************************************************************************
    if (command.length() > 2) //behandlung Datenempfang von ccu: port auf 0/1 setzen 
      {Serial.println(command); //empfangenen befehl ausgeben
       client.print(command); //befehl dann dekodieren 
       int colonPosition = command.indexOf(':');
       sub_command = command.substring(2,colonPosition); //portpin erkennen
       Serial.print("D" + sub_command + " :");
       port_pin = sub_command.toInt();
       command = command.substring((colonPosition+1)); //Rest-command bilden
       if (((iomodus_D[port_pin] == 2)||(iomodus_D[port_pin] == 12)) && (command == "0")) 
         {for (int m=0; m < zeilenzahl; m++)
            {if (zeile_pointer[m] == port_pin) {zeile_data[m] = " LOW";}
            }
          pinMode(port_pin, OUTPUT); digitalWrite(port_pin, LOW); Serial.println(command);
         }
       if ((iomodus_D[port_pin] == 2) && (command == "1")) 
         {for (int m=0; m < zeilenzahl; m++)
            {if (zeile_pointer[m] == port_pin) {zeile_data[m] = " HIGH";}
            }
          pinMode(port_pin, OUTPUT); digitalWrite(port_pin, HIGH); Serial.println(command);}
          if ((iomodus_D[port_pin] == 7) && (port_pin ==4)) 
            {rf_send(command); Serial.println(command);} 
          if ((iomodus_D[port_pin] == 5) && (port_pin ==9)) 
            {ir_send(command); Serial.println(command);} 
      }
  } 
} 
//*********************************************************************************************
void set_sysvar() // subroutine HTTP request absetzen:
{//while (millis() < next_tx) {} //warten bis time > next_tx oder timeout
 next_tx = millis() +delta_tx;
 if (client.connect(ccu, 8181)) 
   {Serial.println(befehl);
    client.println(befehl);
    client.println();
    client.stop();
   } else {Serial.println("connection failed");}
}
//*********************************************************************************************
void rf_send(String rf_command) // subroutine rf telegramm senden
{
}
//*********************************************************************************************
void ir_send(String ir_command) // subroutine ir telegramm senden
{
}
//*********************************************************************************************
//hier sind die interrupt-service-routinen fuer die impulszaehler  //**************************
void ISR_0() //Interrupt an D2
{pulsecounter[0]++;}
void ISR_1() //Interrupt an D3
{pulsecounter[1]++;}
void ISR_2() //Interrupt an D21
{pulsecounter[2]++;}
void ISR_3() //Interrupt an D20
{pulsecounter[3]++;}
void ISR_4() //Interrupt an D19
{pulsecounter[4]++;}
void ISR_5() //Interrupt an D18 
{pulsecounter[5]++;}
//*********************************************************************************************
//Unterprogramm:  Converting from Hex (unsigned long) to Decimal: *****************************
//Quelle https://github.com/benrugg/Arduino-Hex-Decimal-Conversion/blob/master/hex_dec.ino
unsigned long hexToDec(String hexString) 
{unsigned long decValue = 0;
 int nextInt;
 for (int k = 0; k < hexString.length(); k++) 
   {nextInt = int(hexString.charAt(k));
    if (nextInt >= 48 && nextInt <= 57) nextInt = map(nextInt, 48, 57, 0, 9);
    if (nextInt >= 65 && nextInt <= 70) nextInt = map(nextInt, 65, 70, 10, 15);
    if (nextInt >= 97 && nextInt <= 102) nextInt = map(nextInt, 97, 102, 10, 15);
    nextInt = constrain(nextInt, 0, 15);
    decValue = (decValue * 16) + nextInt;
  }
 return decValue;
}

//*********************************************************************************************
void display_data() //gibt daten auf dem lcd oder tft display aus

//*********************************************************************************************
#if defined (lcd_display)  //behandlung lcd-display: erkennung des tasters und lcd-anzeige
{x = analogRead (0);  //abfrage A0
 if (x < (x_alt -100))  {tastererkennung();}
 x_alt = x; 
 for (int m = 0; m < zeilenzahl; m++)
   {while (zeile_data[m].length() < 5) {zeile_data[m] = " " + zeile_data[m];}
    if (display_message[zeile_pointer[m]] == "0") {zeile_data[m] = "                ";}
    display_zeile[m] =  display_message[zeile_pointer[m]] + zeile_data[m];
   
    if (display_zeile[m] != display_zeile_alt[m])  //datenausgabe auf display nur wenn aenderung 
      {lcd.setCursor(0,m); lcd.print (display_zeile[m]); display_zeile_alt[m] = display_zeile[m];}
   } 
} 
//*********************************************************************************************
void tastererkennung()
{if (x < 60) 
   {taster == "right"; 
    zeile_pointer[0]--;  if (zeile_pointer[0] ==1) {zeile_pointer[0] = 79;}
    while((iomodus_D[zeile_pointer[0]] ==0) || (iomodus_D[zeile_pointer[0]] >19))
         {zeile_pointer[0]--; if (zeile_pointer[0] ==1) {zeile_pointer[0] =79;} }
    EEPROM.write(0,zeile_pointer[0]);//delay(4);
   } 
   else if (x < 200) 
          {taster == "up";
           zeile_pointer[0]++;  if (zeile_pointer[0] ==80) {zeile_pointer[0] = 2;}
           while((iomodus_D[zeile_pointer[0]] ==0) || (iomodus_D[zeile_pointer[0]] >19))
               {zeile_pointer[0]++; if (zeile_pointer[0] ==80) {zeile_pointer[0] = 2;} }
           EEPROM.write(0,zeile_pointer[0]);//delay(4);
          } 
          else if (x < 400) 
                   {taster == "down";
                    zeile_pointer[1]++; if (zeile_pointer[1] ==80) {zeile_pointer[1] = 2;}
                    while((iomodus_D[zeile_pointer[1]] ==0) || (iomodus_D[zeile_pointer[1]] >19))
                         {zeile_pointer[1]++; if (zeile_pointer[1] ==80) {zeile_pointer[1] = 2;} } 
                    EEPROM.write(1,zeile_pointer[1]);//delay(4);     
                   } 
                  else if (x < 600)
                         {taster == "left";
                          zeile_pointer[1]--;
                          if (zeile_pointer[1] ==1) {zeile_pointer[1] = 79;}
                          while((iomodus_D[zeile_pointer[1]] ==0) || (iomodus_D[zeile_pointer[1]] >19))
                               {zeile_pointer[1]--; if (zeile_pointer[1] ==1) {zeile_pointer[1] =79;} }
                          EEPROM.write(1,zeile_pointer[1]);//delay(4);
                         } 
                         else if (x < 800)
                                {taster = "select";}
                                else {taster ="";}
}
#endif  //************************************************************************************* 

//*********************************************************************************************
#if defined (tft_display)  //behandlung tft toucheingabe und  display 2.4''
 {if (millis() > next_touch_time)  //touch-display abfragen
   {TSPoint p = ts.getPoint();// a point object holds x y and z coordinates
    px = p.x; py = p.y; pz =p.z;  
    pinMode(XM, OUTPUT);   pinMode(YP, OUTPUT);
    if (pz > MINPRESSURE && pz < MAXPRESSURE ) 
      {Serial.print("px : ");Serial.print( px); Serial.print("  py : " ); Serial.print(py);
       Serial.print("  pz : " ); Serial.print(pz);
       if (abs(px_B - px_A) > 100) {p_x = (1000 *(px- px_A))/(px_B -px_A); p_y = (1000 *(py - py_A))/(py_C -py_A);} 
         else {p_x = (1000 *(py -py_A))/(py_B - py_A); p_y = (1000 *(px - px_A)) /(px_C - px_A);}
       Serial.print("  p_x : ");Serial.print( p_x); Serial.print("  p_y : " ); Serial.print(p_y);
       if (p_y < 154) {touch_y = 0;}   //p_y = 1000 entspricht 6,5 Zeilen 
         else {if (p_y < 308) {touch_y = 1;}
                 else {if (p_y < 462) {touch_y = 2;}
                         else {if (p_y < 616) {touch_y = 3;}
                                 else {if (p_y < 770) {touch_y = 4;}
                                         else {touch_y = 5;}}}}}
       Serial.print("     touch_y "); Serial.print(touch_y); Serial.println();
       if (p_x < 500) {zeile_pointer_minus();}  //Serial.println(zeile_pointer[touch_y]);}
       if (p_x > 500) {zeile_pointer_plus(); }  //Serial.println(zeile_pointer[touch_y]);}
       touch_alt = touch;
      }
    for (int m = 0; m < zeilenzahl; m++)  //datenausgabe auf tft-display
      {while (zeile_data[m].length() < 7) {zeile_data[m] = " " + zeile_data[m];}
       display_zeile[m] =  display_message[zeile_pointer[m]] + zeile_data[m];
       if (display_zeile[m] != display_zeile_alt[m]) //displayausgabe nur wenn aenderung 
         {tft_print (m,display_zeile[m],schriftgroesse,WHITE); display_zeile_alt[m] = display_zeile[m];}
      }
   } 
}
//*********************************************************************************************
//mit diesem Unterprogramm wird auf dem tft display ein zeilen-display 6 x 16  emuliert
void tft_print (int line, String textline, int font_size, long int color)
{if (tft_type ==1)
   {tft.fillRect(0,38*line, 319, 38, BLACK); //x0,y0, width,heights  //zeile loeschen
    tft.setCursor(0, 38*line+6);              //und dann erst schreiben
   }
 if (tft_type ==2)
   {tft.fillRect(0,50*line, 479, 50, BLACK); //x0,y0, width,heights  //zeile loeschen
    tft.setCursor(5, 50*line+6);              //und dann erst schreiben
   }  
 tft.setTextColor(color);  
 tft.setTextSize(font_size);
 tft.print(textline);
}
//mit diesen Unterprogrammen wird der zeile_pointer im eeprom abgelegt
void zeile_pointer_plus()
{next_touch_time = millis() + 200; 
  zeile_pointer[touch_y]++;  if (zeile_pointer[touch_y] >79) {zeile_pointer[touch_y] = 2;}
 while((iomodus_D[zeile_pointer[touch_y]] ==0) || (iomodus_D[zeile_pointer[touch_y]] >19))
  {zeile_pointer[touch_y]++; if (zeile_pointer[touch_y] >79) {zeile_pointer[touch_y] = 2;} }
 EEPROM.write(touch_y,zeile_pointer[touch_y]);//delay(4);
}
void zeile_pointer_minus()
{next_touch_time = millis() + 200; 
  zeile_pointer[touch_y]--;  if (zeile_pointer[touch_y] <2) {zeile_pointer[touch_y] = 79;}
 while((iomodus_D[zeile_pointer[touch_y]] ==0) || (iomodus_D[zeile_pointer[touch_y]] >19))
   {zeile_pointer[touch_y]--; if (zeile_pointer[touch_y] <2) {zeile_pointer[touch_y] =79;}  }
 EEPROM.write(touch_y,zeile_pointer[touch_y]);//delay(4);
}      
#endif  //************************************************************************************* 


MfG
Matthias

Ardubert Homedu
Beiträge: 142
Registriert: 17.07.2016, 10:40
Hat sich bedankt: 3 Mal
Danksagung erhalten: 1 Mal

Re: Homeduino: universeller LAN/WLAN-Arduino für die Hausaut

Beitrag von Ardubert Homedu » 04.11.2017, 12:52

Hallo,

Ich hatte eigentlich vor dem Homeduino mit einer Website zu versehen wie im
Wemos Realis Vorbild das mir sehr gut gefallen hat...

Das sollte dann mit dem ESP drauf , aber auch mit dem W5100 laufen


Ich sitzt da jetzt wieder seit Tagen drann und nichts läuft...
hab zig Beispiele versucht umzusetzten und nix geht...
Angefangen hab ich jetzt mit dem ESP

Scheinbar ist es immer ein Problem das der ESP auf dem Mega sitzt...
dafür gibts kein richtiges Beispiel für meinen Fall...

wenn ich im Browser die IP Eingebe kommt im SM nur
[WiFiEsp] New client 0
[WiFiEsp] Disconnecting 0
[WiFiEsp] New client 0
[WiFiEsp] Disconnecting 0

Ich muss einen falschen Ansatz haben.. :shock:

Bitte wo Fange ich an?? :shock:


mfg. Flo


eine alternative wäre noch das anzeigen von den CCU2 Variablen im Browser...

Antworten

Zurück zu „HomeMatic Tipps & Tricks - keine Fragen!“