.... 是的 您好，
我必须试试！
李，这是在选择了4个街区之后发生的事情：
Command: mm3
Select objects: 1 found
Select objects: 1 found, 2 total
Select objects: 1 found, 3 total
Select objects: 1 found, 4 total
Select objects:
Select First Point:
Select Second Point: ; error: too few arguments
所以这似乎不起作用。。。也许我可以自己解决它，但如果有一件事我最近学到的是，我是一个新手位。
这个问题的答案。。。
我可以想象为什么有人会问我这样做的目的是什么。正如李所说：
是的，这就是我想做的。
在我的日常工作中，我们主要在家里安装管道/电气设备等。
在大多数项目中，有几种类型的房子，比如小房子、大房子、中间的房子、角落里的房子。还有镜像的。如果我将普通房屋的街区镜像到镜像房屋，那么我的所有街区都是镜像的。要遵循NEN/ISO等标准，必须将其反映出来。
因此我需要它。
你的权利，但不要告诉 抱歉，我弄乱了代码的顺序，在匆忙中搞砸了
(defun c:mm3 (/ i ss pt1 pt2 ent ss obj Mi Ma cen tmp)
(vl-load-com)
(if (and (setq i -1 ss (ssget "_:L" '((0 . "INSERT"))))
(setq pt1 (getpoint "\nSelect First Point: "))
(setq pt2 (getpoint pt1 "\nSelect Second Point: ")))
(while (setq ent (ssname ss (setq i (1+ i))))
(setq tmp (vla-mirror (vlax-ename->vla-object ent)
(vlax-3D-point pt1) (vlax-3D-point pt2)))
(vla-getBoundingBox tmp 'Mi 'Ma)
(setq ptlst (mapcar (function vlax-safearray->list) (list Mi Ma))
cen (polar (car ptlst) (apply (function angle) ptLst)
(/ (apply (function distance) ptlst) 2.)))
(vla-mirror tmp (vlax-3D-point cen) (vlax-3D-point (polar cen (/ pi 2.) 1.)))
(vla-delete tmp)))
(princ))
李，看这些图片，你能跟我来吗？
我的意思是，代码很棒，但不是100%。
为什么要镜像？
参见代码
；；mirror_块。lsp（defun C:MIRB（/）（提示“\n\t\t>>>\t选择镜像行\t>>”）（if（setq lset（ssget:S“（（0。“行”）））（progn（setq ln（ssname lset 0）elist（entget ln）sp（cdr（assoc 10 elist））ep（cdr（assoc 11 elist））（提示“\n\t\t>>\t选择要镜像的块”（setq bset（list（cons 0“INSERT”）））（同时（setq en（ssname bset 0））（setq elist（entget en）ipt（cdr（assoc 10 elist））lnpt（vlax curve GetClosestPoint to ln ipt）ang（angle ipt lnpt）dist（distance ipt lnpt）movept（polar lnpt ang dist））（命令“.u copy“en”“”\u non“ipt”\u non“movept”（ssdel en bset）））（princ））（提示“\n\t\t>>\t键入MIRB或MIRB以运行…\t 是的，这是我在这里的方法
没有看到您的代码-它只是逻辑上的
~'J'~ （我妻子在我的键盘空格键上洒了一大杯可口可乐，N很粘-请原谅拼写错误）
大家好，
我已经测试了所有代码，但有一个问题。
从Fixo提供的代码来看：我喜欢它的工作方式。
首先选择镜像线，然后选择块。
然后，它像镜子一样反射，但不是全部。
请参见图。
请修复-o.：眨眼：
镜像线也可以是外部参照吗？
文本呢？它不会这样做，这可能吗？
将首先购买nw keybord。
（那些白色的细线是插入点）
页:
1
[2]