高空站調用地面自動氣象站實時數據的方法

陳英+施君+侯鐵麗+肖金

摘 要

為了推進氣象觀測業務自動化，優化觀測業務流程和管理制度，根據湖南省氣象局的安排，懷化站實行高空地面業務一體化。因受L波段雷達信號線纜長度和值班室條件等原因限制，我站目前不能實現高空和地面在同一值班室當班，本文探討利用程序實現調用地面自動氣象站的方法。

【關鍵詞】高空 地面 氣象站 調用 方法

1 開發目的

本功能模塊是湖南省氣象局短平快科研課題《高空地面氣象觀測業務一體化監控平臺》的一個子模塊，雖然系統已有遠程控制主模塊，可以控制高空、地面站的任意一臺電腦，但在業務電腦盡可能少地使用占用資源較多的第三方軟件，以提高電腦穩定性，針對高空放球前和放球初期所需重要地面數據，單獨設計了地面數據調用功能模塊。

2 實現方法

調用所需的地面數據為：2分鐘風向風速、本站氣壓、氣溫、相對濕度、能見度，這次數據每分鐘滾動刷新。探空放球時間為第15分鐘，系統將第15分鐘的數據單獨顯示在窗口中，方便調取使用。為了核對自動站的準確性，系統同時調用新型站和老自動站的地面資料，通過對比分析，方便及時發現自動站傳感器故障，例如通過風速對比，如果某套自動站風速長期偏低，可判斷該自動站啟動風速過大，需要進行相應維護。采用Visual Basic 6.0開發工具，分別讀取局域網中新型自動氣象站和老自動氣象站中的數據文件，實現地面數據調用功能。

2.1 調用新型自動站實時數據

讀取新型站＼smo＼dataset＼省名＼區站號＼AWS＼新型自動站＼設備＼Minute＼目錄下的M_Z分鐘數據文件。

If Len（txtMZ.Text） = 256 And Left$（txtMZ.Text， 4） <> "----" Then

txtxxz（1）.Text = Trim（Mid$（txtMZ.Text， 5， 4）） ''風向

txtxxz（2）.Text = Mid$（txtMZ.Text， 9， 4） ''風速

txtxxz（24）.Text = Mid$（txtMZ.Text， 97， 5） ''氣壓

txtxxz（14）.Text = Mid$（txtMZ.Text， 65， 4） ''氣溫

txtxxz（19）.Text = Mid$（txtMZ.Text， 85， 4） ''濕度

txtxxz（47）.Text = Mid$（txtMZ.Text， 159， 5） ''能見度

txtxxz（24）.Text = Format（Val（txtxxz（24）.Text） / 10， "0.0"）

txtxxz（14）.Text = Format（Val（txtxxz（14）.Text） / 10， "0.0"）

txtxxz（19）.Text = Trim（txtxxz（19）.Text）

txtxxz（2）.Text = Format（Val（txtxxz（2）.Text） / 10， "0.0"）

txtxxz（47）.Text = Trim（txtxxz（47）.Text）

Frame5.Caption = "新型站實時數據（當前記錄時間：" & Left$（txtMZ.Text， 4） & "）"

Else

Frame5.Caption = "新型站實時數據（當前分鐘可能暫未更新數據，可稍等后手工刷新！）"

End If

2.2 調用老自動氣象站實時數據

讀取實時分鐘數據＼OSSMO 2004＼AwsSource＼zz.txt。ZZ文件為隨機文件，存入54個要素的每分鐘瞬時值，以ASCII字符存入，共218個字節1。讀取局域網共享文件使用普通的Open FileName Input Access Read的方法，再按zz.txt文件指定的文件格式調用顯示出來。

txtxxz（1）.Text = Trim（Mid$（txtMZ.Text， 5， 4）） ''風向

txtxxz（2）.Text = Mid$（txtMZ.Text， 9， 4） ''風速

txtxxz（24）.Text = Mid$（txtMZ.Text， 97， 5） ''氣壓

txtxxz（14）.Text = Mid$（txtMZ.Text， 65， 4） ''氣溫

txtxxz（19）.Text = Mid$（txtMZ.Text， 85， 4） ''濕度

txtxxz（47）.Text = Mid$（txtMZ.Text， 159， 5） ''能見度。如圖1所示。

3 結語

地面資料調用程序在懷化市高空站已穩定運行三年多，高空站在施放探空氣象時能自動獲取地面氣象觀測資料，提高了工作效率。

參考文獻

[1]中國氣象局編.地面氣象觀測數據文件和記錄簿表格式[M].北京：中國氣象出版社，2005.

作者單位

1.懷化市氣象局 湖南省懷化市 418000

2.通道縣氣象局 湖南省通道縣 418500

3.新晃縣氣象局 湖南省新晃縣 419200