常量数据表
|
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
|
.版本 2.常量 实况头, "<文本长度: 9>".常量 实况尾, "<文本长度: 2>".常量 更新时间头, "<文本长度: 28>".常量 更新时间尾, "<文本长度: 9>".常量 温度头, "<文本长度: 28>".常量 温度尾, "<文本长度: 5>".常量 空气质量头, "<文本长度: 43>".常量 空气质量尾, "<文本长度: 2>".常量 湿度头, "<文本长度: 10>".常量 湿度尾, "<文本长度: 7>".常量 今日提示头, "<文本长度: 43>".常量 今日提示尾, "<文本长度: 23>".常量 风向头, "<文本长度: 26>".常量 风向尾, "<文本长度: 7>".常量 天气头, "<文本长度: 26>".常量 卖帮提醒头, "<文本长度: 34>".常量 卖帮提醒尾, "<文本长度: 4>".常量 卖帮提醒头1, "<文本长度: 8>".常量 卖帮提醒尾1, "<文本长度: 33>".常量 天气尾, "<文本长度: 4>" |
实时天气自动定位源码
此功能需要加载精易模块5.6
|
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
|
.版本 2.支持库 iconv.支持库 internet.支持库 iext.程序集 窗口程序集1.程序集变量 天气, 文本型.程序集变量 城市实况, 文本型.程序集变量 更新时间, 文本型.程序集变量 温度, 文本型.程序集变量 空气质量, 文本型.程序集变量 湿度, 文本型.程序集变量 今日提示, 文本型.程序集变量 风向, 文本型.程序集变量 卖帮提醒, 文本型.程序集变量 卖帮提醒1, 文本型.程序集变量 今日天气, 文本型.子程序 取文本_中间文本, 文本型, 公开.参数 参_被寻找文本, 文本型.参数 参_左边文本, 文本型.参数 参_右边文本, 文本型.局部变量 起点, 整数型.局部变量 终点, 整数型.局部变量 文本, 文本型起点 ＝ 寻找文本 (参_被寻找文本, 参_左边文本, , 假).判断开始 (起点 ＝ -1) 返回 (“”).默认 起点 ＝ 起点 ＋ 取文本长度 (参_左边文本).判断结束终点 ＝ 寻找文本 (参_被寻找文本, 参_右边文本, 起点, 假).判断开始 (终点 ＝ -1) 返回 (“”).默认 文本 ＝ 取文本中间 (参_被寻找文本, 起点, 终点 － 起点) 返回 (文本).判断结束.子程序 URL编码, 文本型.参数 URL, 文本型.局部变量 Len, 整数型.局部变量 循环容器, 整数型.局部变量 Asc, 整数型.局部变量 目标, 文本型.局部变量 临时, 文本型Len ＝ 取文本长度 (URL).变量循环首 (1, Len, 1, 循环容器) Asc ＝ 取代码 (URL, 循环容器) Asc ＝ 选择 (Asc ＜ 0, 256 ＋ Asc, Asc) .如果 (Asc ＜ 42 或 Asc ＝ 43 或 Asc ＞ 57 且 Asc ＜ 64 或 Asc ＞ 90 且 Asc ＜ 95 或 Asc ＝ 96 或 Asc ＞ 122) 临时 ＝ 取十六进制文本 (Asc) 目标 ＝ 目标 ＋ 选择 (取文本长度 (临时) ＜ 2, “%0” ＋ 临时, “%” ＋ 临时) .否则 目标 ＝ 目标 ＋ 字符 (Asc) .如果结束.变量循环尾 ()返回 (目标).子程序 _天气时钟_周期事件天气 ＝ 到文本 (编码转换 (HTTP读文件 (“http://tianqi.moji.com/”), #编码_UTF_8, #编码_GB18030, ))城市实况 ＝ 取文本_中间文本 (天气, #实况头, #实况尾)透明标签1_城市.标题 ＝ “城市:” ＋ 城市实况更新时间 ＝ 取文本_中间文本 (天气, #更新时间头, #更新时间尾)透明标签1_更新时间.标题 ＝ “更新时间:” ＋ 更新时间温度 ＝ 取文本_中间文本 (天气, #温度头, #温度尾)透明标签1_温度.标题 ＝ “温度:” ＋ 温度 ＋ “℃”空气质量 ＝ 取文本_中间文本 (天气, #空气质量头, #空气质量尾)透明标签1_空气质量.标题 ＝ “空气质量:” ＋ 空气质量湿度 ＝ 取文本_中间文本 (天气, #湿度头, #湿度尾)透明标签1_湿度.标题 ＝ “湿度:” ＋ 湿度今日提示 ＝ 取文本_中间文本 (天气, #今日提示头, #今日提示尾)透明标签1_今日提示.标题 ＝ “今日提示:” ＋ 今日提示风向 ＝ 取文本_中间文本 (天气, #风向头, #风向尾)透明标签1_风向.标题 ＝ “风向:” ＋ 风向 ＋ “级”今日天气 ＝ 取文本_中间文本 (天气, #天气头, #天气尾)透明标签1_今日天气.标题 ＝ “今日天气:” ＋ 今日天气卖帮提醒 ＝ 取文本_中间文本 (天气, #卖帮提醒头, #卖帮提醒尾)卖帮提醒1 ＝ 取文本_中间文本 (天气, #卖帮提醒头1, #卖帮提醒尾1)透明标签1_提醒.标题 ＝ 卖帮提醒 ＋ “卖帮小助手” ＋ 卖帮提醒1_启动窗口.标题 ＝ 城市实况 |
运行结果：
总结
以上就是这篇文章的全部内容了，希望本文的内容对大家的学习或者工作具有一定的参考学习价值，谢谢大家对服务器之家的支持。如果你想了解更多相关内容请查看下面相关链接
