2023年12月13日发(作者：)

ANSYS APDL命令流实现数据文件读写的实例

2010-09-16 20:40:56 作者： 来源：智造网—助力中国制造业创新—

不要把2X作为与A对应的格式符，WRITE语句中的I，A，B分别与FORMAT语句中的I3，F6.2和E11.5格式符对应。X格式符不能用来提供整数、实数、以及其它类型数据的输出格式，它只能插入若干个空格。

本文介绍了ANSYS APDL命令流实现数据文件读写的实例。

一 FORTRAN数据格式

I格式(又叫整数格式)

一般形式：Iw 或：Iw.m

其中：w 一个数据占的位数宽度(又称“字段宽度”)，m 需要输出的最少数字位数。例1：

(1)数字在指定的区域内向右端靠齐，如果数字位数比指定的字段宽度w小，则左边补以空格。负数的符号也包含在字段宽度内。

(2)如果数字的位数超过了规定的字段宽度w，则不输出有效数据，而在该字段宽度范围内充满“*”符号。

(3)如果数字的位数超过了m,则按实际应输出的位数输出(但条件是不能超过w)。m不包括负号所占的一列。

F格式(又叫小数型格式)

一般形式：Fw.d

w 各数值占的总位数 d 输出数据的小数位数(小数点后的位数)。 例1：

(1)数字在指定的区域内向右端靠齐，如果数字位数(含小数点和符号位)比指定的字段宽度w小，则左边补以空格;如果数字的位数超过了规定的字段宽度w，则不输出有效数据，而在该字段宽度范围内充满“*”符号。

(2)如果数据的小数位数比指定的小数位数d小，则在小数右边补0以凑足d位;如果小数位数大于d位，则输出时多于的小数位数按“四舍五入”规则舍去。

(3)假设b为数据整数部分的位数，则应使w≥b+d+1(小数点占一列)，如果输出负数，则应保证w≥b+d+2(小数点和负号各占一列)。

(4)用F格式输出时应注意，由于难以事先确切估计出数据的大小，输出大的数时容易产生“宽度不够”的错误(由于w不够大)，输出小的数时会出现丢掉有用数字的情况(由于d不够大而将后面的数字截去)，这就是“大数印错，小数印丢”。

E格式(又叫指数型格式)

一般形式：w.d w 各数值占的总位数，d 输出数据的小数位数(小数点后的位数)。例1：

(1)采取标准化的指数形式输出一个实数，d为以指数形式出现的数据的数字部分的小数位数。

(2)指数部分一般占4列，其中字母“E”和指数的符号各占一列，指数2列。 小数部分d列，再加上一个小数点和小数点前的一个“0”，因此要保证w≥d+6，输出负数时，w≥d+7。

(3)有的计算机系统允许有较大的实数范围，FORTRAN77提供了一种扩充的编辑符，

可以输出三位或四位指数。这种编辑符的形式为：，用e指定指数的位数。有的计算机系统的FORTRAN编译系统已根据其允许的实数范围，自动将指数的位数改为3位或4位，不必在RORMAT语句中用编辑符单独为某些数据指定所需的指数位数，只需写Ew.d形式即可，输出时系统会给出三位(或四位)指数。

G格式

G格式可以根据输出的实数大小决定用小数形式(F格式)输出或指数形式(E格式)输出。当输出大数值或小数值时自动按E格式，当输出的数不大不小时用F格式。其一般形式为：Gw.d

(1)凡绝对值小于0.1的数或绝对值大于10d的数用E格式输出;其余的数用F格式输出。

(2)用E格式输出时，最后4列为指数部分，而用F格式输出时最后4列留空。

(3)用指数形式输出时，格式同Ew.d;用F格式输出时，不是按Fw.d形式输出，d规定的不是小数位数而是打印出来的全部数字的位数，小数位数根据数值大小和d的大小而定，这样做的目的是使数的整数部分能全部保留，而适当截去小数部分，以保证输出数值的正确性。因为小于10d的数，其整数部分最多为d位，因此，可以全部输出这d位整数，小数的位数为：d-(数值整数位数)。

D格式

一般形式：Dw.a

用于双精度数据的输出，使用方法与E格式相仿，只是把字母“E”换成“D”。

L格式

一般形式：Lw

用于逻辑型数据的输出，w 输出数据的字段宽度。逻辑值“.TRUE."，在输出时打印一个字母T;逻辑值".FLASE."，在输出时打印一个字母F。T和F打印在字段范围内的最右端。

A格式

一般形式：Aw 或：A 用于字符型数据的输出，w为字段宽度，不指定w时(即形式：A)，按字符变量的实际长度(即程序定义该变量时的长度)输出。

字符串在指定的区域内向右端靠齐，如果字符串的位数比指定的字段宽度w小，则左边补以空格;如果字符串的位数超过了规定的字段宽度w，则只输出最左面的w个字符。

‘(撇号)格式

用来插入所需的字符串， 如果需要输出的字符包括撇号，则用两个连续的撇号代表一个被输出的撇号字符。

H格式

一般形式：nH <字符串>

