威纶通触摸屏宏指令，通讯自由协议函数，详解与实操 - 工控编程吧

上传

点击文件名下载附件

自由通讯分类函数共有7个，分别是GetCTS，SetRTS，
IMPORT， IMPORT2， IMPORT3，OUTPORT，PURGE.
可以实现获取与设置串口信息请求发送/清除发送信号，
从串口获取与输入数据。
以及清空串口缓存区数据。
同样在操作这些函数前，
我们也可以在界面上准备几个元件，
用于显示函数执行的结果。
添加两个位状态设置元件，
用于调用宏指令，
添加一个数值元件，用于显示结果。
如图。
(, 下载次数: 7)

上传

点击文件名下载附件
IMPORT。
函数用于从串口或以太网读取数据。
例如
char c[9]
short n
INPORT(c[0], "Free Protocol", 9, n)
表示函数以自由通讯方式从串口读取硬件Free Protocol的数据，
结果保存在数组c的元素0开始的9个元素里。
实际读取的数据个数保存在n中。

2. IMPORT2。
函数与上面IMPORT一样也是用于从串口读取数据，只是添加了等待功能。
例如
char c[9]
short n
INPORT2(c[0], "Free Protocol", n, 100)
表示函数从串口获取数据存储在数组C里，在等待100ms后未再收到任何数据，则函数返回。
实际读取的数据个数保存在变量n里。

3. IMPORT3。
与前面IMPORT函数一样，此函数也是用于从串口读取数据。
例如
char c[9]
short n
INPORT3(c[0], "Free Protocol", 9, n)
表示函数以自由通讯方式从串口读取硬件Free Protocol的数据，
结果保存在数组c的元素0开始的9个元素里。
实际读取的数据个数保存在n中。
如果还有未读取的数据，则会会保留于HMI内存缓冲区中，留待下次读取，避免数据遗失。

4.OUTPORT。
此函数用于将数据写入到串口中。
例如
char c[9]
FILL(c[0],0,9)
c[0] = 0x02
c[1] = '0' //0x30
c[2] = '1' //0x31
c[3] = 0x34
c[4] = 0x31
c[5] = 0x31//启动PLC指令
c[6] = 0x46
c[7] = 0x39
c[8] = 0x03
OUTPORT(c[0], "Free Protocol", 9)
表示将数组从元素0开始的9个数据写入到串口中，
也就是发送到硬件Free Protocol ，以控制PLC启动。

5. PURGE。
此函数用于清空指定串口的输入与输出缓存区数据。
在出现通讯错误，异常中断，或其他情况都可以调用此函数清空串口缓存区的数据。
例如
PURGE(1)
表示清空串口1的缓存区数据。
官方介绍支持COM1 ~ COM3，也就是说可传递的参数可以为1，2，3。

6. GetCTS。
用于获取指定串口CTS信号状态，支持COM1.
例如
short n
GetCTS(1, n)
表示获取串口1的CTS信号，保存到变量n里。
CTS  在高电位，n为1，否则为0.

7. SetRTS。
用于设置指定串口RTS信号状态，支持COM1.
例如
short n=1
SetRTS(1, n)
表示设置串口1的RST信号为1.
当传入的  n  参数值大于  0  时，将拉高  RTS  电位，
当  n  参数值等于 0  时，将拉低  RTS  电位。
CTS和RTS信号在通讯时相当于一种握手协议，一般我们不使用握手协议。
而是通过代码实现主从收发数据，所以在硬件上，
串口通讯一般也就有三根线：数据收，发，公共线。

可以使用下面代码查看执行结果，也可以观看视屏的演示。
macro_command main()
char c[9]
FILL(c[0],0,9)
c[0] = 0x02
c[1] = '0' //0x30
c[2] = '1' //0x31
c[3] = 0x34
c[4] = 0x31
c[5] = 0x31//启动PLC指令
c[6] = 0x46
c[7] = 0x39
c[8] = 0x03
OUTPORT(c[0], "Free Protocol", 9)
short n
FILL(c[0],0,9)
PURGE(1)
GetCTS(1, n)
SetRTS(1, n)
INPORT(c[0], "Free Protocol", 9, n)
//INPORT2(c[0], "Free Protocol", n, 100)
//INPORT3(c[0], "Free Protocol", 9, n)
if(n>1) then
n=1
SetData(n, "Local HMI", LW, 0, 1)
else
n=0
SetData(n, "Local HMI", LW, 0, 1)
end if
end macro_command

欢迎光临工控编程吧 (https://www.gkbc8.com/)