点击查看详细介绍

WCS坐标设置相关函数代码

liss28 5年前 5932 53

UG NX 二次开发 技术交流 qq群:641226372      UG二次开发(C、C#、WPF)



$$ WCS坐标设置
gripsw / declrv $$ 表示变量必须定义不然无法编译
entity / face,pt(3),CSYS1,CSYS2
number / num(3,6),resp,nn,ff

CSYS2=&WCS
l00:
choose/'UGapi提示!请选择操作方式。',$
'WCS 方向',$
'绝对坐标',$
'平面正交',$
'使用说明',deflt,1,resp
jump/l00:,end:,,,a1:,a2:,a3:,a4:,resp
a1:
ff=0
jump/l10:

a2:
&WCS = &ABS $$绝对坐标
halt
a3:
ff=1
jump/l10:

a4:
print/'【WCS 方向】'
print/' 设置WCS坐标方向为面矢量方向并移动到该面中心。'
print/''
print/'【绝对坐标】'
print/' 设置WCS坐标为绝对坐标即还原真实的坐标位置。'
print/''
print/'【平面正交】'
print/' 设置该平面为正交显示。'
print/''
print/'UGapi制作'

jump/l00:

l10:
mask/22
ident/'UGapi提示!请选择平面...',face,resp
jump/l00:,end:,,,resp
l20:

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

$$ 改变坐标
pt(1)=point/num(3,1..3)
pt(2)=point/num(1,1..3)
pt(3)=point/num(2,1..3)
CSYS1=CSYS/pt(1..3),ORIGIN,pt(1)
&WCS = CSYS1
delete/pt
nn=DVIEW/CSYS1 $$ 定义视图
view/nn $$ 设置工作视图 为 【top顶】

IF/ff==1,&WCS = CSYS2

end:
halt

0

最新回复 (53)
  • q121237 5年前
    1

    希望能学习,能对我应用坐标系有好的启发

  • renhe888 4年前
    2

    急急急急急急急急急[html]
    请在这里输入可以执行的html代码
    [/html]

  • wguitar VIP会员 4年前
    3

    我们自己知道的事情

  • huan21415 4年前
    4

    谢谢,学习下,小诶下谢想

  • sisi168168 4年前
    5

    我们自己知道的事情

  • hushanbao83 4年前
    6

    正在学习中,很有用的资料

  • hushanbao 4年前
    7

    非常有用,

  • zz127118 VIP会员 4年前
    8

    正在学习中,感谢楼主

  • xiaofeng 4年前
    9

    希望能学习,能对我应用坐标系有好的启发

  • boyue 4年前
    10

    希望能学习,能对我应用坐标系有好的启发

  • 808xuting 4年前
    11

    希望能学习,能对我应用坐标系有好的启发

  • tianji_2008 3年前
    12

    谢谢,正需要

  • mozengtuan 3年前
    13

    感谢楼主的分享。谢谢!

  • 三年梦1994 3年前
    14

    正在学习中,很有用的资料

  • 岁月如歌 3年前
    15

    回复:楼主
    来跟楼主学习学习

请登录后发表新帖