用QBASIC实现对电子衡的保护

　　安阳检测中心目前有 7 个称重公正计量站, 在实际工作中经常发现有不法分子欲利用公正站的信誉在电子秤上加装遥控装置进行作弊。由于电子秤通常设置在房屋的外面, 假如我们不加任何保护措施, 一旦遭到破坏, 电子秤的计量就会不准确, 给国家和消费者造成损失。以往, 通常的做法是在电子秤易安装遥控装置的部位进行加固, 防止人为的破坏, 这种方法在夜晚司称人员休息时总难免被破坏,再有就是利用电脑监控系统进行管理。目前整体价格较高, 为避免这种损失, 我们利用已有 QBASIC 称重程序加上了保护程序, 当电子秤上有重量时如超过 20kg, 计算机报警, 提醒司称人员注意, 从而实现对电子秤的保护。整个保护实现过程如下:

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

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

　　( 3) 该程序重点在于利用已有的称重管理程序,使当电子秤称重物品大于 20kg( 根据称重仪表分度值定) 时, 自动报警。

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

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

　　( 4) 硬件连接:将电脑主机喇叭两根引线与带功放功能的音箱连接, 并调音箱声音开关至适当位置。这样, 当电子秤上有人或称重车辆时提醒称重房内人员即可起身工作, 从而避免人为破坏。自从我们进行了简单的改造后, 未发现利用各种遥控装置进行作弊的现象。

　　参考文献:

　　[1] 曹鲁湘, 等.UCDOS6.0 使用速成[M].清华大学出版社.

　　[2] 谭浩强.QBASIC 语言教程[M].电子工业出版社.

　　本文作者：李献波

　　( 作者通讯地址: 安阳市光辉路 13 号邮 政 编 码: 455001收 稿 日 期: 2007- 05- 30)