EDA365电子论坛网

标题: 含不良信息 [打印本页]

作者: Pkron 时间: 2025-5-8 17:41
标题: 含不良信息
(axlCmdRegister "cutobject" 'cutobject)

(procedure (cutobject)
  (let (curVisible lVias logfile netname x y layer vianame symbol idx location)
(axlUIWPrint nil "VIA Net/Location/Layer Report")
(setq curVisible (axlVisibleGet))
(axlVisibleDesign nil)
(axlClearSelSet)
(axlSetFindFilter ?enabled (list "noall" "invisible" "vias") ?onButtons (list "vias"))
(axlAddSelectAll)
(setq lVias (axlGetSelSet))
(axlClearSelSet)
(axlVisibleSet curVisible)
(axlVisibleUpdate t)
(setq logfile (outfile "./via_net_location_layer.log"))
(fprintf logfile "No.  Net  VIA Name  Symbol  ON PAD  Location\n")
(fprintf logfile "------------------------------------------------------\n")
(setq idx 1)
(foreach v lVias
   (setq netname (if (and (v~>net) (v~>net~>name)) (v~>net~>name) "not on a net"))
   (setq vianame (if (v~>name) (v~>name) ""))
   (setq symbol (if (and (v~>parent) (v~>parent~>name)) (v~>parent~>name) ""))
   (setq layer (if (v~>layer) (v~>layer) ""))
   (setq x (car (v~>xy)))
   (setq y (cadr (v~>xy)))
   (setq location (sprintf nil "(%f,%f)" x y))
   (fprintf logfile "%d , %s , %s , %s , %s , %s\n" idx netname vianame symbol layer location)
   (setq idx (1+ idx))
)
(close logfile)
(axlUIViewFileCreate "./via_net_location_layer.log" "VIA Net Location Layer Report" t)
  )
)

作者: Pkron 时间: 2025-5-8 18:20
好難

作者: antoni2011 时间: 2025-5-9 12:32
感谢了,学习一下

作者: 式试1813 时间: 2025-5-9 16:30
这个论坛死气沉沉，还不良，无语得很

作者: ICMAN 时间: 2025-6-3 15:44
发帖子显示：抱歉，您填写的内容包含不良信息而无法提交。大家都咋解决的

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