Ansi 到 Ucs2 快速编解码

帅气与大侠

过年没钱耍不了，在家耍代码

开源分享个Ucs2编解码过程
补足了精易模块遇到中英文混合Ucs2解码会乱码问题
速度应该是极快的了，欢迎没事做的大佬来优化补充
完整源码下载： Encode_Ucs2.e (24.52 KB, 下载次数: 134)

2024-3-9 21:59 上传

点击文件名下载附件
下载积分: 精币 -2 枚

  

子程序名	返回值类型	公开	备 注
_启动子程序	整数型		本子程序在程序启动后最先执行

变量名	类 型	静态	数组	备 注
t	整数型
Ucs2	文本型
Ansi	文本型

t ＝ 取启动时间 ()
计次循环首 (100000, )
Ucs2 ＝ Encode_AnsiToUcs2 (“你好”)  ' 10万/140-160ms
计次循环尾 ()
t ＝ 取启动时间 () － t
调试输出 (t, Usc2)
' 解码支持中英文混合解码
t ＝ 取启动时间 ()
计次循环首 (100000, )
Ansi ＝ Encode_Ucs2ToAnsi (Ucs2)  ' 10万/140-160ms
计次循环尾 ()
t ＝ 取启动时间 () － t
调试输出 (t, Ansi)
返回 (0)  ' 可以根据您的需要返回任意数值

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

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 _启动子程序, 整数型, , 本子程序在程序启动后最先执行<br /> .局部变量 t, 整数型<br /> .局部变量 Ucs2, 文本型<br /> .局部变量 Ansi, 文本型<br /> <br /> t ＝ 取启动时间 ()<br /> .计次循环首 (100000, )<br />     Ucs2 ＝ Encode_AnsiToUcs2 (“你好”)  ' 10万/140-160ms<br /> .计次循环尾 ()<br /> t ＝ 取启动时间 () － t<br /> 调试输出 (t, Usc2)<br /> <br /> ' 解码支持中英文混合解码<br /> t ＝ 取启动时间 ()<br /> .计次循环首 (100000, )<br />     Ansi ＝ Encode_Ucs2ToAnsi (Ucs2)  ' 10万/140-160ms<br /> .计次循环尾 ()<br /> t ＝ 取启动时间 () － t<br /> 调试输出 (t, Ansi)<br /> <br /> 返回 (0)  ' 可以根据您的需要返回任意数值

  

子程序名	返回值类型	公开	备 注
_临时子程序

变量名	类 型	静态	数组	备 注
t	整数型
Ucs2	文本型
Ansi	文本型

t ＝ 取启动时间 ()
计次循环首 (100000, )
Ucs2 ＝ 编码_ansi到usc2 (“你好”)  ' 10万/134000ms+
计次循环尾 ()
t ＝ 取启动时间 () － t
调试输出 (t, Usc2)
' 解码支持中英文混合解码
t ＝ 取启动时间 ()
计次循环首 (100000, )
Ansi ＝ 编码_usc2到ansi (Ucs2)  ' 10万/134000ms+
计次循环尾 ()
t ＝ 取启动时间 () － t
调试输出 (t, Ansi)

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

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 _临时子程序<br /> .局部变量 t, 整数型<br /> .局部变量 Ucs2, 文本型<br /> .局部变量 Ansi, 文本型<br /> <br /> t ＝ 取启动时间 ()<br /> .计次循环首 (100000, )<br />     Ucs2 ＝ 编码_ansi到usc2 (“你好”)  ' 10万/134000ms+<br /> <br /> .计次循环尾 ()<br /> t ＝ 取启动时间 () － t<br /> 调试输出 (t, Usc2)<br /> <br /> ' 解码支持中英文混合解码<br /> t ＝ 取启动时间 ()<br /> .计次循环首 (100000, )<br />     Ansi ＝ 编码_usc2到ansi (Ucs2)  ' 10万/134000ms+<br /> .计次循环尾 ()<br /> t ＝ 取启动时间 () － t<br /> 调试输出 (t, Ansi)

我本土人

谢谢分享！！！

我本土人

谢谢分享！！！

lm88818

        感谢分享，很给力！~

l88i

66666666666一直用的模块里的，学习一下

awuming

错别字，是UCS2

huaidan2015

谢谢~！我来测试一下！

蒙顺童

感谢分享，很给力！~

算法艺术家

大佬太牛了

q1599273319

速度应该是极快的了，欢迎没事做的大佬来优化补充