Re: [問題] 請問AutoLISP如何寫自己呼叫自己的迴圈?
※ 引述《MTLOVER (我要加油~~~)》之銘言:
: 請問大家
: 如以下的程式碼:
: (setq ask (getstring "\n是否還要選點?[Y/N]"))
: (While ask(= Y)
: (setq p5 (getpoint "\n請選點:"))
: (setq p5x (nth 0 p5)
: p5y (nth 1 p5)
: p5z (nth 2 p5)
: )
: (setq m11 (((* p5x p5x)+) m11)
: m12 (((* p5x p5y)+) m12)
: m13 ((p5x +) m13)
: m21 (= m12)
: m22 (((* p5y p5y)+) m22)
: m23 ((p5y +) m23)
: m31 (= m13)
: m32 (= m23)
: )
: (setq ask (getstring "\n是否還要選點?[Y/N]"))
: )
: 我想要在這個while迴圈內
: 如果最後ㄧ行是否還要選點(Y)
: 就可以呼叫自己這個迴圈ㄧ次
: 一直到如果選擇(N)才跳出這個while迴圈
: 請問要怎麼寫呢?
// - - -
這,不叫 遞迴,這叫做 迴圈
(while (> x y)
; do something
; . . .
)
以上,當 (x > y) 的時候,會 重複執行
: 還有,大家有沒有學過C??
// - - -
有!
: 我想要寫像是 a= a + b
: 新的 a 會取代掉舊的 a
: 這種要怎麼寫阿??
// - - -
(setq a (+ a b))
看你的 文章很累,先回答 這個問題,
其他的,再說
: 像我程式中的m11~m33
: 就是想寫這種
: 拜託教教我~~很急~~
: 因為是新手~請大家多多包函
// - - -
請問你 有沒有買書?
有沒有看書?
: 謝謝謝謝~~~
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 123.194.156.130
推
04/14 10:51, , 1F
04/14 10:51, 1F
討論串 (同標題文章)
Cad_Cae 近期熱門文章
PTT數位生活區 即時熱門文章