Adams输出宏代码

for variable_name=loopobj object_names=.amachinery.* type=macro 
var set var=filename1 str=(eval(STR_DELETE(loopobj,1,19)//".cmd"))
file text open file= (eval(filename1)) open_mode=overwrite
file text write format = "%s" newline=yes value=(eval(user_string(loopobj//".commands_to_be_executed")))
file text close file= (eval(filename1))
end