昆仑通泰触摸屏IO监控

 昆仑通泰触摸屏，一页触摸屏显示所有IO状态。

QB0显示的是我测试时传的系统脉冲字节，所以不同步，请忽略。

实现上面一页显示多组IO的思路大概就是，先用触摸屏自带的地址偏移功能，实现IO显示多路复用。然后把IO注释复制在一个运行不可见的便签控件上，用脚本分割字符串，生成字符数组，然后再显示到对应的文本框上。

下面是具体步骤

1.先建立2个设备通道，然后连接变量

数据类型选择16位，也可以是8位。如果选择了8位后面的脚本要稍微改动一下。

设置对应的地址偏移变量。

下面读写方式选择只读，这个很重要！！！默认是读写。测试的中发现选择读写，翻页的时候会把输出状态置false。

2.添加监控控件

添加动画显示控件，然后显示属性选择位显示。这里设置位的时候要主要高低字节要换一下。

然后添加标签，这里建议把标签的控件对象名改下，方便一会脚本传文本。

添加2个按钮用来加减偏移变量实现翻页。下面添加一个标签控件用来写IO注释，然后把标签设置不可见，运行的时候隐藏起来。IO注释内容可以用表格做好直接复制进去。

3.功能脚本

上翻页按钮脚本

下翻页按钮脚本

窗口循环脚本

脚本内容：

Dim ArrioNameStr(1000) AS string
Dim In_Data AS string
Dim Result AS integer
Dim ioNameNum AS integer

In_Data=DO监控画面.控件1.Text
Result=!SplitString(In_Data,ArrioNameStr,"\n")

ioNameNum=OutputOffset*8
DO监控画面.lbl_ioName1.Text=ArrioNameStr[ioNameNum+1]
DO监控画面.lbl_ioName2.Text=ArrioNameStr[ioNameNum+2]
DO监控画面.lbl_ioName3.Text=ArrioNameStr[ioNameNum+3]
DO监控画面.lbl_ioName4.Text=ArrioNameStr[ioNameNum+4]
DO监控画面.lbl_ioName5.Text=ArrioNameStr[ioNameNum+5]
DO监控画面.lbl_ioName6.Text=ArrioNameStr[ioNameNum+6]
DO监控画面.lbl_ioName7.Text=ArrioNameStr[ioNameNum+7]
DO监控画面.lbl_ioName8.Text=ArrioNameStr[ioNameNum+8]
DO监控画面.lbl_ioName9.Text=ArrioNameStr[ioNameNum+9]
DO监控画面.lbl_ioName10.Text=ArrioNameStr[ioNameNum+10]
DO监控画面.lbl_ioName11.Text=ArrioNameStr[ioNameNum+11]
DO监控画面.lbl_ioName12.Text=ArrioNameStr[ioNameNum+12]
DO监控画面.lbl_ioName13.Text=ArrioNameStr[ioNameNum+13]
DO监控画面.lbl_ioName14.Text=ArrioNameStr[ioNameNum+14]
DO监控画面.lbl_ioName15.Text=ArrioNameStr[ioNameNum+15]
DO监控画面.lbl_ioName16.Text=ArrioNameStr[ioNameNum+16]