new
rest 初始平衡.sav;将初始平衡后的模型读进来
;下面设置总体出图格式
set plot bitmap;设置图片格式
set plot quality 2 ;设置图片质量,最高
plot set background white;使背景色为白色
;下面的fish函数开挖并自动保存结果(包括.sav和图片,当然自己还可以加别的)
def kaiwa;定义一个函数,名为kaiwa
loop k(0,10) ;loop代表循环,变量k从0到10遍历,每遍历一次执行一次循环体
;下面为循环体,直到end_loop之前
y_b=10*float(k)+30;根据k给变量y_b赋值,y_b表示y向某次开挖开始(begin)的坐标
y_e=10*float(k)+40 ;可知每次开挖y向10m
savName = '汾源从30m开挖到’+string(int(y_e))+'.sav' ;为*.sav命名,放入字符串savName ,保存结果时用到
pictureName= '汾源从30m开挖到’+string(int(y_e))+'塑形区.png' ;为塑形区图命名,放入字符串pictureName
;下面写flac3d命令,command-endcommand中间可以写flac3d(而不是fish)命令,
;而且flac3d命令夹在fish函数里时必须在command-endcommand内
command
model null range group 8-8#煤 x 30 100 y y_b y_e
solve
save savName ;保存*.sav
save pictureName;保存图片,当然可以添加别的比如应力图片
end_command ;退出flac3d命令环境,下面进入fish命令环境
end_loop;k不满足条件时结束循环loop
end;函数kaiwa结束
kaiwa;flac3d3.0读到此句才开始运行这个函数
-------------------------------------以下内容作废(因为修改啦)-----------------------------
注意:上面的代码保存的文件名含有空格,需要把空格去掉后才能再次用flac3d打开。
其中一句改为: name = '汾源从30m开挖到’+string(int(y_e))+'.sav' 就不会出现上面说的*.sav中含有空格打不开的情况了。