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

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

Moderator: Co-Administratoren

Daimler
Beiträge: 9115
Registriert: 17.11.2012, 10:47
System: Alternative CCU (auf Basis OCCU)
Wohnort: Köln
Hat sich bedankt: 37 Mal
Danksagung erhalten: 283 Mal

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

Beitrag von Daimler » 05.08.2017, 09:38

Hi Rainer,
Homoran hat geschrieben:Watt en sch...eid :D
Was schon klar. 8)
Wusste nur nicht, dass die einverleibt wurden.
Gruß Günter

pivccx mit 3.xx in Produktiv und Testsystem mit HM-, HM-W, HMIP- und HMIP-W Geräten, HPCx Studio 4.1,
L-Gateways, RS-L-Gateways, HAP, Drap, FHZ200x, vereinzelt noch FS2x-Komponenten.
HM / HM-IP: Zur Zeit knapp 300 Komponenten mit ??? Kanälen .

Ich übernehme für alle von mir gegebenen Hinweise, Tipps und Links keine Haftung! Das Befolgen meiner Tipps ist nur für Fachkundige gedacht und erfolgt auf eigene Gefahr!

ceerix
Beiträge: 54
Registriert: 22.12.2015, 22:20

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

Beitrag von ceerix » 06.08.2017, 15:03

Ich würde mich ebenfalls für einen Bausatz interessieren. :)


Gesendet von iPad mit Tapatalk
--------------------------------------------
Rasperrymatic mit 144 Kanälen in 54 Geräten und 72 CUxD-Kanäle in 12 CUxD-Geräten
--------------------------------------------

lxuser
Beiträge: 487
Registriert: 11.01.2015, 21:32
System: Alternative CCU (auf Basis OCCU)
Hat sich bedankt: 25 Mal
Danksagung erhalten: 28 Mal

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

Beitrag von lxuser » 14.08.2017, 17:19

Ich melde auch mal Interesse an einem Bausatz an.

dondaik
Beiträge: 12929
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.08.2017, 17:30

kann ab heute ( siehe anderes thema ) im shop geordert werden ....

viewtopic.php?f=19&t=37604
-------
!!! 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 » 16.08.2017, 19:28

Auch mal wieder Hallo von mir…
Es geht um Leistungsmessung am 230V Netz….

Ich habe mir über Ali ein paar praktische Messumwandler gegönnt ,,,
Diese gibt es in Verschiedenen Versionen,,, Aber immer 0-5V
Sie sind zum Klippen , also muss nichts um verkabelt werden… st. Ca 5-6€
wandler.jpg
Für meine ersten Versuche habe ich mir die 0-10A 0-5V besorgt
Da die ersten Versuche in Messfehlern endeten da der Mega nicht so sensibel
am Analogeingang ist, hat mir Eugen den Tip gegeben Die Wandler mit je einem
100k Wiederstand auf Plus und auf Minus zu legen für das Signal um den Bereich etwas
Zu verschieben… mit Erfolg.. nochmals Danke an dich für die Schnelle Hilfe… :mrgreen:

Daten bei mir mit den 10A Wandlern:
100k an Plus Und Minus
Ist bei 0.0A Leistung ( Sensor am HD angeschlossen aber liegt neben der Phase )
ca 72 Inkremente bei ca 390mv..
bei 9,6A Leistung ca 4.4V ca 1000 Inkremente…
Im scetch eingefügt um gleich umzurechnen und etwas anpassen zu können..
Damit kommen dann in der CCU2 gleich die passenden Werte in Watt an.

analogwert = map(analogwert ,72,1023,0,2208 ) * 1.03 + 25;

Bei mir haute das gut hin so… Ich hab mit einer Ampere Zange paarmal gegengemessen


