grip 原点，x正方向点，z方向

原点，x正方向点，z方向

$$WCS坐标设置 【原点，x正方向点，z方向】

gripsw / declrv   $$ 表示变量必须定义不然无法编译
entity / pot(2),lon,CSYS1,CSYS2
number / nn

CSYS2=&WCS

&WCS = &ABS $$绝对坐标

$$ 改变坐标
pot(1)=point/0,0,0   $$原点
pot(2)=point/1,0,0   $$x正方向点
lon=line/0,0,0,0,0,1 $$z方向
CSYS1 = CSYS/pot(2),lon,ORIGIN,pot(1)
$$的Y轴正负方向按右手定则。

delete/pot,lon
&WCS = CSYS1
nn=DVIEW/CSYS1 $$ 定义视图
view/nn         $$ 设置工作视图 为 【top    顶】

end:
halt





_____________________________________________________________________________ _

中磊UG二次开发教程 梅雷著 qq1821117007
学UG就上UG网 http://www.9sug.com/