用来输出字符常量，与撇号格式相似。n为字符串中字符的个数。 可以单独用撇号格式或H格式输出字符串而不必要求WRITE语句中有相应的输出项。 用H格式必须准确地数出字符串中的字符个数，数错了就会造成错误。所以最好不用H编辑符而用撇号编辑符，后者不必数字符，使用方便，字符串界线清楚无误。FORTRAN 77之所以保留H编辑符主要是为了与FORTRAN 66兼容(FORTRAN 66只能用H编辑符输出字符串而没有撇号编辑符)。

X格式

一般形式：nX

用于输出空格，n 输出的空格数目。即插入n个空格，或者说，使打印的“当前位置”向右移动n列。如果不用X格式插入空格，数据将连成一片，难以区分开。

注意：不要把2X作为与A对应的格式符，WRITE语句中的I，A，B分别与FORMAT语句中的I3，F6.2和E11.5格式符对应。X格式符不能用来提供整数、实数、以及其它类型数据的输出格式，它只能插入若干个空格。

FORTRAN 77还允许n是负整数，表示从当前位置向左移动n的绝对值列。微机上使用的FORTRAN子集不能使用n为负值的格式符。

/(斜杠)格式

斜杠(/)编辑符的作用是：结束本记录的输出并开始下一个记录的输出。例如：

二 关键命令

2.1 *VREAD 按指定格式将数据读入数组中

*VREAD, ParR, Fname, Ext, --, Label, n1, n2, n3, NSKIP

ParR 定义好的数组名称 ，且指出开始写入的位置，即下标(i，j)

Fname 数据文件名称

Ext 数据文件的扩展名

-- 没有启用的保留域 Label

可为IJK, IKJ, JIK, JKI, KIJ, KJI, or blank (IJK)，表示你对ParR写入的顺序，下标变化依次变慢，如IJK表示先写列再写行(列下标J变化最快)，JIK表示先写行再写列。

n1, n2, n3

表示按上面的顺序要写入的数据个数，如JIK，5，6表示对ParR按行写入，共写5列6行。

NSKIP 读入数据时需要跳过的行数。

特别注意：

*VREAD后面要紧跟带括号的指定格式，描述对数据文件每行的读法，如(F3.0，F11.0)每行读两个数，分别占3，11个字符宽度。

2.2 *VWRITE 用来输出数组、数值参数、字符参数或常量到文件里。它一次最多可以写入19个参数，使用该命令时，紧跟着该命令的下一行必须是FORTRAN77的格式规定。数组矢量要指定起始元素位置。可以用表达式来计算数据文件中每一行的位置。

*vwrite命令的使用格式如下：

*VWRITE, Par1, Par2, Par3, Par4, Par5, Par6, Par7, Par8, Par9, Par10, Par11, Par12, Par13, Par14, Par15, Par16, Par17, Par18, Par19

其中par1～par19是依次写出的19个参数或者常数，某个空值表示忽略，所有都忽略则输出一空行。允许写出的数据包括常数，变量与数组，包括数值型和字符型数据。

2.3 *cfopen 在*vwrite之前需利用*cfopen打开的一个数据文件，表示其后的并将*cfopen和*cfclos之间所有的*vwrite写出的数据都输入到该数据文件中。

*cfopen,fname,ext,--,loc

fname是带路径的文件名(两者允许至多250字符长度)，缺省路径为工作目录，文件名缺省为jobnmae。

ext是文件的扩展名(至多是8个字符长度)。如果fname为空，那么扩展名缺省为cmd。

--表示该域是不需要使用的值域。

loc用于确定打开的文件已经存在时，缺省表示采用覆盖方式写数据到文件中，设置成append表示采用追加方式写数据到文件中。

与*cfopen成对使用的另外一个命令时*cfclos命令，总是在*cfopen命令与一序列数据*vwrite命令之后，用于关闭用*cfopen命令打开的文件。

*cfclos命令的使用格式如下：*cfclos

2.4 /OUTPUT

/OUTPUT /OUTPUT, Fname, Ext, --, Loc

输出txt数据到文件或窗口

Fname 文件名和路径。如果为空，则输出到默认系统输出文件中。

Ext 文件扩展名

-- 保留的未使用域。

Loc

blank — 覆盖式输出

APPEND — 追加式输出

三 实例解析

3.1 首先创建一个数据文件

finish

/clear

item=’’weight:’’

data=234.56

unit=’’kg’’

*dim,aa,array,4,1,1

aa(1)=10.2,324.5,123.7,908

*dim,bb,char,3,1,1

bb(1)=’’i am’’,’’a good’’,’’man’’

*cfopen,mememama,dat

*vwrite，

(5x,’*vwrite demo’)

*vwrite,

(’***********************’)

*vwrite,item,data,unit

(a8,f10.2,a8)

*vwrite,

(/’******array parameter output demo******’)

*vwrite,

(’’float format/sequ keyword:’’) *vwrite,sequ,aa(1)

(f3.0,f10.4)

*cfclos

运行该文件后，生成的数据格式如下：

vwrite demo

***********************

'weight: 234.56'kg'

******array parameter output demo******

float format/sequ keyword:

1. 10.2000

2. 324.5000

3. 123.7000

4. 908.0000

3.2 将数据读入数组

*DIM,mememama,,4,2

*VREAD,mememama(1,1),mememama,dat,,JIK,2,4,,6

(f3.0,f10.4)

运行该文件后，点击[Parameters]->Array Parameters，就可以看到得到的数组了。