[原创]超级纯lisp语言编的加密md5 sha1 sha256 base64...程序，放源码

caaooo · 发表于 2022-10-12 15:31:43

本帖最后由 caaooo 于 2022-10-12 15:35 编辑

baitang36 发表于 2022-10-12 14:14
在中望2023下试验，确实用不了。

命令: _appload

赖皮啊，反编译我的代码
哈哈

其实我自己发现还有小bug
为什么要改1才能在中望下用？
中望cad我没用过，没有研究过

caaooo · 发表于 2022-10-12 15:54:00

本帖最后由 caaooo 于 2022-10-12 16:02 编辑

baitang36 发表于 2022-10-12 14:14
在中望2023下试验，确实用不了。

命令: _appload

大概理解了一下
估计中望cad和一些国产cad中对 t 这个参数的认知不同
标准cad中 t = ture ，国产cad中 t 如果未定义可能被认为是false 或者nil
所以应该用统一代码 1 来代表ture
对了吧？

guosheyang · 发表于 2022-10-12 16:11:21

感谢楼主共享！

小菜123 · 发表于 2022-10-12 16:36:19

调用外部程序不能称为加密吧，外部程序改一下，可以返回任何需要的值

caaooo · 发表于 2022-10-12 17:02:30

小菜123 发表于 2022-10-12 16:36
调用外部程序不能称为加密吧，外部程序改一下，可以返回任何需要的值

这个所谓的外部的程序是windows自带的内部程序，其实就等价于cad的程序
借用一位大佬的说法，是windows造好的轮子，没必要自己造轮子
直接拿来用，不仅方便而且很快
再说了，windows的程序哪是说改就能改的？

caoliu023 · 发表于 2022-10-12 18:34:50

建议增加判断临时文件是否存在，避免文件生成迟钝，导致读取不了
(while(not(vl-file-size 临时文件)))

cchessbd · 发表于 2022-10-12 20:18:19

大牛现身了啊！可惜没币下不了了。。。

caaooo · 发表于 2022-10-12 21:49:37

本帖最后由 caaooo 于 2022-10-12 21:58 编辑

caoliu023 发表于 2022-10-12 18:34
建议增加判断临时文件是否存在，避免文件生成迟钝，导致读取不了
(while(not(vl-file-size 临时文件)))

暂时还没发现这个问题，为了程序简单，暂时先不改了吧
你有这个现象么？
又出现个会反编译的大佬

caaooo · 发表于 2022-10-12 21:52:41

这个程序目前还有一个bug

caaooo · 发表于 2022-10-12 21:56:08

caaooo 发表于 2022-10-12 21:52
这个程序目前还有一个bug

当字符串前有空格，会忽略掉
另外，单字符串 0到9 也有问题
引申成为当字符串最后一位为0到9，前一位为空格的话，也出现问题
我正在考虑如何解决

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

[经验] [原创]超级纯lisp语言编的加密md5 sha1 sha256 base64...程序，放源码