tecplot录制宏(Macro)用以批量导入数据 您所在的位置:网站首页 自动录制宏 tecplot录制宏(Macro)用以批量导入数据

tecplot录制宏(Macro)用以批量导入数据

2024-07-16 20:01| 来源: 网络整理| 查看: 265

今天要用Tecplot做后处理。需要导入几十个甚至上百个数据文件,并且每导入一个数据文件,就要重命名,以便区分。这样的工作量手动一个一个地操作显然不太现实,我想能不能让其自动地完成这些重复地操作。这个问题让我想到了以前用的几款软件都有宏Marco这个命令,即可以把操作过程录制成宏,然后运行这个宏命令,就可以把刚才录制的命令完整地重新操作一遍,比如三维设计软件CATIA,网格画分软件Pointwise。更加简便灵活的地方是可以对宏进行编辑,比如修改某个尺寸,修改某个名字,甚至复制某段命令,让其重复执行。

Tecplot当然也有这样的操作。于是我就按照这个思路尝试录制宏。

首先新建一个宏开始录制。菜单栏选择Scripting>>Record Macro,新建宏。然后会出现一个小对话框,暂时不管它。

          

接着,导入一个数据文件,并在Data中对此文件(就是Zone)重命名。然后在刚才的小对话框中选择Stop Recording,结束录制。用文件编辑器打开保存的宏命令文件,比如UltraEdit,对其进行编辑。

1 #!MC 1410 2 $!ReadDataSet '"D:\data\611\results_grid_1_tecplot.dat" ' 3 ReadDataOption = Append 4 ResetStyle = No 5 VarLoadMode = ByName 6 AssignStrandIDs = Yes 7 VarNameList = '"x" "y" "u" "v" "w" "rho" "p" "Z Vorticity"' 8 $!RenameDataSetZone 9 Zone = 28 10 Name = '611'

以上即是保存的宏命令文件。如果要重复操作的文件数量不多,比如10个,那么就可以直接在UltraEdit中复制粘贴命令,修改对应的文件路径与文件名即可。这里仅需要修改对应的第二行的文件路径,第九行的Zone代码,和第十行的Name。但是如果文件数量非常多,手动复制修改仍然非常繁琐。对于这种简单重复的操作,当然可以写一小段代码帮助实现了。最近一直在用Fortran写代码,于是我就写了段Fortran实现自动复制与编辑。代码如下:

1 program main 2 implicit none 3 4 integer j 5 integer, parameter :: n_data = 670 6 character(len=3) :: cTemp 7 8 open(10, file="tecplot_load_data.mcr", status="replace") 9 10 do j = 611, n_data 11 12 write(cTemp, "(i3)") j 13 write(10,*) "#!MC 1410" 14 write(10,*) "$!ReadDataSet " // "'""D:\data\" & 15 &// trim(adjustl(cTemp)) // "\results_grid_1_tecplot.dat"" '" 16 write(10,*) " ReadDataOption = Append" 17 write(10,*) " ResetStyle = No" 18 write(10,*) " VarLoadMode = ByName" 19 write(10,*) " AssignStrandIDs = Yes" 20 write(10,*) " VarNameList = '""x"" ""y"" ""u"" ""v"" ""w"" ""rho"" ""p"" ""Z Vorticity""'" 21 write(10,*) "$!RenameDataSetZone" 22 write(10,"("" Zone = "" i3)") j-583 23 write(10,*) " Name = " // "'" // trim(adjustl(cTemp)) // "'" 24 25 end do 26 27 end

代码需要注意的地方是引号的问题,单引号,双引号套用要注意。我会单独开一篇博文讲一下单双引号的问题。

修改完之后保存,然后在Tecplot里边运行这个宏Macro文件即可,这个宏命令会自动循环加载数据文件并修改文件(Zone)的名字。很方便。



【本文地址】

公司简介

联系我们

今日新闻

    推荐新闻

    专题文章
      CopyRight 2018-2019 实验室设备网 版权所有