画螺纹的一点心得
画螺纹的一点心得用Joseflin的Threads.lsp画实体螺纹很不错,实用.<BR>使用方法:<BR>在"工具"菜单下选择"加载应用程序"<BR>然后在命令行输入"metric"(公制螺纹)或"iso228"(英制螺纹)<BR>根据提示输入参数
Internal or External thread (I/E)<BR>内螺纹或外螺纹(不过好像画出的都是外螺纹)
Nominal outside diameter<BR>螺纹外径
Pitch<BR>螺距
Start center point<BR>开始的坐标点
Total thread length in Y direction<BR>螺纹长度
Do you want a 90?top angle at the start? (Y/N) <Y><BR>断面形状,缺省方式适合退尾螺纹
<BR>(setq nom1 10)<BR>(setq pitch 1.25)<BR>以上两条语句要删掉,否则只能画M10X1.25的螺纹
<BR>ljcgq发表的源程序适用于锥形，倒锥形，柱形，螺旋线的生成,不错<BR>用于画弹簧或滚珠丝杠等,不过螺距在20mm以下的形状不好<BR>(1-2的不能画,3为三边4为四边......),可根据需要在第七句<BR>(setq n(fix h))后增加一句(setq n(* n 100)),其中的100<BR>可为任意数,越大图形越好,但费时.另外一点就是只能拉伸圆,<BR>对别的形状拉伸便有问题.
如何拉伸矩形或梯形而不变型?请高手指教.
<BR> 本帖最后由 作者 于 2004-11-8 11:06:32 编辑
好,这种学习的心得体会很值得提倡!收录精彩帖子行列! 能给我发一个你修改后的lisp程序吗？我的e-mail: <A href="mailto:Anthonychen@126.com" target="_blank" >Anthonychen@126.com</A>
非常的感谢！ 由於基本嫁架构上的限制，AutoCAD要绘製螺纹相当烦琐困难，适合以lisp方式解决。Threads.lsp是我费了不少的心血得来的，相信它是目前流通的唯一未经compile的原始程式。依原先的承诺只能流通限制功能的demo版本。至今向我索取Threads.lsp的不知凡几。出乎我的预料一郎先生竟然可将之破解update成全功能的版本，实感敬佩！大陆地区真是卧虎藏龙之地阿！ 如何拉伸矩形或梯形而不变型?请高手指教 请把改好的原程序发上来好吗？谢谢！ 各位 程序来了 哇，终于等到你来了！
程序好长好长啊，怎么会这么长？怕怕了！看不懂呢！
有相关方面的教材，介绍一本来，好不好？ 这玩艺可画矩形螺旋,但效果实在不好,抛砖 不管怎么样，送花一朵！