Hallo in die Runde,
ich bin dabei, einen Elster AS1440 zum "reden" zu bringen. Als Lesekopf dient ein Hichi IR wifi, als Basis-Script habe ich mich an leeze ( #1736 ) orientiert.
Erste Erkenntnis : Es gibt Unterschiede zwischen AS1440 und AS1440. Mein Zähler überträgt die Daten in einem etwas anderen Format und hat auch nicht alles aus dem Beispiel von leeze zur zur Verfügung - aber es geht !
Bis hierhin bin ich schonmal ganz zufrieden. Ich kämpfe noch mit den historischen Werten. Der Zähler legt den letzten abgeschlossenen Monat als Zahl ab ( hier als "IntMonat" dargestellt ). Die historischen Werte werden als
01:27:00.042 : 2.8.1*68(0002983.4*kWh)
01:27:00.080 : 2.8.1*67(0002944.2*kWh)
01:27:00.119 : 2.8.1*66(0002877.8*kWh)
01:27:00.159 : 2.8.1*65(0002796.5*kWh)
01:27:00.196 : 2.8.1*64(0002683.9*kWh)
01:27:00.232 : 2.8.1*63(0002573.7*kWh)
für jeweils die letzten 12 Monate in einem "Stapelspeicher" abgelegt. Diese historischen Daten kann ich natürlich mit
1,=hVerbrauch letzten 3 Monate
1,1.9.0*68(@1,Verbrauch-1,kWh,Total_In,1
1,1.9.0*67(@1,Verbrauch-2,kWh,Total_In,1
1,1.9.0*66(@1,Verbrauch-3,kWh,Total_In,1
abfragen - spätestens in Monat 69 passt es aber nicht mehr. Ich müsste die 68,67,66 .... durch eine Variable ersetzen (IntMonat; IntMonat-1; .... ). Dabei stelle ich mich offensichtlich etwas d.....f an. Hat jemand einen Tip für mich ?
>D
scnt=0
res=0
mon=0
>B
=>sensor53 r
>F
; count 100ms
scnt+=1
switch scnt
case 3
;set sml driver to 300 baud and send /?! as HEX to trigger the Meter
res=sml(1 0 300)
res=sml(1 1 "2F3F210D0A")
;1700ms later \> Ack and ask for switching to 9600 baud
case 20
res=sml(1 1 "063035300D0A")
;300ms later \> Switching sml driver to 9600 baud
case 23
res=sml(1 0 9600)
;Restart sequence after 55x100ms
case 55
; 5500ms later \> restart sequence
scnt=0
ends
>M 1
+1,3,o,0,9600,,1,AS1440
1,0.9.2(@1),Datum in JJMMTT,,date-stamp,0
1,0.0.1(@1,Zähler-Nr.,,Geraete-ID,0
1,0.1.0(@1,IntMonat,,Monat,0
1,0.0.0(@1,Serien-NR.,,Serial-ID,0
1,1.8.0(@1,Σ-Zählerstand 1.8.0,kWh,Total_in,1
1,2.8.0(@1,Σ-Einspeisung 2.8.0,kWh,Total_out,1
1,=hAktueller Monat
1,1.9.0(@1,Verbrauch,KWh,HT_Total_in,1
1,2.9.0(@1,Einspeisung,KWh,HT_Total_in,1
1,=hAktuelle Last
1,1.7.0(@1,Verbrauch,kW,kW_Verbrauch,3
1,2.7.0(@1,Einspeisung,kW,kW_Einspeisung,3
1,=hVerbrauch letzten 3 Monate
1,1.9.0*68(@1,Verbrauch-1,kWh,Total_In,1
1,1.9.0*67(@1,Verbrauch-2,kWh,Total_In,1
1,1.9.0*66(@1,Verbrauch-3,kWh,Total_In,1
1,=hEinspeisung letzten 3 Monate
1,2.9.0*68(@1,Überschuss-1,kWh,Total_in,1
1,2.9.0*67(@2,Überschuss-2,kWh,Total_in,1
1,2.9.0*66(@3,Überschuss-3,kWh,Total_in,1
#
1-1:1.8.0*05(@5,Verbrauch-2,kWh,Total_In,3
1-1:1.8.0*04(@4,Verbrauch-3,kWh,Total_In,3
1,=hBK-Einspeisung letzten 3 Monat
1-1:2.8.0*01(@1,Monat-1_BK,kWh,Total_in,3
1-1:2.8.0*02(@2,Monat-2_BK,kWh,Total_in,3
1-1:2.8.0*03(@3,Monat-3_BK,kWh,Total_in,3
#
Alles anzeigen
Etwas ratlos
Kermit