[求助]如何在entsel用nearest

caravaggio

请问如何可以在用(entsel)的时候运用"nearest"呢？

谢谢

ljpnb

entsel 这个函数返回值为选中的物体图元名和一个坐标点，所以要取得"nearest" 点，可以这样写 (setq ent0 (entsel "\n选择物体:"))
(setq ent (car ent0)
point (osnap (cadr ent0) "nea")
)