Jetzt wurden sie gegen die 25A Version ausgetauscht da ich Sie benutze um meinen
Hausanschluss zu messen. Da haben die 10A zu oft nicht gereicht…
Diese laufen mit einem 680k an Plus und einem 47k an Minus um Sie auch
Wieder in den richtigen Bereich zu bringen…
Daten bei mir mit 25A Wandlern
680k an Plus und 47k an Minus
Ist bei 0.0A Leistung ( Sensor am HD angeschlossen aber liegt neben der Phase )
ca 4 Inkremente bei ca 40mv..
bei 25,9A Leistung ca 4.6V ca 1023 Inkremente…
Im scetch eingefügt um gleich umzurechnen und etwas anpassen zu können..
Damit kommen dann in der CCU2 gleich die passenden Werte in Watt an.

analogwert = map(analogwert ,4,1023,0,5910 ) + 45;

Bei mir haute das gut hin so… Ich hab mit einer Ampere Zange paarmal gegengemessen

In der CCU2 wie immer beim Homeduino,,, spare ich mir jetzt…
Ich hab mir nur noch eine Variable angelegt die aus den 3 Phasen den Gesammtbedarf
Ausrechnet… ist übersichtlicher und für später mit der PV praktisch..
Das ganze auch in Cuxd mit Highchart

Unten meine Platine und Homeduino,,, und paar beispiele,, Testaufbau bei mir
IMG_20170714_222411.jpg
hier werden noch Inkremente angezeigt,,war zum einstellen
HD energi.jpg
platine.jpg
Nacht Bedarf Gesammt und die 3 Phasen
nacht.jpg

Tagbeispiel
tag.jpg

Mal in Mediola eingefügt:
mediola.jpg

Anwendungsmöglichkeiten, Ideen:
Die Messumformer sind klein genug um in einer Unterverteilung zwischen die Reihen zu passen
Um dort die abgehenden Leitungen über den Sicherungen zu messen….es müssten nur die Nasen
Weggeknippst werden…. Zumindest passt das bei mir….
( Bei mir hab ich viele Verbraucher einzeln abgesichert und könnte dadurch zb einzeln messen:
Waschmaschine, Trockner, Kühl und Gefrierschrank, Wasserkocher, Kaffeautomat, Kochfelder,
Backofen, Mikrowelle usw…)
Damit könnte man dann wieder Programme und Aktionen auslösen wenn man einen Mega
o.ä. mit Platzieren würde,,, sind dann 8 Analoge Eingänge bei mir frei….
unterver.jpg

Weiter könnte man:
Hausanschluss Bezug messen
Haus Bedarf messen
Leistung PV Anlage messen

Da ich im Wemos D1 Mini Thread ja den Analog Eingang nutze um Sensoren für
Gas und Luft Qualität auslesen zu können,,,, wird dieser jetzt auch benutzt um
Mit der Kombination Taster oder Schalter, Relais, Messumformer, Netzteil, Wemos
und Spannugsteiler Schaltsteckdosen MIT Leistungsmessung zu erstellen…
Und ich Depp hab damals alle kaputten funk Steckdosen weggeworfen …
Mit einem Doppelrelais könnte man auch eine Typische 3-fach Steckdosenleiste
Umrüsten,,, wenn man auf die erste der drei dosen verzichtet, hätte man evtl. genug platz
Für die Technik um die beiden restlichen dosen schalten zu können und die gesamt Leistung
Zu messen… ist ja nur ein analog Eingang dran am wemos…
Evtl. passt das ganze auch in einen Baumarkt zwei oder dreifach Stecker mit Schalter…
Die kosten so 2-3 Euro,, wenn man nur eine dose ürig lässt passt es vielleicht rein,,,
hab zwar einen da aber mir fehlen diese blöden bits zum öffnen,,, sind unterwegs

Also wieder viele neue möglichkeiten,,,
3fach.jpg
wemoA.jpg
Wer aufs Watt Genau messen will ist hier leider schlecht bedient,,
aber für das Geld wird man es nicht günstiger in die Homematic rein bekommen..

Das 230V Netz ist nur für Fachleute …


Viel Spaß

Mfg. Flo


Danke an Alle

bibo09
Beiträge: 165
Registriert: 30.03.2015, 17:34

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

Beitrag von bibo09 » 17.08.2017, 17:37

Guten Abend,

