如何解决usc2解码后表情会变成问号 ??

千狐

调试输出 (编码_usc2到ansi（"\u804A\u5929\uD83D\uDC9E ")） 得到：[](%7B%22version%22%3A2%7D)聊天??

如何才能得到正确的：[]({"version":2})聊天\uD83D\uDC9E

zainex

转 UTF-32, 遇到表情就分开处理:

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

变量名	类 型	静态	数组	备 注
文本	文本型
结果	文本型
宽文本	字节集
下标	整数型
编号	整数型
存在表情	逻辑型

文本 ＝ “\u005B\u005D\u0028\u0025\u0037\u0042\u0025\u0032\u0032\u0076\u0065\u0072\u0073\u0069\u006F\u006E\u0025\u0032\u0032\u0025\u0033\u0041\u0032\u0025\u0037\u0044\u0029\u804A\u5929\uD83D\uDC9E”
宽文本 ＝ 编码转换 (编码_usc2到Unicode (文本), #编码_UTF_16LE, #编码_UTF_32LE, )
下标 ＝ 1
判断循环首 (下标 ＞ 0)
编号 ＝ 取字节集数据 (宽文本, #整数型, 下标)
存在表情 ＝ 假
如果真 (编号 ≥ 十六进制 (“2600”) 且 编号 ≤ 十六进制 (“26FF”))
存在表情 ＝ 真
如果真 (编号 ≥ 十六进制 (“2B00”) 且 编号 ≤ 十六进制 (“2BFF”))
存在表情 ＝ 真
如果真 (编号 ≥ 十六进制 (“1F300”) 且 编号 ≤ 十六进制 (“1F64F”))
存在表情 ＝ 真
如果 (存在表情)
结果 ＝ 结果 ＋ 编码_Unicode到usc2 (编码转换 (到字节集 (编号), #编码_UTF_32LE, #编码_UTF_16LE, ))
结果 ＝ 结果 ＋ 到文本 (编码转换 (到字节集 (编号), #编码_UTF_32LE, #编码_GB18030, ))

判断循环尾 ()
结果 ＝ 编码_URL解码 (结果)
调试输出 (结果)

i支持库列表	支持库注释
iconv	编码转换支持库
spec	特殊功能支持库

.版本 2<br /> .支持库 iconv<br /> .支持库 spec<br /> <br /> .程序集 窗口程序集_启动窗口<br /> <br /> .子程序 __启动窗口_创建完毕<br /> .局部变量 文本, 文本型<br /> .局部变量 结果, 文本型<br /> .局部变量 宽文本, 字节集<br /> .局部变量 下标, 整数型<br /> .局部变量 编号, 整数型<br /> .局部变量 存在表情, 逻辑型<br /> <br /> 文本 ＝ “\u005B\u005D\u0028\u0025\u0037\u0042\u0025\u0032\u0032\u0076\u0065\u0072\u0073\u0069\u006F\u006E\u0025\u0032\u0032\u0025\u0033\u0041\u0032\u0025\u0037\u0044\u0029\u804A\u5929\uD83D\uDC9E”<br /> 宽文本 ＝ 编码转换 (编码_usc2到Unicode (文本), #编码_UTF_16LE, #编码_UTF_32LE, )<br /> 下标 ＝ 1<br /> .判断循环首 (下标 ＞ 0)<br />     编号 ＝ 取字节集数据 (宽文本, #整数型, 下标)<br />     存在表情 ＝ 假<br />     .如果真 (编号 ≥ 十六进制 (“2600”) 且 编号 ≤ 十六进制 (“26FF”))<br />         存在表情 ＝ 真<br />     .如果真结束<br />     .如果真 (编号 ≥ 十六进制 (“2B00”) 且 编号 ≤ 十六进制 (“2BFF”))<br />         存在表情 ＝ 真<br />     .如果真结束<br />     .如果真 (编号 ≥ 十六进制 (“1F300”) 且 编号 ≤ 十六进制 (“1F64F”))<br />         存在表情 ＝ 真<br />     .如果真结束<br />     .如果 (存在表情)<br />         结果 ＝ 结果 ＋ 编码_Unicode到usc2 (编码转换 (到字节集 (编号), #编码_UTF_32LE, #编码_UTF_16LE, ))<br />     .否则<br />         结果 ＝ 结果 ＋ 到文本 (编码转换 (到字节集 (编号), #编码_UTF_32LE, #编码_GB18030, ))<br />     .如果结束<br /> <br /> .判断循环尾 ()<br /> 结果 ＝ 编码_URL解码 (结果)<br /> 调试输出 (结果)

效果:

千狐

调试输出 (Encode_Ucs2ToAnsi (“\u005B\u005D\u0028\u0025\u0037\u0042\u0025\u0032\u0032\u0076\u0065\u0072\u0073\u0069\u006F\u006E\u0025\u0032\u0032\u0025\u0033\u0041\u0032\u0025\u0037\u0044\u0029\u804A\u5929\uD83D\uDC9E”))  '得到： [](%7B%22version%22%3A2%7D)聊天??

千狐

调试输出 (编码_usc2到ansi (“\u005B\u005D\u0028\u0025\u0037\u0042\u0025\u0032\u0032\u0076\u0065\u0072\u0073\u0069\u006F\u006E\u0025\u0032\u0032\u0025\u0033\u0041\u0032\u0025\u0037\u0044\u0029\u804A\u5929\uD83D\uDC9E”))  ' [](%7B%22version%22%3A2%7D)聊天??

zainex

用 精易模块 :

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

变量名	类 型	静态	数组	备 注
文本	文本型

文本 ＝ “\u005B\u005D\u0028\u0025\u0037\u0042\u0025\u0032\u0032\u0076\u0065\u0072\u0073\u0069\u006F\u006E\u0025\u0032\u0032\u0025\u0033\u0041\u0032\u0025\u0037\u0044\u0029\u804A\u5929\uD83D\uDC9E”
调试输出 (编码_URL解码 (编码_usc2到ansi (文本)))

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .程序集 窗口程序集_启动窗口<br /> <br /> .子程序 __启动窗口_创建完毕<br /> .局部变量 文本, 文本型<br /> <br /> 文本 ＝ “\u005B\u005D\u0028\u0025\u0037\u0042\u0025\u0032\u0032\u0076\u0065\u0072\u0073\u0069\u006F\u006E\u0025\u0032\u0032\u0025\u0033\u0041\u0032\u0025\u0037\u0044\u0029\u804A\u5929\uD83D\uDC9E”<br /> 调试输出 (编码_URL解码 (编码_usc2到ansi (文本)))

信仰_

  

子程序名	返回值类型	公开	备 注
子程序1

变量名	类 型	静态	数组	备 注
文本1	文本型
文本2	文本型
文本3	文本型
内容	文本型

文本1 ＝ 编码_usc2到ansi (“\u005B\u005D\u0028\u0025\u0037\u0042\u0025\u0032\u0032\u0076\u0065\u0072\u0073\u0069\u006F\u006E\u0025\u0032\u0032\u0025\u0033\u0041\u0032\u0025\u0037\u0044\u0029\u804A\u5929\uD83D\uDC9E”)
文本2 ＝ 文本_取出中间文本 (文本1, “(”, “)”, , )
文本3 ＝ 编码_usc2到ansi (文本2)
内容 ＝ 子文本替换 (文本1, 文本2, 文本3, , , 真)
调试输出 (内容)
' 得到的文本为： “[]({"version":2})聊天??”

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 子程序1<br /> .局部变量 文本1, 文本型<br /> .局部变量 文本2, 文本型<br /> .局部变量 文本3, 文本型<br /> .局部变量 内容, 文本型<br /> <br /> 文本1 ＝ 编码_usc2到ansi (“\u005B\u005D\u0028\u0025\u0037\u0042\u0025\u0032\u0032\u0076\u0065\u0072\u0073\u0069\u006F\u006E\u0025\u0032\u0032\u0025\u0033\u0041\u0032\u0025\u0037\u0044\u0029\u804A\u5929\uD83D\uDC9E”)<br /> 文本2 ＝ 文本_取出中间文本 (文本1, “(”, “)”, , )<br /> 文本3 ＝ 编码_usc2到ansi (文本2)<br /> 内容 ＝ 子文本替换 (文本1, 文本2, 文本3, , , 真)<br /> 调试输出 (内容)<br /> '得到的文本为： “[]({"version":2})聊天??”

后面？？是个表情，易语言不支持Unicodede，可以在论坛搜搜相关的支持Unicodede控件的列子

zainex

不想丢失这段文字中的表情, 可以转成 UTF-8 来处理:

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

变量名	类 型	静态	数组	备 注
文本	文本型
结果	文本型

文本 ＝ “\u005B\u005D\u0028\u0025\u0037\u0042\u0025\u0032\u0032\u0076\u0065\u0072\u0073\u0069\u006F\u006E\u0025\u0032\u0032\u0025\u0033\u0041\u0032\u0025\u0037\u0044\u0029\u804A\u5929\uD83D\uDC9E”
结果 ＝ 编码_URL解码 (到文本 (编码_Unicode到Utf8 (编码_usc2到Unicode (文本))))
写到文件 (取特定目录 ( #系统桌面 ) ＋ “\a.txt”, 到字节集 (结果))
调试输出 (结果)

i支持库列表	支持库注释
shell	操作系统界面功能支持库
spec	特殊功能支持库

.版本 2<br /> .支持库 shell<br /> .支持库 spec<br /> <br /> .程序集 窗口程序集_启动窗口<br /> <br /> .子程序 __启动窗口_创建完毕<br /> .局部变量 文本, 文本型<br /> .局部变量 结果, 文本型<br /> <br /> 文本 ＝ “\u005B\u005D\u0028\u0025\u0037\u0042\u0025\u0032\u0032\u0076\u0065\u0072\u0073\u0069\u006F\u006E\u0025\u0032\u0032\u0025\u0033\u0041\u0032\u0025\u0037\u0044\u0029\u804A\u5929\uD83D\uDC9E”<br /> 结果 ＝ 编码_URL解码 (到文本 (编码_Unicode到Utf8 (编码_usc2到Unicode (文本))))<br /> 写到文件 (取特定目录 (#系统桌面) ＋ “\a.txt”, 到字节集 (结果))<br /> 调试输出 (结果)

效果:

b0y

改造一下usc2编码转换  只转换ansi部分 unicode保存原样即可

千狐

b0y 发表于 2025-7-28 15:02
改造一下usc2编码转换  只转换ansi部分 unicode保存原样即可

不会改造

千狐

zainex 发表于 2025-7-28 00:29
不想丢失这段文字中的表情, 可以转成 UTF-8 来处理:
[e=1].版本 2
.支持库 shell

你这调试输出后也是乱码啊  我需要的是\u表情代码保持不变