static void _SetValue(clsFaim3 _faim3, clsDevTestBits _line, int _val_2)
{
int _bit = -1;// 位
if (_faim3.dict_DevFunction.ContainsKey(_line.vName))
{
#region // BT_OUT
clsDevFunction _df = _faim3.dict_DevFunction[_line.vName]; //
int _devNo = _df.devNo; //设备号
int _refIdx = _faim3.sect_idev * _devNo;
_bit = _refIdx + _df.Index;//内存位
if (_df.varName.ToUpper() == "BT_OUT")
{
_faim3.Comm_Data.bt_out[0][_bit] = _val_2;//输出电位
}
#endregion
}
else if (_faim3._dim_dict.ContainsKey(_line.vName))
{
#region // _dim_dict 动态变量 dim[Feeder05_unLink] <== Value
_bit = _faim3._dim_dict[_line.vName]; // 内存位
_faim3._dim[_bit] = _val_2; // 直接设置, 用以联动
#endregion
}
else if (_line.vName.ToUpper().StartsWith("_FAIM3") ||
_line.vName.ToUpper().StartsWith("CLSFAIM3"))
{
F_TransCalc.doSetValue_byName(_faim3, _line.vName, _val_2);
}
}
// 设备号的来源可能为多个因素
public static void _204C(clsFaim3 _faim3, DAL_CommData _dao_comm, string IfType, string HL, int _devNo)
{
int _ref_1i = _devNo * _faim3.sect_iDev; // 偏移
int _ref_1s = _devNo * _faim3.sect_sDev + _faim3.sect_sDev_start; // 偏移
// 行号为消息
_faim3._sss[_ref_1s + _faim3.snd_sAsc] = IfType; // 命令
int _val_2 = F_TransCalc._Get_Value_2(_faim3, HL); // 文档的值: 数值
_faim3._sss[_ref_1s + _faim3.snd_sLen] = _val_2.ToString(); // 轴号表/行号
_faim3.Comm_Data.bt_out[0][_ref_1i] = -99;
_dao_comm.set_bt_out(_ref_1i, _devNo); // 设备 消息
}
static void _do_math(clsFaim3 _faim3, clsDevTestBits _line, int _val_2)
{
int _bit = 0;
if (_faim3._dim_dict.ContainsKey(_line.vName))
{
_bit = _faim3._dim_dict[_line.vName]; // 内存位 自定义名为下标, 分配地址, 寻址
_faim3._dim[_bit] += _val_2; // 直接设置, 无联动 dim[Feeder05] = Value
}
else if (_line.vName.ToUpper().StartsWith("_FAIM3") ||
_line.vName.ToUpper().StartsWith("CLSFAIM3"))
{
int _ls = Convert.ToInt32(F_TransCalc.doGetValue_byName(_faim3, _line.vName));
F_TransCalc.doSetValue_byName(_faim3, _line.vName, _ls + _val_2);
}
}
static int _Get_Value_2x(clsFaim3 v_faim3, string strFld)
{
string _str_2 = string.Empty;
return(F_TransCalc._Get_Value_2(v_faim3, strFld, ref _str_2));
}
// 测试变量 复位
private static void _TEST_2_Reset(clsFaim3 _faim3, DAL_CommData _dao_comm, string _flowName, string _caseName)
{
clsFlow _flow = _faim3.dict_Flow[_flowName];
string _alartCase = _flow.alartCase;
Dictionary <string, clsCaseChildInfo> _dictCaseChildInfo =
_faim3.dict_CaseState[_alartCase].dict_CaseChildInfo;
string PartName = _TESTB;// "TESTB";
if (!_dictCaseChildInfo.ContainsKey(PartName))
{
return; // 没有此段
}
int _lineStart = _dictCaseChildInfo[PartName].lineStart; // 起始行号
if (_lineStart < 0)
{
return; // 条件：没有指定的结构块起始行号
}
int _lineEnd = _dictCaseChildInfo[PartName].lineEnd; // 终止行号
if (_lineEnd < 0) // 只有一行时
{
_lineEnd = _lineStart;
}
for (int i = _lineStart; i <= _lineEnd; i++)// 文档对象驱动
{
if (_faim3.isEmergency > 0)
{
break; // 急停
}
#region // for
clsDevTestBits _line = _faim3.lst_DevTestBits[i];
if (_line.Remark.ToUpper().StartsWith("CODE") ||
_line.IfType.ToUpper() == "NG")
{
continue; //条件：文档行指定为以代码实现
}
if (_line.isDebug == 1) /*#*/
{
if (_faim3.dict_KV["isDebug"] != "1") // 非 debug 状态下，不运行 debug 行 cfgDev_Cards.xls
{
continue;
}
}
if (string.IsNullOrEmpty(_line.Reset) || _line.Reset == "-")
{
continue; // 无复位值
}
_do_WaitLine(_faim3, _dao_comm, _flowName, eWF_State.Reset, i); // 单步
if (_faim3.isEmergency > 0)
{
break; // 急停
}
#region // 开始执行
_line = _faim3.lst_DevTestBits[i];
int _bit = -1; // 位
int _val_3 = F_TransCalc._Get_Value_2(_faim3, _line.Reset);
if (_faim3.dict_DevFunction.ContainsKey(_line.vName))
{
#region // dict_DevFunction IO口定义
clsDevFunction _df = _faim3.dict_DevFunction[_line.vName]; //
_bit = _df.devNo * _faim3.sect_iDev + _df.Index; // 内存位
_faim3.Comm_Data.bt_in[0][_bit] = _val_3; // 还原值
#endregion
}
else if (_faim3._dim_dict.ContainsKey(_line.vName))
{
#region // _dim_dict 动态变量测试
_bit = _faim3._dim_dict[_line.vName]; // 内存位 自定义名为下标, 分配地址, 寻址
_faim3._dim[_bit] = _val_3;
#endregion
}
else if (_line.vName.ToUpper().StartsWith("_FAIM3") ||
_line.vName.ToUpper().StartsWith("CLSFAIM3"))
{
#region // _FAIM3 大数据
F_TransCalc.doSetValue_byName(_faim3, _line.vName, _val_3);
#endregion
}
#endregion
#endregion
}
}
static int getSendData(clsFaim3 _faim3, string vCmdName, string vHL, string vReset)
{
int _devNo = -1;
if (_faim3.dict_CmdFormats.ContainsKey(vCmdName))
{
_devNo = Convert.ToInt32(_faim3.dict_CmdFormats[vCmdName].devNo);//[0] cfgCmdFormat.xls
}
else if (_faim3.dict_DevFunction.ContainsKey(vCmdName))
{
_devNo = _faim3.dict_DevFunction[vCmdName].devNo;//[0] cfgDev_Function.xls
vCmdName = _faim3.dict_DevFunction[vCmdName].varName;
}
else
{
F_Log.Error_4("clsProtocol.getSendData()",
string.Format(" --->>>> 此命令不存在 {0} {1} {2}", vCmdName, vHL, vReset));
return(-1); //没有此命令 模板
}
int _ref_1i = _faim3.sect_iDev * _devNo;
int _ref_1s = _faim3.sect_sDev * _devNo + _faim3.sect_sDev_start;
string _str_HL = " ";
string _str_Reset = " ";
int _val_HL = F_TransCalc._Get_Value_2(_faim3, vHL, ref _str_HL);
int _val_Reset = F_TransCalc._Get_Value_2(_faim3, vReset, ref _str_Reset);
clsCommonInfo _en = null;
if (_val_Reset > 0)
{
if (_faim3.dict_CommonInfo.ContainsKey(_val_Reset)) // 可能是表值 tb_CommonInfo.xls
{
_en = _faim3.dict_CommonInfo[_val_Reset];
}
}
switch ((eDeviceName)_devNo)
{
case eDeviceName.RS485_6:
#region // RS485_6
if (_en != null) // 有表值 tb_CommonInfo.xls
{
#region // SeekHome Home_Dir
switch (vCmdName)
{
case "SeekHome":
SeekHome _SeekHome = _faim3._SeekHome;
_SeekHome.v02.OutputNum = F_Parse._ConverToInt(clsFaim3.StringFormat(_faim3, _en.val_01));
_SeekHome.v03.Condition = F_Parse._ConverToInt(clsFaim3.StringFormat(_faim3, _en.val_02));
break;
case "Home_Dir":
Home_Dir _Home_Dir = _faim3._Home_Dir;
_Home_Dir.v02.Acc = F_Parse._ConverToDouble(clsFaim3.StringFormat(_faim3, _en.val_01));
_Home_Dir.v03.Dec = F_Parse._ConverToInt(clsFaim3.StringFormat(_faim3, _en.val_02));
_Home_Dir.v04.Vel = F_Parse._ConverToDouble(clsFaim3.StringFormat(_faim3, _en.val_03));
_Home_Dir.v05.Location = F_Parse._ConverTofloat(clsFaim3.StringFormat(_faim3, _en.arr_01[0]));
_Home_Dir.v06.Location = F_Parse._ConverTofloat(clsFaim3.StringFormat(_faim3, _en.arr_01[1]));
break;
}
#endregion
}
clsProt485 _485 = new clsProt485(_faim3);
_485.Out_Ready(vCmdName, _val_HL); // 485 对象
break;
#endregion
case eDeviceName.TCP_5:
case eDeviceName.TCP_8:
case eDeviceName.TCP_9:
string _Format2 = _faim3.dict_CmdFormats[vCmdName].Format; //[2]; 模板
//clsRobot_AZ _az = new clsRobot_AZ(_faim3);
List <string> _lstPara = new List <string>();
if (_val_HL != -999)
{
// $GetVariable,{0}&CrLf
if (!string.IsNullOrEmpty(vHL))
{
_lstPara.Add(vHL);
}
}
else if (_str_HL != " ")
{
if (!string.IsNullOrEmpty(vHL))
{
_lstPara.Add(_str_HL);
}
}
if (_en != null) // 有表值
{
// J Point {0} {1} {2} {3}
if (!string.IsNullOrEmpty(_en.val_01))
{
_lstPara.Add(clsFaim3.StringFormat(_faim3, _en.val_01));
}
if (!string.IsNullOrEmpty(_en.val_02))
{
_lstPara.Add(clsFaim3.StringFormat(_faim3, _en.val_02));
}
if (!string.IsNullOrEmpty(_en.val_03))
{
_lstPara.Add(clsFaim3.StringFormat(_faim3, _en.val_03));
}
if (!string.IsNullOrEmpty(_en.arr_1))
{
_lstPara.Add(clsFaim3.StringFormat(_faim3, _en.arr_1));
}
if (!string.IsNullOrEmpty(_en.arr_2))
{
_lstPara.Add(clsFaim3.StringFormat(_faim3, _en.arr_2));
}
if (!string.IsNullOrEmpty(_en.arr_3))
{
_lstPara.Add(clsFaim3.StringFormat(_faim3, _en.arr_3));
}
}
_faim3._sss[_ref_1s] = ""; // 非标准二进制字节码
string _cmd = F_TransCalc.StringFormat(_Format2, _lstPara);
_faim3._sss[_ref_1s + _faim3.snd_sAsc] = _cmd; //
string _Echo4 = _faim3.dict_CmdFormats[vCmdName].Echo; //[4]; 反馈
_faim3._sss[_ref_1s + _faim3.test_sLoc] = _Echo4;
break;
}
return(_devNo);
}
static bool do_Compare(clsFaim3 _faim3, clsDevTestBits _line)
{
bool _mybl = true;
string _str_2 = " ";
int _bit = -1;
int _val_1 = -1;
int _val_2 = F_TransCalc._Get_Value_2(_faim3, _line.HL, ref _str_2);
if (_faim3.dict_DevFunction.ContainsKey(_line.vName))
{
#region // dict_DevFunction IO口定义
clsDevFunction _df = _faim3.dict_DevFunction[_line.vName]; //
_bit = _df.devNo * _faim3.sect_iDev + _df.Index; // 内存位
switch (_df.varName.ToUpper())
{
case "BT_OUT":
_val_1 = _faim3.Comm_Data.bt_out[0][_bit];
break;
case "BT_IN":
//_val_1 = _faim3.Comm_Data.bt_in[0][_bit];
//break;
case "BT_ST":
//clsProtocol._204C(_faim3, _dao_comm, _df.devNo, "A_ST", _df.ioIdx.ToString()); // 发出命令
//_val_1 = _faim3.Comm_Data.bt_in[0][_bit]; // 取出值, 可能多次才能取到
//break;
case "BT_IO":
//clsProtocol._204C(_faim3, _dao_comm, _df.devNo, "A_IO", _df.ioIdx.ToString()); // 发出命令
_val_1 = _faim3.Comm_Data.bt_in[0][_bit]; // 取出值, 可能多次才能取到
break;
}
#endregion
}
else if (_faim3._dim_dict.ContainsKey(_line.vName))
{
#region // _dim_dict 动态变量
_bit = _faim3._dim_dict[_line.vName]; // 自定义名为下标, 分配地址, 寻址
_val_1 = _faim3._dim[_bit];
#endregion
}
else if (_line.vName.ToUpper().StartsWith("_FAIM3") ||
_line.vName.ToUpper().StartsWith("CLSFAIM3"))
{
#region // _FAIM3 大数据
_bit = 1;
_val_1 = Convert.ToInt32(F_TransCalc.doGetValue_byName(_faim3, _line.vName));
#endregion
}
// 可以比较
if (_bit > -1)
{
#region // 比较 IF_EQ IF_NE IF_GT IF_GE IF_LT IF_LE
if (_line.IfType == "EQ" ||
_line.IfType == "IF" || _line.IfType == "IF_EQ" ||
_line.IfType == "WHILE" || _line.IfType == "WHIL")
{
_mybl = (_val_1 == _val_2);//
}
else if (_line.IfType == "NE" || _line.IfType == "IF_NE" || _line.IfType == "WHILE_NE")
{
_mybl = (_val_1 != _val_2);//
}
else if (_line.IfType == "GT" || _line.IfType == "IF_GT" || _line.IfType == "WHILE_GT")
{
_mybl = (_val_1 > _val_2);//
}
else if (_line.IfType == "GE" || _line.IfType == "IF_GE" || _line.IfType == "WHILE_GE")
{
_mybl = (_val_1 >= _val_2);//
}
else if (_line.IfType == "LT" || _line.IfType == "IF_LT" || _line.IfType == "WHILE_LT")
{
_mybl = (_val_1 < _val_2);//
}
else if (_line.IfType == "LE" || _line.IfType == "IF_LE" || _line.IfType == "WHILE_LE")
{
_mybl = (_val_1 <= _val_2);//
}
else
{
_mybl = false;
}
#endregion // 测试 AND
}
return(_mybl);
}
// _PART_CMD("PARTA") "PARTC"
static void _PART_CMD(clsFaim3 _faim3, DAL_CommData _dao_comm, string _flowName, string _caseName, string PartName)
{
#region // 条件
clsFlow _flow = _faim3.dict_Flow[_flowName];
string _alartCase = _flow.alartCase; // _caseName 可能后带有 _T 标记
clsCaseState _caseState = _faim3.dict_CaseState[_alartCase];
Dictionary <string, clsCaseChildInfo> _dictCaseChildInfo =
_caseState.dict_CaseChildInfo;
if (!_dictCaseChildInfo.ContainsKey(PartName))
{
return; // 条件：指定步骤无此部份指令
}
int _lineStart = _dictCaseChildInfo[PartName].lineStart;
if (_lineStart < 0)
{
return; // 条件：没有指定的结构块起始行号
}
int _lineEnd = _dictCaseChildInfo[PartName].lineEnd;
if (_lineEnd < 0) // 只有一行时
{
_lineEnd = _lineStart;
}
#endregion
// "DIM.GOTO.ADD.DEC.INC.OUT.OUT_A.OUT_T.OUT_AOK.OUT_TOK"
for (int i = _lineStart; i <= _lineEnd; i++) // 文档对象驱动
{
#region // for
if (_faim3.isEmergency > 0)
{
break; // 急停
}
#region // 忽略 CODE isDebug #
clsDevTestBits _line = _faim3.lst_DevTestBits[i];
if (_line.Remark.ToUpper().StartsWith("CODE"))
{
continue; //条件：文档行指定为以代码实现
}
if (F_CaseSub._CMD_NULL.Contains(_line.IfType.ToUpper())) // 占位行
{
continue;
}
if (_line.isDebug == 1) /*#*/ // cfgDev_testBits #
{
if (_faim3.dict_KV["isDebug"] != "1") // 非 debug 状态下，不运行 debug 行 cfgDev_Cards.xls
{
continue;
}
}
#endregion
#region // 暂停别
eWF_State _state = eWF_State.Free;
#region // 可置于 vName 列的指令
string _IfType = _line.vName.ToUpper();
switch (_IfType)
{
case "SLEEP":
case "DELAY":
case "WAIT": // WAIT 2
case "TIMW": // WAIT 2
_state = eWF_State.Sleep;
_do_WaitLine(_faim3, _dao_comm, _flowName, _state, i); //
break;
case "GOTO":
case "JMP":
case "NEXT":
case "NEXTCASE":
_state = eWF_State.JMP;
_do_WaitLine(_faim3, _dao_comm, _flowName, _state, i); //
break;
}
#endregion
#region // 可置于 IfType 列的指令
if (_state == eWF_State.Free) //
{
_IfType = _line.IfType.ToUpper();
switch (_IfType) // IfType
{
case "SLEEP":
case "DELAY":
case "TIMW": // WAIT 1
_state = eWF_State.Sleep;
_do_WaitLine(_faim3, _dao_comm, _flowName, _state, i); //
break;
case "GOTO":
case "JMP":
case "NEXT":
case "NEXTCASE":
_state = eWF_State.JMP;
_do_WaitLine(_faim3, _dao_comm, _flowName, _state, i); //
break;
case "ADD":
case "SUB":
case "INC":
case "DEC":
_state = eWF_State.Math;
_do_WaitLine(_faim3, _dao_comm, _flowName, _state, i); //
break;
case "OUT":
case "SEND":
case "MBUS":
case "CONN":
_state = eWF_State.Send;
_do_WaitLine(_faim3, _dao_comm, _flowName, _state, i); //
break;
default: // 其它
_do_WaitLine(_faim3, _dao_comm, _flowName, eWF_State.Line, i); //
break;
}
}
#endregion
#endregion
if (_faim3.isEmergency > 0)
{
break; // 急停
}
#region // 开始执行
System.Diagnostics.Stopwatch _tmr = new System.Diagnostics.Stopwatch(); //实例化一个计时器
_tmr.Start();
long _trm_begin = _tmr.ElapsedMilliseconds; // 毫秒
#region // TITL TBNO
string _str_1 = " "; // 值 vName
string _str_2 = " "; // 值 HL
int _val_1 = 0; // 值: vName
int _val_2 = F_TransCalc._Get_Value_2(_faim3, _line.HL, ref _str_2); // 值: HL
int _val_3 = 0; // 值: Reset
int _bit = -1; // 位
if ("TITL" == _line.IfType.ToUpper() || // 流程步骤名
"TITLE" == _line.IfType.ToUpper())
{
_caseState.Remark = _line.vName.Trim();
//continue;
}
else if ("TBNO" == _line.IfType.ToUpper()) // 设置当前使用的表号
{
_flow.tableNo = Convert.ToInt32(_line.vName.Trim());
//continue;
}
#endregion
#region // SLEEP DELAY TIMW WAIT
else if ("SLEEP" == _line.IfType.ToUpper() || // IfType
"DELAY" == _line.IfType.ToUpper() ||
"TIMW" == _line.IfType.ToUpper() ||
"WAIT" == _line.IfType.ToUpper() ||
"SLEEP" == _line.vName.ToUpper() || // vName
"DELAY" == _line.vName.ToUpper() ||
"TIMW" == _line.vName.ToUpper() ||
"WAIT" == _line.vName.ToUpper())
{
System.Threading.Thread.Sleep(_val_2);
}
#endregion
#region // 设备 _204C: A_ST A_IO LOAD HOME STOP EMG MOVA MOVR MOVL MOVI ARCR ARCA STAT INPUT
else if (clsProtocol.doExistCmd_204(_line.IfType.ToUpper()) > -1) // 指令
{
int _devNo = -1; //设备号
if (_faim3.dict_DevFunction.ContainsKey(_line.vName))
{
clsDevFunction _df = _faim3.dict_DevFunction[_line.vName]; //
_devNo = _df.devNo; //设备号
}
else
{
_devNo = clsProtocol.do_GetDevNo(_faim3, _line.vName);
}
if (_devNo > -1) // Send
{
clsProtocol._204C(_faim3, _dao_comm, _line.IfType, _line.HL, _devNo);
}
}
#endregion
#region // ADD SUB INC DEC
else if ("ADD" == _line.IfType.ToUpper() || "ADD" == _line.vName.ToUpper())
{
_do_math(_faim3, _line, _val_2);
}
else if ("SUB" == _line.IfType.ToUpper() || "SUB" == _line.vName.ToUpper())
{
_do_math(_faim3, _line, -_val_2);
}
else if ("INC" == _line.IfType.ToUpper() || "INC" == _line.vName.ToUpper())
{
_do_math(_faim3, _line, 1);
}
else if ("DEC" == _line.IfType.ToUpper() || "DEC" == _line.vName.ToUpper())
{
_do_math(_faim3, _line, -1);
}
#endregion
#region // CONN
else if (_line.IfType.ToUpper().StartsWith("CONN")) // 设备连接
{
_val_1 = F_TransCalc._Get_Value_2(_faim3, _line.vName); // 值: vName
int _ref_i_len = _faim3.sect_iDev * _val_1 + _faim3.snd_iLen;
// out
_faim3.Comm_Data.bt_out[0][_ref_i_len] = -99; //
if (_val_2 > 0)
{
_dao_comm.set_bt_out(_ref_i_len, (int)eSwitch.Connect); // bt_out[164]=-100
}
else
{
_dao_comm.set_bt_out(_ref_i_len, (int)eSwitch.Disconnect); // bt_out[164]=-200
}
}
#endregion
#region // BTOF BTON TEXT TBSE LET DIM
else if (_line.IfType.ToUpper().StartsWith("BTOF"))
{
#region // dict_DevFunction
if (_faim3.dict_DevFunction.ContainsKey(_line.vName))
{
// '0devNo 1driverName 2Remark 3ioIdx 4Off|On 5varName 6Index registerId Enabled 9CardName
clsDevFunction _df = _faim3.dict_DevFunction[_line.vName]; //
_bit = _faim3.sect_iDev * _df.devNo + _df.Index; //内存位
if (_df.varName.ToUpper() == "BT_OUT")
{
if (_faim3.Comm_Data.bt_out[0][_bit] >= (int)Math.Pow(2, _val_2))
{
_faim3.Comm_Data.bt_out[0][_bit] = _faim3.Comm_Data.bt_out[0][_bit] & ~(int)Math.Pow(2, _val_2);//输出电位
}
}
else if (_df.varName.ToUpper() == "BT_IN")
{
if (_faim3.Comm_Data.bt_in[0][_bit] >= (int)Math.Pow(2, _val_2))
{
_faim3.Comm_Data.bt_in[0][_bit] = _faim3.Comm_Data.bt_in[0][_bit] & ~(int)Math.Pow(2, _val_2);//输出电位
}
}
}
#endregion
}
else if (_line.IfType.ToUpper().StartsWith("BTON"))
{
#region // dict_DevFunction
if (_faim3.dict_DevFunction.ContainsKey(_line.vName))
{
clsDevFunction _df = _faim3.dict_DevFunction[_line.vName]; //
_bit = _faim3.sect_iDev * _df.devNo + _df.Index; //内存位
if (_df.varName.ToUpper() == "BT_OUT") // 5 varName
{
_faim3.Comm_Data.bt_out[0][_bit] = _faim3.Comm_Data.bt_out[0][_bit] | (int)Math.Pow(2, _val_2); //输出电位
}
}
else if (_faim3.dict_DevFunction.ContainsKey(_line.vName))
{
clsDevFunction _df = _faim3.dict_DevFunction[_line.vName]; //
_bit = _faim3.sect_iDev * _df.devNo + _df.Index; //内存位
if (_df.varName.ToUpper() == "BT_IN") // 5 varName
{
_faim3.Comm_Data.bt_in[0][_bit] = _faim3.Comm_Data.bt_in[0][_bit] | (int)Math.Pow(2, _val_2); //输出电位
}
}
#endregion
}
else if (_line.IfType.ToUpper().StartsWith("TEXT")) // 全局字符串变量赋值
{
_val_1 = F_TransCalc._Get_Value_2(_faim3, _line.vName); // 行号 键
if (_faim3.ui_buffer.Count > _val_1)
{
_faim3.ui_buffer[_val_1] = _str_2;
}
}
else if (_line.IfType.ToUpper().StartsWith("DIM"))
{
#region // dict_DevFunction BT_OUT BT_IN MODBUS ARR_INT_REG
if (_faim3.dict_DevFunction.ContainsKey(_line.vName))
{
clsDevFunction _df = _faim3.dict_DevFunction[_line.vName]; //
int _devNo = _df.devNo; //设备号
int _ref_i = _faim3.sect_iDev * _devNo;
_bit = _ref_i + _df.Index; //内存位
if (_df.varName.ToUpper() == "BT_OUT")
{
_faim3.Comm_Data.bt_out[0][_bit] = _val_2;//
}
else if (_df.varName.ToUpper() == "BT_IN" || _df.varName.ToUpper() == "MODBUS")
{
_faim3.Comm_Data.bt_in[0][_bit] = _val_2;//
}
else if (_df.varName.ToUpper() == "ARR_INT")
{
_faim3.Comm_Data.arr_int[_bit] = _val_2;//
}
else if (_df.varName.ToUpper() == "ARR_INT_REG")
{
_faim3.Comm_Data.arr_int_reg[_bit] = _val_2;//
}
else if (_df.varName.ToUpper() == "ARR_STR")
{
_faim3.Comm_Data.arr_str[0][_bit] = _str_2;//
}
}
#endregion
#region // _dim_dict 动态变量 dim[Feeder05_unLink] <== Value
else if (_faim3._dim_dict.ContainsKey(_line.vName))
{
_bit = _faim3._dim_dict[_line.vName]; // 内存位
_faim3._dim[_bit] = _val_2; // 直接设置, 用以联动
}
#endregion
#region // 变量
else if (_line.vName.ToUpper().StartsWith("_FAIM3") ||
_line.vName.ToUpper().StartsWith("CLSFAIM3"))
{
F_TransCalc.doSetValue_byName(_faim3, _line.vName, _val_2);
}
#endregion
else
{
_val_1 = F_TransCalc._Get_Value_2(_faim3, _line.vName);
_faim3.Comm_Data.arr_int[_val_1] = _val_2;//
}
}
else if (_line.IfType.ToUpper().StartsWith("TBSE")) // 给指定的表单元赋值
{
_val_3 = F_TransCalc._Get_Value_2(_faim3, _line.Reset); // 行号 键
if (_faim3.dict_CommonInfo.ContainsKey(_val_3) || _flow.tableNo == 0) // 0.dict_CommonInfo
{
#region //dict_CommonInfo val_01/val_02/val_03/arr_01/arr_02/arr_03
_val_1 = F_TransCalc._Get_Value_2(_faim3, _line.vName, ref _str_1); // 列
switch (_str_1)
{
case "val_01":
_faim3.dict_CommonInfo[_val_3].val_01 = _line.HL.Split(' ')[0];
break;
case "val_02":
_faim3.dict_CommonInfo[_val_3].val_02 = _line.HL.Split(' ')[0];
break;
case "val_03":
_faim3.dict_CommonInfo[_val_3].val_03 = _line.HL.Split(' ')[0];
break;
case "arr_01":
_faim3.dict_CommonInfo[_val_3].arr_1 = _line.HL;
break;
case "arr_02":
_faim3.dict_CommonInfo[_val_3].arr_2 = _line.HL;
break;
case "arr_03":
_faim3.dict_CommonInfo[_val_3].arr_3 = _line.HL;
break;
}
#endregion
}
else if (_faim3.dict_Modbus.ContainsKey(_val_3) || _flow.tableNo == 1) // 1.dict_Modbus
{
#region //dict_Modbus Loc_No/Name/transFlag/propFlag/Length/unitFlag/functionCode/Address/val01/val02/val03/val04
_val_1 = F_TransCalc._Get_Value_2(_faim3, _line.vName, ref _str_1); // 列
switch (_str_1)
{
case "Name":
_faim3.dict_Modbus[_val_3].Name = _line.HL;
break;
case "transFlag":
_faim3.dict_Modbus[_val_3].transFlag = _line.HL;
break;
case "propFlag":
_faim3.dict_Modbus[_val_3].propFlag = _line.HL;
break;
case "Length":
_faim3.dict_Modbus[_val_3].Length = _line.HL;
break;
case "unitFlag":
_faim3.dict_Modbus[_val_3].unitFlag = _line.HL;
break;
case "functionCode":
_faim3.dict_Modbus[_val_3].functionCode = _line.HL;
break;
case "Address":
_faim3.dict_Modbus[_val_3].Address = _line.HL;
break;
case "val01":
_faim3.dict_Modbus[_val_3].val01 = _line.HL;
break;
case "val02":
_faim3.dict_Modbus[_val_3].val02 = _line.HL;
break;
case "val03":
_faim3.dict_Modbus[_val_3].val03 = _line.HL;
break;
case "val04":
_faim3.dict_Modbus[_val_3].val04 = _line.HL;
break;
}
#endregion
}
else if (_faim3.dict_PointInfo.ContainsKey(_val_3) || _flow.tableNo == 2) // 2.dict_PointInfo
{
#region // dict_PointInfo Loc_No/m_Id/Axis_Id/Distance/Max_Speed/Acc/Dcl/Remark
_val_1 = F_TransCalc._Get_Value_2(_faim3, _line.vName, ref _str_1); // 列
//_val_2 = F_TransCalc._Get_Value_2(_faim3, _line.HL, ref _str_2); // 列
switch (_str_1)
{
case "Axis_Id":
_faim3.dict_PointInfo[_val_3].Axis_Id = _val_2;
break;
case "Distance":
_faim3.dict_PointInfo[_val_3].Distance = _val_2;
break;
case "Max_Speed":
_faim3.dict_PointInfo[_val_3].Max_Speed = _val_2;
break;
case "Acc":
_faim3.dict_PointInfo[_val_3].Acc = _val_2;
break;
case "Dcl":
_faim3.dict_PointInfo[_val_3].Dcl = _val_2;
break;
case "Remark":
_faim3.dict_PointInfo[_val_3].Remark = _line.HL;
break;
}
#endregion
}
}
#endregion
#region // IF
else if (_line.IfType.ToUpper().StartsWith("IF")) // IF_XX
{
bool _result = do_Compare(_faim3, _line);
if (!_result) // 为假，则跳
{
if (_faim3.dict_CaseState[_caseName].dict_IF.ContainsKey(i)) // 取跳转到 ELSE 的位置，正好转到ELSE 的下一位置
{
i = _faim3.dict_CaseState[_caseName].dict_IF[i];
}
}
}
else if ("ELSE" == _line.IfType.ToUpper()) // ELSE
{
if (_faim3.dict_CaseState[_caseName].dict_ELSE.ContainsKey(i)) // 取跳转到 ENDIF 位置
{
i = _faim3.dict_CaseState[_caseName].dict_ELSE[i];
}
continue;
}
else if ("ENDIF" == _line.IfType.ToUpper() ||
"EDIF" == _line.IfType.ToUpper())// ENDIF EDIF
{
continue;
}
#endregion
#region // WHILE
else if (_line.IfType.ToUpper().StartsWith("WHIL") || // WHIL WHIL_XX WHILE WHILE_XX
_line.IfType.ToUpper().StartsWith("DW")) // DWXX DW_XX
{
bool _result = do_Compare(_faim3, _line);
if (!_result) // 为假，则跳
{
if (_faim3.dict_CaseState[_caseName].dict_WHILE.ContainsKey(i)) // 跳出 取跳转到 LOOP 的位置
{
i = _faim3.dict_CaseState[_caseName].dict_WHILE[i];
}
}
}
else if ("LEAV" == _line.IfType.ToUpper() ||
"BREAK" == _line.IfType.ToUpper()) // LEAV/Break
{
if (_faim3.dict_CaseState[_caseName].dict_WHILE.ContainsKey(i)) // 跳出 取跳转到 LOOP 的位置
{
i = _faim3.dict_CaseState[_caseName].dict_WHILE[i];
}
}
else if ("LOOP" == _line.IfType.ToUpper() || // LOOP/EDDO
"EDDO" == _line.IfType.ToUpper() ||
"ITER" == _line.IfType.ToUpper()) // ITER/Continue
{
if (_faim3.dict_CaseState[_caseName].dict_LOOP.ContainsKey(i)) // 循环 取跳转到 WHILE 的上一位置
{
i = _faim3.dict_CaseState[_caseName].dict_LOOP[i] - 1;
}
continue;
}
#endregion
#region // GOTO JMP NEXT
else if ("NEXT" == _line.IfType.ToUpper() ||
"NEXTCASE" == _line.IfType.ToUpper()) // 程序控制
{
_flow.Tag = "GOTO_ABS"; // 设绝对跳转标志
_caseState.endMode = eCaseFlag.Goto;
_flow.nextCase = _flow.dictCases[_alartCase].nextCase; // 设跳转步骤名
_line.times++; // 此行使用的次数
_line.tmr = (int)(_tmr.ElapsedMilliseconds - _trm_begin); // 本次流程完成用时
_faim3.dict_Threads[_flowName].Info.tmr_real += _line.tmr; // 当前步骤 累加 实际占用总时长 += 每语句使用的时间
break;
}
else if ("GOTO" == _line.IfType.ToUpper() ||
"JMP" == _line.IfType.ToUpper()) // 程序控制 GOTO NEXTCASE
{
if (_faim3.dict_CaseState[_caseName].dict_TAG.ContainsKey(_line.vName.Trim()))
{
i = _faim3.dict_CaseState[_caseName].dict_TAG[_line.vName.Trim()]; // 转向当前的步骤的既定标记
}
else
{
_flow.Tag = "GOTO_ABS";// 设绝对跳转标志
_caseState.endMode = eCaseFlag.Goto;
if (_line.vName.ToUpper().Trim() == "NEXT" ||
_line.vName.ToUpper().Trim() == "NEXTCASE") // 转向下一步骤 NestCase 的第一行号
{
_flow.nextCase = _flow.dictCases[_alartCase].nextCase; // 设跳转步骤名
}
else
{
_flow.nextCase = _line.vName; // 设跳转步骤名
}
_line.times++; // 此行使用的次数
_line.tmr = (int)(_tmr.ElapsedMilliseconds - _trm_begin); // 本次流程完成用时
_faim3.dict_Threads[_flowName].Info.tmr_real += _line.tmr; // 当前步骤 累加 实际占用总时长 += 每语句使用的时间
}
break;
}
#endregion
#region // EXIT TAG
else if ("EXIT" == _line.IfType.ToUpper()) // 任务管理
{
_flow.nextCase = "Free";
}
else if ("TAG" == _line.IfType.ToUpper())// 程序控制
{
break;
}
#endregion
#region // CALL PROC ENDP 子程序
else if (_line.IfType.ToUpper().StartsWith("CALL") ||
_line.IfType.ToUpper().StartsWith("EXSR")) // CALL/EXSR 取跳转到 进入 PROC 的位置
{
if (_faim3.dict_CaseState[_caseName].dict_PROC.ContainsKey(_line.vName.Trim())) // vName
{
_faim3.dict_CaseState[_caseName].lst_PROC.Insert(0, i);
i = _faim3.dict_CaseState[_caseName].dict_PROC[_line.vName.Trim()];
}
}
else if (_line.IfType.ToUpper().StartsWith("PROC") ||
_line.IfType.ToUpper().StartsWith("BGSR")) // PROC/ BGSR 跳出 取跳转到 ENDP 的位置
{
if (_faim3.dict_CaseState[_caseName].dict_PROC.ContainsKey(i.ToString())) // 跳出 取跳转到 ENDP 的位置
{
i = _faim3.dict_CaseState[_caseName].dict_PROC[i.ToString()];
}
}
else if (_line.IfType.ToUpper().StartsWith("EDSR") || // 跳出 取跳转到 进入 PROC 的位置
_line.IfType.ToUpper().StartsWith("RETU") || //
_line.IfType.ToUpper().StartsWith("ENDP")) //
{
if (_faim3.dict_CaseState[_caseName].lst_PROC.Count > 0)
{
i = _faim3.dict_CaseState[_caseName].lst_PROC[0];
_faim3.dict_CaseState[_caseName].lst_PROC.RemoveAt(0);
}
}
#endregion
#region // OUT SEND MBUS
else if (_line.IfType.ToUpper().StartsWith("MBUS"))
{
#region // MBUS ,5 ,保留 ,*Loc
// clsModBus _en = _faim3.dict_Modbus[_val_2];
_val_3 = F_TransCalc._Get_Value_2(_faim3, _line.Reset); // 文档的值: 数值
List <byte> _lst = clsModBus._getModbusFix(_faim3, _val_3);
int _devNo_1 = Convert.ToInt32(_line.vName);//设备号
int _ref_1i = _faim3.sect_iDev * _devNo_1;
int _ref_1s = _faim3.sect_sDev * _devNo_1 + _faim3.sect_sDev_start;
string _val = BitConverter.ToString(_lst.ToArray()).Replace("-", " ");
// ---发出消息 条件：1.bt_out 2._devNo 3.snd_iLen
_faim3._sss[_ref_1s] = _val; //
//_dao_comm.set_arr_str(_ref_1s, _val); //
_faim3.Comm_Data.bt_out[0][_ref_1i + _faim3.snd_iLen] = -99; //
_dao_comm.set_bt_out(_ref_1i + _faim3.snd_iLen, _lst.Count); //
#endregion
#region // <64 byte
//for (int _t = 0; _t < _lst.Count; _t++)
//{
// _faim3.Comm_Data.bt_out[0][_t] = _lst[_t]; // 输出
//}
//// ---发出消息 条件：1.bt_out 2._devNo 3.snd_iLen
//_faim3.Comm_Data.bt_out[0][_ref_1i + _faim3.snd_iLen] = -99; //
//_dao_comm.set_bt_out(_ref_1i + _faim3.snd_iLen, _lst.Count); //
#endregion
}
else if (_line.IfType.ToUpper().StartsWith("OUT") ||
_line.IfType.ToUpper().StartsWith("SEND"))
{
if (_faim3.dict_DevFunction.ContainsKey(_line.vName))
{
#region // OUT
clsDevFunction _df = _faim3.dict_DevFunction[_line.vName]; //
if (_df.varName.ToUpper() == "BT_OUT")
{
int _devNo_1 = _df.devNo;//设备号
int _ref_1i = _faim3.sect_iDev * _devNo_1;
//int _ref_1s = _faim3.sect_sDev * _devNo_1 + _faim3.sect_sDev_start;
_bit = _ref_1i + _df.Index;//内存位
// 特殊 vName ==> driverName ==> _df.ioIdx ==> LLine
_faim3.Comm_Data.bt_out[0][_ref_1i + Convert.ToInt32(_faim3.dict_KV["LLine"])] = _df.ioIdx;
// HL ==> _val_2 => Value
_faim3.Comm_Data.bt_out[0][_ref_1i + Convert.ToInt32(_faim3.dict_KV["Value"])] = _val_2;
//通用 bt_out[_df.Index]-->_df.ioIdx _val_2-->H/L
_faim3.Comm_Data.bt_out[0][_bit] = _val_2; // 输出电位 bt_out[106]=6 bt_out[6]= 9>0
// --- 发出消息 条件：1.bt_out 2._devNo 3.snd_iLen
_faim3.Comm_Data.bt_out[0][_ref_1i + _faim3.snd_iLen] = -99; //
_dao_comm.set_bt_out(_ref_1i + _faim3.snd_iLen, _bit); // bt_out[164]=6
}
#endregion
}
else if (_faim3.dict_CmdFormats.ContainsKey(_line.vName))
{
#region // 协议表 字符串 Ascii码 snd_sLen=1
int _devNo_1 = clsProtocol.getSendData(_faim3, i); // 返回待发送数据的 设备号
int _ref_1i = _faim3.sect_iDev * _devNo_1;
int _ref_1s = _faim3.sect_sDev * _devNo_1 + _faim3.sect_sDev_start; // 设发送数据的长度, 发送的是字符域的数据
// 发出消息 条件：1.bt_out 2._devNo 3.snd_iLen
_faim3.Comm_Data.bt_out[0][_ref_1i + _faim3.snd_iLen] = -99;
_dao_comm.set_bt_out(_ref_1i + _faim3.snd_iLen, 1);
#endregion
}
else if (_faim3._dim_dict.ContainsKey(_line.vName))
{
// _sss [0 ~ 200] 区域
#region // _dim_dict 动态变量 dim[Feeder05_unLink] <== _line.HL
_bit = _faim3._dim_dict[_line.vName]; // 内存位
if (_str_2 == " ")
{
_faim3._dim[_bit] = _val_2; // 值 直接设置, 用以联动
}
else
{
_faim3._sss[_bit] = _str_2; // 字符串
}
#endregion
}
else if (_line.vName.ToUpper().StartsWith("_FAIM3") ||
_line.vName.ToUpper().StartsWith("CLSFAIM3"))
{
// 空 大数据
}
}
#endregion
_line.times++; // 当前行使用的次数
_line.tmr = (int)(_tmr.ElapsedMilliseconds - _trm_begin); // 当前行完成用时
_faim3.dict_Threads[_flowName].Info.tmr_real += _line.tmr; // 当前步骤 累加 实际占用总时长 += 每语句使用的时间
#endregion // 开始执行
#endregion // for
}
}
// 赋值
static void _LET_X_old(clsFaim3 _faim3, DAL_CommData _dao_comm, string _flowName, string _caseName, string vIfType)
{
clsFlow _flow = _faim3.dict_Flow[_flowName];
#region // 条件
Dictionary <string, clsCaseChildInfo> _dictCaseChildInfo =
_faim3.dict_CaseState[_flow.alartCase].dict_CaseChildInfo;
// string vIfType = "Line";
if (!_dictCaseChildInfo.ContainsKey(vIfType))
{
return;
}
int _lineStart = _dictCaseChildInfo[vIfType].lineStart; // 起始行号
string _IfType = vIfType + ".GOTO.ADD.DEC.INC.";
if (_lineStart < 0)
{
return; // 条件：没有指定的结构块起始行号
}
clsDevTestBits _line = _faim3.lst_DevTestBits[_lineStart];
if (_line.flowCase != _caseName)
{
return; // 条件：顺序执行时， 如步骤名不对， 则结束当前结构
}
if (!_IfType.Contains(_line.IfType.ToUpper() + "."))
{
return; //条件：没有结构块指定的命令
}
#endregion
int _cnt_break = 0; // 计数器
for (int i = _lineStart; i < _faim3.lst_DevTestBits.Count; i++) // 文档对象驱动
{
if (_faim3.isEmergency > 0)
{
break;
}
#region // for
_line = _faim3.lst_DevTestBits[i];
if (_line.Remark.ToUpper().StartsWith("CODE"))
{
continue; //条件：文档行指定为以代码实现
}
if (_line.flowCase != _caseName)
{
break; // 条件：顺序执行时， 如步骤名不对， 则结束当前结构
}
if (!_IfType.Contains(_line.IfType.ToUpper() + "."))
{
break; //条件：没有结构块指定的命令
}
_do_WaitLine(_faim3, _dao_comm, _flowName, eWF_State.Line, i);
#region // 开始执行
System.Diagnostics.Stopwatch _tmr = new System.Diagnostics.Stopwatch(); //实例化一个计时器
_tmr.Start();
long _trm_begin = _tmr.ElapsedMilliseconds; // 毫秒
int _bit = -1; // 位
int _val_2 = F_TransCalc._Get_Value_2(_faim3, _line.HL);
#region // SLEEP GOTO ADD DEC INC
if ("SLEEP" == _line.vName.ToUpper()) //
{
System.Threading.Thread.Sleep(_val_2);
}
else if ("GOTO" == _line.IfType.ToUpper())
{
_flow.nextCase = _line.vName;
}
else if ("ADD" == _line.IfType.ToUpper())
{
if (_faim3._dim_dict.ContainsKey(_line.vName))
{
#region // _dim_dict 动态变量
_bit = _faim3._dim_dict[_line.vName]; // 内存位 自定义名为下标, 分配地址, 寻址
_faim3._dim[_bit] += _val_2; // 直接设置, 用以联动 dim[Feeder05_unLink] = Value
#endregion
}
else if (_line.vName.ToUpper().StartsWith("_FAIM3") ||
_line.vName.ToUpper().StartsWith("CLSFAIM3"))
{
int _ls = Convert.ToInt32(F_TransCalc.doGetValue_byName(_faim3, _line.vName));
F_TransCalc.doSetValue_byName(_faim3, _line.vName, _ls + _val_2);
}
}
else if ("DEC" == _line.IfType.ToUpper())
{
if (_faim3._dim_dict.ContainsKey(_line.vName))
{
#region // _dim_dict 动态变量
_bit = _faim3._dim_dict[_line.vName]; // 内存位 自定义名为下标, 分配地址, 寻址
_faim3._dim[_bit] -= _val_2; // 直接设置, 用以联动 dim[Feeder05_unLink] = Value
#endregion
}
else if (_line.vName.ToUpper().StartsWith("_FAIM3") ||
_line.vName.ToUpper().StartsWith("CLSFAIM3"))
{
int _ls = Convert.ToInt32(F_TransCalc.doGetValue_byName(_faim3, _line.vName));
F_TransCalc.doSetValue_byName(_faim3, _line.vName, _ls - _val_2);
}
}
else if ("INC" == _line.IfType.ToUpper())
{
if (_faim3._dim_dict.ContainsKey(_line.vName))
{
#region // _dim_dict 动态变量
_bit = _faim3._dim_dict[_line.vName]; // 内存位 自定义名为下标, 分配地址, 寻址
_faim3._dim[_bit] += 1; // 直接设置, 用以联动 dim[Feeder05_unLink] = Value
#endregion
}
else if (_line.vName.ToUpper().StartsWith("_FAIM3") ||
_line.vName.ToUpper().StartsWith("CLSFAIM3"))
{
int _ls = Convert.ToInt32(F_TransCalc.doGetValue_byName(_faim3, _line.vName));
F_TransCalc.doSetValue_byName(_faim3, _line.vName, _ls - 1);
}
}
#endregion
else if (_faim3.dict_DevFunction.ContainsKey(_line.vName))
{
#region // BT_OUT
clsDevFunction _df = _faim3.dict_DevFunction[_line.vName]; //
int _devNo = _df.devNo; //设备号
int _refIdx = _faim3.sect_idev * _devNo;
_bit = _refIdx + _df.Index;//内存位
if (_df.varName.ToUpper() == "BT_OUT")
{
_faim3.Comm_Data.bt_out[0][_bit] = _val_2;//输出电位
}
#endregion
}
else if (_faim3._dim_dict.ContainsKey(_line.vName))
{
#region // _dim_dict 动态变量 dim[Feeder05_unLink] <== Value
_bit = _faim3._dim_dict[_line.vName]; // 内存位
_faim3._dim[_bit] = _val_2; // 直接设置, 用以联动
#endregion
}
else if (_line.vName.ToUpper().StartsWith("_FAIM3") ||
_line.vName.ToUpper().StartsWith("CLSFAIM3"))
{
F_TransCalc.doSetValue_byName(_faim3, _line.vName, _val_2);
}
else if (_cnt_break > 0) // 截断
{
break;
}
#endregion
_cnt_break++;
_line.times++; // 此行使用的次数
_line.tmr = (int)(_tmr.ElapsedMilliseconds - _trm_begin); // 本次流程完成用时
_faim3.dict_Threads[_flowName].Info.tmr_real += _line.tmr; // 当前步骤 实际占用总时长 += 每语句使用的时间
#endregion
}
}
// 复杂协议格式二: 最优使用 ---------------------------
// 方法2: 取当前数据类的名字, 要求,数据类与内置功能名称一致
// ReadStatus,{0}{1}|01 02 03 04 05 v02.Acc_2|v03.Dec_2
public string doObjectToString(object vEn)
{
string _rec = "";
Base_Set_Para _en = vEn as Base_Set_Para;
if (_en.v00.cmdName == eDev485obj.Free)
{
return(_rec);
}
string _format = _faim3.dict_CmdFormats[_en.v00.cmdName.ToString()].Format;//[2];
string _split_flag = " ";
string[] _arr1 = _format.Split(_split_flag[0]);
for (int i = 0; i < _arr1.Length; i++)
{
if (!_arr1[i].Contains('.'))
{
continue;
}
string[] _ar_0 = _arr1[i].Split('|');
for (int j = 0; j < _ar_0.Length; j++)
{
string[] _ar_1 = _ar_0[j].Split('_');
int _len = 2;
if (_ar_1.Length > 1)
{
_len = Convert.ToInt32(_ar_1[1]);
}
string _v_1 = F_TransCalc.doGetValue_byName(vEn, _ar_1[0]);
if (j == 0)
{
_arr1[i] = F_TransCalc.doDecToHexs(
F_Parse._ConverToDouble(_v_1), 16, _len, _split_flag);
}
else
{
_arr1[i] = _arr1[i] + _split_flag +
F_TransCalc.doDecToHexs(
F_Parse._ConverToDouble(_v_1), 16, _len, _split_flag);
}
}
}
//
string _k = _en.v00.cmdName.ToString() + "_k";
if (_faim3.dict_CmdFormats.ContainsKey(_k))
{
_k = _faim3.dict_CmdFormats[_k].Format;//[2];
string[] _ar_11 = _k.Split('|');
foreach (var item in _ar_11)
{
string[] _arr12 = item.Split('_');
int _idx = Convert.ToInt32(_arr12[0]) - 1;
int _add = Convert.ToInt32(_arr12[1], 16);
int _mul = Convert.ToInt32(_arr12[2], 16);
int _val = Convert.ToInt32(_arr1[_idx], 16);
_val = _add + _val * _mul;
_arr1[_idx] = _val.ToString("X").PadLeft(2, '0');
}
}
for (int i = 0; i < _arr1.Length; i++)
{
if (_rec == "")
{
_rec = _arr1[i];
}
else
{
_rec = _rec + _split_flag + _arr1[i];
}
}
_rec = string.Format(_rec, _en.v00.cmdName.ToString(), _en.v01.AxisNum.ToString("X").PadLeft(2, '0'));
return(_rec);
}
// 返回待发送数据的绝对位置
public int Out_Ready(string vCmdName, int vAxisNum)
{
int _ret = 0;
string _result = "";
string[] _names = Enum.GetNames(typeof(eDev485));
if (Array.IndexOf(_names, vCmdName) > -1)
{
#region // 参数 SimpleFormat
//int _AxisNum = Convert.ToInt32(vAxisNum);
_result = doSimpleToString(new SimpleFormat()
{
v01_AxisNum = vAxisNum,
v00_cmdName = (eDev485)Enum.Parse(
typeof(eDev485),
vCmdName)
});
#endregion
}
else
{
#region // 对象Home_Dir OutputLine Position_Set_Pos SeekHome SetRegisterSub
switch (vCmdName)
{
case "Home_Dir":
_faim3._Home_Dir.v01.AxisNum = vAxisNum;
_result = Home_Dir(_faim3._Home_Dir);
break;
case "OutputLine":
_faim3._OutputLine.v01.AxisNum = vAxisNum;
_result = OutputLine(_faim3._OutputLine);
break;
case "Position_Set_Pos":
_faim3._Position_Set_Pos.v01.AxisNum = vAxisNum;
_result = Position_Set_Pos(_faim3._Position_Set_Pos);
break;
case "SeekHome":
_faim3._SeekHome.v01.AxisNum = vAxisNum;
_result = SeekHome(_faim3._SeekHome);
break;
case "SetRegisterSub":
_faim3._SetRegisterSub.v01.AxisNum = vAxisNum;
_result = SetRegisterSub(_faim3._SetRegisterSub);
break;
}
#endregion
}
#region // 置预发的数据
int _devNo = -1;
// 设备号
if (_faim3.dict_CmdFormats.ContainsKey(vCmdName))
{
_devNo = Convert.ToInt32(_faim3.dict_CmdFormats[vCmdName].devNo);//[0] cfgCmdFormat.xls
}
else if (_faim3.dict_DevFunction.ContainsKey(vCmdName))
{
_devNo = _faim3.dict_DevFunction[vCmdName].devNo;//[0] cfgDev_Function.xls
}
else
{
F_Log.Error_4("clsProt485.Out_Ready()",
string.Format(" --->>>> 设备号不存在 {0} vAxisNum：{1}", vCmdName, vAxisNum));
return(-1); //没有此命令 模板
}
int _ref_1i = _faim3.sect_iDev * _devNo;
int _ref_1s = _faim3.sect_sDev * _devNo + _faim3.sect_sDev_start; // 偏移位
string[] _arr = _result.Split('|'); // 分解模板
string _send = _arr.Length > 1 ? _arr[1] : _arr[0];
int _crc = F_TransCalc.doCRC(_send); // AA BB CC DD CRC CRC
_send = _send + " " + F_TransCalc.doDecToHexs(_crc);
_faim3._sss[_ref_1s] = _send; // 置 数据部份
_faim3._sss[_ref_1s + _faim3.snd_sAsc] = ""; // 无ASCII, 置空
_faim3._sss[_ref_1s + _faim3.test_sLoc] = vCmdName; // 置 发出的命令
_faim3._sss[_ref_1s + _faim3.snd_sLen] = "0"; // 置 长度为空
#endregion
_ret = _ref_1s + _faim3.snd_sLen;
return(_ret);
}
// 输出
static void _OUT_X_old(clsFaim3 _faim3, DAL_CommData _dao_comm, string _flowName, string _caseName, string vIfType)
{
string _IfType = vIfType + ".GOTO.ADD.DEC.INC.";
clsFlow _flow = _faim3.dict_Flow[_flowName];
string _alartCase = _flow.alartCase;
Dictionary <string, clsCaseChildInfo> _dictCaseChildInfo =
_faim3.dict_CaseState[_alartCase].dict_CaseChildInfo;
if (!_dictCaseChildInfo.ContainsKey(vIfType))
{
return; // 条件：指定步骤无此部份指令
}
int _lineStart = _dictCaseChildInfo[vIfType].lineStart; // 起始行号
if (_lineStart < 0)
{
return; // 条件：没有指定的结构块起始行号
}
clsDevTestBits _line = _faim3.lst_DevTestBits[_lineStart];
if (_line.flowCase != _caseName)
{
return; // 条件：顺序执行时， 如步骤名不对， 则结束当前结构
}
if (!_IfType.Contains(_line.IfType.ToUpper() + "."))
{
return; //条件：没有结构块指定的命令
}
int _cnt_break = 0; // 计数器
for (int i = _lineStart; i < _faim3.lst_DevTestBits.Count; i++) // 文档对象驱动
{
if (_faim3.isEmergency > 0)
{
break;
}
#region // for
_line = _faim3.lst_DevTestBits[i];
if (_line.Remark.ToUpper().StartsWith("CODE"))
{
continue; //条件：文档行指定为以代码实现
}
if (!(_line.isDebug == 1 /*#*/ && _faim3.dict_KV["isDebug"] == "1")) // 在 debug 状态下，才运行 debug 行 cfgKV.ini
{
continue;
}
if (_line.flowCase != _caseName)
{
break; // 条件：顺序执行时， 如步骤名不对， 则结束当前结构
}
if (!_IfType.Contains(_line.IfType.ToUpper() + "."))
{
break; //条件：没有结构块指定的命令
}
#region // 开始执行
_do_WaitLine(_faim3, _dao_comm, _flowName, eWF_State.Line, i);
System.Diagnostics.Stopwatch _tmr = new System.Diagnostics.Stopwatch(); //实例化一个计时器
_tmr.Start();
long _trm_begin = _tmr.ElapsedMilliseconds; // 毫秒
int _bit = -1; // 位
int _val_2 = F_TransCalc._Get_Value_2(_faim3, _line.HL);
if ("SLEEP" == _line.vName.ToUpper()) // 必须作为第一判断
{
System.Threading.Thread.Sleep(_val_2);
}
#region // GOTO ADD DEC INC
else if ("GOTO" == _line.IfType.ToUpper())
{
_flow.nextCase = _line.vName;
}
else if ("ADD" == _line.IfType.ToUpper())
{
if (_faim3._dim_dict.ContainsKey(_line.vName))
{
#region // _dim_dict 动态变量
_bit = _faim3._dim_dict[_line.vName]; // 内存位 自定义名为下标, 分配地址, 寻址
_faim3._dim[_bit] += _val_2; // 直接设置, 用以联动 dim[Feeder05_unLink] = Value
#endregion
}
}
else if ("DEC" == _line.IfType.ToUpper())
{
if (_faim3._dim_dict.ContainsKey(_line.vName))
{
#region // _dim_dict 动态变量
_bit = _faim3._dim_dict[_line.vName]; // 内存位 自定义名为下标, 分配地址, 寻址
_faim3._dim[_bit] -= _val_2; // 直接设置, 用以联动 dim[Feeder05_unLink] = Value
#endregion
}
}
else if ("INC" == _line.IfType.ToUpper())
{
if (_faim3._dim_dict.ContainsKey(_line.vName))
{
#region // _dim_dict 动态变量
_bit = _faim3._dim_dict[_line.vName]; // 内存位 自定义名为下标, 分配地址, 寻址
_faim3._dim[_bit] += 1; // 直接设置, 用以联动 dim[Feeder05_unLink] = Value
#endregion
}
}
#endregion
else if (_faim3.dict_DevFunction.ContainsKey(_line.vName))
{
#region // 输出 OUT IO 类
clsDevFunction _df = _faim3.dict_DevFunction[_line.vName]; //
int _devNo = _df.devNo; //设备号
int _ref_i = _faim3.sect_idev * _devNo;
_bit = _ref_i + _df.Index;//内存位
if (_df.varName.ToUpper() == "BT_OUT")
{
// 特殊 vName ==> driverName ==> _df.ioIdx ==> LLine
_faim3.Comm_Data.bt_out[0][_ref_i + Convert.ToInt32(_faim3.dict_KV["LLine"])] = _df.ioIdx;
// HL ==> _val_2 => Value
_faim3.Comm_Data.bt_out[0][_ref_i + Convert.ToInt32(_faim3.dict_KV["Value"])] = _val_2;
//通用 bt_out[_df.Index]-->_df.ioIdx _val_2-->H/L
_faim3.Comm_Data.bt_out[0][_bit] = _val_2; // 输出电位 bt_out[106]=6 bt_out[6]= 9>0
// 发出消息 条件：1.bt_out 2._devNo 3.snd_lenLoc
_faim3.Comm_Data.bt_out[0][_faim3.sect_idev * _devNo + _faim3.snd_lenLoc] = -1; //
_dao_comm.set_bt_out(_faim3.sect_idev * _devNo + _faim3.snd_lenLoc, _bit); // bt_out[164]=6
}
#endregion
}
else if (_faim3.dict_CmdFormat.ContainsKey(_line.vName))
{
#region // 输出 OUT 协议类
clsProtocol _protocol = new clsProtocol(_faim3, _dao_comm);
// 返回待发送数据的绝对位置
int _ret = _protocol.getSendData(_line.vName, _val_2, _line.HL);
// 设发送数据的长度, 发送的是字符域的数据
//int _ref_s = _faim3.sect_sDev_start + _faim3.sect_sDev * _ret;
//_faim3._sss[_ref_s + _faim3.snd_slen] = "0";
//_dao_comm.set_arr_str(_ref_s + _faim3.snd_slen, "1");
// 发送
_dao_comm.set_arr_str(_ret, "1");
#endregion
}
else if (_faim3._dim_dict.ContainsKey(_line.vName))
{
#region // _dim_dict 动态变量 dim[Feeder05_unLink] <== Value
_bit = _faim3._dim_dict[_line.vName]; // 内存位
_faim3._dim[_bit] = _val_2; // 直接设置, 用以联动
#endregion
}
else if (_line.vName.ToUpper().StartsWith("_FAIM3") ||
_line.vName.ToUpper().StartsWith("CLSFAIM3"))
{
// 大数据 空
}
else if (_cnt_break > 0) // 截断
{
break;
}
#endregion
_cnt_break++;
_line.times++; // 此行使用的次数
_line.tmr = (int)(_tmr.ElapsedMilliseconds - _trm_begin); // 本次流程完成用时
_faim3.dict_Threads[_flowName].Info.tmr_real += _line.tmr; // 当前步骤 实际占用总时长 += 每语句使用的时间
#endregion
}
}
static void _TEST_2(clsFaim3 _faim3, DAL_CommData _dao_comm, string _flowName, string _caseName, ref bool _vbl)
{
if (_flowName == "DAL_Buttons")
{
_vbl = true;
return;
}
bool _mybl = true;
clsFlow _flow = _faim3.dict_Flow[_flowName];
string _alartCase = _flow.alartCase;
clsCaseState _caseState = _faim3.dict_CaseState[_alartCase];
Dictionary <string, clsCaseChildInfo> _dictCaseChildInfo =
_caseState.dict_CaseChildInfo;
string PartName = _TESTB;// "TESTB";
string _IfType = _CMD_TEST;
#region // 指定步骤无此部份指令
if (!_dictCaseChildInfo.ContainsKey(PartName)) // 条件：指定步骤无此部份指令
{
_vbl = _mybl;
return;
}
#endregion
int _lineStart = _dictCaseChildInfo[PartName].lineStart; // 起始行号
if (_lineStart < 0)
{
return; // 条件：没有指定的结构块起始行号
}
int _lineEnd = _dictCaseChildInfo[PartName].lineEnd; // 终止行号
if (_lineEnd < 0) // 只有一行时
{
_lineEnd = _lineStart;
}
for (int i = _lineStart; i <= _lineEnd; i++) // 文档对象驱动
{
if (_faim3.isEmergency > 0)
{
break; // 急停
}
#region // for
clsDevTestBits _line = _faim3.lst_DevTestBits[i];
if (_line.Remark.ToUpper().StartsWith("CODE") ||
_line.IfType.ToUpper() == "NG")
{
continue; //条件：文档行指定为以代码实现
}
if (F_CaseSub._CMD_NULL.Contains(_line.IfType.ToUpper())) // 占位行
{
continue;
}
if (_line.isDebug == 1) /*#*/
{
if (_faim3.dict_KV["isDebug"] != "1") // 非 debug 状态下，不运行 debug 行 cfgDev_Cards.xls
{
continue;
}
}
_do_WaitLine(_faim3, _dao_comm, _flowName, eWF_State.Test, i);// 单步
if (_faim3.isEmergency > 0)
{
break; // 急停
}
if (_flow.isStepPass || _faim3.isStepPass != 0) // 步骤直通
{
_mybl = true;
continue;
}
#region // 开始执行
_line = _faim3.lst_DevTestBits[i];
System.Diagnostics.Stopwatch _tmr = new System.Diagnostics.Stopwatch(); //实例化一个计时器
_tmr.Start();
long _trm_begin = _tmr.ElapsedMilliseconds; // 毫秒
int _bit = -1; // 位
int _val_1 = -1;
string _str_2 = " ";
int _val_2 = F_TransCalc._Get_Value_2(_faim3, _line.HL, ref _str_2);
int _val_3 = -1;
if (_faim3.dict_DevFunction.ContainsKey(_line.vName))
{
#region // dict_DevFunction IO口定义 vName : 4D_GS, 6RS_0302, 6D_ER, 6D_RP
clsDevFunction _df = _faim3.dict_DevFunction[_line.vName]; //
_bit = _faim3.sect_iDev * _df.devNo + _df.Index; // 内存位
int _ref_1i = -1;
int _ref_1s = -1;
switch (_df.varName.ToUpper())
{
// MODBUS
case "MODBUS":
_ref_1i = _faim3.sect_iDev * _df.devNo;
_bit = _faim3.sect_iDev * _df.devNo + _df.Index;
// 取比较值
_val_1 = _faim3.Comm_Data.bt_in[0][_bit];
break;
// 74X
case "BT_IN":
_ref_1i = _faim3.sect_iDev * _df.devNo;
_ref_1s = _faim3.sect_sDev * _df.devNo + _faim3.sect_sDev_start;
_faim3.Comm_Data.bt_out[0][_ref_1i + Convert.ToInt32(_faim3.dict_KV["LLine"])] = _df.ioIdx;
_bit = _faim3.sect_iDev * _df.devNo + _df.ioIdx;
// 发出消息 条件：1.bt_out 2._devNo 3.snd_iLen
_faim3.Comm_Data.bt_out[0][_ref_1i + _faim3.snd_iLen + 1] = -99;
_dao_comm.set_bt_out(_ref_1i + _faim3.snd_iLen + 1, _bit); // bt_in[164]=6 DI_R1：DI_ReadLine
// 取比较值
_val_1 = _faim3.Comm_Data.bt_in[0][_bit];
break;
case "BT_OUT":
_ref_1i = _faim3.sect_iDev * _df.devNo;
_bit = _faim3.sect_iDev * _df.devNo + _df.Index;
// 取比较值
_val_1 = _faim3.Comm_Data.bt_out[0][_bit];
break;
// 204C
case "A_ST":
case "A_IO":
clsProtocol._204C(_faim3, _dao_comm, _df.varName, _df.ioIdx.ToString(), _df.devNo); // 发出自定义命令
_val_1 = _faim3.Comm_Data.bt_in[0][_bit]; // 取出值, 可能多次才能取到
break;
// RS485
case "ReadPos":
case "ReadStatus":
case "READPOS":
case "READSTATUS":
// 发出命令
int _devNo_1 = clsProtocol.getSendData(_faim3, i);
_ref_1i = _faim3.sect_iDev * _devNo_1;
_ref_1s = _faim3.sect_sDev * _devNo_1 + _faim3.sect_sDev_start;
// 发出消息 条件：1.bt_out 2._devNo 3.snd_iLen
_faim3.Comm_Data.bt_out[0][_ref_1i + _faim3.snd_iLen] = -99;
_dao_comm.set_bt_out(_ref_1i + _faim3.snd_iLen, 1);
//
_val_3 = F_TransCalc._Get_Value_2(_faim3, _line.Reset);
_val_1 = _faim3.Comm_Data.bt_in[0][_bit]; // 取出值, 可能多次才能取到
break;
}
#endregion
}
else if (_faim3._dim_dict.ContainsKey(_line.vName))
{
#region // _dim_dict 动态变量
_bit = _faim3._dim_dict[_line.vName]; // 自定义名为下标, 分配地址, 寻址
_val_1 = _faim3._dim[_bit];
#endregion
}
else if (_line.vName.ToUpper().StartsWith("_FAIM3") ||
_line.vName.ToUpper().StartsWith("CLSFAIM3"))
{
#region // _FAIM3 大数据
_bit = 1;
_val_1 = Convert.ToInt32(F_TransCalc.doGetValue_byName(_faim3, _line.vName));
#endregion
}
_line.times++; // 此行使用的次数
_line.tmr = (int)(_tmr.ElapsedMilliseconds - _trm_begin); // 本次流程完成用时
_faim3.dict_Threads[_flowName].Info.tmr_real += _line.tmr; // 当前步骤 实际占用总时长 += 每语句使用的时间
// TEST
if (_bit > -1)
{
if (_flow.isStepLine || _flow.isStepLine)
{
int _loc = 0;
foreach (var item in _faim3.dict_Flow)
{
if (item.Key == _flowName)// 流程名 转 流程号
{
string _msg = string.Format("TEST {0} {1} {2} {3} {4} {5}",
_flow.currCase,
_flowName,
_bit,
_val_1,
_line.IfType,
_val_2
);
_dao_comm.set_arr_str(_loc + 800, _msg);
break;
}
_loc++;
}
}
#region // 测试 AND
if (_line.IfType == "EQ_AND" || _line.IfType == "AND_EQ" || _line.IfType == "EQ")
{
_mybl = _mybl && (_val_1 == _val_2);//
}
else if (_line.IfType == "NE_AND" || _line.IfType == "AND_NE" || _line.IfType == "NE")
{
_mybl = _mybl && (_val_1 != _val_2);//
}
else if (_line.IfType == "GT_AND" || _line.IfType == "AND_GT" || _line.IfType == "GT")
{
_mybl = _mybl && (_val_1 > _val_2);//
}
else if (_line.IfType == "GE_AND" || _line.IfType == "AND_GE" || _line.IfType == "GE")
{
_mybl = _mybl && (_val_1 >= _val_2);//
}
else if (_line.IfType == "LT_AND" || _line.IfType == "AND_LT" || _line.IfType == "LT")
{
_mybl = _mybl && (_val_1 < _val_2);//
}
else if (_line.IfType == "LE_AND" || _line.IfType == "AND_LE" || _line.IfType == "LE")
{
_mybl = _mybl && (_val_1 <= _val_2); //
}
#endregion // 测试 AND
#region // BIT BITN
else if (_line.IfType == "BIT") // 为高有效
{
// _val_2= 5; Math.Pow(2, _val_2) = 32.0 = 0x20 = 0010 0000
if (_val_2 < 0)
{
_val_2 = 0;
}
bool _rb = false;
if (_val_1 > -1)
{
_rb = (_val_1 & (int)Math.Pow(2, _val_2)) == Math.Pow(2, _val_2);
}
else
{
_rb = false;
}
_mybl = _mybl && _rb; //
}
else if (_line.IfType == "BITN") // 为低有效
{
if (_val_2 < 0)
{
_val_2 = 0;
}
bool _rb = false;
if (_val_1 > -1)
{
_rb = (_val_1 & (int)Math.Pow(2, _val_2)) != Math.Pow(2, _val_2);
}
else
{
_rb = false;
}
_mybl = _mybl && (_rb);//
}
#endregion
#region // 测试 OR
else if (_line.IfType == "EQ_OR" || _line.IfType == "OR_EQ")
{
_mybl = _mybl || (_val_1 == _val_2);//
if (_mybl)
{
break;
}
}
else if (_line.IfType == "NE_OR" || _line.IfType == "OR_NE")
{
_mybl = _mybl || (_val_1 != _val_2);//
if (_mybl)
{
break;
}
}
else if (_line.IfType == "GT_OR" || _line.IfType == "OR_GT")
{
_mybl = _mybl || (_val_1 > _val_2);//
if (_mybl)
{
break;
}
}
else if (_line.IfType == "GE_OR" || _line.IfType == "OR_GE")
{
_mybl = _mybl || (_val_1 >= _val_2);//
if (_mybl)
{
break;
}
}
else if (_line.IfType == "LT_OR" || _line.IfType == "OR_LT")
{
_mybl = _mybl || (_val_1 < _val_2);//
if (_mybl)
{
break;
}
}
else if (_line.IfType == "LE_OR" || _line.IfType == "OR_LE")
{
_mybl = _mybl || (_val_1 <= _val_2);//
if (_mybl)
{
break;
}
}
#endregion // 测试 OR
}
#endregion // 开始执行
#endregion // for
}
_flow.isStepPass = false; // 取消直通
_vbl = _mybl;
return;
}
