C# 松下PLC通讯协议标准类代码.doc

using System;using System.Collections.Generic;using System.Linq;using System.Text;using System.Threading;using System.IO.Ports;using System.Windows.Forms;namespace WindowsFormsApplication1 class PLC / / 速美达自动化 郑茂强 / / /触点 X、Y、R /数据寄存器 D /*-读取单触点状态RCS (XYR)- * 例:读取Y1 * 发送:%01#RCSY0001*CR * 返回:%01$RC1*CR * 0=off,1=on * -*/ /*-写入单触点状态WCS (XYR)- * 例:写入Y1=on * 发送:%01#WCSY00011*CR * 返回:%01$WC*CR * -*/ /*-读取多触点状态RCP (XYR)- * 例:读取Y1-Y3 * 发送:%01#RCP3Y0001R0001Y0003T0099*CR * 返回:%01$RC1011*CR * 0=off,1=on * -*/ /*-读取Word型触点状态RCC (XYR)- * 例:读取Y1-Y3 * 发送:%01#RCCY00010003*CR * 返回:%01$RC34127856BC9A*CR * -*/ /*-写入多触点状态WCP (XYR)- * 例:写入Y1-Y3为on * 发送:%01#WCP3Y00011R00021Y00031*CR * 返回:%01$WC*CR * 0=off,1=on * -*/ /*-读取DT数据RD- *例:读取D1105-D1107的内容 *发送:%01#RDD011050110757CR *返回:%01$RD630044330A0062CR *值:D1105=0063H,D1106=3344H,D1107=000AH *-*/ /*-写入DT数据WD- * 例:写入数据到D1-D13 D1=0005H,D2=1507H,D=0900H * 发送:%01%WDD00001000030500071500095DCR * 返回:%01$WD13CR *-*/ public static TextBox txtCommLog = new TextBox(); public static SerialPort COMM = new SerialPort(); public static double DTValue = null; public static System.Collections.BitArray arrXYMValue = null; public static int iDelay = 60; public static bool Open(string strPort) try if (COMM.IsOpen) COMM.Close(); COMM.PortName = strPort; COMM.BaudRate = 19200; COMM.Parity = Parity.Even; COMM.DataBits = 7; COMM.StopBits = StopBits.One; COMM.NewLine = rn; COMM.DataReceived += new SerialDataReceivedEventHandler(OnDataReceived); COMM.Open(); return true; catch (Exception ex) return false; public static void Close() if (COMM.IsOpen) COMM.Close(); private delegate void SetTextCallback(string text); private static void SetText(string text) /记录通信事件 if (txtCommLog.InvokeRequired) SetTextCallback d = new SetTextCallback(SetText); txtCommLog.Invoke(d, new object text ); else txtCommLog.Text = text + rn + txtCommLog.Text; private static void OnDataReceived(object sender, SerialDataReceivedEventArgs e) int i = 0; string readText = ; Thread.Sleep(1); readText = COMM.ReadLine(); string sHead = readText.Substring(0, 4);/%01$; string sComm = readText.Substring(4, 2);/RC/WC/RD/WD string sValues = ; string tValue =; byte tXYMValue = null; Int32 iValue = 0; SetText(PLC-PC: + readText); switch (sHead) case %01$: /读写成功 switch (sComm) case RD:/读取WD,转换为十进制 sValues = readText.Substring(6, readText.Length - 8); DTValue = new doublesValues.Length / 4; for (i = 0; i (sValues.Length / 4); i+) tValue = sValues.Substring(i * 4, 4); DTValuei = (double)Convert.ToInt32(tValue.Substring(2, 2) + tValue.Substring(0, 2), 16) / 100; Console.WriteLine(DT+i.ToString()+:+DTValuei.ToString(); break; case RC: /RCC读取Word类型触点,转换为二进制 sValues = readText.Substring(6, readText.Length - 8); /XYMValue = new Int32sValues.Length / 4; arrXYMValue = new System.Collections.BitArraysValues.Length / 4; for (i = 0; i (sValues.Length / 4); i+) tValue = sValues.Substring(i * 4, 4); iValue = Convert.ToInt32(tValue.Substring(2, 2) + tValue.Substring(0, 2), 16); tXYMValue = BitConverter.GetBytes(iValue); arrXYMValuei = new System.Collections.BitArray(tXYMValue); Console.WriteLine(XYM + i.ToString() + : + arrXYMValueii.ToString(); /- /arrXYMValue0n 第1个Mn的值 如:M8,则arrXYMValue08 /arrXYMValue1n 第2个Mn的值 /- break; case WD: /写入DT成功,没返回值! break; case WC: /写入触点成功,没返回值! break; break; case %01!: /读写失败 /返回错误 break; / / 设置单触点 / setM(string XYMaddr,int value) / XYMaddr:寄存器地址 / value=0 off; / value=1 on; / public static void setM(string XYMaddr,int value) /value 0=off,1=on /发送:%01#WCSY00011*CR string outStr = ; string sReg=XYMaddr.Substring(0,1); string sAddr=XYMaddr.Substring(1,XYMaddr.Length-1).PadLeft(4).Replace( ,0); outStr = %01#WCS + sReg + sAddr + value.ToString(); outStr = outStr + bcc(outStr)+r; COMM.Write(outStr); SetText(PC-PLC: + outStr); return; / / 本命令只是发送，取值，取值在OnDataReceived里 /按字读取触点 / readMS(string DTaddr1, string DTaddr2) / DTaddr1:寄存器起始地址 / DTaddr2:寄存器结束地址 / 如:readMS(M1,M4); / %01#RCCR00090009 读WR9到WR9 / / / public static void readMS(string DTaddr1, string DTaddr2) /-地址转换- string sReg = DTaddr1.Substring(0, 1); /获取D string sA1 = DTaddr1.Substring(1, DTaddr1.Length - 1); /DT1中的1 string sA2 = DTaddr2.Substring(1, DTaddr2.Length - 1); /DT4中的4 int iLen = Convert.ToInt16(sA2) - Convert.ToInt16(sA1) + 1; /4-1 /-按字读触点地址要除于10？ sA1 = sA1.PadLeft(4).Replace( , 0); sA2 = sA2.PadLeft(4).Replace( , 0); string sAddr = sReg + sA1 + sA2; /地址:D0000100004 /- string outStr = ; outStr = %01#RCC + sAddr; outStr = outStr + bcc(outStr) + r; COMM.Write(outStr); SetText(PC-PLC: + outStr); return; / / writeDT(string DTaddr1,string DTaddr2, int value) / DTaddr1:寄存器起始地址 / DTaddr2:寄存器结束地址 / value=数值; / 如:writeDT(D1,D4,arrValue); 其中double arrValue=0.1,23.3,22.0,43.55; / public static void writeDT(string DTaddr1,string DTaddr2, double value) /发送:%01%WDD00001000030500071500095DCR /-地址转换- string sReg = DTaddr1.Substring(0, 1); /获取D string sA1 = DTaddr1.Substring(1, DTaddr1.Length - 1); /DT1中的1 string sA2 = DTaddr2.Substring(1, DTaddr2.Length - 1); /DT4中的4 int iLen = Convert.ToInt16(sA2) - Convert.ToInt16(sA1) + 1; /4-1 sA1 = sA1.PadLeft(5).Replace( , 0); sA2 = sA2.PadLeft(5).Replace( , 0); string sAddr = sReg + sA1 + sA2; /地址:D0000100004 /-数值转换- string sValues = ; string sValue = ; for (int i = 0; i PLC: + outStr); return; / / 本命令只是发送，取值，取值在OnDataReceived里 / readDT(string DTaddr1, string DTaddr2) / DTaddr1:寄存器起始地址 / DTaddr2:寄存器结束地址 / 如:readDT(D1,D4); / / / public static void readDT(string DTaddr1, string DTaddr2) /-地址转换- string sReg = DTaddr1.Substring(0, 1); /获取D string sA1 = DTaddr1.Substring(1, DTaddr1.Length - 1); /DT1中的1 string sA2 = DTaddr2.Substring(1, DTaddr2.Length - 1); /DT4中的4 int iLen = Convert.ToInt16(sA2) - Convert.ToInt16(sA1) + 1; /4-1 sA1 = sA1.PadLeft(5).Replace( , 0); sA2 = sA2.PadLeft(5).Replace( , 0); string sAddr = sReg + sA1 + sA2; /地址:D0000100004 /- string outStr = ; outStr = %