飞诗Lisp格式化混淆工具 永久免费

highflybird

cghdy 发表于 2025-3-14 08:57
试试高版本的CAD，或者VS，老版的编辑器的确不行

高版本的照旧。---可见这个是屎山代码。
只能用vscode之类的做格式化了。

cghdy

highflybird 发表于 2025-3-14 09:34
高版本的照旧。---可见这个是屎山代码。
只能用vscode之类的做格式化了。

我的常用版本，CAD2024就非常快，而且我觉得比vscode格式要好些。

ynkmm

老大，飞诗CAD程序管理大一统给更新呢1谢谢！

thriving

不需要这么麻烦把，自己的程序写的乱一点，就是破解了也一头雾水不是

highflybird

cghdy 发表于 2025-3-14 13:40
我的常用版本，CAD2024就非常快，而且我觉得比vscode格式要好些。

你试过1万行上的代码吗？根本就没办法格式化，我用的是autocad 2024的lisp编辑器。

highflybird

甚至都不需要上万行代码，lisp自带的编辑器就对这种类型的lisp文件处理起来相当慢。



下面是如何生成这类型lisp文件的代码：

1. (defun c:tt()
   
2.   (setq f (open "d:\\temp\\test1.lsp" "w"))
   
3.   (repeat 1000  
   
4.     (princ "(defun test() (princ (1+ 2))" f)
   
5.     (repeat 100
   
6.       (princ "(princ (1+ 2))" f)
   
7.     )
   
8.     (princ "(princ (1+ 2)))\n" f)
   
9.   )
   
10.   (close f)
    
11.   (princ)
    
12. )

(defun c:tt()<br />   (setq f (open "d:\\temp\\test1.lsp" "w"))<br />   (repeat 1000  <br />     (princ "(defun test() (princ (1+ 2))" f)<br />     (repeat 100<br />       (princ "(princ (1+ 2))" f)<br />     )<br />     (princ "(princ (1+ 2)))\n" f)<br />   )<br />   (close f)<br />   (princ)<br /> )

ynhh

我试了一下，感觉只是函数名改乱了一下，主要功能还是格式化吧。
猫老师的是函数内容都混淆变得不可读了的，感觉本质还是不一样吧
格式化并去注释的确方便快捷

谢谢您

cghdy

highflybird 发表于 2025-3-14 17:42
你试过1万行上的代码吗？根本就没办法格式化，我用的是autocad 2024的lisp编辑器。

还没试过1万以上的，几千行的效果还行。看来CAD的编辑器是比较弱。

baitang36

highflybird 发表于 2025-3-14 09:34
高版本的照旧。---可见这个是屎山代码。
只能用vscode之类的做格式化了。

格式化是给人看的，满足处女座的整齐爱好。
如果是看反编译生成的代码，不格式化看起来条理更清楚，每个函数占一行。

yandong28

飞诗编辑器要更新了么？