Moderator: Co-Administratoren
Du hast doch in der Spalte "Letzte Aktualisierung" einen Zeitstempel stehen. Meines Wissens ist das die letzte Statusänderung. Wenn das Fenster also offen ist steht dort, seit wann das Fenster offen ist. Wenn es zu ist, seit wann es geschlossen ist.schwind1975 hat geschrieben:Hi Dirk,
Danke für Deine Rückmeldung.
Also ich stelle mir das folgendermaßen vor (siehe Bild [Fenster offen seit])
Gibt es etwa die Info, bzw. das Feld schon ?
Das wäre natürlich am Besten.
So ist es, und das ist auch der Wert den LastTimestamp() ausliest.dirk79 hat geschrieben: Du hast doch in der Spalte "Letzte Aktualisierung" einen Zeitstempel stehen. Meines Wissens ist das die letzte Statusänderung. Wenn das Fenster also offen ist steht dort, seit wann das Fenster offen ist. Wenn es zu ist, seit wann es geschlossen ist.
Gruß
Dirk
Hi dirk79!dirk79 hat geschrieben:So, jetzt ist mein erstes, eigenes Script endlich fertig. Gibt es freiwillige/wahnsinnige zum testen?
Code: Alles auswählen
!Achtung, das Script unterstützt nur einen HM-CC-TC pro Raum. Bei mehreren HM-CC-TC in einem Raum funktioniert das Script nicht einwandfrei
!Erstellt von dirk79, erweitert von tunecase
!Version vom 13.12.2013
var myAssembly = dom.GetObject("Verschluß"); ! Name des Gewerks in dem die Fensterkontakte sind
string textStart = "Das/Die "; ! Textbaustein: Anfang bei einem Fenster
string textStartAlt = "Die Fenster und/oder Türen "; ! Textbaustein: Anfang bei mehreren Fenstern
string textSeparator = " und "; ! Textbaustein: Verbindungswort bei mehreren Fenstern
string textEnd = " Fenster/Tür ist offen"; ! Textbaustein: Ende bei einem Fenster
string textEndAlt = " sind offen"; ! Textbaustein: Ende bei mehreren Fenstern
string textRemove = "HM-Sec-SC "; ! Zu entfernender Text am Beginn des Gerätenamens
string textRemove2 = "HM-Sec-RHS "; ! Zu entfernender Text am Beginn des Gerätenamens
integer tempWarn = 20; ! Temperatur, die im Raum unterschritten werden muss, dass eine Meldung ausgelöst wird
integer tempWarnON = 1; ! Falls >0 wird die Temperatur überwacht, sonst nicht
string timeWarn = "00:15"; ! "hh:mm" (Std / Min immer zweistellig) Differenzzeit vom Fensteröffnen bis erinnert wird.
string MailEmpfaenger = "me@you.com";
string MailBetreff = "HomeMatic Fenster oder Tuer offen";
string MailText;
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
!! Ab hier nichts mehr aendern !!
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
integer windowCount = 0;
string textBody;
string itemID;
string roomTC_ID;
integer textRemoveLength = textRemove.Length();
integer textRemoveLength2 = textRemove2.Length();
integer stunde = timeWarn.Substr(0, 2).ToInteger();
integer minute = timeWarn.Substr(3, 2).ToInteger();
integer timeWarnSec = (stunde * 3600) + (minute * 60);
time now = system.Date("%Y-%m-%d %H:%M:%S").ToTime(); ! Aktuelle Uhrzeit abfragen
integer tempIST; ! Datenobjekt des TC für die Temperatur (Kanal 1)
time window_timestamp; ! Zeitstempel der Systemvariablen, die zuletzt geändert worden ist (Wert in Sekunden).
integer maxdelta;
if (dom.GetObject('Anwesenheit').State()) { ! Prüfe auf Heizperiode und Anwesenheit
foreach(itemID, myAssembly.EnumUsedIDs()) {
var item = dom.GetObject(itemID);
if (item.IsTypeOf(OT_CHANNEL)) {
var device = dom.GetObject(item.Device());
if ((device.HssType().Find("HM-Sec-SC") >= 0) || (device.HssType().Find("HM-Sec-RHS") >= 0)){
if (item.State().ToInteger() >= 1){ ! Prüfe, ob das Fenster offen ist
var dpTimestamp = dom.GetObject("BidCos-RF." # device.Address() # ":1.STATE");
var chnTimestamp = dom.GetObject(dpTimestamp.Channel());
window_timestamp = dom.GetObject(chnTimestamp).LastTimestamp().ToTime(); ! Wann wurde das Fenster geöffnet?
! WriteLine("Zeitpunkt des Oeffnens: " # window_timestamp.ToString());
integer delta = now.ToInteger() - window_timestamp.ToInteger(); ! Delta Fensteröffnung und Aktuelle Zeit
if (delta > maxdelta ) {
maxdelta = delta;
}
if (delta >= timeWarnSec) { ! Prüfen ob das Fenster länger als Warnzeit geöffnet ist
var room = dom.GetObject(item).ChnRoom(); ! Raum zum offenen Fenster abfragen
var roomTC = dom.GetObject(room);
if (tempWarnON > 0) {
foreach(roomTC_ID, roomTC.EnumUsedIDs()) { ! Raumthermostate im Raum suchen und IST-Temperatur abfragen
var itemTC = dom.GetObject(roomTC_ID);
if (itemTC.IsTypeOf(OT_CHANNEL)) {
var deviceTC = dom.GetObject(itemTC.Device());
if (deviceTC.HssType() == "HM-CC-TC") {
var dp = dom.GetObject("BidCos-RF." # deviceTC.Address() # ":1.TEMPERATURE");
}
}
}
tempIST = dp.State();
}
if ((tempWarnON==0) || (tempIST < tempWarn)) { ! Text bauen, wenn die Raumtemperatur unter der Warntemperatur ist
string itemName = item.Name().ToString();
integer doRemove = itemName.Find(textRemove);
integer doRemove2 = itemName.Find(textRemove2);
if (doRemove >= 0) {
itemName = itemName.Substr(textRemoveLength, itemName.Length() - textRemoveLength);
}
if (doRemove2 >= 0) {
itemName = itemName.Substr(textRemoveLength2, itemName.Length() - textRemoveLength2);
}
if (windowCount > 0) { ! Prüfe ob schon ein offenes Fenster hinzugefügt wurde
textBody = textBody # textSeparator # "'" # itemName # "'";
} else {
textBody = "'" # itemName # "'";
}
windowCount = windowCount + 1; ! Addiere ein Fenster zum Zähler Achtung: Erst jetzt, da sonst das zählen nicht korrekt funktioniert
}
}
}
}
}
}
}
if (windowCount > 0){ ! Wenn Fenster gezählt wurden, dann TTS senden
if (windowCount == 1) { ! In Abhängigkeit der gezählten Fenster den Text zusammensetzen
string send=textStart # textBody # textEnd # ".";
} else {
string send=textStartAlt # textBody # textEndAlt # ".";
}
integer maxdeltamin = maxdelta / 60;
MailText = "Hallo!\r\n\r\n";
MailText = MailText # send # "\r\n";
if (tempWarnON > 0) {
MailText = MailText # "Die Temperatur im Raum unterschreitet jetzt " # tempWarn.ToString() # " Grad Celsius!\r\n";
}
MailText = MailText # "\r\n";
MailText = MailText # "Das laengste offene Fenster bzw. die laengste offene Tuer ist seit " # maxdeltamin.ToString() # " Minuten offen.\r\n";
MailText = MailText # "Zeitpunkt: " # system.Date("%F %X") # "\r\n";
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
!Mail versenden
string stdout;
string stderr;
string teilstr;
string sendmail = "";
string sendbetreff = "";
string mailto = "";
foreach(teilstr, MailBetreff.Split(" ")) {
sendbetreff = sendbetreff # "+" # teilstr;
}
foreach(teilstr, MailText.Split(" ")) {
sendmail = sendmail # "+" # teilstr;
}
foreach(teilstr, MailEmpfaenger.Split(" ")) {
mailto = mailto # "+" # teilstr;
}
system.Exec ("/bin/sh /etc/config/addons/mh/email.sh "# sendbetreff # " " # sendmail # " " # mailto, &stdout, &stderr);
!ENDE Mail versenden
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
!WriteLine(MailText);
}
Code: Alles auswählen
var fos = dom.GetObject("Garage.offen.seit");
if (dom.GetObject("Garage Neigungssensor").State() == true){
fos.State(fos.Value() + 1);
}
Wie kommst du zu der Annahme, das die Aktualisierung "nur ca. alle drei Minuten" stattfindet?Homoran hat geschrieben:Wenn ich das richtig sehe, soll das zweite Programm hochzählen. Es wird auf Aktualisierung ausgelöst. Diese findet nur alle ca. 3 Minuten statt. Erst eine weitere Minute wird dann der Zähler hochgesetzt, und zwar um eine Minute. Die daraus redultierende Zahl kann unmöglich mit der Realität übereinstimmen.
Du brauchst ein Programm, dass in regelmässigen Abständen gestartet wird, dann den Status des Sensors überprüft, und anschliessend die Variable um den Wert des Intervalls hochzählt.
Gruß
Rainer
Gesendet von meinem GT-P1000 mit Tapatalk 2
