From 2bd798fa13fffa2a73df3ca46285a59fd020f6bc Mon Sep 17 00:00:00 2001
From: Fabrizio Caruso <fabrizio_caruso@hotmail.com>
Date: Wed, 30 Oct 2019 18:32:35 +0100
Subject: [PATCH 085/170] Optimizations

---
 libsrc/lynx/cgetc.s | 9 ++-------
 libsrc/lynx/kbhit.s | 2 +-
 2 files changed, 3 insertions(+), 8 deletions(-)

diff --git a/libsrc/lynx/cgetc.s b/libsrc/lynx/cgetc.s
index 368a0e8d..362371ec 100644
--- a/libsrc/lynx/cgetc.s
+++ b/libsrc/lynx/cgetc.s
@@ -19,14 +19,10 @@
 ; and Opt1 + Opt2 pressed '3'.
 ; So the keyboard returns '1', '2', '3', 'P', 'R', 'F' or '?'.
 
-_cgetc:
-        lda     KBEDG
-        bne     _start     
+_cgetc:   
         jsr     _kbhit          ; Check for char available
         beq     _cgetc
-_start:
-        lda     KBSTL
-        ora     KBEDG
+        ora     KBSTL
         ldx     #0
         and     #1
         beq     @L5
@@ -55,7 +51,6 @@ _start:
         bra     reset_and_exit
 @L5:
         lda     KBEDG           ; No Pause pressed
-        stz     KBEDG
         ora     KBSTL
         bit     #$08
         beq     @L7
diff --git a/libsrc/lynx/kbhit.s b/libsrc/lynx/kbhit.s
index a846c43e..90d9061c 100644
--- a/libsrc/lynx/kbhit.s
+++ b/libsrc/lynx/kbhit.s
@@ -51,6 +51,6 @@ _kbhit:
         sta     KBNPR           ; inverted previous ones pressed
         stx     KBPRV
         lda     KBEDG
-L1:     ldx     #$00                     
+L1:     tax
         rts
 
-- 
2.26.0