论坛首页    职业区    学术与写作    工程技术区    软件区    资料区    商务合作区    社区办公室
 您好! 欢迎 登录注册 最新帖子 邀请注册 活动聚焦 统计排行 社区服务 帮助
 
  • 帖子
  • 日志
  • 用户
  • 版块
  • 群组
帖子
  • 10162阅读
  • 35回复

【共享】flac3d用fish语言开挖模拟工作面推进,省的每次都要写好多代码开挖! [复制链接]

上一主题 下一主题
离线龙biscuit
 

发帖
322
土币
2506
威望
45
原创币
0
只看楼主 倒序阅读 使用道具 楼主  发表于: 2015-04-03
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中含有空格打不开的情况了。











2条评分土币+10
GEO丶爱搞事的地质boy 土币 +5 优秀文章,支持! 2018-09-19
uranusmoon 土币 +5 优秀资料,感谢! 2016-09-28
邮箱:blzhu@buaa.edu.cn ,欢迎交流!
离线edelmann

发帖
2975
土币
53408
威望
7629
原创币
0
只看该作者 1楼 发表于: 2015-04-05
新鲜吗?
楼主这样乐于助人,谢谢!
离线dongxx

发帖
171
土币
3010
威望
17
原创币
0
只看该作者 2楼 发表于: 2015-04-05
鹅鹅鹅鹅鹅鹅  
离线jzm0415

发帖
26
土币
204
威望
0
原创币
0
只看该作者 3楼 发表于: 2015-04-06
下载下看看
离线hl9205

发帖
10
土币
122
威望
0
原创币
0
只看该作者 4楼 发表于: 2015-04-07
楼主好人,求发595558641@qq.com。下载了的也发过来下好不好?
离线hxm5949901

发帖
183
土币
320
威望
0
原创币
0
只看该作者 5楼 发表于: 2015-04-07
只能说有点坑
离线龙biscuit

发帖
322
土币
2506
威望
45
原创币
0
只看该作者 6楼 发表于: 2015-04-09
我实验了,用3d也行啊。

内容来自[短消息]
1条评分土币+1
dongxx 土币 +1 不好意思看错了  加了group限定 2015-04-09
离线龙biscuit

发帖
322
土币
2506
威望
45
原创币
0
只看该作者 7楼 发表于: 2015-04-10
算了,不要土币了,我开始也是没有土币,苦苦追寻。
邮箱:blzhu@buaa.edu.cn ,欢迎交流!
离线sdjzuzdh01

发帖
3656
土币
95
威望
15440
原创币
0
只看该作者 8楼 发表于: 2015-04-17
下载看看了
离线ksyali123

发帖
9
土币
75
威望
0
原创币
0
只看该作者 9楼 发表于: 2015-05-23
谢谢分享,
离线wolf305

发帖
17
土币
1402
威望
12
原创币
0
只看该作者 10楼 发表于: 2015-05-26
谢谢楼主!!!!
我选择我喜欢!

发帖
5
土币
32
威望
0
原创币
0
只看该作者 11楼 发表于: 2015-05-28
  
快速回复
限100 字节
温馨提示:欢迎交流讨论,请勿纯表情、纯引用!
 
上一个 下一个

      https://beian.mps.gov.cn/ 粤公网安备 44010602012919号 广州半山岩土网络科技有限公司 粤ICP备2024274469号

      工业和信息化部备案管理系统网站