- 积分
- 1831
- 贡献
-
- 精华
- 在线时间
- 小时
- 注册时间
- 2012-5-6
- 最后登录
- 1970-1-1
|
楼主 |
发表于 2013-4-1 19:48:24
|
显示全部楼层
不好意思,这是整个gs,上面的那个是我做了个测试看看的。
'reinit'
'clear'
'open D:\zssdata\fnl.ctl'
'open D:\zssdata\pre.ctl'
'enable print D:\zssdata\svbitt2.gmf'
'set dfile 1'
'set grads off'
'set grid on'
'set lev 1000 100'
'set t 9 29'
'set xlevs 00 06 12 18 00 06 12 18 00 06 18 00 06 18 00 06 18 00 06 18'
'set ylevs 10 20 30 40 50 60 70 80 90 100'
'define h=100000*hdivg(ugrdprs,vgrdprs)'
'define w=100000*hcurl(ugrdprs,vgrdprs)'
*'set h'h''
*'set w'w''
if (h>=0)
if (w>=0)
'define svbi=h/w'
'define aa=tloop(aave(svbi,lon=117,lon=120,lat=30,lat=32))'
*'define bb=abs(aa)'
endif
endif
'set lat 29'
'set lon 117'
'set t 9 29'
'set lev 900 100'
'set zlog on'
'set xyrev off'
'set gxout contour'
'set ccolor 1'
'set cthick 4'
'set xlevs 00 06 12 18 00 06 12 18 00 06 18 00 06 18 00 06 18 00 06 18'
'set ylevs 975 925 850 700 600 500 400 300 200 100'
'set clopts -1 -1 0.18'
'set clopts -1 -1 0.18'
'set xlopts 1 5 0.2'
'set ylopts 1 5 0.2'
'set cint 5'
'set ylopts 1 5 0.2'
'set cint 5'
'set parea 1 10 1 7.5'
'd aa'
'set dfile 2'
'set gxout bar'
'set grads off'
'set bargap 60'
'set baropts outline'
'set ccolor 1'
'set grid on'
'set ylpos 9 l '
'set t 1 6'
'set xlevs 00 00 00 00 00 00'
'set ylevs 0 50 100 150 200 250 300 '
'set lon 0'
'set lat 0'
'set lev 10'
'set t 1 6'
'set clopts -1 -1 0.18'
'set xlopts 1 5 0.2'
'set ylopts 1 5 0.2'
'set cint 5'
'set parea 1 10 1 7.5'
'd a'
'print'
'disable print'
*'printim d:\zssdata\sbvitaa.gmf'
; |
|