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);
      }
    }
  }
);