Skip to content

Instantly share code, notes, and snippets.

@justintime

justintime/rule1.haskell

Last active August 8, 2025 22:56
Show Gist options

  • Select an option

    Learn more about clone URLs
  • Save justintime/44346d410e62c3909ff071e8aa793ca5 to your computer and use it in GitHub Desktop.

Select an option

Learn more about clone URLs
Save justintime/44346d410e62c3909ff071e8aa793ca5 to your computer and use it in GitHub Desktop.
Download ZIP
Tasmota Watchdog
Raw
rule1.haskell
Rule1
ON system#boot DO
Backlog Var1 5; Var2 0; Var3 5
ENDON
ON Var1#State>240 DO
Var1 240
ENDON
ON Time#Minute|%var1% DO
WebQuery https://www.google.com/ GET
ENDON
ON WebQuery#Data$!Done DO
Backlog Add2 1; Var1 %var3%
ENDON
ON Var2#state >= 3 DO
Backlog Mult3 2; Var1 %var3%; Power1 0; Delay 300; Power1 1; Var2 0
ENDON
ON WebQuery#Data=Done DO
Backlog Var1 5; Var2 0; Var3 5
ENDON
ON Var3#State>240 DO
Var3 240
ENDON
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment