求各位高手帮忙修改一下CAD原生镜像命令
求各位高手帮忙修改一下CAD原生镜像命令我们厂里是机加工行业经常要核对别人的零件是不是对称的经常要镜像一下 对比一下是不是对称
CAD原生命令 输入mi后要选择图元 指定一个2个点并且要打开正交开关。非常麻烦。
现再希望高手们就稍微修改下原生命令输入命令后 1自动打开正交开关 2选择要镜像的图元3然后输入一个点 4选的图元根据这个点跟y轴 镜像 ，5自动删除图元否 。 （命令不考虑图层颜色文字是否镜像）(原生命令基本不用动由于本人lisp水平很差 大概知道好像是在输入第一个点 后可以输入一个轴的矢量什么的估计是@y 或者是.y )
拜托各位了。
ninja37 发表于 2020-11-23 09:20
这位小兄弟 ，程序很好用 能不能稍微改进一下 数入镜像点后不要问要不要删除原来的图N 直接默 ...
最后一步改为N就好了
(command "ortho" "on""MIRROR" (ssget) "" "non" (setq p (getpoint "\n选取镜像点：")) "non" (polar p (* 1.5 pi) 1) “n") (command "ortho" "on""MIRROR" (ssget) "" "non" (setq p (getpoint "\n选取镜像点：")) "non" (polar p (* 1.5 pi) 1) pause) start4444 发表于 2020-11-22 22:40
(command "ortho" "on""MIRROR" (ssget) "" "non" (setq p (getpoint "\n选取镜像点：")) "non" (polar p ...
这位小兄弟 ，程序很好用 能不能稍微改进一下 数入镜像点后不要问要不要删除原来的图N 直接默认N就好了 我们厂里一般不删除原来的图两个图好做对比 start4444 发表于 2020-11-23 10:22
最后一步改为N就好了
(command "ortho" "on""MIRROR" (ssget) "" "non" (setq p (getpoint "\n选取镜 ...
好的已经改好了谢谢了还有一点小麻烦原本移位自己可以修改一下改成另外一个命令 绕X轴镜像看了一下 脑瓜子跟不上啊不会改麻烦你告诉我一下怎么由Y轴 变成x轴，拜托了。 请不要在本站重复发布信息。这是什么操作
(command "ortho" "on""MIRROR" (ssget) "" "non" (setq p (getpoint "\n选取镜像点：")) "non" (polar p 0 1) “n") start4444 发表于 2020-11-23 12:03
请不要在本站重复发布信息。这是什么操作
(command "ortho" "on""MIRROR" (ssget) "" "non" ( ...
好的试了很好用。谢谢了
页:
[1]