ACP C#使用手册

i:=i+1
GVL.Var11:=NOT GVL.Var11
GVL.Var12:=LINT\_TO\_INT(i)
GVL.Var13:=3.1415926\*LINT\_TO\_REAL(i)/1000
GVL.Var14:=CONCAT('Var i is ',LINT\_TO\_STRING(i))
GVL.Var15\[3]:=LINT\_TO\_BYTE(i)
GVL.Var16.S1:=LINT\_TO\_WORD(i)
GVL.Var16.S2:=LINT\_TO\_TIME(i)

AcpClient \_acpClient;
private void button\_Click(object sender, RoutedEventArgs e)
{
   _acpClient = new AcpClient("192.168.1.200.1.1", 600, ConnectionType.Tcp, false, 500, 500)
if (\_acpClient.ConnState == ConnState.SuccessfulConnection)
  {
MessageBox.Show("连接成功")
  }
else
  {
MessageBox.Show("连接失败")
  }
}

 class PLCStruct : STRUCT
 {
      public DWORD child1 = new DWORD()
      public TIME child2 = new TIME()
  }//结构体类型
      
      string ReadVar1 = "Application.PLC\_PRG.Var1";//读取变量1的路径
      string ReadVar2 = "Application.PLC\_PRG.Var2";//读取变量2的路径
      string ReadVar3 = "Application.PLC\_PRG.Var3";//读取变量3的路径
      string ReadVar4 = "Application.PLC\_PRG.Var4";//读取变量4的路径
      string ReadVar5 = "Application.PLC\_PRG.Var5";//读取变量5的路径
      string ReadVar6 = "Application.PLC\_PRG.Var6";//读取变量61的路径
      string errorUnmarshal;
      
BOOL bool1 = new BOOL();//实例IplcOpenType Bool类型
INT INT1 = new INT();//实例IplcOpenType Int类型
REAL REAL1 = new REAL();//实例IplcOpenType Real类型
STRING STRING1 = new STRING();//实例IplcOpenType String类型
ARRAY\<INT> intARRAY1 = new ARRAY\<INT>(new\[] { (0, 4) });//实例IplcOpenType一维int类型数组，数组起始角标为0，结束标为4.
PLCStruct Struct1 = new PLCStruct();//实例化结构体; 
private void btnread\_Click(object sender, RoutedEventArgs e)
{
     var ReadError = \_acpClient.ReadVar(ReadVar1, bool1, out errorUnmarshal);//开始读取变量1布尔
     ReadError = \_acpClient.ReadVar(ReadVar2, INT1, out errorUnmarshal);//开始读取变量2整数
     ReadError = \_acpClient.ReadVar(ReadVar3, REAL1, out errorUnmarshal);//开始读取变量3实数
     ReadError = \_acpClient.ReadVar(ReadVar4, STRING1, out errorUnmarshal);//开始读取变量4字符串
     ReadError = \_acpClient.ReadVar(ReadVar5, intARRAY1, out errorUnmarshal);//开始读取变量5数组
     ReadError = \_acpClient.ReadVar(ReadVar6, Struct1, out errorUnmarshal);//开始读取变量6结构体
     ;
             Var1.Text = bool1.ToString(); //将变量1的数据显示到界面Var1的文本框中
             Var2.Text = INT1.ToString();//将变量2的数据显示到界面Var2的文本框中
             Var3.Text = REAL1.ToString();//将变量3的数据显示到界面Var3的文本框中
             Var4.Text = STRING1;        //将变量4的数据显示到界面Var4的文本框中
             Var5.Text = intARRAY1\[2].ToString();//将变量5数组的第三个元素显示到界面Var5的文本框中
             Var6.Text = Struct1.child1.ToString();//将结构体的第一个子元素的显示到界面Var6的文本框中
             Var7.Text = Struct1.child2.ToString();//将结构体的第二个子元素的显示到界面Var7的文本框中
             } 

