有没有一个大牛内存Uniced读取

a1678131758

已测试过 帖子：https://bbs.125.la/forum.php?mod=viewthread&tid=14067036&page=1#pid12066759字节集还原后，针对英文数字的可以，但是有中文的就不行， 中文也是可以的，使用编码_Uncide到Ansi 就能正常转换了，


但是昵称有中文并且也有字母，如果只是判断昵称是否有中文就编码返回的话还是有bug并不能全部返回正确，在此求完美方法


下面是调试输出
* “61003100320033003400350036007A0000000000”
* “a123456z”
* “495163839C690000000000000000000000000000”
* “光荣榜”
* “3F9ED08FDA8BE14F000000000000000000000000”
* “鸿运诚信”
* “F15FDA59DA590000000000000000000000000000”
* “忱姚姚”
* “4067406740674067406740674067310000000000”
* “杀杀杀杀杀杀杀1”
* “680061006C0069006C0075007900610000000000”
* “慨楬畬慹”
* “6A006B0034003400310036003800300036000000”
* “歪???6”
* “6E00730071003000300030003000310000000000”
* “獮ぱ??”
* “6100350035003000310030003400340000000000”
* “a5501044”
* “FB95BA4EF4757674000000000000000000000000”
* “闻人痴瑶”
* “AA67D96B5F4E2A4E8A7100000000000000000000”
* “枪毙也个熊”
* “7A00700035003200310000000000000000000000”
* “灺特1”
* “CA83B182004E3567356700000000000000000000”
* “菊花??g”
* “6100310035003900350036003100320031003700”
* “a159561217”
* “790061006E0067007A00680065006E0031000000”
* “慹杮桺湥1”
* “7300680065006E007800690061006E0067000000”
* “桳湥楸湡g”
* “7A00390039003100380031003600310033003000”
* “z991816130”
* “3C4F31720D4E3172000000000000000000000000”
* “似爱不爱”
* “AB7370743172BA4E41006D006F00750072000000”
* “玫瑰爱人流畯r”
* “730079007A003900380039003800000000000000”
* “祳??8”
* “EB5D1F7739830000000000000000000000000000”
* “巫真茹”
* “BD7FA66800000000000000000000000000000000”
* “羽梦”
* “7A00680061006E00670038003100350033003500”
* “桺湡???”
* “73007A0038003800370031003200000000000000”
* “穳??2”
* “7A00680075003300360030003100380033003400”
* “桺????”
* “7700650031003800360035003500380031003500”
* “敷????”
* “730075007A0068006F0075006A00690061006E00”
* “畳桺畯楪湡”
* “77006A0031003900380031003000300031003400”
* “wj19810014”
* “095CDF8FCD96C596000000000000000000000000”
* “尉迟雍雅”
* “7700310033003700330033003000370031003100”
* “w137330711”
* “770077007A007100360036003600000000000000”
* “睷煺?6”
* “73007A0038003500390038003900000000000000”
* “穳??9”
* “7A00680061006F006C006900780075006E000000”
* “桺潡楬畸n”
* “79006A0063007900300033003000320000000000”
* “橹祣?日”
* “417E4E53E582A668000000000000000000000000”
* “繁华若梦”
* “6C84AE792D4E84765A5AAE790000000000000000”
* “葬禮中的婚禮”
* “116284760F5C7C9C3F5100000000000000000000”
* “我的小鱼儿”
* “D1531F753575CE98476200000000000000000000”
* “发生电风扇”
* “41538C4E08670000000000000000000000000000”
* “十二月”
* “6400690031003900380034003100310000000000”
* “di198411”
* “9D5B1D8D504E504E000000000000000000000000”
* “宝贝乐乐”
* “0163AA67045C999F8B73364E0000000000000000”
* “持枪射龙王丶”
* “6C78496C505B0000000000000000000000000000”
* “硬汉子”
* “6600640066006400730071006100000000000000”
* “摦摦煳a”



大家应该发现了，有的正常有的乱码，因为判断不是很全

  

子程序名	返回值类型	公开	备 注
是否编码	逻辑型
参数名	类 型	参考	可空	数组	备 注
文本字节集	字节集

变量名	类 型	静态	数组	备 注
i	整数型
局_文本	文本型

计次循环首 (取字节集长度 (文本字节集) ÷ 2, i)
局_文本 ＝ 编码_Unicode到Ansi (取字节集中间 (文本字节集, i, 2))  
如果真 (文本是否中文 (局_文本) ＝ 真)
返回 (真)

计次循环尾 ()
返回 (假)

.版本 2<br /> <br /> .子程序 是否编码, 逻辑型<br /> .参数 文本字节集, 字节集<br /> .局部变量 i, 整数型<br /> .局部变量 局_文本, 文本型<br /> <br /> .计次循环首 (取字节集长度 (文本字节集) ÷ 2, i)<br />     局_文本 ＝ 编码_Unicode到Ansi (取字节集中间 (文本字节集, i, 2))  <br />     .如果真 (文本是否中文 (局_文本) ＝ 真)<br />         返回 (真)<br />     .如果真结束<br /> <br /> .计次循环尾 ()<br /> 返回 (假)

这段代码有个问题就是 有个别的组合在一起实际上就是英文，但是判断成有中文 所以返回编码 一下子就变成乱码了
这是判断代码 ，希望大牛能优化下，


解决目标：就是一段字节集中，如果编码转换后是有中文那么就进行转换，

四月的谎言

怎么又是你。。。针对你这个写了一下 。。。不熟悉E 写得有点乱

1. .版本 2
   
2. 
   
3. .子程序 _按钮1_被单击
   
4. .局部变量 返回文本, 文本型
   
5. 
   
6. 返回文本 ＝ 测试 (“61003100320033003400350036007A00000000003F9ED08FDA8BE14F000000000000000000000000”)
   
