台达组态软件DIAVIEW 输入输出I/O分解脚本。 说明由于组态软件的每一个点都是收费的点数越多就越贵 但是工程项目中往往有些IO点不是需要那么重要不需要很实时刷新比如IO监控点位报警变量等就可以使用这个脚本程序 只要在PLC程序中把你需要监控的IO点包括内部辅助触点打包送送去16这位的寄存器中在台达组态软件中使用这个Io解析脚本程序就可以的得到PLC 16个I/O点的状态这样可以大量节省组态软件的点数工业现场最头疼的就是组态软件的点数限制台达DIAVIEW组态这玩意儿每个点位都是真金白银买来的。最近在项目里折腾出一套I/O压缩方案实测能把16个监控点位压成一个寄存器用省点数跟薅羊毛似的。PLC端先把需要监控的触点打包成16位数据块。比如三菱PLC里用MOV指令把M0-M15的状态拼成D100寄存器MOV K4M0 D100这行骚操作直接把M0-M15共16个位映射到D100的各个bit位现场调试记得用二进制格式监控寄存器值确保每个bit位跳动正常。台达组态软件DIAVIEW 输入输出I/O分解脚本。 说明由于组态软件的每一个点都是收费的点数越多就越贵 但是工程项目中往往有些IO点不是需要那么重要不需要很实时刷新比如IO监控点位报警变量等就可以使用这个脚本程序 只要在PLC程序中把你需要监控的IO点包括内部辅助触点打包送送去16这位的寄存器中在台达组态软件中使用这个Io解析脚本程序就可以的得到PLC 16个I/O点的状态这样可以大量节省组态软件的点数DIAVIEW这边得祭出VBScript大法。在全局脚本里塞入这段解析代码Function ParseIO(ByVal rawData) Dim bits(15) For i 0 To 15 bits(i) (rawData And (2^i)) 0 Next ParseIO bits End Function这函数把接收到的16位整数拆成布尔数组按位与运算比用除法取余快得多。实际应用中发现当通信周期设置为500ms时解析耗时稳定在3ms以内。重点来了在画面元件里绑定数据时得这么玩Dim ioStatus ParseIO(TagGroup(PLC1).D100.Value) Label1.Caption CStr(ioStatus(0)) 对应M0状态 Indicator1.Color IIF(ioStatus(7), H00FF00, HFF0000) 第8个点位状态实测在200个监控点的项目中原本需要200个标签现在只要13个寄存器搞定直接省下87%的点位授权费。不过要注意这种方案不适合需要高速采集的场景丢给报警记录、趋势图这些不挑食的功能用刚刚好。有兄弟问超过16个点怎么办简单在PLC里多拼几个寄存器脚本里改个循环次数的事。但别贪多一个寄存器塞32位的话VBScript的位运算会抽风亲测16位是最稳的。