周站长CAD VIP私教班

怎么用lisp代码,改良现有CAD命令?

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) )
将代码复制到空白txt记事本文件中,保存关闭,并修改文件名为mm.lsp。

命令行输入ap,加载应用程序。然后,命令行输入新定义命令名mm,选择对象,指定镜像第一点第二点,随即便可得镜像对象,且自动保留源对象。

改编dimedit命令:

命令行使用dimedit命令时,命令行会出现一个选项选择。如果想要直接跳过选择,默认o倾斜选项,也可以通过lisp代码实现。

编写lisp代码如下:

(defun c:ee()  
(setq aa(ssget) ) 
 (command "dimedit" "o" aa "")
  (prin1)  )

将代码复制到空白txt记事本文件中,保存关闭,并修改文件名为ee.lsp。

命令行输入ap,加载应用程序。然后,命令行输入新定义命令名ee,选择对象,即可直接编辑。无需进行倾斜o选择。
如果CAD本身就能实现的操作,不建议再另行编程简化。反而会增加运行内存。
完。

给TA打赏
共{{data.count}}人
人已打赏
AutoCAD教程常见问题

CAD图纸卡顿?内存过大?一动不动?怎么办?

2024-3-25 22:43:59

AutoCAD教程常见问题

CAD怎么自定义坐标系?

2024-3-28 20:11:06

0 条回复 A文章作者 M管理员
    暂无讨论,说说你的看法吧
个人中心
购物车
优惠劵
今日签到
有新私信 私信列表
搜索