Skip to content

Commit

Permalink
Fix small typo in z80 depackers
Browse files Browse the repository at this point in the history
  • Loading branch information
emmanuel-marty authored Jun 21, 2019
1 parent 63c261c commit d1245c7
Show file tree
Hide file tree
Showing 4 changed files with 72 additions and 3 deletions.
69 changes: 69 additions & 0 deletions asm/z80/unlzs
Original file line number Diff line number Diff line change
@@ -0,0 +1,69 @@
;
; Size-optimized LZSA decompressor by spke (v.1 23/04/2019, 69 bytes)
;
; The data must be compressed using the command line compressor by Emmanuel Marty
; The compression is done as follows:
;
; lzsa.exe -r <sourcefile> <outfile>
;
; where option -r asks for the generation of raw (frame-less) data.
;
; The decompression is done in the standard way:
;
; ld hl,CompressedData
; ld de,WhereToDecompress
; call DecompressLZSA
;
; Of course, LZSA compression algorithm is (c) 2019 Emmanuel Marty,
; see https://github.com/emmanuel-marty/lzsa for more information
;
; Drop me an email if you have any comments/ideas/suggestions: [email protected]
;

@DecompressLZSA:
ld b,0

; first a byte token "O|LLL|MMMM" is read from the stream,
; where LLL is the number of literals and MMMM is
; a length of the match that follows after the literals
ReadToken: ld a,(hl) : exa : ld a,(hl) : inc hl
and #70 : jr z,NoLiterals

rrca : rrca : rrca : rrca ; LLL<7 means 0..6 literals...
cp #07 : call z,ReadLongBA ; LLL=7 means 7+ literals...

ld c,a : ldir

; next we read the low byte of the -offset
NoLiterals: push de : ld e,(hl) : inc hl : ld d,#FF
; the top bit of token is set if
; the offset contains the high byte as well
exa : or a : jp p,ShortOffset

LongOffset: ld d,(hl) : inc hl

; last but not least, the match length is read
ShortOffset: and #0F : add 3 ; MMMM<15 means match lengths 0+3..14+3
cp 15+3 : call z,ReadLongBA ; MMMM=15 means lengths 14+3+
ld c,a

ex (sp),hl : push hl ; BC = len, DE = -offset, HL = dest, SP ->[dest,src]
add hl,de : pop de ; BC = len, DE = dest, HL = dest+(-offset), SP->[src]
ldir : pop hl ; BC = 0, DE = dest, HL = src
jr ReadToken

; a standard routine to read extended codes
; into registers B (higher byte) and A (lower byte).
ReadLongBA: add (hl) : inc hl : ret nc

; the codes are designed to overflow;
; the overflow value 1 means read 1 extra byte
; and overflow value 0 means read 2 extra bytes
.code1: ld b,a : ld a,(hl) : inc hl : ret nz
.code0: ld c,a : ld b,(hl) : inc hl

; the two-byte match length equal to zero
; designates the end-of-data marker
or b : ld a,c : ret nz
pop de : pop de : ret

2 changes: 1 addition & 1 deletion asm/z80/unlzsa2_small_v1.asm
Original file line number Diff line number Diff line change
@@ -1,7 +1,7 @@
;
; Size-optimized LZSA2 decompressor by spke (v.1 02-09/06/2019, 145 bytes)
;
; The data must be comressed using the command line compressor by Emmanuel Marty
; The data must be compressed using the command line compressor by Emmanuel Marty
; The compression is done as follows:
;
; lzsa.exe -f2 -r <sourcefile> <outfile>
Expand Down
2 changes: 1 addition & 1 deletion asm/z80/unlzsa_fast_v1.asm
Original file line number Diff line number Diff line change
@@ -1,7 +1,7 @@
;
; Speed-optimized LZSA decompressor by spke (v.1 03-25/04/2019, 110 bytes)
;
; The data must be comressed using the command line compressor by Emmanuel Marty
; The data must be compressed using the command line compressor by Emmanuel Marty
; The compression is done as follows:
;
; lzsa.exe -r <sourcefile> <outfile>
Expand Down
2 changes: 1 addition & 1 deletion asm/z80/unlzsa_small_v1.asm
Original file line number Diff line number Diff line change
@@ -1,7 +1,7 @@
;
; Size-optimized LZSA decompressor by spke (v.1 23/04/2019, 69 bytes)
;
; The data must be comressed using the command line compressor by Emmanuel Marty
; The data must be compressed using the command line compressor by Emmanuel Marty
; The compression is done as follows:
;
; lzsa.exe -r <sourcefile> <outfile>
Expand Down

0 comments on commit d1245c7

Please sign in to comment.