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

avr: beautifications.

Browse Source
This commit is contained in:
Martin Preuss
2024-12-17 20:53:18 +01:00
parent 9d71ff27a7
commit a435b995a8
1 changed files with 13 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

19
avr/modules/ma_light/main.asm
View File

@@ -8,7 +8,10 @@
; *************************************************************************** ; ***************************************************************************
.equ MOTIONLIGHT_DEFAULT_ONTIME = 3000 ; 5min ; ***************************************************************************
; defines
.equ MOTIONLIGHT_DEFAULT_ONTIME = 3000 ; 5min (in 1/10 secs)
.equ MOTIONLIGHT_SOURCE_NUM = 2 .equ MOTIONLIGHT_SOURCE_NUM = 2
@@ -17,6 +20,10 @@
.equ MOTIONLIGHT_SOURCE_SIZE = 2 .equ MOTIONLIGHT_SOURCE_SIZE = 2
; ***************************************************************************
; data
.dseg .dseg
@@ -30,6 +37,9 @@ motionLightDataEnd:
; ***************************************************************************
; code
.cseg .cseg
MOTIONLIGHT_BEGIN: MOTIONLIGHT_BEGIN:
@@ -88,15 +98,12 @@ MotionLight_Fini:
MotionLight_Every100ms: MotionLight_Every100ms:
lds r24, motionLightTimer lds r24, motionLightTimer
lds r25, motionLightTimer+1 lds r25, motionLightTimer+1
mov r16, r24
or r16, r25
brne MotionLight_Every100ms_dec
ret
MotionLight_Every100ms_dec:
sbiw r25:r24, 1 sbiw r25:r24, 1
brcs MotionLight_Every100ms_ret
sts motionLightTimer, r24 sts motionLightTimer, r24
sts motionLightTimer+1, r25 sts motionLightTimer+1, r25
breq MotionLight_Every100ms_off breq MotionLight_Every100ms_off
MotionLight_Every100ms_ret:
ret ret
MotionLight_Every100ms_off: MotionLight_Every100ms_off:
rjmp motionLightTurnOff ; (r16, r17, r18, r19, r20, r21, r23) rjmp motionLightTurnOff ; (r16, r17, r18, r19, r20, r21, r23)