来大佬看看!

130092934 · 发表于昨天 22:59

@zainex

' 现在如何在编码回去传入变量 -测试得到文本呢
调试输出 (解码 (文本))

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

子程序名	返回值类型	公开	备注
解码	文本型
参数名	类型	参考	可空	数组	备注
文本	文本型

变量名	类型	静态	数组	备注
掩码1	字节集
掩码2	字节集
内容	字节集
量	整数型
数	整数型
字节	字节型
值	整数型
临时	整数型
下标	整数型
结果	字节集

掩码1 ＝ { 42, 231, 24, 111, 99, 157, 72, 234, 57, 205, 56, 184, 160, 171, 224, 16, 53, 153, 55, 9, 192, 105, 178, 164, 103, 136, 80, 52, 127, 252, 11, 190, 12, 68, 89, 182, 91, 156, 101, 214, 148, 235, 196, 59, 3, 60, 201, 62, 107, 154, 212, 246, 195, 77, 17, 36, 170, 255, 74, 237, 149, 147, 217, 70, 95, 150, 135, 48, 186, 202, 203, 250, 138, 26, 104, 92, 172, 7, 64, 96, 41, 112, 87, 83, 65, 18, 222, 29, 100, 20, 151, 114, 251, 141, 43, 8, 207, 244, 58, 0, 197, 145, 86, 169, 158, 113, 188, 163, 175, 166, 85, 218, 121, 187, 51, 165, 37, 21, 125, 238, 193, 44, 199, 208, 25, 216, 90, 232, 133, 253, 47, 106, 120, 69, 219, 181, 245, 30, 4, 117, 176, 122, 32, 242, 223, 211, 131, 243, 84, 144, 162, 198, 15, 128, 54, 78, 200, 1, 130, 118, 161, 46, 132, 134, 14, 71, 143, 225, 249, 124, 194, 116, 220, 38, 34, 206, 45, 79, 191, 13, 115, 39, 33, 179, 152, 31, 137, 236, 254, 82, 10, 140, 159, 168, 229, 230, 6, 139, 204, 247, 94, 227, 123, 210, 5, 73, 19, 233, 102, 183, 173, 180, 248, 167, 28, 241, 2, 126, 110, 23, 98, 76, 119, 142, 221, 240, 67, 40, 109, 97, 185, 215, 189, 61, 155, 146, 22, 239, 81, 35, 226, 177, 129, 49, 50, 88, 209, 93, 213, 108, 75, 228, 174, 66, 27, 63 }
掩码2 ＝ { 252, 248, 240, 224, 192 }
内容＝ hex2bin (删全部空 (文本))
量＝ 2

计次循环首 (取字节集长度 (内容), 数)

字节＝内容 [数]

如果真 (字节＜十六进制 (“3C”))

跳出循环 ()

字节＝字节－十六进制 (“3C”)

如果真 (值 ≥ 2)

值＝ 0

下标＝位异或 (位或 (右移 (位与 (字节, 十六进制 (“3F”)), 6 －量), 临时), 十六进制 (“9E”))

结果＝结果＋到字节集 (到字节 (位异或 (掩码1 [下标＋ 1], 十六进制 (“34”))))

如果真 (量＞ 5)

量＝ 2

到循环尾 ()

量＝量＋ 2

临时＝位与 (掩码2 [量－ 2 ＋ 1], 左移 (字节, 量))

值＝值＋ 8 －量

计次循环尾 ()
调试输出 (bin2hex (结果))

如果 (取字节集长度 (结果) ＝ 36)

结果＝取字节集右边 (内容, 取字节集长度 (内容) － 12)

结果＝取字节集右边 (结果, 取字节集长度 (结果) － 36)

返回 (编码_Utf8到Ansi (结果))

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

变量名	类型	静态	数组	备注
加密文本	文本型
测试	文本型
内容	字节集
前缀文本	文本型
前缀	字节集
文本	文本型
文本2	文本型

' 这是加密的包
文本＝ “5D 54 52 41 5D 55 76 41 5D 54 52 41 5D 54 52 41 74 44 52 41 5D 54 52 41 5D 54 50 59 5D 54 52 41 5D 54 52 41 5D 57 76 41 5D 54 52 41 5D 54 52 41 47 73 45 77 4A 73 3E 5D 76 48 79 6E 4A 63 46 7A 6B 5D 4E 6E 52 61 47 4F 41 3D 4C 50 50 67 47 79 68 5C 48 3F 52 61 47 79 70 6D 4C 50 50 5D 4C 69 47 57 76 6E 7B 53 45 4F 5D 54 52 41 5D 54 76 41 5D 54 50 4C 5D 54 52 41 76 74 52 41 5D 52 72 41 5D 54 50 61 40 47 6C 40 5D 54 52 41 5D 53 42 41 5D 54 51 59 57 54 52 41 45 6E 65 50 51 48 79 5C 3C 70 54 3F 52 67 74 50 3C 71 46 6E 6B 61 44”
' 这是解密后明文包
' 测试＝ “00 00 00 00 1E 00 00 00 00 00 00 00 6E 00 00 00 00 00 00 00 5E 00 00 00 00 00 00 00 38 00 00 00 00 00 00 00 7B 22 55 73 65 72 49 44 22 3A 22 38 38 30 37 32 31 33 30 30 30 31 37 34 37 35 35 32 31 34 33 30 30 31 30 39 39 38 37 34 22 7D 00 00 00 00 01 00 00 00 14 00 00 00 21 00 00 00 05 00 00 00 D8 14 6D 02 00 00 00 00 17 00 00 00 D2 05 00 00 2B 47 4F 4F 44 2F 35 36 35 32 38 30 35 31 37 38 31 ”
' 这是明文
' 调试记录
' * “000000001E000000000000006E000000000000005E0000000000000038000000000000007B22557365724944223A223838303732313330303031373437353532313433303031303939383734227D0000000001000000140000002100000005000000D8146D020000000017000000D20500002B474F4F442F3536353238303531373831”
' * “{"UserID":"88072130001747552143001099874"}”
' 现在如何在编码回去传入变量 -测试得到文本呢
调试输出 (解码 (文本))

子程序名	返回值类型	公开	备注
编码	文本型

变量名	类型	静态	数组	备注
掩码	字节集
内容	字节集
数	整数型
字节	字节型
值	整数型
临时	整数型
结果	字节集
量	整数型
正则	正则表达式

掩码＝ { 140, 135, 13, 133, 212, 100, 99, 229, 186, 126, 184, 104, 157, 159, 245, 188, 160, 227, 58, 34, 25, 33, 57, 120, 238, 39, 54, 21, 116, 199, 151, 201, 206, 226, 123, 76, 152, 161, 194, 89, 65, 192, 30, 46, 149, 235, 222, 105, 29, 91, 83, 218, 244, 10, 79, 187, 183, 36, 51, 15, 200, 132, 41, 137, 60, 28, 8, 73, 198, 254, 204, 35, 62, 225, 78, 139, 19, 231, 26, 93, 207, 177, 71, 143, 216, 114, 75, 147, 110, 115, 77, 148, 221, 130, 20, 167, 3, 249, 241, 197, 141, 121, 42, 196, 220, 96, 95, 215, 98, 181, 233, 179, 182, 18, 168, 50, 217, 195, 106, 117, 74, 162, 12, 38, 145, 90, 173, 109, 68, 16, 180, 70, 27, 102, 129, 32, 253, 127, 136, 37, 156, 113, 211, 230, 128, 228, 250, 66, 155, 55, 1, 252, 219, 69, 107, 251, 86, 240, 175, 154, 191, 171, 214, 205, 2, 242, 124, 170, 178, 146, 255, 87, 47, 134, 166, 125, 53, 23, 52, 213, 14, 101, 9, 5, 40, 202, 72, 49, 142, 45, 223, 82, 246, 31, 164, 80, 118, 64, 24, 4, 138, 22, 43, 174, 67, 63, 208, 203, 108, 85, 84, 150, 153, 48, 103, 94, 44, 172, 224, 122, 232, 88, 144, 190, 165, 111, 176, 112, 236, 97, 92, 6, 59, 119, 193, 7, 234, 169, 248, 17, 189, 243, 0, 237, 131, 239, 61, 163, 81, 158, 56, 247, 11, 185, 210, 209 }
' 内容＝前缀＋到字节集 (编码_Ansi到Utf8 (文本))
内容＝ hex2bin (“00 00 00 00 1E 00 00 00 00 00 00 00 6E 00 00 00 00 00 00 00 5E 00 00 00 00 00 00 00 38 00 00 00 00 00 00 00 7B 22 55 73 65 72 49 44 22 3A 22 38 38 30 37 32 31 33 30 30 30 31 37 34 37 35 35 32 31 34 33 30 30 31 30 39 39 38 37 34 22 7D 00 00 00 00 01 00 00 00 14 00 00 00 21 00 00 00 05 00 00 00 D8 14 6D 02 00 00 00 00 17 00 00 00 D2 05 00 00 2B 47 4F 4F 44 2F 35 36 35 32 38 30 35 31 37 38 31”)

计次循环首 (取字节集长度 (内容), 数)

字节＝位异或 (掩码 [内容 [数] ＋ 1], 9)

临时＝值＋ 2

结果＝结果＋到字节集 (到字节 (位与 (位或 (右移 (字节, 临时), 量), 十六进制 (“3F”)) ＋十六进制 (“3C”)))

量＝右移 (到字节 (左移 (字节, 6 －值)), 2)

如果 (临时＜ 6)

值＝临时

结果＝结果＋到字节集 (到字节 (量＋十六进制 (“3C”)))

值＝ 0

量＝ 0

调试输出 (bin2hex (结果))

计次循环尾 ()

如果真 (值＞ 0)

结果＝结果＋到字节集 (到字节 (量＋十六进制 (“3C”)))
正则.创建 (“.{2}”, )
返回 (正则.替换 (bin2hex (结果), “$0 ”, 1, , 真, 真))

i支持库列表	支持库注释
spec	特殊功能支持库
RegEx	正则表达式支持库

.版本 2<br />
.支持库 spec<br />
.支持库 RegEx<br />
<br />
.程序集 窗口程序集_启动窗口<br />
<br />
.子程序 解码, 文本型<br />
.参数 文本, 文本型<br />
.局部变量 掩码1, 字节集<br />
.局部变量 掩码2, 字节集<br />
.局部变量 内容, 字节集<br />
.局部变量 量, 整数型<br />
.局部变量 数, 整数型<br />
.局部变量 字节, 字节型<br />
.局部变量 值, 整数型<br />
.局部变量 临时, 整数型<br />
.局部变量 下标, 整数型<br />
.局部变量 结果, 字节集<br />
<br />
掩码1 ＝ { 42, 231, 24, 111, 99, 157, 72, 234, 57, 205, 56, 184, 160, 171, 224, 16, 53, 153, 55, 9, 192, 105, 178, 164, 103, 136, 80, 52, 127, 252, 11, 190, 12, 68, 89, 182, 91, 156, 101, 214, 148, 235, 196, 59, 3, 60, 201, 62, 107, 154, 212, 246, 195, 77, 17, 36, 170, 255, 74, 237, 149, 147, 217, 70, 95, 150, 135, 48, 186, 202, 203, 250, 138, 26, 104, 92, 172, 7, 64, 96, 41, 112, 87, 83, 65, 18, 222, 29, 100, 20, 151, 114, 251, 141, 43, 8, 207, 244, 58, 0, 197, 145, 86, 169, 158, 113, 188, 163, 175, 166, 85, 218, 121, 187, 51, 165, 37, 21, 125, 238, 193, 44, 199, 208, 25, 216, 90, 232, 133, 253, 47, 106, 120, 69, 219, 181, 245, 30, 4, 117, 176, 122, 32, 242, 223, 211, 131, 243, 84, 144, 162, 198, 15, 128, 54, 78, 200, 1, 130, 118, 161, 46, 132, 134, 14, 71, 143, 225, 249, 124, 194, 116, 220, 38, 34, 206, 45, 79, 191, 13, 115, 39, 33, 179, 152, 31, 137, 236, 254, 82, 10, 140, 159, 168, 229, 230, 6, 139, 204, 247, 94, 227, 123, 210, 5, 73, 19, 233, 102, 183, 173, 180, 248, 167, 28, 241, 2, 126, 110, 23, 98, 76, 119, 142, 221, 240, 67, 40, 109, 97, 185, 215, 189, 61, 155, 146, 22, 239, 81, 35, 226, 177, 129, 49, 50, 88, 209, 93, 213, 108, 75, 228, 174, 66, 27, 63 }<br />
掩码2 ＝ { 252, 248, 240, 224, 192 }<br />
内容 ＝ hex2bin (删全部空 (文本))<br />
<br />
<br />
量 ＝ 2<br />
.计次循环首 (取字节集长度 (内容), 数)<br />
    字节 ＝ 内容 [数]<br />
    .如果真 (字节 ＜ 十六进制 (“3C”))<br />
        跳出循环 ()<br />
    .如果真结束<br />
    字节 ＝ 字节 － 十六进制 (“3C”)<br />
    .如果真 (值 ≥ 2)<br />
        值 ＝ 0<br />
        下标 ＝ 位异或 (位或 (右移 (位与 (字节, 十六进制 (“3F”)), 6 － 量), 临时), 十六进制 (“9E”))<br />
        结果 ＝ 结果 ＋ 到字节集 (到字节 (位异或 (掩码1 [下标 ＋ 1], 十六进制 (“34”))))<br />
<br />
<br />
<br />
<br />
        .如果真 (量 ＞ 5)<br />
            量 ＝ 2<br />
            到循环尾 ()<br />
        .如果真结束<br />
        量 ＝ 量 ＋ 2<br />
    .如果真结束<br />
    临时 ＝ 位与 (掩码2 [量 － 2 ＋ 1], 左移 (字节, 量))<br />
    值 ＝ 值 ＋ 8 － 量<br />
.计次循环尾 ()<br />
调试输出 (bin2hex (结果))<br />
<br />
.如果 (取字节集长度 (结果) ＝ 36)<br />
    结果 ＝ 取字节集右边 (内容, 取字节集长度 (内容) － 12)<br />
.否则<br />
    结果 ＝ 取字节集右边 (结果, 取字节集长度 (结果) － 36)<br />
