EDA365电子工程师网

标题: 导出单个&多个选择元件封装（源码） [打印本页]

作者: laikelang 时间: 2011-5-28 15:02
标题: 导出单个&多个选择元件封装（源码）
本帖最后由 laikelang 于 2011-5-28 08:04 编辑

支持多选、Find面板过滤功能。导出器件保存在当前工作目录下。

axlCmdRegister( "libbypick" '_ExportLibByPick)

defun( _ExportLibByPick ()
prog(( l_ok, l_sym, l_fg, def)

  axlSetFindFilter( ?enabled list( "NOALL" "SYMBOLS" "NAMEFORM")
                  ?onButtons list( "NOALL" "SYMBOLS"))
  axlSelect()
  l_ok = nil
  l_sym = axlGetSelSet()
  while( l_sym
      l_ok = append1( l_ok, car( l_sym))
      def = car( l_sym) -> definition
      l_fg = nil
      foreach( symbol l_sym
               if( symbol -> definition != def then
                  l_fg = append1( l_fg, symbol)
                  );end-if
            );end-foreach
      if( l_fg then
         l_sym = l_fg
         else
         l_sym = nil
         );end-if
   );end-while
  foreach( symbol l_ok
         axlWritePackageFile( symbol -> definition)
         if( symbol -> component then
            axlWriteDeviceFile( symbol -> component -> compdef)
         );end-if
      );end-foreach
  axlClearSelSet()
);end-prog
);end-defun

作者: deargds 时间: 2011-5-28 15:36
感谢分享

作者: menghunabc 时间: 2011-5-30 14:12
学习了，谢谢啊

作者: lidin 时间: 2011-6-1 18:00

好东西，收藏了

作者: whitehorse 时间: 2011-6-25 12:44
学习了 ~ thanks a lot ~

作者: navywhj 时间: 2011-7-6 16:19

这个很好用，谢谢！！！！

作者: glater 时间: 2011-9-5 15:30
这个功能真的很好！

作者: hdy783 时间: 2011-9-15 15:42
谢谢太好了

作者: 飞天 时间: 2012-2-24 22:02
重谢

作者: l8877l 时间: 2012-2-24 22:14
谢谢了非常的有用啊感谢楼主

作者: hyper311 时间: 2017-7-7 17:43
导不出带有FLASH焊盘的封装，E- (SPMHDB-274): Unable to load flash symbol 2 (Check PSMPATH setting for this symbol).

作者: 九月 时间: 2017-10-18 08:00
谢谢分享

欢迎光临 EDA365电子工程师网 (https://bbs.elecnest.cn/)