巧妙運用AutoCAD中的cal函數

AutoCAD作為一個專業繪圖軟體在機械、電子、建築及航空等領域得到了廣泛的應用，但是大多數AutoCAD的使用者只知道AutoCAD具有強大的 繪圖功能，卻很少有人注意到AutoCAD中的一個非常有用的命令：幾何計算器cal。和普通的計算器一樣，cal幾何計算器可以完成加、減、乘、除運算 以及三角函數的運算。這使得用戶在使用AutoCAD繪圖過程中，可以在不中斷命令的情況下用計算機進行算術運算，AutoCAD則將運算的結果直接作為 命令的參數使用。 ?/O+5rjA 
   但重要的是，與一般的計算器不同，AutoCAD幾何計算器可以作幾何運算。它可以作坐標點和坐標點之間的加減運算，可以使用AutoCAD的OSNAP 模式捕捉屏幕上的坐標點參與運算，還可以自動計算幾何坐標點。如計算兩條相交直線的交點，計算直線上的等分點等。此外，AutoCAD幾何計算器還具有計 算矢量和法線的功能。 -y~JNDS1] 
一、Cal函數的計算功能運用 tTY(I1 
   在AutoCAD中，cal命令類似於一個普通的計算器，可以用來計算與加、減、乘、除等有關的標準數學表達式，並遵從運算表達式的標準數學運算次序。而 且，cal命令還是一個透明名令，可以用來提供一個點或一個數。當我們透明執行該命令時，其計算結果被解釋為AutoCAD命令的一個輸入值。下面是透明 執行計算器功能的一個實例。 ^0VI J)y 
以（200，200）為圓心繪製半徑為[(425-260)*(1/3)+sin(45)]的圓。 5dhRuc 
(1)在命令行輸入：C，並按ENTER鍵； 1=s%.0 
(2)命令行提示： “指定圓的圓心或[三點（3P）/兩點（2P）/相切、相切、半徑（T）]:”,輸入（100，100）並按ENTER鍵； K@h v[4 
(3)命令行提示：“指定圓的半徑或直徑：”，此時輸入：“cal”，並按ENTER鍵,然後輸入表達式： =U?"#  
(425-260)*(1/3)+sin(45)並按ENTER鍵； q4VOK 'N 
(4)命令行顯示：41.9571。即AutoCAD以表達式的值41.9571為圓的半徑繪製了一個圓。 S\Q/ "Y 
二、Cal函數在找點中的運用 d6_ CsqV 
   在使用AutoCAD繪圖中，常常需要確定一些無法直接給出坐標的點。例如，任意兩點間的中點，和任意方向直線相切的圓的圓心，以及直線上任意等分點等。這裡可以充分利用AutoCAD的cal函數的幾何運算功能，在AutoCAD繪圖中實現這些點的快速定位。 iNha<iS+ 
下面是利用AutoCAD的cal函數的幾何運算功能實現在AutoCAD繪圖中經常遇到的一個快速定位的實例。 !Y5O3^I=u 
例如，要從一個圓心距一直線的端點之間的2/3處為起點畫一直線。操作過程如下： G|.>p<q  
Command: line From point: 'cal （起動幾何計算器） s`&8tP 
Expression: plt(cen,end,2/3)(輸入表達式，這裡計算器把OSNAP的cen和end模式當作點坐標的臨時存儲單元) fAJQ8nb{@] 
Select entity for CEN sanp:(用游標捕捉圓心) NoV2<mcontentnbsp;
Select entity for END snap:(用游標捕捉直線的端點) sz_|py?0 
To point: c 8#A^q} 
其他的目標捕捉模式，如int、ins及tan等均可在幾何計算表達式中使用。 z!eY=G' 
三、Cal函數在AutoLISP中的運用 7` &K=( . 
   一些AutoCAD的高級用戶經常運用AutoLISP對AutoCAD進行二次開發，但是AutoLISP所自帶的函數運算式的表達方法與我們通用的函數運算式的表達方法不一樣，這就給開發過程帶來了一定的麻煩。大家都知道，AutoCAD R12及以上版本均內含了一個功能強大的幾何計算器cal，它提供了各種常用的函數功能。 &c0U\G|j 
但是很少有資料提及的是：幾何計算器cal可以作為一個函數直接在AutoLISP中調用，除此之外，它還能接受AutoLISP變數進行運算。 u3Ua>A- 
這裡以繪製一個y=2x-100sin(x)的函數曲線為例，給出cal函數在AutoLISP中的應用。函數曲線繪製程序如下： *l^h;RSx 
(defun Psin(d) ;其中d是函數的步長 wS#.W zp.w 
(setq i 0) dtr8u 
(setq e 360) RD<l<+C^~ 
(setq x i) //Ck1cI#h 
(setq y (cal "2*x-100*sin(x)")) a6fMx~ 
(setq p1 (list x y)) W& w -yZ 
(while (< i e) \-gZ_>) 
(setq i (+ i d)) noV]+1#"V 
(setq x i) I HgYgn 
(setq y (cal "2*x-100*sin(x)")) H0_hQ:K  
(setq p2 (list x y)) W/OZ}ky}^ 
(command "_line" p1 p2 "") t?iCq1 
(setq p1 p2) }mzM'9JH 
) ORD@+ { 
) s8Xort&  
從上面的例子可以看出，由於使用了cal函數，AutoLISP程序中的函數表達式變得方便簡捷，尤其是可以採用這個方法編製通用函數曲線輸入繪製程序， 以彌補AutoCAD沒有函數曲線繪製命令的缺陷。但是在使用過程中要注意這兩種函數的表達方法所使用的單位並不完全一致，在AutoLISP中角度使用 的是弧度，而利用cal函數時使用的角度單位與AutoCAD中的默認單位一致。 I6ffp!^}Y 
四、小結 R&PQU/t) 
   靈活運用AutoCAD自帶的功能強大的cal幾何計算器，不但可以執行標準數學功能，而且可以計算點、矢量表達式以及實數和整數表達式，還可將 AutoLISP變數插入算術表達式並返回表達式的值，以給AutoLISP變數賦值。無論是初級使用者還是運用AutoLISP進行二次開發的高級用 戶，在AutoCAD的使用中巧妙地運用cal函數都可以收到事半功倍的效果 c%n[v3]

這些文章，你可能也喜歡