.如果结束<br />
<br />
<br />
<br />
<br />
返回 (编码_Utf8到Ansi (结果))<br />
<br />
.子程序 __启动窗口_创建完毕<br />
.局部变量 加密文本, 文本型<br />
.局部变量 测试, 文本型<br />
.局部变量 内容, 字节集<br />
.局部变量 前缀文本, 文本型<br />
.局部变量 前缀, 字节集<br />
.局部变量 文本, 文本型<br />
.局部变量 文本2, 文本型<br />
<br />
' 这是加密的包<br />
文本 ＝ “5D 54 52 41 5D 55 76 41 5D 54 52 41 5D 54 52 41 74 44 52 41 5D 54 52 41 5D 54 50 59 5D 54 52 41 5D 54 52 41 5D 57 76 41 5D 54 52 41 5D 54 52 41 47 73 45 77 4A 73 3E 5D 76 48 79 6E 4A 63 46 7A 6B 5D 4E 6E 52 61 47 4F 41 3D 4C 50 50 67 47 79 68 5C 48 3F 52 61 47 79 70 6D 4C 50 50 5D 4C 69 47 57 76 6E 7B 53 45 4F 5D 54 52 41 5D 54 76 41 5D 54 50 4C 5D 54 52 41 76 74 52 41 5D 52 72 41 5D 54 50 61 40 47 6C 40 5D 54 52 41 5D 53 42 41 5D 54 51 59 57 54 52 41 45 6E 65 50 51 48 79 5C 3C 70 54 3F 52 67 74 50 3C 71 46 6E 6B 61 44”<br />
<br />
<br />
' 这是解密后明文包<br />
' 测试 ＝ “00 00 00 00 1E 00 00 00 00 00 00 00 6E 00 00 00 00 00 00 00 5E 00 00 00 00 00 00 00 38 00 00 00 00 00 00 00 7B 22 55 73 65 72 49 44 22 3A 22 38 38 30 37 32 31 33 30 30 30 31 37 34 37 35 35 32 31 34 33 30 30 31 30 39 39 38 37 34 22 7D 00 00 00 00 01 00 00 00 14 00 00 00 21 00 00 00 05 00 00 00 D8 14 6D 02 00 00 00 00 17 00 00 00 D2 05 00 00 2B 47 4F 4F 44 2F 35 36 35 32 38 30 35 31 37 38 31 ”<br />
<br />
' 这是明文<br />
<br />
' 调试记录<br />
' * “000000001E000000000000006E000000000000005E0000000000000038000000000000007B22557365724944223A223838303732313330303031373437353532313433303031303939383734227D0000000001000000140000002100000005000000D8146D020000000017000000D20500002B474F4F442F3536353238303531373831”<br />
' * “{"UserID":"88072130001747552143001099874"}”<br />
' 现在如何 在编码回去 传入 变量 -测试  得到 文本呢<br />
调试输出 (解码 (文本))<br />
<br />
<br />
<br />
.子程序 编码, 文本型<br />
.局部变量 掩码, 字节集<br />
.局部变量 内容, 字节集<br />
.局部变量 数, 整数型<br />
.局部变量 字节, 字节型<br />
.局部变量 值, 整数型<br />
.局部变量 临时, 整数型<br />
.局部变量 结果, 字节集<br />
.局部变量 量, 整数型<br />
.局部变量 正则, 正则表达式<br />
<br />
掩码 ＝ { 140, 135, 13, 133, 212, 100, 99, 229, 186, 126, 184, 104, 157, 159, 245, 188, 160, 227, 58, 34, 25, 33, 57, 120, 238, 39, 54, 21, 116, 199, 151, 201, 206, 226, 123, 76, 152, 161, 194, 89, 65, 192, 30, 46, 149, 235, 222, 105, 29, 91, 83, 218, 244, 10, 79, 187, 183, 36, 51, 15, 200, 132, 41, 137, 60, 28, 8, 73, 198, 254, 204, 35, 62, 225, 78, 139, 19, 231, 26, 93, 207, 177, 71, 143, 216, 114, 75, 147, 110, 115, 77, 148, 221, 130, 20, 167, 3, 249, 241, 197, 141, 121, 42, 196, 220, 96, 95, 215, 98, 181, 233, 179, 182, 18, 168, 50, 217, 195, 106, 117, 74, 162, 12, 38, 145, 90, 173, 109, 68, 16, 180, 70, 27, 102, 129, 32, 253, 127, 136, 37, 156, 113, 211, 230, 128, 228, 250, 66, 155, 55, 1, 252, 219, 69, 107, 251, 86, 240, 175, 154, 191, 171, 214, 205, 2, 242, 124, 170, 178, 146, 255, 87, 47, 134, 166, 125, 53, 23, 52, 213, 14, 101, 9, 5, 40, 202, 72, 49, 142, 45, 223, 82, 246, 31, 164, 80, 118, 64, 24, 4, 138, 22, 43, 174, 67, 63, 208, 203, 108, 85, 84, 150, 153, 48, 103, 94, 44, 172, 224, 122, 232, 88, 144, 190, 165, 111, 176, 112, 236, 97, 92, 6, 59, 119, 193, 7, 234, 169, 248, 17, 189, 243, 0, 237, 131, 239, 61, 163, 81, 158, 56, 247, 11, 185, 210, 209 }<br />
' 内容 ＝ 前缀 ＋ 到字节集 (编码_Ansi到Utf8 (文本))<br />
<br />
内容 ＝ hex2bin (“00 00 00 00 1E 00 00 00 00 00 00 00 6E 00 00 00 00 00 00 00 5E 00 00 00 00 00 00 00 38 00 00 00 00 00 00 00 7B 22 55 73 65 72 49 44 22 3A 22 38 38 30 37 32 31 33 30 30 30 31 37 34 37 35 35 32 31 34 33 30 30 31 30 39 39 38 37 34 22 7D 00 00 00 00 01 00 00 00 14 00 00 00 21 00 00 00 05 00 00 00 D8 14 6D 02 00 00 00 00 17 00 00 00 D2 05 00 00 2B 47 4F 4F 44 2F 35 36 35 32 38 30 35 31 37 38 31”)<br />
<br />
.计次循环首 (取字节集长度 (内容), 数)<br />
    字节 ＝ 位异或 (掩码 [内容 [数] ＋ 1], 9)<br />
    临时 ＝ 值 ＋ 2<br />
    结果 ＝ 结果 ＋ 到字节集 (到字节 (位与 (位或 (右移 (字节, 临时), 量), 十六进制 (“3F”)) ＋ 十六进制 (“3C”)))<br />
    量 ＝ 右移 (到字节 (左移 (字节, 6 － 值)), 2)<br />
    .如果 (临时 ＜ 6)<br />
        值 ＝ 临时<br />
    .否则<br />
        结果 ＝ 结果 ＋ 到字节集 (到字节 (量 ＋ 十六进制 (“3C”)))<br />
        值 ＝ 0<br />
        量 ＝ 0<br />
    .如果结束<br />
<br />
    调试输出 (bin2hex (结果))<br />
.计次循环尾 ()<br />
<br />
<br />
.如果真 (值 ＞ 0)<br />
    结果 ＝ 结果 ＋ 到字节集 (到字节 (量 ＋ 十六进制 (“3C”)))<br />
