Infos und Ergänzungen rund um Raumthermostate, Stellantriebe

[mrMuppet]

Klappt doch noch nicht ganz richtig. Wie gesagt wird die Wärmeanforderung in die Variable geschrieben, und die Heizung wird ausgeschaltet (bei mir ist das ja Aktor an!) - nur angeschaltet wird sie nicht!
So wie ich den Logfile lese wird der Aktor alle paar Minuten auf "ein" gesetzt ... also Heizung ausgeschaltet. Kann es sein, dass dann die nötige Pausenzeit nicht erreicht wird?

Edit: Ich hab mal das "&& (i_diff > 600)" rausgenommen... jetzt geht die Heizung auch an. Warum das ganze sonst nicht klappt weiss ich nicht!

[anli]

OK, hier noch mal eine Version, in die ich etwas debugging eingebunden habe. Du musst das andere Skript im Programm ersetzen, die Namen der verwendeten Variablen und Geräte kontrollieren und eine neue Systemvariable (Programmausfuehrung debug, Typ Zeichenkette) anlegen. Dann über die Benutzerverwaltung die Variable auf die Startseite legen und mal ein paar Minuten immer beobachten und in ein Log kopieren. Dann postest Du das Log mal.

Code: Alles auswählen

object o_debug = dom.GetObject("Programmausfuehrung debug");
string s_debug = "Heizungssteuerung: Start: " # system.Date("%d.%m.%Y %T");
var vts = o_debug.State(s_debug);

object o_waermeanforderung = dom.GetObject("Waermeanforderung");
object d_heizung = dom.GetObject("HeizungMain");

! Stellantriebe aus dem WebUI-Programm abfragen
object o_prg = dom.GetObject($this$);
integer i_count=0;
integer i_summe=0;
string s_address;
object o_dp_err;
object o_chn;
object o_dp = dom.GetObject(o_prg.Rule().RuleCondition(0).CndSingleCondition(i_count).LeftVal());

