iCAx开思网

标题: LISP教學-03 詳細說明 LISP檔案 [打印本页]

作者: sjgau 时间: 2004-6-7 18:46
标题: LISP教學-03 詳細說明 LISP檔案
AutoLISP 檔案，其實就是一般的文字檔案，沒有兩樣。

檔案裡面可以有很多行文字。
只要是 ( ... ) 括號開始，對應括號結束，
就是一個 LISP指令，可以跨很多行。

所以，以下的檔案內容，可以被執行
; --------------------------------------------------------------
(princ (+ 2 3))
(princ "\n")

(command "circle"
(list 1.1 2.2)
"3.3"
)
; 以上指令會畫出一個圓

(defun dTor(d1 / )
; r1= d1/180.0*pi
(* (/ d1 180.0) pi)
)
; 以上指令，會定義一個函數

(princ (sin (dTor 60.0)))
(princ "\n")
; 以上指令，會計算 sin(60.0)= ???

(defun C:plot_line( / )
(command "line"
   "1,1" "2,2" ""
   )

(princ)
)
; 以上指令，會產生一個 AutoCAD command
; 然後，就可以在指令行下，輸入 plot_line 這個指令

(princ)
; --------------------------------------------------------------

以上，試試看

欢迎光临 iCAx开思网 (https://www.icax.org/)