woodman78 发表于 2022-7-6 12:28:42

通过lisp填充

我正在设置lisp以运行hatch命令。我希望它允许我选择对象，而不是通过内部点。我使用的lisp可以工作，但我在命令行中得到错误**函数已取消**。
 
有人能帮忙吗？？？
 
谢谢

Lee Mac 发表于 2022-7-6 12:41:12

你能把代码贴出来让我们看看发生了什么吗？或者至少是代码的阴影部分？

rkmcswain 发表于 2022-7-6 12:46:14

试试这个。。。
 

(setq ent (entsel))
(command "._hatch" "_P" "ANSI31" (getvar "dimscale") "0.0" "_S" ent "")
(princ)

woodman78 发表于 2022-7-6 13:01:41

对不起，我的错。我本想发代码的。
 

(defun c:Excav10( / cla)
(command "_.-layer" "_N" "CCC_LAYOUT_Proposed_Footpath_Hatch" "_M" "CCC_LAYOUT_Proposed_Footpath_Hatch" "_C" "_T" "0,179,179" "CCC_LAYOUT_Proposed_Footpath_Hatch""" )
(command "_-color""bylayer")

;(setvar "cmdecho" 0)
;(command "hpgaptol" 0.5)
;(command "HPNAME" "solid")
;(graphscr)
(command "-hatch" "s" "pause" "")
(setvar "cmdecho" 1)
(princ)
)

Lee Mac 发表于 2022-7-6 13:04:53

将暂停从引号中去掉

woodman78 发表于 2022-7-6 13:19:38

当我这样做的时候，李-麦克我回到了命令行，什么都没有发生。

Lee Mac 发表于 2022-7-6 13:27:06

暂停是暂停用户输入。

woodman78 发表于 2022-7-6 13:34:41

R K Mcswain的建议成功了。
 
谢谢
页: [1]
查看完整版本: 通过lisp填充