1 byte donation for Fabrizio ;)

diff --git a/libsrc/vic20/cgetc.s b/libsrc/vic20/cgetc.s
index 4d3a30ea2ad05359f2ceb1504bcfbc2c235780a1..05f2f68dc0d9c916432f18cca4100984a7c97846 100644 (file)
--- a/libsrc/vic20/cgetc.s
+++ b/libsrc/vic20/cgetc.s
@@ -40,8 +40,8 @@ L3:     jsr     KBDREAD         ; Read char and return in A
         bne     seton           ; Go set it on
         lda     CURS_FLAG       ; Is the cursor currently off?
         bne     crs9            ; Jump if yes
-        lda     #1
-        sta     CURS_FLAG       ; Mark it as off
+        inx                     ; X is now 1 
+        stx     CURS_FLAG       ; Mark it as off
         lda     CURS_STATE      ; Cursor currently displayed?
         beq     crs8            ; Jump if no
         ldy     CURS_X          ; Get the character column