Jahresrückblick 2025 – unser neuer Blogbeitrag ist online! ✨

[Wal]

@ralla66 ,
du musst die Kommentare entfernen, dann passt das Skript.

>D
Vmax=60
Cmax=24
v=0
V=0
c=0
C=0
sw=0
SW=0
rV="01060000"
vV=""
rC="01060001"
vC=""
rSW="01060002000"
vSW=""
>BS
+>subscribe V, cmnd/%topic%/tvolt
+>subscribe C, cmnd/%topic%/tampere
+>subscribe SW, cmnd/%topic%/tpow
>B
smlj=0
->sensor53 r
>R
smlj=0
>S
if upsecs>30
then
smlj=1
endif
>W
bu(SW "DPM Ein" "DPM Aus")
nm(0.0 60.0 0.01 V "DPM Ausgang (V)" 200 2)
nm(0.0 24.0 0.01 C "DPM Ausgang (A)" 200 2)
>T
sw=DC#sSwitch
v=DC#sVolt
c=DC#sCur
if ((chg[sw]>0) and (SW!=sw))
then
  SW=sw
  +>publish stat/%topic%/RESULT {"tpow":%0sw%}
endif
if ((chg[v]>0) and (V!=v))
then
  V=v
  +>publish stat/%topic%/RESULT {"tvolt":%2v%}
endif
if ((chg[c]>0) and (C!=c))
then
  C=c
  +>publish stat/%topic%/RESULT {"tampere":%2c%}
endif
if chg[V]>0
then
  if V>Vmax
  then
    V=Vmax
  endif
  if V<0
  then
    V=0
  endif
  vV=rV+sb(hx((V*100)) 4 4)
  +>publish stat/%topic%/RESULT {"tvolt":%2V%}
  sml(1 3 vV)
endif
if chg[C]>0
then
  if C>Cmax
  then
    C=Cmax
  endif
  if C<0
  then
    C=0
  endif
  vC=rC+sb(hx((C*1000)) 4 4)
  +>publish stat/%topic%/RESULT {"tampere":%2C%}
  sml(1 3 vC)
endif
if ((chg[SW]>0) and (sw!=SW)
then
  vSW=rSW+s(SW)
  +>publish stat/%topic%/RESULT {"tpow":%0SW%}
  sml(1 3 vSW)
endif
>M 1
+1,3,m,16,9600,DC,1,2,010300000001,010300010001,010300020001,010310010001,010310020001
1,010302SSssxxxx@i0:100,Spannung (set),V,sVolt,2
1,010302SSssxxxx@i1:1000,Strom (set),A,sCur,2
1,010302SSssxxxx@i2:1,Ausgang (set),,sSwitch,0
1,010302SSssxxxx@i3:100,Spannung (disp),V,dVolt,2
1,010302SSssxxxx@i4:1000,Strom (disp),A,vCur,2
#

[Ralla66]

@wal

der DPM hat bei mir GND,A,B,VCC als Ausgang
Im Menü 5 im DPM CS ist 1 Modbus ( mit 9600 Bd )
ESP ist an RX, TX angeschlossen, da beim booten ja Hardware Serial angezeigt wird
Config Tasmota Generic18, GPIOs alle none

Richtig so ?

[Wal]

@ralla66 ,
bei mir heißt das GND,TX,RX,VCC .
ich denke du hast einen mit rs485, da braucht man die Wandlerplatine.

[Wal]

@ralla66 ,
wenn ich mir die Anleitung für rs485 anschaue, kann es sein das das Teil beides kann, dann würde es so funktionieren.
Oben in der Anleitung steht aber entweder oder ?
Anleitung

Das Skript funktioniert aber mit beidem.
RS485 und Wandlerplatine
oder
Seriell TTL direkt auf GPIO1 und GPIO3

[Ralla66]

@wal

Danke, sollte Modbus RS485 oder DPM eigenes Serial sein.
Je nach Einstellung im DPM Menü 5 CS.
Bei Tasmota sollte ja Hardwareserial GPIO 1 und 3 sein für RX/TX am RX/TX
im Script ja 1 und 3 ( 1,3 )

M 1
+1,3,m,16,9600,DC,1,2,010300000001,010300010001

Irgendwie rennt das nicht obwohl die blaue Led COM am DPM blinkt.
Spannung ist sauber, RX / TX , AB getauscht,
Dann pack ich mal den Logic Analyser aus und sniffe mal.

[Wal]

@ralla66 ,
die blaue Led blinkt nicht wenn RX TX vertauscht sind eben getestet, die Verdrahtung scheint richtig zu sein.
Auch für die serielle Übertragung muss im DPM auf Modbus Protokoll geschaltet werden.

Das ist dieser Punkt der Anleitung:

Der Menüpunktbeinhaltet das Kommunikationsprotokoll.
Hier bedeutet die „0“ das einfache
Kommunikationsprotokoll und „1“ das Modbus
Kommunikationsprotokoll.

edit :
9600 BAUD müsste passen.

[fimoknete]

OK, zurück zu meiner Frage.
Was hängt denn nun genau zwischen dem DMP und dem Rechner? Und wie ist das angeschlossen?
Spricht hast du eine Skizze welche Pins an welches Teil angeschlossen werden? und welche Teile man braucht?

[fimoknete]

Ich habe noch einen esp8266 hier rum liegen. was brauche ich noch?

[Ralla66]

@fimoknete

zwischen dem DPM und dem Win PC ist nur der mitgelieferte USB RS485 Stick dazwischen.
Im Gerätemanager prüfen ob der Stick erkannt wurde.

[Ralla66]

@wal

mal am Bus getestet, fragt das Script 1 mal pro sec ab ?

S
if upsecs>30
then
smlj=1
endif

[fimoknete]

@ralla66 Genauso ist das angeschlossen. Modbus erkennt aber keinen Adapter im Iobroker. Im Gerätemanager ist der Stick allerdings als Port10 Serial erkannt. Was muss ich denn bei Modbus einstellen. Woher weis ich denn die ID vom DMP?

[Wal]

@fimoknete ,
nix modbus adapter, sonoff adapter

edit: bin gerade im falschen Film, ignoriere die Nachricht. ;-)

