点击查看详细介绍

GRIP获得极点坐标和最大外边尺寸示例代码(选择多个的方法)

nxopen 10年前 5076 11

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


此代码为多选多个类型的实体或曲面获得极点坐标和最大外边尺寸GRIP示例代码

之前发布了一个同功能单选单个实体的示例代码:https://www.ugapi.com/thread-316.html


$$代码开始
ENTITY/obj(1000)
NUMBER/p(6),xmin,xmax,ymin,ymax,zmin,zmax

LL00:
CHOOSE/'君闲开发提示:请选择按钮...',$
'实体',$
'表面',resp
JUMP/LL00:,END:,,,LL10:,LL20:,resp

LL10:
MASK/70
ident/'君闲开发提示:请选择实体...',obj,cnt,nm,resp
JUMP/LL00:,END:,,,resp
JUMP/LL30:

LL20:
MASK/71
ident/'君闲开发提示:请选择表面...',obj,cnt,nm,resp
JUMP/LL00:,END:,,,resp

$$获得对象的坐标极点
LL30:
do/LLL:,i,1,nm
p=solbox/obj(i)
ifthen/i==1

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

LLL:

$$根据对象的坐标极点 计算 最大外形
xxmax=xmax-xmin
yymax=ymax-ymin
zzmax=zmax-zmin

$$ 最小坐标为 xmin ymin zmin
$$ 最大坐标为 xmax ymax zmax
$$ 最大外形为 xxmax yymax zzmax

LL40:
XC=xmin
YC=ymin
ZC=zmin
X=xxmax
Y=yymax
Z=zzmax

print/'你所选的对象最小坐标为'
print/XC
print/YC
print/ZC
print/'最大外形为'
print/X
print/Y
print/Z

END:
HALT





0

最新回复 (11)
  • sisi168168 10年前
    1

    感謝分享我很需要

  • hongtianfang 10年前
    2

    感謝分享

  • alabo 10年前
    3

    希望,能有免银元就能看到,只是回复一下,就可以,这样最好了

  • ruanyx 10年前
    4

    开学了,学一点点用来工作

  • a404057024 10年前
    5

    接着看,好东西,学习了

  • xl137731 10年前
    6

  • ldczlyp6819 10年前
    7

    回复:楼主
    顶顶顶顶顶顶顶顶顶顶顶顶

  • ahqqqq22 9年前
    8

    正在学习中,好东西……

  • yccong 9年前
    9

    正学习中,谢谢楼主分享!

  • SXQ1984 8年前
    10

    正学习中,谢谢楼主分享!

  • bvcxz 8年前
    11

    GOODGOODGOOD

请登录后发表新帖