Stromzähler per Sonoff ESP8266 auslesen

[RalfTh]

@chaot Das glaube ich nicht, weil mit Zeile 3 und respektive mit Zeile 18 abgefragt wird , wann sich der Monat, bzw. das Jahr ändert und das geschieht immer um 0:00.

Zeile 3 und 5 fragen "md" ab und das ist doppelt. Gleiches gilt für Zeile 18 und 20. Wobei ich mich Frage was "yd" soll. Ist das nicht eher "yr"??

Aber wie gesagt, ich selbst habe die komplette Logik im ioBroker. Das schützt mich auch vor solchen Dingen wie modifizierte Scriptanforderungen.

[Chaot]

@ralfth Ja, dein Script und die Logik funktioniert gut soweit ich das sehe und nochmals ganz herzlichen Dank dafür.

Aber das Script im Wemos interessiert mich, weil ich das versuche zu verstehen.
Fehlt die Zeile 4 beispielsweise schreibt der ständig den aktuellen Zählerstand in die smn, aktualisiert also immer solange der erste des Monats ist.

Zeile 20 dachte ich das das der erste Tag des Jahres ist, also yd. Ich bin mir aber nicht sicher ob der Ausdruck so funktioniert. Mit der Zeile 19 versuche ich das Problem aus Zeile 4 abzufangen.

[RalfTh]

@chaot Wie gesagt erschöpfen sich meine Kenntnisse auf die Skriptversion in Verbindung mit Tasmota 8.x

Ich habe das nicht weiterverfolgt. Vielleicht hilft dir die Doku weiter, bei deinem Projekt.

[Chaot]

@ralfth Danke dir. Dann werde ich mir das mal vorknöpfen. Solange dein Scrip super läuft ist das so eine Freizeitbeschäftigung.

[milanissimo]

@chaot said in Stromzähler per Sonoff ESP8266 auslesen:

@mattes1007
Danke!
Also mal festhalten für Tasmota ab Version 10:

#ifndef USE_SML_M
#define USE_SML_M
#endif
#ifndef USE_SML_SCRIPT_CMD
#define USE_SML_SCRIPT_CMD
#endif
#ifndef USE_SCRIPT_WEB_DISPLAY
#define USE_SCRIPT_WEB_DISPLAY
#endif

in der userconfiguration aktivieren.

#define SML_REPLACE_VARS

wird nicht benötigt und dann werden auch manche Werte nicht angezeigt.

Als Script funktioniert:

>D
rssi=0
s1="Tagesverbrauch: {m}<b><span style=>"
v2=0
hr=0
md=0
yr=0
;Strom
p:sm=0
sd=0
p:sma=0
smn=0
p:sya=0
syn=0
sspr=0.2353
yspr=0
ysgp=100.08
y€=0
 
>T
v2=SML#Total_in
rssi=Wifi#RSSI
 
>B
->sensor53 r

>S
;Tagesverbrauch
hr=hours
if chg[hr]>0
and hr==0
and v2>0
then
sm=v2
svars
endif
if upsecs%tper==0
then
sd=v2-sm
 
;Monatsverbrauch
md=day
if chg[md]>0
and md==1
and v2>0
then
sma=v2
svars
endif
if upsecs%tper==0
then
smn=v2-sma
endif
 
;Jahresverbrauch
yr=year
if chg[yr]>0
and hr==0
and md==1
and v2>0
then
sya=v2
svars
endif
if upsecs%tper==0
then
syn=v2-sya
 
;Kosten
yspr=syn*sspr+ysgp
endif
 
>J
,"Verbrauch Tag":"%sd%"
,"Verbrauch Monat":"%smn%"
,"Verbrauch Jahr":"%syn%"
,"Zählerstand 0:00Uhr":"%2sm%"
,"Zählerstand Monatsanfang":"%2sma%"
,"Zählerstand Jahrenanfang":"%2sya%"
,"Kosten dieses Jahr":"%2yspr%"
 
>W
WLAN Empfang: {m}%rssi%
==============
Tagesverbrauch:  {m} %2sd%  KWh
Monatsverbrauch: {m} %2smn% KWh
Jahresverbrauch: {m} %2syn% KWh
==============
Strom Preis/kWh:       {m} %4sspr% €
Strom Grundpreis:      {m} %2ysgp% €
--------------
Strom kosten lfd. Jahr:{m} %2yspr% €
==============
Strom Zählerstände:
aktuell:         {m} %2v2% KWh
0:00 Uhr:        {m} %2sm% KWh
Monatsanfang:    {m} %2sma% KWh
Jahresanfang:    {m} %2sya% KWh
==============
 
