mirror of
https://github.com/emmanuel-marty/lzsa.git
synced 2025-02-18 00:30:44 +00:00
Optimize handling of 9 bits offset in 6809 LZSA2 depacker
This commit is contained in:
parent
c7b3ffc067
commit
fc8120f0da
@ -77,10 +77,8 @@ lz2nolt ldb ,s ; get token again, don't pop it from the stack
|
|||||||
sex ; set bits 8-15 of offset to $FF
|
sex ; set bits 8-15 of offset to $FF
|
||||||
bra lz2gotof
|
bra lz2gotof
|
||||||
|
|
||||||
lz2offs9 clra ; clear A (to prepare for high 8 bits of offset)
|
lz2offs9 sex ; extend token's Z flag bit into reg A
|
||||||
lslb ; push token's Z flag bit into carry
|
deca ; set bits 9-15 of offset, reverse bit 8
|
||||||
rola ; shift Z flag from carry into bit 0 of A
|
|
||||||
coma ; set bits 9-15 of offset, reverse bit 8
|
|
||||||
bra lz2lowof
|
bra lz2lowof
|
||||||
|
|
||||||
lz2nibct fcb $00 ; nibble ready flag
|
lz2nibct fcb $00 ; nibble ready flag
|
||||||
|
Loading…
x
Reference in New Issue
Block a user