Squeezed bytes and cycles out of the kbhit functions for almost all platforms.

git-svn-id: svn://svn.cc65.org/cc65/trunk@4480 b7a2c559-68d2-44c3-8de9-860c34a00d81
2009-11-24 18:31:16 +00:00
parent 7357b44104
commit bfbf94404b
11 changed files with 111 additions and 80 deletions
--- a/libsrc/geos/conio/kbhit.s
+++ b/libsrc/geos/conio/kbhit.s
@@ -7,12 +7,16 @@
 ; unsigned char kbhit (void);

 	    .export _kbhit
-	    .import return0, return1

 	    .include "../inc/geossym.inc"

-_kbhit:
-	    lda pressFlag
-	    bmi L1
-	    jmp return0
-L1:	    jmp return1
+.proc   _kbhit
+
+        ldx     #0              ; High byte of result
+        lda     pressFlag
+        rol                     ; Bit 7 is new key flag
+        txa                     ; A = 0
+        rol
+        rts
+
+.endproc