直线与球体的交点lisp_晓东CAD家园-论坛-A/VLISP-[LISP函数]：计算直线与曲线交点-:5 如何用Lisp程序计算支线Line与曲线（二次样条或PLINE拟合曲线）三交点，请诸位高手提...

[font=courier new]

86. xdrx_getinters

功能：1.求两个AcDbCurve(曲线)实体的交点.

2.求一个AcDbCurve(曲线)实体和一个选择集中所有AcDbCurve(曲线)的交点。

3.求一个选择集中所有AcDbCurve(曲线)实体的交点.

4.求一个选择集SS1中的所有AcDbCurve实体和另个选择集SS2所有AcDbCurve实体的交点。

调用格式： 1. (xdrx_getinters [扩展方式])

2. (xdrx_getinters [扩展方式])

2. (xdrx_getinters [扩展方式])

3. (xdrx_getinters [扩展方式])

4. (xdrx_getinters (...) [扩展方式])

5. (xdrx_getinters (...) [扩展方式])

6. (xdrx_getinters (...) (...) [扩展方式])

说明：1.程序能求AcDbCurve(包括：AcDbLine、AcDbArc、AcDbCircle、AcDbEllipse、AcDbSpline、

AcDbPolyline(lwpolyline)交点。

2.参数[扩展方式]：

对于1种情况：

0：不延伸实体

1：延伸第一个实体

2：延伸第二个实体

3: 两个都延伸

对于第二、三、四种情况(选择集):

0: 不延伸实体

1: 两个都延伸

示例： 1. 求天正建筑软件轴线层上，所有轴线的交点

(if (setq ss (ssget &