ottelo15

Tasmota Script - Verbraucher schalten

Dec 11th, 2024
141,803
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
C 1.10 KB | None | 0 0
  1. >D 40
  2. ; -- VARS --
  3. swesp=0
  4. swespflg=0
  5. power=0
  6. power2=0
  7. ; optional!!
  8. p:btn=0
  9. btnstate=2
  10.  
  11. ;-- SML --
  12. >M 1
  13. ;Euer SML DESCRIPTOR .....
  14.  
  15. ; -- EVERY 100MS -- optional!!
  16. >F
  17. if (btnstate!=btn)
  18. {
  19.   =>websend [192.168.0.50] power %btn%
  20.   print power %btn%
  21.   btnstate=btn
  22. }
  23.  
  24. ; -- EVERY SECOND --
  25. >S
  26. ; every 3s
  27. if (secs%3==0)
  28. {
  29.   ; copy SML value
  30.   power=sml[1]
  31.   ; simply filtered power
  32.   power2=(0.9*power2)+((1-0.9)*power)
  33.  
  34.   ; switch second ESP if power flows to grid, see >W section
  35.   if (swesp==1)
  36.   {
  37.     if ((power2<-300) and (swespflg==0))
  38.     {
  39.       =>websend [192.168.0.50] power ON
  40.       print power ON %power2%W
  41.       swespflg=1
  42.       btn=1 ;optional
  43.     }
  44.     if ((power>100) and (swespflg==1))
  45.     {
  46.       =>websend [192.168.0.50] power OFF
  47.       print power OFF %power2%W
  48.       swespflg=0
  49.       btn=0 ;optional
  50.     }
  51.   }
  52. }
  53.  
  54. ; WEB INTERFACE
  55. >W
  56. ; web button
  57. ; switch second ESP if power flows to grid, see >S section
  58. bu(swesp "PV Steckdose aktivieren" "PV Steckdose deaktivieren")
  59. ; optional
  60. bu(btn "Steckdose manuell ausschalten" "Steckdose manuell einschalten")
Advertisement
Add Comment
Please, Sign In to add comment