LISP教學-02 如何定義一個函數

sjgau

在 AutoCAD 指令行下面，想要計算
sin(0.5)= ?
只要輸入
(sin 0.5) [Enter]
  
即可得到 0.479426
0.5 是 弳度 radian
  
如果經常需要計算 x^3
可以編輯一個 LISP 程式，內容如下
  
; 這行是註解
  
(defun cubic(x / ); 這樣也是註解
    (* x x x)
); end of defun
  
(princ); 為何要多這一行，以後解釋
; ------------------------------------------------------
  
假設，存檔到 C:\test02.lsp
回到 AutoCAD 指令行下面，輸入以下指令
(load "c:/test02.lsp")
  
(cubic 2) [Enter]
即可看到答案：8
  
試試看

sjgau

sjgau

wayne

sjgau

sjgau