]> git.sur5r.net Git - cc65/blob - libsrc/cbm510/kbhit.s
5ef5e63ae71406cd11595c8472821f919b9f8b19
[cc65] / libsrc / cbm510 / kbhit.s
1 ;
2 ; Ullrich von Bassewitz, 06.08.1998
3 ;
4 ; int kbhit (void);
5 ;
6
7         .export         _kbhit
8         .import         return0, return1
9
10         .include        "zeropage.inc"
11
12 .proc   _kbhit
13         lda     KeyIndex        ; Get number of characters
14         bne     L1
15         jmp     return0
16 L1:     jmp     return1
17 .endproc
18
19
20
21
22
23