private void btnMultiRead\_Click(object sender, RoutedEventArgs e)
{
List\<AccessVarModel> accessVarModels = new List\<AccessVarModel>()
     AccessVarModel accessVarModel = new AccessVarModel()
     AccessVarModel accessVarMode2 = new AccessVarModel()
     AccessVarModel accessVarMode3 = new AccessVarModel()
     AccessVarModel accessVarMode4 = new AccessVarModel()
     AccessVarModel accessVarMode5 = new AccessVarModel()
     AccessVarModel accessVarMode6 = new AccessVarModel()
     
     
     accessVarModel.VarName = "Application.PLC\_PRG.Var1"
     accessVarModel.VarInstance = bool1
     
     accessVarMode2.VarName = "Application.PLC\_PRG.Var2";
     accessVarMode2.VarInstance = INT1
     
     accessVarMode3.VarName = "Application.PLC\_PRG.Var3"
     accessVarMode3.VarInstance = REAL1;
     
     accessVarMode4.VarName = "Application.PLC\_PRG.Var4";
     accessVarMode4.VarInstance = STRING1;&#xA;&#xA;     
     
     accessVarMode5.VarName = "Application.PLC\_PRG.Var5"
     accessVarMode5.VarInstance = intARRAY1
     
     accessVarMode6.VarName = "Application.PLC\_PRG.Var6"
     accessVarMode6.VarInstance = Struct1
     
     accessVarModels.Add(accessVarModel)
     accessVarModels.Add(accessVarMode2)
     accessVarModels.Add(accessVarMode3)
     accessVarModels.Add(accessVarMode4)
     accessVarModels.Add(accessVarMode5)
     accessVarModels.Add(accessVarMode6)
     var MultiReadError = \_acpClient.AccessVars(accessVarModels);//批量读取方法
     
     MultiVar1.Text = accessVarModel.VarInstance.ToString()
     MultiVar2.Text = accessVarMode2.VarInstance.ToString()
     MultiVar3.Text = accessVarMode3.VarInstance.ToString()
     MultiVar4.Text = accessVarMode4.VarInstance.ToString();
     MultiVar5.Text = ((ARRAY\<INT>)accessVarMode5.VarInstance)\[3].Value.ToString()
     MultiVar6.Text = ((PLCStruct)accessVarMode6.VarInstance).child1.Value.ToString()
     MultiVar7.Text = ((PLCStruct)accessVarMode6.VarInstance).child2.Value.ToString()
     }

int req = 0;//添加订阅的请求号
long \_Subid = new long(); //用于接受回调函数ID号
bool isReg = true;//用于初始化注册回调函数
string\[] strings = new string\[6];//用于订阅PLC程序变量
private void btnSub\_Click(object sender, RoutedEventArgs e)
 {
      if (isReg)          //如果初次调用程序，注册回调函数
      {
      var RegError = \_acpClient.RegisterRouterEvent(SubCallBack);//注册回调函数
      
      isReg = false;  //注册完成后，设为false，不再进行注册
      }
      
      strings\[0] = "Application.GVL.Var11"
      strings\[1] = "Application.GVL.Var12"
      strings\[2] = "Application.GVL.Var13"
      strings\[3] = "Application.GVL.Var14"
      strings\[4] = "Application.GVL.Var15"
      strings\[5] = "Application.GVL.Var16"
      var AddSubError = \_acpClient.AddBatchSubVar(strings, req, 15)
      } 

BOOL Subbool = new BOOL();      //创建订阅的BOOL类型
INT Subint = new INT();         //创建订阅的Int类型
REAL SubReal = new REAL();      //创建订阅的Real类型
STRING Substring = new STRING();//创建订阅的String类型
ARRAY\<BYTE> SubbyteArray = new ARRAY\<BYTE>(new\[] { (0, 9) });//创建订阅的一维BYTE类型数组，下角标从0\~9
PLCStruct Substruct = new PLCStruct();//创建订阅的结构体类型
private void SubCallBack(ValueChangeDates dates)
{
    \_Subid = dates.subid;//回调函数ID号
    
    foreach (var item in dates.ValueChangeDateList)
    {
    if (item.VarName == "Application.GVL.Var11")//如果数据变量名为Var1
    {
    Subbool.Unmarshal(item.Bytes);          //将数据转换为Bool类型
    Application.Current?.Dispatcher.InvokeAsync(new Action(() =>
    {
    
    SubVar1.Text = Subbool.ToString();  //输出到SubVar1的文本框中
    }));
    
    }
    if (item.VarName == "Application.GVL.Var12")//如果数据变量名为Var12
    {
    
    Subint.Unmarshal(item.Bytes);           //将数据转换为int类型
    Application.Current?.Dispatcher.InvokeAsync(new Action(() =>
    {
    SubVar2.Text = Subint.ToString();   //输出到SubVar2的文本框中
    }));
    }
    if (item.VarName == "Application.GVL.Var13")//如果数据变量名为Var13
    {
    
    SubReal.Unmarshal(item.Bytes);          //将数据转换为Real类型
    Application.Current?.Dispatcher.InvokeAsync(new Action(() =>
    {
    SubVar3.Text = SubReal.ToString();  //输出到SubVar3的文本框中
    }))
    }
    
    if (item.VarName == "Application.GVL.Var14")//如果数据变量名为Var14
    {
    
    Substring.Unmarshal(item.Bytes);        //将数据转换为string类型
    Application.Current?.Dispatcher.InvokeAsync(new Action(() =>
    {
    SubVar4.Text = Substring.ToString();//输出到SubVar4的文本框中
    }));
    
    }
    if (item.VarName == "Application.GVL.Var15")//如果数据变量名为Var15
    {
    
    SubbyteArray.Unmarshal(item.Bytes);     //将数据转换为一维BYTE数组SubbyteArra
    Application.Current?.Dispatcher.InvokeAsync(new Action(() =>
    {
    SubVar5.Text = SubbyteArray\[3].ToString();//将SubbyteArray的第4个元素输出到SubVar5的文本框中
    }));
    
    }
    
    if (item.VarName == "Application.GVL.Var16")//如果数据变量名为Var16
    {
    
    Substruct.Unmarshal(item.Bytes);        //将数据转换为结构体Substruct
    Application.Current?.Dispatcher.InvokeAsync(new Action(() =>
    {
    SubVar6.Text = Substruct.child1.ToString();//将Substruct的第一个子成员输出到SubVar6的文本框中
    SubVar7.Text = Substruct.child2.ToString();//将Substruct的第二个子成员输出到SubVar7的文本框中
    }));
    }
  }
 } 

 private void btnUnSub\_Click(object sender, RoutedEventArgs e)
 {
 
 var UnSubError = \_acpClient.DelBatchSubVar(\_Subid);//\_Subid为SubCallBack函数获取的ID号
 } 

private void ValueWrite(object sender, RoutedEventArgs e)
{
     TextBox tb = (TextBox)sender;
     
     if (tb.Name == "Var1")
     {
         bool.TryParse(Var1.Text, out bool boolwrite);//将Text控件Var1的文本内容转成bool类型存入boolwrite变量
         bool1.Value = boolwrite;//将boolwrite赋值给IplcOpenType类型的实例bool1
         var WriteError = \_acpClient.WriteVar(ReadVar1, bool1, out errorUnmarshal);//写入变量
         }
         else if (tb.Name == "Var2")
         {
         short.TryParse(Var2.Text, out short shortwrite);
         
         INT1.Value = shortwrite
         var WriteError = \_acpClient.WriteVar(ReadVar2, INT1, out errorUnmarshal)
         }
         else if (tb.Name == "Var3")
         {
         float.TryParse(Var3.Text, out float floatwrite)
         REAL1.Value = floatwrite
         var WriteError = \_acpClient.WriteVar(ReadVar3, REAL1, out errorUnmarshal)
         }
         else if (tb.Name == "Var4")
         {
         STRING1.Value = Var4.Text.Replace("\0", "");
         var WriteError = \_acpClient.WriteVar(ReadVar4, STRING1, out errorUnmarshal);
         }
         else if (tb.Name == "Var5")
         
         var ReadError = \_acpClient.ReadVar(ReadVar5, intARRAY1, out errorUnmarshal);//读取数组intARRAY1
         short.TryParse(Var5.Text, out short intArray2write);//将Text文本转换成Int类型&
         intARRAY1\[2].Value = intArray2write;//修改数组intARRAY1\[2]的值
         var WriteError = \_acpClient.WriteVar(ReadVar5, intARRAY1, out errorUnmarshal);//写入数组intARRAY1
         }
         else if (tb.Name == "Var6")
         {
         var ReadError = \_acpClient.ReadVar(ReadVar6, Struct1, out errorUnmarshal);//读取结构体
         uint.TryParse(Var6.Text, out uint StuctChild1write);//将文本转换为成员1类型
         Struct1.child1.Value = StuctChild1write;//修改成员1的值
         var WriteError = \_acpClient.WriteVar(ReadVar6, Struct1, out errorUnmarshal);//写入
         }
         else if (tb.Name == "Var7")
         {
         var ReadError = \_acpClient.ReadVar(ReadVar6, Struct1, out errorUnmarshal);//读取结构体
         TimeSpan timechange = new TimeSpan();  //新建TimeSpan类型用于接收修改值
         TimeSpan.TryParse(Var7.Text, out timechange);//将Text文本转成TimeSpan类型
         Struct1.child2.Value = timechange;//赋值结构体成员2
         var WriteError = \_acpClient.WriteVar(ReadVar6, Struct1, out errorUnmarshal);//写入
         }
   } 

AcpClient \_acpClient= new AcpClient(string deviceID, uint Port, ConnectionType.Tcp,
bool isReConnect, int send\_timeout\_ms, int rec\_timeout\_ms)

