getk.asm
bitfixer_bitfixer/dg/z88dk/libsrc/stdio/x1/getk.asm
;
;       Sharp X1 Stdio
;
;       getk() - Read key status
;
;       Karl Von Dyson (for X1s.org) - 24/10/2013
;

        PUBLIC getk
        EXTERN _x1_keyboard_io

getk:
        ld hl, _x1_keyboard_io
        ld a, (hl)
        ld h, 0
        ld l, a
	ret
