falso
/
zxuno-git
mirror of https://github.com/zxdos/zxuno.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

bug cazado

This commit is contained in:
antoniovillena 2021-04-26 18:41:25 +02:00
parent 9dffbe79bc
commit a73848cfe4
3 changed files with 12 additions and 11 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

BIN
firmware/FIRMWARE.ZX2
View File

Binary file not shown.

BIN
firmware/FIRMWARE.ZXD
View File

Binary file not shown.

23
firmware/firmware.asm
View File

@ -3180,30 +3180,31 @@ calbi3 add hl, de
ld (alto highb+1), a ld (alto highb+1), a
ret ret
ELSE ELSE
ld a, b calbi1 ld a, b
IF version=2 IF version=2
cp 35 cp 35
jr z, calbi1 jr z, calbi2
jr c, calbi2 jr c, calbi3
calbi1 sub 34 calbi2 sub 34
calbi2 ld b, a calbi3 ld b, a
sbc a, a sbc a, a
inc a inc a
ld hl, $0240 ld hl, $0240
ld de, $0740 ld de, $0740
ELSE ELSE
cp 21 cp 21
jr z, calbi1 jr z, calbi2
jr c, calbi2 jr c, calbi3
calbi1 sub 19 calbi2 sub 19
calbi2 ld b, a calbi3 ld b, a
sbc a, a sbc a, a
inc a inc a
ld hl, $fec0 ld hl, $fec0
ld de, $0c40 ld de, $0c40
ENDIF ENDIF
calbi3 add hl, de calbi4 add hl, de
djnz calbi3 djnz calbi4
ld (alto highb+1), a
ret ret
ENDIF ENDIF
ENDIF ENDIF