gui2: started working on autolayout.

avr/modules/lcd2/gui2/base/object.asm

@@ -776,6 +776,35 @@ OBJ_SubFlagsDown_done:
 
 
 
+; ---------------------------------------------------------------------------
+; @routine OBJ_AddFlagsUp @global @recursive
+;
+; @param  Y address of object
+; @param  R16 flags to add
+; @clobbers r17, r18, r19
+
+OBJ_AddFlagsUp:
+  push yl
+    push yh
+      ldd r17, Y+OBJECT_OFFS_FLAGS
+      or r17, r16
+      std Y+OBJECT_OFFS_FLAGS, r17
+      ; handle parents
+OBJ_AddFlagsUp_loop:
+        rcall OBJ_GetParent             ; r19:r18=object (none)
+        brcc OBJ_AddFlagsUp_done
+        mov yl, r18
+        mov yh, r19
+        rcall OBJ_AddFlagsUp            ; recursion!
+      rjmp OBJ_AddFlagsUp_loop
+OBJ_AddFlagsUp_done:
+    pop yh
+  pop yl
+  ret
+; @end
+
+
+
 ; ---------------------------------------------------------------------------
 ; @routine objHandleSignalWithMap
 ;