hat jemand zufällig schon das ESPB266 auf dem IO Shield ans laufen bekommen?
Mein Aufbau ist wie folgt Arduino Mega 2560 -> tft Display ->
IO Shiled Plus. Ich habe momentan das Sketch von der Seite 76 geladen. Auf dem IO Shiled ist extra ein freier Stecksockel für das WLAN Modul ESP8266.
Bekomme auf dem Display No Wlan Shield Stop angezeigt.
Hat jemand noch eine Idee?

Gruß
bibo09

dondaik
Beiträge: 12929
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 » 17.08.2017, 18:16

auf die richtig abgebogenen beinchen usw geachtet... aus dem text heraus funzt es ja.
der text wird ja im bereich zeile 700 ezzeugt ... also auch die esp8266 verbindungen prüfen und ggf die ports auf doppelbelegung in der definition ( es da diese möglichkeit gibt )
-------
!!! 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.

bibo09
Beiträge: 165
Registriert: 30.03.2015, 17:34

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

Beitrag von bibo09 » 17.08.2017, 19:11

ja das habe ich soweit überprüft es ist auf dem IO Shield Plus extra ein Steckplatz für das Modul.

Hat jemand zufällig ein fertigen Sketch mit Homeduino wo das Modul funzt?

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 » 17.08.2017, 19:33

Hallo,,

Ich habe gerade nachgesehen auf Eugens Homepage steht beim IO Shield PLus für den ESP
D14 TX3 - ESP RX
D15 RX3 - ESP TX

Ich habe deswegen meinen Scetch nochmal geändert...

Ich benutze Serial2 für meine Sachen,, und die Shields Serial3

Habe gerade umgesteckt und es läuft bei mir...

Da ich keine Shields benutze kann ich leider damit nicht Testen...

Vielleicht könnte das mal jemand mit Shield jetzt probieren und mal kurz ein Feedback geben..

Code: Alles auswählen

const String Version = "T_TestGeraet";  /*Stand: 17.08.2017 / Verfasser: Eugen Stall
erprobt fuer Arduino Mega 2560 mit Arduino 1.8.3
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 esp8266     //"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[] = "XXX XXX XXX"; //SSID WLAN in Anführungszeichen                      <<user-eingabe<< 

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

//xyz ist indiv. Bezeichnung dieses homeduino, keine sonderzeichen, öäüß...
const String homeduino_nummer = "ttest";  //                                     <<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 

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<< 
 0,  //D18/TX1 : Std-fkt; '6' =ImpCount;  '21' =CC3000                 <<user IO-Shield-Plus<< 
 0,  //D19/RX1 : Std-fkt; '6' =ImpCount;                               <<user IO-Shield-Plus<< 
 0,  //D20/SDA : Std-fkt; '6' =ImpCount;  '8' =I2C;                    <<user IO-Shield-Plus<< 
 0,  //D21/SCL : Std-fkt; '6' =ImpCount;  '8' =I2C;                    <<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 :
 2,  //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 :
 0,  //D48 :
 0,  //D49 :
 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;    '8' =I2C;                               <<user IO-Shield-Plus<< 
 0,  // '0' =andere Nutzg;    '8' =I2C;                               <<user IO-Shield-Plus<< 
 0,  // '0' =andere Nutzg;    '8' =I2C;                               <<user IO-Shield-Plus<< 
 0,  // '0' =andere Nutzg;    '8' =I2C;                               <<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<< 
 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 =  0; //'0' =nc; '1' =BH1750,                   <<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<< 
 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[80] = {
"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
"Test Digital Out  ",  //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 I2C 
"L-Temp./C :",  //anzeigetext fuer I2C 
"Lux/lx    :",   //anzeigetext fuer I2C 
"UV-Index  :",  //anzeigetext fuer I2C
"74 Status :",  //anzeigetext fuer 
"75 Status :",  //anzeigetext fuer 
"76 Status :",  //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
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 <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 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  Achtung! bei 3 und IL9327 Offset beobachtet   <<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; //set 6 for ...x240 displays, set 8 for ...x320 displays 
int px,py,pz;
unsigned long next_touch_time = 0; 
int fontgroesse;
int espbyte = 0;
boolean centertouch = 1;
boolean receivingcommand = false;

/*
//2,4'' display 320x240
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 und 4 ist 3,5" Display
#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);
*/

