X-Git-Url: https://git.sur5r.net/?a=blobdiff_plain;f=libsrc%2Fgeos%2Fconio%2Fkbhit.s;h=6756f49c9391c0260bf710ee4d2d84c1b5ab21c3;hb=9948b5acfe552de93cfb3bd9495babf19a7f3814;hp=4f065cdfee786be539ed411da232f22c28a1006f;hpb=8ce6c9bcac6a2710f66233a1485576fd7ca31cfd;p=cc65

diff --git a/libsrc/geos/conio/kbhit.s b/libsrc/geos/conio/kbhit.s
index 4f065cdfe..6756f49c9 100644
--- a/libsrc/geos/conio/kbhit.s
+++ b/libsrc/geos/conio/kbhit.s
@@ -7,13 +7,16 @@
 ; unsigned char kbhit (void);
 
 	    .export _kbhit
-	    .import return0, return1
 
-	    .include "../inc/jumptab.inc"
 	    .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