sk6812: minor reorganizing. works now with newer BTF LED stripes.
This commit is contained in:
Martin Preuss
@@ -11,121 +11,6 @@
|
|||||||
|
|
||||||
|
|
||||||
sk6812JumpTableSendByte:
|
sk6812JumpTableSendByte:
|
||||||
rjmp sk6812SendByte0
|
rjmp sk6812SetAllColor0 ; new BTF 1m and 5m stripes
|
||||||
rjmp sk6812SendByte1
|
; rjmp sk6812SetAllColor1 ; old BTF 1m and 5m stripes
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
; ***************************************************************************
|
|
||||||
; type 0
|
|
||||||
|
|
||||||
|
|
||||||
.macro SK6812_SENDBIT0
|
|
||||||
sk6812SendBit: ; 0 1
|
|
||||||
rol r16 ; +1 +1
|
|
||||||
brcs sk6812SendBit_send1 ; +1 +2
|
|
||||||
; send 0
|
|
||||||
nop ; +1
|
|
||||||
sbi SK6812_PORT, SK6812_PINNUM ; +2
|
|
||||||
nop ; +1
|
|
||||||
nop ; +1
|
|
||||||
cbi SK6812_PORT, SK6812_PINNUM ; +2
|
|
||||||
; nop ; +1
|
|
||||||
nop ; +1
|
|
||||||
rjmp sk6812SendBit_end ; +2
|
|
||||||
sk6812SendBit_send1:
|
|
||||||
; send 1
|
|
||||||
sbi SK6812_PORT, SK6812_PINNUM ; +2
|
|
||||||
nop ; +1
|
|
||||||
nop ; +1
|
|
||||||
nop ; +1
|
|
||||||
cbi SK6812_PORT, SK6812_PINNUM ; +2
|
|
||||||
nop ; +1
|
|
||||||
nop ; +1
|
|
||||||
nop ; +1
|
|
||||||
sk6812SendBit_end: ; 13 13
|
|
||||||
.endmacro
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
; ---------------------------------------------------------------------------
|
|
||||||
; @routine sk6812SendByte0
|
|
||||||
;
|
|
||||||
; Sends a byte to the LED strip
|
|
||||||
; @param r16 byte
|
|
||||||
; @clobbers r16 (r24, r25)
|
|
||||||
|
|
||||||
sk6812SendByte0:
|
|
||||||
SK6812_SENDBIT0
|
|
||||||
SK6812_SENDBIT0
|
|
||||||
SK6812_SENDBIT0
|
|
||||||
SK6812_SENDBIT0
|
|
||||||
|
|
||||||
SK6812_SENDBIT0
|
|
||||||
SK6812_SENDBIT0
|
|
||||||
SK6812_SENDBIT0
|
|
||||||
SK6812_SENDBIT0
|
|
||||||
ret
|
|
||||||
; @end
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
; ***************************************************************************
|
|
||||||
; type 1
|
|
||||||
|
|
||||||
|
|
||||||
.macro SK6812_SENDBIT1
|
|
||||||
lsl r16 ; +1
|
|
||||||
brcs l_sendOne ; +1 if false, +2 if branch taken
|
|
||||||
; send ZERO
|
|
||||||
nop ; +1
|
|
||||||
out SK6812_PORT, r25 ; +1 HIGH
|
|
||||||
nop ; +1
|
|
||||||
nop ; +1
|
|
||||||
nop
|
|
||||||
out SK6812_PORT, r24 ; +1
|
|
||||||
nop ; +1
|
|
||||||
rjmp l_end ; +2
|
|
||||||
l_sendOne:
|
|
||||||
out SK6812_PORT, r25 ; +1 HIGH
|
|
||||||
nop ; +1
|
|
||||||
nop ; +1
|
|
||||||
nop ; +1
|
|
||||||
nop ; +1
|
|
||||||
nop ; +1
|
|
||||||
out SK6812_PORT, r24 ; +1
|
|
||||||
nop ; +1
|
|
||||||
l_end:
|
|
||||||
.endmacro
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
; ---------------------------------------------------------------------------
|
|
||||||
; @routine sk6812SendByte1
|
|
||||||
;
|
|
||||||
; Sends a byte to the LED strip
|
|
||||||
; @param r16 byte
|
|
||||||
; @clobbers r16, r24, r25
|
|
||||||
|
|
||||||
sk6812SendByte1:
|
|
||||||
ldi r24, 0
|
|
||||||
ldi r25, (1<<SK6812_PINNUM)
|
|
||||||
|
|
||||||
SK6812_SENDBIT1
|
|
||||||
SK6812_SENDBIT1
|
|
||||||
SK6812_SENDBIT1
|
|
||||||
SK6812_SENDBIT1
|
|
||||||
|
|
||||||
SK6812_SENDBIT1
|
|
||||||
SK6812_SENDBIT1
|
|
||||||
SK6812_SENDBIT1
|
|
||||||
SK6812_SENDBIT1
|
|
||||||
ret
|
|
||||||
; @end
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|||||||
118
avr/modules/sk6812/io0.asm
Normal file
118
avr/modules/sk6812/io0.asm
Normal file
@@ -0,0 +1,118 @@
|
|||||||
|
; ***************************************************************************
|
||||||
|
; copyright : (C) 2026 by Martin Preuss
|
||||||
|
; email : martin@libchipcard.de
|
||||||
|
;
|
||||||
|
; ***************************************************************************
|
||||||
|
; * This file is part of the project "AqHome". *
|
||||||
|
; * Please see toplevel file COPYING of that project for license details. *
|
||||||
|
; ***************************************************************************
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
; ***************************************************************************
|
||||||
|
; type 0
|
||||||
|
|
||||||
|
|
||||||
|
.macro SK6812_SENDBIT0 ; 0 1
|
||||||
|
rol r16 ; +1 +1
|
||||||
|
brcs l_send1 ; +1 +2
|
||||||
|
; send 0
|
||||||
|
nop ; +1
|
||||||
|
sbi SK6812_PORT, SK6812_PINNUM ; +2
|
||||||
|
; nop ; +1
|
||||||
|
nop ; +1
|
||||||
|
cbi SK6812_PORT, SK6812_PINNUM ; +2
|
||||||
|
rjmp l_end ; +2
|
||||||
|
l_send1:
|
||||||
|
; send 1
|
||||||
|
sbi SK6812_PORT, SK6812_PINNUM ; +2
|
||||||
|
nop ; +1
|
||||||
|
nop ; +1
|
||||||
|
nop ; +1
|
||||||
|
cbi SK6812_PORT, SK6812_PINNUM ; +2
|
||||||
|
nop ; +1
|
||||||
|
l_end:
|
||||||
|
; nop ; +1 +1
|
||||||
|
.endmacro ; 12 12
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
.macro SK6812_SENDBYTE0
|
||||||
|
SK6812_SENDBIT0
|
||||||
|
SK6812_SENDBIT0
|
||||||
|
SK6812_SENDBIT0
|
||||||
|
SK6812_SENDBIT0
|
||||||
|
|
||||||
|
SK6812_SENDBIT0
|
||||||
|
SK6812_SENDBIT0
|
||||||
|
SK6812_SENDBIT0
|
||||||
|
SK6812_SENDBIT0
|
||||||
|
.endmacro
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
; @param r18 red value
|
||||||
|
; @param r19 green value
|
||||||
|
; @param r20 blue value
|
||||||
|
; @param r21 white value
|
||||||
|
|
||||||
|
.macro SK6812_SENDQUADRUPEL0
|
||||||
|
mov r16, r19 ; G + 1
|
||||||
|
SK6812_SENDBYTE0 ; +12
|
||||||
|
mov r16, r18 ; R + 1
|
||||||
|
SK6812_SENDBYTE0 ; +12
|
||||||
|
mov r16, r20 ; B + 1
|
||||||
|
SK6812_SENDBYTE0 ; +12
|
||||||
|
mov r16, r21 ; W + 1
|
||||||
|
SK6812_SENDBYTE0
|
||||||
|
.endmacro
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
; ---------------------------------------------------------------------------
|
||||||
|
; @routine sk6812SetAllColor0
|
||||||
|
;
|
||||||
|
; Set all LEDs to same colour.
|
||||||
|
;
|
||||||
|
; @param r18 red value
|
||||||
|
; @param r19 green value
|
||||||
|
; @param r20 blue value
|
||||||
|
; @param r21 white value
|
||||||
|
; @clobbers r16, r23
|
||||||
|
|
||||||
|
sk6812SetAllColor0:
|
||||||
|
sbi SK6812_DDR, SK6812_PINNUM ; set to output
|
||||||
|
cbi SK6812_PORT, SK6812_PINNUM
|
||||||
|
|
||||||
|
push r15
|
||||||
|
in r15, SREG
|
||||||
|
cli
|
||||||
|
|
||||||
|
lds r23, sk6812NumLeds
|
||||||
|
sk6812SetAllColor0_loop:
|
||||||
|
SK6812_SENDQUADRUPEL0
|
||||||
|
dec r23 ; +1
|
||||||
|
breq sk6812SetAllColor0_loopEnd ; +1
|
||||||
|
rjmp sk6812SetAllColor0_loop ; +2
|
||||||
|
sk6812SetAllColor0_loopEnd:
|
||||||
|
; reset
|
||||||
|
cbi SK6812_PORT, SK6812_PINNUM
|
||||||
|
Utils_WaitNanoSecs 80000, 0, r23 ; wait for 80us
|
||||||
|
|
||||||
|
; sbi SK6812_PORT, SK6812_PINNUM
|
||||||
|
|
||||||
|
out SREG, r15
|
||||||
|
pop r15
|
||||||
|
ret
|
||||||
|
; @end
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
135
avr/modules/sk6812/io1.asm
Normal file
135
avr/modules/sk6812/io1.asm
Normal file
@@ -0,0 +1,135 @@
|
|||||||
|
; ***************************************************************************
|
||||||
|
; copyright : (C) 2026 by Martin Preuss
|
||||||
|
; email : martin@libchipcard.de
|
||||||
|
;
|
||||||
|
; ***************************************************************************
|
||||||
|
; * This file is part of the project "AqHome". *
|
||||||
|
; * Please see toplevel file COPYING of that project for license details. *
|
||||||
|
; ***************************************************************************
|
||||||
|
|
||||||
|
#if 0 ; disabled for now
|
||||||
|
|
||||||
|
|
||||||
|
; ***************************************************************************
|
||||||
|
; type 1
|
||||||
|
|
||||||
|
|
||||||
|
.macro SK6812_SENDBIT1
|
||||||
|
lsl r16 ; +1
|
||||||
|
brcs l_sendOne ; +1 if false, +2 if branch taken
|
||||||
|
; send ZERO
|
||||||
|
nop ; +1
|
||||||
|
out SK6812_PORT, r25 ; +1 HIGH
|
||||||
|
nop ; +1
|
||||||
|
nop ; +1
|
||||||
|
nop
|
||||||
|
out SK6812_PORT, r24 ; +1
|
||||||
|
nop ; +1
|
||||||
|
rjmp l_end ; +2
|
||||||
|
l_sendOne:
|
||||||
|
out SK6812_PORT, r25 ; +1 HIGH
|
||||||
|
nop ; +1
|
||||||
|
nop ; +1
|
||||||
|
nop ; +1
|
||||||
|
nop ; +1
|
||||||
|
nop ; +1
|
||||||
|
out SK6812_PORT, r24 ; +1
|
||||||
|
nop ; +1
|
||||||
|
l_end:
|
||||||
|
.endmacro
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
; ---------------------------------------------------------------------------
|
||||||
|
; @routine sk6812SendByte1
|
||||||
|
;
|
||||||
|
; Sends a byte to the LED strip
|
||||||
|
; @param r16 byte
|
||||||
|
; @clobbers r16, r24, r25
|
||||||
|
|
||||||
|
sk6812SendByte1:
|
||||||
|
ldi r24, 0
|
||||||
|
ldi r25, (1<<SK6812_PINNUM)
|
||||||
|
|
||||||
|
SK6812_SENDBIT1
|
||||||
|
SK6812_SENDBIT1
|
||||||
|
SK6812_SENDBIT1
|
||||||
|
SK6812_SENDBIT1
|
||||||
|
|
||||||
|
SK6812_SENDBIT1
|
||||||
|
SK6812_SENDBIT1
|
||||||
|
SK6812_SENDBIT1
|
||||||
|
SK6812_SENDBIT1
|
||||||
|
ret
|
||||||
|
; @end
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
; ---------------------------------------------------------------------------
|
||||||
|
; @routine sk6812SendQuadruple1
|
||||||
|
;
|
||||||
|
; Sends GRBW
|
||||||
|
; @param r18 red value
|
||||||
|
; @param r19 green value
|
||||||
|
; @param r20 blue value
|
||||||
|
; @param r21 white value
|
||||||
|
; @param Z pointer to jumptable entry for SendByte function (called by ijmp)
|
||||||
|
; @clobbers r16 (r17, r24, r25)
|
||||||
|
|
||||||
|
sk6812SendQuadruple1:
|
||||||
|
mov r16, r19 ; G
|
||||||
|
rcall sk6812SendByte1 ; (r16, r17, r24, r25)
|
||||||
|
mov r16, r18 ; R
|
||||||
|
rcall sk6812SendByte1 ; (r16, r17, r24, r25)
|
||||||
|
mov r16, r20 ; B
|
||||||
|
rcall sk6812SendByte1 ; (r16, r17, r24, r25)
|
||||||
|
mov r16, r21 ; W
|
||||||
|
rcall sk6812SendByte1 ; (r16, r17, r24, r25)
|
||||||
|
ret
|
||||||
|
; @end
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
; ---------------------------------------------------------------------------
|
||||||
|
; @routine sk6812SetAllColor1
|
||||||
|
;
|
||||||
|
; Set all LEDs to same colour.
|
||||||
|
;
|
||||||
|
; @param r18 red value
|
||||||
|
; @param r19 green value
|
||||||
|
; @param r20 blue value
|
||||||
|
; @param r21 white value
|
||||||
|
; @clobbers r23 (r16, r17, r24, r25)
|
||||||
|
|
||||||
|
sk6812SetAllColor1:
|
||||||
|
sbi SK6812_DDR, SK6812_PINNUM ; set to output
|
||||||
|
cbi SK6812_PORT, SK6812_PINNUM
|
||||||
|
push r15
|
||||||
|
in r15, SREG
|
||||||
|
cli
|
||||||
|
; Utils_WaitNanoSecs 80000, 0, r22 ; wait for 80us
|
||||||
|
nop
|
||||||
|
nop
|
||||||
|
lds r23, sk6812NumLeds
|
||||||
|
sk6812SetAllColor1_loop:
|
||||||
|
rcall sk6812SendQuadruple1 ; (r16, r17, r24, r25, Z)
|
||||||
|
dec r23
|
||||||
|
brne sk6812SetAllColor1_loop
|
||||||
|
|
||||||
|
; reset
|
||||||
|
cbi SK6812_PORT, SK6812_PINNUM
|
||||||
|
Utils_WaitNanoSecs 80000, 0, r22 ; wait for 80us
|
||||||
|
|
||||||
|
; sbi SK6812_PORT, SK6812_PINNUM
|
||||||
|
|
||||||
|
out SREG, r15
|
||||||
|
pop r15
|
||||||
|
sk6812SetAllColor1_done:
|
||||||
|
ret
|
||||||
|
; @end
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
#endif
|
||||||
|
|
||||||
|
|
||||||
@@ -19,8 +19,8 @@
|
|||||||
.equ SK6812_MODE_AUTO = 2
|
.equ SK6812_MODE_AUTO = 2
|
||||||
|
|
||||||
|
|
||||||
.equ SK6812_TYPE_BTF_NEW = 0
|
.equ SK6812_TYPE_BTF_TYPE1 = 0 ; new BTF stripes
|
||||||
.equ SK6812_TYPE_NUM = 1
|
.equ SK6812_TYPE_NUM = 1
|
||||||
|
|
||||||
.equ SK6812_DEFAULT_ONTIME = 300 ; 30secs
|
.equ SK6812_DEFAULT_ONTIME = 300 ; 30secs
|
||||||
|
|
||||||
@@ -295,6 +295,7 @@ sk6812SetState_off:
|
|||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
#if 0
|
||||||
; ---------------------------------------------------------------------------
|
; ---------------------------------------------------------------------------
|
||||||
; @routine sk6812SendPattern
|
; @routine sk6812SendPattern
|
||||||
;
|
;
|
||||||
@@ -323,6 +324,7 @@ sk6812SendPattern_loop2:
|
|||||||
brne sk6812SendPattern_loop1
|
brne sk6812SendPattern_loop1
|
||||||
ret
|
ret
|
||||||
; @end
|
; @end
|
||||||
|
#endif
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
@@ -335,35 +337,14 @@ sk6812SendPattern_loop2:
|
|||||||
; @param r19 green value
|
; @param r19 green value
|
||||||
; @param r20 blue value
|
; @param r20 blue value
|
||||||
; @param r21 white value
|
; @param r21 white value
|
||||||
; @clobbers r23 (r16, r17, r24, r25)
|
; @clobbers r23 (r16)
|
||||||
|
|
||||||
sk6812SetAllColor:
|
sk6812SetAllColor:
|
||||||
push zl
|
push zl
|
||||||
push zh
|
push zh
|
||||||
rcall sk6812GetJumpTableEntryForCurrentType
|
rcall sk6812GetJumpTableEntryForCurrentType
|
||||||
brcc sk6812SetAllColor_done
|
brcc sk6812SetAllColor_done
|
||||||
sbi SK6812_DDR, SK6812_PINNUM ; set to output
|
icall
|
||||||
cbi SK6812_PORT, SK6812_PINNUM
|
|
||||||
push r15
|
|
||||||
in r15, SREG
|
|
||||||
cli
|
|
||||||
; Utils_WaitNanoSecs 80000, 0, r22 ; wait for 80us
|
|
||||||
nop
|
|
||||||
nop
|
|
||||||
lds r23, sk6812NumLeds
|
|
||||||
sk6812SetAllColor_loop:
|
|
||||||
rcall sk6812SendQuadruple ; (r16, r17, r24, r25, Z)
|
|
||||||
dec r23
|
|
||||||
brne sk6812SetAllColor_loop
|
|
||||||
|
|
||||||
; reset
|
|
||||||
cbi SK6812_PORT, SK6812_PINNUM
|
|
||||||
Utils_WaitNanoSecs 80000, 0, r22 ; wait for 80us
|
|
||||||
|
|
||||||
; sbi SK6812_PORT, SK6812_PINNUM
|
|
||||||
|
|
||||||
out SREG, r15
|
|
||||||
pop r15
|
|
||||||
sk6812SetAllColor_done:
|
sk6812SetAllColor_done:
|
||||||
pop zh
|
pop zh
|
||||||
pop zl
|
pop zl
|
||||||
@@ -390,39 +371,6 @@ sk6812GetJumpTableEntryForCurrentType_ret:
|
|||||||
|
|
||||||
|
|
||||||
|
|
||||||
; ---------------------------------------------------------------------------
|
|
||||||
; @routine sk6812SendQuadruple
|
|
||||||
;
|
|
||||||
; Sends GRBW
|
|
||||||
; @param r18 red value
|
|
||||||
; @param r19 green value
|
|
||||||
; @param r20 blue value
|
|
||||||
; @param r21 white value
|
|
||||||
; @param Z pointer to jumptable entry for SendByte function (called by ijmp)
|
|
||||||
; @clobbers r16 (r17, r24, r25)
|
|
||||||
|
|
||||||
sk6812SendQuadruple:
|
|
||||||
mov r16, r19 ; G
|
|
||||||
rcall sk6812SendByte ; (r16, r17, r24, r25)
|
|
||||||
mov r16, r18 ; R
|
|
||||||
rcall sk6812SendByte ; (r16, r17, r24, r25)
|
|
||||||
mov r16, r20 ; B
|
|
||||||
rcall sk6812SendByte ; (r16, r17, r24, r25)
|
|
||||||
mov r16, r21 ; W
|
|
||||||
rcall sk6812SendByte ; (r16, r17, r24, r25)
|
|
||||||
ret
|
|
||||||
; @end
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
sk6812SendByte:
|
|
||||||
ijmp
|
|
||||||
|
|
||||||
ret
|
|
||||||
; @end
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
; ---------------------------------------------------------------------------
|
; ---------------------------------------------------------------------------
|
||||||
; @routine sk6812WriteConfToEeprom
|
; @routine sk6812WriteConfToEeprom
|
||||||
;
|
;
|
||||||
|
|||||||
Reference in New Issue
Block a user