2.2.grs

UG二次开发很好的东西 需要的朋友可以下载来看看 很好用啊

$$字符串定义
string/str(20)

$$选择打印内容。
l10:
choose/'choose option','打印unigraphics','打印open grip',resp
jump/l10:,trm:,,,l20:,l30:,resp

$$若选择打印unigraphics，则执行l20:语句标号下的程序指令。
l20:
str='unigraphics'
print/str
jump/trm:

$$若选择打印open grip，则执行l30:语句标号下的程序指令。
l30:
str='open grip'
print/str

$$程序结束
trm:
halt