求一个选择集中X、Y的最大最小值

• 程序名称：TYMAXMIN<下载>
• 程序功能：求一个选择集中X、Y的最大最小值
• 格式：(TYMAXMIN ss)
  入口参数ss是一个选择集
• 返回：(x-min x-max y-min y-max)
  
• 说明： 本程序是我在编写另外一个程序时用到的子程序，花费了我两三个晚上的时间。
  程序对选择集中的直线、圆弧、圆、单行文本、多义线和块进行处理，求出X、Y的最大和最小值。选择集中的块可以放大、缩小或旋转，但不得嵌套。

关于用户坐标系的几个命令

1. 改变坐标原点
2. 旋转坐标系
3. 还原到原始坐标系
4. 快速切换到用户坐标系

<下载地址>

改变坐标原点

命令名： TYUO

说明：通过点选两条相交的直线，将其交点设为坐标原点；或者点选圆，将圆心设为坐标原点。

演示：

旋转坐标系

• 命令名：TYUX
• 使用说明：通过点选直线，即可将所选直线设定为新的X坐标轴。
• 演示

还原到原始坐标系
命令：U0

快速切换到用户坐标系

命令名：U1

• 使用说明：快速切换到用1命名的用户坐标系(见旋转坐标系的演示)

生成云线

程序名称：TYYunXian(下载)

命令：TYYX

说明：AutoCAD早期版本没有生成云线的命令，所以我就自己编写了一个。后来AutoCAD虽然有了这个功能，但一方面出于敝帚自珍的心理，另方面AutoCAD自带的云线功能也确实稍有不便，所以就一直用了下来。

使用方法：只要连续给出节点位置就可以了，最后用空格键封闭云线并结束命令。

演示

多义线焊接：TYPLJ

程序名称：TYPolyLineJoin (下载)

命令：TYPLJ

使用说明：选择欲连接成多义线的一组对象中的一条直线或圆弧，回车，搞定。

操作演示

在GIF动画的上添加静态文本

为了制作程序演示动画，从斑马网找到了友立GIF Animator的详细的使用教程：http://ulead.banma.com/index.shtml，可惜没讲我要的那种效果。我是想在演示中加文字说明，所以要在一些不同的帧上添加相同的文字，就象自由天空在《 怎样用Ulead GIF在动态图上写字》中讲的。不过我需要在几十、上百帧上加文字，自由天空的做法似乎太麻烦了，实用性不强。继续找。

现在是12点过了，整整一个晚上，总算解决了上面的问题（是从百度上找到的方法）：

• 另外添加一个空白帧
• 在空白帧输入要添加到文字
• 选中加了字的这帧，选取菜单栏->编辑->复制，进行复制
• 然后选中欲添加文字的所有帧，选取菜单栏->编辑->粘帖，进行粘帖
• 最后删除刚才建立纯文字的那帧，OK。

加上了访客留言板

昨天就找了一个晚上：想给自己的博客加上一个留言板。不明白Blogspot本身怎么会不带留言板呢？今天又用了一个晚上，按照小婆的Cbox 訪客留言之安裝與使用的说明，总算把留言板添上去了。虽然位置还有点偏，但总算能用了。

装饰我的家

这两天忙着查资料，想把我的家──桐阳模具CAD装饰得稍微漂亮、好用一点。虽然多少有些改观，可还是不能尽如人意。没办法，刚刚才开始使用博客这个东西，一切都要从头学起，就象燕子衔泥，一点点来吧。

AutoCAD命令行读书器TYReader

程序名称：TYReader(下载)

命令：TYR

使用说明：这是我自己感到比较满意的一个小工具。可以在命令行看书、学外语，用空格键和鼠标左键换行，在阅览的同时，可以用鼠标的中键和右键操控屏幕(放大、缩小或拖动)，用Q键更换文件，W键更改文件行号，随便点击其他任意键即可退出。

演示

试用网盘

这些天学着写博客，有很多东西都要从头开始。关于网盘的使用，我就试了好多种，有些已经记不得了，下面是我试用过的几种：

1. 网易网盘：只有登录网盘才能使用，不能共享；不支持外链，；
2. FileFlyer：只有通过email发送链接给对方，不能用于博客；
3. BRSBOX：我现在正在使用，上传、共享、管理都比较方便，缺点是下载稍嫌麻烦；
4. 纳米盘：正在试用，上传似乎挺不错，不知下载如何？
   纳米盘测试

纳米盘也和BRSBOX差不多，下载有点麻烦，界面还不如BRSBOX

再试一下BOX 测试

不亏是被大家称道的网盘，虽然还不能说完全满意，但BOX也基本可以满足要求了。好，暂时就先用BOX了。

在AutoCAD命令行写日记

程序名称：TYDIAry.FAS(下载)

命令：TYDIA

