.版本 2
.支持库 internet
.支持库 spec
.支持库 iconv

.子程序 判断本机域名是否被劫持
.局部变量 您所要查询的域名, 文本型
.局部变量 远程域名解析IP, 文本型
.局部变量 本机域名解析IP, 文本型

您所要查询的域名 ＝ “www.mir6.com”  ' 留空为返回本机(访问者)IP地址
远程域名解析IP ＝ 编码 (HTTP读文件 (“https://api.mir6.com/api/dns?domain=” ＋ 您所要查询的域名 ＋ “&only=true”))
本机域名解析IP ＝ 转换为IP地址 (您所要查询的域名)
调试输出 (远程域名解析IP)
调试输出 (本机域名解析IP)
.如果 (远程域名解析IP ＝ 本机域名解析IP)
    调试输出 (“恭喜您，该域名在您的计算机并未被劫持！”)
.否则
    调试输出 (“警告！！！该域名在您的计算机被劫持了！/或者目标域名使用了CDN解析，地域解析地址不一致”)
.如果结束


.子程序 编码, 文本型
.参数 编码内容, 字节集

返回 (到文本 (编码转换 (编码内容, #编码_UTF_8, #编码_GB2312, )))