//3,95'' display 480x320
//3,5 auf 3,95 einstellung
const long int px_A = 991,  py_A = 950;  //touch-koordinaten oben-links                
const long int px_B = -55,  py_B = 1057;  //touch-koordinaten oben-rechts              
const long int px_C = 990,  py_C = 100;  //touch-koordinaten unten-links  
#define schriftgroesse 3                                                           //  Schriftgröße anzeigetext
#define tft_type 2    // 1 ist 2,4''display   2 ist 3.95''display   3 und 4 ist 3,5" Display
#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);

/* für 3,5" TFT auf 3,95" Einstellung
const long int px_A = 991,  py_A = 950;  //touch-koordinaten oben-links                
const long int px_B = -55,  py_B = 1057;  //touch-koordinaten oben-rechts              
const long int px_C = 990,  py_C = 100;  //touch-koordinaten unten-links  

für 3,95
const long int px_A = 188, py_A = 792;  //touch-koordinaten oben-links               
const long int px_B = 154,  py_B = 106;  //touch-koordinaten oben-rechts             
const long int px_C = 890,  py_C = 873;  //touch-koordinaten unten-links  
*/
/*
//3,5'' display 400x240 controller: IL9327
const long int px_A = 946,  py_A = 135;  //touch-koordinaten oben-links                
const long int px_B = 76,   py_B = 118;  //touch-koordinaten oben-rechts              
const long int px_C = 953,  py_C = 893;  //touch-koordinaten unten-links              
#define schriftgroesse 3 
#define tft_type 3    // 1 ist 2,4''display   2 ist 3.95''display   3 und 4 ist 3,5" Display
#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);
*/
/*
//3,5'' display 480x320 controller: IL9341
const long int px_A = 991,  py_A = 950;  //touch-koordinaten oben-links                
const long int px_B = -55,  py_B = 1057;  //touch-koordinaten oben-rechts              
const long int px_C = 990,  py_C = 100;  //touch-koordinaten unten-links          
#define schriftgroesse 4 
#define tft_type 4   // 1 ist 2,4''display   2 ist 3.95''display   3 und 4 ist 3,5" Display
#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, 310);
*/
/*
//2,8'' display 320x240 Elegoo controller: IL9341
//https://www.amazon.de/gp/product/B01EUVJYME?ref%5F=pe%5F386171%5F51767411%5FTE%5Fdp%5F2&pldnSite=1
const long int px_A = 148,  py_A = 96;  //touch-koordinaten oben-links                
const long int px_B = 135,  py_B = 914;  //touch-koordinaten oben-rechts              
const long int px_C = 913,  py_C = 103;  //touch-koordinaten unten-links              
#define schriftgroesse 2 
#define tft_type 5   // 1 ist 2,4''display   2 ist 3.95''display   3 und 4 ist 3,5" Display
#define YP A3 // must be an analog pin, use "An" notation!
#define XM A2 // must be an analog pin, use "An" notation!
#define YM 9  // can be a digital pin
#define XP 8  // can be a digital pin
#define MINPRESSURE 10
#define MAXPRESSURE 1000
TouchScreen ts = TouchScreen(XP, YP, XM, YM, 300);
*/

// color definitions for e.g. ILI9327 TFT, tft_type == 3 or 5
#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 == 4
#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


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[8];
String zeile_data[8] = {"     ","     ","     ","     ","     ","     ","     ","     "};
String display_zeile_alt[8],display_zeile[8];
int text_line;
String text_content = "";
long int text_farbe;
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;
const float ALTITUDE = 579.0; // eigene seehoehe in metern              <<user IO-Shield-Plus<<
SFE_BMP180 pressure;
char status;
double T,P,p0;
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;
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
 
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();  
 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,"TischTestGeraet",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,"TischTestGeraet",5,BLUE);
    tft.drawRect(0,0, 480, 320, BLUE);
   }   
