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)
; --------------------------------------------------------------
  
以上，試試看