penguin86/pato-z80-home-computer
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Quick 2x2 keyboard test

Browse Source
This commit is contained in:
Daniele Verducci su MatissePenguin
2020-11-01 21:11:42 +01:00
parent de09c0353e
commit dbca35cfc5
3 changed files with 29 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

22
assembly/bios/driver_keyboard.asm
View File

@@ -27,4 +27,24 @@
; Reads the keyboard
; @return: a 0-terminated array of keycodes representing the pressed keys
Keyb_read:
in (KEYB_A0_REG),a
in a, (KEYB_A0_REG)
cp 0
jp z, _keyb_read_a1
add a, %01000000
call Lcd_printc ; A already contains char to print
_loop:
in a, (KEYB_A0_REG)
cp 0
jp nz, _loop
ret
_keyb_read_a1:
in a, (KEYB_A1_REG)
cp 0
ret z
add a, %01010000
call Lcd_printc ; A already contains char to print
_loop2:
in a, (KEYB_A1_REG)
cp 0
jp nz, _loop2
ret