if (tft_type ==3) //3,5'' display 400x240
   {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,"TischTestGeraet",4,CYAN);
    tft.drawRect(0,0, 399, 239, GREEN);
   } 
if (tft_type ==4) //3,5'' display 480x320
   {tft.fillScreen((BLACK));
    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,"TischTestGeraet",4,CYAN);
    tft.drawRect(0,0, 480, 320, (GREEN));
//
  #ifdef DEBUG
    Serial.println(F("Printing colored rectangles to check the color definitions:"));
    Serial.println(F("BLACK, BLUE, RED, GREEN, CYAN, MAGENTA, YELLOW, WHITE"));
    tft.fillRect(125,280, 20, 20, (BLACK));
    tft.fillRect(155,280, 20, 20, (BLUE));
    tft.fillRect(185,280, 20, 20, (RED));
    tft.fillRect(215,280, 20, 20, (GREEN));
    tft.fillRect(245,280, 20, 20, (CYAN));
    tft.fillRect(275,280, 20, 20, (MAGENTA));
    tft.fillRect(305,280, 20, 20, (YELLOW));
    tft.fillRect(335,280, 20, 20, (WHITE));
  #endif    
   } 
if (tft_type ==5) //2,8'' Elegoo display 320x240
   {tft.fillScreen((BLACK));
    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,1,(WHITE));
    tft_print (3,"TischTestGeraet",3,CYAN);
    tft.drawRect(0,0, 320, 240, (GREEN));
//
  #ifdef DEBUG
    Serial.println(F("Printing colored rectangles to check the color definitions:"));
    Serial.println(F("BLACK, BLUE, RED, GREEN, CYAN, MAGENTA, YELLOW, WHITE"));
    tft.fillRect(45,210, 20, 20, (BLACK));
    tft.fillRect(75,210, 20, 20, (BLUE));
    tft.fillRect(105,210, 20, 20, (RED));
    tft.fillRect(135,210, 20, 20, (GREEN));
    tft.fillRect(165,210, 20, 20, (CYAN));
    tft.fillRect(195,210, 20, 20, (MAGENTA));
    tft.fillRect(225,210, 20, 20, (YELLOW));
    tft.fillRect(255,210, 20, 20, (WHITE));
  #endif    
   } 
   delay(4000); 
#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_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
       Serial3.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!
//        Serial3.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
//        Serial3.end();
//        delay(3000); 
//        Serial3.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"));

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

      // initialize ESP module
        WiFi.init(&Serial3);
      
       // 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
  }
if (tft_type ==3) //3,5'' display 400x240
  {tft.setCursor(0, 230); //fusszeile
   tft.setTextColor(GREEN);  
   tft.setTextSize(1);
   tft.print(Version + "   " + hm_systemvariable); tft.print( myIpString);
//   Serial.print(Version + "   Homeduino IP: "); Serial.print( myIpString); tft.print("   Nr.: " + homeduino_nummer);
  }
if (tft_type ==4) //3,5'' display 480x320
  {tft.setCursor(0, 300); //fusszeile
   tft.setTextColor(GREEN);  
   tft.setTextSize(2);
   tft.print(Version + "  IP:"); tft.print( myIpString);    // tft.print("  dBm:");tft.print(rssi);     //fuer wifi dbm anzeige
//   Serial.print(Version + "   Homeduino IP: "); Serial.print( myIpString); tft.print("   Nr.: " + homeduino_nummer);
  }
if (tft_type ==5) //2,8'' Elegoo display 320x240
  {tft.setCursor(0, 230); //fusszeile
   tft.setTextColor(GREEN);  
   tft.setTextSize(1);
   tft.print(Version + "   " + hm_systemvariable); tft.print( myIpString);
//   Serial.print(Version + "   Homeduino IP: "); Serial.print( myIpString); tft.print("   Nr.: " + homeduino_nummer);
  }
#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+")";
          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;
            } 
         }
      } 
  }  
//*********************************************************************************************
 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);  
    }
