CAD快捷键本身修改是,只能针对现有命令,修改命令的调用名。
有没有一种方法,还能进一步实现命令的快速操作呢?
有!
那就是lisp代码!也就是我们经常说的插件。
改编mirror命令:
我们常用用mirror操作是,选择了镜像对象后,最后有个是否删除源对象的选择。这个选择我们通常都是默认保留源对象,那么,根据这个常用操作,我们就可以对mirror进行一点小小的改编,就是直接可以确认保留源对象。
编写lisp代码如下:
(defun c:mm()
(setq aa(ssget))
(setq pt1 (getpoint "\n镜像第一点"))
(setq pt2 (getpoint pt1 "\n镜像第二点"))
(command "mirror" aa "" pt1 pt2 "n")
(prin1)
)
命令行输入ap,加载应用程序。然后,命令行输入新定义命令名mm,选择对象,指定镜像第一点第二点,随即便可得镜像对象,且自动保留源对象。
改编dimedit命令:
命令行使用dimedit命令时,命令行会出现一个选项选择。如果想要直接跳过选择,默认o倾斜选项,也可以通过lisp代码实现。
编写lisp代码如下:
(defun c:ee()
(setq aa(ssget) )
(command "dimedit" "o" aa "")
(prin1)
)
将代码复制到空白txt记事本文件中,保存关闭,并修改文件名为ee.lsp。
