Browse Source

EZZ80_IO fixes

pull/460/head
b1ackmai1er 1 year ago
parent
commit
64dbf4ff35
  1. 3
      Source/HBIOS/ps2iface.inc

3
Source/HBIOS/ps2iface.inc

@ -70,11 +70,13 @@ KBD_INT:
; CALL KBDQDBG ; CALL KBDQDBG
LD A,(KBDPORTS) ; READ CONTROLLER STATUS LD A,(KBDPORTS) ; READ CONTROLLER STATUS
LD C,A LD C,A
EZ80_IO
IN A,(C) IN A,(C)
AND 1 AND 1
RET Z RET Z
LD A,(KBDPORTD) ; GET THE RESPONSE LD A,(KBDPORTD) ; GET THE RESPONSE
LD C,A LD C,A
EZ80_IO
IN A,(C) IN A,(C)
; CALL KBDQPUSH ; SAVE KEYBOARD SCAN CODE ; CALL KBDQPUSH ; SAVE KEYBOARD SCAN CODE
; RET ; RET
@ -144,6 +146,7 @@ KBDQPOP:
; RETURN A BYTE FROM THE KEYBOARD PORT ; RETURN A BYTE FROM THE KEYBOARD PORT
; ;
KBD_IN: KBD_IN:
EZ80_IO
IN A,(C) ; GET THE DATA VALUE IN A,(C) ; GET THE DATA VALUE
LD C,(IY+KBD_DAT) ; DATA PORT LD C,(IY+KBD_DAT) ; DATA PORT
EZ80_IO EZ80_IO

Loading…
Cancel
Save