mirror of
https://github.com/bobbimanners/emailler.git
synced 2025-02-23 15:28:59 +00:00
Fixed Cursor Control Key Codes.
http://vt100.net/docs/vt100-ug/table3-6.html says that ESC O A..D is to be send if Cursor Key Mode is set and http://vt100.net/docs/vt100-ug/chapter3.html says "A mode is considered set until it is reset by a reset mode (RM) control sequence.". So ESC O A..D is the default. Beside this spec perspective sending ESC O A..D instead of ESC [ A..D makes i.e. aptitude and midnight commander work out-of-the-box.
This commit is contained in:
parent
29587a1ebe
commit
9362e6d00c
@ -814,10 +814,10 @@ POrts rts
|
||||
;
|
||||
; -------------------------------------
|
||||
|
||||
ScrsrU .byt $1b, $5b, $41, $00 ; esc [ A
|
||||
ScrsrD .byt $1b, $5b, $42, $00 ; esc [ B
|
||||
ScrsrR .byt $1b, $5b, $43, $00 ; esc [ C
|
||||
ScrsrL .byt $1b, $5b, $44, $00 ; esc [ D
|
||||
ScrsrU .byt $1b, $4f, $41, $00 ; esc O A
|
||||
ScrsrD .byt $1b, $4f, $42, $00 ; esc O B
|
||||
ScrsrR .byt $1b, $4f, $43, $00 ; esc O C
|
||||
ScrsrL .byt $1b, $4f, $44, $00 ; esc O D
|
||||
|
||||
CmdKey tya ; restore character
|
||||
|
||||
|
@ -976,10 +976,10 @@ POrts rts
|
||||
; params: key in y
|
||||
; -------------------------------------
|
||||
|
||||
ScrsrU .byt $1b, $5b, $41, $00 ; esc [ A
|
||||
ScrsrD .byt $1b, $5b, $42, $00 ; esc [ B
|
||||
ScrsrR .byt $1b, $5b, $43, $00 ; esc [ C
|
||||
ScrsrL .byt $1b, $5b, $44, $00 ; esc [ D
|
||||
ScrsrU .byt $1b, $4f, $41, $00 ; esc O A
|
||||
ScrsrD .byt $1b, $4f, $42, $00 ; esc O B
|
||||
ScrsrR .byt $1b, $4f, $43, $00 ; esc O C
|
||||
ScrsrL .byt $1b, $4f, $44, $00 ; esc O D
|
||||
|
||||
StrKey tya ; restore key
|
||||
|
||||
|
Loading…
x
Reference in New Issue
Block a user