发两个气象业务相关app(Android)

前些年编的个气象业务相关app(Android):

1、气象探测环境测量app

    2014年开发。气象探测环境评估中,需要使用经纬仪对障碍物仰角、方位等进行测量。经纬仪价格贵、携带不便,目测精度又太差,写个app,用手机测量障碍物仰角方位角,方面简单,至于精度虽比不上经纬仪,但总比用手指比划着目测准。原生Android开发,仅192K。

下载链接

2、陕西天气app

    2016年开发,查询陕西天气实况、预报预警等内容。

扫码安装:

下载链接

http://downloadpkg.app3c.cn/app/download?path=http://A6913024427887.qiniucdn.apicloud-system.com/0f3ba7c53e7118b7d587774ea786e4f3_d

两app均为业余开发,内部使用,有兴趣可以下载玩玩,不保证数据准确性,不要作为正式业务使用。

  • 3
    点赞
  • 0
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
气象短息布平台,适合地市级气象局使用 private void timer1_Tick(object sender, EventArgs e) { // DateTime now = DateTime.Now; DateTime t = DateTime.Now; DateTime zhengdian = new DateTime(t.Year, t.Month, t.Day, t.Hour, t.Minute, t.Second); DateTime shijian = new DateTime(t.Year, t.Month, t.Day, 15, 50, 0); // DateTime shijian1 = new DateTime(t.Year, t.Month, t.Day); if (shijian == zhengdian) { StreamReader sr = new StreamReader("d:\\forecast\\dq1", System.Text.Encoding.Default); string chr1, chr2, fx1, fx2, fs1, fs2; string wea, wind, wins, tqxx; int tmax, tmin; string[] tq = new string[32] { "晴", "多云", "阴", "阵雨", "雷阵雨", "雷阵雨夹雪", "雨夹雪", "小雨", "中雨", "大雨", "暴雨", "大暴雨", "特大暴雨", "阵雪", "小雪", "中雪", "大雪", "暴雪", "雾", "冻雨", "沙尘暴", "小到中雨", "中到大雨", "大到暴雨", "暴雨到大暴雨", "大暴雨到特大暴雨", "小到中雪", "中到大雪", "大到暴雪", "浮尘", "扬沙", "强沙尘暴" }; string[] st = new string[7] { "拉萨", "日喀则", "那曲", "林芝", "泽当", "狮泉河", "昌都" }; string[] stnum = new string[7] { "55591", "55578", "55299", "56312", "55598", "55228", "56137" }; string[] fx = new string[10] { "", "东北风", "东风", "东南风", "南风", "西南风", "西风", "西北风", "北风", "旋转不定风" }; string[] fs = new string[10] { "", "3~4级", "4~5级", "5~6级", "6~7级", "7~8级", "8~9级", "9~10级", "10~11级", "11~12级" }; string strline = sr.ReadLine(); int i = 0, c, w1, w2; SqlConnection con5 = bc1.getcon(); con5.Open(); int rn = bc1.getrecnum("select count(*)from ybdata"); SqlCommand cmd5 = new SqlCommand(); string sqlins; while (strline != null) { chr1 = strline.Substring(0, 5); if (chr1 == stnum[i]) { chr1 = strline.Substring(6, 5); w1 = Convert.ToInt32(chr1) / 100; w2 = Convert.ToInt32(chr1) % 100; if (w1 == w2) { wea = tq[w1]; } else { wea = tq[w1] + "转" + tq[w2]; } chr1 = strline.Substring(12, 5); c = Convert.ToInt32(chr1) - 10000; if (c == 0) { wind = ""; wins = ""; } else { chr2 = c.ToString(); fx1 = fx[Convert.ToInt32(chr2.Substring(0, 1))]; fx2 = fx[Convert.ToInt32(chr2.Substring(1, 1))]; fs1 = fs[Convert.ToInt32(chr2.Substring(2, 1))]; fs2 = fs[Convert.ToInt32(chr2.Substring(3, 1))]; if (fx1 == fx2) { wind = fx1; } else { wind = fx1 + "转" + fx2; } if (fs1 == fs2) { wins = fs1; } else { wins = fs1 + "转" + fs2; } } chr1 = strline.Substring(18, 5); tmin = (Convert.ToInt32(chr1) - 20000) / 100; tmax = (Convert.ToInt32(chr1) - 20000) % 100; if (tmin >= 50) { tmin = 0 - (tmin - 50); } if (tmax >= 50) { tmax = 0 - (tmax - 50); } if (wind == "") { tqxx = "便民气象站:" + st[i] + "今晚到明天" + wea + ",气温" + tmin + "到" + tmax + "度。"; } else { tqxx = "便民气象站:" + st[i] + "今晚到明天" + wea + "," + wind + wins + ",气温" + tmin + "到" + tmax + "度。"; } rn = rn + 1; sqlins = "insert into ybdata (id,diming,yubao,time) values('" + rn + "','" + st[i] + "','" + tqxx + "','" + DateTime.Now.ToString("yyyy-MM-dd") + "')"; cmd5.CommandText = sqlins; cmd5.Connection = con5; cmd5.ExecuteNonQuery(); } strline = sr.ReadLine(); i = i + 1; if (i > 6) { break; } } // MessageBox.Show("预报文件已生成!"); con5.Close(); sr.Close(); }

“相关推荐”对你有帮助么?

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值