Script für Shelly Pro3EM Nullpunkteinspeisung

// Konfiguration
let Regelzeit = 10000; 	// z.B. relekt alle 10 Sekunden nach
const REGLER_URL = "http://<ip>/rpc/";

// interne globale Variablen
let LetzteLast = 0;	// aktuelle Heizlast

// Reglerlogik
function updatePower(P_ist) {
	let Last = 0;
	let url = "";
	//
	// die aktuelle Heizlast abrechnen um die teoretische Einspeiung zu berechnen
	// 
	let P_netto = P_ist - LetzteLast;
	if (p_netto > 0) {
		// Verbrauch ist zu hoch ==> Heizstab aus
		Last = 0;
		url = REGLER_URL+"Light.Set?id=0&on=false";
	} else {
		Last = -P_netto;
		Last = Math.min(Math.max(0, Last), Last_Max);
		let Stellglied = Last * 10 / Last_Max;
 		// evtl. runden mit Math.round() je nachdem was der Dimmer für Werte erwartet
		url = REGLER_URL+"Light.Set?id=0&on=true&brightness="+Stellglied;
	}
	// Nur ein Steuerbefehl absetzen, wenn sich wirklich was geändert hat
	if (LetzteLast != Last) {
	        print("sende:"+url );
        	Shelly.call("HTTP.GET",
        	      { url: url },
	              function (res, error_code, error_msg, ud) {
        	          if (error_code == 0) {
	                    print("Regler ist angepasst.");
        	          } else {
                	    print(error_code+" "+error_msg);
	                  }
        	      },
	              null);
	}
	LetzteLast = Last;
}

// Einbindung in das System
// UpdatePower wird jedesmal getriggert, wenn sich die Gesamtleistung ändert
Shelly.addStatusHandler(
  function (event, ud) {
    if (event.component=="em:0") {
      if (event.delta.hasOwnProperty("total_act_power")) {
        updatePower(event.delta.total_act_power);
      }
    }
  }
);

on({ id: [].concat(['alias.0.Aktueller_Verbrauch']), change: 'ne' }, async (obj) => {
  let value = obj.state.val;
  let oldValue = obj.oldState.val;
  if (getState('alias.0.Aktueller_Verbrauch').val < 0 && getState('mqtt.0.Heizung.Temperatur_WW.Temperatur_WW').val < 60) {
    // Zirkulation an
    setState('shelly.0.shelly1minig3#543204602a88#1.Relay0.Switch' /* Schalter */, true);
    // Awtrix Anzeige an
    setState('awtrix-light.0.apps.heizstab.visible' /* Sichtbar */, true);
    // Heizstab an
    setState('shelly.0.shelly0110dimg3#8cbfeaa4c68c#1.Light0.Switch' /* Schalter */, true);
    // Sollwert setzen
    setState('pid.0.C-Ueberschussregler.in.set' /* set point */, (-20));
    // Leistung regeln
    setState('pid.0.C-Ueberschussregler.in.act' /* actual value */, getState('alias.0.Aktueller_Verbrauch').val);
    setState('shelly.0.shelly0110dimg3#8cbfeaa4c68c#1.Light0.Brightness' /* Helligkeit */, (Math.round(getState('pid.0.C-Ueberschussregler.out.y').val)));
  } else {
    // Heizstab aus
    setState('shelly.0.shelly0110dimg3#8cbfeaa4c68c#1.Light0.Switch' /* Schalter */, false);
    setState('pid.0.C-Ueberschussregler.in.rst' /* reset controller */, true);
    // Awtrix Anzeige aus
    setState('awtrix-light.0.apps.heizstab.visible' /* Sichtbar */, false);
  }
});