svnno****@sourc*****
svnno****@sourc*****
2017年 2月 23日 (木) 07:10:00 JST
Tera TermRevision: 6607
http://sourceforge.jp/projects/ttssh2/scm/svn/commits/6607
Author: maya
Date: 2017-02-23 07:10:00 +0900 (Thu, 23 Feb 2017)
Log Message:
-----------
setflowctrl マクロコマンドを追加した
Modified Paths:
--------------
trunk/teraterm/teraterm/ttdde.c
trunk/teraterm/ttpmacro/ttl.c
trunk/teraterm/ttpmacro/ttmdde.h
trunk/teraterm/ttpmacro/ttmparse.c
trunk/teraterm/ttpmacro/ttmparse.h
-------------- next part --------------
Modified: trunk/teraterm/teraterm/ttdde.c
===================================================================
--- trunk/teraterm/teraterm/ttdde.c 2017-02-22 14:59:07 UTC (rev 6606)
+++ trunk/teraterm/teraterm/ttdde.c 2017-02-22 22:10:00 UTC (rev 6607)
@@ -369,6 +369,7 @@
#define CmdLogRotate 'W'
#define CmdLogAutoClose 'X'
#define CmdGetModemStatus 'Y'
+#define CmdSetFlowCtrl 'Z'
HDDEDATA AcceptExecute(HSZ TopicHSz, HDDEDATA Data)
{
@@ -925,6 +926,24 @@
}
break;
+ case CmdSetFlowCtrl:
+ {
+ int val;
+
+ if (!cv.Open || cv.PortType != IdSerial)
+ return DDE_FNOTPROCESSED;
+
+ val = atoi(ParamFileName);
+ switch(val) {
+ case 1:
+ case 2:
+ case 3:
+ ts.Flow = val;
+ break;
+ }
+ break;
+ }
+
case CmdSetRts: // add 'setrts' (2008.3.12 maya)
{
int val, ret;
Modified: trunk/teraterm/ttpmacro/ttl.c
===================================================================
--- trunk/teraterm/ttpmacro/ttl.c 2017-02-22 14:59:07 UTC (rev 6606)
+++ trunk/teraterm/ttpmacro/ttl.c 2017-02-22 22:10:00 UTC (rev 6607)
@@ -6254,6 +6254,8 @@
Err = TTLSetExitCode(); break;
case RsvSetFileAttr:
Err = TTLSetFileAttr(); break;
+ case RsvSetFlowCtrl:
+ Err = TTLCommCmdInt(CmdSetFlowCtrl,0); break;
case RsvSetRts:
Err = TTLCommCmdInt(CmdSetRts,0); break;
case RsvSetSync:
Modified: trunk/teraterm/ttpmacro/ttmdde.h
===================================================================
--- trunk/teraterm/ttpmacro/ttmdde.h 2017-02-22 14:59:07 UTC (rev 6606)
+++ trunk/teraterm/ttpmacro/ttmdde.h 2017-02-22 22:10:00 UTC (rev 6607)
@@ -63,6 +63,7 @@
#define CmdLogRotate 'W'
#define CmdLogAutoClose 'X'
#define CmdGetModemStatus 'Y'
+#define CmdSetFlowCtrl 'Z'
#ifdef __cplusplus
extern "C" {
Modified: trunk/teraterm/ttpmacro/ttmparse.c
===================================================================
--- trunk/teraterm/ttpmacro/ttmparse.c 2017-02-22 14:59:07 UTC (rev 6606)
+++ trunk/teraterm/ttpmacro/ttmparse.c 2017-02-22 22:10:00 UTC (rev 6607)
@@ -348,6 +348,7 @@
else if (_stricmp(Str,"setecho")==0) *WordId = RsvSetEcho;
else if (_stricmp(Str,"setenv")==0) *WordId = RsvSetEnv; // reactivate 'setenv' (2007.8.31 maya)
else if (_stricmp(Str,"setexitcode")==0) *WordId = RsvSetExitCode;
+ else if (_stricmp(Str,"setflowctrl")==0) *WordId = RsvSetFlowCtrl;
else if (_stricmp(Str,"setpassword")==0) *WordId = RsvSetPassword; // add 'setpassword' (2012.5.23 yutaka)
else if (_stricmp(Str,"setrts")==0) *WordId = RsvSetRts; // add 'setrts' (2008.3.12 maya)
else if (_stricmp(Str,"setsync")==0) *WordId = RsvSetSync;
Modified: trunk/teraterm/ttpmacro/ttmparse.h
===================================================================
--- trunk/teraterm/ttpmacro/ttmparse.h 2017-02-22 14:59:07 UTC (rev 6606)
+++ trunk/teraterm/ttpmacro/ttmparse.h 2017-02-22 22:10:00 UTC (rev 6607)
@@ -248,6 +248,7 @@
#define RsvUptime 212
#define RsvGetModemStatus 213
#define RsvDirnameBox 214
+#define RsvSetFlowCtrl 215
#define RsvOperator 1000
#define RsvBNot 1001