MirrorRepos/RomWBW
1
0
Fork 1
mirror of https://github.com/wwarthen/RomWBW.git synced 2026-02-06 14:11:48 -06:00
Code Issues Projects Releases Wiki Activity

Use IY to retrieve status and data port values from idat tables.

Browse Source
This commit is contained in:
b1ackmai1er
2024-12-06 22:32:24 +08:00
parent 1a73a9614b
commit 7a663e2a3c
1 changed files with 11 additions and 17 deletions
Download Patch File Download Diff File Expand all files Collapse all files

28
Source/HBIOS/ps2iface.inc
View File

@@ -9,30 +9,27 @@
;__________________________________________________________________________________________________
;
#IF ((INTMODE == 2) & INTPS2KBD))
;
; SETUP POINTER TO KEYBOARD PORT
;
#IF (TMSENABLE)
KBDPORTD .DB TMS_KBDDATA ; KBD CTLR DATA PORT
KBDPORTS .DB TMS_KBDST ; KBD CTLR STATUS/CMD PORT
KBDIDAT .EQU TMS_IDAT ; KBD INSTANCE DATA TABLE
#ELSE
#IF (GDCENABLE)
KBDPORTD .DB GDC_KBDDATA ; KBD CTLR DATA PORT
KBDPORTS .DB GDC_KBDST ; KBD CTLR STATUS/CMD PORT
KBDIDAT .EQU GDC_IDAT ; KBD INSTANCE DATA TABLE
#ELSE
#IF (CVDUENABLE)
KBDPORTD .DB CVDU_KBDDATA ; KBD CTLR DATA PORT
KBDPORTS .DB CVDU_KBDST ; KBD CTLR STATUS/CMD PORT
KBDIDAT .EQU CVDU_IDAT ; KBD INSTANCE DATA TABLE
#ELSE
#IF (VRCENABLE)
KBDPORTD .DB VRC_KBDDATA ; KBD CTLR DATA PORT
KBDPORTS .DB VRC_KBDST ; KBD CTLR STATUS/CMD PORT
KBDIDAT .EQU VRC_IDAT ; KBD INSTANCE DATA TABLE
#ELSE
#IF (VGAENABLE)
KBDPORTD .DB VGA_KBDDATA ; KBD CTLR DATA PORT
KBDPORTS .DB VGA_KBDST ; KBD CTLR STATUS/CMD PORT
KBDIDAT .EQU VGA_IDAT ; KBD INSTANCE DATA TABLE
#ENDIF
#ENDIF
@@ -68,14 +65,13 @@ KBDQ .FILL KBDQSIZ,0 ; CIRCULAR KEYBOARD BUFFER
;
KBD_INT:
; CALL KBDQDBG
LD A,(KBDPORTS) ; READ CONTROLLER STATUS
LD C,A
LD IY,KBDIDAT
LD C,(IY+KBD_ST) ; READ CONTROLLER STATUS
EZ80_IO
IN A,(C)
AND 1
RET Z
LD A,(KBDPORTD) ; GET THE RESPONSE
LD C,A
LD C,(IY+KBD_DAT) ; GET THE RESPONSE
EZ80_IO
IN A,(C)
; CALL KBDQPUSH ; SAVE KEYBOARD SCAN CODE
@@ -148,8 +144,6 @@ KBDQPOP:
KBD_IN:
#ENDIF
KBD_IN_P:
EZ80_IO
IN A,(C) ; GET THE DATA VALUE
LD C,(IY+KBD_DAT) ; DATA PORT
EZ80_IO
IN A,(C) ; GET THE DATA VALUE