|
|
|
@ -211,8 +211,10 @@ MKY_INIT: |
|
|
|
; C - OUTPUT (ROW LINE SELECTION) |
|
|
|
|
|
|
|
LD A, PPICMD_COMMAND | PPICMD_GA_MODE_0 | PPICMD_GB_MODE_0 | PPICMD_A_IN | PPICMD_B_IN | PPICMD_CLOW_OUT | PPICMD_CHIGH_OUT |
|
|
|
EZ80_IO |
|
|
|
OUT (MKY_REGCMD), A |
|
|
|
LD A, 64 ; CAPS OFF |
|
|
|
EZ80_IO |
|
|
|
OUT (MKY_REGC), A |
|
|
|
RET |
|
|
|
; |
|
|
|
@ -368,8 +370,10 @@ MKY_SETLEDS: |
|
|
|
; TURN THE CAPS LED LIGHT ON |
|
|
|
; |
|
|
|
MKY_LEDCAPSON: |
|
|
|
EZ80_IO |
|
|
|
IN A, (MKY_REGC) |
|
|
|
RES 6, A |
|
|
|
EZ80_IO |
|
|
|
OUT (MKY_REGC), A |
|
|
|
RET |
|
|
|
; |
|
|
|
@ -378,8 +382,10 @@ MKY_LEDCAPSON: |
|
|
|
; TURN THE CAPS LED LIGHT OFF |
|
|
|
; |
|
|
|
MKY_LEDCAPSOFF: |
|
|
|
EZ80_IO |
|
|
|
IN A, (MKY_REGC) |
|
|
|
SET 6, A |
|
|
|
EZ80_IO |
|
|
|
OUT (MKY_REGC), A |
|
|
|
RET |
|
|
|
|
|
|
|
@ -740,6 +746,7 @@ MKY_INTSCAN1: |
|
|
|
|
|
|
|
; SCAN KEYBOARD AND STORE ALL COLUMN RESULTS PER ROW AT MKY_NEWKEY |
|
|
|
; |
|
|
|
EZ80_IO |
|
|
|
IN A, (MKY_REGC) ; READ AND MASK THE CURRENT STATE OF PPI PORT C |
|
|
|
AND $F0 |
|
|
|
LD D, A |
|
|
|
@ -747,7 +754,9 @@ MKY_INTSCAN1: |
|
|
|
LD HL, MKY_NEWKEY |
|
|
|
LD C, MKY_REGC |
|
|
|
MKY_SCAN_LP: |
|
|
|
EZ80_IO |
|
|
|
OUT (C), D ; SET ACTIVE ROW |
|
|
|
EZ80_IO |
|
|
|
IN A, (MKY_REGB) ; READ ACTIVE COLUMN DATA |
|
|
|
LD (HL), A ; STORE COLUMN READ VALUE |
|
|
|
INC HL |
|
|
|
|