UG爱好者

标题: 想设置材料属性值，发现有行数限制，如何修改 [打印本页]

作者: guya0335 时间: 2019-3-12 14:17
标题: 想设置材料属性值，发现有行数限制，如何修改
CHOOSE/MAT(1..16),DEFLT,21,RSP  -----------------------------------括号中数字最多写(1..15),显示14行，但是我需要25行数据如何更改

$$
$$material
$$定义零件材料
STRING/ATT(100,100),str(100),MAT(21,100)
DATA/MAT,'为零件选择材料',$
      'A3',$
      '45',$
      '40Cr',$
      'Cr12MoV',$
      'Cr12Mo1V1',$
      'Cr12',$
      'P20',$
      'ZQSn6-6-3',$
      '08F',$
      '聚氨脂',$
      '尼龙',$
      'AAAAAAAAA',$
      '其它',$
      '1111',$
      '95864',$
      '尼2龙',$
      'BBBAAAAAA',$
      'CCCCCAA',$
      '其3333它',$
      '2222'
L0:
   CHOOSE/MAT(1..16),DEFLT,21,RSP  -----------------------------------括号中数字最多写(1..15),
JUMP/L0:,HAL:,,,L1:,L2:,L3:,L4:,L5:,$
            L6:,L7:,L8:,L9:,L10:,L11:,L12:,L13:,L14:,L15:,L16:,L17:,RSP
L1:
ATT(4)=MAT(2)
JUMP/L17:
L2:
ATT(4)=MAT(3)
JUMP/L17:
L3:
ATT(4)=MAT(4)
JUMP/L17:
L4:
ATT(4)=MAT(5)
JUMP/L17:
L5:
ATT(4)=MAT(6)
JUMP/L17:
L6:
ATT(4)=MAT(7)
JUMP/L17:
L7:
ATT(4)=MAT(8)
JUMP/L17:
L8:
ATT(4)=MAT(9)
JUMP/L17:
L9:
ATT(4)=MAT(10)
JUMP/L17:
L10:
ATT(4)=MAT(11)
JUMP/L17:
L11:
ATT(4)=MAT(12)
JUMP/L17:
L12:
ATT(4)=MAT(13)
JUMP/L17:
L13:
ATT(4)=MAT(14)
JUMP/L17:
L14:
ATT(4)=MAT(15)
JUMP/L17:
L15:
ATT(4)=MAT(16)
JUMP/L17:
L16:
TEXT/'输入材料名称',str,rsp
ATT(4)=str
JUMP/L0:,L18:,L18:,,L17:,rsp
$$ATT(1)='零件名称'
$$ATT(2)=''
L17:
ATT(3)='材料'
$$ATT(5)='型号'
$$ATT(6)=''
$$ATT(7)='热处理'
$$ATT(8)=''
$$ATT(9)='备注'
$$ATT(10)=''
ASATT/PART,ATT(3..4)
MESSG/'零件材料更改成功'
JUMP/HAL:
L18:
  MESSG/'零件材料未更改'
  JUMP/L0:
HAL:
HALT

欢迎光临 UG爱好者 (https://www.ugsnx.com/)