while (o_dp) {
  o_chn = dom.GetObject(o_dp.Channel());
  s_address = o_chn.Address();
  o_dp_err=dom.GetObject("BidCos-RF." # s_address # ".ERROR");
  if (o_dp_err.Value() == 0) {
    i_summe = i_summe + o_dp.Value();
  }
  i_count = i_count + 1;
  o_dp = dom.GetObject(o_prg.Rule().RuleCondition(0).CndSingleCondition(i_count).LeftVal());
}

! Heizung bei Bedarf schalten
object d_heizung_state = dom.GetObject("BidCos-RF." # d_heizung.Address() # ":1.STATE");
time t_timestamp = d_heizung_state.Timestamp();
time t_now = system.Date("%Y-%m-%d %H:%M:%S").ToTime();
integer i_diff = t_now.ToInteger() - t_timestamp.ToInteger();

s_debug = s_debug # ", i_summe: " # i_summe.ToString() # ", i_diff: " # i_diff.ToString() # ", Status d_heizung: " # d_heizung_state.State().ToString();
var vts = o_debug.State(s_debug);
if ((i_summe <= 20) && (!d_heizung_state.State())) {
  d_heizung_state.State(true);
}
if ((i_summe >= 30) && (i_diff > 600) && (d_heizung_state.State())) {
  d_heizung_state.State(false);
}

! Wärmeanforderung aktualisieren
if (o_waermeanforderung.State() != i_summe) {
  o_waermeanforderung.State(i_summe);
}

var vts = o_debug.State(s_debug # ", Ende: " # system.Date("%d.%m.%Y %T") # "\n");

[mrMuppet]

Ok... alles brav gemacht:

Heizungssteuerung: Start: 29.02.2012 18:33:54, Ende: 29.02.2012 18:33:55
Heizungssteuerung: Start: 29.02.2012 18:36:27, Ende: 29.02.2012 18:36:29
Heizungssteuerung: Start: 29.02.2012 18:40:45, Ende: 29.02.2012 18:40:47
Heizungssteuerung: Start: 29.02.2012 18:42:15, Ende: 29.02.2012 18:42:16
Heizungssteuerung: Start: 29.02.2012 18:44:33, Ende: 29.02.2012 18:44:34

Am Ende war dann die Heizung auch mak aus. Jetzt lass ich sie noch mal an gehen...

Edit: Springt leider immer noch nicht an, auch wenn der Wärmeanforderungswert über 20 ist, vielleicht muss ich noch gerade warten bis die 10 Minuten um sind.

Edit: Leider auch jetzt noch kein Einschalten... nur weiter diese Start/Ende Logs mit einer sekunde unterschied.

[anli]

Ich habe das Skript in meinem vorigen Post noch einmal angepasst. Bitte noch einmal probieren.

[mrMuppet]

Erstes Zwischenergebnis:

Heizungssteuerung: Start: 01.03.2012 18:31:41, i_summe: 76, i_diff: 93, Status d_heizung: false, Ende: 01.03.2012 18:31:42
Heizungssteuerung: Start: 01.03.2012 18:36:11, i_summe: 76, i_diff: 66, Status d_heizung: false, Ende: 01.03.2012 18:36:12
Heizungssteuerung: Start: 01.03.2012 18:39:08, i_summe: 81, i_diff: 116, Status d_heizung: false, Ende: 01.03.2012 18:39:08

Aber bisher nur Heizvorgang. Andere Vorgänge folgen.

Edit:
Heizungssteuerung: Start: 01.03.2012 19:33:16, i_summe: 44, i_diff: 53, Status d_heizung: false, Ende: 01.03.2012 19:33:16
Heizungssteuerung: Start: 01.03.2012 19:39:40, i_summe: 44, i_diff: 40, Status d_heizung: false, Ende: 01.03.2012 19:39:40
Heizungssteuerung: Start: 01.03.2012 20:05:23, i_summe: 39, i_diff: 90, Status d_heizung: false, Ende: 01.03.2012 20:05:24
Heizungssteuerung: Start: 01.03.2012 20:09:10, i_summe: 38, i_diff: 60, Status d_heizung: false, Ende: 01.03.2012 20:09:11
Heizungssteuerung: Start: 01.03.2012 20:22:45, i_summe: 38, i_diff: 49, Status d_heizung: false, Ende: 01.03.2012 20:22:46
Heizungssteuerung: Start: 01.03.2012 20:24:53
Heizungssteuerung: Start: 01.03.2012 20:27:51, i_summe: 27, i_diff: 48, Status d_heizung: false, Ende: 01.03.2012 20:27:51
Heizungssteuerung: Start: 01.03.2012 20:30:33, i_summe: 27, i_diff: 162, Status d_heizung: false, Ende: 01.03.2012 20:30:33
Heizungssteuerung: Start: 01.03.2012 20:35:16
Heizungssteuerung: Start: 01.03.2012 20:35:16, i_summe: 18, i_diff: 11, Status d_heizung: true, Ende: 01.03.2012 20:35:16

Wie man sehen kann ist das Ding gerade endlich ausgegangen. Ich heize jetzt noch noch mal was hoch, wenn sie dann wieder anspringt, dann hast du es wohl wirklich vollbracht! Dann schick mir bitte einfach noch mal den debug-bereinigten script!

[mrMuppet]

Hmmm... jetzt springt es leider wieder nicht an!

Heizungssteuerung: Start: 01.03.2012 20:35:16, i_summe: 18, i_diff: 11, Status d_heizung: true, Ende: 01.03.2012 20:35:16
Heizungssteuerung: Start: 01.03.2012 20:38:19, i_summe: 16, i_diff: 42, Status d_heizung: true, Ende: 01.03.2012 20:38:19
Heizungssteuerung: Start: 01.03.2012 20:46:03, i_summe: 57, i_diff: 70, Status d_heizung: true, Ende: 01.03.2012 20:46:04

die 10 Min. sind doch wohl um....

[anli]

Hmmm... jetzt springt es leider wieder nicht an!

Heizungssteuerung: Start: 01.03.2012 20:35:16, i_summe: 18, i_diff: 11, Status d_heizung: true, Ende: 01.03.2012 20:35:16
Heizungssteuerung: Start: 01.03.2012 20:38:19, i_summe: 16, i_diff: 42, Status d_heizung: true, Ende: 01.03.2012 20:38:19
Heizungssteuerung: Start: 01.03.2012 20:46:03, i_summe: 57, i_diff: 70, Status d_heizung: true, Ende: 01.03.2012 20:46:04

die 10 Min. sind doch wohl um....

Nein, Du musst auch schauen, wann i_summe das erste Mal über 20 gegangen ist...
Wie viele Stellantriebe sind momentan in die Berechnung (das Programm) einbezogen?

Code: Alles auswählen

if ((i_summe <= 20) && (!d_heizung_state.State())) {
  d_heizung_state.State(true);
}
if ((i_summe >= 30) && (i_diff > 600) && (d_heizung_state.State())) {
  d_heizung_state.State(false);
}

Der Code funktioniert wie folgt:
Wenn i_summe <= 20 und d_heizung_state false ist, dann wird d_heizung_state auf true gesetzt. Gleichzeitig beginnen die 10 Minuten von vorne zu laufen.
Wenn i_summe >= 30 und die letzte Schaltung von d_heizung auf true länger als 10 Minuten her und d_heizung_state auf true, dann setze d_heizung_state auf false.
Das Problem ist, dass i_summe abhängig von der Anzahl in die Berechnung einbezogener Stellantriebe ist. D. h. Du musst eventuell bei weniger Stellantrieben die Zeilen anpassen und 20 bzw. 30 niedriger wählen. Welche Werte das sein könnten, kannst Du individuell im debug ablesen. Aus den obigen Zeilen könnte man ableiten dass 15 bzw. 25 gute Werte sein könnten. Wenn Du weitere Stellantriebe in die Steuerung aufnimmst, müsstest Du das verändern.
Hier mal eine Debug-freie Version (die Zeilen für das debug sind nur auskommentiert, so dass man es auch wieder anschalten könnte, indem man das Ausrufezeichen davor entfernt):

Code: Alles auswählen

    !vor den kommenden drei Zeilen deaktiviert Debugging
    !object o_debug = dom.GetObject("Programmausfuehrung debug");
    !string s_debug = "Heizungssteuerung: Start: " # system.Date("%d.%m.%Y %T");
    !var vts = o_debug.State(s_debug);

    object o_waermeanforderung = dom.GetObject("Waermeanforderung");
    object d_heizung = dom.GetObject("HeizungMain");

    ! Stellantriebe aus dem WebUI-Programm abfragen
    object o_prg = dom.GetObject($this$);
    integer i_count=0;
    integer i_summe=0;
    string s_address;
    object o_dp_err;
    object o_chn;
    object o_dp = dom.GetObject(o_prg.Rule().RuleCondition(0).CndSingleCondition(i_count).LeftVal());

    while (o_dp) {
      o_chn = dom.GetObject(o_dp.Channel());
      s_address = o_chn.Address();
      o_dp_err=dom.GetObject("BidCos-RF." # s_address # ".ERROR");
      if (o_dp_err.Value() == 0) {
        i_summe = i_summe + o_dp.Value();
      }
      i_count = i_count + 1;
      o_dp = dom.GetObject(o_prg.Rule().RuleCondition(0).CndSingleCondition(i_count).LeftVal());
    }

    ! Heizung bei Bedarf schalten
    object d_heizung_state = dom.GetObject("BidCos-RF." # d_heizung.Address() # ":1.STATE");
    time t_timestamp = d_heizung_state.Timestamp();
    time t_now = system.Date("%Y-%m-%d %H:%M:%S").ToTime();
    integer i_diff = t_now.ToInteger() - t_timestamp.ToInteger();

    !vor der kommenden Zeile deaktiviert Debugging
    !s_debug = s_debug # ", i_summe: " # i_summe.ToString() # ", i_diff: " # i_diff.ToString() # ", Status d_heizung: " # d_heizung_state.State().ToString();
    var vts = o_debug.State(s_debug);
    if ((i_summe <= 20) && (!d_heizung_state.State())) {
      d_heizung_state.State(true);
    }
    if ((i_summe >= 30) && (i_diff > 600) && (d_heizung_state.State())) {
      d_heizung_state.State(false);
    }

    ! Wärmeanforderung aktualisieren
    if (o_waermeanforderung.State() != i_summe) {
      o_waermeanforderung.State(i_summe);
    }

    !vor der kommenden Zeile deaktiviert Debugging
    !var vts = o_debug.State(s_debug # ", Ende: " # system.Date("%d.%m.%Y %T") # "\n");

[mrMuppet]

Nein, Du musst auch schauen, wann i_summe das erste Mal über 20 gegangen ist...

Geht es da nicht ums ausschalten? also bei <=20 heizung aus und bei >=30 Heizung an?

Also jetzt ist die Heizung auf jeden Fall schon lange zeit (>1h) aus und meine Werte sind:
Heizungssteuerung: Start: 01.03.2012 23:08:59, i_summe: 30, i_diff: 59, Status d_heizung: true, Ende: 01.03.2012 23:09:00
Da sollte die Heizung doch auf jeden Fall an gehen, oder?

Ich habe jedenfalls 3 Stellantriebe und hatte sogar intuitiv schon mal so auf 15/25 eingestellt. Passt ja dann ganz gut.

Irgendwas stimmt noch nicht mit der Wartezeit. Ich hab gerade noch mal mein Systemlog angeschaut, da lasse ich gerade auch mal den Schaltzustand von HeizungMain eintragen:
23:05:56 01.03.2012 HeizungMain Schaltzustand: ein
23:08:00 01.03.2012 HeizungMain Schaltzustand: ein
23:09:00 01.03.2012 HeizungMain Schaltzustand: ein
23:10:31 01.03.2012 HeizungMain Schaltzustand: ein
23:11:48 01.03.2012 HeizungMain Schaltzustand: ein
23:12:46 01.03.2012 HeizungMain Schaltzustand: ein


Das verstehe ich jetzt so, dass die Heizung einfach so oft "wieder" ausgeschaltet wird, dass die Pausezeit von 10 Minuten gar nicht erreicht wird.

Jetzt habe ich mal den Pause-faktor "&& (i_diff > 600)" rausgenommen und dann passiert folgendes:

23:14:38 01.03.2012 HeizungMain Schaltzustand: ein, Schaltzustand: aus
-> Die Heizung geht an!


P.S. und natürlich nicht von meinen invertierten Schaltzuständen bei HeizungMain irritieren lassen...

[anli]

Nein, Du musst auch schauen, wann i_summe das erste Mal über 20 gegangen ist...

Geht es da nicht ums ausschalten? also bei <=20 heizung aus und bei >=30 Heizung an?

Richtig. Nur wie Du unten feststellst, wird die Heizung jedes Mal bei i_summe <= 20 auf aus gesetzt. Dadurch beginnt das Zeitintervall jedes Mal neu zu laufen.

Also jetzt ist die Heizung auf jeden Fall schon lange zeit (>1h) aus und meine Werte sind:
Heizungssteuerung: Start: 01.03.2012 23:08:59, i_summe: 30, i_diff: 59, Status d_heizung: true, Ende: 01.03.2012 23:09:00
Da sollte die Heizung doch auf jeden Fall an gehen, oder?

Nein, weil die Differenz noch nicht stimmt (i_diff ist 59, müsste aber über 600 sein, bevor die Heizung schaltet).

Irgendwas stimmt noch nicht mit der Wartezeit. Ich hab gerade noch mal mein Systemlog angeschaut, da lasse ich gerade auch mal den Schaltzustand von HeizungMain eintragen:
23:05:56 01.03.2012 HeizungMain Schaltzustand: ein
23:08:00 01.03.2012 HeizungMain Schaltzustand: ein
23:09:00 01.03.2012 HeizungMain Schaltzustand: ein
23:10:31 01.03.2012 HeizungMain Schaltzustand: ein
23:11:48 01.03.2012 HeizungMain Schaltzustand: ein
23:12:46 01.03.2012 HeizungMain Schaltzustand: ein


Das verstehe ich jetzt so, dass die Heizung einfach so oft "wieder" ausgeschaltet wird, dass die Pausezeit von 10 Minuten gar nicht erreicht wird.

Richtig. Kannst Du den Status der drei Stellantriebe noch einmal mitloggen?

[mrMuppet]

Hallo Anli,

ich wollte mich jetzt noch mal zurückmelden: Ich betreibe die Heizung jetzt ohne die 10 Minuten Wartezeit, und meiner Erfahrung nach funktioniert das auch ganz gut. Schon durch die Trägheit der Stellmotoren und die Unterschneidung der Wärmeanforderungs-temperaturen (30% und 20%) wird ganz gut verhindert, dass die Heizung zu schnell an und aus geht.
Trotzdem würde ich gerne wissen, was der Fehler in meiner Programmierung ist. Vielleicht sorgt der Fehler ja auch für andere, bisher von mir verborgen gebliebene Effekte (z.B. erhöhter Batterieverbrauch oder sowas).

Code: Alles auswählen

20.03.2012 21:48:52	Wa	29.000000
20.03.2012 21:51:21	Heizung Steller Küche	Ventilantrieb Status 14%, Kein Fehler
20.03.2012 21:51:22	Wa	28.000000
20.03.2012 21:51:22	HeizungMain	Schaltzustand: aus
20.03.2012 21:51:37	Heizung Steller Bad	Ventilantrieb Status 0%, Kein Fehler
20.03.2012 21:51:38	HeizungMain	Schaltzustand: aus
20.03.2012 21:53:36	Heizung Steller Wohnzimmer	Ventilantrieb Status 14%, Kein Fehler
20.03.2012 21:53:38	HeizungMain	Schaltzustand: aus
20.03.2012 21:54:16	Heizung Steller Bad	Ventilantrieb Status 0%, Kein Fehler
20.03.2012 21:54:17	HeizungMain	Schaltzustand: aus
20.03.2012 21:55:37	Heizung Steller Küche	 Ventilantrieb Status 14%, Kein Fehler
20.03.2012 21:55:37	HeizungMain	Schaltzustand: aus
20.03.2012 21:56:41	Heizung Steller Bad	Ventilantrieb Status 0%, Kein Fehler
20.03.2012 21:56:42	HeizungMain	Schaltzustand: aus
20.03.2012 21:58:26	Heizung Steller Wohnzimmer	Ventilantrieb Status 14%, Kein Fehler
20.03.2012 21:58:27	HeizungMain	Schaltzustand: aus
20.03.2012 21:58:52	Heizung Steller Bad	Ventilantrieb Status 0%, Kein Fehler
20.03.2012 21:58:53	HeizungMain	Schaltzustand: aus
20.03.2012 22:01:01	Heizung Steller Küche	 Ventilantrieb Status 12%, Kein Fehler
20.03.2012 22:01:02	Wa	26.000000
20.03.2012 22:01:02	HeizungMain	Schaltzustand: aus
20.03.2012 22:01:52	Heizung Steller Bad	Ventilantrieb Status 0%, Kein Fehler
20.03.2012 22:01:53	HeizungMain	Schaltzustand: aus
20.03.2012 22:03:22	Heizung Steller Wohnzimmer	Ventilantrieb Status 12%, Kein Fehler
20.03.2012 22:03:24	Wa	24.000000
20.03.2012 22:03:24	HeizungMain	Schaltzustand: aus
20.03.2012 22:04:36	Heizung Steller Bad	Ventilantrieb Status 0%, Kein Fehler
20.03.2012 22:04:37	HeizungMain	Schaltzustand: aus
20.03.2012 22:05:24	HeizungMain	Schaltzustand: ein
20.03.2012 22:05:29	Heizung Steller Küche	Ventilantrieb Status 12%, Kein Fehler
20.03.2012 22:05:30	HeizungMain	Schaltzustand: ein
20.03.2012 22:07:07	Heizung Steller Bad	Ventilantrieb Status 0%, Kein Fehler
20.03.2012 22:07:08	HeizungMain	Schaltzustand: ein
20.03.2012 22:08:25	Heizung Steller Wohnzimmer	Ventilantrieb Status 0%, Kein Fehler
20.03.2012 22:08:26	Wa	12.000000
20.03.2012 22:08:26	HeizungMain	Schaltzustand: ein

Vielleicht kannst Du ja mit diesem Log den Fehler einkreisen!


Gruß
mrMuppet