所有点都落在选定的平面上( if selection.count 0 then (messageBox 先选源物体并选好点; return false) local src selection[1] if subObjectLevel ! 1 then (messageBox 请按 1 进点层级选好点再运行; return false) local verts polyOp.getVertSelection src if verts.numberSet 0 then (messageBox 点层级里没选点; return false) -- 让你点选目标平面 local tgt pickObject prompt:请点选目标平面物体 if tgt undefined then (messageBox 取消了; return false) -- 确保目标是 poly if not (isKindOf tgt Editable_Poly) then convertToPoly tgt -- 取目标物体第1个面的法线和中心 local n polyOp.getFaceNormal tgt 1 local c polyOp.getFaceCenter tgt 1 -- 逐个点投影到平面上 for v in verts do ( local p polyOp.getVert src v local d dot (c - p) n polyOp.setVert src v (p n * d) ) redrawViews() messageBox 搞定选中的点已落平到目标平面上 )1、多边形状态下选中所有要对齐的点2、运行脚本选平面Ok以后可以编辑为一键执行的宏。