- 积分
- 899
- 贡献
-
- 精华
- 在线时间
- 小时
- 注册时间
- 2015-5-21
- 最后登录
- 1970-1-1
|
楼主 |
发表于 2017-5-25 16:01:40
|
显示全部楼层
gs文件如下
'reinit'
'open D:\sq\pm\kt\2008.5.25\fnl_20080525_00_00.ctl'
'set lon 85 120'
'set lat 10 40'
tt=1
while(tt<=3)
'set t 'tt''
'set mpdset cnworld'
'set map 1 1 4'
'set lev 500'
'set xlopts 1 5 0.16'
'set ylopts 1 5 0.16'
'set xlint 2'
'set ylint 2'
'set grads off'
'set grid off'
'set gxout barb'
*'set gxout stream'
'set cthick 2'
'set ccolor 1'
'set strmden 3'
'd UGRDprs*2.5;VGRDprs*2.5'
'q dim'
rec=sublin(result,5)
recs=subwrd(rec,6)
'draw title 'recs'-500hPa-uv'
'enable print D:\sq\pm\kt\2008.5.25\fc\500\'recs'-500hPa-uv.gmf'
'print'
'disable print'
tt=tt+1
'c'
endwhile
; |
|