关于封装设置PIN1为原点的SKILL

marco_ma · 发表于 2012-10-30 20:20

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

x

谁有可以把封装PIN1设置为原点的SKILL，就是直接点一下，原点自动变为PIN1上，不需要现去设置

redeveryday · 发表于 2012-11-2 17:12

这个没必要吧，你建封装的时候直接输入0 0坐标不就好了。

marco_ma · 发表于 2012-11-2 17:54

不是的，我是想把已经建好的封装修改一下。

chenyuanzhi1989 · 发表于 2012-12-17 23:23

chenyuanzhi1989 · 发表于 2012-12-17 23:24

在红色部分修改坐标就OK了，但是不建议这么处理，不注意的话总会有些东西没有没有移动，那封装很容易出错的！

marco_ma · 发表于 2012-12-17 23:32

chenyuanzhi1989 发表于 2012-12-17 23:24
# N8 w' Z Y% y$ }在红色部分修改坐标就OK了，但是不建议这么处理，不注意的话总会有些东西没有没有移动，那封装很容易出错的 ...

嗯，这个方法是可以，但太慢了，如果很多器件都要改的话，一个一个太浪费时间了，我是觉得可能有SKILL可以执行？

XYX365 · 发表于 2012-12-26 15:29

本帖最后由 XYX365 于 2012-12-27 07:54 编辑

marco_ma 发表于 2012-12-17 23:32
$ {( z# ~( [1 D, G f嗯，这个方法是可以，但太慢了，如果很多器件都要改的话，一个一个太浪费时间了，我是觉得可能有SKILL可 ...

& D* V3 X% t2 T/ g
8 Q% K) p; W; u6 ^0 [
axlCmdRegister("mop" 'fnMoveOriginPin1)* f I# Z6 H1 g+ ?1 e* \4 e% L
8 k+ M. s7 ~9 H2 P1 | R8 f
procedure(fnMoveOriginPin1()
6 h t/ A, d7 c7 N5 L8 l! {
prog((tDesignType lAllPins dOne nOriginX nOriginY)8 r8 s. g2 i* S; E3 A4 t( c6 V/ ]$ r
tDesignType = axlDesignType(t)2 n# N- X+ @, _! z1 D7 ?- u6 X
unless(tDesignType == "PACKAGE"$ \* p! k. t/ C4 F* T
axlUIConfirm("The skill only run in package!")
- G9 w6 s& e" L% K$ [/ {& w' a
return(nil)- p' O# @1 K, Q! `* Q1 C
)0 I. a( B7 x4 E# r) x
axlVisibleDesign(t)' [+ K6 F. O( S7 g) y. f/ r/ v' K
axlClearSelSet()' J" m6 J' _: p2 V9 ^
axlSetFindFilter(?enabled '("NOALL" "PINS") ?onButtons '("NOALL" "PINS"))- y/ t" i+ ]5 Y& m) D& O7 V
lAllPins = axlGetSelSet(axlAddSelectAll())
3 p+ ]: v/ q# g0 M. D
axlClearSelSet()$ _: I+ R7 g7 w' H( g2 A. _
foreach(dOne lAllPins
& s! ?8 ~# a3 J- r9 b
when(dOne->number == "1", p9 [7 K* ]4 v T; b; R# z
nOriginX = car(dOne->xy)
A1 Z% I( t! x+ m3 b6 w4 M0 }
nOriginY = cadr(dOne->xy)
/ u z6 C! s# g1 k* }1 O
)% w0 u, E9 |+ w
)8 E; A6 ?- X5 M6 d
0 T, O# d1 ? u; a1 t/ i( V9 R
unless((zerop(nOriginX) && zerop(nOriginY)) 5 \* q7 f# e- V# [& {7 Z
axlDBChangeDesignOrigin(list((- nOriginX) (- nOriginY)))
+ \& Y ?& g0 L* }1 |$ U
printf("Change Origin To (%L : %L)" nOriginX nOriginY)1 f: ?- b& X+ h8 H% y8 |
)! s0 g) W `$ f2 e+ H
)
: f9 k0 N$ [/ x
)6 f( B2 o l. J! H7 f6 G