>M 1
+1,12,s,1,9600,SML
1,77070100010800ff@1000,Zählerstand,KWh,Total_in,2
;1,77070100020800ff@1000,Einspeisung,KWh,Total_out,2
1,77070100100700ff@1,Stromverbrauch,W,Power_curr,0
1,77070100100700ff@1000,Aktuell,kW,Actual_pow,3
1,=h=================|
1,77070100200700ff@1,Spannung L1,V,Volt_p1,1
1,77070100340700ff@1,Spannung L2,V,Volt_p2,1
1,77070100480700ff@1,Spannung L3,V,Volt_p3,1
1,=h=================|
1,770701001f0700ff@1,Strom L1,A,Ampere_p1,1
1,77070100330700ff@1,Strom L2,A,Ampere_p2,1
1,77070100470700ff@1,Strom L3,A,Ampere_p3,1
1,=h=================|
1,770701000e0700ff@1,Netzfrquenz,Hz,Freq,1
1,=h=================|
#

Wobei ich den Wert für den aktuellen Verbrauch in Zeile 105 und 107 doppelt habe. Einmal in Wh und in Zeile 107 in kWh. Der Wert in Wh wird nicht benötigt, da aber bei mir ein paar Scripte noch darauf basieren lasse ich den vorläufig drin.

Kann man optisch noch etwas anpassen, aber vorerst ganz brauchbar.

Hallo, möchte einmal ein riesen Dank da lassen. War als Neuling anfangs noch bisschen kompliziert mit den ganzen flashen und den Einstellung jedoch machbar als Laie. Habt ihr echt super gemacht.

Was ich gern noch mit im Skript hätte wäre die Zahlen zur Einspeisung äquivalent dem hier

Tagesverbrauch (Tageseinspeisung): {m} %2sd% KWh
Monatsverbrauch (Monatseinspeisung): {m} %2smn% KWh
Jahresverbrauch (Jahreseinspeisung) {m} %2syn% KWh

Strom Preis/kWh (Einspeisevergütung)/kWh): {m} %4sspr% €

Strom kosten (Einspeisevergütung) lfd. Jahr:{m} %2yspr% €

Strom (Einspeise)Zählerstände:
aktuell: {m} %2v2% KWh
0:00 Uhr: {m} %2sm% KWh
Monatsanfang: {m} %2sma% KWh
Jahresanfang: {m} %2sya% KWh

Habt da jetzt schon bisschen probiert bekomme es aber leider nicht hin, vielleicht könntest du das ja mal noch hinzufügen, ich wäre dir dafür sehr dankbar.

Als zweite Anmerkung, ist es möglich über das Skript hier den Wert von "1,77070100100700ff@1,Stromverbrauch,W,Power_curr,0" als Line-Protokoll über MQTT auszugeben sodass die InfluxDB diesen direkt verarbeiten kann?

vielen Dank schonmal im Voraus.

[Chaot]

@milanissimo Ich habe das noch nicht aktualisiert.
Um die Daten per MQTT in den ioBroker zu bekommen musst du beim Flashen der Firmware noch eine Option zusätzlich aktivieren:

#define USE_SCRIPT_JSON_EXPORT

Dadurch wird im Script die Sektion "J" aktiviert und per MQTT übertragen.
Für die Änderung des Ursprungsscripts um die Einspeisung zu erfassen habe ich keine konkrete Idee. Ich würde das vielleicht mal mit einem zweiten Satz Variablen probieren, aber da sind hier User die das vermutlich wesentlich besser mit den Scrips hinbekommen.
Wie man MQTT dazu bringt als Lineprotokoll Daten zu übertragen habe ich noch nie probiert. Dazu hatte ich leider noch nie Bedarf, da ich immer über den ioBroker gehe und da das als JSON angenommen wird.

[milanissimo]

@chaot said in Stromzähler per Sonoff ESP8266 auslesen:

@milanissimo Ich habe das noch nicht aktualisiert.
Um die Daten per MQTT in den ioBroker zu bekommen musst du beim Flashen der Firmware noch eine Option zusätzlich aktivieren:

#define USE_SCRIPT_JSON_EXPORT

Dadurch wird im Script die Sektion "J" aktiviert und per MQTT übertragen.
Für die Änderung des Ursprungsscripts um die Einspeisung zu erfassen habe ich keine konkrete Idee. Ich würde das vielleicht mal mit einem zweiten Satz Variablen probieren, aber da sind hier User die das vermutlich wesentlich besser mit den Scrips hinbekommen.
Wie man MQTT dazu bringt als Lineprotokoll Daten zu übertragen habe ich noch nie probiert. Dazu hatte ich leider noch nie Bedarf, da ich immer über den ioBroker gehe und da das als JSON angenommen wird.

Hallo, also das mit den Line-Protokoll hat sich erstmal erledigt. Hab mich da mit node Red jetzt bisschen beschäftigt. Wenn jedoch noch wer eine Idee hat wie man das im ESP mit Tasmota gleich macht, wäre ich auch dankbar. Bei Bedarf kann ich auch ne kleine Anleitung noch dazu geben für Dummies.

