diff options
-rw-r--r-- | programs/sub-suite/subeditor.s | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/programs/sub-suite/subeditor.s b/programs/sub-suite/subeditor.s index d527f95..1053790 100644 --- a/programs/sub-suite/subeditor.s +++ b/programs/sub-suite/subeditor.s @@ -970,7 +970,7 @@ shftln: esc: lda status ; Get the next character. lda kbd ; - cmp #$1B ; Is this character an escape character? + cmp #'\e' ; Is this character an escape character? beq shftesc ; Yes, so check the other set of escape routines. lda status ; No, so wait for the next character. beq @end ; We have an error, so discard it, and go back to getting user input. @@ -1232,7 +1232,7 @@ update_pos: jsr update_ptr ; Update the screen buffer index. tay ; Place the index into the Y register. tba ; Reset A. - mov scr, #$1B ; Print an escape character to the screen. + mov scr, #'\e' ; Print an escape character to the screen. mov scr, #'[' ; Print '[' to the screen, and start the escape sequence. jsr getrow ; Start printing the row number to the screen. mov scr, #';' ; Print ';' to the screen. |