TyroneGit/CapMachine
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

公式更改版本2603141639

Browse Source
This commit is contained in:
Tyrone CT
2026-03-14 16:39:49 +08:00
parent add9904134
commit 64fdda325b
3 changed files with 82 additions and 19 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
CapMachine.Wpf/Services/MachineRtDataService.cs
View File

@@ -196,6 +196,18 @@ namespace CapMachine.Wpf.Services
TagManger.AddTag(new Tag<short>("通讯PTC膜温", "通讯PTC膜温[℃]", "ComPTCFlmTemp", "程序", "VW14128", 100, 0, 1, "℃", new ShortTagValue(), false) { DecimalPoint = 0 });
TagManger.AddTag(new Tag<short>("通讯PTC模块温度", "通讯PTC模块温度[℃]", "ComPTCMdTemp", "程序", "VW14130", 100, 0, 1, "℃", new ShortTagValue(), false) { DecimalPoint = 0 });
TagManger.AddTag(new Tag<short>("过热度", "过热度[K]", "Superheat", "程序", "VW14132", 100, 0, 1, "K", new ShortTagValue(), false) { DecimalPoint = 1 });
TagManger.AddTag(new Tag<short>("过冷度", "过冷度[K]", "Subcooling", "程序", "VW14134", 100, 0, 1, "K", new ShortTagValue(), false) { DecimalPoint = 1 });
TagManger.AddTag(new Tag<short>("制热量Qh", "制热量Qh[KW]", "HeatingCapacity", "程序", "VW14134", 1000, 0, 1, "K", new ShortTagValue(), false) { DecimalPoint = 1 });
TagManger.AddTag(new Tag<short>("压缩机性能系数(制热)", "压缩机性能系数(制热)[K]", "COPHeat", "程序", "VW14134", 1000, 0, 1, "K", new ShortTagValue(), false) { DecimalPoint = 1 });
TagManger.AddTag(new Tag<short>("等熵效率ns", "等熵效率ns[%]", "IsentrpEff", "程序", "VW14134", 1000, 0, 1, "K", new ShortTagValue(), false) { DecimalPoint = 1 });
TagManger.AddTag(new Tag<short>("制冷量Qc", "制冷量Qc[KW]", "CoolCapacity", "程序", "VW14134", 1000, 0, 1, "K", new ShortTagValue(), false) { DecimalPoint = 1 });
TagManger.AddTag(new Tag<short>("压缩机性能系数(制冷)", "压缩机性能系数(制冷)[K]", "COPCool", "程序", "VW14134", 1000, 0, 1, "K", new ShortTagValue(), false) { DecimalPoint = 1 });
TagManger.AddTag(new Tag<short>("容积效率nv", "容积效率nv[%]", "VoltricEff", "程序", "VW14134", 1000, 0, 1, "K", new ShortTagValue(), false) { DecimalPoint = 1 });
#endregion

44
CapMachine.Wpf/Services/PPCService.cs
View File

@@ -82,15 +82,15 @@ namespace CapMachine.Wpf.Services
TxvFrPressTag = TagManager.DicTags.GetValueOrDefault("膨胀阀前压力[BarA]");
LiqRefFlowTag = TagManager.DicTags.GetValueOrDefault("液冷媒流量[kg/h]");
//LiqRefFlowTag = TagManager.DicTags.GetValueOrDefault("液冷媒流量[kg/h]");
//kg/h
VRVTag = TagManager.DicTags.GetValueOrDefault("冷媒流量[kg/h]");
VRVTag = TagManager.DicTags.GetValueOrDefault("冷媒流量[L/min]");
//润滑油流量
LubeFlowTag = TagManager.DicTags.GetValueOrDefault("润滑油流量[kg/h]");
LubeFlowTag = TagManager.DicTags.GetValueOrDefault("润滑油流量[L/min]");
//Cond1TempTag = TagManager.DicTags.GetValueOrDefault("冷凝器出口水温[℃]");
@@ -306,9 +306,13 @@ namespace CapMachine.Wpf.Services
}
if (iErr == 0)
Superheat.EngPvValue = InhTempTag.EngPvValue - (te - 273.15);
else
Superheat.EngPvValue = 0;
{
double superheatValue = InhTempTag.EngPvValue - (te - 273.15);
if (!double.IsNaN(superheatValue) && !double.IsInfinity(superheatValue))
{
Superheat.EngPvValue = superheatValue;
}
}
herr = new string(' ', 255); herrLen = 255; iErr = 0;
lock (_refpropLock)
@@ -316,9 +320,13 @@ namespace CapMachine.Wpf.Services
IRefProp64.SATPdll(ref p1, x, ref kph, ref te1, ref Dl, ref Dv, xliq, xvap, ref iErr, ref herr, ref herrLen);
}
if (iErr == 0)
Subcool.EngPvValue = TxvFrTempTag.EngPvValue - (te1 - 273.15);
else
Subcool.EngPvValue = 0;
{
double subcoolValue = TxvFrTempTag.EngPvValue - (te1 - 273.15);
if (!double.IsNaN(subcoolValue) && !double.IsInfinity(subcoolValue))
{
Subcool.EngPvValue = subcoolValue;
}
}
if (TryUpdateThermodynamicSixResults(out var thermoErr))
@@ -1090,21 +1098,19 @@ namespace CapMachine.Wpf.Services
COPCooling = copC;
IsentropicEfficiencyPct = etaS_pct;
if (!TryComputeVolumetricEfficiencyPct(mRef_kg_s, v1_m3kg, out var etaV_pct, out var etaVErr))
{
VolumetricEfficiencyPct = double.NaN;
error = etaVErr;
return true;
}
VolumetricEfficiencyPct = etaV_pct;
//赋值
HeatingCapacity.EngPvValue = HeatingCapacityQh_kW;
COPHeat.EngPvValue = COPHeating;
IsentrpEff.EngPvValue = IsentropicEfficiencyPct;
CoolCapacity.EngPvValue = CoolingCapacityQc_kW;
COPCool.EngPvValue = COPCooling;
if (!TryComputeVolumetricEfficiencyPct(mRef_kg_s, v1_m3kg, out var etaV_pct, out var etaVErr))
{
error = etaVErr;
return true;
}
VolumetricEfficiencyPct = etaV_pct;
VoltricEff.EngPvValue = VolumetricEfficiencyPct;
return true;