Add gui variables for the remote override room setpoint functions, as

requested via bug report #19.
hvxl · Feb 25, 2022 · 0c760f0 · 0c760f0
1 parent b022388
commit 0c760f0
Showing 1 changed file with 12 additions and 5 deletions.
diff --git a/otmonitor.vfs/otmonitor.tcl b/otmonitor.vfs/otmonitor.tcl
@@ -1022,6 +1022,17 @@ proc asfflags {list} {
     }
     return 0
 }
+proc overrideflags {list} {
+    reportflags {
+    } {
+	"Manual change priority"	{"disable overrule" "enable overrule"}
+	"Program change priority"	{"disable overrule" "enable overrule"}
+    } $list
+    lassign $list - flags
+    guiflag manualoverrule [expr {($flags & 1) != 0}]
+    guiflag programoverrule [expr {($flags & 2) != 0}]
+    return 0
+}
 
 proc returntemp {list} {
     global gui
@@ -2124,11 +2135,7 @@ special 4 86 reportflags {
 } {
     "Nominal ventilation value"			{read-only read/write}
 }
-special 4 100 reportflags {
-} {
-    "Manual change priority"	{"disable overrule" "enable overrule"}
-    "Program change priority"	{"disable overrule" "enable overrule"}
-}
+special 4 100 overrideflags
 special 4 103 reportflags {
     "System type"		{"DHW preheat" "DHW parallel"}
 } {