Fixed bug where garbage character was left after INPUT

neilsf · Jan 18, 2021 · 4bf7aa7 · 4bf7aa7
1 parent 24466d2
commit 4bf7aa7
Show file tree

Hide file tree

Showing 3 changed files with 8 additions and 6 deletions.
diff --git a/VERSION b/VERSION
@@ -1 +1 @@
-v2.3.09
+v2.3.10
diff --git a/lib/strings.asm b/lib/strings.asm
@@ -285,13 +285,15 @@ STR_INPUT	SUBROUTINE
 	lda #$00
 	sta (R2),y
 	
-	; turn off cursor 
-	ldy $d3
-	lda ($d1),y
-	ora #%01111111
+	; turn off cursor
+	sei
+	ldy $d3 ; y pos of cursor
+	lda $ce ; character under cursor
+	and #%01111111
 	sta ($d1),y
 	lda #$ff
 	sta $cc
+	cli
 	
 	rts
 	

diff --git a/source/app.d b/source/app.d
@@ -27,7 +27,7 @@ string listfile="";
  * Version
  */
 
-string compiler_version = "v2.3.09";
+string compiler_version = "v2.3.10";
 
 /**
  * Application entry point