Re: [心得] AutoLISP 的 Hello, world!\n
http://www.autocad.com.tw/lisp_3.htm
AutoLISP 線上教學
免費
※ 引述《HiEArO (xsd)》之銘言:
: 謝謝你仔細的回答 我是第一次執行lisp程式
: 不曉得執行的流程
: ※ 引述《sjgau (sjgau)》之銘言:
: : 以下,應該是 正確的
: : (defun f2(n / )
: : ;
: : )
: : 我把 函數名稱改成 f2
: : 執行的方法是
: : (load "tmp.lsp")
: : (f2 10)
: 這兩行可以說是關鍵所在
: 我之前是有load進去,但是不曉得怎麼跑
: 經過第二行和以下執行結果的示範
: 我了解了 非常感謝回答 你的解答真的很詳細
: 若可以的話 可以教教我DEFINE的用法嗎?謝謝
: : 還有,第0項 和 第1項的答案都是 1
: : 還有,為了擔心 n < 0
: : 所以,
: : if (n <= 0) return 1;
: : 令: (f2 0)
: : 1
: : 指令: (f2 1)
: : 1
: : 指令: (f2 2)
: : 2
: : 指令: (f2 3)
: : 3
: : 指令: (f2 5)
: : 8
: : 指令: (f2 10)
: : 89
: : 指令: (f2 20)
: : 10946
: : 指令: (f2 25)
: : 121393
: : 指令: (f2 30)
: : 1346269
: : (defun f2 (n / )
: : (cond ((<= n 0) 1)
: : ((= n 1) 1)
: : (t
: : (+ (f2 (- n 1))
: : (f2 (- n 2))
: : )
: : )
: : )
: : )
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 59.104.49.221
討論串 (同標題文章)
本文引述了以下文章的的內容:
完整討論串 (本文為第 7 之 9 篇):
Cad_Cae 近期熱門文章
PTT數位生活區 即時熱門文章