编写电表通讯程序通常涉及以下几个步骤：
准备通讯线路
连接好电能表的485通讯线路。
选择合适的通讯模块
在PLC中选择合适的通讯模块，如CP341或CP343等，并进行安装和配置。
编写PLC程序
使用编程语言（如LAD、FBD等）编写与电能表通讯的程序。
在程序中，通过PLC通讯模块配置与电能表的物理地址、通讯协议等参数，建立起PLC与电能表之间的通讯连接。
通过读取或写入指令，可以读取或控制电能表的各种参数，如电压、电流、功率等参数，实现对它的实时监测和控制。
配置电能表
在电能表中，配置好通讯协议和物理地址等参数，确保与PLC的通讯参数一致。
测试通讯
完成配置和编程后，进行通讯测试，确保PLC能够正确读取和写入电能表的数据。
```pascal
PROGRAM ElectricMeterCommunication
VAR
// 定义Modbus RTU主站指令库
MBUS_CTRL: MBUS_CTRL;
MBUS_MSG: MBUS_MSG;
// 定义电能表地址和寄存器地址
SlaveAddress: INT := 1;
StartAddress: INT := 3;
TransmissionType: STRING := "Poll trigger";
// 定义读取的数据缓冲区
ReadData: ARRAY [1..100] OF REAL;
END_VAR
// 初始化通讯模块
init:
MBUS_CTRL.Address := SlaveAddress;
MBUS_CTRL.BaudRate := 9600;
MBUS_CTRL.DataBits := 8;
MBUS_CTRL.Parity := 'N';
MBUS_CTRL.StopBits := 1;
MBUS_CTRL.Protocol := 'ModbusRTU';
// 发送读取请求
readRequest:
MBUS_MSG.FunctionCode := 0x03; // 读取保持寄存器
MBUS_MSG.RegisterAddress := StartAddress;
MBUS_MSG.RegisterCount := 100;
MBUS_MSG.Data := ReadData;
MBUS_CTRL.Send(MBUS_MSG);
// 处理接收到的数据
processResponse:
WHENMBUS_CTRL.Status = 'OK' THEN
// 读取成功，处理数据
FOR i := 1 TO 100 DO
WriteData(i, ReadData(i));
END_FOR;
ELSE
// 读取失败，处理错误
WriteError("Failed to read data from meter.");
END_WHEN;
// 主循环
loop:
// 定期发送读取请求
readRequest;
// 等待一段时间
WAIT(100);
END_LOOP;
```
在这个示例中，我们使用了Modbus RTU协议，配置了PLC的通讯参数，并编写了一个简单的程序来读取电能表的数据。请根据具体的电表型号和通讯协议进行相应的调整。
