TCL/TK编程语法上一篇文章讲了TCL命令的处理规则，那么这篇文章就说一说TCL的三大替换和两大引用。三大替换：变量替换、命令替换、反斜线替换。两大引用：双括号引用、大括号引用。变量替换每种替换会把单词中的一些原始字符替换为另外一些值。变量替换由"$"符号引发如下：set kgrams 20expr $kgrams*2.2046#输出为44.092上面两行代码，第一行将变量kgrams赋值为20，第二行为将变量kgrams的值与2.2046相乘。其中"$kgrams"即为变量替换。变量替换的目的是取值，即将$kgrams替换为20。expr $result*$base#两个变量的值相乘，其中expr为数学运算命命令替换

命令替换是把一个单词的部分或者全部替换为一个命令的结果。命令替换通过方括号"[]"表示。set kgrams 20set lbs [expr $kgrams*2.2046]

上面代码中第二行，方括号是对命令进行取值，即取方括号内的返回值。并将值赋值给变量lbs反斜线替换

反斜线也是取值，但是反斜线取的是在TCL中具有特殊意义的字符例如"[, $， \"等等。set msg Eggs:\ \$2.18/dozen\nGasoline:\ \$2.49/gallon#输出：Eggs: $2.18/dozen# Gasoline: $2.49/gallon

上面代码中使用"\"取到了空格符、$、 换行符。下表为可反斜线替换的字符：双引号引用

TCL提供了一些方法，可以阻止解析器对$和分号等字符进行特殊处理。这些方法被称为引用。双引号引用可以取消单词和命令分隔符的特殊解释。大括号引用取消所有特殊字符的特殊解释。

双括号引用会将空格、制表符、换行符以及分号都当做普通处理set msg "Eggs: \$2.18/dozen\nGasoline: \$2.49/gallon"#这行代码中空格符被解释为普通字符，因为有双引号所以就不需要在空格符前加"\"set msg Eggs: \$2.18/dozen\nGasoline: \$2.49/gallon#如果去掉双引号，则会报错

大括号引用

大括号引用将取消所有特殊字符的特殊意义。set msg {"Eggs: \$2.18/dozen\nGasoline: \$2.49/gallon"}#输出: "Eggs: \$2.18/dozen\nGasoline: \$2.49/gallon"#取值的双引号，空格，反斜线等全部都被当做普通字符处理

hypermesh api讲解代码：#本脚本运行在nastran模板下，先获取当前模板名称set solver_name [hm_getsolver]puts $solver_name#判断当前模板是否是nastran模板，如果不是，提示修改模板if {$solver_name == "nastran"} {#获取hypermesh全部component名称，hm_entitylist comps name的返回值是列表set comps_name_list [hm_entitylist comps name]set num_comps [llength $comps_name_list]#对component进行循环for {set i 0} {$i

下面为使用到的hypermesh api：hm_getsolverhm_entitylist comps name*createmark comps 1 $cur_comp_namehm_getmark comps 1*deletemark components 1hm_getsolver

set solver_name [hm_getsolver]set solver_name [hm_getsolver name]set solver_id [hm_getsolver id]

获取hypermesh当前模板，命令后不跟参数时，默认返回模板名称(nastran、abaqus、lsdyna)，也可以跟字符串"id"则返回模板ID。hm_entitylist

hm_entitylist nodes idhm_entitylist comps nameif { [ catch {command_name...} ] } {# Handle error}

返回entity的名称或者id列表。其中entity包括component、element、node、met、property等。通过这个命令可以获取制定entity所有的名称或者id。*createmark

mark在hypermesh二次开发中是一种容器，他可以以各种的方式存放各种entity的全部或者部分内容。

hypermesh api的mark容器一共有两个且只有两个，如同两个杯子，他们的ID分别为1和2。但是却可以在同一个ID的容器中存放不同的entity。*createmark elems 1 "all"*createmark elems 2 "all"*createmark nodes 1 "all"*createmark nodes 2 "all"*createmark comps 1 "display"*createmark comps 2 "display"

存放entity的方式也多种多样*createmark elems 1 "all"*createmark elems 1 "displayed"*createmark elems 1 "retrieve"*createmark elems 1 "by assem id" 10 20*createmark elems 1 "by comp id" 20*createmark comps 1 "by name only" X Y*createmark elems 1 "by comps on mark" 1

以上只列举了部分entity和存放方式，更多详情还可以参考帮助文档。*createmark可以说是hypermesh二次开发最重要的api。

hm_getmark是获取mark中保存的entity，*deletemark则是删除mark中保存的entity