From: jede <jede@oric.org>
Date: Mon, 16 Oct 2017 16:15:53 +0000 (+0200)
Subject: Optimizing (from Polluks tip)
X-Git-Tag: V2.17~86^2~3
X-Git-Url: https://git.sur5r.net/?a=commitdiff_plain;h=195b5f0a07e4efaf4675437aca0426be8006c69f;p=cc65

Optimizing (from Polluks tip)
---

diff --git a/libsrc/telestrat/cgetc.s b/libsrc/telestrat/cgetc.s
index 2b0fc7758..6a6b23318 100644
--- a/libsrc/telestrat/cgetc.s
+++ b/libsrc/telestrat/cgetc.s
@@ -10,7 +10,7 @@
 .proc _cgetc
         ; this routine could be quicker if we wrote in page 2 variables, 
         ; but it's better to use telemon routine in that case, because telemon can manage 4 I/O
-        lda     cursor       ; if cursor equal to 0, then switch off cursor
+        ldx     cursor       ; if cursor equal to 0, then switch off cursor
         beq     switchoff_cursor
        
         ldx     #$00         ; x is the first screen
@@ -18,7 +18,7 @@
         jmp     loop         ; could be replaced by a bne/beq but 'jmp' is cleaner than a bne/beq which could expect some matters
         
 switchoff_cursor:        
-        ldx     #$00         ; x is the first screen
+        ; at this step X is equal to $00, X must be set, because it's the id of the screen (telestrat can handle 4 virtuals screen)
         BRK_TELEMON(XCOSCR)  ; switch off cursor        
         
 loop: