回复 #15 wanglibinv7 的帖子
那不是程序吗？不正是有用的东西吗？ 太好了呵呵:D :D 谢了，不错不错。很有帮助啊回复 #15 wanglibinv7 的帖子
可以不要，将它拆开只是为了说明向导编译时可以有多个单独的文件。 请教，phi和 l是何时赋值的？另外，(polar pc (+ phi (/ pi 3.0)) l);第二点
是如何定义点的？
谢谢楼主:) 学习，学习，才开始接触有些不懂 原帖由 xuehong51 于 2008-10-8 09:10 发表 http://www.askcad.com/bbs/images/common/back.gif
请教，phi和 l是何时赋值的？另外，
(polar pc (+ phi (/ pi 3.0)) l);第二点
是如何定义点的？
谢谢楼主:)
(hexagon pc lmax lmin 0.0);phi和 l是何时赋值的（就是这一句，把0.0赋给phi；把lmax赋给l；lmax通过前面的setq lmax (getdist "\n输入正六边形的最大边长: ")）
该句为hexagon函数的调用，该函数在后面给以定义
(defun hexagon(pc l lmin phi);开始定义hexagon函数，该函数有四个全局参数pc、l、lmin、phi
(polar pc (+ phi (/ pi 3.0)) l);该语句一般形式为
(polar 二维或三维参考点 待绘点与参考点之间的角度 待绘点与参考点之间的距离)
我上面的待绘点就是将要绘制的点（第二点……） 谢谢球员:)
函数定义与调用明白了，
polar语句语法还不太清楚:L 原帖由 xuehong51 于 2008-10-8 10:40 发表 http://www.askcad.com/bbs/images/common/back.gif
谢谢球员:)
函数定义与调用明白了，
polar语句语法还不太清楚:L
原抄如下
polar
在 UCS 坐标系下，求某点的指定角度和指定距离处的点，并返回该点
(polar pt ang dist)
参数
pt
二维或三维点。
ang
以弧度为单位的角度值，它是相对于当前构造平面 X 轴按逆时针方向计算的。
dist
与指定点 pt 的距离。
返回值
根据 pt 指定点的类型，返回二维或三维点。
示例
为 polar 提供一个三维点：
命令： (polar '(1 1 3.5) 0.785398 1.414214)
(2.0 2.0 3.5)
为 polar 提供一个二维点：
命令： (polar '(1 1) 0.785398 1.414214)
(2.0 2.0) 多谢多谢，知道了。你是从哪抄的呀:o
[ 本帖最后由 xuehong51 于 2008-10-8 14:53 编辑 ] 试着学习一下!谢谢楼主拿出来分享. 原帖由 xuehong51 于 2008-10-8 13:03 发表 http://www.askcad.com/bbs/images/common/back.gif
多谢多谢，知道了。你是从哪抄的呀:o 还有，
(+ phi (/ pi 3.0)) 如何定义的60度（三分之派），phi不是零吗:)
(/ pi 3.0)返回的是1.0472（返回的是弧度，不要认为是角度）
(+ phi (/ pi 3.0))这句的意思就是先算出pi与3.0之商，再求phi与(/ pi 3.0)返回值之和 谢谢，已经捉摸出来了：
=phi+pi/3
:D 原帖由 xuehong51 于 2008-10-8 13:03 发表 http://www.askcad.com/bbs/images/common/back.gif
多谢多谢，知道了。你是从哪抄的呀:o
源文件见这里，做个广告:lol
http://www.askcad.com/bbs/thread-25538-1-1.html 呵呵，多谢支持。:)