eZ80: tms.asm increased speed of interrupt handler's IO process

This commit is contained in:
Dean Netherton
2024-06-15 20:15:18 +10:00
parent 20bdb78084
commit 6b00f5c992
2 changed files with 6 additions and 1 deletions

View File

@@ -359,6 +359,7 @@ RTCDEF .SET RTCDEF | %00001000 ; INITIAL SPEED LOW
#DEFINE EZ80_BNKSEL .DB $49, $DF ; RST.L $18
#DEFINE RET.L .DB $49 \ RET
IO_SEGMENT .EQU $FF ; THE UPPER 8-BIT ADDRESS FOR I/O
#ELSE
#DEFINE EZ80_IO

View File

@@ -1100,8 +1100,12 @@ TMS_Z180IOX:
#IF (TMSTIMENABLE & (INTMODE > 0))
TMS_TSTINT:
EZ80_IO
#IF (CPUFAM == CPU_EZ80)
LD BC, IO_SEGMENT<<8 | TMS_CMDREG
IN A,(C) ; TEST FOR INT FLAG
#ELSE
IN A,(TMS_CMDREG) ; TEST FOR INT FLAG
#ENDIF
AND $80
JR NZ,TMS_INTHNDL
AND $00 ; RETURN Z - NOT HANDLED