功能：可以在AutoCAD命令行中写日记

使用方法：加载程序，在命令行中键入TYDIA并回车后，会出现提示符DIA->，这时就可以方便的写日记了。一行写完，敲回车键开始下一行，连敲两次回车则退回到AutoCAD命令状态。
如果在TYDIAry.FAS放置目录中有日记文件MYDIA.TXT、MYDIA.LOG或MYDIA.WRI，则所写内容自动加入到该日记文件中，否则退出时会弹出一对话框要求选择日记文件。

日记文件的浏览和修改：可在WINDOWS状态下用文本文件编辑器浏览和修改，也可在AutoCAD环境下用工具软件
TYBRowser浏览或用TYEditer修改。

演示

关于网站地图

今天读了一篇关于网站地图的文章，很有收获。其中提到的几个搜索引擎的sitemap提交网址如下：

向百度提交网站:http://www.baidu.com/search/url_submit.html
google提交地址：http://www.google.com/intl/zh-CN/add_url.html
如何向雅虎提交网站：http://search.help.cn.yahoo.com/h4_4.html
msn提交网站：http://search.msn.com/docs/submit.aspx
向搜狐/搜狗判提交站点：http://db.sohu.com/regurl/regform.asp
TOM搜索提交地址：http://search.tom.com/tools/weblog/log.php
中搜提交地址：http://ads.zhongsou.com/register/page.jsp
向Alexa提交网址：http://www.alexa.com/site/help/webmasters
向Alexa提交更新：http://thumbnails.alexa.com/update_thumbnail
有道http://tellbot.yodao.com/report
主要搜索引擎提交页面：http://market.top1host.com/submit.html
(20/10/2008做了更新）

AutoCAD环境下的文本更改工具--TYEditer

1. 程序名称：TYEditer.FAS(下载)


2. 命令：TYE


3. 功能：不必退出AutoCAD环境即可修改文本文件(如日记)。我本想采用AutoCAD的多文本编辑器DDEDIT来编辑文本文件，但经过测试发现，含有某些特殊字符的文件经DDEDIT编辑后，有时会出现错误。暂时先用NOTEPAD来编辑了。


4. 使用方法：加载程序，在命令行中键入命令TYE并回车后，会弹出一文件选择窗口，选中欲编辑的文件后，再弹出NOTEPAD窗口用于文件编辑。


5. 演示

AutoCAD环境下的文本工具--TYBRowser

1. 程序名称：TYBRowser.FAS(下载)
2. 命令：TYBR
3. 功能：在AutoCAD环境下阅览文本文件(如日记)
4. 使用方法：加载程序，在命令行中键入命令TYBR并回车后，会弹出一文件选择窗口，选中欲浏览的文件后，再弹出一窗口用于文件阅览
5. 演示

会发GIF动画了

用了两个晚上的时间，总算学会如何在帖子上发GIF动画了。先是参考着阿熊的Google Blogger中发布GIF动画技巧 和其它几篇相关的文章，一点一点的摸索，然后又从网上下载了一个屏幕录像工具，最后总算贴上来了。不过，由于初次使用，动画的尺寸掌握不好，先是太大了，调整好大小之后，又失真了。算了，先这样了，等熟悉了再换吧。

关于如何发GIF动画，下面这篇文章中说的也很清楚：
http://www.my1510.cn/article.php?9b7ab8b9ca222b59

发现了一个PDF注释工具

一直想找一个好用的PDF文件注解工具，可一直没能如愿：不是收费的，就是功能不够理想。今天意外发现了这个PDF XChange Viewer，下载后试了一下，似乎还不错。
電腦玩物: 新版 PDF XChange Viewer 註解工具功能詳解

图层控制命令

打开点选（框选）图层(TYON)

关闭点选(框选)图层(TYOFF)

打开所有图层(TYA)

按照我的习惯，在进行模具设计时，不同的对象是采用不同的图层(我知道有些设计师是不太喜欢分图层的)，这样就使得图层的切换非常、非常的频繁。AUTOCAD2007之前，图层的切换是通过一个图层管理器，其效果么，我感到使用起来很不方便。于是在图层控制方面我花费了许多心思，编制了大量程序，现在基本做到了得心应手。例如，用命令"5"，可打开下部装配图的所有图层，包括下模板、下模垫板、下模座和下模镶块，同时关闭其他所有图层；而命令"51"，仅仅打开下模板这一层，其余各图层关闭，诸如此类。今天，我先整理了图层控制命令中比较通用的三个，即：通过选择实体来打开图层(TYON)、关闭图层(TYOFF)，以及打开所有图层(TYA)。

1. TYON

1.1 程序名称：TYlayON

1.2 命令名： TYON

1.3 下载地址 <TYLAYON.FAS>
文件下载后最好放在目录C:\TYLISP下(推荐)，或放在其他任何AUTOCAD支持路径下，加载后即可执行。

1.4 程序功能：
(a) 在命令行键入命令TYON，回车，点选实体，则仅打开所点选的实体所在的图层，其他图层全部关闭；

(b)在命令行键入命令TYON，回车之后，如果不接着点选实体而是再敲一次回车键，那么接下来可以框选实体或连续点选多个实体，则可以保留打开所选实体所在的图层，而其他图层关闭。

1.5 演示

2. TYOFF

2.1 程序名称：TYlayOFF

2.2 命令名： TYOFF

2.3 下载地址 <TYLAYOFF.FAS>
文件下载后最好放在目录C:\TYLISP下(推荐)，或放在其他任何AUTOCAD支持路径下，加载后即可执行。

2.4 程序功能：

(a) 在命令行键入命令TYOFF，回车，点选实体，则点选实体所在的图层关闭；

(b)在命令行键入命令TYOFF，回车之后，如果不接着点选实体而是再敲一次回车键，那么接下来可以框选实体或连续点选多个实体，则所选实体所在的图层将会关闭。

3. TYA

3.1 程序名称：TYlayAll

3.2 命令名： TYA

3.3 下载地址 <TYLAYALL.FAS>
文件下载后最好放在目录C:\TYLISP下(推荐)，或放在其他任何AUTOCAD支持路径下，加载后即可执行。

3.4 程序功能：这是本人最常使用的一个命令，其功能是打开所有图层。

Lisp程序加密工具----程序转换

程序名称：TYJIAMI.FAS<下载地址>

命令名： TYJM

程序功能：在设计开发LISP程序时，为了便于调试和日后阅读，变量名应尽量表达一定的含义，在程序中也要加上一些说明。而在程序发布的时候，为了防止别人破解，应去掉注释，并把变量名改成无特定意义的字符串。

在AutoCAD命令行键入命令后，弹出如下对话框，选择欲进行转换的文件，如图中选择了C:\TODAY目录下的TYJIAMI.LSP。

点击OPEN后，即可自动生成一个完成了转换的文件。

文件名是在原来的文件名前面添加了"NEW-"，如TYJIAMI.LSP转化后生成NEW-TYJIAMI.LSP，新文件存放的位置和原来的文件相同。

同时，在AutoCAD命令行中会列出转换前程序中的函数名，转换后它们将分别用TY1、TY2、TY3.....代替。

转换前后，命令名不变，即转换前是TYJM，转换后仍然是TYJM。

下面是转换前TYJIAMI.LSP的片断：

;;加密程序;
;;1--去掉程序中的注释--OK
;;2--将程序中的变量名转换成无意义字串--OK
;;3--加入注册码
;;4--转换成PFS文件
;;5--加入相关文件，如DCL文件，生成XL文件
;;;
(DEFUN c:tyjm (/)
;;置换表中指定位置的元素
(DEFUN sub_replace (a n l / i l1)
(SETQ l1 '()
i 0
)
(WHILE (<>

下面是转换后NEW-TYJIAMI.LSP里对应的片段：
( DEFUN c:tyjm ( / )
( DEFUN sub_replace ( TY1 TY2 TY3 / i TY4 )
( SETQ TY4 ' ( )
i 0
)
( WHILE ( <>

两者的区别显而易见。

多功能特性更改命令DDMODIFY的移植

在AutoCAD早期版本中有一个多功能特性更改命令DDMODIFY，每点选一个不同类型的实体以后，都会在屏幕上弹出一个特性更改窗口，使用非常快捷、方便。不知为什么升级到2002版本后，AutoDESK公司取消了这一功能，而代之以properties，可properties窗口太过繁杂，使用不便之外，用完之后还不会自动关闭。值得庆幸的是，DDMODIFY是一个外部命令：我从AutoCAD2000中找到了DDMODIFY.LSP和DDMODIFY.DCL两个文件，可是加载以后，当点选某些类型的实体进行更改的时候，常常引起AUTOCAD崩溃、退出。通过一次又一次的调试，我终于找到并排除了原程序中几处引起AUTOCAD崩溃、退出的错误。我把它从AUTOCAD2002，一直用到2004、2005、2007，效果良好。为了与原始的DDMODIFY区分，我把更改后的程序命名为TYMODIFY.
1. 程序名称：TYMOdify.FAS , tymodify.dcl

2. 命令名： TYMO

3. 下载与安装：请到我的网盘里下载TYMODIFY.FAS文件和动态对话框文件TYMODIFY.DCL

下载地址：<tymodify.fas> ， <tymodify.dcl>

这两个文件下载后，最好放在目录C:\TYLISP下(推荐)，或放在其他任何AUTOCAD支持路径下，加载后即可执行。

4. 演示