HM-Script zum Auslesen eines Varta Pulse Energiespeichers per xml

[chriwi]

Sofern hier jemand drüber stolpert. Es gibt eine inoffizielle JSON Schnittstelle meines Solarlogs, worüber ich meine drei benötigten Werte auslesen kann:

Code: Alles auswählen

!858: voltage, level, charge & discharge power of battery. Empty if no battery is connected.
var JSONObj = "\"Content-Type: application/json\" -d '{\"858\":null}' 192.168.xx.xx/getjp";
dom.GetObject("CUxD.CUX2801001:1.CMD_SETS").State("LD_LIBRARY_PATH=/usr/local/addons/cuxd /usr/local/addons/cuxd/curl -X POST -H +" # JSONObj);
dom.GetObject("CUxD.CUX2801001:1.CMD_QUERY_RET").State(1);
string response = dom.GetObject("CUxD.CUX2801001:1.CMD_RETS").State();
var value_varta_level = (response.StrValueByIndex(',',1)).StrValueByIndex(',').ToInteger();
var value_varta_charge = (response.StrValueByIndex(',',2)).StrValueByIndex(',').ToInteger();
var value_varta_discharge = (response.StrValueByIndex(',',3)).StrValueByIndex(',').ToInteger();
dom.GetObject("Varta_SOC").State(value_varta_level);
dom.GetObject("Varta_Charge").State(value_varta_charge);
dom.GetObject("Varta_Discharge").State(value_varta_discharge);

[Tyfys]

Code: Alles auswählen

var value_varta_level = (response.StrValueByIndex(',',1)).StrValueByIndex(',').ToInteger();
var value_varta_charge = (response.StrValueByIndex(',',2)).StrValueByIndex(',').ToInteger();
var value_varta_discharge = (response.StrValueByIndex(',',3)).StrValueByIndex(',').ToInteger();

Mir scheinen diese 3 Statements nicht ganz richtig zu sein.
Die Methode StrValueByIndex() erfordert lt. Doku 2 Parameter. [ string.StrValueByIndex(string separator, integer index);]
Das ist in diesen Teilen der Statements nicht gegeben : (response.StrValueByIndex(',', n )).StrValueByIndex(',').ToInteger();

auf der CCU2 mit aktueller Firmwareversion (2.61.7) läuft es jedenfalls nicht.

[chriwi]

Interessant- bei mir läuft es mit der 3.67

[MichaelN]

Interessant- bei mir läuft es mit der 3.67

Faszinierend.
Dröseln wir das mal auf:

Code: Alles auswählen

string response = "1test,2test,3test,4test,5test,6test,7test,8test";
var a =  (response.StrValueByIndex(',',2));
var b =  (response.StrValueByIndex(',',2)).StrValueByIndex(',',0);
!var c = (response.StrValueByIndex(',',2)).StrValueByIndex(',');
var d =  (response.StrValueByIndex(',',2)).StrValueByIndex(',').ToInteger(); 

Ergibt:

Code: Alles auswählen

[response          ](string ): 1test,2test,3test,4test,5test,6test,7test,8test
[a                 ](var-->string): 3test
[b                 ](var-->string): 3test
[c                 ]ScriptRuntimeError
[d                 ](var-->integer): 3

Wie korrekt bemerkt ist

Code: Alles auswählen

(response.StrValueByIndex(',',2)).StrValueByIndex(',')

kein valider Code, weil die Angabe für den Index fehlt.
Das führt dann bei der Zuweisung zu var c auch zu einem Error.

Interessanterweise wird dies aber durch

Code: Alles auswählen

.ToInteger()

"geheilt". Irgendwie wird dadurch der Wert 0 als Index übergeben und trotzdem (auch) noch die Umwandlung in Integer vorgenommen.
HM-Skript ist schon eine geile Sprache.

Aber @chriwi - was soll das doppelt StrValueByIndex bringen, was nicht auch ein syntaktisch korrektes

Code: Alles auswählen

response.StrValueByIndex(',',2).ToInteger();

bewirkt?

[Tyfys]

Interessanterweise wird dies aber durch

Code: Alles auswählen

.ToInteger()

"geheilt". Irgendwie wird dadurch der Wert 0 als Index übergeben und trotzdem (auch) noch die Umwandlung in Integer vorgenommen.

Auf (m)einer CCU2 klappt diese Wunderheilung nicht.

HC.png (11.73 KiB) 341 mal betrachtet

Die passende Fehlermeldung aus dem LOG:

Code: Alles auswählen

Feb 23 20:56:58 ccu2 local0.err ReGaHss: ERROR: ScriptRuntimeError: string response = "1test,2test,3test,4test,5test,6test,7test,8test"; var a =  (response.StrValueByIndex(',',2)); WriteLine(a); var b =  (response.StrValueByIndex(',',2)).StrValueByIndex(',',0); WriteLine(b); !var c = (response.StrValueByIndex(',',2)).StrValueByIndex(','); var d =  (response.StrValueByIndex(',',2)).StrValueByIndex(',').ToInteger();  WriteLine(d); WriteLine("Testende");  [ExecError():iseESPexec.cpp:12798]

HM-Skript ist schon eine geile Sprache.

HM-Skript ist schon eine geile eigenartige Sprache.

[MichaelN]

Möglich das es daran liegt, das die CCU2 auf einem älteren FW Stand (als die CCU3) ist.

[Tyfys]

Deine Aufdröselung hast du ja mit dem SDV gemacht.
Hast du das auch mal direkt auf der CCU3 gegengecheckt?

[[sprotte80]]

Hi

Interessanterweise wird dies aber durch

Code: Alles auswählen

.ToInteger()

"geheilt". Irgendwie wird dadurch der Wert 0 als Index übergeben und trotzdem (auch) noch die Umwandlung in Integer vorgenommen.

geheilt wird da nix.

Wenn du

Code: Alles auswählen

var d =  (response.StrValueByIndex(',',2)).StrValueByIndex(',').ToString();

schreibst dann bekommste sogar das 'richtige' Ergebnis

Hat aber nix mit übergabe eines Parameters durch .ToInteger zu tun

Laut badenpower ist durch das rumgedoktere am doppelparameter-Bug nun diese Erscheinung entstanden wo ein Fehler im Script durch anhängen einer weiteren Function eliminiert wird und ab der fehlerfreien weitergemacht wird.
Und .StrValueByIndex bietet noch weitere Bugs.

Thomas

[jp112sdl]

Laut badenpower

Hat er in dir ein Sprachrohr gefunden? Wie schön.

Und .StrValueByIndex bietet noch weitere Bugs.

Gelernt hast du ja schon von ihm.

Dann erwähne sie doch gleich, damit andere Leute nicht darüber stolpern.

Schade, dass du nicht mal deiner eigenen Signatur treu bleibst

sig.png (784 Bytes) 300 mal betrachtet

[MichaelN]

Hast du das auch mal direkt auf der CCU3 gegengecheckt?

Ja