Errors ReadVar(string VarName, IPlcOpenType VarInstance,out string innerError);

Errors WriteVar(string VarName, IPlcOpenType VarInstance, out string innerError); 

//实例化一个AccessVarModel列表
List\<AccessVarModel> accessVarModels = new List\<AccessVarModel>();

//实例化一个AccessVarModel对象
AccessVarModel accessVarModel = new AccessVarModel()

//设定AccessVarModel对象的路径和类型
accessVarModel.VarName = "Application.PLC\_PRG.Var1"
accessVarModel.VarInstance = bool1

//设定处理方式，默认为读取变量不需要设定，写入变量需要设定
accessVarModel.AccessType = acp\_idl.PlcAccess.AccessType.Write

//将accessVarModel对象添加到列表中
accessVarModels.Add(accessVarModel)

//批量读写
var Error = \_acpClient.AccessVars(accessVarModels)

//定义一个结构体，成员变量的类型，定义顺序必须与PLC中结构体一样
class PLCStruct : STRUCT                   //创建结构体，用于读写和订阅结构体数据
public DWORD child1 = new DWORD(); //结构体子成员1类型与PLC类型DWORD相同
public TIME child2 = new TIME(); //结构体子成员2类型与PLC类型TIME相同
}
//结构体类型
//定义string变量来存储PLC中结构体的路径string ReadStruPath = "Application.PLC\_PRG.Var5";/
/设置读取结构体路径
//实例化结构体
PLCStruct Struct1 = new PLCStruct();
//实例化结构体
//读写结构体
Var Error=\_acpClient.ReadVar(ReadStruPath, Struct1, out errorUnmarshal);
Var Error=\_acpClient.WriteVar(ReadStruPath, Struct1, out errorUnmarshal); 

//支持一维至三维数组，定义一个与PLC类型、维度、始末数字相同的数组
ARRAY\<INT> ArrayName = new ARRAY\<INT>(new\[] { (0,4) });
//一维数组
ARRAY\<INT> ArrayName = new ARRAY\<INT>(new\[] { (3, 10), (3, 10) })
//二维数组
ARRAY\<INT> ArrayName = new ARRAY\<INT>(new\[] { (2, 5), (0, 9)，(0, 9) });
//三维数组
//定义string变量来存储PLC中数组的路径
string ReadArrayPath = "Application.PLC\_PRG.Var6"

//读写数组
Var Error=\_acpClient.ReadVar(ReadArrayPath, ArrayName, out errorUnmarshal)
Var Error=\_acpClient.WriteVar(ReadArrayPath, ArrayName, out errorUnmarshal); 

| //使用RegisterRouterEvent方法注册回调函数SubCallBack 
var RegError = \_acpClient.RegisterRouterEvent(SubCallBack);//注册回调函数

//添加字符串数组用于设定订阅变量的路径
string\[] strings = new string\[10];//string类型数组
strings\[0] = "Application.GVL.Var11";//订阅变量路径1
strings\[1] = "Application.GVL.Var12";//订阅变量路径2
strings\[2] = "Application.GVL.Var13";//订阅变量路径3

//添加订阅，req代表请求号，15代表订阅周期15
var AddSubError = \_acpClient.AddBatchSubVar(strings,0,15); 

//创建订阅的变量类型以及回调函数ID号
BOOL Subbool = new BOOL();  //创建回调函数接收的Bool类型
INT  Subint = new INT();    //创建回调函数接收的Int类型
REAL Subreal = new REAL(); //创建回调函数接收的Real类型
long \_Subid = new long(); //用于接受回调函数ID号
//回调函
private void SubCallBack(ValueChangeDates dates)
{
 _Subid = dates.subid;//保存回调ID号
 foreach (var item in dates.ValueChangeDateList)//遍历找到变量，接收数据
 
 {
 if (item.VarName == "Application.GVL.Var11")//如果数据变量名为Var11&
 {
 Subbool.Unmarshal(item.Bytes);          //将数据转换为Bool类型
 }
 if (item.VarName == "Application.GVL.Var12")//如果数据变量名为Var12
 {
 Subint.Unmarshal(item.Bytes);          //将数据转换为Int类型
 }
 if (item.VarName == "Application.GVL.Var13")//如果数据变量名为Var13
 {
 Subreal.Unmarshal(item.Bytes);          //将数据转换为Real类型
 
 }
 }

//使用DelBatchSubVar方法取消订阅，需要传递回调函数ID
var UnSubError = \_acpClient.DelBatchSubVar(\_Subid);//\_Subid为SubCallBack方法获取的ID号