[gelöst]Tasmota auf WEMOS Mini mit Reedkontakt - Probleme?

[Lenny.CB]

Als Pullup Widerstand habe ich jetzt ein 10k zwischen gpio und vcc (5v) ist das so korrekt?

Den ReedKontakt bring ich so an das er unter den letzten Zahlenrad am Gaszähler Sitz oder?

habs nicht mehr genau im Kopf, aber der Magnet sitzt bei den meisten Gas-Zähler in der 2. Nachkommastelle

[milanissimo]

@lenny-cb

Hat alles prima geklappt, ich danke dir 1000 mal.

Ich habe weiter oben gesehen du hattest auch mal den Verbrauch pro Stunde. Ich würde gern den Verbrauch pro Minute in meine InfluxDB schreiben und diesen per Graph in Grafana visualisieren.

;Minutenverbrauch
sec=seconds
if chg[sec]>0
and sec==0
then
smsec=s1
svars
endif
if upsecs%tper==0
then
ssms=s1-smsec
endif

Leider wird wird mir immer nur der aktuelle Zählerstand angezeigt bei "ssms". Hast du ne Idee was ich falsch mache?

[Lenny.CB]

Leider wird wird mir immer nur der aktuelle Zählerstand angezeigt bei "ssms". Hast du ne Idee was ich falsch mache?

zeig mal das ganze Script.

[milanissimo]

>D
p:m1=0
p:m2=0
s1=0
s2=0
g1=0
g2=0
h1=0
h2=0
hkw1=0
hkw2=0
gkw1=0
gkw2=0
skw1=0
skw2=0
sspr=0.095
ysgp=0.411
yspr=0
yapp=0
p:smsec=0
smseb=0
ssms=0

 
hr=0
mi=0
sec=0
zu=0.9290
br=11.237
farbe1="#008000"
farbe2="#f00000"
farbe3="#00fdfd"
 
>B
->sensor53 r
tper=10
 
>S
h1=s1-m1
h2=s2-m2
hkw1=h1*br*zu
hkw2=h2*br*zu
gkw1=g1*br*zu
gkw2=g2*br*zu
skw1=s1*br*zu
skw2=s2*br*zu
 
hr=hours
if chg[hr]>0
 and hr==0
  then
   m1=s1
   m2=s2
   g1=h1
   g2=h2
   svars
endif

;Minutenverbrauch
sec=secs
if chg[sec]>0
and sec==0
then
smsec=s1
smseb=ssms
svars
endif
if upsecs%tper==0
then
ssms=s1-smsec
endif


;Kosten
yspr=hkw1*sspr+ysgp
yapp= gkw1*sspr+ysgp
endif

 
if upsecs%tper==0{
=>Publish tele/%topic%/SENSOR {"Haus1":{"Verbrauch heute kWh":%2hkw1%}}
=>Publish tele/%topic%/SENSOR {"Haus1":{"Verbrauch gestern kWh":%2gkw1%}}
}
 
>T
s1=GAS1#Stand_Haus1
 
>W
Zustandszahl: {m} %zu%
Brennwert: {m} %br% kWh/m³
Kosten heute/ gestern: {m} %2yspr% €  | %2yapp% €
=========================
Haus 1:
Verbrauch Minute: {m} %2ssms% kWh
Verbrauch MinuteZusammen: {m} %2smseb% kWh
Verbrauch heute: {m} %2h1% m³ | %2hkw1% kWh
Verbrauch gestern: {m} %2g1% m³ | %2gkw1% kWh
Verbrauch gesamt: {m} %2s1% m³ | %2skw1% kWh
=========================
 
