引 言 ?te~[_oT
[8jIu&tJf
几何计算器是AutoCAD R12提供的一个十分有用的工具。和普通的计算器一样，几何计算器可以完成+、-、*和/的运算以及三角函数的运算。这使得用户在使用AutoCAD绘图过程中，可以在不中断命令的情况下用计算机进行算术运算，AutoCAD则将运算的结果直接作为命令的参数使用。但重要的是，和一般的计算器不同，AutoCAD几何计算器可以作几何运算。它可以作坐标点和坐标点之间的加减运算，可以使用AutoCAD的OSNAP模式捕捉屏幕上的坐标点参与运算，还可以自动计算几何坐标点。如计算两条相交直线的交点，计算直线上的等分点等。此外，AutoCAD几何计算器还具有计算矢量和法线的功能。当然，AutoCAD几何计算器还有其它的功能，这里就不一一罗列。 [eLMb)n
" rA-u)Te
在使用AutoCAD绘图中，常常需要确定一些无法直接给出坐标的点。例如，任意两点间的中点;和任意方向直线相切的圆的圆心;以及直线上任意等分点等。这就是我们通常所说的CAD绘图的定位问题。实际上，在许多计算机绘图场合，定位是否方便和精确往往直接影响作图的效率和速度。因此，应该充分利用AutoCAD几何计算器的几何运算功能，来实现AutoCAD绘图中的快速定位。 g|TWoRx:
H Q :Y:
在命令提示Command：下键入CAL或激活下拉式菜单的辅助菜单项拾取其中几何计算菜单项都可启动AutoCAD几何计算器。CAL命令也是一个透明命令，可以在其它的命令下随时启动几何计算器。此外，还可以在AutoLISP程序中使用CAL命令。 X rl# DN
1Be/(pSc
下面是利用AutoCAD几何计算器的几何运算功能实现在AutoCAD绘图中经常遇到的几个快速定位的实例。 Zz/
z7~ {
*(E]]8o
1.在两实体间确定中点 pF/s5z
iVT)V>U p
这里不需先在两个实体之间画一条辅助线再用OSNAP的MID模式得到中点。例如，要从一个圆心和一直线的端点之间的中心为起点画一直线。操作过程如下： q\Q'9Rl0(
T {:8,CiW
Command: line 0 hg4y
8B! Mg NKV
From point: 'cal (启动几何计算器) rHi BW!
(h"-#q8$
>> Expression: (cen+end)/2 (输入表达式，这里计算器把OSNAP的cen和end模式当作点坐标的临时存储单元) UMUG ~P&@
G,!{Q''w
>> Select entity for CEN snap:(用光标捕捉圆心) \& /V p`
<c%
>> Select entity for END snap:(用光标捕捉直线的端点) H7FOf[3'
CT?4A1[aD
To point: r17"i.n
uA4x x Y
其它的目标捕捉模式如int、ins 、tan等等均可在几何计算表达式中使用。如果用表达式(cur+cur)/2代替表达式(cen+end)/2，则可以在计算机要求输入点时，再设定OSNAP方式来捕捉所需的点。 qr4.s$VGs*
(T!#7
2.确定一条直线上的任意等分点和与直线端点定长的点 !LM9
p(>D5uN_}5
使用几何计算器提供的plt和pld函数可以完成这个操作。假设屏幕上有一端点为A和B的直线，要在直线上获得分直线段AB为1比2的点。仍以画直线为例，操作过程如下： w?V;ItcL
x 3:d/>b
Command: line qC6@
lk*w M?Z
From point: 'cal s~06%QEG
m*|G 2
>> Expression: plt(end,end,1/3) !&},h=
b$q~(Z}
>> Select entity for END snap:(用光标捕捉端点A) &'k:?@J[
< &kl :|
>> Select entity for END snap:(用光标捕捉端点B后即得到距A点为1/3线段长的点) [}I|tb>Pg
n"w>Y)C(X)
To point: "m > BE
MFn\[J`Ra
如果要得到直线上距端点A为5的点，使用函数pld(end,end,5)代替上面操作过程中的plt(end,end,1/3)即可。 ioBY xbY`
;b}cn!U]
3.用相对坐标来确定点 ^EJ]L Nk }
3aw-fuuIb
在绘图中，经常要相对一条线画出另一条线，下面就是操作过程： ;#L]7ZY9:-
=6a=`3r!I
Command: line T 9FGuit9
.oM;D~(=9
From point: 'cal e(I;[G +%,
iUbcvF3aP
>> Expression: end+[2,3](作点和点的相加运算)
VIaj])m
Z.`0
>> Select entity for END snap:(捕捉一基准直线的端点后即可获得距端点相对位移(2，3)的点) ;OC{B}.vH
E~c>j<'-"<
To point: P~84#5R1
G \R6=K:f7
这个功能和AutoCAD R13中提供的From目标捕捉模式相似。 ;6$W-W _
7+E r}y>
4.作和一斜线相切的圆以及过圆上一点作圆的切线 l{QlJ>%~{;
#y'p4Xf
利用AutoCAD正交模式可容易地画出和垂直线或水平线相切的圆。画一个和斜线相切的圆则需要准确地确定圆心。操作过程如下： 0ybMI+*
+7{8T{
Command: circle jX .' G
Wcbm,O4u
3P/2P/TTR/: 'cal .pG`/[*a
m=TZfa^r
>> Expression: cur+3*nee(cur表示用光标在屏幕上拾取一个点，nee函数用来计算两端点矢量的法线，3是圆的半径) j$<g8Bg=o
_FU}IfG>t
>> Enter a point:nea(用光标在直线上捕捉一个点作为圆和直线的切点) k*OHI/uiow
dt 0(04
to >> Select one endpoint for NEE:(用光标捕捉直线的一个端点) CDY3 +!
cT@H49#uB
>> Select another endpoint for NEE:(用光标捕捉直线上的另一个端点) V/xjI< ,
_q4Yq'dI
Diameter/ <1.6745>: 3(给出圆的半径后即可画出这个圆) 8@ S@^C*F
G.r =fNP
改变光标捕捉直线两个端点的顺序可在直线的另一侧画圆。 {8 &=t8,c
&;R BG$t
假设过圆和一直线的交点作圆的切线的操作过程如下： R[kF( C&
|tC= j.
Command: line _0y]U];ce
PzT@ q\O
From point: int(捕捉交点) a^Z=xlJ/uZ
e:K'e2
of V+zn`
\a
WpOH1[ 8v
To point: 'cal /z(d!0_q|v
Q3'P< "u
>> Expression: int+3*nor(cen,int) ! ?sB=qo
K"!U&`T
>> Select entity for INT snap:(用光标捕捉交点) #%pY,AK:=
XtE O )
>> Select entity for CEN snap:(用光标捕捉圆心) N'PK4:
7q:;3;"9
>> Select entity for INT snap:(再用光标捕捉交点即画出从交点出发长度为3的已知圆的切线) pU<GI@gU
P`S'F_IN
To point: C`uL
4r
FxT] *mo
5.过一条斜线上的已知点作斜线的垂线 a|DCpU}
5=fS^]- F
因为是非水平非垂直的直线所以不能用AutoCAD的正交模式画直线的垂线。利用几何计算器可直接画出和斜线垂直并且为确定长度的直线。实际上这是一个如何确定垂线的另一个端点的问题。其操作过程如下： 机械设计 og_ylCh:
Nrq/Pkmy
Command: line ti 3S'K0t
7q{yLcC"
From point: mid(设过直线的中点作垂线) ,Xg^rV~]
\9~Q+~@{G
of o?+?@Xb'
Y5P9z{X=
To point: 'cal t0za%q!fK<
3#aLCpVla
>> Expression: mid+5*nee(5是垂线的长度) Y / LS(b*
0X$2~jV>
>> Select entity for MID snap:(用光标选择斜线捕捉中点) o}D
}Q"=A
hu7o J H
>> Select one endpoint for NEE:(用光标捕捉直线的端点) k2.\1}\
L=.@hs
>> Select another endpoint for NEE:(用光标捕捉直线的另一个端点) 9{rE7OX*A
_n4_;0
to point: $@w ,9J\
tv 2k&\1
同样，改变光标捕捉直线端点的顺序，也可在直线的另一侧画垂线。
