求将走线变成铜皮的SKILL文件

LiuTao166462139 · 发表于 2017-11-1 10:09

EDA365欢迎您！

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

x

求：将走线变成铜皮的SKILL文件？

泡泡_X84gB · 发表于 2017-11-2 09:55

16.6自带这个功能

LiuTao166462139 · 发表于 2017-11-2 11:32

泡泡_X84gB 发表于 2017-11-2 09:55
16.6自带这个功能

能截个图看下选项吗

小秋2013 · 发表于 2017-12-7 11:41

load("x:/xxx/x_cline2shape.il" "www.eda365.com")
调用命令c2s

小秋2013 · 发表于 2017-12-7 11:42

x_cline2shape，你自己在论坛搜索吧，附件上传不了

這侽孓譙悴丶 · 发表于 2017-12-7 14:03

https://www.eda365.com/thread-30450-1-2.html

moca · 发表于 2017-12-11 08:58

內建好像就有此功能了，找找看應該有的

gdutchen · 发表于 2017-12-12 10:59

内建的给演示下，谢谢！

l8877l · 发表于 2017-12-12 11:25

axlCmdRegister("cline2shape" 'LCB_cline_to_shape ?cmdType "interactive"
?doneCmd 'LCB_Done ?cancelCmd 'LCB_Cancel)
procedure(LCB_cline_to_shape()
let( ()
axlSetFindFilter(?enabled list("noall" "clines")
               ?onButtons list("noall" "clines"))
LCBpopup = axlUIPopupDefine( nil (list
(list "Done" 'LCB_Done)
(list "Undo" 'LCB_unDo)

(list "Cancel" 'LCB_Cancel)
   ))
axlUIPopupSet(LCBpopup)
LCB_mark = axlDBTransactionStart()
notdone = t
while(notdone
  lclines = axlGetSelSet(axlSelect(?prompt "Select Clines to convert to a shape."))
  if(lclines then
foreach(clinedbid lclines

net = clinedbid->net->name
   layer = clinedbid->layer
   polydbid = axlPolyFromDB(clinedbid ?endCapType "ROUND")
   if(polydbid then
      axlDeleteObject(clinedbid)
      if(! axlDBCreateShape(car(polydbid) t layer net)  then
      axlUIWPrint(nil "** Error. Failed to create Shape from Cline. **")
      ); endif
if(cadr(polydbid) then
         axlDBCreateShape(cadr(polydbid) t layer net)  )
   else
      axlUIWPrint(nil "** Error. Failed to create Polydbid from Cline. **")
   ); endif
); end foreach cline
  ); endif
); end while
axlDBTransactionCommit(LCB_mark)
)); let and procedure
procedure(LCB_unDo()
let( ()
  if(! axlDBTransactionOops(LCB_mark) then
axlUIWPrint(nil "-- Nothing Left To Undo. --")
  else
axlUIWPrint(nil "-- Replacing Clines. --")
  ); endif
  axlClearSelSet()
)); end let procedure
procedure(LCB_Cancel()
let( ()
  axlUIWPrint(nil "** Cancelled Program. **")
  ;axlDBTransactionRollback(LCB_mark)
  notdone = nil
  axlClearSelSet()
  axlCancelEnterFun()
)); end let procedure

procedure(LCB_Done()
let( ()
  axlUIWPrint(nil "- Done -")
  axlDBTransactionCommit(LCB_mark)
  notdone = nil
  axlCancelEnterFun()

)); end let and procedure

LiuTao166462139 · 发表于 2017-12-13 15:29

l8877l 发表于 2017-12-12 11:25
axlCmdRegister("cline2shape" 'LCB_cline_to_shape ?cmdType "interactive"
?doneCmd 'LCB_Done ?canc ...

谢谢！

		自动登录	找回密码
密码			注册

求将走线变成铜皮的SKILL文件

EDA365欢迎您！

点评

点评

推荐内容 /1