EDA365电子论坛网

标题: 万能的坛，谁指点下怎么写这个代码 [打印本页]

作者: PAS 时间: 2022-7-23 13:11
标题: 万能的坛，谁指点下怎么写这个代码
Manufacture/NCdrillnegend-1-2
NCdrillnegend-1-4
Ncdrillnegend-x-x
所有前缀NCdrillnegend层显示出来并付个颜色。怎么弄模糊索引么？

skill 小白求指导

作者: PAS 时间: 2022-7-23 18:52
谢谢楼上的大侠，学到了

作者: PAS 时间: 2022-7-23 18:52
弄个微信群不更好么，现在用QQ的少了

作者: PAS 时间: 2022-7-23 19:52
axlCmdRegister("dwg_layer" 'drill_SetupSubclasses)
  procedure( drill_SetupSubclasses()
foreach (item axlSubclasses("MANUFACTURING")
   (if index(item "NCLEGEND") || index(item "NCBACKDRILL") then
   layid = axlLayerGet(strcat("MANUFACTURING/" item))
   layid->color = 5
   axlLayerSet(layid)
   );end if
))

作者: PAS 时间: 2022-7-23 19:53
)锛沞nd foreach
^^^^^^
SYNTAX ERROR found at line 11 column 3 of file 00_drill_dwg.il
*Error* lineread/read: syntax error encountered in input
*Error* load: error while loading file - "00_drill_dwg.il" at line 11
ERROR
*Error* toplevel: undefined variable - drill_SetupSubclasses

作者: PAS 时间: 2022-7-25 23:16
多谢????多谢

作者: PAS 时间: 2022-7-26 12:31
成功了，谢谢 zs_king

顺带显示这些层，加了一句：layid->visibility = t

axlCmdRegister("dwg_layer" 'drill_SetupSubclasses)

procedure(drill_SetupSubclasses()
foreach(item axlSubclasses("MANUFACTURING")
      (if index(item "NCLEGEND") || index(item "NCBACKDRILL") then
      layid = axlLayerGet(strcat("MANUFACTURING/" item))
      layid->color = 12
      layid->visibility = t
   axlLayerSet(layid)
   axlVisibleUpdate(nil)
      );end if
)
)

。。。。。。。。。。。。。。。。。。。。。。。

又出问题了

*WARNING* (axlParam): Attribute, visibility not legal on param paramLayer

作者: PAS 时间: 2022-7-26 12:35
axlVisibleLayer("PACKAGE GEOMETRY/PIN_NUMBER" t)

怎么把"PACKAGE GEOMETRY/PIN_NUMBER" 变成一list

axlVisibleLayer(axlLayerGet(strcat("MANUFACTURING/" item)) t) 不OK啊

作者: PAS 时间: 2022-7-26 14:03
layers = '(axlLayerGet(strcat("MANUFACTURING/" item)))
   foreach(layer layers
      if( axlIsLayer(layer) then
         axlVisibleLayer(layer t)))

*Error* axlIsLayer: argument #1 should be a string (type template = "t") - axlLayerGet(strcat("MANUFACTURING/" item))

作者: PAS 时间: 2022-7-26 14:56
axlCmdRegister("dwg_layer" 'drill_SetupSubclasses)

procedure(drill_SetupSubclasses()
foreach(item axlSubclasses("MANUFACTURING")
      (if index(item "NCLEGEND") || index(item "NCBACKDRILL") then
      layid = axlLayerGet(strcat("MANUFACTURING/" item))
      layid->color = 5
      axlLayerSet(layid)

   layers = '(axlLayerGet(strcat("MANUFACTURING/" item)))
      axlVisibleLayer(sprintf(nil "%L" layers) t)
      axlVisibleUpdate(nil)
      );end if
)
)

sprintf(nil "%L" layers list 变 string不报错了，但是不显示drill层

欢迎光临 EDA365电子论坛网 (https://bbs.eda365.com/)