.版本 2 .支持库 internet .支持库 spec .支持库 iconv .子程序 查询IP地址 .局部变量 您所要查询的IP地址, 文本型 .局部变量 IP地址信息, 文本型, , "0" 您所要查询的IP地址 = “58.58.58.58” ' 留空为查询本机(访问者)IP地址(支持查询IPV4/IPV6地址) IP地址信息 = 分割文本 (编码 (HTTP读文件 (“https://api.mir6.com/api/ip?ip=” + 您所要查询的IP地址 + “&type=txt”)), “|”, ) .如果真 (取数组成员数 (IP地址信息) ≠ 16) 调试输出 (“错误:访问接口时出现异常情况!”) 返回 () .如果真结束 .如果 (IP地址信息 [13] ≠ “未知”) 调试输出 (“您所查询的IP地址:” + IP地址信息 [1]) 调试输出 (“IP地址转换为整数:” + IP地址信息 [2]) 调试输出 (“所在国家:” + IP地址信息 [3]) 调试输出 (“国家代码:” + IP地址信息 [4]) 调试输出 (“所在省份:” + IP地址信息 [5]) 调试输出 (“所在城市:” + IP地址信息 [6]) 调试输出 (“所在区县:” + IP地址信息 [7]) 调试输出 (“所属公司单位:” + IP地址信息 [8]) 调试输出 (“网络运营商:” + IP地址信息 [9]) 调试输出 (“IP网络类型:” + IP地址信息 [10]) 调试输出 (“邮政编码:” + IP地址信息 [11]) 调试输出 (“城市区号:” + IP地址信息 [12]) 调试输出 (“所查询IP协议类型:” + IP地址信息 [13]) 调试输出 (“集成归属地址:” + IP地址信息 [14]) 调试输出 (“您的本机IP地址:” + IP地址信息 [15]) 调试输出 (“服务器当前时间:” + IP地址信息 [16]) .否则 调试输出 (“您所查询的IP地址有误!”) .如果结束 .子程序 编码, 文本型 .参数 编码内容, 字节集 返回 (到文本 (编码转换 (编码内容, #编码_UTF_8, #编码_GB2312, )))