易语言异或解密安卓QQ聊天记录代码段
引用:精易模块
.版本 2
.子程序 聊天记录解密, 文本型
.参数 参_密文数据, 字节集
.参数 参_密匙, 字节集, , 15位 IMEI
.参数 参_UTF8, 逻辑型, 可空, UTF8转Ansi
.局部变量 局_密文数据长度, 整数型
.局部变量 局_密匙长度, 整数型
.局部变量 局_明文数据, 字节型, , "0"
.局部变量 局_计次, 整数型
局_密文数据长度 = 取字节集长度 (参_密文数据)
局_密匙长度 = 取字节集长度 (参_密匙)
.如果真 (局_密文数据长度 > 局_密匙长度)
局_密匙长度 = 局_密文数据长度 ÷ 局_密匙长度 + 1
参_密匙 = 取重复字节集 (局_密匙长度, 参_密匙)
.如果真结束
.计次循环首 (局_密文数据长度, 局_计次)
加入成员 (局_明文数据, 位异或 (参_密文数据 [局_计次], 参_密匙 [局_计次]))
.计次循环尾 ()
.如果真 (参_UTF8)
返回 (编码_Utf8到Ansi (到字节集 (局_明文数据)))
.如果真结束
返回 (到文本 (局_明文数据))
网友评论