svnno****@sourc*****
svnno****@sourc*****
2009年 4月 1日 (水) 23:24:04 JST
Tera TermRevision: 3273
http://svn.sourceforge.jp/view?root=ttssh2&view=rev&rev=3273
Author: doda
Date: 2009-04-01 23:24:04 +0900 (Wed, 01 Apr 2009)
Log Message:
-----------
WYSTCURM / WYULCURM 制御シーケンスに対応。
WYSTCURM:
<CSI> [ 33 h -- カーソル非点滅
<CSI> [ 33 l -- カーソル点滅
WYULCURM:
<CSI> [ 34 h -- 下線カーソル
<CSI> [ 34 l -- ブロックカーソル
WYSTCURM / WYULCURM は厳密にはECMA-48に従っていないが、現状ではサポートしても問題ないと思われる。
Modified Paths:
--------------
trunk/teraterm/teraterm/vtterm.c
-------------- next part --------------
Modified: trunk/teraterm/teraterm/vtterm.c
===================================================================
--- trunk/teraterm/teraterm/vtterm.c 2009-04-01 13:49:05 UTC (rev 3272)
+++ trunk/teraterm/teraterm/vtterm.c 2009-04-01 14:24:04 UTC (rev 3273)
@@ -1471,6 +1471,14 @@
ts.CRSend = IdCRLF;
cv.CRSend = IdCRLF;
break;
+ case 33:
+ ts.NonblinkingCursor = TRUE;
+ ChangeCaret();
+ break;
+ case 34:
+ ts.CursorShape = IdHCur;
+ ChangeCaret();
+ break;
}
}
@@ -1509,6 +1517,14 @@
ts.CRSend = IdCR;
cv.CRSend = IdCR;
break;
+ case 33:
+ ts.NonblinkingCursor = FALSE;
+ ChangeCaret();
+ break;
+ case 34:
+ ts.CursorShape = IdBlkCur;
+ ChangeCaret();
+ break;
}
}