//**************************   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 ) 
      {
#ifdef DEBUG
       Serial.print(F("px : "));Serial.print( px); Serial.print(F("  py : " )); Serial.print(py);
       Serial.print(F("  pz : " )); Serial.print(pz);
#endif       
       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(F("  p_x : "));Serial.print( p_x); Serial.print(F("  p_y : " )); Serial.print(p_y);

    if (tft_type != 4) {
       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;}}}}}}

    if (tft_type == 4) {
       if (p_y < 106) {touch_y = 0;}   //p_y = 1000 entspricht 8,5 Zeilen 
         else {if (p_y < 212) {touch_y = 1;}
                 else {if (p_y < 370) {touch_y = 2;}
                         else {if (p_y < 500) {touch_y = 3;}
                                 else {if (p_y < 590) {touch_y = 4;}
                                        else {if (p_y < 690) {touch_y = 5;}
                                              else {if (p_y < 790) {touch_y = 6;}
                                                  else {touch_y = 7;}}}}}}}}


       Serial.print(F("     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];
#ifdef DEBUG
        Serial.print (F("iomodus_D[zeile_pointer[touch_y]] Touch Mitte - Modus: ")); Serial.println (iomodus_D[port_pin]); 
        Serial.print (F("Port_Pin: D")); Serial.println(port_pin);
        Serial.print(F("Status des Ausgangs: ")); Serial.println(digitalRead(port_pin));
#endif
        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 bis 8 x 26 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
   }  
if (tft_type ==3)
   {tft.fillRect(0,38*line, 399, 38, BLACK); //x0,y0, width,heights  //zeile loeschen
    tft.setCursor(0, 38*line+6);              //und dann erst schreiben
   }
if (tft_type ==4)
   {tft.fillRect(0,50*line, 479, 50, (BLACK)); //x0,y0, width,heights  //zeile loeschen
    tft.setCursor(5, 50*line+6);              //und dann erst schreiben
   }
if (tft_type ==5)
   {tft.fillRect(0,38*line, 320, 38, (BLACK)); //x0,y0, width,heights  //zeile loeschen
    tft.setCursor(0, 38*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] >86) {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] >86) {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] = 86;}
 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] =86;}  }
 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()
{ Serial3.flush(); 
  boolean Ook = false;
  boolean Kok = false;
  unsigned long Counter = 0;
  
  while(!Kok)
  {
    if (Serial3.available())     espbyte = Serial3.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

Wenn das so jetzt nicht läuft fällt mir nur noch ein ob der ESP genug Saft hat..

Das war mal mein problem...

Wenn der Mega bei mir Mit großem TFT und ESP am PC USB hing--
brachte wohl der Alte PC bei mir nicht genug Strom über den USB und
der ESP wurde nicht richtig erkannt oder spinnte immer rum...

Wie versorgst du den Mega?? über usb?
IMG_20170817_191509.jpg
IMG_20170817_192956.jpg

mfg. Flo

bibo09
Beiträge: 165
Registriert: 30.03.2015, 17:34

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

Beitrag von bibo09 » 17.08.2017, 20:12

Leider bekomme ich immer noch folgende Meldung

Code: Alles auswählen

TFT identifier:FFFF9341
Resetting ESP-01 module
Espressif ESP8266 - WebClient
Timeout while communicating with ESP-01 module!

[WiFiEsp] Initializing ESP module
[WiFiEsp] >>> TIMEOUT >>>
[WiFiEsp] >>> TIMEOUT >>>
[WiFiEsp] >>> TIMEOUT >>>
[WiFiEsp] >>> TIMEOUT >>>
[WiFiEsp] >>> TIMEOUT >>>
[WiFiEsp] Cannot initialize ESP module
[WiFiEsp] >>> TIMEOUT >>>
[WiFiEsp] No tag found
WiFi shield not present
So nebenbei kann mir bitte einer erkären wo ich die richtigen Einstelleungen für das TFT finde (Elegoo Uno R3 2,8")
Dateianhänge
Hduino.jpg

Antworten

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