6502/lzsa
1
0
Fork 0
mirror of https://github.com/emmanuel-marty/lzsa.git synced 2024-06-14 14:29:30 +00:00
Code Issues Projects Releases Wiki Activity

Optimize handling of 9 bits offset in 6809 LZSA2 depacker

Browse Source
This commit is contained in:
Doug Masten 2020-06-27 00:05:58 -05:00
parent c7b3ffc067
commit fc8120f0da
1 changed files with 2 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
asm/6809/unlzsa2b.s
View File

@ -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
bra lz2gotof
lz2offs9 clra ; clear A (to prepare for high 8 bits of offset)
lslb ; push token's Z flag bit into carry
rola ; shift Z flag from carry into bit 0 of A
coma ; set bits 9-15 of offset, reverse bit 8
lz2offs9 sex ; extend token's Z flag bit into reg A
deca ; set bits 9-15 of offset, reverse bit 8
bra lz2lowof
lz2nibct fcb $00 ; nibble ready flag