[日积月累]：工作中随手编的小程序，不断更新中。2006.7.7共28个。最新程序:文字增减

841594

会一点编程，在工作中便常常积累一些小程序，虽然个个都很简单，可积少成多了，却也能有效的减轻工作强度，或提升作图质量。这也是一笔小小的财富。
创建这个帖子，准备贴一些随手编的小程序。选择的标准，首先是实用，解决问题到位；其次是步骤简洁明了，希望用起来轻松有趣；第三，常见的，大家都有的东西就不贴了。
我慢慢贴，一星期贴一个，一年后也有50几个了。
说明：
1.欢迎下载和使用，但为了检索方便，除非有关用法上的疑问和建议，请不要随意跟帖，谢谢。
2.为了尽量避免命令重名引起的冲突，命令名称有时取得比较长，如果觉得不便，一定是你还不会用我的lisp工具箱程序。赶紧装一个吧，链接如下：
http://www.xdcad.net/forum/showthread.php?s=&threadid=142457
是免费软件，能轻松管理成百个小工具，自动加载、调用，根本不用记命令名。
3.因为是随手程序，所以不能保证及时进行版本更新，请谅解，但必要的更新也会不定期的发布，更新信息详见各自的介绍贴。
4.版本兼容性：这些程序用autolisp、vlisp编写，我的工作平台目前是acad2004，所有程序应能够兼容r2000以后所有的cad版本。不保证对r14的支持。
5.下载问题：本贴所有程序均免币下载，下载失败一般是网站问题，过些时间再下载就可以了，因此，对于要作者把程序发送到邮箱的请求，原则上不予回应，望谅。
6.加载方法：推荐使用lisp工具箱进行管理和调用，但这些vlx程序也可以独立加载：例如，要加载一个c:\aaa.vlx的文件。
方法1：在acad命令行键入 (load "c:/aaa.vlx") 注意路径中的斜杠要改写为反斜杠。
方法2：把vlx文件拖拽进打开的acad绘图窗口。
然后按提示输入命令名就可以了。

第一个，动态绘制洞口标志：
命令名：holemark

841594

效果：标记会随着鼠标的移动而翻转。

841594

2：制S形和D形的pline线。

841594

如图：

841594

3：让文字向物体对齐。
支持各种物体，包括图块，文字中心点不变。

20051025:修正了对ucs的支持。

841594

图解：

bsq

tale在ucs状态下不可用，有待改进

841594

八选一拷贝：
强烈推荐。
画出全部的可能性，然后擦掉不要的，用手画图没人这么干。可用电脑干就不一样了。这个程序能一步实现拷贝、特定角度的旋转、镜像操作，特好用，还挺好玩的。

20051025：增加隐藏选项R,可以设定基准旋转角度，进一步扩大了应用范围。及其他小改进。

841594

样例：

841594

5:
通过点选将文字切断，点在哪儿断在哪儿。

841594

示意：

841594

6.物体对换位置：
偶尔会需要把两组物体的位置交换，有时不免会重叠，选择起来比较麻烦，这个简单的小程序能简化这个问题。

841594

说明：

841594

7.不等比缩放：
分别指定xyz方向的放缩比例来缩放物体。

841594

效果：