您的位置:网站首页 > CAD教程 > CAD教程文章

提高CAD作图速度的几个方法

时间:2008-07-30 16:22:41 来源:
提高CAD作图速度的几个方法
1、 命令别名
用命令别名画图确实是个提高速度的好方法,因为你可以左右手同时开工。我想,大家也许都在网上看到过诸如CAD命令别名一览表之类的文章,其实,你根本美必要去下载那一览表,因为他已经存在于你的电脑上了。
在Cad安装目录Support目录下有一个acad.pgp文件,里面有你想要的一切命令别名。
2、 左手键
也许你已经知道在acad.pgp文件中定义你自己的命令别名,但你可曾想过将你常用的命令别名全改到键盘的左手区呢?
例如,按照“3A,   *3DARRAY”的格式,输入“FF,   *LINE”,保存,重新启动CAD,这是,只要输入“ff空格”就可以画出一条直线,怎么样,比你输入“l空格”要快一些吧!
哦,错!是成倍提高。
     注意:在改命令别名的时候,不要更改系统默认的命令别名,既让你的命令别名和系统默认的命令别名同时存在,否则,别人用你的电脑时就只好回到原始社会了。
这是我常用的一些命令别名(仅供参考,各人根据自己情况而定):
AC,         *AI_MOLC       
AD,         *ATTEDIT
AG,         *ALIGN
CA,         *CAL
CC,         *COPYCLIP
CD,         *LIST
CF,         *CHAMFER
CT,         *CUTCLIP
CR,         *COLOR
DA,         *DIMANGULAR
DD,         *OFFSET
DR,         *DIMRADIUS
DT,         *DIST
EE,         *LINETYPE
ER,         *LAYER
ES,         *ELLIPSE
FC,         *POLYGON
FD,         *OPEN
FF,         *LINE
FG,         *PLINE
FT,         *FILTER
GG,         *MOVE
GS,         *MATCHPROP
N,          *NEW
REE,        *RENAME
RA,         *RAY
RD,         *REDO
RT,         *ROTATE
SA,         *SAVEAS
SS,         *QSAVE
ST,         *STYLE
SD,         *DDSELECT
TB,         *TOOLBAR
TT,         *MTEXT
T,          *TEXT
V,          *U
VV,         *PASTECLIP
WW,         *MIRROR
XX,         *XLINE
QQ,         *PURGE #p#分页标题#e#

 

3、 简化部分命令
在绘图时,我们经常遇到这样的问题:
     在将两根直线合并为一根多段线时,要执行如下操作:
pe-空格-选择对象-(系统提示是否转化为多段线)-Y-空格-J-空格-选择对象,是不是很麻烦?
     又如你要进入对象坐标系,要执行如下操作:
     ucs-空格-n-空格-ob-空格-选择对象。
