AXIOMA

AXIOMA QALCOSONIC E4

>D
; aktuelle Version unter https://bitshake.de/skripte
wkup=1
>B
=>sensor53 r
>BS
=#readmeter
>S
if upsecs%2700==0 {
=#readmeter
}
#readmeter
sml(-1 1 "2400:8N1")
for wkup 1 72 1
sml(1 1 "55555555555555555555")
next
delay(350)
sml(-1 1 "2400:8E1")
sml(1 1 "1040004016")
delay(350)
sml(1 1 "107BFE7916")
>M 1
+1,5,rE1,0,2400,AX-E4,4
1,04863BuuUUuuUUs@1000,Wärmemenge,MWh,Energy,3
1,0413uuUUuuUUs@100,ges. Volumen,m³,Volume,3
1,042BuuUUuuUUs@10,Leistung,kW,Power,3
1,043BuuUUuuUUs@1,Volumenstr.,l/h,Flow,0
1,0259ssSS@100,Vorlauftemp.,°C,VL,2
1,025DssSS@100,Rücklauftemp.,°C,RL,2
1,0261ssSS@100,Temp.diff.,°C,VL-RL,2
1,0C78bcd8@#,Seriennummer,,Meter_id,0
#

AXIOMA QALCOSONIC W1

>D
; aktuelle Version unter https://bitshake.de/skripte
period=60
done=0
wkup=1
>B
smlj=0
->sensor53 r
>BS
=#readmeter
>S
if time%period==0
and done==0
then
=#readmeter
done=1
print done set
endif
if time%period-1==0 
and done==1
then
done=0
endif
if sml[1]>0
and smlj==0
then
smlj=1
print enabled MQTT
endif
#readmeter
print wakeup start
sml(-1 1 "2400:8N1")
for wkup 1 53 1
sml(1 1 "55555555555555555555")
next
print wakeup end
wkup=1
print wait for the meter
delay(800)
sml(-1 1 "2400:8E1")
print request data
sml(1 1 "105BFE5916")
>M 1
+1,5,rE1,0,2400,AX-W1,4
1,=so3,16
1,0413uuUU@1000,Zählerstand,m³,qm_total,3
1,023BuuUU@1,Durchfluss,l/h,Flow,2
1,0259uuUU@100,Wassertemp.,°C,Temp,1
1,0A07uu@1,Auslesung,mal,readout,0
#