帮我看看“mirror”命令吧，谢谢

renaguo

我想镜像这个矩形，程序却却没反映，为什么？ (defun c:mirr()
(setvar "cmdecho" 0)
(setvar "blipmode" 0)
(setvar "osmode" 0)
(setq pa (getpoint "输入左下角点："))
(setq ww (getreal "宽度h:"))
(setq hh (getreal "高度："))
(setq pb (polar pa 0 ww))
(setq pc (polar pb (/ pi 2) hh))
(setq pd (polar pc pi ww))
(command "pline" pa pb pc pd "c") (prin1)
(setq mp1 (polar pa 0 (/ ww 2)))
(setq mp3 (polar pd 0 (/ ww 2)))
(setq mp2 (polar pb (/ pi 2) (/ hh 2)))
(setq mp4 (polar pa (/ pi 2) (/ hh 2)))
(command "line" mp1 mp3 "") (prin1)
(command "line" mp2 mp4 "") (prin1)

(command "mirror" (ssget) "" '(0 0) '(0 (- 360)) "")
(prin1) )

alin

'(0 (- 360)) is wrong here


(list 0 (- 360)) to be used