编辑视图-隐线设置
string/vnam(2000,30),dwg_name(80)
number / i,j
layer/active,1..256 $$ 层 可见,可选择
unblnk/all $$ 恢复隐藏 所有物体
dwg_name=&curdrw
&curdrw=dwg_name $$ 找回一张图纸
&dstate=2 $$ 定义在制图中是显示 图纸
drawv/vnam,,j,iferr,lerd: $$历遍所有视图
$$缩放视图0.5陪
viewe/vnam(j),dscale,0.5,save,iferr,lerd:
lerd:
do/lks:,i,1,j
viewe/vnam(i),smooth,invsbl,iferr,lks:
viewe/vnam(i),smooth,vsbl,hidden,invsbl,iferr,lks:
lks:
end:
halt
$$ grip出图默认设置 和 ug出图默认设置 不一样
$$【可见实线,不可见没线)】如下两行【ug出图默认设置】
viewe/vnam(q),smooth,invsbl,iferr,lks:
viewe/vnam(q),smooth,vsbl,hidden,invsbl,iferr,lks:
$$【可见实线,不可见虚线)】如下一行
$$viewe/vnam(q),hidden,dash,iferr,lks:
_____________________________________________________________________________ _
中磊UG二次开发教程 梅雷著 qq1821117007
学UG就上UG网 http://www.9sug.com/
|