Sonoff Tasmota 3Stufenheizer

; von thomas0001@web.de
; Script zum Schalten eines 3-Stufen Heizer bei PV-Überschuss via Sonoff Dual r3 (schaltet Heizer)
>D
min1=50
min2=60
min3=70
max1=1000
max2=800
max3=1000
; IP vom Sonoff Dual r3
url="[192.168.178.58]"
interval1=6
start=0
stop=0
Stufe=0
Tag=0
a=0
Power_curr=0
>T
Power_curr=0-W#Power_curr
>S
start=sunrise+120
stop=sunset-45
if time==stop
{
then
=>WebSend %url% Power1 off
=>WebSend %url% Power2 off
}
if ((time<stop) and (time>start))
{
Tag=1
else
Tag=0
}
if upsecs%interval1==0
{
a=0
if ((Power_curr>max1) and (Tag==1) and (a==0) and (Stufe==0))
{
=>WebSend %url% Power1 on
Stufe=1
a=1
}
if ((Power_curr<min1) and (Tag==1) and (a==0) and (Stufe<=1))
{
=>WebSend %url% Power1 off
=>WebSend %url% Power2 off
Stufe=0
a=1
}
if ((Power_curr>max2) and (Tag==1) and (a==0) and (Stufe==1))
{
=>WebSend %url% Power1 off
=>WebSend %url% Power2 on
Stufe=2
a=1
}
if ((Power_curr<min2) and (Tag==1) and (a==0) and (Stufe==2))
{
=>WebSend %url% Power2 off
=>WebSend %url% Power1 on
Stufe=1
a=1
}
if ((Power_curr>max3) and (Tag==1) and (a==0) and (Stufe==2))
{
=>WebSend %url% Power1 on
=>WebSend %url% Power2 on
Stufe=3
a=1
}
if ((Power_curr<min3) and (Tag==1) and (a==0) and (Stufe==3))
{
=>WebSend %url% Power1 off
=>WebSend %url% Power2 on
Stufe=2
a=1
}
}
>B
=>sensor53 r
>M 1
+1,3,s,0,9600,W
1,77070100100700ff@1,Akt. Verbrauch,W,Power_curr,1
1,77070100010800ff@1000,Bezug 1.8.0,KWh,Total_in,2
1,77070100020800ff@1000,Einsp. 2.8.0,KWh,Total_out,2
1,77070100000009ff@#,Zähler Nr,,Meter_number,0
#