svnno****@sourc*****
svnno****@sourc*****
2017年 2月 23日 (木) 07:10:00 JST
Revision: 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