搜索
bottom↓
回复: 20

贡献三个小巧的 PADS 脚本,可方便 PCB 最后的字符文本排版

[复制链接]

出280入168汤圆

发表于 2015-10-24 14:30:54 | 显示全部楼层 |阅读模式
在 PADS 下,最后的文字排放整理比较麻烦,因为走线和铜箔的绘制优先权高于文字,很难选中,也看不清文字安放位置的效果。

手动设置显示选项很麻烦,不仅要来回拖菜单,还容易搞错。

这三个小脚本就是为了解决这个问题,快速而简洁。适用于 PADS 9.5,其他版本请自己试一下。




脚本1,显示 Top 层和与其关联的那些层,并关闭走线与铜箔的显示。Bottom 层与其相关的层关闭显示。

  1. Sub Main

  2.         Set doc =  ActiveDocument
  3.         Set l1 = doc.Layers(1)
  4.         Set l2 = doc.Layers(2)

  5.         l1.Visible = False
  6.         l2.Visible = False

  7.         doc.Layers(22).Visible = False
  8.         doc.Layers(28).Visible = False
  9.         doc.Layers(29).Visible = False
  10.         doc.Layers(30).Visible = False

  11.         doc.Layers(21).Visible = True
  12.         doc.Layers(23).Visible = True
  13.         doc.Layers(26).Visible = True
  14.         doc.Layers(27).Visible = True

  15.         doc.SetVisibility(ppcbDesignObjectTrace , False)
  16.         doc.SetVisibility(ppcbDesignObjectCopper  , False)

  17.         l1.Visible = True
  18.         doc.ActiveLayer = 1

  19. End Sub
复制代码




脚本2,显示 Bottom 层和与其关联的那些层,并关闭走线与铜箔的显示。Top 层与其相关的层关闭显示。

  1. Sub Main

  2.         Set doc =  ActiveDocument
  3.         Set l1 = doc.Layers(1)
  4.         Set l2 = doc.Layers(2)

  5.        
  6.         l1.Visible = False
  7.         doc.Layers(21).Visible = False
  8.         doc.Layers(23).Visible = False
  9.         doc.Layers(26).Visible = False
  10.         doc.Layers(27).Visible = False

  11.         l2.Visible = False

  12.         doc.SetVisibility(ppcbDesignObjectTrace , False)
  13.         doc.SetVisibility(ppcbDesignObjectCopper  , False)

  14.         doc.Layers(22).Visible = True
  15.         doc.Layers(28).Visible = True
  16.         doc.Layers(29).Visible = True
  17.         doc.Layers(30).Visible = True

  18.         l2.Visible = True
  19.         doc.ActiveLayer = 2
  20.        
  21. End Sub
复制代码




脚本3,恢复正常显示。

  1. Sub Main

  2.         Set doc =  ActiveDocument
  3.         Set l1 = doc.Layers(1)
  4.         Set l2 = doc.Layers(2)

  5.         l1.Visible = False
  6.         l2.Visible = False

  7.         doc.Layers(22).Visible = True
  8.         doc.Layers(28).Visible = True
  9.         doc.Layers(29).Visible = True
  10.         doc.Layers(30).Visible = True

  11.         doc.Layers(21).Visible = True
  12.         doc.Layers(23).Visible = True
  13.         doc.Layers(26).Visible = True
  14.         doc.Layers(27).Visible = True

  15.         doc.SetVisibility(ppcbDesignObjectTrace , True)
  16.         doc.SetVisibility(ppcbDesignObjectCopper  , True)

  17.         l1.Visible = True
  18.         l2.Visible = True

  19. End Sub
复制代码


脚本的使用,在菜单 “工具” -> “基本脚本” 中,自己稍微摸索一下即可。


本帖子中包含更多资源

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

x

出0入0汤圆

发表于 2015-10-24 15:53:28 | 显示全部楼层
CTRL+ALT+C然后更改颜色显示就可以了

出280入168汤圆

 楼主| 发表于 2015-10-24 16:05:48 | 显示全部楼层
daheshangshang 发表于 2015-10-24 15:53
CTRL+ALT+C然后更改颜色显示就可以了

是的,以前这么用了多少年,但在昨天终于忍不住了 ......

出110入8汤圆

发表于 2015-10-24 16:36:18 | 显示全部楼层
CTRL+ALT+F来设置筛选器,仅仅选中标签。

本帖子中包含更多资源

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

x

出280入168汤圆

 楼主| 发表于 2015-10-24 16:46:53 | 显示全部楼层
angler12 发表于 2015-10-24 16:36
CTRL+ALT+F来设置筛选器,仅仅选中标签。

谢谢兄弟的提示,这些常规的操作已经用了 N 年了

就是因为讨厌总在这些选择里面点来点去,所以才写了脚本。

现在就是单击一下脚本,设定啥的都搞定了,方便。

出0入0汤圆

发表于 2015-10-24 18:24:09 | 显示全部楼层
哈哈,支持分享,感谢。

