明经CAD社区

 找回密码
 注册

QQ登录

只需一步,快速开始

搜索
查看: 1801|回复: 6

求助?请高手点化一下?不胜感激?谢了?

[复制链接]
发表于 2006-6-30 14:38:00 | 显示全部楼层 |阅读模式
发贴心情 编了个程序做螺旋线,但是加载时候,提示有错误,不知道在那里,请指点?

(defun c:luoxian

                    (/)

   (setq b1 (getpoint"指定螺旋线基点: "))

   (setq r (getreal"请输入螺纹平均半径: "))

   (setq disp (getreal"请输入螺纹节距: "))

   (setq n (getint"请输入每圈细化段数: "))

   (setq delta (/ (*2.0 pi)n))

   (setq j (/ disp n))

   (setq bb (caddr bl))

   (setq and 0)

   (setq jj 0)

   (Command "UCS" "o" b1)

   (command "3dpoly" (list r 0 0))

   (repeat n

    (setq jj (+jj))

    (setq ang (+delta ang))

    (setq pt2(list(*r(cos ang))(*r(sin ang))(+0*(j jj))))

    (Command pt2)

   )

   (Command"")

   )

 

发表于 2006-7-1 08:41:00 | 显示全部楼层
你来错地方了!
 楼主| 发表于 2006-7-1 20:38:00 | 显示全部楼层
不好意思,版主,我在那个区发了N天,都没人里我,觉得这里人气好,才发到这里的?请帮帮我吧?谢谢了
发表于 2006-7-2 09:18:00 | 显示全部楼层
这些程序我怎么看了就头晕呢?????
发表于 2006-7-2 10:34:00 | 显示全部楼层
先把有可能出错的语句变成注释行,再运行看看,如果还出错就说明变成注释行的语句没错,如果能正常运行就说明变成注释行的语句有错,这是用的排除法,调试程序很费劲,你不是自己调试吧!
发表于 2006-7-2 16:24:00 | 显示全部楼层

我不是怪你,我只想告诉你那里是专门的版块,会的人应该很多的!

只是我一时发快了。没有详细说明白!

 楼主| 发表于 2006-7-3 13:11:00 | 显示全部楼层

谢谢了  ?

您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|CAD论坛|CAD教程|CAD下载|联系我们|关于明经|明经通道 ( 粤ICP备05003914号 )  
©2000-2023 明经通道 版权所有 本站代码,在未取得本站及作者授权的情况下,不得用于商业用途

GMT+8, 2024-11-6 11:43 , Processed in 0.193186 second(s), 27 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

快速回复 返回顶部 返回列表