曲面间的帮助体积
嘿，伙计们，我试着做一个lisp来自动完成一系列的步骤，来计算两个表面之间的体积。这些曲面是从TriangV0.6.7 lisp生成的，它们的外部边界是在XSHAPE命令的帮助下生成的，x shape命令也是同一lisp的一部分。
我附上了一个文件，其中显示了我获得这样一个卷的步骤。我还附上了我能够自动化的东西，但它仍然缺少很多，老实说，这是我对lisp的所有理解。
如果您能帮我完全自动化，我将不胜感激。
(defun C:volumen( / upsurf lowsurf upborder lowborder)
(PROMPT "UPPER SURFACE")
(setq upsurf (ssget))
(PROMPT "LOWER SURFACE")
(setq lowsurf (ssget))
(setq upborder (entsel "\nUpper surface border: "))
(setq lowborder (entsel "\nLower surface border: "))
(command "_copy" upsurf "" "_D" "0,0,-500")
(command "_copy" lowsurf "" "_D" "0,0,500")
(command "_move" upborder lowborder "" "_D" "0,0,-1000")
(command "_extrude" "_MO" "_SU" upborder lowborder "" "2000")
(command "_selectsimilar" upsurf "") ; (I can't use another command after selecting here)
(princ)
)
**** Hidden Message ***** 我还没有检查DWG，但我相信你可以尝试转换3DFACE实体 - 如果从Triang * .lsp到REGION实体，然后仅使用UNION命令创建联合曲面...然后使用SURFACE实体，您可以尝试SURFSCULPT或类似的...对于上/下边界，我不知道，因为我没有CAD在这台笔记本电脑上检查...也许你没有SURFSCULPT，但如果你需要计算，你可以通过数学来做到这一点......当然可以，但是如果您需要视觉确认，那么EXTRUDE也是做到这一点的方法......有几种方法 ：从每个3DFACE创建简单的平面三角形;挤出它;切片它 - 封盖并执行MASSPROP... 谢谢你的快速回复，我会试试这个地区，听起来比我做的要简单。我不需要视觉，如果你可以通过选择表面来计算体积，那就更好了，但是我认为这会涉及到更复杂的代码，这甚至超出了我的能力范围。
页:
[1]