出0入0汤圆

发表于 2015-10-24 23:04:05 | 显示全部楼层
谢谢分享

出0入0汤圆

发表于 2015-10-24 23:41:42 来自手机 | 显示全部楼层
有机会试试,谢谢分享

出0入0汤圆

发表于 2015-10-25 18:28:32 来自手机 | 显示全部楼层
这个方法好,谢谢分享.

出0入0汤圆

发表于 2015-10-25 19:47:50 | 显示全部楼层

其实在设置颜色显示方案的时候,多保存几个不同的方案,下次需要的时候,点2下鼠标就可以了

出280入168汤圆

 楼主| 发表于 2015-10-26 00:28:45 | 显示全部楼层
kevinstar888 发表于 2015-10-25 19:47
其实在设置颜色显示方案的时候,多保存几个不同的方案,下次需要的时候, ...

果然是这样,还真没留意过

出0入0汤圆

发表于 2015-10-26 07:09:30 | 显示全部楼层
谢谢楼主分享的脚本.

出0入0汤圆

发表于 2015-10-26 15:36:10 | 显示全部楼层
很实用,谢谢分享

出0入0汤圆

发表于 2015-10-27 09:44:50 | 显示全部楼层
kevinstar888 发表于 2015-10-25 19:47
其实在设置颜色显示方案的时候,多保存几个不同的方案,下次需要的时候, ...

然后我又把这个录制宏, 快递键一按就可以.

出0入0汤圆

发表于 2015-10-27 09:45:39 | 显示全部楼层
chunjiu 发表于 2015-10-26 00:28
果然是这样,还真没留意过

你的脚本也很不错.

出0入0汤圆

发表于 2016-4-15 00:23:32 | 显示全部楼层
谢谢分享, 不知doc还有哪些属性可以设置, 在哪里能找到相关文档?

出280入168汤圆

 楼主| 发表于 2016-4-15 09:09:20 | 显示全部楼层
本帖最后由 chunjiu 于 2016-4-15 09:28 编辑
MikePandora 发表于 2016-4-15 00:23
谢谢分享, 不知doc还有哪些属性可以设置, 在哪里能找到相关文档?


在安装好的 PADS 文档目录里面,例如从下面 PADS 的根目录往下找:

...\MentorGraphics\9.5PADS\docs\pdfdocs\padsrouter_user.pdf


看目录点开 Chapter 18 Router Automation ,再点击 Automation Objects

这里面详细介绍了宏脚本的对象和数据类型。

在 Automation Objects 可以看到 Document 对象的说明。

SAX BASIC 的语法说明在宏编辑器里面单击右键,选 HELP 里面的内容。在 Windows 7 下需要安装一个 HELP 阅读器补丁才能打开该帮助文件。

https://www.microsoft.com/zh-cn/download/confirmation.aspx?id=91

https://support.microsoft.com/zh-cn/kb/917607

本帖子中包含更多资源

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

x

出0入0汤圆

发表于 2016-5-9 22:08:27 | 显示全部楼层
如何安装那些模块。

出280入168汤圆

 楼主| 发表于 2016-5-11 10:11:35 | 显示全部楼层
鱼尾之恋 发表于 2016-5-9 22:08
如何安装那些模块。

就是《基本脚本》那个菜单里,在编辑器里将代码复制并保存。

然后在下一级的《基本脚本》选中需要的脚本,然后勾上《位于菜单中即可》。

出0入0汤圆

发表于 2016-5-12 21:07:52 | 显示全部楼层
chunjiu 发表于 2016-5-11 10:11
就是《基本脚本》那个菜单里,在编辑器里将代码复制并保存。

然后在下一级的《基本脚本》选中需要的脚本 ...

嗯,我也摸索出来了,不过还是谢谢。

出0入0汤圆

发表于 2017-10-7 22:57:40 | 显示全部楼层
谢谢分享
回帖提示: 反政府言论将被立即封锁ID 在按“提交”前,请自问一下:我这样表达会给举报吗,会给自己惹麻烦吗? 另外:尽量不要使用Mark、顶等没有意义的回复。不得大量使用大字体和彩色字。【本论坛不允许直接上传手机拍摄图片,浪费大家下载带宽和论坛服务器空间,请压缩后(图片小于1兆)才上传。压缩方法可以在微信里面发给自己(不要勾选“原图),然后下载,就能得到压缩后的图片】。另外,手机版只能上传图片,要上传附件需要切换到电脑版(不需要使用电脑,手机上切换到电脑版就行,页面底部)。
您需要登录后才可以回帖 登录 | 注册

本版积分规则

手机版|Archiver|amobbs.com 阿莫电子技术论坛 ( 粤ICP备2022115958号, 版权所有:东莞阿莫电子贸易商行 创办于2004年 (公安交互式论坛备案:44190002001997 ) )

GMT+8, 2024-4-20 02:02

© Since 2004 www.amobbs.com, 原www.ourdev.cn, 原www.ouravr.com

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