Also das mit den Einspeisewerten wäre noch klasse wenn das mal einer posten könnte.

[oberfragger]

Ich benutze derzeitig ein IR -> USB Kabel.
Habt ihr eine Idee wie ich das USB-Kabel (ohne zerschneiden) an einen NodeMCU anschliessen kann. Dann könnte ich ja den Krempel via Tasmota auslesen und dann via MQTT übertragen. Hintergrund: Habe sowieso noch einen NodeMCU mit BME680 und AM2320 an der gleichen Stlle installiert. So könnte ich ja auf dem Smartmeter Adapter verzichten.

Aber und an funktinierte der mal nach Updates/ Reboots nicht mehr so wie der sollte.

[milanissimo]

@chaot

Ich frag lieber nochmal vorher

#define USE_SCRIPT_JSON_EXPORT

ergänze ich in der user_config_override.h datei richtig?

[Chaot]

@milanissimo Ja dann wird das JSON erstelt

[milanissimo]

@chaot danke dir hat prima geklappt.

Ich hänge noch an einen letzten Punkt.

Ich hätte gern noch den Tageswert der Einspeisung, leider schreibt er einfach 0 Uhr den Zählerstand nicht.

0:00 UhrEins: {m} %2sme% KWh

>D
rssi=0
s1="Tagesverbrauch: {m}<b><span style=>"
v2=0
v3=0
hr=0
md=0
yr=0
;Strom
p:sm=0
p:sme=0
sd=0
sde=0
p:sma=0
smn=0
p:sya=0
syn=0
sspr=0.2599
yspr=0
ysgp=150.00
y€=0
 
>T
v2=SML#Total_in
v3=SML#Total_out
rssi=Wifi#RSSI
 
>B
->sensor53 r
 
>S
;Tagesverbrauch
hr=hours
if chg[hr]>0
and hr==0
and v2>0
then
sm=v2
svars
endif
if upsecs%tper==0
then
sd=v2-sm

;TagesverbrauchEins
hr=hours
if chg[hr]>0
and hr==0
and v3>0
then
sme=v3
svars
endif
if upsecs%tper==0
then
sde=v3-sme

[tobiasp]

@ralfth
Grüß dich danke für deine Mühe.
Grundpreis ist der Gesamtpreis (Grundgebühr im Jahr) oder?

[RalfTh]

@tobiasp Hallo
Ja, so habe ich das gemacht. Mir waren die Kosten am Ende des Abrechnungsjahres wichtiger als die genauen Monatskosten, deshalb als Einmalbetrag.

[RalfTh]

@milanissimo Hallo, ich bin jetzt nicht der Megaspezialist, aber das "p:" in Zeile 12 macht mich nachdenklich.

Gruß

[milanissimo]

@ralfth hallo Ralf, ich hab das einfach 1:1 vom Tagesverbrauch übernommen. Nur zum Verständnis was sagt das p: den aus? Habe es mal geändert mal sehen ob er 0:00 Uhr einen Wert schreibt. Danke für die Hilfe.

[RalfTh]

@milanissimo Hallo, so weit ich es noch in Erinnerung habe steht "p:" für permanent. Ich finde allerdings auf die Husche nicht die Dokumentation zum Scripting.

[milanissimo]

@ralfth war leider nicht des Rätsels Lösung :/, hatte auch nochmal alles Stromlos gemacht leider wird kein Wert geschrieben

[testpaul999]

@milanissimo
Ich denke das hiernach

……
if upsecs%tper==0
then
sd=v2-sm
endif
;

Gehört..
genauso nach der zweiten Berechnung.

[RalfTh]

@milanissimo Bei mir sieht das so aus:

if upsecs%tper==0{
sd=v2-sm
}

Allerdings habe ich auch nur eine ältere Tasmota-Version 8.1.0.4

In der aktuellen Dokumentation sieht es so aus wie bei dir, allerdings schließen diese eine If-Schleife mit einem endif

Das würde ich mal versuchen.

[milanissimo]

@ralfth hey also bei dem V2 Wert/Code wird ja 0:00 Uhr ja ein Wert geschrieben.

Tagesverbrauch
 hr=hours
 if chg[hr]>0
 and hr==0
 and v2>0
 then
 sm=v2
 svars
 endif
 if upsecs%tper==0
 then
 sd=v2-sm

Es wir nur leider bei der Einspeisung v3 kein Wert geschrieben.

;TagesverbrauchEins
 hr=hours
 if chg[hr]>0
 and hr==0
 and v3>0
 then
 sme=v3
 svars
 endif
 if upsecs%tper==0
 then
 sde=v3-sme