.版本 2 .程序集 程序集2 .子程序 Usc2ToGB2312, 字节集, 公开 .参数 Data, 字节集, , \u .局部变量 pos, 整数型 .局部变量 spos, 整数型 .局部变量 hex_bin, 字节集 .局部变量 uni_bin, 字节集 .如果真 (Data ＝ { }) 返回 ({ }) .如果真结束 spos ＝ 1 .循环判断首 () pos ＝ 寻找字节集 (Data, { 92, 117 }, spos) .如果真 (pos ≠ -1) hex_bin ＝ 取字节集中间 (Data, pos ＋ 2, 4) uni_bin ＝ _Hex2Uni (hex_bin) .如果真 (uni_bin ≠ { }) Data ＝ 子字节集替换 (Data, { 92, 117 } ＋ hex_bin, uni_bin, pos, ) .如果真结束 spos ＝ pos ＋ 2 .如果真结束 处理事件 () .循环判断尾 (pos ≠ -1) 返回 (Data) .子程序 _Usc2Ansi, 字节集, , ' 本源码来自三叶资源网(www.sanye.cx) .参数 Unicode_bin, 字节集 .局部变量 resBin, 字节集 resBin ＝ 取空白字节集 (2)' 本源码来自三叶资源网(www.sanye.cx) WideCharToMultiByte_ (936, 512, Unicode_bin, -1, resBin, 2, 0, 假) 返回 (resBin) .子程序 _Hex2Dec_ASM, 整数型, , 进制_十六到十,作者混沌（QQ 1339307648） .参数 十六进制, 文本型 置入代码 ({ 49, 192, 139, 93, 8, 139, 27, 133, 219, 116, 55, 49, 210, 138, 19, 67, 128, 250, 57, 119, 10, 128, 250, 48, 114, 5, 128, 234, 48, 235, 28, 128, 250, 70, 119, 10, 128, 250, 65, 114, 5, 128, 234, 55, 235, 13, 128, 250, 102, 119, 15, 128, 250, 97, 114, 10, 128, 234, 87, 193, 224, 4, 1, 208, 235, 203, 93, 194, 4, 0 }) 返回 (0) .子程序 _Hex2Uni, 字节集 .参数 hex_bin, 字节集 .局部变量 ihex, 整数型 .局部变量 low, 整数型 .局部变量 high, 整数型 .如果真 (取字节集长度 (hex_bin) ≠ 4) 返回 ({ }) .如果真结束 ihex ＝ _Hex2Dec_ASM (到文本 (hex_bin)) .判断开始 (ihex ＞ 19967 且 ihex ＜ 40908 或 ihex ＞ 65279 且 ihex ＜ 65520) low ＝ 右移 (位与 (ihex, 65280), 8) high ＝ 位与 (ihex, 255) 返回 (_Usc2Ansi (到字节集 (到字节 (high)) ＋ 到字节集 (到字节 (low)))) .默认 返回 ({ }) .判断结束