找回密码
 注册

QQ登录

只需一步,快速开始

扫一扫,访问微社区

巢课
电巢直播8月计划

PADS 自动排位号脚本

查看数: 7653 | 评论数: 96 | 收藏 11
关灯 | 提示:支持键盘翻页<-左 右->
    组图打开中,请稍候......
发布时间: 2014-2-27 17:48

正文摘要:

本帖最后由 jimmy 于 2015-5-29 10:57 编辑   J, t2 ^& J8 j 3 V( F: K" X$ }/ i$ |        最近写了个  PADS2007 的自动排位号的脚本,现与大家分享。 6 @ ...

回复

dsldsldsldsl 发表于 2014-3-5 13:11
JIMDENG 发表于 2014-3-5 10:13( s8 Z0 W- ~  |
一下排列到26层,就有点混乱了:请看图片

' Y; ?( D8 |# Q8 u+ ^9 k' d你是说,你放在底层的器件的位号也跑到 Silkscreen Top 层了吗? 之前还没遇到过,我家里的电脑装的是 9.3的,也测试过,不会这样。2007我也测试过,其他版本就没测试过了。不过你可以试试这个,会不会解决你的问题。放在装配层你的意思是放在 Assembly Drawing Top 和Assembly Drawing Bottom层吗?这个也是可以的。

Assembly.rar

506 Bytes, 下载次数: 52, 下载积分: 威望 -5

paolo 发表于 2014-3-1 16:47
测试没问题,如果能识别封装方向位号能跟着旋转就很完美了
ppw2005 发表于 2015-1-14 13:39
Application.ExecuteCommand("Display Colors Setup")5 N6 L( [" ^9 H/ w% ~7 [  ]
DisplayColorsSetupDlg.ColorGrid.Cell("Visible Only", "Attributes") = "1"
; C3 p( v+ K* DDisplayColorsSetupDlg.ColorGrid.Cell("Visible Only", "Ref. Des.") = "1" / g- C# }% e  c) @+ [* m* J
DisplayColorsSetupDlg.Ok.Click()
# u2 O* Z' ]* L8 J( n' N7 F$ r
' e* _; _" z3 k9 n. W* f9 HApplication.ModelessCommand("u")0 }8 _8 T: a7 b% _
DlgModelessCmd.Command = "um"  v8 g& v1 z: k! ~! c; l
DlgModelessCmd.OnOk()( |% m- P- C( H* D, o

4 R. L9 P6 B* ]0 }! t: }( S. JApplication.ModelessCommand("z")+ g: F  ?, s& A* R9 X1 p+ s1 i( H
DlgModelessCmd.Command = "zz"0 u1 A5 }3 X& @% u+ t
DlgModelessCmd.OnOk()) W6 b  `% |) c' ^: v
7 h: Y6 w  A, K: e; j4 D& ~% F, [
Application.ExecuteCommand("Filter")
* V( O/ j4 ?7 G3 R$ ]SelectionFilterDlg.Nothing.Click()+ g) X2 p: ^" |9 D! S7 N
SelectionFilterDlg.SelectionObjectsDlg.Parts = false
& V# d# l3 a+ m, U# nSelectionFilterDlg.SelectionObjectsDlg.Labels = true4 _1 a" W* C" K6 l+ n
SelectionFilterDlg.Ok.Click()3 l! v% G9 T  e' q/ A" [% N
Application.ExecuteCommand("Select All")+ ~) ]# |8 z- X* }8 T+ u
Application.ExecuteCommand("Edit Delete Group")8 Y. `& v  h$ p
Application.ExecuteCommand("Quick Filter Components")' j2 H) e/ @, }( _# k
Application.ExecuteCommand("Select All")# Y' E6 K$ m' F9 A. f& \
Application.ExecuteCommand("Add New Part Label")
- a3 k! X, J" p7 u; m1 y- x% @AddNewPartLabelDlg.FontFace = "Tahoma"  M, W2 F9 z3 W( E* Z0 k- P3 u
AddNewPartLabelDlg.X = "0"
  ^: k  {, o+ d2 P( T- VAddNewPartLabelDlg.Y = "0"
* A6 x2 Q* `# I9 J3 m* z6 \" qAddNewPartLabelDlg.Size = "30"
+ }7 K) k% _# ^: I# E; a! o" t+ n7 l7 eAddNewPartLabelDlg.HorizontalJustification = "Center"
0 P$ O. i' T# M& XAddNewPartLabelDlg.VerticalJustification = "Center"8 d! U4 e: {* l% l1 x
AddNewPartLabelDlg.RightReading = 1
0 K5 q! F- J1 q2 I- \) r- wAddNewPartLabelDlg.Ok.Click()9 v, F* s( G" I; C
Application.ExecuteCommand("Select All")( t) ]! c4 c& Y2 V3 Z( K; D. ~1 p
Application.ExecuteCommand("Add New Part Label")' h3 m( H! F4 ?" Y
AddNewPartLabelDlg.Attribute = "Value"$ b3 ]- s9 {8 ^0 ~$ o
AddNewPartLabelDlg.FontFace = "Tahoma"4 Z8 F( l9 z$ }* V# P& I
AddNewPartLabelDlg.X = "0"( F0 z. u3 i5 B. R
AddNewPartLabelDlg.Y = "0"
1 K2 {0 C6 E% v* G; fAddNewPartLabelDlg.Size = "30"
1 W& e; C. T& q7 YAddNewPartLabelDlg.HorizontalJustification = "Center": S9 p' Z3 H/ ^0 k
AddNewPartLabelDlg.VerticalJustification = "Center", \8 E6 \0 _2 x" f" C) V$ ]1 f# e
AddNewPartLabelDlg.RightReading = 1
. {: a8 d0 c8 m# P9 ~AddNewPartLabelDlg.Ok.Click()& v1 B) ~2 c' _6 E4 N( p+ M1 I1 F3 _0 z: v
* A. [* l) ]) }. Q# r3 Z5 ^9 e
8 u0 V3 h$ @; L2 x. C- `) {) w* k

* o) G7 }# ^  w* d! \# d$ h! F: c能按这个宏命令写一个吗??
tanke 发表于 2018-6-10 16:24
好东西好东西,可惜威望不够啊
xxzzhy 发表于 2018-4-26 00:23
好用
xxzzhy 发表于 2018-4-26 00:20
非常感谢。挺好用
xxzzhy 发表于 2018-4-26 00:01
好不错的。谢谢+ P; f7 b& O# e3 m) x$ b/ D
dsldsldsldsl 发表于 2016-5-15 12:00
苏鲁锭 发表于 2016-5-11 15:45" y- ~# I6 R2 [, |- {" B. k
谁叫你一年才刷新一次

1 }2 O) X& o* d3 E+ T不敢上来,上来了老想以前的工作和事情
苏鲁锭 发表于 2016-5-11 15:45
谁叫你一年才刷新一次

点评

不敢上来,上来了老想以前的工作和事情  详情 回复 发表于 2016-5-15 12:00
dsldsldsldsl 发表于 2016-5-9 20:28
离开论坛也有一两年了,你们过得可好?
xode 发表于 2015-10-22 11:46
很好,谢谢分享
dsldsldsldsl 发表于 2015-9-9 20:02
苏鲁锭 发表于 2015-9-6 16:16
4 }+ j1 R+ ]& Phoho,嚎~~~
8 y' P7 }  U5 l! }9 r

