有同情心的进来帮帮忙！谢谢了

yaopx0782

看了一张，意思明白。可以试着用LISP编一小段程序。我说说，你看意思对不对。从一点开始，首先画一段线，然后下一段线从上一段线的终点开始，与上一段线夹角为某一个值，依次画出，直到结束。应该不难，我实在是没有时间，否则帮你做一段程序。

yaopx0782

(defun c:lline()
(setq sp (getpoint "xuanzeqidian:"))
(setq spoint (getpoint "second point:"))
(setq ang (angle sp spoint))
(Command "line" sp spoint)
(while (and (setq li (getreal "xiayidian de juli:"))
(setq jiao (* pi (/ (getreal "xiayidiande jiaodu") 180))))
(setq td (polar spoint (+ ang jiao) li))
(command td)
)
)
试试这段LISP程序。

tuzi006

太感谢了！！！我先试试！！

燕麦娘

要是和你开篇所说的


用mirror镜象命令即可啊


输上角度就可以啊         在提示是否删除原对象时选择否就可以了啊


不知道是不是这个意思啊