称重公正计量站主要的检测设备是电子秤, 工作中经常发现有人利用公正站的信誉, 破坏电子秤的结构进行作弊, 我们利用现有的称重管理程序增加了防作弊功能, 减少了设备投资, 增加了设备的安全性。

安阳检测中心目前有 7 个称重公正计量站, 在实际工作中经常发现有不法分子欲利用公正站的信誉在电子秤上加装遥控装置进行作弊。由于电子秤通常设置在房屋的外面, 假如我们不加任何保护措施, 一旦遭到破坏, 电子秤的计量就会不准确, 给国家和消费者造成损失。以往, 通常的做法是在电子秤易安装遥控装置的部位进行加固, 防止人为的破坏, 这种方法在夜晚司称人员休息时总难免被破坏,

再有就是利用电脑监控系统进行管理。目前整体价格较高, 为避免这种损失, 我们利用已有 QBASIC 称重程序加上了保护程序, 当电子秤上有重量时如超过 20kg, 计算机报警, 提醒司称人员注意, 从而实现对电子秤的保护。整个保护实现过程如下:

( 1) 称重程序要求运行环境为 : DOS6.0、UC-DOS6.0 和 QBASIC4.0, 硬件方面应准备一带有功放功能的音箱。

( 2) 整个程序分为称重、管理、重输帐号主程序,及数据管理、品名管理、计量员管理、参数管理和返回子程序部分, 这部分程序设计在此不涉及。程序设计框图如下:

( 3) 该程序重点在于利用已有的称重管理程序,

使当电子秤称重物品大于20kg( 根据称重仪表分度值定) 时, 自动报警。

从称重对象大于 20kg, 我们可以得知需要一个判断语句, 即如果当称重对象大于 20kg 运行报警程序, 显然利用 IF?THEN 的语句来实现, 编写的语句为

IF I>20kg

THEN beep 5  ( 响铃 5 声)

护程序所加的位置应该是在串行口输入数、接受信号时 , 如果接受信号大于 20kg, 发出报警, 所以报警程序应该在:

OPEN" com1:1200, , , , rs, cs0, ds, cd0" FOR RAN-DOM AS #1 trsS=INPUTS( 20, 1) FOR i = 1 TO 20

IF MIDS( trsS, i, 1) = "=" THEN IF I>=20kg THEN BEEP 5

( 4) 硬件连接:将电脑主机喇叭两根引线与带功放功能的音箱连接, 并调音箱声音开关至适当位置。

这样, 当电子秤上有人或称重车辆时提醒称重房内人员即可起身工作, 从而避免人为破坏。自从我们进行了简单的改造后, 未发现利用各种遥控装置进行作弊的现象。