[Wal]

@ralla66 ,
bei dir kommt nichts gescheites an.
Bei mir sehen die Nachrichten anders aus.
Ich glaube 01 03 sind Nachrichten vom Modbusprotokoll.
Ja, es kommen permanent Daten.

[Ralla66]

@fimoknete

habe dein System nicht, ID vom DPM ist default 1

[Wal]

@ralla66 ,
soll ich dir mal meine Tasmota-Firmware zu Verfügung stellen ?
Evtl. liegt es daran.

[Ralla66]

@wal

ok, TX ESP über TTL RX / USB RS232 nach PC bringt 7F FF FF ....... 7F usw
Ist das Init oder Abfrage für Daten `

[Wal]

@ralla66 ,
ich habe nur den ESP an das Terminal angeschlossen und darüber kommen auch die Daten.

Es ist das Abfragen.
Hier der Init:

[Ralla66]

@wal

ok prüfe ich morgen in Ruhe, werde mal den DPM per RS485 am PC mit Hterm testen.
Stell mal bitte die 01 03 Anfrage hier ein die ich senden muß.
Danke
Nachtrag: sollte ok sein

[Wal]

@ralla66 ,
habe jetzt mal 1,00 ..2,00..3,00..4,00 V eingegeben.

01 06 00 00 00 64 00 02 27 D9  1,00V
01 06 00 00 00 C8 00 02 E7 F8  2,00V
01 06 00 00 01 2C 00 02 A6 33  3,00V
01 06 00 00 01 90 00 02 67 D7  4,00V

das deckt sich mit dem Skript.

01 03
müssten laut Skript die ausgelesenen Werte sein.

>M 1
+1,3,m,16,9600,DC,1,2,010300000001,010300010001,010300020001,010310010001,010310020001
1,010302SSssxxxx@i0:100,Spannung (set),V,sVolt,2
1,010302SSssxxxx@i1:1000,Strom (set),A,sCur,2
1,010302SSssxxxx@i2:1,Ausgang (set),,sSwitch,0
1,010302SSssxxxx@i3:100,Spannung (disp),V,dVolt,2
1,010302SSssxxxx@i4:1000,Strom (disp),A,vCur,2

[Ralla66]

@wal

ok, der ESP müsste ja am TX per TTL die 01 03 ....... Periodisch senden.
Das würde ich ja in Hterm per TTL RS232 USB sehen.
Da scheint am ESP was nicht zu stimmen.
Grübel