1
0
mirror of https://github.com/cc65/cc65.git synced 2024-11-16 18:08:04 +00:00
cc65/libsrc/cx16/kbhit.s

18 lines
381 B
ArmAsm

;
; 2022-03-28, Greg King
;
; unsigned char kbhit (void);
; /* Returns non-zero (true) if a typed character is waiting. */
;
.export _kbhit
.import KBDBUF_PEEK
.proc _kbhit
jsr KBDBUF_PEEK
txa ; Low byte of return (only its zero/nonzero ...
rts ; ... state matters)
.endproc