.如果真结束<br />
正则.创建 (“.{2}”, )<br />
返回 (正则.替换 (bin2hex (结果), “$0 ”, 1, , 真, 真))

130092934 · 发表于昨天 23:01

传入 “00 00 00 00 1E 00 00 00 00 00 00 00 6E 00 00 00 00 00 00 00 5E 00 00 00 00 00 00 00 38 00 00 00 00 00 00 00 7B 22 55 73 65 72 49 44 22 3A 22 38 38 30 37 32 31 33 30 30 30 31 37 34 37 35 35 32 31 34 33 30 30 31 30 39 39 38 37 34 22 7D 00 00 00 00 01 00 00 00 14 00 00 00 21 00 00 00 05 00 00 00 D8 14 6D 02 00 00 00 00 17 00 00 00 D2 05 00 00 2B 47 4F 4F 44 2F 35 36 35 32 38 30 35 31 37 38 31 ”

得到
“5D 54 52 41 5D 55 76 41 5D 54 52 41 5D 54 52 41 74 44 52 41 5D 54 52 41 5D 54 50 59 5D 54 52 41 5D 54 52 41 5D 57 76 41 5D 54 52 41 5D 54 52 41 47 73 45 77 4A 73 3E 5D 76 48 79 6E 4A 63 46 7A 6B 5D 4E 6E 52 61 47 4F 41 3D 4C 50 50 67 47 79 68 5C 48 3F 52 61 47 79 70 6D 4C 50 50 5D 4C 69 47 57 76 6E 7B 53 45 4F 5D 54 52 41 5D 54 76 41 5D 54 50 4C 5D 54 52 41 76 74 52 41 5D 52 72 41 5D 54 50 61 40 47 6C 40 5D 54 52 41 5D 53 42 41 5D 54 51 59 57 54 52 41 45 6E 65 50 51 48 79 5C 3C 70 54 3F 52 67 74 50 3C 71 46 6E 6B 61 44”

130092934 · 发表于昨天 23:01

@zainex 帮帮我.....

zainex · 发表于 9 小时前

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

子程序名	返回值类型	公开	备注
解码	文本型
参数名	类型	参考	可空	数组	备注
文本	文本型
前缀	字节集
后缀	字节集

变量名	类型	静态	数组	备注
掩码1	字节集
掩码2	字节集
内容	字节集
量	整数型
数	整数型
字节	字节型
值	整数型
临时	整数型
下标	整数型
结果	字节集

掩码1 ＝ { 42, 231, 24, 111, 99, 157, 72, 234, 57, 205, 56, 184, 160, 171, 224, 16, 53, 153, 55, 9, 192, 105, 178, 164, 103, 136, 80, 52, 127, 252, 11, 190, 12, 68, 89, 182, 91, 156, 101, 214, 148, 235, 196, 59, 3, 60, 201, 62, 107, 154, 212, 246, 195, 77, 17, 36, 170, 255, 74, 237, 149, 147, 217, 70, 95, 150, 135, 48, 186, 202, 203, 250, 138, 26, 104, 92, 172, 7, 64, 96, 41, 112, 87, 83, 65, 18, 222, 29, 100, 20, 151, 114, 251, 141, 43, 8, 207, 244, 58, 0, 197, 145, 86, 169, 158, 113, 188, 163, 175, 166, 85, 218, 121, 187, 51, 165, 37, 21, 125, 238, 193, 44, 199, 208, 25, 216, 90, 232, 133, 253, 47, 106, 120, 69, 219, 181, 245, 30, 4, 117, 176, 122, 32, 242, 223, 211, 131, 243, 84, 144, 162, 198, 15, 128, 54, 78, 200, 1, 130, 118, 161, 46, 132, 134, 14, 71, 143, 225, 249, 124, 194, 116, 220, 38, 34, 206, 45, 79, 191, 13, 115, 39, 33, 179, 152, 31, 137, 236, 254, 82, 10, 140, 159, 168, 229, 230, 6, 139, 204, 247, 94, 227, 123, 210, 5, 73, 19, 233, 102, 183, 173, 180, 248, 167, 28, 241, 2, 126, 110, 23, 98, 76, 119, 142, 221, 240, 67, 40, 109, 97, 185, 215, 189, 61, 155, 146, 22, 239, 81, 35, 226, 177, 129, 49, 50, 88, 209, 93, 213, 108, 75, 228, 174, 66, 27, 63 }
掩码2 ＝ { 252, 248, 240, 224, 192 }
内容＝ hex2bin (删全部空 (文本))
量＝ 2

计次循环首 (取字节集长度 (内容), 数)

字节＝内容 [数]

如果真 (字节＜十六进制 (“3C”))

跳出循环 ()

字节＝字节－十六进制 (“3C”)

如果真 (值 ≥ 2)

值＝ 0

下标＝位异或 (位或 (右移 (位与 (字节, 十六进制 (“3F”)), 6 －量), 临时), 十六进制 (“9E”))

结果＝结果＋到字节集 (到字节 (位异或 (掩码1 [下标＋ 1], 十六进制 (“34”))))

如果真 (量＞ 5)

量＝ 2

到循环尾 ()

量＝量＋ 2

临时＝位与 (掩码2 [量－ 2 ＋ 1], 左移 (字节, 量))

值＝值＋ 8 －量

计次循环尾 ()

