点击查看详细介绍

GRIP判断两曲线是否相切

liss28 9年前 5814 25

购买与咨询 NX 二次开发视频教程,请联系微信号:13890821008  QQ号:85585969  



先利用Reldst/函数 获得2曲线最小距离 判断2曲线是否相邻的
如果相邻的 生成1个最近点pt

然后利用Spline/Approx函数 合并曲线Ln(3)

在利用 Reldst/函数 判断 最近点pt 和合并后曲线Ln(3) 的距离 是否在公差范围


原理:因为合并曲线会把不相切的曲线倒R角, 2曲线最近点和 合并曲线产生了距离
又因为合并曲线的时候如果是2个相切曲线 那么的最近点和合并后曲线距离接近0
所以 设置一个公差建议0.001

$$判断2曲线是否相切

Gripsw / Declrv
Entity/ Ln(3),Pt
Number/Tol
Number/Resp,R(7)

Tol =0.001 $$公差


L10:
Mask/72
Ident/'UGapi提示!请选择面',Ln(1),Resp
Jump/L10:,End:,,,Resp

L20:
Ident/'UGapi提示!请选择面',Ln(2),Resp
Jump/L10:,End:,,,Resp


Ln(1)=Soledg/Ln(1) $$抽取曲线
Ln(2)=Soledg/Ln(2)

●●●请先 登陆注册 后查看●●●

ifthen/R(7)>Tol
Jump/Tt:
endif

Pt=Point/R(1..3)
Ln(3) = Spline/Approx,Delete,Toler,0.1,Ln(1..2)
R(1..7)= Reldst/Ln(3),Pt
Delete/Pt,Ln(3)

ifthen/R(7)<Tol
Messg/'UGapi提示!2曲线相切'
else
Messg/'UGapi提示!2曲线不相切'
endif

Tt:

End:
Halt


0

最新回复 (25)
  • huan21415 8年前
    1

    谢谢,学习学习学习学习嘻嘻嘻

  • jimk 8年前
    2

    学习一下,谢谢分享。

  • zz127118 VIP会员 8年前
    3

    学习一下楼主思路

  • liguoquan VIP会员 8年前
    4

    学习一下,谢谢分享。

  • 三年梦1994 7年前
    5

    谢谢,学习学习学习学

  • zyb_123 7年前
    6

    谢谢,学习学习学习学!!!

  • yjf777 7年前
    7

    学习学习、、、、。。

  • PiXiaoShuang 7年前
    8

    感谢分享,学习学习。。。。

  • heyilong 7年前
    9

    谢谢,学习学习学习学习嘻嘻嘻

  • ddcs2008 7年前
    10

    感谢分享,学习学习

  • xu88 7年前
    11

    学习一下楼主思路

  • cj8n727 7年前
    12

    感谢分享,值得学习!

  • mjx791106 7年前
    13

    贫僧前来取经,代码保佑

  • wxwxwxwx 6年前
    14

    谢谢,学习学习学习学!

  • one324230760 5年前
    15

    谢谢,学习学习学习学习嘻嘻嘻

请登录后发表新帖