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