Chewing_Bever
/
stj
Archived
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

added VT100 RI.

master
Aurélien Aptel 2010-02-21 14:39:31 +01:00
parent 636c369d86
commit 639f16d200
1 changed files with 9 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
st.c
View File

@ -860,6 +860,13 @@ tputc(char c) {
tmoveto(term.c.x-1, term.c.y); tmoveto(term.c.x-1, term.c.y);
term.esc = 0; term.esc = 0;
break; break;
case 'M': /* RI -- Reverse index */
if(term.c.y == term.top)
tinsertblankline(1);
else
tmoveto(term.c.x, term.c.y-1);
term.esc = 0;
break;
case '=': /* DECPAM */ case '=': /* DECPAM */
term.mode |= MODE_APPKEYPAD; term.mode |= MODE_APPKEYPAD;
term.esc = 0; term.esc = 0;
@ -870,9 +877,11 @@ tputc(char c) {
break; break;
case '7': case '7':
tcursor(CURSOR_SAVE); tcursor(CURSOR_SAVE);
term.esc = 0;
break; break;
case '8': case '8':
tcursor(CURSOR_LOAD); tcursor(CURSOR_LOAD);
term.esc = 0;
break; break;
default: default:
fprintf(stderr, "erresc: unknown sequence ESC %02X '%c'\n", c, isprint(c)?c:'.'); fprintf(stderr, "erresc: unknown sequence ESC %02X '%c'\n", c, isprint(c)?c:'.');