9 H) V$ w" \- z9 _
苏鲁锭 发表于 2015-9-6 16:16
dsldsldsldsl 发表于 2015-9-6 15:13
5 |! k/ y0 Y- s. h  [4 C4 \哈哈,好久没上了,各位好!

' b  [/ w, a+ B5 X- khoho,嚎~~~
! T! @0 M& P. {; z( K& c
dsldsldsldsl 发表于 2015-9-6 15:13
哈哈,好久没上了,各位好!

点评

hoho,嚎~~~  详情 回复 发表于 2015-9-6 16:16
jimmy 发表于 2015-5-29 10:57
使用方法:
) Y. B) {- }  U) T* K, \  [
# u3 q7 K: y3 Y+ ^) ~4 D加载脚本:3 E' T/ N" x. n* e3 B
PADS Layout中单击:Tool->Basic Scripts->Basic Scripts->Load files添加就行了。8 q% T5 [( r/ b4 J* z' j1 Q

5 R3 O* i$ ^7 O- a0 W0 M0 U. b: Z% Y脚本使用:Tool->Basic Scripts->Basic Scripts->Run.
424252161 发表于 2015-5-29 08:46
怎么运行...
关闭

推荐内容上一条 /1 下一条

巢课

技术风云榜

关于我们|手机版|EDA365 ( 粤ICP备18020198号 )

GMT+8, 2024-11-22 08:05 , Processed in 0.067563 second(s), 43 queries , Gzip On.

深圳市墨知创新科技有限公司

地址:深圳市南山区科技生态园2栋A座805 电话:19926409050

快速回复 返回顶部 返回列表