'open /cpc/home/wd52vk/samer/fronts/t925-SA-y1980-2009.ctl'
'open /cpc/home/wd52vk/samer/fronts/u925-SA-y1980-2009.ctl'
'open /cpc/home/wd52vk/samer/fronts/v925-SA-y1980-2009.ctl'
'open /cpc/home/wd52vk/samer/fronts/slp-SA-y1980-2009.ctl'
iyear=1981
iday=1
while iday<=31
'set vpage 0.0 8.5 0.0 11.0'
'set parea 1.0 4.0 7.0 10.0'
'set grads off'
'set annot 1 5'
'set map 1 1 7'
'set string 1 tc 7'
'set strsiz 0.15 0.15'
'draw string 4.25 10.6 'iday' December 'iyear
'draw string 2.5 10.2 925-hPa T (deg C) & Wind'
'set csmooth on'
'set cterp off'
'set lon -90 -20'
'set lat -55 0'
'set ylint 5'
'set xlint 10'
'run /cpc/home/wd52vk/grads/util/rgbset.gs'
'set clevs 10 12 14 16 18 20 22 24 26'
'set ccols 59 49 47 45 43 41 21 23 25 27'
'set gxout shaded'
'set time 'iday'dec'iyear
'd t925.1'
'set gxout vector'
'set arrscl 0.3 15'
'set arrowhead -0.3'
'set arrlab off'
'set ccolor 1'
'set cthick 3'
'd u925.2;v925.3'
'run /cpc/home/wd52vk/grads/util/cbarmerc1.gs'
'set vpage 0.0 8.5 0.0 11.0'
'set parea 4.5 7.5 7.0 10.0'
'set grads off'
'set annot 1 5'
'set map 1 1 7'
'set string 1 tc 7'
'set strsiz 0.15 0.15'
'draw string 6.0 10.2 SLP'
'set csmooth on'
'set cterp off'
'set ylint 5'
'set xlint 10'
'set gxout contour'
'set cint 4'
'set cthick 3'
'set ccolor 1'
'd slp.4-1000.'
'printim uvt925-slp-SA-'iday'dec'iyear'.gif white'
'clear'
iday=iday+1
endwhile