-bug with ZX flag after ZX-ROM's inited
This commit is contained in:
parent
9f164542df
commit
0290fe13a9
@ -846,6 +846,7 @@ init_rom_address EQU #8200 ;!HARDCO
|
|||||||
LDIR ; § ¡¨âì FF- ¬¨
|
LDIR ; § ¡¨âì FF- ¬¨
|
||||||
|
|
||||||
; áâ ¢¨¬ ¬¥âªã ¥á«¨ ¯à®£à㧨«¨ <20>‡“ ᯥªâàã¬
|
; áâ ¢¨¬ ¬¥âªã ¥á«¨ ¯à®£à㧨«¨ <20>‡“ ᯥªâàã¬
|
||||||
|
DEC DE
|
||||||
LD A,'X'
|
LD A,'X'
|
||||||
LD (DE),A
|
LD (DE),A
|
||||||
DEC DE
|
DEC DE
|
||||||
|
|||||||
@ -880,6 +880,7 @@ SWAP_RAM_DRIVES:
|
|||||||
OUT (SLOT3),A
|
OUT (SLOT3),A
|
||||||
;
|
;
|
||||||
LD A,(SYS_PAGE.CURRENT_RAM_DRV)
|
LD A,(SYS_PAGE.CURRENT_RAM_DRV)
|
||||||
|
LD C,A
|
||||||
CP B
|
CP B
|
||||||
JR Z,.exit ; 㦥 ãáâ ®¢«¥ § ¯à 訢 ¥¬ë© ¡®à
|
JR Z,.exit ; 㦥 ãáâ ®¢«¥ § ¯à 訢 ¥¬ë© ¡®à
|
||||||
;
|
;
|
||||||
@ -903,9 +904,11 @@ SWAP_RAM_DRIVES:
|
|||||||
LD A,(SYS_PAGE.CURRENT_RAM_DRV)
|
LD A,(SYS_PAGE.CURRENT_RAM_DRV)
|
||||||
XOR #FF
|
XOR #FF
|
||||||
LD (SYS_PAGE.CURRENT_RAM_DRV),A
|
LD (SYS_PAGE.CURRENT_RAM_DRV),A
|
||||||
|
LD C,A
|
||||||
;
|
;
|
||||||
.exit: POP AF
|
.exit: POP AF
|
||||||
OUT (SLOT3),A
|
OUT (SLOT3),A
|
||||||
|
LD A,C
|
||||||
RET
|
RET
|
||||||
;----------------------------------------------------------------------;
|
;----------------------------------------------------------------------;
|
||||||
;
|
;
|
||||||
|
|||||||
Binary file not shown.
Loading…
Reference in New Issue
Block a user