normal intersection
I think Lee Mac might have some helpers for vectors, Assuming the lines are planar, you will want to:
- find the direction of the line as a vector, or angle so you can use polar point
- create a ray or xline perpendicular to the line
- find the intersection of the ray/xline with your target line
proof of concept
from pyrx import Db, Ed, Ge, Ap, Rx, Gs
@Ap.Command()
def doit():
try:
ps1, id1, pnt1 = Ed.Editor.entSel("\nSelect 1: ", Db.Curve.desc())
ps2, id2, pnt2 = Ed.Editor.entSel("\nSelect 2: ", Db.Curve.desc())
c1 = Db.Curve(id1)
c2 = Db.Curve(id2)
dir1 = c1.getPointAtParam(0) - c1.getPointAtParam(c1.getEndParam())
geline = Ge.Line3d(pnt1, dir1.perpVector())
gec2 = c2.getAcGeCurve()
if not gec2.isKindOf(Ge.EntityId.kLinearEnt3d):
raise RuntimeError("oof not a kLinearEnt3d")
flag, inters = geline.intersectWith(Ge.LinearEnt3d.cast(gec2))
if flag:
Ed.Core.grDraw(pnt1, inters, 1, 0)
except Exception as err:
print(err)
If a temporary Line is to be drawn anyway, you could try my (pf) [= perpendicular from] function, >here<. See the description at Message 6 of that topic, but don't use the code there -- use the code attached at the linked Message.
It works to draw something like a Line [or as a Move or Copy displacement, or...] perpendicular from anything with linearity -- Line, Polyline [including arc segments], Circle, Arc, Ellipse, Spline, Ray, or Xline. If you use it to draw a Line, just draw it past the other object, and take the intersection.
Try this code...
(defun c:Int(/)
(command
"_point"
"_non"
(vlax-curve-getClosestPointToProjection (car (entsel "\nSelect Object 2"))
(getpoint "\nPick Point: ")
'(0 -1 0)
t
)
)
)
Carlos Calderon G
>Did you find this post helpful? Feel free to Like this post.
Did your question get successfully answered? Then click on the ACCEPT SOLUTION button.
