2011.09.09 更新
本帖最后由 tengte 于 2016-6-6 10:16 编辑下载软件：
〖更新时间：2014.04.22〗有时AutoCAD打开某些DWG文件时，会出现若干“** 符号未定义: \U+00XX。”（英文版中为“** Glyph not defined at: \U+00XX.”）。用Regen刷新、文字编辑、文字样式修改、块编辑等操作都会反复出现这些错误信息，严重影响速度和心情！经过我的研究，发现这个问题是由字体文件与文字对象不匹配造成的。当文字样式较多时，要直接查找哪些字体文件不匹配也比较麻烦。为了解决这个问题，编写了这个独立的小程序（执行命令为：CTS）。
下载程序：**** Hidden Message *****
〖更新时间：2014.04.29〗对于一些配套专业（如建筑结构、建筑机电等专业），时常会遇到其它专业频繁提图的问题。有时前后两版图只有少量的改动，但如果绘图的人没有好的习惯或没有经验，没有把修改的地方标识出来，这时可能需要进行对比，找出修改的地方。如果图纸中图元非常多，这将是一项困难的工作。为了解决这个问题，编写了这个的小程序。程序调用了一些《TB Tools》中的通用函数，需要加载《TB Tools》或其中的Common.fas，才能正常执行。本程序包含两个命令：CDwg和RCD。
下载程序：**** Hidden Message *****
〖更新时间：2014.06.22〗本程序是对《TB Tools》中原有选择集功能的升级。保留了原有功能：记录选择操作，并可对选择集求并集、交集、差集。同时，增加了自动记录满足指定条件的选择集的功能。
自动选择集是利用AutoCAD的命令反应器，记录AutoCAD内部命令执行时选择的对象集合，需选择完成才有效（若选择过程中取消命令，则本次已选择的对象集合不会被记录）。另外，对自定义命令（如LISP程序中用ssget函数）的选择集不会记录。详见附件中说明。
下载程序：**** Hidden Message *****
<P><FONT color=magenta size=2>下载后请先看《帮助文档.chm》，其中有详细的使用说明和功能介绍。</FONT></P>
<P></P>
<P><FONT color=#000000></FONT> </P><FONT color=#000000>
<P><FONT color=blue><FONT face=Verdana>〖</FONT>更新时间：2011.09.09〗现将前一段时间的更新，重新打包，方便支持的朋友下载。</FONT></P>
<P><FONT color=blue>同时新增两个功能：1、将绘图命令与图层关联，自动切换命令的当前图层，命令结束或取消后自动恢复以前的图层。2、按Excell表格内容，插入图块并填写属性。</FONT></P>
<P><FONT color=#ff0000 size=3></FONT></P>
<P><FONT face=Verdana></FONT> </P>
<P><FONT face=Verdana>〖</FONT>更新时间：2011.09.04〗这几天写了一个AutoCAD小程序，用于将绘图命令与图层关联。先放一个预览出来(若在线观看有重影，请下载到本地后观看）：</P>
<P></P>
<P> </P>
<P><FONT face=Verdana>〖</FONT>更新时间：2011.08.01〗INIT.FAS，解决出现“9999: UNKNOWN ERROR!”的错误！有效期延长至2012.06.30。</P>
<P><FONT face=Verdana></FONT></P>
<P><FONT face=Verdana>替换该文件后，重新打开CAD，然后在命令行执行：</FONT></P>
<P><FONT face=Verdana> (vl-registry-write "HKEY_CURRENT_USER\\Software\\Autodesk\\AutoCAD" "" "")</FONT></P>
<P><FONT face=Verdana>即可。</FONT></P>
<P><FONT face=Verdana></FONT> </P>
<P><FONT color=red><FONT face=Verdana>〖更新时间：2011.01.06〗公布本工具的</FONT><FONT face=Tahoma>菜单项和工具按钮的接口函数</FONT></FONT></P>
<P> 自从2009年5月《TB tools》首发后，由于众多网友喜欢和支持，让我有动力去多次更新和完善。由于工作的关系，我以后可能没有太多的时间去更新它，望各位网友谅解！<BR> 我本想把TB tools设计为一个插件平台，成集众多的功能，也能让大家向其中添砖加瓦。<BR> 不知道有没有网友喜欢它的菜单和工具栏？其实你的LISP程序也能加到这里边来，按我下面的说明，很简单就能实现。<BR> 首先说说添加菜单项和工具按钮的接口函数（在Init.fas中定义），函数定义如下：<BR> <FONT color=blue>(defun TB:MTAddItem(parent caption macro HelpString icon fence dock) ... )<BR></FONT> 参数说明：<BR> parent──上级菜单（字符串）。为空或空串时，菜单项caption添加到一级子菜单中；否则parent为一级子菜单，caption添加到其下的二级子菜单中。<BR> caption──菜单项名（字符串）。<BR> macro──菜单宏（字符串）。选中菜单或按钮时，执行的命令。一般为与该菜单和按钮关联的函数名。若为tb为前缀时，还会将其加入到AutoCAD内置命令集中。<BR> HelpString──菜单项帮助信息（字符串）。鼠标或光标停留在菜单项时，在状态栏显示的提示信息。<BR> icon──工具按钮的位图名（字符串）。目前系统只支持位图(.bmp)，需要将其放到ICO目录下。调用时，参数只要位图名，不需要后缀(.bmp)。<BR> fence──菜单项或按钮位于菜单或工具栏某区域内的位置（整数）。可为负数，意为倒数第几个。<BR> dock──菜单项或按钮位于菜单或工具栏的哪个区域（整数）。菜单和工具栏被分隔为若干个区域，用于分类放置。可为负数，意为倒数第几个。<BR> 例1、为"打断交叉线"的函数（C:tbBL）添加到一级子菜单中的用法：<BR> (TB:MTAddItem nil "打断交叉线" "tbBL" "按指定距离断开交叉的图线" "090301" 2 3)<BR> 例2、为"管理选择集"的函数（C:tbSSM）添加到二级子菜单中的用法：<BR> (TB:MTAddItem "选择集" "管理" "tbSSM" "管理选择集:新建、浏览(删除和更改)、计算并集、交集、差集" "090202" 2 1)<BR> 例3、为"帮助信息"的函数（C:tbHelp）添加到位于最后一个区域的一级子菜单中的用法：<BR> (TB:MTAddItem nil "&Help" "tbHelp" "帮助信息" "Help" 1 -1)</P>
<P> </P>
<P><FONT face=Verdana>〖更新时间：2010.10.28〗更新为简体中文菜单，以及前期更新整体打包。</FONT></P>
<P></P>
<P> </P>
<P><FONT face=Verdana>〖</FONT>更新时间：2010.10.19〗INIT.FAS，解决出现“9999: UNKNOWN ERROR!”的错误！有效期延长至2011.06.30。</P>
<P></P>
<P><FONT face=Verdana>替换该文件后，重新打开CAD，然后在命令行执行：</FONT></P>
<P><FONT face=Verdana>(vl-registry-write "HKEY_CURRENT_USER\\Software\\Autodesk\\AutoCAD" "" "")</FONT></P>
<P><FONT face=Verdana>即可。</FONT></P>
<P> </P>
<P><FONT face=Verdana>〖</FONT>编辑时间：2010.07.15〗更新INIT.FAS，加入<FONT face=Verdana>Toolbar.mnu</FONT>，<FONT face=Verdana>增加对AutoCAD2004的支持</FONT>！</P>
<P>用法：将两文件解压到 <FONT face=Verdana>BIN </FONT>文件夹下即可！</P>
<P></P>
<P><FONT face=Verdana></FONT> </P>
<P><FONT face=Verdana>〖</FONT>编辑时间：2010.07.02〗更新LOAD.FAS和INIT.FAS，解决出现“9999: UNKNOWN ERROR!”的错误！</P>
<P> </P>
<P><FONT color=#000000></FONT> </P>
<P><FONT color=#000000>〖<FONT face=Tahoma>编辑时间：2010.05.05〗</FONT>现将前一段时间的更新，重新打包，方便支持的朋友下载。</FONT></P>
<P> </P>
<P><FONT color=#000000 size=2 face=黑体><FONT size=3><FONT face=Verdana></FONT></FONT></FONT> </P>
<P><FONT color=#000000 face=黑体><FONT size=2><FONT face=Verdana>〖</FONT><FONT face=Tahoma>编辑时间：2010.01.26〗</FONT>更新[批量修改块属性]的功能，增加对真彩色和配色系统的支持（旧程序对这两种颜色无效）。</FONT></FONT></P>
<P><FONT color=#000000></FONT></P><FONT color=#000000>
<P><FONT color=#000000></FONT> </P>
<P><FONT color=#000000>〖<FONT face=Tahoma>编辑时间：2009.10.27〗</FONT>更正加载LOAD.FAS出现：“no function definition: VLAX-PRODUCT-KEY”的BUG。</FONT></P>
<P><FONT color=#000000></FONT></P>
<P><FONT color=#000000></FONT> </P>
<P><FONT color=#000000>〖<FONT face=Tahoma>编辑时间：2009.10.18〗</FONT>由于有朋友受“acad.lsp病毒”的困扰，最近新制作了一个AutoCAD系统变量检测的功能。</FONT></P>
<P><FONT color=#000000>CAD的系统变量有好几百个，不同版本之间也有差异。系统变量的用途和类型也各不相同，有只读型的，有时时变化的，有保存于注册表中的，有保存于DWG文件中的，也有不保存的。因此，对所有的系统变量进行保存和恢复的意义不大。现在，有些所谓的CAD病毒，主要是修改了部分“控制型”的系统变量，实现其“破坏作用”。所谓“控制型”，是指控制某动作是否执行，或按某种形式执行，该系统变量的值一般为整数型（还有“位码”，其实也是整数）。据此，只需对部分的控制型系统变量进行监测和恢复，就可发现CAD病毒，并修复被破坏的功能。</FONT></P>
<P><FONT color=#000000>下载链接：</FONT></P>
<P><FONT face=Verdana><FONT size=2><FONT color=#000000><FONT size=3></FONT></FONT></FONT></FONT></P>
<P><FONT size=3 face=Verdana></FONT> </P>
<P><FONT face=Verdana><FONT size=2><FONT color=#000000><FONT size=3>〖<FONT face=Tahoma>编辑时间：2009.10.09〗</FONT></FONT><STRONG>批量去除或添加</STRONG>[教育版打印戳記]的功能，增加对AutoCAD 2004和2010的支持，其中2010的测试过的版本为XP，Beta4。只需替换2009.09版中DLL文件夹下的tbACAD.dll文件即可：</FONT></FONT></FONT></P>
<P><FONT color=#000000></FONT></P>
<P> </P>
<P>〖<FONT face=Tahoma>编辑时间：2009.09.27〗<FONT color=#000000 size=4 face=黑体>帮助文档已更新：</FONT></P>
<P><FONT color=#000000> </FONT></P>
<P> </P></FONT>
<P>〖<FONT face=Tahoma>编辑时间：2009.09.21〗</FONT>对不起，还有一个文件有更新，忘了打包进去，请替换该文件：</P>
<P></P>
<P> </P></FONT>
<P><FONT color=#000000><FONT color=#444444>〖<FONT face=Tahoma>编辑时间：2009.09.21〗</FONT></FONT>新版本2009.09发布(还是没有时间更新帮助文档)：</FONT></P>
<P><FONT color=#000000> <FONT face=Verdana>新增<STRONG>批量去除或添加</STRONG>[教育版打印戳記]的功能。</FONT></FONT></P>
<P><FONT color=#000000 face=Verdana> 特点：1、处理过程中，不会弹出教育版确认和继续对话框；</FONT></P>
<P><FONT color=#000000 face=Verdana> 2、没有转换到DXF文件的中间过程，也就不存在修复的问题，当然速度应该会快一些；</FONT></P>
<P><FONT color=#000000 face=Verdana> 3、可包含子文件夹，转换后目录结构不变。可覆盖原文件，会自动生成.bak备份文件；</FONT></P>
<P><FONT color=#000000 face=Verdana> 4、处理文件比较多时，会花较长的时间，因此加了一个进度的显示，以便了解执行的情况。</FONT></P>
<P><FONT color=#000000 face=Verdana> 目前此功能只支持AutoCAD 2006-2009，在AutoCAD 2007下测试通过，由于没有安装AutoCAD其它版本，所以没有经过完全的测试，但理论应该没什么问题。欢迎有兴趣的朋友帮我测试一下，谢谢！</FONT></P>
<P><FONT face=Verdana><FONT color=#0000ff size=5>另：我还有一个与此功能相关的工具软件<FONT color=red>《EPS(去除或添加AutoCAD教育版打印戳记)》</FONT>，请参见：</FONT><A href="http://bbs.mjtd.com/forum.php?mod=viewthread&tid=78256"><FONT color=#0000ff size=1>http://bbs.mjtd.com/forum.php?mod=viewthread&tid=78256</FONT></A></FONT></P></FONT>
<P></P>
<P> </P>
<P><FONT face=宋体><FONT size=3><FONT face=Verdana>〖</FONT><FONT face=Tahoma>编辑时间：2009.05.13〗</FONT></FONT></FONT>新版本发布(没有时间更新帮助文档，以后完成再单独上传)：</P>
<P> 1、增加<FONT color=#0000ff>修改编号</FONT>、<FONT color=#0000ff>修改标高</FONT>、对<FONT color=#0000ff>数字文本</FONT>进行<FONT color=#0000ff>四则运算</FONT>的功能；</P>
<P> 2、增加根据<FONT color=#0000ff>图案填充</FONT><FONT color=#00ffff>绘制其边界</FONT>的功能。</P>
<P></P><P></P>
<P><FONT face=宋体><FONT size=3><FONT face=Verdana>〖</FONT><FONT face=Tahoma>编辑时间：2009.05.10〗</FONT></FONT></FONT></P>
<P><FONT size=2 face=宋体> 本工具是我在学习、工作之余，加上对编程的爱好，用纯LISP编写而成。 <BR> 编写这个工具的目的：解决当前 AutoCAD 绘图中的一些不足或不便，提高绘图的效率，并将日常积累的一些小程序整理成集，以方便使用。 </FONT><FONT size=2 face=宋体><BR> 为方便操作，主要的命令都添加了<FONT color=#ff0033>菜单</FONT>和<FONT color=#ff0033>工具按钮</FONT>，相关的参数也具有<FONT color=#ff0033>记忆功能</FONT>（与AutoCAD类似）。 <BR>主要包括以下功能：<BR> 1、<FONT color=#ff0033>记录选择</FONT>操作，并可对选择集求并集、交集、差集。<BR> 2、<批量>按原型修改块属性文字的<FONT color=#ff0033>对齐方式</FONT>，以及在块中的<FONT color=#ff0033>相对位置</FONT>。原型是指已修改好的块，与其同名的块把它作为模板来进行修改；块中的相对位置是指属性对齐点与块的插入点的相对位置。<BR> 3、<批量>修改<FONT color=#ff0033>块属性文字</FONT>的高度、颜色号、旋转角度、样式、图层。 <BR> 4、导出由<FONT color=#ff0033>Line组成的表格</FONT>中的文字，保存到Excel文件中。<BR> 5、AutoCAD 表格中内容导出至 <FONT color=#ff0033>EXCEL</FONT>，或从 EXCEL 导入。<BR> 6、按<FONT color=#ff0033>指定的距离</FONT>断开交叉的图线，并可多次修改断开的距离(兼有Trim和Extend的部分功能)。<BR><BR> 详细内容请参见附件压缩包中的《<FONT color=#ff0033>帮助文档.chm</FONT>》。<BR><BR> 本工具尚在不断完善之中，没有经过严格的测试，可能存在一些 BUG。欢迎使用者反馈相关信息，并提出您宝贵的意见和建议，谢谢！</FONT><BR></P>