加密问题

p鹏程万里

对于一个网址加密https://bbs.125.la，比如对这个加密后加密为类似这样的786464602A3F3F6767673E27227C7C3E737E3F79742223221D1A

逍遥一仙LSG

  

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

变量名	类 型	静态	数组	备 注
a	文本型
a1	文本型		0
i
sc	文本型

' 这里是加密
sc ＝ “”
a ＝ “https://bbs.125.la”
文本_逐字分割 (a, a1)
计次循环首 (取数组成员数 (a1), i)
sc ＝ sc ＋ 进制_十到十六 (位异或 (取代码 (a1 [i], ), 16))
计次循环尾 ()
调试输出 (sc)
子程序1 ()

子程序名	返回值类型	公开	备 注
子程序1

变量名	类 型	静态	数组	备 注
a	文本型
b	字节集
i
输出	文本型

' 这里是解密
a ＝ “786464602A3F3F6767673E27227C7C3E737E3F79742223221D1A”
b ＝ 字节集_还原 (a)
输出 ＝ “”
计次循环首 (字节集_取长度 (b), i)
输出 ＝ 输出 ＋ 字符 (位异或 (字节集_到整数 (字节集_取中间 (b, i, 1), 1), 16))
计次循环尾 ()
调试输出 (输出)

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

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 __启动窗口_创建完毕<br /> .局部变量 a, 文本型<br /> .局部变量 a1, 文本型, , "0"<br /> .局部变量 i<br /> .局部变量 sc, 文本型<br /> <br /> ' 这里是加密<br /> sc ＝ “”<br /> a ＝ “https://bbs.125.la”<br /> 文本_逐字分割 (a, a1)<br /> .计次循环首 (取数组成员数 (a1), i)<br />     sc ＝ sc ＋ 进制_十到十六 (位异或 (取代码 (a1 <i>, ), 16))<br /> .计次循环尾 ()<br /> 调试输出 (sc)<br /> 子程序1 ()<br /> <br /> .子程序 子程序1<br /> .局部变量 a, 文本型<br /> .局部变量 b, 字节集<br /> .局部变量 i<br /> .局部变量 输出, 文本型<br /> <br /> ' 这里是解密<br /> a ＝ “786464602A3F3F6767673E27227C7C3E737E3F79742223221D1A”<br /> b ＝ 字节集_还原 (a)<br /> 输出 ＝ “”<br /> .计次循环首 (字节集_取长度 (b), i)<br />     输出 ＝ 输出 ＋ 字符 (位异或 (字节集_到整数 (字节集_取中间 (b, i, 1), 1), 16))<br /> .计次循环尾 ()<br /> 调试输出 (输出)

补充内容 (2018-4-20 12:16):
* “78646460632A3F3F7272633E2122253E7C71”
* “http://www.72ll.cn/id232
”

纯情小黄牛

看不懂楼主要问什么~

第三代蜘蛛侠

看着像16进制文本

p鹏程万里

纯情小黄牛 发表于 2018-4-20 11:56
看不懂楼主要问什么~

抱歉啊，没说清楚！
通过什么加密可以将一个网址加密成像（786464602A3F3F6767673E27227C7C3E737E3F79742223221D1A
）这样的

杜子鳄

精益模块不是有个文本_加密（），文本解密（）吗？

p鹏程万里

cyp777777 发表于 2018-4-20 12:15
[e=1].版本 2
.支持库 spec

麻烦问下   字节集——还原这是调用的那个模块

补充内容 (2018-4-20 16:22):
老哥，你用的那个版本的精易模块？
v6.3和v5.81都不行啊，运行你的代码老出错

逍遥一仙LSG

p鹏程万里 发表于 2018-4-20 12:26
麻烦问下   字节集——还原这是调用的那个模块

精易模块。。。。。

逍遥一仙LSG

p鹏程万里 发表于 2018-4-20 12:26
麻烦问下   字节集——还原这是调用的那个模块

结帖吧老哥