如果 (取字节集长度 (结果) ＝ 36)

如果真 (是否为空 (前缀) ＝假)

前缀＝取字节集左边 (结果, 12)

结果＝取字节集右边 (内容, 取字节集长度 (内容) － 12)

如果真 (是否为空 (前缀) ＝假)

前缀＝取字节集左边 (结果, 36)
结果＝取字节集右边 (结果, 取字节集长度 (结果) － 36)

如果真 (是否为空 (后缀) ＝假)

后缀＝结果
返回 (编码_Utf8到Ansi (结果))

子程序名	返回值类型	公开	备注
编码_字节集	文本型
参数名	类型	参考	可空	数组	备注
内容	字节集

变量名	类型	静态	数组	备注
掩码	字节集
数	整数型
字节	字节型
值	整数型
临时	整数型
结果	字节集
量	整数型
正则	正则表达式

掩码＝ { 140, 135, 13, 133, 212, 100, 99, 229, 186, 126, 184, 104, 157, 159, 245, 188, 160, 227, 58, 34, 25, 33, 57, 120, 238, 39, 54, 21, 116, 199, 151, 201, 206, 226, 123, 76, 152, 161, 194, 89, 65, 192, 30, 46, 149, 235, 222, 105, 29, 91, 83, 218, 244, 10, 79, 187, 183, 36, 51, 15, 200, 132, 41, 137, 60, 28, 8, 73, 198, 254, 204, 35, 62, 225, 78, 139, 19, 231, 26, 93, 207, 177, 71, 143, 216, 114, 75, 147, 110, 115, 77, 148, 221, 130, 20, 167, 3, 249, 241, 197, 141, 121, 42, 196, 220, 96, 95, 215, 98, 181, 233, 179, 182, 18, 168, 50, 217, 195, 106, 117, 74, 162, 12, 38, 145, 90, 173, 109, 68, 16, 180, 70, 27, 102, 129, 32, 253, 127, 136, 37, 156, 113, 211, 230, 128, 228, 250, 66, 155, 55, 1, 252, 219, 69, 107, 251, 86, 240, 175, 154, 191, 171, 214, 205, 2, 242, 124, 170, 178, 146, 255, 87, 47, 134, 166, 125, 53, 23, 52, 213, 14, 101, 9, 5, 40, 202, 72, 49, 142, 45, 223, 82, 246, 31, 164, 80, 118, 64, 24, 4, 138, 22, 43, 174, 67, 63, 208, 203, 108, 85, 84, 150, 153, 48, 103, 94, 44, 172, 224, 122, 232, 88, 144, 190, 165, 111, 176, 112, 236, 97, 92, 6, 59, 119, 193, 7, 234, 169, 248, 17, 189, 243, 0, 237, 131, 239, 61, 163, 81, 158, 56, 247, 11, 185, 210, 209 }

计次循环首 (取字节集长度 (内容), 数)

字节＝位异或 (掩码 [内容 [数] ＋ 1], 9)

临时＝值＋ 2

结果＝结果＋到字节集 (到字节 (位与 (位或 (右移 (字节, 临时), 量), 十六进制 (“3F”)) ＋十六进制 (“3C”)))

量＝右移 (到字节 (左移 (字节, 6 －值)), 2)

如果 (临时＜ 6)

值＝临时

结果＝结果＋到字节集 (到字节 (量＋十六进制 (“3C”)))

值＝ 0

量＝ 0

计次循环尾 ()

如果真 (值＞ 0)

结果＝结果＋到字节集 (到字节 (量＋十六进制 (“3C”)))
正则.创建 (“.{2}”, )
返回 (正则.替换 (bin2hex (结果), “$0 ”, 1, , 真, 真))

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

返回 (编码_字节集 (前缀＋到字节集 (编码_Ansi到Utf8 (文本))))

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

变量名	类型	静态	数组	备注
文本	文本型
结果	文本型
前缀	字节集
后缀	字节集

文本＝ “5D 54 52 41 5D 55 76 41 5D 54 52 41 5D 54 52 41 74 44 52 41 5D 54 52 41 5D 54 50 59 5D 54 52 41 5D 54 52 41 5D 57 76 41 5D 54 52 41 5D 54 52 41 47 73 45 77 4A 73 3E 5D 76 48 79 6E 4A 63 46 7A 6B 5D 4E 6E 52 61 47 4F 41 3D 4C 50 50 67 47 79 68 5C 48 3F 52 61 47 79 70 6D 4C 50 50 5D 4C 69 47 57 76 6E 7B 53 45 4F 5D 54 52 41 5D 54 76 41 5D 54 50 4C 5D 54 52 41 76 74 52 41 5D 52 72 41 5D 54 50 61 40 47 6C 40 5D 54 52 41 5D 53 42 41 5D 54 51 59 57 54 52 41 45 6E 65 50 51 48 79 5C 3C 70 54 3F 52 67 74 50 3C 71 46 6E 6B 61 44 ”
结果＝解码 (文本)  ' 用法1
调试输出 (结果)
解码 (文本, 前缀, 后缀)  ' 用法2
调试输出 (前缀＋后缀)
调试输出 (编码_字节集 (前缀＋后缀) ＝文本)  ' 相同返回真,否则返回假
调试输出 (解码 (编码 (结果, 前缀)))  ' 可能会导致部分后缀丢失

i支持库列表	支持库注释
RegEx	正则表达式支持库
spec	特殊功能支持库

