fuyun1927 发表于 2014-3-26 18:43:33

mline循环的问题

如程序：
(while (<= (* i dy 4) Py)
   (command "mline" “s”py(list px (+ py (* i dy 4))) (list (+ px dx) (+ py (* (+ i 1) dy 4)))(list px (+ py (* (+ i 2) dy 4))) "")
         
           (setq i (+ i 2))
mline也循环n次，如何写循环只让后面的点循环而mline不循环。。

菜卷鱼 发表于 2014-3-26 19:27:39

哥，你不要把高飞鸟的名字拿出来啊。

应该把while写在 command里面吧?

菜卷鱼 发表于 2014-3-26 19:39:25

本帖最后由 菜卷鱼 于 2014-3-26 19:42 编辑

(defun c:test (/ pt)(setq pt (getpoint "\n指定起点"))
(command "_.mline" )
(while   
(setq pt(getpoint pt))
(command pt)
)
(prin1))

ysq101 发表于 2014-3-26 22:03:37

菜卷鱼 发表于 2014-3-26 19:39 static/image/common/back.gif


高手就是高手。。。
原来command 还可以带着while玩
页: [1]
查看完整版本: mline循环的问题