[gradsusr] I want to make a loop

[Sancta Vega]

Im a new user of grads and I can do 5 plots in the same page but i want to
know  if someone can help me to make a loop.
 This is an example: "wind at 700Hpa and vorticity at 850Hpa"

"reinit"
"set display color white"
"c"
"set grads off"
"set xlopts 1 3 0.15"
"Set ylopts 1 3 0.15"
"Set ylint 5"
"set rgb 16 100  100  100"
"set clevs -20 -15 -10 -5 0 5 10 15 20"
"set mpt * 16 1 6"
"set mpdset hires"
"sdfopen August_12h.nc"



**************************************************************************************
"set vpage 0 4  7.5 11"
**************************************************************************************
"set grads off"
"set lat 0 30"
"Set lon -30 20"
"set lev 850"
"set t 1059"
"set gxout contour"
"set ccolor 4"
"set gxout shaded"
"d hcurl(u,v)*1e05"
"set lev 700"
"set t 1059"
"set gxout stream"
"Set cthick 5"
"Set strmden 4"
"d u;v"
"run cbarn.gs"
"draw title \ wind 700hPa-vorticity850hpa-050813-12h"

**************
"set vpage 4 8  7.5 11"
**************************************************************************************
"set grads off"
"set lat 0 30"
"Set lon -30 20"
"set lev 850"
"set t 1060"
"set gxout contour"
"set ccolor 4"
"set gxout shaded"
"d hcurl(u,v)*1e05"
"set lev 700"
"set t 1060"
"set gxout stream"
"Set cthick 5"
"Set strmden 4"
"d u;v"
"run cbarn.gs"
"draw title \ wind 700hPa-vorticity850hpa-060813-12h"

**************
"set vpage 2 6  4 7.5"
**************************************************************************************
"set grads off"
"set lat 0 30"
"Set lon -30 20"
"set lev 850"
"set t 1061"
"set gxout contour"
"set ccolor 4"
"set gxout shaded"
"d hcurl(u,v)*1e05"
"set lev 700"
"set t 1061"
"set gxout stream"
"Set cthick 5"
"Set strmden 4"
"d u;v"
"run cbarn.gs"
"draw title \ wind 700hPa-vorticity850hpa-070813-12h"

**************
"set vpage 0 4  0.5 4"
**************************************************************************************
"set grads off"
"set lat 0 30"
"Set lon -30 20"
"set lev 850"
"set t 1062"
"set gxout contour"
"set ccolor 4"
"set gxout shaded"
"d hcurl(u,v)*1e05"
"set lev 700"
"set t 1062"
"set gxout stream"
"Set cthick 5"
"Set strmden 4"
"d u;v"
"run cbarn.gs"
" draw title \ wind 700hPa-vorticity850hpa-080813-12h"

**************
"set vpage 4 8  0.5 4"
**************************************************************************************
"set grads off"
"set lat 0 30"
"Set lon -30 20"
"set lev 850"
"set t 1063"
"set gxout contour"
"set ccolor 4"
"set gxout shaded"
"d hcurl(u,v)*1e05"
"set lev 700"
"set t 1063"
"set gxout stream"
"Set cthick 5"
"Set strmden 4"
"d u;v"
"run cbarn.gs"
"draw title \ wind 700hPa-vorticity850hpa-090813-12h"
"set enable print fig"
"print"
"set disable print"
"!gxeps -i fig -o vent-700hPa_20-240700.eps"
"!display fig.eps"



"printim  vent-700hPa_vorticité850hpa-050813-090813-12h.png"
-------------- next part --------------
An HTML attachment was scrubbed...
URL: http://gradsusr.org/pipermail/gradsusr/attachments/20140218/5d648bc7/attachment.html