- 积分
- 36012
- 贡献
-
- 精华
- 在线时间
- 小时
- 注册时间
- 2012-1-11
- 最后登录
- 1970-1-1
|

楼主 |
发表于 2012-10-8 21:59:36
|
显示全部楼层
做个霸气的木头 发表于 2012-10-8 21:54
gs贴上来
'reinit'
'set rgb 29 205 0 255'
'set rgb 28 255 0 200'
'set rgb 27 255 0 0'
'set rgb 26 255 100 0'
'set rgb 25 255 160 0'
'set rgb 24 255 200 0'
'set rgb 23 255 255 0'
'set rgb 22 200 255 0'
'set rgb 21 140 255 0'
'set rgb 20 180 250 170'
*****************************blue
'set rgb 41 30 255 255'
'set rgb 42 0 200 255'
'set rgb 43 0 145 255'
'set rgb 44 0 80 255'
'set rgb 45 0 0 255'
'set rgb 46 85 0 255'
'set rgb 47 130 0 255'
'set rgb 48 180 0 255'
********************************************************
'open E:\201107\0p5degree\GFS_Global_0p5deg_201107.ctl'
i=5
while(i<=12)
'set grads off'
'set grid off'
'set xlopts 1 0.1 0.2'
'set ylopts 1 0.1 0.2'
'set lon 95 140'
'set lat 25 55'
'set xlint 5'
'set ylint 5'
'set t 'i
'set mpdset cnworld'
'draw map'
'set clevs 218 222 226 230 '
'set ccols 23 24 25 26 27 '
'set gxout shaded'
'set csmooth on'
'set lev 850'
'd TMPprs '
'cbarn'
'draw title Wind , HGTprs ,TMPprs at 200hPa ,' time1
'enable print E:/01107/0p5degree/duibi/wind-hgt/850/wind-'i'.gmf'
'print'
'disable print'
'printim E:/201107/0p5degree/duibi/wind-hgt/850/wind-'i'.jpg white'
'c'
i=i+1
endwhile |
|