7. 输出调试文本 (返回文本)
   
8. 
   
9. 
   
10. .子程序 测试, 文本型
    
11. .参数 文本, 文本型
    
12. .局部变量 字节集, 字节集
    
13. .局部变量 字节1, 字节型
    
14. .局部变量 字节2, 字节型
    
15. .局部变量 是否跳出, 逻辑型
    
16. .局部变量 i, 整数型
    
17. .局部变量 ls字节集, 字节集
    
18. .局部变量 返回文本, 文本型
    
19. 
    
20. 字节集 ＝ 还原字节集 (文本)
    
21. ls字节集 ＝ 取空白字节集 (2)
    
22. i ＝ 1
    
23. .计次循环首 (取字节集长度 (字节集) ÷ 2, )
    
24.     字节1 ＝ 取字节集数据 (字节集, #字节型, i)
    
25.     字节2 ＝ 取字节集数据 (字节集, #字节型, i)
    
26.     .如果 (字节1 ≠ 0 且 字节2 ≠ 0)
    
27.         ls字节集 ＝ 还原字节集 (到文本 (进制_十到十六 (字节1)) ＋ 到文本 (进制_十到十六 (字节2)) ＋ “0000”)
    
28.         返回文本 ＝ 返回文本 ＋ 编码_Unicode到Ansi (ls字节集)
    
29.     .否则
    
30.         ls字节集 ＝ 还原字节集 (到文本 (进制_十到十六 (字节1)) ＋ 到文本 (进制_十到十六 (字节2)) ＋ “0000”)
    
31.         返回文本 ＝ 返回文本 ＋ 到文本 (ls字节集)
    
32.     .如果结束
    
33. 
    
34. 
    
35. .计次循环尾 ()
    
36. 返回 (返回文本)
    
37. 
    
38. .子程序 还原字节集, 字节集, , 还原十六进制字符串形式字节集的文本到字节集,格式不正确返回空字节集
    
39. .参数 文本, 文本型, , 如: 45 3F 58 1D 0A
    
40. .局部变量 原数据, 字节集
    
41. .局部变量 新数据, 字节集
    
42. .局部变量 i, 整数型
    
43. 
    
44. 原数据 ＝ 到字节集 (删全部空 (文本))
    
45. 新数据 ＝ 取空白字节集 (取字节集长度 (原数据) ＼ 2)
    
46. .计次循环首 (取字节集长度 (新数据), i)
    
47.     新数据 [i] ＝ (寻找字节集 ({ 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 65, 66, 67, 68, 69, 70 }, 到字节集 (原数据 [i × 2 － 1]), ) － 1) × 16 ＋ 寻找字节集 ({ 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 65, 66, 67, 68, 69, 70 }, 到字节集 (原数据 [i × 2]), ) － 1
    
48. .计次循环尾 ()
    
49. 返回 (新数据)
    

复制代码

凯2012

取了9个 都能读取
具体自己测试

凯2012

  

子程序名	返回值类型	公开	备 注
_按钮1_被单击

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

. ' 计次循环首 (9, n)
' 文本 ＝ 文本_取一行内容 (#常量1, n)
' 调试输出 (文本)
' 调试输出 (编码转换.Unicode转Ansi (还原字节集2 (文本)))
. ' 计次循环尾 ()
取有中文的 ()

子程序名	返回值类型	公开	备 注
取有中文的

变量名	类 型	静态	数组	备 注
n	整数型
文本	文本型
文本1	文本型
a	整数型
b	整数型
c	逻辑型

计次循环首 (9, n)
文本 ＝ 文本_取一行内容 ( #常量1, n)
文本1 ＝ 编码转换.Unicode转Ansi (还原字节集2 (文本))
a ＝ 取整 (取文本长度 (文本1) ÷ 2)
计次循环首 (a, b)
如果真 (a ÷ 2 ＝ 0)
c ＝ 文本_是否为汉字 (取文本左边 (文本1, b ＋ 1))
c ＝ 文本_是否为汉字 (取文本左边 (文本1, b ＋ 1))
计次循环尾 ()
如果真 (c ＝ 真)
调试输出 (文本1)

计次循环尾 ()

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

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 n, 整数型<br /> .局部变量 文本, 文本型<br /> <br /> .' 计次循环首 (9, n)<br />     ' 文本 ＝ 文本_取一行内容 (#常量1, n)<br />     ' 调试输出 (文本)<br />     ' 调试输出 (编码转换.Unicode转Ansi (还原字节集2 (文本)))<br /> .' 计次循环尾 ()<br /> 取有中文的 ()<br /> <br /> .子程序 取有中文的<br /> .局部变量 n, 整数型<br /> .局部变量 文本, 文本型<br /> .局部变量 文本1, 文本型<br /> .局部变量 a, 整数型<br /> .局部变量 b, 整数型<br /> .局部变量 c, 逻辑型<br /> <br /> .计次循环首 (9, n)<br />     文本 ＝ 文本_取一行内容 (#常量1, n)<br />     文本1 ＝ 编码转换.Unicode转Ansi (还原字节集2 (文本))<br />     a ＝ 取整 (取文本长度 (文本1) ÷ 2)<br />     .计次循环首 (a, b)<br />         .如果真 (a ÷ 2 ＝ 0)<br />             c ＝ 文本_是否为汉字 (取文本左边 (文本1, b ＋ 1))<br />         .如果真结束<br />         c ＝ 文本_是否为汉字 (取文本左边 (文本1, b ＋ 1))<br />     .计次循环尾 ()<br />     .如果真 (c ＝ 真)<br />         调试输出 (文本1)<br />     .如果真结束<br /> <br /> .计次循环尾 ()

看了下，你是要有中文在转换，那就加上上面的