fixed cursor position report

- verified DECOM behavior - was missing [ write.
2021-11-28 14:45:03 -05:00 · 2021-11-28 14:45:03 -05:00 · cd1397e3cf
parent 3e53d52226
commit cd1397e3cf
1 changed files with 9 additions and 2 deletions
--- a/vt100.csi.S
+++ b/vt100.csi.S
@ -787,12 +787,19 @@ csi_n  ; status report
 	lda #'n'
 	jmp write_modem
 :cpr ; cursor report
-* TODO - verify and support DECOM
+* returned y is in terms of DECOM.
 	lda #ESC
 	jsr write_modem
 	lda #'['
+	jsr write_modem
+
 	lda y
-	inc
+	bit DECOM
+	bpl :y
+	sec
+	sbc DECTM
+
+:y	inc
 	jsr write_digit
 	lda #';'
 	jsr write_modem