创建四个对象实体并对其命名 LINE

通过&获取到UG系统全局参数的状态设置和设置

ENTITY/ln1,ln2,ln3,ln4
&FONT=1 $$系统设置实体线为实线
ln1=LINE/4,4,0,4
ln2=LINE/0,4,0,0
&NAME(ln1)='LINE_ONE'
&NAME(ln2)='LINE_TWO'

&FONT=2 $$系统设置实体线为虚线
ln3=LINE/0,0,4,0
ln4=LINE/4,0,4,4
&NAME(ln3)='LINE_THREE'
&NAME(ln4)='LINE_FOUR'

messg/ 'HelloWorld'
HALT