内容发布更新时间 : 2024/5/6 18:59:11星期一 下面是文章的全部内容请认真阅读。

第 6 页 共 11 页

图5 报警窗口属性配置

4）在报警窗口上方加上“实时报警”的文本，加粗显示，同时在报警窗口下方添加三个按钮，分别为“报警确认”、“声音开启”和“声音关闭”，如图5所示。

图6 功能按钮制作 3. 新建变量

1）在工程浏览器左侧的树型视图中选择\数据词典\，在右侧视图中双击\新建\，弹出定义变量的对话框，见图7所示。

图7 建立新变量

第 7 页 共 11 页

2）建立两个变量类型为内存整数的变量，变量名分别为ALARM和Beep_close，见图8所示。

图8 两个新变量

4. 新建动画连接 1）为报警确认按钮建立动画连接，选择“弹起时”动画连接，命令脚本为ALARM=0;

第 8 页 共 11 页

2）为声音开启按钮建立动画连接，选择“弹起时”动画连接，命令脚本为Beep_close=1;

为声音关闭按钮建立动画连接，选择“弹起时”动画连接，命令脚本为Beep_close=0; 5. 报警自定义函数

在组态王自定义函数中，有三个系统预置的报警自定义函数。分别为实型变量报警事件（$System_RealAlarm）、整型变量报警事件（$System_LongAlarm）和离散型变量报警事件（$System_DiscAlarm）预置自定义函数。

自定义函数的调用执行有两种方式：

1）系统产生报警事件后会自动调用相应数据类型的函数,如整型变量产生报警时,系统自动调用整型预置自定义函数；

2）如果在配置报警窗的“操作属性”时，选择了“允许双击报警条”，则系统运行时双击报警事件报警条，也会自动调用相应数据类型的函数。

第 9 页 共 11 页

三种预置自定义函数如下：

1.）实型：void $System_RealAlarm(RealTag rTag, long time, long nEvent, long nAction) { }

2.）整型：void $System_LongAlarm(LongTag lTag, long time, long nEvent, long nAction) { }

3.）离散型：void $System_DiscAlarm(DiscTag dTag, long time, long nEvent, long nAction) { }

各个预置自定义函数中的参数的含义为（以实型为例，其它都相同）： Void $System_RealAlarm(RealTag rTag, long nTime, long nEvent, long nAction) rTag：表示变量，即普通变量，和组态王系统变量一样具有值和变量所有的域，这些值都是只读的。

nTime：表示自从格林威治时间1970年1月1日0起到报警事件产生时的秒数，表征报警事件产生的时间；

nEvent：表示当前产生或双击报警窗时的报警类型。报警类型的返回值如下： 0—— 报警 1—— 恢复 2—— 确认 nAction：表示当nAction==1时表示是双击报警条，当nAction==0时表示产生报警事件。 预置自定义函数函数体初始内容为空，需要用户在里面添加命令语言。利用报警预置自定义函数，可以实现用户自己想在报警产生后做的一些处理。

我们在各个预置自定义函数中均写入如下脚本： if(nEvent==0) {ALARM=1;}

第 10 页 共 11 页

6. 事件命令语言

在事件命令语言中新建一个事件命令，事件描述为ALARM==1，在事件存在时每隔3秒执行一次，事件脚本如下图所示。该脚本的意思为执行本项目工程文件夹内beep.exe的程序，beep.exe程序是用VB写的一个播放报警音的程序。运行程序测试前要把beep.exe程序拷到项目工程文件夹内。