[功能] 过一点画射线与曲线的交点

自贡黄明儒 · 发表于 2014-4-7 20:41

本帖最后由自贡黄明儒于 2014-4-7 21:52 编辑

;;[功能] 过一点射线与曲线的交点
;;示例(HH:XYCurvePt (car(entsel)) (getpoint) "X"),返回过一点X轴上的点
(defun HH:XYCurvePt (e1 pt Flag / E2 LST PTS)
  (setq e2 (EntmakeXline pt Flag))
  (setq pts (HH:TwoEntsInters e1 e2 0))
  (entdel e2)
  pts
)

20060510412 · 发表于 2021-11-30 22:51

请问能否得到射线与当前dwg文件中的最近交点，如果没有交点返回空？

win0616 · 发表于 2020-9-2 15:55

看到回复的这么多，先回复了，下载来学习学习

杜阳 · 发表于 2014-4-7 20:56

一出就是几个啊学习学习了

tm20038175 · 发表于 2014-4-7 21:29

哈哈，学习了。。。。

Jack_PC · 发表于 2014-4-7 21:57

学习学习

ynhh · 发表于 2014-4-7 22:09

长老太牛了

lostbalance · 发表于 2014-4-7 22:10

路过，学习，收藏

品茗新秀 · 发表于 2014-4-7 22:12

长老太牛了

品茗新秀 · 发表于 2014-4-7 22:13

长老太牛了

ysq101 · 发表于 2014-4-7 23:26

本帖最后由 ysq101 于 2014-4-7 23:27 编辑

这个可以用来IF点在多边形内外的子程序???

黄大师你坏坏啊...
HH:TwoEntsInters 这个应该是你自用的子函数吧...没一并发出来?

cable2004 · 发表于 2014-4-7 23:58

看看看看看看

账号		自动登录	找回密码
密码			注册

[源码] [功能] 过一点画射线与曲线的交点

本帖被以下淘专辑推荐: