jinkai0118 发表于 2006-1-20 10:25:00

用EXCEL在CAD中绘画简易弹簧

<P class=MsoNormal style="MARGIN: 0cm 0cm 0pt; TEXT-INDENT: 10.5pt; mso-char-indent-count: 1.0">如果要画一个半径是<FONT face="Times New Roman">1</FONT>的弹簧，可在<FONT face="Times New Roman">EXCEL</FONT>中输入以下数据。这些数据的规律是：在<FONT face="Times New Roman">XY</FONT>平面上等分取<FONT face="Times New Roman">8</FONT>个点，在<FONT face="Times New Roman">A</FONT>列，<FONT face="Times New Roman">B</FONT>列输入<FONT face="Times New Roman">X</FONT>，<FONT face="Times New Roman">Y</FONT>的值，每<FONT face="Times New Roman">8</FONT>行重复一次。<FONT face="Times New Roman">Z</FONT>的值每次递增一个固定值，<FONT face="Times New Roman">8</FONT>个递增的值就是一层弹簧的高度。再在<FONT face="Times New Roman">D</FONT>列通过图中的公式将<FONT face="Times New Roman">A</FONT>，<FONT face="Times New Roman">B</FONT>，<FONT face="Times New Roman">C</FONT>列中的值转换成坐标的形式。然后复制<FONT face="Times New Roman">D</FONT>列中的内容。打开<FONT face="Times New Roman">CAD</FONT>输入命令<FONT face="Times New Roman">SPL</FONT>，然后将<FONT face="Times New Roman">EXCEL</FONT>中的内容粘贴的内容粘贴到命令提示中。再敲三下回车就<FONT face="Times New Roman">OK</FONT>了。不过通过这种方法画出来的效果不是很好，在两端有直线的地方，把它剪掉就行了。在没有弹簧程序的情况下，还是可以试试这种简单的方法。如果说要更精确的话，可在<FONT face="Times New Roman">XY</FONT>上多取些等分点，这样会好得多。需要更长的话，多取点就行了。</P>
<P class=MsoNormal style="MARGIN: 0cm 0cm 0pt; TEXT-INDENT: 10.5pt; mso-char-indent-count: 1.0">另外还要请教高手，通过这种方法画出来的弹簧不能作为圆的拉伸路径。我开始以为是<FONT face="Times New Roman">SPL</FONT>命令画出来的线不能作为路径，后来我用<FONT face="Times New Roman">SPL</FONT>画一些简单的线条，还是可以作为拉伸的路径，高手帮我看看吧。</P>

jinkai0118 发表于 2006-1-20 10:29:00

彪马 发表于 2006-4-6 21:26:00

不错，方法很新颖，值得借鉴，谢谢楼主。

luotufu 发表于 2006-4-7 13:28:00

<P>不错</P>

yangzhixu 发表于 2007-2-8 00:05:00

[转帖]聪明！

不错，很巧妙！

飞马行空 发表于 2007-3-13 19:28:00

<p>真聪明，向你学习</p>

lxg 发表于 2007-3-14 10:56:00

<p>不会呀？</p><p>教教吧</p>

zxdcad 发表于 2007-3-18 09:23:00

<p>ABC三列的数据用函数关系更精确，精度可随意控制，在ACAC中画线时可用3DPOLY，这可以作为三维拉伸时的路径。</p><p>07版的acad增加了helix对象，直接用helix命令就可以做了。</p>

good1001 发表于 2007-3-19 17:21:00

excle命令我这边什么没有求救呀.我CAD三维不会画.想请教你们...

王国军 发表于 2007-6-19 17:48:00

真牛哎，这也被你想出来，太聪明了
页: [1] 2
查看完整版本: 用EXCEL在CAD中绘画简易弹簧