稱重公正計量站主要的檢測設備是電子秤, 工作中經常發現有人利用公正站的信譽, 破壞電子秤的結構進行作弊, 我們利用現有的稱重管理程序增加了防作弊功能, 減少了設備投資, 增加了設備的安全性。

安陽檢測中心目前有 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) 硬件連接:將電腦主機喇叭兩根引線與帶功放功能的音箱連接, 并調音箱聲音開關至適當位置。

這樣, 當電子秤上有人或稱重車輛時提醒稱重房內人員即可起身工作, 從而避免人為破壞。自從我們進行了簡單的改造后, 未發現利用各種遙控裝置進行作弊的現象。