Autolisp功能菜单
我想分享我在Swamp中找到的代码。组织请求:您好,有没有可能像pedit命令那样进入lisp菜单?请参阅atach。
回答:是的[…]成功了吗
(initget "Left Right Up Down Sideways Insideout Forwatd Backwards")
(setq direction
(getkword
"\nElbow direction <Right>: "
)
)
显示提示
您将需要
DYNMODE变量设置为1、2或3
和
DYNPROMP变量设置为1
哦,看起来很熟悉。
页:
[1]