Skip to content

Instantly share code, notes, and snippets.

@tsutsui
Created September 18, 2016 17:18
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save tsutsui/a87fe91e9b9fe35bda21397d29bc9d3b to your computer and use it in GitHub Desktop.
Save tsutsui/a87fe91e9b9fe35bda21397d29bc9d3b to your computer and use it in GitHub Desktop.
diffs to use ZASM and "huge speed boost" for exomizer209/rawdecrs/z80/deexo.asm in Exomizer 2.0.9
--- deexo.asm.orig 2016-09-19 02:10:44.000000000 +0900
+++ deexo.asm 2016-09-19 02:11:11.000000000 +0900
@@ -23,9 +23,11 @@
cp a
exo_initbits: ld c, 16
jr nz, exo_get4bits
- ld ixl, c
+; ld ixl, c
+ db 0ddh,069h
ld de, 1 ;DE=b2
-exo_get4bits: call exo_getbit ;get one bit
+exo_get4bits: srl a
+ call z,exo_getbit ;get one bit
rl c
jr nc, exo_get4bits
inc c
@@ -40,14 +42,16 @@
ex de, hl
inc iy
pop hl
- dec ixl
+; dec ixl
+ db 0ddh,02dh
djnz exo_initbits
pop de
jr exo_mainloop
exo_literalrun: ld e, c ;DE=1
exo_getbits: dec b
ret z
-exo_getbits1: call exo_getbit
+exo_getbits1: srl a
+ call z,exo_getbit
rl e
rl d
jr nc, exo_getbits
@@ -56,10 +60,12 @@
pop de
exo_literalcopy:ldir
exo_mainloop: inc c
- call exo_getbit ;literal?
+ srl a
+ call z,exo_getbit ;literal?
jr c, exo_literalcopy
ld c, 239
-exo_getindex: call exo_getbit
+exo_getindex: srl a
+ call z,exo_getbit
inc c
jr nc,exo_getindex
ret z
@@ -103,8 +109,9 @@
ex de, hl
ret
-exo_getbit: srl a
- ret nz
+exo_getbit:
+; srl a
+; ret nz
ld a, (hl)
inc hl
rra
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment