init: 潍柴发动机线 中央控制程序 项目首次入库

This commit is contained in:
XingCheng3
2026-06-08 12:05:16 +08:00
commit 196c66b9ff
547 changed files with 379162 additions and 0 deletions

67
SCADA/Core/PLC_R.cs Normal file
View File

@@ -0,0 +1,67 @@
using MesWork;
using Newtonsoft.Json;
using OpcBasic;
using System;
using System.Collections.Concurrent;
namespace DC_A95
{
public class PLC_R
{
/// <summary>
///
/// </summary>
/// <param name="opCode">工位号</param>
/// <param name="partCode">上线缸体码</param>
/// <param name="palletNo">托盘号</param>
/// <returns></returns>
public static bool Read_LineSet(string opCode, out string partCode, out int palletNo)
{
partCode = MesWorkForm.ReadPLC(120, opCode).ToString();
palletNo = Convert.ToInt32(MesWorkForm.ReadPLC(80, opCode));
return true;
}
public static string GetString_CleanGarbled(string inputStr)
{
return inputStr.Replace("\0", "").Replace("\n", "").Replace("\r", "").Replace(" ", "");
}
public static ConcurrentDictionary<string, TagFormat> ReadPLC_OpName(string opName)
{
if (MesWorkForm.IsDemoMesServer == 1)
{
return JsonConvert.DeserializeObject<
ConcurrentDictionary<string, TagFormat>
>(JsonConvert.SerializeObject(
PlcLinkForm.ReadPLC_GroupData(opName)
));
}
else
{
try
{
PlcLinkForm.GetDbAndMaxLengthByOpName(opName, out string tagStartAdr, out ushort tagAdrListMaxLength);
return JsonConvert.DeserializeObject<
ConcurrentDictionary<string, TagFormat>
>(JsonConvert.SerializeObject(PlcLinkForm.ReadQualityDataList(
opName
, tagStartAdr
, tagAdrListMaxLength
)
));
}
catch (Exception err)
{
return null;
}
}
}
}
}