Files
LM-Middleware/HexcalMC/MainFrom.cs
T
2023-10-08 16:48:24 +08:00

430 lines
13 KiB
C#

using ACS.SPiiPlusNET;
using HexcalMC.Hexcal;
using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.Text;
using System.Windows.Forms;
using HexcalMC.Base;
using HexcalMC.Form;
namespace HexcalMC
{
public partial class MainFrom : Telerik.WinControls.UI.RadRibbonForm
{
#region hexcal变量区
private TcpIpServer m_tcpIpServer; //创建tcpserver,用于接收hexcal传来的指令,并解析传递平台
private bool m_bHexcalConnected = false;
#endregion
#region
private Api _ACS;
private const int MAX_UI_LIMIT_CNT = 8;
private const int MAX_UI_IO_CNT = 8;
private int m_nTotalAxis = 0;
private int m_nTotalBuffer = 0;
private Axis[] m_arrAxisList = null;
private bool m_bConnected = false;
// For update values
private MotorStates m_nMotorState; //运动状态
private ProgramStates m_nProgramState; //程序状态
private object m_objReadVar = null;
private Array m_arrReadVector = null;
private double m_lfRPos, m_lfFPos, m_lfPE, m_lfFVEL; //参考位置,反馈位置 位置误差 反馈速度 double类型
private int m_nValues, m_nOutputState;
private Label[] m_lblLeftLimit; //左限位
private Label[] m_lblRightLimit; //右限位
#endregion
public MainFrom()
{
InitializeComponent();
}
private void MainFrom_Load(object sender, EventArgs e)
{
this.FormBorderStyle = FormBorderStyle.FixedSingle; // 设置窗体边框样式为固定大小
this.MaximizeBox = false; // 禁用窗体的最大化按钮
double[] dataX = new double[] { 1, 2, 3, 4, 5 };
double[] dataY = new double[] { 1, 4, 9, 16, 25 };
formsPlot1.Plot.AddScatter(dataX, dataY);
formsPlot1.Refresh();
//启动界面刷新
timer_RefreshUI.Start();
}
#region hexcal软件相关
private void StartServer()
{
//启动服务器,并获取数据,解析
m_tcpIpServer = new TcpIpServer("100.0.0.1", Convert.ToString(1234));
try
{
//启动监听
if (m_tcpIpServer.StartListen())
{
//绑定两个事件 OnRaisedStatus 和OnRaisedMessage
m_tcpIpServer.OnRaisedMessage += ReceiveMessage;
m_tcpIpServer.OnRaisedStatus += ReceiveStatus;
DebugDfn.AddLogText("TCP服务端启动成功 ");
}
else
{
MessageBox.Show("TCP服务端启动失败,请检查网络连接,重新打开软件", "异常", MessageBoxButtons.OK, MessageBoxIcon.Error);
}
}
catch (Exception ex)
{
DebugDfn.AddLogText("启动TCP服务端异常" + ex.ToString());
}
}
private void ReceiveMessage(string ClientIP, string Msg) //接收的内容
{
//打印ClientIP 和 Msg
DebugDfn.AddLogText("接收到" + ClientIP + ": " + Msg);
//根据源地址的不同,执行不同处理
//如果 ClientIP 来自L2系统的话,执行解析
switch (ClientIP)
{
case "172.19.153.80": //L2系统
//解析处理数据
ParseHexcalPacket(Msg);
break;
case "127.0.0.1": //模拟长宽系统
break;
}
}
private void ParseHexcalPacket(string Msg) //编写一个Hexcal协议解析函数
{
//根据不同的指令进行解析,3个层次,不合法,故障,最后是正常
//判断Msg的长度,如果不是指定长度,直接返回
if (Msg.Length != 8) return;
//判断是否含有故障ERROR字样
if (Msg.Contains("ERROR")) return;
//指令解析
string[] tokens = Msg.Split(',');
foreach (string token in tokens)
{
Console.WriteLine(token);
}
//可能涉及到 将指令提取并单独处理的问题
if (string.Equals("CMMTYP", Msg))
{
SendMsgToHexcal("CMMTYP MA 19617, FDC V15.00, 6 6 2 , 0");
}
else if (string.Equals("VERSION", Msg)) //版本号
{
SendMsgToHexcal("00-000-000-00000 FDC V51.04.0000 DATE: 12/21/22 TIME: 12:50:55");
}
else if (string.Equals("^B", Msg)) //查询状态
{
//todo 启动指令
}
else if (string.Equals("SHOW MAXSTROKESW", Msg)) //最大行程
{
SendMsgToHexcal("MAXSTROKESW 233.200000,346.500000,15.100000,0.000000,0.000000,0.000000,0.000000");
}
else if (string.Equals("00000003", Msg)) //最小行程
{
SendMsgToHexcal("MINSTROKESW -68.800000,-55.500000,-286.900000,0.000000,0.000000,0.000000,0.000000");
}
else if (string.Equals("SHOW MAXVEL", Msg)) //最大速度
{
SendMsgToHexcal("MAXVEL 300.000000,300.000000,300.000000,0.000000,0.000000,0.000000,0.000000,0.000000");
}
else if (string.Equals("SHOW MAXACC", Msg)) //最大加速度
{
SendMsgToHexcal(
"MAXACC 300.000000,300.000000,300.000000,0.000000,0.000000,0.000000,0.000000,0.000000");
}
else if (string.Equals("SHOW TEMPCOMPTYPE", Msg)) //温度补偿,温度补偿 >1 表示支持温度补偿
{
SendMsgToHexcal("TEMPCOMPTYPE 1");
}
else if (string.Equals("READTP", Msg))
{
SendMsgToHexcal("READTP 0.000000");
}
else if (string.Equals("SHOW SENSWKP", Msg))
{
SendMsgToHexcal("X_ SENSWKP 4,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0");
}
else if (string.Equals("SHOW X_SENSAXIS", Msg))
{
SendMsgToHexcal("X_SENSAXIS 6,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0");
}
else if (string.Equals("SHOW Y_SENSAXIS", Msg))
{
SendMsgToHexcal("Y_SENSAXIS 2,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0");
}
else if (string.Equals("SHOW Z_SENSAXIS", Msg))
{
SendMsgToHexcal("Z_SENSAXIS 7,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0");
}
else if (string.Equals("SHOW MOVPAR", Msg)) //获取速度
{
SendMsgToHexcal(
"MOVPAR 300.000000,300.000000,300.000000,0.000000,0.000000,0.000000,0.000000,0.000000,0.000000,0.00000 0,0.000000");
}
else if (string.Equals("MOVPAR 300.0,300.0,300.0,0.0,0.0,0.0", Msg)) //设置速度 xyz 轴的速度
{
SendMsgToHexcal("%");
}
else if (string.Equals("SHOW MAXVEL", Msg))
{
SendMsgToHexcal("MAXVEL 300.000000,300.000000,300.000000,0.000000,0.000000,0.000000,0.000000,0.000000");
}
else if (string.Equals("SHOW ACCEL", Msg)) //获取加速
{
SendMsgToHexcal(
"ACCEL 1000.000000,1000.000000,1000.000000,0.000000,0.000000,0.000000,0.000000,0.000000");
}
else if (string.Equals("ACCEL 1000.0,1000.0,1000.0", Msg)) //设置加速度
{
SendMsgToHexcal("%");
}
else if (string.Equals(
"PRBPIN 0.000000,0.000000,0.000000,0.000000,0.000000, 0.000000,0.000000,0.000000,0.000000,0.000000,0.000000, 0.000000",
Msg))
{
SendMsgToHexcal("%");
}
else if (string.Equals("ENABLE TEMP", Msg))
{
SendMsgToHexcal("");
}
else if (string.Equals("WKPPAR 20,0.0000115,20", Msg))
{
SendMsgToHexcal("");
}
else if (string.Equals("SCLTMP", Msg))
{
SendMsgToHexcal("");
}
else if (string.Equals("MOVABS 167.553848,-55.400002,-208.548203,0.000000", Msg)) //移动指令
{
SendMsgToHexcal("%");
}
else if (string.Equals("GETPOS", Msg)) //获取位置
{
SendMsgToHexcal("POS 167.553898,-55.400421,-208.548678,0.000000,0.000000,0.000000,0.000000");
}
else if (string.Equals("SHOW ESTOP", Msg))
{
SendMsgToHexcal("ESTOP FALSE");
}
else if (string.Equals("", Msg))
{
}
else
{
//todo 未知指令
}
}
private void ReceiveStatus(TcpIpServer.EnumTcpIpServer iType, string Msg)
{
//记录到日志
DebugDfn.AddLogText(iType + " : " + Msg);
}
private void SendMsgToHexcal(string Msg)
{
//发送数据
m_tcpIpServer.SendMessageToAllClients(Msg);
}
#endregion
#region ACS平台相关
private void btnEnable_Click(object sender, EventArgs e) //使能所有轴
{
Axis[] AxisList = new Axis[]
{
Axis.ACSC_AXIS_0, Axis.ACSC_AXIS_1, Axis.ACSC_AXIS_4, Axis.ACSC_NONE
}; //!!!! Important !! Must insert '-1' at the last
_ACS.EnableM(AxisList);
}
private void btnDisable_Click(object sender, EventArgs e) //轴取消
{
// Disable all of axes
_ACS.DisableAll();
}
private void tmrMonitor_Tick(object sender, EventArgs e) //用于刷新状态
{
int iAxisNo = cboAxisNo.SelectedIndex;
if (m_bConnected)
{
try
{
// Instruction 1. Using library functions - acsc_GetFPosition, acsc_GetRPosition, ....
// Instruction 2. Read ACS variable - Already defined almost things (FPOS, RPOS, ...)
// Motion parameters and state is array (Max length is total number of axes)
//
// * Library function can read only 1 axis information, so if you want to read several axes, you have to call the function many times.
// (This may cause communication delay.)
// Recommand (if you want to read many axes) : read/write variable using ReadVariable, ReadVariableScalar, ReadVariableVector, ReadVariableMatrix
//
// Get Motor State
// ACSPL+ Variable : MST (integer)
m_nMotorState = _ACS.GetMotorState((Axis)iAxisNo);
// Returned value is integer, you need to use bitmaks
if ((m_nMotorState & MotorStates.ACSC_MST_MOVE) != 0) lblMoving.Image = Properties.Resources.On;
else lblMoving.Image = Properties.Resources.Off; // 运动中
if ((m_nMotorState & MotorStates.ACSC_MST_INPOS) != 0) lblInPos.Image = Properties.Resources.On;
else lblInPos.Image = Properties.Resources.Off; // 就位
if ((m_nMotorState & MotorStates.ACSC_MST_ACC) != 0) lblAcc.Image = Properties.Resources.On;
else lblAcc.Image = Properties.Resources.Off; // 加速
if ((m_nMotorState & MotorStates.ACSC_MST_ENABLE) != 0) lblEnable.Image = Properties.Resources.On;
else lblEnable.Image = Properties.Resources.Off; // 使能
// Reference position
// ACSPL+ Variable : RPOS (real)
m_lfRPos = _ACS.GetRPosition((Axis)iAxisNo); // 参考位置
// Feedback position (Encoder value)
// ACSPL+ Variable : FPO (real)
m_lfFPos = _ACS.GetFPosition((Axis)iAxisNo); //反馈位置
// PE (Position Error)
// There is no function in library. We need to use ReadVariable function
m_lfPE = (double)_ACS.ReadVariable("PE", ProgramBuffer.ACSC_NONE, iAxisNo, iAxisNo); //位置误差
// Feedback Velocity
m_lfFVEL = (double)_ACS.ReadVariable("FVEL", ProgramBuffer.ACSC_NONE, iAxisNo, iAxisNo); //实际速度
// txtRPOS.Text = String.Format("{0:0.0000}", m_lfRPos); //参考位置
rtb_xPos.Text = String.Format("{0:0.0000}", m_lfFPos); //反馈位置
// txtPE.Text = String.Format("{0:0.0000}", m_lfPE); //实际速度
// txtFVEL.Text = String.Format("{0:0.0000}", m_lfFVEL);//位置误差
// Read left/right hardware limits state
// ACSPL+ Variable : FAULT (integer)
m_objReadVar =
_ACS.ReadVariableAsVector("FAULT", ProgramBuffer.ACSC_NONE, 0, m_nTotalAxis - 1, -1, -1);
if (m_objReadVar != null)
{
m_arrReadVector = m_objReadVar as Array;
if (m_arrReadVector != null)
{
for (int i = 0; i < m_nTotalAxis; i++)
{
UpdateLimitState(i, (int)m_arrReadVector.GetValue(i));
}
}
}
}
catch (Exception ex)
{
MessageBox.Show(ex.Message, "ERROR", MessageBoxButtons.OK, MessageBoxIcon.Error);
System.Diagnostics.Debug.WriteLine(ex.Message);
}
}
}
private void btn_ACSStart_Click(object sender, EventArgs e) //连接
{
btn_ACSStart.Enabled = false;
btn_ACSStop.Enabled = true;
// Set updating timer
tmrMonitor.Interval = 50;
tmrMonitor.Start();
}
private void btn_ACSStop_Click(object sender, EventArgs e) //断开连接
{
if (m_bConnected) _ACS.CloseComm();
tmrMonitor.Stop();
btn_ACSStart.Enabled = true;
btn_ACSStop.Enabled = false;
}
private void MainFrom_FormClosed(object sender, FormClosedEventArgs e)
{
timer_RefreshUI.Stop();
}
private void UpdateLimitState(int axisNo, int fault) //刷新限位
{
if (axisNo < MAX_UI_LIMIT_CNT)
{
if ((fault & (int)SafetyControlMasks.ACSC_SAFETY_LL) != 0)
m_lblLeftLimit[axisNo].Image = Properties.Resources.Error;
else m_lblLeftLimit[axisNo].Image = Properties.Resources.Off;
if ((fault & (int)SafetyControlMasks.ACSC_SAFETY_RL) != 0)
m_lblRightLimit[axisNo].Image = Properties.Resources.Error;
else m_lblRightLimit[axisNo].Image = Properties.Resources.Off;
}
}
#endregion
#region
private void rtb_motion_Click(object sender, EventArgs e) //ACS调试页面
{
Motion motion = new Motion();
motion.Show();
}
private void rtb_about_Click(object sender, EventArgs e) //关于界面
{
AboutBox mAboutBox = new AboutBox();
mAboutBox.Show();
}
private void timer_RefreshUI_Tick(object sender, EventArgs e) //UI刷新
{
//状态灯刷新
lamp_acs.State = m_bConnected ? LampColor.Green : LampColor.Silver;
lamp_hexcal.State = m_bHexcalConnected ? LampColor.Green : LampColor.Silver;
//时间栏
//获取当前时间,构造形如 精确到秒,例如 2023-10-08 16:01:23
rle_timer.Text = "当前时间: " + DateTime.Now.ToString("yyyy-MM-dd HH:mm:ss");
}
#endregion
}
}