|
|
|
@ -75,6 +75,9 @@ namespace DyeingComputer.ViewModel |
|
|
|
private static int MT06;//主缸排水延时
|
|
|
|
private static double MT16;//流量计数系数
|
|
|
|
private static double MT33;//主缸温度偏差
|
|
|
|
private int MT38;//高水位
|
|
|
|
private int MT39;//中水位
|
|
|
|
private int MT40;//低水位
|
|
|
|
private static int MT90;//呼叫操作员
|
|
|
|
void SYS_SET() |
|
|
|
{ |
|
|
|
@ -94,6 +97,9 @@ namespace DyeingComputer.ViewModel |
|
|
|
MT06 = Convert.ToInt16(Selet_sys("MT06"));//动力排水延时
|
|
|
|
MT16 = Convert.ToDouble(Selet_sys("MT16"));//流量计数系数
|
|
|
|
MT33 = Convert.ToDouble(Selet_sys("MT33"));//温度偏差参数
|
|
|
|
MT38 = Convert.ToInt16(Selet_sys("MT38"));//
|
|
|
|
MT39 = Convert.ToInt16(Selet_sys("MT39"));//
|
|
|
|
MT40 = Convert.ToInt16(Selet_sys("MT40"));//
|
|
|
|
MT90 = Convert.ToInt16(Selet_sys("MT90"));//呼叫操作员
|
|
|
|
|
|
|
|
} |
|
|
|
@ -102,7 +108,7 @@ namespace DyeingComputer.ViewModel |
|
|
|
{ |
|
|
|
try |
|
|
|
{ |
|
|
|
DataRow[] arrRows = dt_sys.Select("ParameterID ='" + key+"'"); |
|
|
|
DataRow[] arrRows = dt_sys.Select("ParameterID ='" + key + "'"); |
|
|
|
string index = arrRows[0]["Value"].ToString(); |
|
|
|
return index; |
|
|
|
} |
|
|
|
@ -143,6 +149,12 @@ namespace DyeingComputer.ViewModel |
|
|
|
get { return sys_workSTEPID; } |
|
|
|
set { sys_workSTEPID = value; OnPropertyChanged("Sys_workSTEPID"); } |
|
|
|
} |
|
|
|
public string sys_log; //
|
|
|
|
public string Sys_log //通知UI控件参数改变
|
|
|
|
{ |
|
|
|
get { return sys_log; } |
|
|
|
set { sys_log = value; OnPropertyChanged("Sys_log"); } |
|
|
|
} |
|
|
|
public static int ViewID = 0;//页面id
|
|
|
|
|
|
|
|
public static object Name_err = ""; |
|
|
|
@ -171,8 +183,8 @@ namespace DyeingComputer.ViewModel |
|
|
|
{ |
|
|
|
Interval = TimeSpan.FromMilliseconds(500) //毫秒
|
|
|
|
}; |
|
|
|
disTimer.Tick += new EventHandler(DisTimer_500MS);//每一秒执行的方法
|
|
|
|
disTimer.Start();//计时开始
|
|
|
|
disTimer.Tick += new EventHandler(DisTimer_500MS);//每一秒执行的方法
|
|
|
|
disTimer.Start();//计时开始
|
|
|
|
}//时间周期初始化
|
|
|
|
void Tick_Event_1S(object sender, EventArgs e)//Tick_Event周期执行事件1S
|
|
|
|
{ |
|
|
|
@ -180,11 +192,12 @@ namespace DyeingComputer.ViewModel |
|
|
|
Work_Temp = Selet_dtm("1010") + " ℃"; |
|
|
|
Work_Numder = WorkNumder.ToString(); |
|
|
|
|
|
|
|
// if (LINK_OK) Modbus_link();
|
|
|
|
if(!SETP_runtime) DIDETime++; |
|
|
|
// if (LINK_OK) Modbus_link();
|
|
|
|
if (!SETP_runtime) DIDETime++; |
|
|
|
|
|
|
|
STEP_RUN(); |
|
|
|
IO_view(); |
|
|
|
IO_view(); |
|
|
|
LOG_view(); |
|
|
|
|
|
|
|
if (!string.IsNullOrEmpty(Name_err.ToString())) Status_Str = Name_err.ToString(); |
|
|
|
} |
|
|
|
@ -200,14 +213,14 @@ namespace DyeingComputer.ViewModel |
|
|
|
Modbus_link(); |
|
|
|
IO_data(); |
|
|
|
if (!string.IsNullOrEmpty(Name_err.ToString()) && (!ERR_JOG)) //有故障信息，无故障保持
|
|
|
|
{ |
|
|
|
{ |
|
|
|
ERR_JOG = true; |
|
|
|
LogGing.LogGingDATA(Name_err.ToString());//输出故障信息
|
|
|
|
} |
|
|
|
if (string.IsNullOrEmpty(Name_err.ToString()) && (ERR_JOG)) //无故障信息，有故障保持
|
|
|
|
{ |
|
|
|
ERR_JOG = false; |
|
|
|
LogGing.LogGingDATA(Name_err.ToString()+ "=>"+Resources.FailureRecovery);//解除故障信息
|
|
|
|
LogGing.LogGingDATA(Name_err.ToString() + "=>" + Resources.FailureRecovery);//解除故障信息
|
|
|
|
} |
|
|
|
} |
|
|
|
|
|
|
|
@ -223,10 +236,12 @@ namespace DyeingComputer.ViewModel |
|
|
|
private static int STEP_TIME = 0; //步骤计时S
|
|
|
|
private static int THL_mode = 0; //温控模式 0保温 1加热 2降
|
|
|
|
private static double TEMP_co = 0; //计算温度
|
|
|
|
private static double TEMP_tar = 16.5; //目标温度
|
|
|
|
private bool Pump_M = false;//主泵状态
|
|
|
|
private bool Alert_yellow = false; //警报黄灯
|
|
|
|
private bool Alert_red = false; //警报红灯
|
|
|
|
private bool Alert_bell = false; //警报铃声
|
|
|
|
public static void STEP_START(string ID,double P1,double P2,double P3,double P4,double P5) //启动模块
|
|
|
|
public static void STEP_START(string ID, double P1, double P2, double P3, double P4, double P5) //启动模块
|
|
|
|
{ |
|
|
|
STEP_ID = ID; |
|
|
|
switch (ID) |
|
|
|
@ -235,6 +250,7 @@ namespace DyeingComputer.ViewModel |
|
|
|
STEP_P1 = Convert.ToDouble(P1); |
|
|
|
STEP_P2 = Convert.ToDouble(P2); |
|
|
|
STEP_P3 = Convert.ToDouble(P3); |
|
|
|
TEMP_tar = STEP_P1; |
|
|
|
|
|
|
|
double t_t = Convert.ToDouble(Selet_dtm("1010")); |
|
|
|
if (STEP_P1 > t_t) { THL_mode = 1; } |
|
|
|
@ -286,7 +302,7 @@ namespace DyeingComputer.ViewModel |
|
|
|
STEP_finish = false; |
|
|
|
break; |
|
|
|
case "031": |
|
|
|
STEP_TIME = Convert.ToInt16(P1)*60; |
|
|
|
STEP_TIME = Convert.ToInt16(P1) * 60; |
|
|
|
WORK_RUN = 2; |
|
|
|
SETP_runtime = true; |
|
|
|
STEP_finish = false; |
|
|
|
@ -370,16 +386,16 @@ namespace DyeingComputer.ViewModel |
|
|
|
} |
|
|
|
} |
|
|
|
|
|
|
|
TimeSpan ts=new TimeSpan(1);//1秒间隔
|
|
|
|
TimeSpan ts = new TimeSpan(1);//1秒间隔
|
|
|
|
void STEP_RUN() |
|
|
|
{ |
|
|
|
if (WORK_RUN == 2) |
|
|
|
{ |
|
|
|
if (SETP_runtime && (!STEP_finish))//
|
|
|
|
if (SETP_runtime && (!STEP_finish))//
|
|
|
|
{ |
|
|
|
switch (STEP_ID) |
|
|
|
{ |
|
|
|
case "001": |
|
|
|
case "001": |
|
|
|
int TIME_H; |
|
|
|
int TIME_M; |
|
|
|
int TIME_S; |
|
|
|
@ -387,12 +403,12 @@ namespace DyeingComputer.ViewModel |
|
|
|
double T = Selet_dtm("1010"); //实际温度
|
|
|
|
if (THL_mode == 0) //保温
|
|
|
|
{ |
|
|
|
if (STEP_TIME == 0) |
|
|
|
{ |
|
|
|
STEP_finish = true; |
|
|
|
if (STEP_TIME == 0) |
|
|
|
{ |
|
|
|
STEP_finish = true; |
|
|
|
} |
|
|
|
else |
|
|
|
{ |
|
|
|
else |
|
|
|
{ |
|
|
|
STEP_TIME--; |
|
|
|
} |
|
|
|
TO = pid.PID_iterate(STEP_P1, T, ts); |
|
|
|
@ -440,15 +456,15 @@ namespace DyeingComputer.ViewModel |
|
|
|
updata_dtm("1005", TEMP_co); |
|
|
|
break;//功能模块001温度控制
|
|
|
|
case "007": |
|
|
|
if (STEP_P1.ToString() == "1") |
|
|
|
{ |
|
|
|
if (STEP_P1.ToString() == "1") |
|
|
|
{ |
|
|
|
updata_dtd("3012", true); |
|
|
|
updata_dtd("3013", false); |
|
|
|
updata_dtd("3014", false); |
|
|
|
updata_dtd("3015", false); |
|
|
|
if (string.IsNullOrEmpty(Name_err.ToString())) Status_Str = Resources.AddWater + ":" + Resources.AddWater + "1"; |
|
|
|
} |
|
|
|
else if (STEP_P1.ToString() == "2") |
|
|
|
else if (STEP_P1.ToString() == "2") |
|
|
|
{ |
|
|
|
updata_dtd("3012", false); |
|
|
|
updata_dtd("3013", true); |
|
|
|
@ -456,7 +472,7 @@ namespace DyeingComputer.ViewModel |
|
|
|
updata_dtd("3015", false); |
|
|
|
if (string.IsNullOrEmpty(Name_err.ToString())) Status_Str = Resources.AddWater + ":" + Resources.AddWater + "2"; |
|
|
|
} |
|
|
|
else if (STEP_P1.ToString() == "3") |
|
|
|
else if (STEP_P1.ToString() == "3") |
|
|
|
{ |
|
|
|
updata_dtd("3012", false); |
|
|
|
updata_dtd("3013", false); |
|
|
|
@ -464,7 +480,7 @@ namespace DyeingComputer.ViewModel |
|
|
|
updata_dtd("3015", false); |
|
|
|
if (string.IsNullOrEmpty(Name_err.ToString())) Status_Str = Resources.AddWater + ":" + Resources.AddWater + "3"; |
|
|
|
} |
|
|
|
else if (STEP_P1.ToString() == "4") |
|
|
|
else if (STEP_P1.ToString() == "4") |
|
|
|
{ |
|
|
|
updata_dtd("3012", false); |
|
|
|
updata_dtd("3013", false); |
|
|
|
@ -474,7 +490,7 @@ namespace DyeingComputer.ViewModel |
|
|
|
} |
|
|
|
|
|
|
|
if (Selet_dtm("1015") >= STEP_P2) //到达水位
|
|
|
|
{ |
|
|
|
{ |
|
|
|
updata_dtd("3012", false); |
|
|
|
updata_dtd("3013", false); |
|
|
|
updata_dtd("3014", false); |
|
|
|
@ -491,7 +507,7 @@ namespace DyeingComputer.ViewModel |
|
|
|
updata_dtd("3014", false); |
|
|
|
updata_dtd("3015", false); |
|
|
|
|
|
|
|
if (string.IsNullOrEmpty(Name_err.ToString())) Status_Str = Resources. AddWater + ":" + Resources.AddWater + "1"; |
|
|
|
if (string.IsNullOrEmpty(Name_err.ToString())) Status_Str = Resources.AddWater + ":" + Resources.AddWater + "1"; |
|
|
|
} |
|
|
|
else if (STEP_P1.ToString() == "2") |
|
|
|
{ |
|
|
|
@ -571,7 +587,7 @@ namespace DyeingComputer.ViewModel |
|
|
|
if (string.IsNullOrEmpty(Name_err.ToString())) Status_Str = Resources.Drainage + ":" + Resources.Finish; |
|
|
|
STEP_finish = true; |
|
|
|
} |
|
|
|
else |
|
|
|
else |
|
|
|
{ |
|
|
|
STEP_TIME--; //排水延时计时
|
|
|
|
if (string.IsNullOrEmpty(Name_err.ToString())) Status_Str = Resources.Drainage + ":" + Resources.Time + STEP_TIME; |
|
|
|
@ -606,7 +622,7 @@ namespace DyeingComputer.ViewModel |
|
|
|
if (Selet_dtm("1015") <= STEP_P2) //排水状态完成
|
|
|
|
{ |
|
|
|
if (STEP_TIME == 0)//排水延时
|
|
|
|
{ |
|
|
|
{ |
|
|
|
updata_dtd("3016", false); |
|
|
|
updata_dtd("3017", false); |
|
|
|
updata_dtd("3018", false); |
|
|
|
@ -623,13 +639,13 @@ namespace DyeingComputer.ViewModel |
|
|
|
break;//动力排水
|
|
|
|
case "031": |
|
|
|
if (STEP_TIME == 0) |
|
|
|
{ |
|
|
|
STEP_finish = true; |
|
|
|
{ |
|
|
|
STEP_finish = true; |
|
|
|
} |
|
|
|
else |
|
|
|
else |
|
|
|
{ |
|
|
|
STEP_TIME--; |
|
|
|
TIME_M = STEP_TIME/ 60; |
|
|
|
TIME_M = STEP_TIME / 60; |
|
|
|
TIME_S = STEP_TIME - TIME_M * 60; |
|
|
|
if (string.IsNullOrEmpty(Name_err.ToString())) Status_Str = Resources.RunningTime + ":" + Resources.Time + string.Format(" {0:D3}", TIME_M) + ":" + string.Format(" {0:D2}", TIME_S); |
|
|
|
} |
|
|
|
@ -719,7 +735,7 @@ namespace DyeingComputer.ViewModel |
|
|
|
if (string.IsNullOrEmpty(Name_err.ToString())) Status_Str = Resources.Sampling; |
|
|
|
break;//取样
|
|
|
|
case "041": |
|
|
|
|
|
|
|
|
|
|
|
STEP_finish = true; |
|
|
|
if (string.IsNullOrEmpty(Name_err.ToString())) Status_Str = Resources.End; |
|
|
|
break;//结束
|
|
|
|
@ -800,7 +816,7 @@ namespace DyeingComputer.ViewModel |
|
|
|
double T_P4 = Convert.ToDouble(arrRows[0]["Parameter4"].ToString()); |
|
|
|
double T_P5 = Convert.ToDouble(arrRows[0]["Parameter5"].ToString()); |
|
|
|
|
|
|
|
STEP_START(T_ID,T_P1,T_P2,T_P3,T_P4,T_P5); |
|
|
|
STEP_START(T_ID, T_P1, T_P2, T_P3, T_P4, T_P5); |
|
|
|
|
|
|
|
if (ViewID == 1) { sys_workSTEPID = RUN_STEPID; } else { sys_workSTEPID = -1; } |
|
|
|
} |
|
|
|
@ -819,7 +835,7 @@ namespace DyeingComputer.ViewModel |
|
|
|
STEP_finish = false; |
|
|
|
Status_Str = Resources.Paused; |
|
|
|
} |
|
|
|
else |
|
|
|
else |
|
|
|
if (WORK_RUN == 0) |
|
|
|
{ |
|
|
|
if (string.IsNullOrEmpty(Name_err.ToString())) |
|
|
|
@ -836,7 +852,6 @@ namespace DyeingComputer.ViewModel |
|
|
|
static ModbusFactory factory = new ModbusFactory(); |
|
|
|
// Create Modbus Master
|
|
|
|
static IModbusMaster master = factory.CreateRtuMaster(port); |
|
|
|
|
|
|
|
void UPort() |
|
|
|
{ |
|
|
|
try |
|
|
|
@ -865,13 +880,12 @@ namespace DyeingComputer.ViewModel |
|
|
|
bool[] DO = new bool[128]; |
|
|
|
ushort DO_L = 128; |
|
|
|
//int[] MW = new int[128];
|
|
|
|
// ushort MW_L = 128;
|
|
|
|
// ushort MW_L = 128;
|
|
|
|
ushort[] DW = new ushort[100]; |
|
|
|
ushort DW_L = 100; |
|
|
|
ushort[] RW = new ushort[100]; |
|
|
|
ushort RW_L = 100; |
|
|
|
readonly byte slaveId = 1; |
|
|
|
|
|
|
|
private async void Modbus_link() |
|
|
|
{ |
|
|
|
await Task.Run(() => |
|
|
|
@ -880,21 +894,50 @@ namespace DyeingComputer.ViewModel |
|
|
|
try |
|
|
|
{ |
|
|
|
master.WriteMultipleCoils(slaveId, 00000, DQ); //写入线圈
|
|
|
|
master.WriteMultipleRegisters(slaveId,07000,DW); //写入寄存器
|
|
|
|
master.WriteMultipleRegisters(slaveId, 07000, DW); //写入寄存器
|
|
|
|
DO = master.ReadCoils(slaveId, 01000, DO_L); //读取线圈
|
|
|
|
RW = master.ReadHoldingRegisters(slaveId,06000, RW_L); //读取寄存器
|
|
|
|
LINK_OK =true; |
|
|
|
RW = master.ReadHoldingRegisters(slaveId, 06000, RW_L); //读取寄存器
|
|
|
|
LINK_OK = true; |
|
|
|
Name_err = ""; |
|
|
|
} |
|
|
|
catch (Exception ex) |
|
|
|
catch (Exception ex) |
|
|
|
{ |
|
|
|
LINK_OK=false; |
|
|
|
LINK_OK = false; |
|
|
|
LINK_ERR++; |
|
|
|
Name_err = "PLC"+Properties.Resources.Connectionlost+"("+ ex.Message + ")"; |
|
|
|
} |
|
|
|
Name_err = "PLC" + Properties.Resources.Connectionlost + "(" + ex.Message + ")"; |
|
|
|
} |
|
|
|
}); |
|
|
|
} |
|
|
|
|
|
|
|
void LOG_view()//细节页面
|
|
|
|
{ |
|
|
|
Sys_log = Resources.Target + Resources.Temperature + ":"+ string.Format(" {0:###.#}", TEMP_tar) + "°C";//显示目标温度
|
|
|
|
Sys_log = Sys_log + "\n" + Resources.Compute + Resources.Temperature + ":" + string.Format(" {0:###.#}", Convert.ToDouble(Selet_dtm("1005"))) + "°C";//显示计算温度
|
|
|
|
Sys_log = Sys_log + "\n" + Resources.MasterCylinder + Resources.Temperature + ":" + string.Format(" {0:###.#}", Convert.ToDouble(Selet_dtm("1010"))) + "°C";//显示实际温度
|
|
|
|
Sys_log = Sys_log + "\n" + Resources.ProportionalValves + ":" + string.Format("{0:###.#}", Convert.ToDouble(Selet_dtm("1004"))) + "%";//显示比例
|
|
|
|
int IO1015 = Convert.ToInt16( Selet_dtm("1015")); |
|
|
|
if (IO1015<MT39) |
|
|
|
{ |
|
|
|
Sys_log = Sys_log + "\n" + Resources.MasterCylinder + Resources.WaterLevel + ":" + IO1015 + "L =>["+Resources.Low_waterlevel+"]";//显示水位
|
|
|
|
} |
|
|
|
else if ((IO1015 > MT39) && (IO1015 < MT38)) |
|
|
|
{ |
|
|
|
Sys_log = Sys_log + "\n" + Resources.MasterCylinder + Resources.WaterLevel + ":" + IO1015 + "L =>[" + Resources.Mid_waterlevel + "]";//显示水位
|
|
|
|
} |
|
|
|
else if (IO1015 > MT38) |
|
|
|
{ |
|
|
|
Sys_log = Sys_log + "\n" + Resources.MasterCylinder + Resources.WaterLevel + ":" + IO1015 + "L =>[" + Resources.High_waterlevel + "]";//显示水位
|
|
|
|
} |
|
|
|
if (Pump_M) //主泵状态
|
|
|
|
{ |
|
|
|
Sys_log = Sys_log + "\n" + Resources.PumpSpeed + ":" + string.Format("{0:D3}", Convert.ToInt16(Selet_dtm("1030"))) + "% => [" + Resources.PumpStart+"]";//主泵状态
|
|
|
|
} |
|
|
|
else |
|
|
|
{ |
|
|
|
Sys_log = Sys_log + "\n" + Resources.PumpSpeed + ":" + string.Format("{0:D3}", Convert.ToInt16(Selet_dtm("1030"))) + "% => [" + Resources.PumpStops+"]";//主泵状态
|
|
|
|
} |
|
|
|
} |
|
|
|
|
|
|
|
public static DataTable dt_d = new DataTable("DIO"); |
|
|
|
public static DataTable dt_a = new DataTable("AIO"); |
|
|
|
public static DataTable dt_m = new DataTable("M"); |
|
|
|
@ -916,7 +959,6 @@ namespace DyeingComputer.ViewModel |
|
|
|
DataColumn[] dt_mcols = new DataColumn[] { dt_m.Columns["ID"] }; |
|
|
|
dt_m.PrimaryKey = dt_mcols; |
|
|
|
} |
|
|
|
|
|
|
|
private async void IO_data()//刷新
|
|
|
|
{ |
|
|
|
updata_dtm("1001", LINK_RUN); |
|
|
|
@ -934,7 +976,7 @@ namespace DyeingComputer.ViewModel |
|
|
|
for (ushort i = 0; i < DW_L; i++) { DW[i] = Convert.ToUInt16(Selet_dta((i + 5001).ToString())); } |
|
|
|
}); |
|
|
|
} |
|
|
|
private async void IO_view() |
|
|
|
private async void IO_view()//IO显示
|
|
|
|
{ |
|
|
|
await Task.Run(() => |
|
|
|
{ |
|
|
|
|
