Autolisp功能菜单

asos2000 · 发表于 2022-7-6 11:38:09

我想分享我在Swamp中找到的代码。组织

请求：您好，有没有可能像pedit命令那样进入lisp菜单？请参阅atach。

回答：是的[…]成功了吗


(initget "Left Right Up Down Sideways Insideout Forwatd Backwards")
 (setq direction
        (getkword
          "\nElbow direction [Left/Right/Up/Down/Sideways/Insideout/Forward/Backwards ] <Right>: "
        )
 )

显示提示
您将需要
DYNMODE变量设置为1、2或3
和
DYNPROMP变量设置为1

Kerry Brown · 发表于 2022-7-6 12:49:13

哦，看起来很熟悉。

[编程交流] Autolisp功能菜单

发表回复

精选推荐