最新国产好看的视频,伊人天堂AV在线,国产Aaaaaa视频,蜜臀视频在线观看一区,人妻av色图,密臀久久久精品影片,青青视频免费观看毛片,久草在线观看视,国产三级精品色情在线

易語(yǔ)言調(diào)用墨跡天氣實(shí)現(xiàn)自動(dòng)定位獲取天氣情況的代碼

 更新時(shí)間:2018年11月23日 16:31:45   作者:易語(yǔ)言源碼教程  
今天小編就為大家分享一篇關(guān)于易語(yǔ)言調(diào)用墨跡天氣實(shí)現(xiàn)自動(dòng)定位獲取天氣情況的代碼,小編覺得內(nèi)容挺不錯(cuò)的,現(xiàn)在分享給大家,具有很好的參考價(jià)值,需要的朋友一起跟隨小編來(lái)看看吧

常量數(shù)據(jù)表

.版本 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>"
.常量 賣幫提醒頭, "<文本長(zhǎng)度: 34>"
.常量 賣幫提醒尾, "<文本長(zhǎng)度: 4>"
.常量 賣幫提醒頭1, "<文本長(zhǎng)度: 8>"
.常量 賣幫提醒尾1, "<文本長(zhǎng)度: 33>"
.常量 天氣尾, "<文本長(zhǎng)度: 4>"

實(shí)時(shí)天氣自動(dòng)定位源碼

此功能需要加載精易模塊5.6

.版本 2
.支持庫(kù) iconv
.支持庫(kù) internet
.支持庫(kù) iext
.程序集 窗口程序集1
.程序集變量 天氣, 文本型
.程序集變量 城市實(shí)況, 文本型
.程序集變量 更新時(shí)間, 文本型
.程序集變量 溫度, 文本型
.程序集變量 空氣質(zhì)量, 文本型
.程序集變量 濕度, 文本型
.程序集變量 今日提示, 文本型
.程序集變量 風(fēng)向, 文本型
.程序集變量 賣幫提醒, 文本型
.程序集變量 賣幫提醒1, 文本型
.程序集變量 今日天氣, 文本型
.子程序 取文本_中間文本, 文本型, 公開
.參數(shù) 參_被尋找文本, 文本型
.參數(shù) 參_左邊文本, 文本型
.參數(shù) 參_右邊文本, 文本型
.局部變量 起點(diǎn), 整數(shù)型
.局部變量 終點(diǎn), 整數(shù)型
.局部變量 文本, 文本型
起點(diǎn) = 尋找文本 (參_被尋找文本, 參_左邊文本, , 假)
.判斷開始 (起點(diǎn) = -1)
  返回 (“”)
.默認(rèn)
  起點(diǎn) = 起點(diǎn) + 取文本長(zhǎng)度 (參_左邊文本)
.判斷結(jié)束
終點(diǎn) = 尋找文本 (參_被尋找文本, 參_右邊文本, 起點(diǎn), 假)
.判斷開始 (終點(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)題 = “今日天氣:” + 今日天氣
賣幫提醒 = 取文本_中間文本 (天氣, #賣幫提醒頭, #賣幫提醒尾)
賣幫提醒1 = 取文本_中間文本 (天氣, #賣幫提醒頭1, #賣幫提醒尾1)
透明標(biāo)簽1_提醒.標(biāo)題 = 賣幫提醒 + “賣幫小助手” + 賣幫提醒1
_啟動(dòng)窗口.標(biāo)題 = 城市實(shí)況

運(yùn)行結(jié)果:

總結(jié)

以上就是這篇文章的全部?jī)?nèi)容了,希望本文的內(nèi)容對(duì)大家的學(xué)習(xí)或者工作具有一定的參考學(xué)習(xí)價(jià)值,謝謝大家對(duì)腳本之家的支持。如果你想了解更多相關(guān)內(nèi)容請(qǐng)查看下面相關(guān)鏈接

相關(guān)文章

最新評(píng)論

平罗县| 万荣县| 哈密市| 元朗区| 广东省| 来安县| 霍林郭勒市| 大庆市| 抚顺市| 汝阳县| 凌海市| 河东区| 华蓥市| 锡林浩特市| 淮安市| 郑州市| 旬阳县| 宣城市| 台中市| 义马市| 蓝山县| 江门市| 枣庄市| 永新县| 成安县| 丹江口市| 常德市| 探索| 呼伦贝尔市| 盐源县| 额敏县| 宝应县| 湖州市| 县级市| 怀安县| 建平县| 陵川县| 本溪市| 台安县| 积石山| 平邑县|