镜像并重复帮助。。。
大家好:我想改进一下这个动作,你能帮我吗?
这很简单
我试图选择一些对象来制作镜像并删除它们
但我搜索了一次选定的对象和对称轴的两个点
使用enter键,您将在原始对象及其镜像之间切换
我做的这个例程可以做到这一点,但当我需要看到它时,它不会显示轴
(定义C:| f(/ss pt1 pt2)
(setq ss(ssget))
(setq pt1(getpoint))
(setq pt2(getpoint))
(grdraw pt1 pt2-1 1)
(重复100次
(setq gira(getreal“\n镜像:”)
(if(等于gira nil)(setq gira 1))
(如果(=gira 1)
(命令“_mirror”ss“pt1 pt2”y”)
(命令“_regenall”)
)
);重复
(普林斯)
) (setq pt2 (getpoint))
change
(setq pt2 (getpoint p1)) 太好了谢谢
页:
[1]