.版本 2<br />
.支持库 RegEx<br />
.支持库 spec<br />
<br />
.程序集 窗口程序集_启动窗口<br />
<br />
.子程序 解码, 文本型<br />
.参数 文本, 文本型<br />
.参数 前缀, 字节集, 参考 可空<br />
.参数 后缀, 字节集, 参考 可空<br />
.局部变量 掩码1, 字节集<br />
.局部变量 掩码2, 字节集<br />
.局部变量 内容, 字节集<br />
.局部变量 量, 整数型<br />
.局部变量 数, 整数型<br />
.局部变量 字节, 字节型<br />
.局部变量 值, 整数型<br />
.局部变量 临时, 整数型<br />
.局部变量 下标, 整数型<br />
.局部变量 结果, 字节集<br />
<br />
掩码1 ＝ { 42, 231, 24, 111, 99, 157, 72, 234, 57, 205, 56, 184, 160, 171, 224, 16, 53, 153, 55, 9, 192, 105, 178, 164, 103, 136, 80, 52, 127, 252, 11, 190, 12, 68, 89, 182, 91, 156, 101, 214, 148, 235, 196, 59, 3, 60, 201, 62, 107, 154, 212, 246, 195, 77, 17, 36, 170, 255, 74, 237, 149, 147, 217, 70, 95, 150, 135, 48, 186, 202, 203, 250, 138, 26, 104, 92, 172, 7, 64, 96, 41, 112, 87, 83, 65, 18, 222, 29, 100, 20, 151, 114, 251, 141, 43, 8, 207, 244, 58, 0, 197, 145, 86, 169, 158, 113, 188, 163, 175, 166, 85, 218, 121, 187, 51, 165, 37, 21, 125, 238, 193, 44, 199, 208, 25, 216, 90, 232, 133, 253, 47, 106, 120, 69, 219, 181, 245, 30, 4, 117, 176, 122, 32, 242, 223, 211, 131, 243, 84, 144, 162, 198, 15, 128, 54, 78, 200, 1, 130, 118, 161, 46, 132, 134, 14, 71, 143, 225, 249, 124, 194, 116, 220, 38, 34, 206, 45, 79, 191, 13, 115, 39, 33, 179, 152, 31, 137, 236, 254, 82, 10, 140, 159, 168, 229, 230, 6, 139, 204, 247, 94, 227, 123, 210, 5, 73, 19, 233, 102, 183, 173, 180, 248, 167, 28, 241, 2, 126, 110, 23, 98, 76, 119, 142, 221, 240, 67, 40, 109, 97, 185, 215, 189, 61, 155, 146, 22, 239, 81, 35, 226, 177, 129, 49, 50, 88, 209, 93, 213, 108, 75, 228, 174, 66, 27, 63 }<br />
掩码2 ＝ { 252, 248, 240, 224, 192 }<br />
内容 ＝ hex2bin (删全部空 (文本))<br />
量 ＝ 2<br />
.计次循环首 (取字节集长度 (内容), 数)<br />
    字节 ＝ 内容 [数]<br />
    .如果真 (字节 ＜ 十六进制 (“3C”))<br />
        跳出循环 ()<br />
    .如果真结束<br />
    字节 ＝ 字节 － 十六进制 (“3C”)<br />
    .如果真 (值 ≥ 2)<br />
        值 ＝ 0<br />
        下标 ＝ 位异或 (位或 (右移 (位与 (字节, 十六进制 (“3F”)), 6 － 量), 临时), 十六进制 (“9E”))<br />
        结果 ＝ 结果 ＋ 到字节集 (到字节 (位异或 (掩码1 [下标 ＋ 1], 十六进制 (“34”))))<br />
        .如果真 (量 ＞ 5)<br />
            量 ＝ 2<br />
            到循环尾 ()<br />
        .如果真结束<br />
        量 ＝ 量 ＋ 2<br />
    .如果真结束<br />
    临时 ＝ 位与 (掩码2 [量 － 2 ＋ 1], 左移 (字节, 量))<br />
    值 ＝ 值 ＋ 8 － 量<br />
.计次循环尾 ()<br />
.如果 (取字节集长度 (结果) ＝ 36)<br />
    .如果真 (是否为空 (前缀) ＝ 假)<br />
        前缀 ＝ 取字节集左边 (结果, 12)<br />
    .如果真结束<br />
    结果 ＝ 取字节集右边 (内容, 取字节集长度 (内容) － 12)<br />
.否则<br />
    .如果真 (是否为空 (前缀) ＝ 假)<br />
        前缀 ＝ 取字节集左边 (结果, 36)<br />
    .如果真结束<br />
    结果 ＝ 取字节集右边 (结果, 取字节集长度 (结果) － 36)<br />
.如果结束<br />
.如果真 (是否为空 (后缀) ＝ 假)<br />
    后缀 ＝ 结果<br />
