|
|
EDA365欢迎您！
您需要 登录 才可以下载或查看，没有帐号？注册
x
下面的可以修改PIN NUMBER的SKILL，但是最后运行的效果是把Connect pin变成mechanical pin。不知道是什么原因啊，版本帮忙解答啊，或者说有什么方法不会让他变成MECHANICAL的PIN啊。
procedure(test1103()
prog((notdone numb1 Lx Ly blk Lx_sum points1 pinnum cc)
pinnum=nil
numb1=0
blk=nil
points1=0
Lx_sum=nil
cc=nil
step=1
first_text=1
(v = (axlVisibleGet))
axlClearSelSet()
axlVisibleDesign(nil)
axlVisibleLayer("package geometry/pin_number" t)
axlSetFindFilter(?enabled list("noall" "text" ) ?onButtons list("noall" "text"))
mypopup = axlUIPopupDefine( nil list(list( "Done" 'axlFinishEnterFun) list( "Cancle" 'axlCancelEnterFun)));" "内是显示的文字 '后是对应的函数
axlUIPopupSet(mypopup)
;axlSelect(?groupMode 't)
while(axlSelect()
text_db=axlGetSelSet()
numb1=first_text
pre_text="A0"
foreach(i text_db
old_pin=i->xy
Lx=car(old_pin)
Ly=cadr(old_pin)
blk=i->textBlock
Lx_sum=cons(Lx Lx_sum)
)
Lx_sum=sort(Lx_sum 'lessp)
axlDeleteObject(text_db)
if(pre_text==nil
then
for(i 0 length(Lx_sum)-1
mytext = make_axlTextOrientation(?textBlock blk, ?rotation 0., ?mirrored nil, ?justify "center")
points1=nth(i Lx_sum)
axlDBCreateText(sprintf(nil "%d" numb1), points1 y, mytext, "package geometry/pin_number", nil)
;rplaca(sum cc)
numb1=numb1+step
)
else
pinnum=concat(pre_text first_text) ;A01
for(i 0 length(Lx_sum)-1
mytext = make_axlTextOrientation(?textBlock blk, ?rotation 0., ?mirrored nil, ?justify "center")
points1=nth(i Lx_sum)
axlDBCreateText(sprintf(nil "%s" pinnum), points1y, mytext, "package geometry/pin_number", nil)
numb1=numb1+step
if(numb1<=9
then
pinnum=strcat(pre_text sprintf(nil "%d" numb1))
else
rexCompile("[a-zA-Z]+")
rexExecute(pre_text)
cc=rexSubstitute("\\0")
pinnum=strcat(cc sprintf(nil "%d" numb1))
)
)
)
);end while
axlUIPopupSet(nil)
; (axlFormClose formPort)
(axlFinishEnterFun)
(axlClearSelSet)
(axlVisibleSet v)
(axlCloseFindFilter)
(axlVisibleUpdate t)
(axlUIWUpdate nil)
))
|
|
/1 
发表于 2015-11-6 09:38
QQ好友和群
QQ空间
腾讯微博
腾讯朋友
微信
收藏
支持！
反对！
楼主
