martin/aqhomecontrol
Public Access
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

gui: fixed HSpinner (wasn't propagating values to ValueLabel).

Browse Source
This commit is contained in:
Martin Preuss
2026-05-08 00:29:26 +02:00
parent d713e774ee
commit 31dca13123
1 changed files with 10 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
avr/modules/lcd2/gui/base/hspinner.asm
View File

@@ -225,12 +225,19 @@ hSpinnerCreateRightButton_done:
hSpinnerSetValue:
std Y+HSPINNER_OFFS_CURVALUE_LO, xl
std Y+HSPINNER_OFFS_CURVALUE_HI, xh
rjmp hSpinnerSendValue
; @end
hSpinnerSendValue:
ldi r16, HSPINNER_CHILDIDX_VALUE
bigcall OBJ_GetChildAt ; r19:r18=value label (r16)
brcc HSpinner_OnCmdLeft_ret
push yl
push yh
ldd xl, Y+HSPINNER_OFFS_CURVALUE_LO
ldd xh, Y+HSPINNER_OFFS_CURVALUE_HI
mov yl, r18
mov yh, r19
bigcall ValueLabel_SetValue ; (any, !Y)
@@ -369,6 +376,7 @@ HSpinner_OnSetValue:
std Y+HSPINNER_OFFS_CURVALUE_LO, xl
std Y+HSPINNER_OFFS_CURVALUE_HI, xh
rcall hSpinnerValidate
rcall hSpinnerSendValue
sec
ret
; @end
@@ -401,7 +409,7 @@ HSpinner_OnSetMinValue:
std Y+HSPINNER_OFFS_MINVALUE_HI, xh
rcall hSpinnerValidate
brcc HSpinner_OnSetMinValue_done
rcall hSpinnerEmitCmdSignal
rcall hSpinnerSendValue
HSpinner_OnSetMinValue_done:
sec
ret
@@ -420,7 +428,7 @@ HSpinner_OnSetMaxValue:
std Y+HSPINNER_OFFS_MAXVALUE_HI, xh
rcall hSpinnerValidate
brcc HSpinner_OnSetMaxValue_done
rcall hSpinnerEmitCmdSignal
rcall hSpinnerSendValue
HSpinner_OnSetMaxValue_done:
sec
ret