如果你新建一个文本文档,输入这样几句话:
;改为多段线-------------------------------GEss
(defun c:ge(/ ent)
   (setq ent (ssget))
   (command "pedit" "m" ENT "" "y" "" )
;合并-------------------------------将多个多段线合并为一个多段线GH
( defun c:GH(/ ent)
(setq ent (ssget))  
(command "pedit" "m" ent "" "j" "" "")
)
;改坐标系-----------------------世界坐标系cw
(defun c:cw()
(command "ucs" "w" )
)
;改坐标系-----------------------对象坐标系cs
(defun c:cs()
(command "ucs""n" "ob")
)
将文件另存为1.lsp,然后在cad中输入appload加载1.lsp(每次启动CAD后要重新加载),也可将1.lsp文件拷贝到Cad安装目录Support目录下,然后打开同一目录下的acad2000doc.lsp,在
;;;===== AutoLoad LISP Applications =====
;   Set help for those apps with a command line interface
之后加入(load "1.lsp"),这样,每次启动CAD时,系统将自动加载1.lsp文件。
加载成功后你会发现,输入“ge”
可以将N条直线直接改为多段线,“gh”可以直接将N条多段线合并为一条多段线(如果可能),输入“cs”选择对象,可以直接进入对象坐标系,输入“cw”回到坐标系。
下面是我常用的一些简化命令(仅供参考,各人根据自己情况而定):
;改成轴线center-------------------------- CE
(defun c:ce(/ ent)
   (setq ent (ssget))
   (command "change" ent "" "p" "lt" "center" "")
)
;改成虚线-------------------------------DH
(defun c:DH(/ ent)
   (setq ent (ssget))
   (command "change" ent "" "p" "lt" "DASH" "")
)
;改线形比例-------------------------------FS
(defun c:FS(/ ent)
   (setq ent (ssget))
   (command "change" ENT "" "p" "S"   )
)
;改线宽-------------------------------FW
(defun c:FW(/ ent)
   (setq ent (ssget))
   (command "change" ENT "" "p" "LW" )
)
;改为多段线-------------------------------GEss
(defun c:ge(/ ent)
   (setq ent (ssget))
   (command "pedit" "m" ENT "" "y" "" )
)
;改多段线宽-------------------------------GW
( defun c:GW(/ ent)
   (setq ent (ssget))
   (command "pedit" "" ent "w" )
)
;合并-------------------------------将多个多段线合并为一个多段线GH
( defun c:GH(/ ent)
(setq ent (ssget))  
(command "pedit" "m" ent "" "j" "" "")
)

;改坐标系-----------------------世界坐标系cw
(defun c:cw()
(command "ucs" "w" )#p#分页标题#e#
)
;改坐标系-----------------------对象坐标系cs
(defun c:cs()
(command "ucs""n" "ob")
)
;全范围缩放-----------------------ze
(defun c:ze()
(command "zoom" "e")
)
;全动态缩放-----------------------ze
(defun c:zd()
(command "zoom" "d")
)
;改成随层--------------------------------------------------------- 1
(defun c:0(/ ent)
   (setq ent (ssget))
   (command "change" ent "" "p" "c" "bylayer" "")
)
;改成红色--------------------------------------------------------- 1
(defun c:1(/ ent)
   (setq ent (ssget))
   (command "change" ent "" "p" "c" "1" "")
)
;改成黄色--------------------------------------------------------- 2
(defun c:2(/ ent)
   (setq ent (ssget))
   (command "change" ent "" "p" "c" "2" "")
)
;改成绿色--------------------------------------------------------- 3
(defun c:3(/ ent)
   (setq ent (ssget))
   (command "change" ent "" "p" "c" "3" "")
)
;改成青色--------------------------------------------------------- 4
(defun c:4(/ ent)
   (setq ent (ssget))
   (command "change" ent "" "p" "c" "4" "")
)
;改成蓝色--------------------------------------------------------- 5
(defun c:5(/ ent)
   (setq ent (ssget))
   (command "change" ent "" "p" "c" "5" "")
)
;改成紫色--------------------------------------------------------- 6
(defun c:6(/ ent)
   (setq ent (ssget))
   (command "change" ent "" "p" "c" "6" "")
)
;改成白色--------------------------------------------------------- 7
(defun c:7(/ ent)
   (setq ent (ssget))
   (command "change" ent "" "p" "c" "7" "")
)
;改成灰黑色--------------------------------------------------------8
(defun c:8(/ ent)
   (setq ent (ssget))
   (command "change" ent "" "p" "c" "8" "")
)
;改成9好色--------------------------------------------------------------9
(defun c:9(/ ent)
    (setq ent(ssget))
    (command "change" ent "" "p" "c" "9" "")
)
其实上面这些是lsp程序,我不太懂,望请高手指教。

4、 选择对象的技巧
在这我只说两种选择方式。
A、快速选择
B、对象选择过滤器
快速选择比较简单,此不详述。对象选择过滤器,命令为filter。
下面以选中图中的所有文字为例来介绍对象选择过滤器的用法。
     输入filter(如果定义了上述的左手键,可输入ft)空格,在选择过滤器栏中选择“文字”选项,然后点击替换按钮,在另存为后输入1,点击另存为按钮保存,点击应用按钮后就可以选择对象了。对象选择过滤器在对象很多时是很好用的。