From 1a83763337027424a0618af93bb5b8ccbd1d8108 Mon Sep 17 00:00:00 2001
From: simon <simon@cda61777-01e9-0310-a592-d414129be87e>
Date: Wed, 9 May 2001 13:35:08 +0000
Subject: [PATCH 1/1] From RDB: a few extra escape sequences seen in SCO
 terminals.

git-svn-id: svn://svn.tartarus.org/sgt/putty@1106 cda61777-01e9-0310-a592-d414129be87e
---
 terminal.c | 24 +++++++++++++++++++++++-
 1 file changed, 23 insertions(+), 1 deletion(-)

diff --git a/terminal.c b/terminal.c
index e1e97167..1fb7fced 100644
--- a/terminal.c
+++ b/terminal.c
@@ -1056,8 +1056,16 @@ void term_out(void)
 		paste_hold = 0;
 		logtraffic((unsigned char) c, LGTYP_ASCII);
 		break;
-	      case '\013':
 	      case '\014':
+		if (has_compat(SCOANSI)) {
+		    move(0, 0, 0);
+		    erase_lots(FALSE, FALSE, TRUE);
+		    disptop = 0;
+		    wrapnext = FALSE;
+		    seen_disp_event = 1;
+		    break;
+		}
+	      case '\013':
 		compatibility(VT100);
 	      case '\n':
 		if (curs.y == marg_b)
@@ -1615,6 +1623,20 @@ void term_out(void)
 			    deselect();
 			}
 			break;
+		      case 'S':
+			compatibility(SCOANSI);
+			scroll(marg_t, marg_b, def(esc_args[0], 1), TRUE);
+			fix_cpos;
+			wrapnext = FALSE;
+			seen_disp_event = TRUE;
+			break;
+		      case 'T':
+			compatibility(SCOANSI);
+			scroll(marg_t, marg_b, -def(esc_args[0], 1), TRUE);
+			fix_cpos;
+			wrapnext = FALSE;
+			seen_disp_event = TRUE;
+			break;
 		      case ANSI('|', '*'):
 			/* VT420 sequence DECSNLS
 			 * Set number of lines on screen
-- 
2.11.0