.版本 2
.支持库 iconv
.子程序 unicode转码, 文本型
.参数 unicode, 文本型
.局部变量 gbk, 文本型
gbk = 子文本替换 (临时数组 [i], “&#”, “”, , , 真)
.如果真 (取文本长度 (gbk) > 4)
gbk = 取十六进制文本 (到数值 (gbk))
.如果真结束
gbk = 到文本 (编码转换 (到字节集 (“\u” + gbk), #编码_JAVA, #编码_GBK, ))
返回 (gbk)

上述代码可以将一个&#x的字符转换为汉字。有需要的,自己调整一下。

Related Posts: 易语言-&#x编码的解决办法 :