- 积分
 - 15649
 
	- 贡献
 -  
 
	- 精华
 
	- 在线时间
 -  小时
 
	- 注册时间
 - 2016-9-8
 
	- 最后登录
 - 1970-1-1
 
 
 
 
 
 
 | 
	
 
 
 楼主 |
发表于 2020-7-3 12:56:32
|
显示全部楼层
 
 
 
相关脚本在附件中,为方便查看,这里再贴上: 
'reinit' 
'open D:\Research_Room\program\meoteorology\surface_elevation\dz.ctl' 
'sdfopen D:\Research_Room\Data\ThirdGroup\nc\multiple\ERA5_2019.12.nc' 
* time resolution is 3-h(248 times) 
* spacial resolution is 0.25(60E-150E, 0-70N) 
* z => Geopotential, t => Temp 
* r => RH, q => SH 
* d => Divergence 
* pv => Potential Vorticity, vo => Vortivity 
* u,v,w => u,v,w component of wind 
* 10-levels 1000 925 850 800 750 700 600 500 300 200 
 
'set grid off' 
'set grads off' 
'set parea 1.5 8.5 1.0 7.5' 
'set xlopts 1 6 0.2' 
'set ylopts 1 6 0.2' 
 
*======================================= 
*              cycle part   
*======================================= 
 
i = 8 
* i is date 
* j is hour 
 
while(i<=8) 
   j = 2 
   while(j<=2) 
      'c' 
      'set grads off' 
      'set font 1' 
       a = (8*i)-(10-(j+1)/3) 
 
      'set dfile 1' 
      'set lat 30' 
      'set lon 110 125' 
      'set lev 1000 200' 
      'set t 1' 
      'define zz=dz.1' 
       
      'set dfile 2' 
      'set t 'a 
      'set lat 30' 
      'set lon 110 125' 
      'set lev 1000 200' 
      'define uu=u.2' 
 
      'set dfile 3' 
      'set t 'a 
      'set lat 30' 
      'set lon 110 125' 
      'set lev 1000 200' 
      'define ww=-5*w.2' 
 
      'set dfile 4' 
      'set t 'a 
      'set lat 30' 
      'set lon 110 125' 
      'set lev 1000 200' 
      'define dd=d.2' 
 
      'set zlog on' 
      'set gxout shaded' 
      'set xlabs 110E|113E|116E|119E|122E|125E' 
      'D:\Research_Room\Data\ThirdGroup\gs\colorbars\30colors_rainbow.gs' 
      'set clevs -8e-5 -6e-5 -4e-5 -2e-5 0 2e-5 4e-5 6e-5 8e-5' 
      'd dd' 
      'xcbar 9.0 9.2 1.5 7.3 -fw 0.13 -fh 0.15 -ft 5 -fs 1 -fo 0 -line on' 
*      xcbar left-edge, right-edge, bottom-edge, top-edge, -fw font-width, 
*      -fh font-height, -ft font-thichness, -fs lable-interval, 
*      -fo lable-mask-number, -line on/off(colorbar-boarder on/off) 
 
      'set gxout stream' 
      'set strmden 5 0.4 0.1 1' 
      'set cthick 5' 
      'set ccolor 1' 
      'set cint 1' 
      'd uu;ww' 
 
      'set gxout shaded' 
      'set csmooth on' 
      'set rbcols 1' 
      'set cmax 0' 
      'd zz' 
 
      'drawfigstr TL (a) 2.5' 
      'draw title Dec.'%i%'th '%j%':00' 
      'printim D:\Mine\Work\Program\My_Program\program\script\cross_section\12.'%i%'_'%j%'_00.png white' 
        
       j=j+6 
   endwhile 
i=i+1  
endwhile 
; 
 
 
 
 
 
 
 
 
 
 |   
 
 
 
 |