Blob Blame History Raw
From da01286037dd1e396b15d756a401240c14b277a7 Mon Sep 17 00:00:00 2001
From: Fabrizio Caruso <fabrizio_caruso@hotmail.com>
Date: Tue, 15 Oct 2019 22:25:26 +0200
Subject: [PATCH 076/170] Tentative solution for cgetc in Lynx

---
 libsrc/lynx/cgetc.s | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/libsrc/lynx/cgetc.s b/libsrc/lynx/cgetc.s
index b61fb44f..19cfdaff 100644
--- a/libsrc/lynx/cgetc.s
+++ b/libsrc/lynx/cgetc.s
@@ -20,13 +20,13 @@
 ; So the keyboard returns '1', '2', '3', 'P', 'R', 'F' or '?'.
 
 _cgetc:
-        lda     KBSTL
-        ora     KBEDG
-        bne     @L1
         jsr     _kbhit          ; Check for char available
+        bne     @L1        
         tax                             ; Test result
         bra     _cgetc
 @L1:
+        lda     KBSTL
+        ora     KBEDG
         ldx     #0
         and     #1
         beq     @L6
-- 
2.26.0