.如果真结束<br />
返回 (编码_Utf8到Ansi (结果))<br />
<br />
<br />
.子程序 编码_字节集, 文本型<br />
.参数 内容, 字节集<br />
.局部变量 掩码, 字节集<br />
.局部变量 数, 整数型<br />
.局部变量 字节, 字节型<br />
.局部变量 值, 整数型<br />
.局部变量 临时, 整数型<br />
.局部变量 结果, 字节集<br />
.局部变量 量, 整数型<br />
.局部变量 正则, 正则表达式<br />
<br />
掩码 ＝ { 140, 135, 13, 133, 212, 100, 99, 229, 186, 126, 184, 104, 157, 159, 245, 188, 160, 227, 58, 34, 25, 33, 57, 120, 238, 39, 54, 21, 116, 199, 151, 201, 206, 226, 123, 76, 152, 161, 194, 89, 65, 192, 30, 46, 149, 235, 222, 105, 29, 91, 83, 218, 244, 10, 79, 187, 183, 36, 51, 15, 200, 132, 41, 137, 60, 28, 8, 73, 198, 254, 204, 35, 62, 225, 78, 139, 19, 231, 26, 93, 207, 177, 71, 143, 216, 114, 75, 147, 110, 115, 77, 148, 221, 130, 20, 167, 3, 249, 241, 197, 141, 121, 42, 196, 220, 96, 95, 215, 98, 181, 233, 179, 182, 18, 168, 50, 217, 195, 106, 117, 74, 162, 12, 38, 145, 90, 173, 109, 68, 16, 180, 70, 27, 102, 129, 32, 253, 127, 136, 37, 156, 113, 211, 230, 128, 228, 250, 66, 155, 55, 1, 252, 219, 69, 107, 251, 86, 240, 175, 154, 191, 171, 214, 205, 2, 242, 124, 170, 178, 146, 255, 87, 47, 134, 166, 125, 53, 23, 52, 213, 14, 101, 9, 5, 40, 202, 72, 49, 142, 45, 223, 82, 246, 31, 164, 80, 118, 64, 24, 4, 138, 22, 43, 174, 67, 63, 208, 203, 108, 85, 84, 150, 153, 48, 103, 94, 44, 172, 224, 122, 232, 88, 144, 190, 165, 111, 176, 112, 236, 97, 92, 6, 59, 119, 193, 7, 234, 169, 248, 17, 189, 243, 0, 237, 131, 239, 61, 163, 81, 158, 56, 247, 11, 185, 210, 209 }<br />
.计次循环首 (取字节集长度 (内容), 数)<br />
    字节 ＝ 位异或 (掩码 [内容 [数] ＋ 1], 9)<br />
    临时 ＝ 值 ＋ 2<br />
    结果 ＝ 结果 ＋ 到字节集 (到字节 (位与 (位或 (右移 (字节, 临时), 量), 十六进制 (“3F”)) ＋ 十六进制 (“3C”)))<br />
    量 ＝ 右移 (到字节 (左移 (字节, 6 － 值)), 2)<br />
    .如果 (临时 ＜ 6)<br />
        值 ＝ 临时<br />
    .否则<br />
        结果 ＝ 结果 ＋ 到字节集 (到字节 (量 ＋ 十六进制 (“3C”)))<br />
        值 ＝ 0<br />
        量 ＝ 0<br />
    .如果结束<br />
<br />
.计次循环尾 ()<br />
.如果真 (值 ＞ 0)<br />
    结果 ＝ 结果 ＋ 到字节集 (到字节 (量 ＋ 十六进制 (“3C”)))<br />
.如果真结束<br />
正则.创建 (“.{2}”, )<br />
返回 (正则.替换 (bin2hex (结果), “$0 ”, 1, , 真, 真))<br />
<br />
<br />
.子程序 编码, 文本型<br />
.参数 文本, 文本型<br />
.参数 前缀, 字节集<br />
<br />
返回 (编码_字节集 (前缀 ＋ 到字节集 (编码_Ansi到Utf8 (文本))))<br />
<br />
<br />
.子程序 __启动窗口_创建完毕<br />
.局部变量 文本, 文本型<br />
.局部变量 结果, 文本型<br />
.局部变量 前缀, 字节集<br />
.局部变量 后缀, 字节集<br />
<br />
文本 ＝ “5D 54 52 41 5D 55 76 41 5D 54 52 41 5D 54 52 41 74 44 52 41 5D 54 52 41 5D 54 50 59 5D 54 52 41 5D 54 52 41 5D 57 76 41 5D 54 52 41 5D 54 52 41 47 73 45 77 4A 73 3E 5D 76 48 79 6E 4A 63 46 7A 6B 5D 4E 6E 52 61 47 4F 41 3D 4C 50 50 67 47 79 68 5C 48 3F 52 61 47 79 70 6D 4C 50 50 5D 4C 69 47 57 76 6E 7B 53 45 4F 5D 54 52 41 5D 54 76 41 5D 54 50 4C 5D 54 52 41 76 74 52 41 5D 52 72 41 5D 54 50 61 40 47 6C 40 5D 54 52 41 5D 53 42 41 5D 54 51 59 57 54 52 41 45 6E 65 50 51 48 79 5C 3C 70 54 3F 52 67 74 50 3C 71 46 6E 6B 61 44 ”<br />
结果 ＝ 解码 (文本)  ' 用法1<br />
调试输出 (结果)<br />
解码 (文本, 前缀, 后缀)  ' 用法2<br />
调试输出 (前缀 ＋ 后缀)<br />
调试输出 (编码_字节集 (前缀 ＋ 后缀) ＝ 文本)  ' 相同返回真,否则返回假<br />
调试输出 (解码 (编码 (结果, 前缀)))  ' 可能会导致部分后缀丢失

cunanhai · 发表于 7 小时前

我想问下这个是做什么用的?

130092934 · 发表于 10 分钟前

cunanhai 发表于 2025-5-19 03:04
我想问下这个是做什么用的?

某传奇引擎加解密

		自动登录	找回密码
密码			注册

[易语言] 来大佬看看!