易语言v5.6在县级气象服务业务中的应用

杨再禹，杨 平，蒙延雷

(贵州省三穗县气象局，贵州 三穗 556500)

1 引言

易语言是大连大有吴涛语言软件有限公司于2009年推出的一款汉语编程语言软件，2016年升级为v6.5版，达到了当前同类产品的国际先进水平。易语言降低了广大电脑用户编程的门槛，适于不懂英文或者英文了解很少的编程爱好者，可以结合大量的实例，通过使用其语言极其快速地进入Windows程序编写，学会程序设计，自己动手开发软件。用易语言集合气象业务内容仅需编写十几行几乎像通常聊天式的简练程序，运行后就可得到所需的结果。应用它既克服了气象业务服务过程分散、不集中、易出错等缺点，又使繁琐、枯燥的服务流程变成一种简单、直观的可视化操作过程，且能较准确地标记文档和服务时间。三穗县气象局2016年用易语言编程实现气象服务业务集约、自动化以来，经过不断的总结、修改和完善，如今能快速开展对外单位服务，基本满足了三穗现在的业务服务需要。下面以三穗县气象局现有业务服务流程为实例，介绍用易语言v5.6实现该局气象服务平台的方法。

2 易语言实现气象服务业务管理分析

2.1 集成化气象服务基本步骤

① 选择程序，新建一个空白Windows窗口程序；

② 单击基本组件中的“按钮”，逐次填入新建的空白Windows窗口中；

③ 更改新建窗口中“按钮”标题；

④ 对服务方式、对象(按“按钮”标题分区)；

⑤ 对每个“按钮”进行赋值(激活)。

2.2 气象服务常用信息管理平台结果

将三穗县气象局近年来气象服务的内容、时间、方式、出口、参考的数据网站等进行梳理，得出基本的预报服务思路和流程，作为程序规划设计的基础，使用易语言v5.6版本实现气象服务信息管理平台的搭建，其平台如图1所示。

为准确、快捷做好三穗县区域内的短时临近天气预报服务工作，进一步梳理了短临天气预报的分乡镇和旅游景区的预报，建立子程序“短时临近预报”，实现可视化，能生成自动保存的Word文档，并通过截图、直接点击，即可快速传递到气象服务对象(图2)。

同时，三穗县气象局研判了各乡镇的气温与八弓镇(三穗县城关)的气温差值，以此为思路，设计出“预报分析”平台，能准确无误地生成为三穗县“手机报”服务的天气预报结论，通过三穗天气预报常用信息管理平台“‘手机报’QQ”对话框快速传递(如图3所示)。

图1 用易语言实现三穗天气预报常用信息管理平台 图2 短时临近天气预报图 Fig.1 Common information management platform for Fig.2 Interface for short-term weather forecast Sansui weather forecast in Easy Language

图3 预报分析图Fig.3 Interface for weather forecast analysis

通过分区域链接需要参考的“内外网”、决策服务与天气预报分析等“文件夹”以及预报产出口“预报服务”等的展现，组成了三穗县气象局气象业务服务平台，在目前的对外开展气象服务过程中，起到了直观、快捷、准确和可移植的作用。

2.3 天气预报常用信息管理平台易语言程序实现

新建子程序1～31空白“按钮”，按宽度200、高度56的大小排列整齐，将1～31个按钮分别更改标题为“短时临近预报”、“万村乡网”、“大喇叭(公服平台)”、“‘手机报’QQ”，“LED显示屏”，“微信”、“影视预报邮箱”、“◆日气象服务统计表”、“VIP邮箱”、“气象服务工作手册”、“《气象信息报告》”、“◆重要气象信息专报”、“《气象信息快报》”、“《气象专题服务》”、“预报分析”、“2018气象服务目录”、“历史数据统计”、“◆应急通道”、“贵州省气象综合管理系统”、“业务值班表”、“县级综合气象业务学习考试系统”、“行政应急值班表”、“运行监控业务系统”、“中央台会商提示”、“华南区域模式”、“华南区域模式”、“中央台降水预报”、“中央台降水预报”、“中央台降水预报”、“中央台降水预报”、“中央台降水预报”。用基本组建内的“分组框”按钮，分别划分为5个区并在标题栏标上标注“预报服务、文件夹、外网、其它数据、内网”。下面对1～31个按钮逐一进行赋值。

.子程序 _按钮1_被单击

运行(“c:windowsexplorer.exe F:气象服务手册气象服务手册.exe”,假,)

关闭()

.子程序 _按钮2_被单击

通用对话框1.过滤器 = “*.*”

.如果真(通用对话框1.打开())

.如果真结束