>M 2
+1,0,c,1,-25,GAS1
1,1-0:1.8.0*255(@100,Zählerstand Haus1,m³,Stand_Haus1,18
2,=h=========================
#

[Lenny.CB]

@milanissimo sagte in [gelöst]Tasmota auf WEMOS Mini mit Reedkontakt - Probleme?:

if upsecs%tper==0

warum rechnest du nochmal in dem Block?
Mache alles in dem Block darüber (Minutenverbrauch).

[Ralf Schrade]

@oberfragger
Könntest Du mir wohl das Script für deinen Zähler zur Vrefügung stellen, ich bastel da schon seit Tagen herum, bekomme es aber einfach nicht hin. Scripting Tasmota ist vorhanden, der Counter läuft, allerdings aktualisiert der
Verbrauchszählerstand nicht
Schon mal besten Dank

Ralf

[Marty56]

Bei welchem Wert laufen die Counter eigentlich über?

[Marty56]

@stratos-gkrekidis
Hallo,

Ich habe dein Script übernommen. Es funktioniert, aber erzeugt bei meine Zähler relativ viele MQTT Botschaften, weil der S0 Bus sehr oft triggert.

Ist es möglich, die MQTT Botschaften zu reduzieren und nur jeden 10 Impuls als Counterwert zu übertragen?

[Marty56]

@stratos-gkrekidis Du nimmst einen Switch, um damit einen Counter hochzuzählen.
Ich habe versucht, direkt den Counter an den GPIO Pin zu konfigurieren und das führt dazu, dass der Counter mehr Pulse zählt als tatsächlich vorhanden sind.
Es scheint, dass durch die Konfigurierung der Trigger verändert wird.

Stimmt das? ich habe dazu nichts gefunden. Könntest Du mir da einen Tipp geben.

[danzlrobert]

@stratos-gkrekidis said in [gelöst]Tasmota auf WEMOS Mini mit Reedkontakt - Probleme?:

@Sandmanyz

Mein Sensor ist mit dem D1-Pin auf meiner WEMOS verbunden und als Switch1 konfiguriert. dann wird Counter1 auf einem anderen, nicht verwendeten Pin ausgewählt [in meinem Fall: D5] - es ist nur ein Platzhalter für Zahlen.

Dann habe ich in der Konsole eingegeben:

switchmode1 1
counter1 <Geben Sie hier den Anfangszählerwert ein>
rule1 on switch1#state=0 do Counter1 +1 endon
rule1 5
rule1 1

Ein reboot und fertig.

im iobroker findest du noch ein POWER und ein counter state

Grüße aus Griechenland.

Hallo,
das ganze klingt sehr einfach, versteh nicht ganz wie du das ganze verkabelst und einstellst. Hättest du bitte eine Anschlußzeichnung des Kontaktes und wie du die GPIO eingestellt hast. Würde gerne einen Relaisekontakt auswerten.
Vielen vielen Dank für deine Hilfe!

[Takahara]

This post is deleted!

[truderinger]

@lenny-cb

Guten Morgen,

ich bin gerade dabei mich in Tasmota einzuarbeiten und fand obig genannte Scriptlösung für mein Projekt mit Reed-Kontakt-Wasserdurchlaufuhr. Wäre es vielleicht möglich, auch mir das Script zukommen zu lassen? Eine Anleitung zum ganzen Vorgang gibt es zufälligerweise nicht?

Wäre toll.

Danke vorab und schönes WE.

[marhal]

Hallo alle zusammen,

Das ist ja echt eine Supersache und ich wollte das gleich auf mein ESP32-Eth01 mit Tasmota auch ausprobieren. Habe am GPIO 2 mein Reedkontakt.
Aber wenn ich versuche das Script auszuführen bekomme ich nur folgende Fehler. Kann mir da jemand auf die Sprünge helfen ? bin da nicht so firm drin.

Danke für eure Hilfe

Gruß
Marhal

[bahnuhr]

@marhal

Screenshot unleserlich.

[marhal]

@bahnuhr Danke für den Hinweis....

Die Fehler Meldung lautet: BRY: Exeption> 'syntaxerror' - input:1: unexpected symbol near '>'

Vielleich ist das so besser.

Gruß
Marhal

[MikeCC]

@stratos-gkrekidis
Dein Lösung funktioniert super.
Ich habe nun zusätzlich an meinen D1 mini einen IR-Lesekopf für meinen Stromzähler angeschlossen.
Dadurch musste ich Tasmota mit SML selber kompilieren. Für SML muss jedoch Scripting Languages genutzt werden. Die Rules kann man dann wohl nicht mehr verwenden.

Weißt du oder jemand anderes hier, wie meine deine Lösung als Tasmota Script abbilden kann?

[Mike71]

@milanissimo
Hi, ich hätte auch Interese an dem Script mit funktionierender Kostenrechnung.

Hab soweit alles hinbekommen Firmware Compilierung mit Script aktivierung.
Reed Kontak mit Wemos D1 Mini am Gaszähler zählt und erscheint in TasmotaWeb.
Nur bei dem Scripten hab ich nen knoten im Kopf lese schon seit Tagen die Scripting Language auf und ab auf Github ... denke ich werd einfach zu alt ;-),
daher wäre ich für die Hilfe bzw. fürs bereitstellen eines funktionierenden Scriptes sehr Dankbar.

[lemonbiter]

@Stratos-Gkrekidis und
@Sandmanyz

ich habe leider nicht verstanden, was genau ihr macht. Und da es bei mir mit dem Zählen noch nicht läuft, will ich gerne auch Eure Lösung "einbauen" / bzw nachbauen.

In meinem Fall ist der Zähler am D1Mini an D7 angeschlossen als Zähler. (mit 10 kOhm gegen 3,3V) Module Parameter /ModuleType von Tasmota ist Generic0 und GPIO 13 ist auf Counter, 1 gestellt

