Waschmaschine Trockner Fertigmeldung mit Verbrauch in FHEM

andy20gg

Hallo FHEM freunde,

ich habe folgende einfache DOIF Lösung zur Überwachung der Waschmaschine gebastelt:

Code

defmod WaschmaschineBetriebCheck DOIF ([WASCHMASCHINE_PM:power]>6) \
(set WaschmaschineBetrieb on) DOELSEIF ([WASCHMASCHINE_PM:power]<5) \
(set WaschmaschineBetrieb off;; \
set telebot message "Die Waschmaschine ist fertig";;)
attr WaschmaschineBetriebCheck event-on-change-reading state
attr WaschmaschineBetriebCheck wait 60:300

das funktionier soweit wunderbrar und sendet mir eine telegram Message sobald die WM fertig ist ausserdem hab ich einen status Dummy "WaschmaschineBetrieb" den ich zwecks Anzeige verwenden kann.

Jetzt möchte ich aber gerne am ende des Waschgangs den Verbrauchten Strom ermitteln, dazu muss ich den Zählerstand des shelly1pm´s am anfang und ende des Waschvorgangs speichern. "87insane" hat das bereits umgesetzt und möchte gerne Wissen wie. Um das für andere User zu dokumentieren gibts jetzt diesen Thread

Hier ein Screenshot wie das beim Trockner von "87insane" ausschaut:

Der Inhalt kann nicht angezeigt werden, da Sie keine Berechtigung haben, diesen Inhalt zu sehen.

87insane

Hey und guten Abend. Leider habe ich das nicht eher geschafft, aber es auch nicht vergessen.

Du hast im Template des shelly sogar mehr als du ahnst. Das diof für laufende maschine wird damit überflüssig. Die userreadings zeigen auch die Energieberechnung auf. Ich melde mich morgen nochmal wenn ich am pc sitze.

Am besten sendest du ein raw des shellys aus fhem. Dann kann man schon mal sehen was ggf fehlt oder noch angepasst werden sollte. 3/4 der Arbeit hat's du ja schon.

Gruß,

Kai

andy20gg

Hallo Kai,

ich hab bei mir das Device "WASCHMASCHINE_PM" selbst definiert aber ich hab auch ein vom MQTT2 definiertes gerät da welches ich mit deinem Template versehen hab:

Code

defmod MQTT2_shelly1pm_34AB953806E9 MQTT2_DEVICE shelly1pm-34AB953806E9
attr MQTT2_shelly1pm_34AB953806E9 comment To get appropriate loadState values: Change the default limit "100" in readingList to your needs.
attr MQTT2_shelly1pm_34AB953806E9 devStateIcon {my $onl = ReadingsVal($name,'online','false') eq 'false'?'10px-kreis-rot' : ReadingsVal($name,'new_fw','false') eq 'true' ? '10px-kreis-gelb' : '10px-kreis-gruen';; my $light = ReadingsVal($name,'state','off');; my $cons = ReadingsVal($name,'relay_0_power','unknown');; my $total = ReadingsVal($name,'relay_0_kWh','unknown');; my $temp = ReadingsVal($name,'temperature','-100');; "<a href=\"http://".ReadingsVal($name,'ip','none')." \"target=\"_blank\">".FW_makeImage($onl)."</a> <a href=\"/fhem?cmd.dummy=set $name toggle&XHR=1\">".FW_makeImage($light)."</a><div>Verbrauch: $cons / Total: $total/ Temp: $temp °C</div>"}
attr MQTT2_shelly1pm_34AB953806E9 model shelly1_w_energy_measuring
attr MQTT2_shelly1pm_34AB953806E9 readingList shellies/shelly1pm-34AB953806E9/relay/0:.* {{ state => $EVENT, relay0 => $EVENT}}\
shellies/shelly1pm-34AB953806E9/input/0:.* input0\
shellies/shelly1pm-34AB953806E9/online:.* online\
shellies/announce:.* { $EVENT =~ m,..id...shelly1pm-34AB953806E9...mac.*, ? json2nameValue($EVENT) : return }\
shellies/shelly1pm-34AB953806E9/announce:.* { json2nameValue($EVENT) }\
shellies/shelly1pm-34AB953806E9/relay/0/power:.* relay_0_power\
shellies/shelly1pm-34AB953806E9/relay/0/power:.* { my $compare = $EVTPART0 < 100 ? 'off':'on';; ReadingsVal($NAME,'loadState','off') ne $compare ? { loadState => $compare } : return }\
shellies/shelly1pm-34AB953806E9/temperature:.* temperature\
shellies/shelly1pm-34AB953806E9/temperature_f:.* {}\
shellies/shelly1pm-34AB953806E9/input_event/0:.* { json2nameValue($EVENT) }\
shellies/shelly1pm-34AB953806E9/overtemperature:.* overtemperature\
shellies/shelly1pm-34AB953806E9/relay/0/energy:.* { relay_0_energy => $EVENT, relay_0_kWh => sprintf("%.2f",$EVENT/60/1000)}\
shellies/shelly1pm-34AB953806E9/longpush/0:.* longpush_0\
shellies/shelly1pm-34AB953806E9/command:.* command\
shellies/shelly1pm-34AB953806E9/info:.* { json2nameValue($EVENT) }\
shellies/shelly1pm-34AB953806E9/temperature_status:.* temperature_status
attr MQTT2_shelly1pm_34AB953806E9 room MQTT2_DEVICE
attr MQTT2_shelly1pm_34AB953806E9 setList relay0:on,off,toggle shellies/shelly1pm-34AB953806E9/relay/0/command $EVTPART1\
toggle:noArg shellies/shelly1pm-34AB953806E9/relay/0/command toggle\
off:noArg shellies/shelly1pm-34AB953806E9/relay/0/command off\
on:noArg shellies/shelly1pm-34AB953806E9/relay/0/command on\
x_update:noArg shellies/shelly1pm-34AB953806E9/command update_fw\
x_mqttcom shellies/shelly1pm-34AB953806E9/command $EVTPART1
attr MQTT2_shelly1pm_34AB953806E9 setStateList on off toggle
attr MQTT2_shelly1pm_34AB953806E9 userReadings total_temp:loadState:.on { ReadingsNum($name,'relay_0_kWh',0) },wash:loadState:.off { ReadingsNum($name,'total',0) - ReadingsNum($name,'total_temp',0) },price:loadState:.off {sprintf("%.2f",ReadingsNum($name,'wash',1)*ReadingsNum('kWh_Price','state',0.30))},time:loadState:.off {strftime("%H:%M", localtime(ReadingsAge($name,'total_temp',0)-3600))}, relay_0_energy_total:relay_0_energy:.* monotonic {ReadingsNum($name,'relay_0_energy',0)}
attr MQTT2_shelly1pm_34AB953806E9 webCmd :

Alles anzeigen

was genau brauche ich daraus? Das user reading "loadState" scheint ja schon mal zu passen aber "wash" zeigt bei mir einen negativen Wert der mir auch noch etwas hoch erscheint.

87insane

Hey und guten Abend,

du hast quasi schon 90% deines Wunsches fertig

Die Zeile in readingList muss angepasst werden:

Code

shellies/shelly1pm-34AB953806E9/relay/0/power:.* { my $compare = $EVTPART0 < 100 ? 'off':'on';; ReadingsVal($NAME,'loadState','off') ne $compare ? { loadState => $compare } : return }\

Die 100 muss angepasst werden.

Wenn dort der korrkte "Schwellwert" drin steht (wie in deinem DOIF), wird schonmal angezeigt ob die Maschine läuft oder nicht.

Leider hast du die Readings rauß genommen aus dem RAW. Daher kann ich nicht sehen was drin steht.

Normal würde nun beim waschen mit dem korrekten Schwellwert, am Ende berechnet werden wie lange sie lief, wie teuer dies war usw.

Hier muss du vermutlich im Userreading (price) noch deinen Preis Dummy angeben oder aber die 0.30 anpassen.

Wenn das erledigt ist hast du alles in den Readings stehen und kannst dir das senden.

In Kurz zusammengefasst:

- Schwellert in readingList anpassen

- Richtigen Strompreis in userReadings "price" angeben

Ich bin gespannt auf dein Feedback.

Gruß,

Kai

andy20gg

Hey Kai,

vielen Dank für den Hinweis, habs jetzt soweit verstanden. Hatte aber dann doch Spaß daran es selbst umzusetzen indem ich den "energy" Wert beim start in ein dummy schreibe und beim stopp es wieder auslese und so den Verbrauch berechne:

Code

defmod WaschmaschineBetriebCheck DOIF ([WASCHMASCHINE_PM:power]>6) \
    (set WaschmaschineBetrieb on;;\
     {my $energy=ReadingsVal("WASCHMASCHINE_PM","energy","");;;; \
     fhem ("set WaschmaschineStart_energy $energy")}) \
DOELSEIF ([WASCHMASCHINE_PM:power]<5) \
    (set WaschmaschineBetrieb off;;\
     {my $energy_now=ReadingsVal("WASCHMASCHINE_PM","energy","");;;;\
     my $energy_start=ReadingsVal("WaschmaschineStart_energy","state","");;;;\
     my $verbrauch=($energy_now - $energy_start)/60/1000;;;;\
     $verbrauch=sprintf("%.2f",$verbrauch);;;;\
     fhem ("set Waschmaschine_Verbrauch $verbrauch");;;;\
     fhem ("set telebot message Die Waschmaschine ist fertig\nVerbrauch:$verbrauch kWh");;;;\
     fhem ("set telebot_alina message Die Waschmaschine ist fertig\nVerbrauch:$verbrauch kWh")};;)
attr WaschmaschineBetriebCheck event-on-change-reading state
attr WaschmaschineBetriebCheck room GERAETE,TELEBOT
attr WaschmaschineBetriebCheck wait 60:150

Alles anzeigen

Der Inhalt kann nicht angezeigt werden, da Sie keine Berechtigung haben, diesen Inhalt zu sehen.

viele Grüße

Andreas

Waschmaschine Trockner Fertigmeldung mit Verbrauch in FHEM

Ähnliche Themen

kalibrieren / nachstellen der Leistungsmessung

Shelly 3EM zeigt Scheinleistung statt Wirkleistung

Shelly zur Leistungsmessung und Schaltung auf der Hutschiene bei recht neuer Verkabelung

Shelly Pro 4PM - nur einen Eingang? 40A ?

Tags