Manila Wolf 发表于 2022-7-5 22:13:46

Solprof自动Lisp-逗号

我有一个lisp(附件),可以自动执行Solprof过程。
这有点麻烦,但它很有效,并提供了一个非常好的结果。
 
在运行时,它会弹出以下行:-
 
未知命令“S”。按F1键获取帮助。
未知命令“BYLAYER”。按F1键获取帮助。
未知命令“SOLP”。按F1键获取帮助。
未知命令“SOLP”。按F1键获取帮助。
 
这似乎不会影响最终结果。
我自己不是一个能干的lisp作者,所以我只是想知道是否有人能解释为什么要创建这些行文本。
Solp。lsp

hanhphuc 发表于 2022-7-5 22:32:11

 
可能需要在命令内删除一些(不是全部)额外的空格“”。
ie:(命令“bla”“bla”…)
 
另一个建议是,一些命令可以用函数(例如:entmake entity)或vla方法代替
0.02年款

BIGAL 发表于 2022-7-5 22:52:48

检查这段代码
 

"-LAYER" "S" "0" ""
"-COLOR" "BYLAYER"

I would do as layer set col for layer 0 bylayer line type by layer

"-LAYER" "S" "0" "C" "0" "bylayer" "ltype" "0" "bylayer" ""

Manila Wolf 发表于 2022-7-5 23:12:48

hanphuc,
谢谢你建议删除一些双引号。
我确实找到了三个可以删除双引号的例子。然而,这并没有阻止同一系列“未知命令”出现在命令行上。
 
比加尔,
谢谢你的代码建议。
我尝试了重新排列的代码,但它停止了。
在暂停的时候,我收到了一张便条“New color:”没有BYLAYER选项?

Manila Wolf 发表于 2022-7-5 23:26:00

hanhphuc和Bigal,
 
根据你的建议和进一步的尝试和错误,我以某种方式修复了异常。
非常感谢你的帮助。
Solp2.lsp
页: [1]
查看完整版本: Solprof自动Lisp-逗号