Könntet Ihr so nett sein und mir für DUMMIES erklären, was ich also noch machen soll, das was Stratos schreibt scheint ja einigen geholfen zu haben, aber ich verstehe es nicht
Vielleicht könntet Ihr so nett sein, mir ein paar Screens Eurer Tasmota Einstellungen hier einstellen und dann den Rest in Worte, die ich als nicht so erfahrener User verstehe, packen??

Danke
LEM

@stratos-gkrekidis sagte in [gelöst]Tasmota auf WEMOS Mini mit Reedkontakt - Probleme?:

@Sandmanyz

Mein Sensor ist mit dem D1-Pin auf meiner WEMOS verbunden und als Switch1 konfiguriert. dann wird Counter1 auf einem anderen, nicht verwendeten Pin ausgewählt [in meinem Fall: D5] - es ist nur ein Platzhalter für Zahlen.

Dann habe ich in der Konsole eingegeben:

switchmode1 1
counter1 <Geben Sie hier den Anfangszählerwert ein>
rule1 on switch1#state=0 do Counter1 +1 endon
rule1 5
rule1 1

Ein reboot und fertig.

im iobroker findest du noch ein POWER und ein counter state

Grüße aus Griechenland.

[Rattenfänger]

@Lenny-CB

Wie hast du das ganze gemacht ich habe heute mein D1 Mini Tasmota geflasht mit scripting funktion
und habe dein script mal rein gemacht aber der zeigt mir immer noch auf der main seite Zähler 50

bevor ich es vergesse habe Tasmota 12 drauf

[Spencer]

Hallo zusammen,

ich habe es nun auch so realisiert. Funktioniert gut an einem ESP8266 D4 GPIO2.
@Lenny-CB vielen Dank für das Skript, es hat mir sehr geholfen
Ich hätte da ein paar Fragen zum code:

• 1. Was bedeutet die 2 vor den Variablen?

%2hkw1%

• 2. Was bedeutet die 2 nach dem M?

>M 2

• 3. Was bedeutet diese Zeile?

2,=h=========================

• 4. Wie kann ich die Nachkommastellen anpassen?

Das Skript habe ich abgeändert, ein Haushalt inklusive Kostenrechnung.
-Mit gp=10.65 lässt sich der Gaspreis anpassen.
-Den MQTT Part habe ich auch etwas 'optimiert'. Der Zählerstand lässt sich nun direkt abgeifen über "value".
-Optional habe ich einen Websend direkt an cuxd für Homematic falls man kein MQTT verwenden möchte.

>D
p:m1=0
s1=0
p:g1=0
h1=0
hkw1=0
gkw1=0
skw1=0
hgp=0
ggp=0

 
hr=0
mi=0
zu=0.9617
br=11.233
gp=10.65
farbe1="#008000"
farbe2="#f00000"
farbe3="#00fdfd"
 
>B
->sensor53 r
tper=10
 
>S
h1=s1-m1
hkw1=h1*br*zu
hgp=(hkw1*gp)/100
gkw1=g1*br*zu
ggp=(gkw1*gp)/100
skw1=s1*br*zu

 
hr=hours
if chg[hr]>0
 and hr==0
  then
   m1=s1
   g1=h1
   svars
endif
 
if upsecs%tper==0{
=>Publish keller/%topic%/main/td_m3 %2h1%
=>Publish keller/%topic%/main/td_kwh %2hkw1%
=>Publish keller/%topic%/main/yd_m3 %2g1%
=>Publish keller/%topic%/main/yd_kwh %2gkw1%
=>Publish keller/%topic%/main/value %2s1%
=>Publish keller/%topic%/main/json {"value": "%2s1%", "today_m3": "%2h1%", "today_kwh": "%2hkw1%", "yesterday_m3": "%2g1%", "yesterday_kwh": "%2gkw1%"}

;Senden an Homematic Variable xxxxxxxx
;=>websend [ip-adresse_ccu:8181] /cuxd.exe?Status=dom.GetObject('xxxxxxxx').State(%2s1%)

}

>T
s1=GAS1#Stand_Haus1

>W
============
Zustandszahl: {m} %zu%
Brennwert: {m} %br% kWh/m³
Gaspreis: {m} %gp% Cent/kWh
============
Verbrauch:
---------------------
Heute: {m} %2h1% m³ | %2hkw1% kWh
Kosten: {m} %2hgp% €
---------------------
Gestern: {m} %2g1% m³ | %2gkw1% kWh
Kosten: {m} %2ggp% €

>M 1
+1,2,c,1,-25,GAS1
1,1-0:1.8.0*255(@100,Zählerstand,m³,Stand_Haus1,18
#

Die MQTT Ausgabe ist: