1
0
mirror of https://github.com/cc65/cc65.git synced 2024-07-05 06:28:57 +00:00
cc65/libsrc/plus4/kbhit.s

22 lines
287 B
ArmAsm
Raw Normal View History

;
; Ullrich von Bassewitz, 06.08.1998
;
; int kbhit (void);
;
.export _kbhit
.import return0, return1
.include "plus4.inc"
_kbhit:
lda KEY_COUNT ; Get number of characters
ora FKEY_COUNT ; Or with number of chars from function keys
bne L1
jmp return0
L1: jmp return1