GP_ 发表于 2022-7-6 09:18:39

@MOTE-z公司
 
看看你是否从我的Lisp程序这个(糟糕的)英语版本中得到了提示。
 
描述:选择与由三角形3DFACE组成的曲面相交的直线/多段线2D/多段线3D,在模型上生成多段线3D(轮廓)。
 
教授3DF_EN。LSP

motee-z 发表于 2022-7-6 09:21:00

谢谢GP_
我认为网上没有类似的lisp,这是一个很棒的lisp,我会努力理解它

GP_ 发表于 2022-7-6 09:23:35

不客气。
 
我希望lisp能够有所帮助,尽管它在某些方面可以改进。

GP_ 发表于 2022-7-6 09:28:55

我公开回应了在私人消息中收到的关于Lisp解释的请求,因为其他用户可能对此感兴趣。
 
_______________________________________________________
相交剖面线/三维面
对三角形(3DFACE)的三条边重复上述步骤
[列表]
[*]pA pB->剖面线的点
[*]p1 p2->三角形的顶点侧
[*]p1a p2a->顶点p1和p2到高度0,00
[*]p3->pA、pB/p1a、p2a的交点
[*]如果p3->
[列表]
[*]p4 p5->垂直p3上的点
[*]p6a->交点(俯视图)剖面线/三维面
[/列表]

 
 
 
________________________________________________
3DFACE平面中的点
 
使用:帮助AutoCAD
 
这是lisp中发布的用法:
(cal“pINT\u z=ilp(p\u INT\u inf,p\u INT\u sup,p1,p2,p3)”)
 
注意:请记住加载几何计算器:
(如果(不是(成员“geomcal.arx”(arx))(arxload“geomcal”))
 

 
 
:)
页: 1 [2]
查看完整版本: 挑战Lisp程序