Hi Mantas, try with this, is a script that i made for obtain data in .txt format of a display...<br>Look the bold types... You must change those... <br>The script ask level and time that you need values...<br>Well, script is in Spanish but it easy reading...
<br>Remenber you change the display &#39;d rhprs&#39; for your variable &#39;d WIND DIRECTION&#39;<br>and change path and name of the file that you want that the datas be saved...<br>.................................................................................................................................................
<br><br>&#39;q dims&#39;<br>rec=sublin(result,2)<br>lonmin=subwrd(rec,6)<br>lonmax=subwrd(rec,8)<br>&nbsp;&nbsp;&nbsp;&nbsp; say &#39;lonmin &#39;lonmin &#39;lonmax &#39;lonmax<br>rec=sublin(result,3)<br>latmin=subwrd(rec,6)<br>latmax=subwrd(rec,8)
<br>&nbsp;&nbsp;&nbsp;&nbsp; say &#39;latmin &#39;latmin &#39;latmax &#39;latmax<br>rec=sublin(result,2)<br>Imin=subwrd(rec,11)<br>&nbsp;&nbsp;&nbsp;&nbsp; say &#39;Imin &#39;Imin <br>rec=sublin(result,2)<br>Imax=subwrd(rec,13)<br>&nbsp;&nbsp;&nbsp;&nbsp; say &#39;Imax &#39;Imax <br>
rec=sublin(result,3)<br>Jmin=subwrd(rec,11)<br>&nbsp;&nbsp;&nbsp;&nbsp; say &#39;Jmin &#39;Jmin <br>rec=sublin(result,3)<br>Jmax=subwrd(rec,13)<br>&nbsp;&nbsp;&nbsp;&nbsp; say &#39;Jmax &#39;Jmax <br>&#39;set gxout shaded&#39;<br><br>&#39;q ctlinfo&#39;<br>rec=sublin(result,6)
<br>LEVELsfc=subwrd(rec,4)<br>say &#39;Nivel en Superficie es= &#39;LEVELsfc<br>rec=sublin(result,10)<br>LEVELtop=subwrd(rec,3)<br>say &#39;Nivel Tope es= &#39;LEVELtop<br>say &#39;Debe Introducir el Nivel de la Variable&#39;
<br>say &#39;Los Niveles Deben Estar Entre= &#39;LEVELsfc &#39; y &#39; LEVELtop<br>say &#39;INTRODUZCA EL NIVEL QUE DESEA&#39;<br>pull level<br>&#39;set lev &#39;level<br>if (level&gt;LEVELsfc)<br>&nbsp;&nbsp;&nbsp;&nbsp; say &#39;Su Nivel Esta Por Debajo del Nivel de Superficie&#39;
<br>&nbsp;&nbsp;&nbsp;&nbsp; say &#39;Reinicie el Programa&#39;<br>&nbsp;&nbsp;&nbsp;&nbsp; return<br>else<br>&nbsp;&nbsp;&nbsp;&nbsp; if (level&lt;LEVELtop)<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; say &#39;Su Nivel Esta Por Encima del Nivel Tope&#39;<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; say &#39;Reinicie el Programa&#39; <br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; return
<br>&nbsp;&nbsp;&nbsp;&nbsp; endif<br>endif<br><br>rec=sublin(result,3)<br>Indefinida=subwrd(rec,2)<br>&nbsp;&nbsp;&nbsp;&nbsp; say &#39;Valor Indeterminado es= &#39;Indefinida<br><br>&#39;q file&#39;<br>rec=sublin(result,5)<br>Tsize=subwrd(rec,12)<br>say &#39;Numero de Tiempos Contenidos en el Archivo = &#39;Tsize
<br><br>&#39;q time&#39;<br>rec=sublin(result,1)<br>StartTIME=subwrd(rec,3)<br>say &#39;La Hora de INICIO del Archivo Es = &#39;StartTIME<br>&#39;set t &#39;Tsize<br>&#39;q time&#39;<br>rec=sublin(result,1)<br>EndTIME=subwrd(rec,3)
<br>say &#39;La Hora FINAL del Archivo Es = &#39;EndTIME<br>say &#39;Debe Introducir un Tiempo Entre= &#39;StartTIME&#39; y &#39;EndTIME<br>say &#39;INTRODUZCA EL TIEMPO EN QUE DESEA QUE SE GENERE EL ARCHIVO .TXT&#39;<br>
pull time<br>&#39;set t &#39;time<br>&#39;q time&#39;<br>rec=sublin(result,1)<br>SELECThour=subwrd(rec,3)<br>say &#39;Tiempo Seleccionado Es = &#39;SELECThour<br>say &#39;Esta seguro que desea este tiempo 1=yes 0=no&#39;<br>
pull RES<br>if (RES = 0)<br>&nbsp;&nbsp;&nbsp;&nbsp; say &#39;Vuelva a Correr el Script y Seleccione el Tiempo que Desea&#39;<br>&nbsp;&nbsp;&nbsp;&nbsp; return<br>endif<br><br>&#39;d <span style="font-weight: bold;">rhprs</span>&#39;<br><br>&#39;q gr2w &#39;Imin&#39; &#39;Jmin
<br>rec=sublin(result,1)<br>XminW=subwrd(rec,3)<br>YminW=subwrd(rec,6)<br>&nbsp;&nbsp;&nbsp;&nbsp; say &#39;Longitud y Latitud Minima Son= &#39;XminW&#39; &#39;YminW<br><br>&#39;q gr2w &#39;Imax&#39; &#39;Jmax<br>rec=sublin(result,1)<br>XmaxW=subwrd(rec,3)
<br>YmaxW=subwrd(rec,6)<br>&nbsp;&nbsp;&nbsp;&nbsp; say &#39;Longitud y Latitud Maxima Son= &#39;XmaxW&#39; &#39;YmaxW<br><br>dLon = (math_abs(lonmin)-math_abs(lonmax))/Imax<br>dLat = math_abs(math_abs(latmin)-math_abs(latmax))/Jmax<br>&nbsp;&nbsp;&nbsp;&nbsp; say &#39;dLon &#39;dLon &#39;dLat &#39;dLat
<br>lon=lonmin<br><br>rc = write(&#39;<span style="font-weight: bold;">/home/Rafael/Desktop/txt/RH_&#39;SELECThour&#39;.txt</span>&#39;,&#39;Tiempo del Archivo Generado= &#39;SELECThour&#39;&#39;)<br>rc = write(&#39;<span style="font-weight: bold;">
/home/Rafael/Desktop/txt/RH_&#39;SELECThour&#39;.txt&#39;</span>,&#39;Nivel Seleccionado es= &#39;level&#39;&#39;)<br>rc = write(&#39;<span style="font-weight: bold;">/home/Rafael/Desktop/txt/RH_&#39;SELECThour&#39;.txt</span>
&#39;,&#39;Punto (&#39;Imin&#39;,&#39;Jmin&#39;) = (&#39;XminW&#39;,&#39;YminW&#39;)&#39;)<br>rc = write(&#39;<span style="font-weight: bold;">/home/Rafael/Desktop/txt/RH_&#39;SELECThour&#39;.txt</span>&#39;,&#39;Punto (&#39;Imin&#39;,&#39;Jmax&#39;) = (&#39;XminW&#39;,&#39;YmaxW&#39;)&#39;)
<br>rc = write(&#39;<span style="font-weight: bold;">/home/Rafael/Desktop/txt/RH_&#39;SELECThour</span>&#39;.txt&#39;,&#39;Punto (&#39;Imax&#39;,&#39;Jmin&#39;) = (&#39;XmaxW&#39;,&#39;YminW&#39;)&#39;)<br>rc = write(&#39;
<span style="font-weight: bold;">/home/Rafael/Desktop/txt/RH_&#39;SELECThour&#39;.txt</span>&#39;,&#39;Punto (&#39;Imax&#39;,&#39;Jmax&#39;) = (&#39;XmaxW&#39;,&#39;YmaxW&#39;)&#39;)<br>rc = write(&#39;<span style="font-weight: bold;">
/home/Rafael/Desktop/txt/RH_&#39;SELECThour&#39;.txt</span>&#39;,&#39;X = &#39;Imin&#39; a &#39;Imax&#39; and Y = &#39;Jmin&#39; a &#39;Jmax&#39;&#39;)<br>rc = write(&#39;/<span style="font-weight: bold;">home/Rafael/Desktop/txt/RH_&#39;SELECThour&#39;.txt
</span>&#39;,&#39;Valor Indeterminado = &#39;Indefinida&#39;&#39;)<br>rc = write(&#39;<span style="font-weight: bold;">/home/Rafael/Desktop/txt/RH_&#39;SELECThour&#39;.txt</span>&#39;,&#39;Latitud Longitud Variable&#39;)<br>
<br>&nbsp;&nbsp;&nbsp;&nbsp; while (lon &lt;= lonmax+dLon)<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; lat=latmin<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; while (lat &lt;= latmax)<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; &#39;set lat &#39;lat<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; &#39;set lon &#39;lon<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; &#39;<span style="font-weight: bold;">
d rhprs</span>&#39;<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; var = subwrd(result,4)<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; lonval = math_format(&#39;%6.3f&#39;,lon)<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; latval = math_format(&#39;%6.3f&#39;,lat)<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; valor = math_format(&#39;%4.1f&#39;,var)
<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; say &#39;Latval &#39;latval &#39;Lonval &#39;lonval &#39;Variable &#39;valor<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; <span style="font-weight: bold;">rc = write(&#39;/home/Rafael/Desktop/txt/RH_&#39;SELECThour&#39;.txt&#39;,&#39;&#39;latval&#39; &#39;lonval&#39; &#39;valor&#39;&#39;)
</span><br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; &#39;clear&#39;<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; lat=lat+dLat<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; endwhile<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; lon=lon+dLon<br>&nbsp;&nbsp;&nbsp;&nbsp; endwhile<br>say &#39;Hora Seleccionada Fue = &#39;SELECThour<br><span style="font-weight: bold;">
rc = close(&#39;/home/Rafael/Desktop/txt/RH_&#39;SELECThour&#39;.txt&#39;)&nbsp; </span><br style="font-weight: bold;"><br clear="all"><br>-- <br>Ing. Rafael E. Mundaray M.