[求助]文字变反了,怎么办?

zxyzch

在使用AutoCAD绘制建筑图平面图时,画好一个单元之后,便可采用MIRROR命令将其它的单元画好,但是有一个问题:原来用TEXT或MTEXT命令绘制出来的文字镜像之后全都变反了,怎么办?

陈伯雄

[此贴子已经被陈伯雄于2002-5-8 20:18:21编辑过]

zxyzch

不过使用MIRRTEXT命令好象只能控制该命令之后的操作吧，假设没有使用MIRRTEXT命令而直接使用了MIRROR命令，要怎么把已经变反了的文字调整过来呢？

guang9367

2楼的问题：再接着使用mirror一下就行

3楼的问题：在mirror之前，先输入mirrtext命令，将变量值由1改为0，就可以了。

phoenixdjq

如果是以前就反了,那你在反一遍不就可以了吗?

xgr

正好以前编过这个代码，试试。

;;修改镜像倒置的文字
(defun c:xgjxwz (/ ent e1 e2)
  (setq ent (ssget "x"
     '(
       (0 . "text")
       (-4 . "<or")
       (71 . 2)
       (71 . 4)
       (-4 . "or>")
      )
     )
  )
  (if (= ent nil)
    (progn (alert "图形中没有发现镜向后倒置的文字, 程序退出!")
    (exit)
    )
  )
  (setq n (+ (sslength ent) 1))
  (while (ssname ent 0)
    (setq e1 (ssname ent 0))
    (setq e2 (entget e1))
    (setq e2 (subst '(71 . 0) (assoc 71 e2) e2))
    (entmod e2)
    (entupd e1)
    (setq ent (ssdel e1 ent))
  )
  (alert (strcat "共处理" (itoa n) "处文字"))
  (princ)
)