帮助创建此lisp

asos2000 · 发表于 2022-7-6 06:17:31

我想知道是否有人可以帮我编写这个lisp

在附件中，我想偏移柱脚线（绿色柱脚线）2次，然后在第二个柱脚线（隐藏柱脚线）中，使用称为123的块测量每个150mm，并将块插入每个顶点

谢谢

neophoible · 发表于 2022-7-6 06:54:22

我相信有人可以帮你编码，但你能先把你已经有的东西贴出来，然后再提问吗？

asos2000 · 发表于 2022-7-6 07:19:07

这是我糟糕的开始

(defun c:rfts (/)
 (setq intP (getpoint "/nPick internal point"))
 (setq ost1 50)
 (setq ost2 40)
 (command "_.-boundary" "_A" "_I" "_N" "" "_O" "_P" "" "_non" intP "")
 (setq obj1 (entlast))
 (command "_offset" ost1 obj1 intP)
 (setq obj2 (entlast))
 (command "_offset" ost2 obj2 intP)
 ;(command "_erase" obj1)
 )

[编程交流] 帮助创建此lisp

发表回复

精选推荐