运行(“explorer.exe ” + #引号,假,)

.子程序 _按钮3_被单击

运行(“c:windowsexplorer.exe ftp://用户名:密码@10.203.6.5/aws_new/”,假,)

依次建立起：子程序 _按钮(4-29)_被单击

分别写入：运行(读环境变量(“programfiles”) + “internet Exploreriexplore.exe http://113.108.192.90/envcompare/areaforecast”,假,)

运行(读环境变量(“programfiles”) + “internet Exploreriexplore.exe http://10.1.64.146/npt/front/downs.shtml?column_id=201”,假,)

运行(读环境变量(“programfiles”) + “internet Exploreriexplore.exe http://www.sdqx.gov.cn/rainfall-horal.asp”,假,)

运行(读环境变量(“programfiles”) + “internet Exploreriexplore.exe http://www.nmc.cn/publish/nwp/t639/ea/850hPa-qflx.html”,假,)

运行(“c:windowsexplorer.exe F:气象服务三穗局综合业务岗位值班轮流表.xls”,假,)

运行(读环境变量(“programfiles”) + “internet Exploreriexplore.exe http://10.203.6.72:8080/qx/workSchedulingAction.do?method=workSchedulingInit”,假,)

运行(“c:windowsexplorer.exe F:气象服务统计表三穗县气象局气象信息服务统计表.xls”,假,)

运行(读环境变量(“programfiles”) + “internet Exploreriexplore.exe http://192.168.0.112:8080/pms/framework/to_login.action”,假,)

运行(“c:windowsexplorer.exe F:值班表行政应急值班表2018年1月1—31日三穗县气象局行政应急值班表.xls”,假,)

运行(读环境变量(“programfiles”) + “internet Exploreriexplore.exe http://yubao.whihr.com.cn/webforecast/”,假,)

运行(读环境变量(“programfiles”) + “internet Exploreriexplore.exe https://10.203.13.16/jsp/indexpage/newIndex/indexOfficeMain.jsp”,假,)

运行(读环境变量(“programfiles”) + “internet Exploreriexplore.exe http://10.203.6.131:8080/PASOM/logonAction.do?method=logon&userc

ode=custom”,假,)

运行(读环境变量(“programfiles”) + “internet Exploreriexplore.exe https://mail.qq.com/cgi-bin/loginpage?s=session_timeout&from=&r=be5f61cc837a0fb180c502596a64dfef&tiptype=LOGIN_ERR_COOKIE_FORBIDDEN”,假,)

运行(读环境变量(“programfiles”) + “internet Exploreriexplore.exe http://www.weather.com.cn/weather1d/101260509.shtml”,假,)

载入(预报分析,,真)

运行(“c:windowsexplorer.exe 预报计算机1气象服务2018年”,假,)

运行(“http://reg.vip.163.com/enterMail.m?username=用户名@vip.163.com&style=-1&language=-1&enterVip=true&verifycookie=1ssxqxj&password=密码&url=http://webmail.vip.163.com/js6/main.jsp?sid=FALyCsnRxjEIqiMluCR

RPPkGazNIKUCl&df=mailvip#module=welcome.WelcomeModule%7C%7B%7D”,假,)

运行(“c:windowsexplorer.exe F:气象服务2018年气象信息快报(气象信息报告、气象专题服务、重要气象信息专报、2018年历史数据.xls)”,假,)

运行(“C:UsersAdministratorAppDataRoaming360se6Application360se.exe https://mp.weixin.qq.com/”,假,)

运行(读环境变量(“programfiles”) + “internet Exploreriexplore.exe http://10.203.6.85:8080/loginNew.do”,假,)

运行(读环境变量(“programfiles”) + “internet Exploreriexplore.exe http://222.85.150.222:8080/main.aspx”,假,)

运行(读环境变量(“programfiles”) + “internet Exploreriexplore.exe http://www.gzdjw.com/wcqx/”,假,)

运行(读环境变量(“programfiles”) + “internet Exploreriexplore.exe tencent://Message/?menu=no&exe=QQ&uin=1098902298&websiteName=chaonan.com&info”,假,)

.子程序 _按钮30_被单击

载入(短时临近预报,,真)

.子程序 _按钮31_被单击

结束()

以上为全中文编程过程代码，复制直接可用，它实现了链接内外网址、打开Word文档、打开Excel表格、打开指定目录、打开iebook生成的电子书、打开.exe执行文件、直接打开vip.163.com和QQ收件箱快速写信发送、能直接进入个人QQ对话框快速发布、地面测报报文快速通道发布以及排班上报等。同时，在短时临近预报和预报分析(程序代码略)中，还能实现直接进入QQ群对话框快速发布气象服务信息、生成规定的Word文档、截图等功能。

3 结语

通过以上示例，可看出用易语言v5.6版本解决集约化问题具有直观、易懂、简捷、快速和准确的优势。运用易语言程序对县级气象服务业务产品制作分析、出口服务、统计业务工作情况等实例分析，语言简单易于实现，分析结果直观明了，节约出大量的气象服务时间，便于更深入的研究。