CompuServe Messages

Yes mathematica will output dxf files that 3d studio can read in directly on my version this is how I do it, lets take a real example: In[1] := <<tube.m In[2] := Show[tube[{4 Cos[t + N[Pi]] / 3 + 2 Cos[3 t], 4 Sin[t] / 3 + 2 Sin[3 t], Sin[4 t] + Sin[2 t] / 2}, {t, 0, 2 Pi, 90}, .25], Boxed->False] Out[2] := Graphics3D If you input the above equation you will get a knot object drawn to the screen. To get a DXF file, you do the following: change the very first line in the equation from 'Show[tube etc etc' to: 'gr := Show[tube etc etc' then type: <<Utilities`DXF` then type: WriteDXF["knot.dxf, gr] the above will display the object then write the dxf file. hope this helps! john bailey 71011,1327