SKILL 递归函数

policectsu · 发表于 2023-4-14 10:54:20

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

您需要登录才可以下载或查看，没有账号？注册

x

大佬们，想实现这么一个功能，打开某一个版图，将这个版图中所有的instances(包含instances里的instance)中的某一层缩小1um。
想用递归函数来实现，请问如下脚本怎么修改？谢谢。

procedure(ycRecursiveProject()
prog((insts cv master)
      cv = geGetEditCellView()
      insts = cv~>instances
      foreach(inst insts
         if(inst
            master = dbOpenCellViewByType( inst~>libName  inst~>cellName inst~>viewName  nil  "a"  )
            ycRecursiveProject()
            );if
         );foreach
   ycLayerSize() ;另外一个脚本，已load.
      dbSave(cv)
      ; dbClose(cv)
)；prog
); ycRecursiveProject

ljh065216 · 发表于 2023-4-14 16:27:37

我是通过inst 来判断的但是也一堆error

ljh065216 · 发表于 2023-4-14 16:30:10

ljh065216 发表于 2023-4-14 16:27
我是通过inst 来判断的但是也一堆error

file:///D:\qq文件\1716030041\Image\C2C\AAUBQJO0DNL46FCY_VAB]S9.png

ljh065216 · 发表于 2023-4-14 16:31:10

奇怪发布了

amodaman · 发表于 2023-4-14 16:46:42

这个递归没有实现呀，一层一层调用之间并没有传递master参数。根源在于你开始调用这个函数之后，是用过图形界面上的geGetEditCellView()来获得cv的，这怎么行。要从层次结构的顶端开始，用dbOpenCellViewByType来获得，然后每一层往下调用的时候，需要把当前inst的master作为参数带入到递归函数中。

policectsu · 发表于 2023-4-17 16:53:43

amodaman 发表于 2023-4-14 16:46
这个递归没有实现呀，一层一层调用之间并没有传递master参数。根源在于你开始调用这个函数之后，是用过图形 ...

大佬，帮忙看看这样可以吗？执行起来好像还是不行，能帮忙修改一下吗，多谢。

procedure(ycRecursiveProject(@optional cv(geGetEditCellView()))
prog((insts  master)
   ;  cv = geGetEditCellView()
      insts = cv~>instances
      foreach(inst insts
         if(inst  then
            master = dbOpenCellViewByType( inst~>libName  inst~>cellName inst~>viewName  nil  "a"  )
            ycRecursiveProject(master)
            );if
         );foreach
   ycLayerSize() ;另外一个脚本，已load.
      dbSave(cv)
      ; dbClose(cv)
)；prog
); ycRecursiveProject

amodaman · 发表于 2023-4-17 17:06:25

大致可以，不过你函数头里面 optional的 cv的括号是不是位置不对？应该是 ( cv geGetEditCellView() )这样吧，这是lisp语言的句式形式

policectsu · 发表于 2023-4-27 15:57:17

amodaman 发表于 2023-4-17 17:06
大致可以，不过你函数头里面 optional的 cv的括号是不是位置不对？应该是 ( cv geGetEditCellView() )这样 ...

但load时报错呢，能帮忙看看哪里有错误吗？谢谢

procedure:formal argument must be a symbol

amodaman · 发表于 2023-4-27 17:29:09

policectsu 发表于 2023-4-27 15:57
但load时报错呢，能帮忙看看哪里有错误吗？谢谢

procedure:formal argument must be a symbol

不是说了你调用参数的时候，optional 后面的语法写错了吗？

policectsu · 发表于 2023-6-12 16:54:06

amodaman 发表于 2023-4-27 17:29
不是说了你调用参数的时候，optional 后面的语法写错了吗？

这样我运行好像没啥问题了，给大佬帮忙看看：

procedure(RecursiveProject(@optional cv(geGetEditCellView()))
prog((insts master shapes masters)
if(boundp('masters) == nil then
masters = nil
else
masters
);

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
shapes =cv~>shapes
if(shapes then
foreach(shape shapes
if(shape~>layerName == "EC"  then
shape~>layerName = "BV"
);if
);foreach
);if
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
masters = append1(masters cv)

insts = cv~>instances
if( insts then
foreach(inst insts
master = dbOpenCellViewByType(inst~>libName inst~>cellName "layout"  "maskLayout" "a" )
RecursiveProject(master)
);foreach_inst
);if

);prog
);RecursiveProject

[求助] SKILL 递归函数

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

站长推荐 /2