[讨论]：如何设置搬移时以中心点为搬移

啵浪鼓

osnap里只有int,end,mid,cen,per,qua,nea,non...等,没有找物体的中心点为捕捉点的啊(比如矩形,多义线,ellipse等的中心点)

xyp1964

[php]
;;;加载通用函数
;;;下载：http://www.xdcad.net/forum/showthread.php?s=&threadid=325268
(load "xyp_lib")

(defun c:test()
  (cmdla0)
  (command ".undo" "BE")
  (zxd)
  (setq ss (ssget))
  (command"move" ss "" #pt)
  (command ".undo" "E")
  (cmdla1)
  )
[/php]

ljpnb

最初由 啵浪鼓 发布
[B]osnap里只有int,end,mid,cen,per,qua,nea,non...等,没有找物体的中心点为捕捉点的啊(比如矩形,多义线,ellipse等的中心点) [/B]

首先椭圆的中心点不能用cen来捕捉吗？
2。多义线的中心点指得是什么，是中点还是质心点
3。矩形的中心点你所指得可能是质心点，就是两对角线的交点，这个点也可以用CAD自带的捕捉功能捕捉到啊。。。。。

xyp1964

最初由 ljpnb 发布
[B]
首先椭圆的中心点不能用cen来捕捉吗？... [/B]

矩形的中心点（就是两对角线的交点），如何用CAD自带的捕捉功能捕捉到？

ljpnb

看下面的示意图

啵浪鼓

楼上ljpnb 的朋友果然厉害,一个flash就弄出来我想说的

但上面这个CAD自带的跟踪器我一般都关闭着的,打开它时常常会找到不必要的捕捉点,特别是线段特别多的时候...

我想要的是建一个lisp小程序来设置这个捕捉点,我曾见有人用lisp写了一个,可惜没有源程序,有高手写一个这样的小程序吗?

啵浪鼓

ljpnb,就是你贴的图思路,只是我想用程序来实现,而不是用cad来实现