Tharwat 发表于 2022-7-5 20:58:30

对不起,有一个变量没有本地化,这是最重要的一个。
 
更换该部分或添加变量(l),如下所示。
 

(defun c:test (/ ss s f o ex x l )

vernonlee 发表于 2022-7-5 21:04:07

谢谢塔瓦。
 
现在它工作正常。
 
我只是想澄清一下:-
 
1) lisp代码的哪一部分包括TXT文件的第一行?(看着代码我想不出来)
 
2) 它将查找多少行有限制吗?
 
谢谢
 
 
 

Tharwat 发表于 2022-7-5 21:07:41

 
我修改了程序,你可以从这里跳到它
 
 
没有限制,它是开放的。

vernonlee 发表于 2022-7-5 21:10:43

嗨,塔瓦,
 
修改后的lisp仍然不会从TXT的第一行选择标记。
 

Tharwat 发表于 2022-7-5 21:15:45

我用我之前附带的txt文件尝试了该程序,它按预期工作,但如果您使用的是另一个图形或另一个txt文件,这是一件我无法判断的事情。

vernonlee 发表于 2022-7-5 21:16:24

嗨,塔尔瓦特。
 
我用了同一幅画。TXT文件也与您上传的相同。
 
我只是删除了第一行“这是与图纸相符的门标签”&“1-1”成为第一行。但是当我运行它时,图纸上的1-1没有被选中。
 
 
 

Tharwat 发表于 2022-7-5 21:20:27

 
如果是这样,只需从程序中删除以下部分。
 
(read-line o)

vernonlee 发表于 2022-7-5 21:23:22

 
 
太棒了这就成功了。
 
谢谢兄弟。
页: 1 [2]
查看完整版本: 帮助:建议如何提高照明