常量數(shù)據(jù)表
|
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
|
.版本 2.常量 實(shí)況頭, "<文本長(zhǎng)度: 9>".常量 實(shí)況尾, "<文本長(zhǎng)度: 2>".常量 更新時(shí)間頭, "<文本長(zhǎng)度: 28>".常量 更新時(shí)間尾, "<文本長(zhǎng)度: 9>".常量 溫度頭, "<文本長(zhǎng)度: 28>".常量 溫度尾, "<文本長(zhǎng)度: 5>".常量 空氣質(zhì)量頭, "<文本長(zhǎng)度: 43>".常量 空氣質(zhì)量尾, "<文本長(zhǎng)度: 2>".常量 濕度頭, "<文本長(zhǎng)度: 10>".常量 濕度尾, "<文本長(zhǎng)度: 7>".常量 今日提示頭, "<文本長(zhǎng)度: 43>".常量 今日提示尾, "<文本長(zhǎng)度: 23>".常量 風(fēng)向頭, "<文本長(zhǎng)度: 26>".常量 風(fēng)向尾, "<文本長(zhǎng)度: 7>".常量 天氣頭, "<文本長(zhǎng)度: 26>".常量 賣(mài)幫提醒頭, "<文本長(zhǎng)度: 34>".常量 賣(mài)幫提醒尾, "<文本長(zhǎng)度: 4>".常量 賣(mài)幫提醒頭1, "<文本長(zhǎng)度: 8>".常量 賣(mài)幫提醒尾1, "<文本長(zhǎng)度: 33>".常量 天氣尾, "<文本長(zhǎng)度: 4>" |
實(shí)時(shí)天氣自動(dòng)定位源碼
此功能需要加載精易模塊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.支持庫(kù) iconv.支持庫(kù) internet.支持庫(kù) iext.程序集 窗口程序集1.程序集變量 天氣, 文本型.程序集變量 城市實(shí)況, 文本型.程序集變量 更新時(shí)間, 文本型.程序集變量 溫度, 文本型.程序集變量 空氣質(zhì)量, 文本型.程序集變量 濕度, 文本型.程序集變量 今日提示, 文本型.程序集變量 風(fēng)向, 文本型.程序集變量 賣(mài)幫提醒, 文本型.程序集變量 賣(mài)幫提醒1, 文本型.程序集變量 今日天氣, 文本型.子程序 取文本_中間文本, 文本型, 公開(kāi).參數(shù) 參_被尋找文本, 文本型.參數(shù) 參_左邊文本, 文本型.參數(shù) 參_右邊文本, 文本型.局部變量 起點(diǎn), 整數(shù)型.局部變量 終點(diǎn), 整數(shù)型.局部變量 文本, 文本型起點(diǎn) ＝ 尋找文本 (參_被尋找文本, 參_左邊文本, , 假).判斷開(kāi)始 (起點(diǎn) ＝ -1) 返回 (“”).默認(rèn) 起點(diǎn) ＝ 起點(diǎn) ＋ 取文本長(zhǎng)度 (參_左邊文本).判斷結(jié)束終點(diǎn) ＝ 尋找文本 (參_被尋找文本, 參_右邊文本, 起點(diǎn), 假).判斷開(kāi)始 (終點(diǎn) ＝ -1) 返回 (“”).默認(rèn) 文本 ＝ 取文本中間 (參_被尋找文本, 起點(diǎn), 終點(diǎn) － 起點(diǎn)) 返回 (文本).判斷結(jié)束.子程序 URL編碼, 文本型.參數(shù) URL, 文本型.局部變量 Len, 整數(shù)型.局部變量 循環(huán)容器, 整數(shù)型.局部變量 Asc, 整數(shù)型.局部變量 目標(biāo), 文本型.局部變量 臨時(shí), 文本型Len ＝ 取文本長(zhǎng)度 (URL).變量循環(huán)首 (1, Len, 1, 循環(huán)容器) Asc ＝ 取代碼 (URL, 循環(huán)容器) Asc ＝ 選擇 (Asc ＜ 0, 256 ＋ Asc, Asc) .如果 (Asc ＜ 42 或 Asc ＝ 43 或 Asc ＞ 57 且 Asc ＜ 64 或 Asc ＞ 90 且 Asc ＜ 95 或 Asc ＝ 96 或 Asc ＞ 122) 臨時(shí) ＝ 取十六進(jìn)制文本 (Asc) 目標(biāo) ＝ 目標(biāo) ＋ 選擇 (取文本長(zhǎng)度 (臨時(shí)) ＜ 2, “%0” ＋ 臨時(shí), “%” ＋ 臨時(shí)) .否則 目標(biāo) ＝ 目標(biāo) ＋ 字符 (Asc) .如果結(jié)束.變量循環(huán)尾 ()返回 (目標(biāo)).子程序 _天氣時(shí)鐘_周期事件天氣 ＝ 到文本 (編碼轉(zhuǎn)換 (HTTP讀文件 (“http://tianqi.moji.com/”), #編碼_UTF_8, #編碼_GB18030, ))城市實(shí)況 ＝ 取文本_中間文本 (天氣, #實(shí)況頭, #實(shí)況尾)透明標(biāo)簽1_城市.標(biāo)題 ＝ “城市:” ＋ 城市實(shí)況更新時(shí)間 ＝ 取文本_中間文本 (天氣, #更新時(shí)間頭, #更新時(shí)間尾)透明標(biāo)簽1_更新時(shí)間.標(biāo)題 ＝ “更新時(shí)間:” ＋ 更新時(shí)間溫度 ＝ 取文本_中間文本 (天氣, #溫度頭, #溫度尾)透明標(biāo)簽1_溫度.標(biāo)題 ＝ “溫度:” ＋ 溫度 ＋ “℃”空氣質(zhì)量 ＝ 取文本_中間文本 (天氣, #空氣質(zhì)量頭, #空氣質(zhì)量尾)透明標(biāo)簽1_空氣質(zhì)量.標(biāo)題 ＝ “空氣質(zhì)量:” ＋ 空氣質(zhì)量濕度 ＝ 取文本_中間文本 (天氣, #濕度頭, #濕度尾)透明標(biāo)簽1_濕度.標(biāo)題 ＝ “濕度:” ＋ 濕度今日提示 ＝ 取文本_中間文本 (天氣, #今日提示頭, #今日提示尾)透明標(biāo)簽1_今日提示.標(biāo)題 ＝ “今日提示:” ＋ 今日提示風(fēng)向 ＝ 取文本_中間文本 (天氣, #風(fēng)向頭, #風(fēng)向尾)透明標(biāo)簽1_風(fēng)向.標(biāo)題 ＝ “風(fēng)向:” ＋ 風(fēng)向 ＋ “級(jí)”今日天氣 ＝ 取文本_中間文本 (天氣, #天氣頭, #天氣尾)透明標(biāo)簽1_今日天氣.標(biāo)題 ＝ “今日天氣:” ＋ 今日天氣賣(mài)幫提醒 ＝ 取文本_中間文本 (天氣, #賣(mài)幫提醒頭, #賣(mài)幫提醒尾)賣(mài)幫提醒1 ＝ 取文本_中間文本 (天氣, #賣(mài)幫提醒頭1, #賣(mài)幫提醒尾1)透明標(biāo)簽1_提醒.標(biāo)題 ＝ 賣(mài)幫提醒 ＋ “賣(mài)幫小助手” ＋ 賣(mài)幫提醒1_啟動(dòng)窗口.標(biāo)題 ＝ 城市實(shí)況 |
運(yùn)行結(jié)果：
總結(jié)
以上就是這篇文章的全部?jī)?nèi)容了，希望本文的內(nèi)容對(duì)大家的學(xué)習(xí)或者工作具有一定的參考學(xué)習(xí)價(jià)值，謝謝大家對(duì)服務(wù)器之家的支持。如果你想了解更多相關(guān)內(nèi)容請(qǐng)查看下面相關(guān)鏈接
