用易语言编码转换，对编码感兴趣的进

kdabiao

sos120 发表于 2019-9-27 21:53
，我也发现了，当我加密一个空文本的时候，它也会有着代码，这个函数的样子是这个样子的：
loadstring(( ...

不管除几 都是一样的原理, Demo.e (18.29 KB, 下载次数: 3)

2019-9-27 22:04 上传

点击文件名下载附件

sos120

kdabiao 发表于 2019-9-27 22:04
不管除几 都是一样的原理,

OK。谢谢大佬指点，解密我搞懂了，我下载了大佬的demo,这两个小时我做了个这个界面


源码奉上：

https://lanzoux.com/i6fzz2d

这样加减乘除就都可以破J了，但是这只是解密，回到我最初的问题是需要将已知文本“加密”，也就是编码，最常用的是加密功能，

由于我对这种运算完全小白，不知从何下手，还望大佬在我这源码的基础上帮忙写一写，如图，可以自定义加密方式和加密值，加密方式就是加减乘除，加密值就是我在编辑框4里面输入的数字

目前就用这种加密方式挺好的，我目前只需要保护小白乱改就行了，懂这个的肯定知道怎么破J，但不要紧，破J就破J吧，就当共享了。

sos120

kdabiao 发表于 2019-9-27 22:04
不管除几 都是一样的原理,

大佬加密能给写写吗？完全不会

sos120

@大司命，大佬只能靠你终结这个帖子了，加密他不写，我只能依靠你了大佬

sos120

@大司命 ，大佬只能靠你终结这个帖子了，加密他不写，我只能依靠你了大佬

sos120

@冯古屋 @聂小寻 @石榴熟了 有人愿意帮个忙吗

sos120

@小呀小百百 你有办法吗？

聂小寻

  

子程序名	返回值类型	公开	备 注
加密代码	文本型
参数名	类 型	参考	可空	数组	备 注
待加密数据	文本型

变量名	类 型	静态	数组	备 注
local_加密	快速文本对象
local_加密_数组	文本型		0
local_加密后代码	快速文本对象
local_i	整数型
数字a	整数型

数字a ＝ 到整数 (编辑框4.内容)
local_加密.置文本 (字节集_字节集转文本 (到字节集 (待加密数据)))
local_加密.删除字符 (1, 1)
local_加密.删除字符 (-1, 1)
local_加密_数组 ＝ local_加密.分割文本 (“,”, )
计次循环首 (取数组成员数 (local_加密_数组), local_i)
判断 (单选框5.选中 ＝ 真)
local_加密后代码.添加 (到文本 (到整数 (local_加密_数组 [local_i]) ＋ 数字a) ＋ “,”)
判断 (单选框6.选中 ＝ 真)
local_加密后代码.添加 (到文本 (到整数 (local_加密_数组 [local_i]) － 数字a) ＋ “,”)
判断 (单选框7.选中 ＝ 真)
local_加密后代码.添加 (到文本 (到整数 (local_加密_数组 [local_i]) × 数字a) ＋ “,”)
判断 (单选框8.选中 ＝ 真)
local_加密后代码.添加 (到文本 (到整数 (local_加密_数组 [local_i]) ÷ 数字a) ＋ “,”)
信息框 (“告诉我加密值”, 0, “加密失败”, )

计次循环尾 ()
local_加密后代码.删除字符 (-1, 1)
local_加密后代码.插入 (1, “{”)
local_加密后代码.添加 (“}”)
返回 (local_加密后代码.取文本 (, ))

i支持库列表	支持库注释
commobj	通用对象支持库

.版本 2<br /> .支持库 commobj<br /> <br /> .子程序 加密代码, 文本型<br /> .参数 待加密数据, 文本型<br /> .局部变量 local_加密, 快速文本对象<br /> .局部变量 local_加密_数组, 文本型, , "0"<br /> .局部变量 local_加密后代码, 快速文本对象<br /> .局部变量 local_i, 整数型<br /> .局部变量 数字a, 整数型<br /> <br /> <br /> 数字a ＝ 到整数 (编辑框4.内容)<br /> local_加密.置文本 (字节集_字节集转文本 (到字节集 (待加密数据)))<br /> local_加密.删除字符 (1, 1)<br /> local_加密.删除字符 (-1, 1)<br /> local_加密_数组 ＝ local_加密.分割文本 (“,”, )<br /> <br /> .计次循环首 (取数组成员数 (local_加密_数组), local_i)<br />     .判断开始 (单选框5.选中 ＝ 真)<br />         local_加密后代码.添加 (到文本 (到整数 (local_加密_数组 [local_i]) ＋ 数字a) ＋ “,”)<br />     .判断 (单选框6.选中 ＝ 真)<br />         local_加密后代码.添加 (到文本 (到整数 (local_加密_数组 [local_i]) － 数字a) ＋ “,”)<br />     .判断 (单选框7.选中 ＝ 真)<br />         local_加密后代码.添加 (到文本 (到整数 (local_加密_数组 [local_i]) × 数字a) ＋ “,”)<br />     .判断 (单选框8.选中 ＝ 真)<br />         local_加密后代码.添加 (到文本 (到整数 (local_加密_数组 [local_i]) ÷ 数字a) ＋ “,”)<br />     .默认<br />         信息框 (“告诉我加密值”, 0, “加密失败”, )<br />     .判断结束<br /> <br /> .计次循环尾 ()<br /> local_加密后代码.删除字符 (-1, 1)<br /> local_加密后代码.插入 (1, “{”)<br /> local_加密后代码.添加 (“}”)<br /> <br /> 返回 (local_加密后代码.取文本 (, ))

都解密了，加密还难吗。。。
防小白直接用加密数据()简单快捷

补充内容 (2019-9-29 00:07):
加密的时候用+，解密就要用-，嗯？

kdabiao

加解密.e (9.65 KB, 下载次数: 3)

2019-9-29 07:07 上传

点击文件名下载附件

sos120

kdabiao 发表于 2019-9-29 07:08

ds这个加解密我下载了，照搬后发现如果不用运算符加减乘除加密后放在罗技里可以用，但是用了运算符加减乘除后，放进罗技就失效了，不知道哪里不对
.版本 2
.支持库 iext2
.子程序 _按钮2_被单击
.局部变量 加密后的哟, 文本型
.局部变量 如何加密, 整数型

.如果 (超级编辑框1.内容 ≠ “”)
    加密后的哟 ＝ 加密代码 (超级编辑框1.内容)
    如何加密 ＝ 到整数 (编辑框4.内容)
    .判断开始 (单选框5.选中 ＝ 真)
        加密后的哟 ＝ “loadstring((function() local ___________________________________________________________________d =” ＋ 加密后的哟 ＋ “local ___________________________________________________________________t = ” ＋ #引号 ＋ #引号 ＋ “ for ___________________________________________________________________i = 1,#___________________________________________________________________d do   ___________________________________________________________________t = ___________________________________________________________________t..string.char(___________________________________________________________________d[___________________________________________________________________i]” ＋ “+” ＋ 到文本 (如何加密) ＋ “) end return ___________________________________________________________________t end)())()”
    .判断 (单选框6.选中 ＝ 真)
        加密后的哟 ＝ “loadstring((function() local ___________________________________________________________________d =” ＋ 加密后的哟 ＋ “local ___________________________________________________________________t = ” ＋ #引号 ＋ #引号 ＋ “ for ___________________________________________________________________i = 1,#___________________________________________________________________d do   ___________________________________________________________________t = ___________________________________________________________________t..string.char(___________________________________________________________________d[___________________________________________________________________i]” ＋ “-” ＋ 到文本 (如何加密) ＋ “) end return ___________________________________________________________________t end)())()”
    .判断 (单选框7.选中 ＝ 真)
        加密后的哟 ＝ “loadstring((function() local ___________________________________________________________________d =” ＋ 加密后的哟 ＋ “local ___________________________________________________________________t = ” ＋ #引号 ＋ #引号 ＋ “ for ___________________________________________________________________i = 1,#___________________________________________________________________d do   ___________________________________________________________________t = ___________________________________________________________________t..string.char(___________________________________________________________________d[___________________________________________________________________i]” ＋ “*” ＋ 到文本 (如何加密) ＋ “) end return ___________________________________________________________________t end)())()”
    .判断 (单选框8.选中 ＝ 真)
        加密后的哟 ＝ “loadstring((function() local ___________________________________________________________________d =” ＋ 加密后的哟 ＋ “local ___________________________________________________________________t = ” ＋ #引号 ＋ #引号 ＋ “ for ___________________________________________________________________i = 1,#___________________________________________________________________d do   ___________________________________________________________________t = ___________________________________________________________________t..string.char(___________________________________________________________________d[___________________________________________________________________i]” ＋ “/” ＋ 到文本 (如何加密) ＋ “) end return ___________________________________________________________________t end)())()”
    .默认
        加密后的哟 ＝ “loadstring((function() local ___________________________________________________________________d =” ＋ 加密后的哟 ＋ “local ___________________________________________________________________t = ” ＋ #引号 ＋ #引号 ＋ “ for ___________________________________________________________________i = 1,#___________________________________________________________________d do   ___________________________________________________________________t = ___________________________________________________________________t..string.char(___________________________________________________________________d[___________________________________________________________________i])end return ___________________________________________________________________t end)())()”
    .判断结束

    超级编辑框2.内容 ＝ 加密后的哟
.否则
    信息框 (“被加密的内容不能为空”, 0, “加密失败”, )