请问下有无简单的数字加密

一C

就简单的混淆,请问下大佬们有木有方法~
比如  原:12345 加密:65153(动态) 还原: 12345   最好是动态(纯数子无英文,不要求强度,就纯简单数子加密)

时髦猪

  

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

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

调试输出 (加密 (“123456”))
调试输出 (解密 (“1270035”))  ' 123456
调试输出 (解密 (“1570815”))  ' 123456
调试输出 (解密 (“964935”))  ' 123456
调试输出 (解密 (“370935”))  ' 123456
调试输出 (加密 (“5574555”))
调试输出 (解密 (“16724232”))  ' 5574555
调试输出 (解密 (“13727232”))  ' 5574555

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

变量名	类 型	静态	数组	备 注
移位	整数型
原一位	文本型
新密码	文本型
i	整数型

置随机数种子 ()
移位 ＝ 取随机数 (1, 取文本长度 (原密码))
原一位 ＝ 取文本左边 (原密码, 1)
新密码 ＝ 文本替换 (原密码, 1, 1, 取文本中间 (原密码, 移位, 1))
新密码 ＝ 文本替换 (新密码, 移位, 1, 原一位)
新密码 ＝ 到文本 (到整数 (新密码) × 3 ＋ 567)
返回 (新密码)

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

变量名	类 型	静态	数组	备 注
临时解密密码	文本型
原一位	文本型
替换位	文本型
解密密码	文本型

临时解密密码 ＝ 到文本 ( (到整数 (加密密码) － 567) ÷ 3)
原一位 ＝ 取文本左边 (临时解密密码, 1)
替换位 ＝ 取文本中间 (临时解密密码, 到整数 (原一位), 1)
解密密码 ＝ 文本替换 (临时解密密码, 到整数 (原一位), 1, 原一位)
解密密码 ＝ 文本替换 (解密密码, 1, 1, 替换位)
返回 (解密密码)

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

.版本 2<br /> .支持库 spec<br /> <br /> .程序集 窗口程序集_启动窗口<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> 调试输出 (加密 (“123456”))<br /> 调试输出 (解密 (“1270035”))  ' 123456<br /> 调试输出 (解密 (“1570815”))  ' 123456<br /> 调试输出 (解密 (“964935”))  ' 123456<br /> 调试输出 (解密 (“370935”))  ' 123456<br /> 调试输出 (加密 (“5574555”))<br /> 调试输出 (解密 (“16724232”))  ' 5574555<br /> 调试输出 (解密 (“13727232”))  ' 5574555<br /> <br /> .子程序 加密, 文本型<br /> .参数 原密码, 文本型<br /> .局部变量 移位, 整数型<br /> .局部变量 原一位, 文本型<br /> .局部变量 新密码, 文本型<br /> .局部变量 i, 整数型<br /> <br /> 置随机数种子 ()<br /> 移位 ＝ 取随机数 (1, 取文本长度 (原密码))<br /> 原一位 ＝ 取文本左边 (原密码, 1)<br /> 新密码 ＝ 文本替换 (原密码, 1, 1, 取文本中间 (原密码, 移位, 1))<br /> 新密码 ＝ 文本替换 (新密码, 移位, 1, 原一位)<br /> 新密码 ＝ 到文本 (到整数 (新密码) × 3 ＋ 567)<br /> 返回 (新密码)<br /> <br /> .子程序 解密, 文本型<br /> .参数 加密密码, 文本型<br /> .局部变量 临时解密密码, 文本型<br /> .局部变量 原一位, 文本型<br /> .局部变量 替换位, 文本型<br /> .局部变量 解密密码, 文本型<br /> <br /> 临时解密密码 ＝ 到文本 ((到整数 (加密密码) － 567) ÷ 3)<br /> 原一位 ＝ 取文本左边 (临时解密密码, 1)<br /> 替换位 ＝ 取文本中间 (临时解密密码, 到整数 (原一位), 1)<br /> 解密密码 ＝ 文本替换 (临时解密密码, 到整数 (原一位), 1, 原一位)<br /> 解密密码 ＝ 文本替换 (解密密码, 1, 1, 替换位)<br /> 返回 (解密密码)

* Windows 10
* “370935”
* “123456”
* “123456”
* “123456”
* “123456”
* “16724232”
* “5574555”
* “5574555”
被调试易程序运行完毕

观音

来一波 加减乘除 再 反向还原 呗

一C

观音 发表于 2024-5-15 10:58
来一波 加减乘除 再 反向还原 呗

乘除容易小数点或单双情况 - -

q456

文本_加密(待加密文本,加密的密码)   。精易模块

zz1314

直接来一波md5然后只取其中的数字 然后再加减操作

fire9

自己写加密算法

观音

一C 发表于 2024-5-15 11:00
乘除容易小数点或单双情况 - -

肯定不能有小数啊  这是常规逻辑问题  要是有小数 就在最后一位 加上1位 判断是否需要进一 还是 不动  尽量不要用小数  数值保护再怎么也不安全 建议你使用 精易模块的 文本_加密_优化 命令

kdabiao

0-9 每个数字设置一个映射表，比如
101:0
502:0
311:1
312:1
454:2

这样的话
21可以表示为454311 或者是 454312
20可以表示为454502 或者是 454101


还原的时候按照映射表再还原一次就行

我的小拇指啊

折腾啥，一个异或就完事了