iCAx开思网
标题:
问:grip语句怎样将数据转换并写成规定格式?
[打印本页]
作者:
gypcad
时间:
2005-12-15 11:32
标题:
问:grip语句怎样将数据转换并写成规定格式?
用grip语句生成了部分点集,如何将这些数据导入到一个txt文件,格式如下
23 45 67
23 34 45
.....,十分感谢!!!
数据生成代码:
$$变量声明。
entity/results(100),cur
$$选择一条曲线。
l10:
ident/'pick a curve',cur,resp
jump/l10:,trm:,,resp
$$输入弦向公差。
l20:
param/'enter the tolerance','弦高公差=',tol,resp
jump/l20:,trm:,,resp
$$等弦长离散曲线。
l30:
cpset/chord,cur,tol,results
$$程序结束。
trm:
halt
数据保存代码???。。。期待中
作者:
liangquan6
时间:
2007-7-29 20:32
试试我的方法,不一定好,但是可以用。
基本思想是建立点集后,添加一步选择输出点集,代码如下:
$$选择要输出的点集
l40:
ident/'pick several point',ptarr,cnt,numPt,resp
jump/l40:,l50:,,resp
通过上面的代码,取得了点的数组ptarr,还有点集中点的个数,numPt。
用循环输出就可以了:
l70:
create/txt,1,'D:\New\UGTest\grip\'+ filename
l30:
do/trm:,index,1,numPt
pt=results(index)
a(1..3)=&point(pt)
write/1,a(1..3)
file/txt,1,'D:\New\UGTest\grip\' + filename
变量的声明如下:
number/a(3),numPt
string/filename(99)
欢迎光临 iCAx开思网 (https://www.icax.org/)
Powered by Discuz! X3.3