NOTICE: This version of the NSF Unidata web site (archive.unidata.ucar.edu) is no longer being updated.
Current content can be found at unidata.ucar.edu.

To learn about what's going on, see About the Archive Site.

Re: [idd-brasil] testar link, alvaro.fazenda@xxxxxxxxxxxxx

Prezada Bernadina,
Segue um script para plotar o sinop.

Espero que ajude!
Att.
Rafael
-- 
Rafael Censi Borges
Epagri/Ciram
+55 (48)3239-8064/8066
http://ciram.epagri.rct-sc.br/


##########################################################
### Seta as variaveis necessarias para localizar o GEMPAK  #######
#
source ~gempak/Gemenviron
setenv GEMTBL /home/gempak/GEMPAK5.10.2/gempak/tables

##### Diretorio com os dados decodificados no formato GEMPAK  ########
##### mais o arquivo fonte para todas as figuras

set FONTE=/data/ldm/gempak
set SFFILE=${FONTE}/surface/${YMD}_sao.gem

########## Diretorio de destino para todas as figuras ########

set DESTINO=$HOME
set DIRRUN=$HOME
set DESTINO2=/home/gempak/gifs
cd $DIRRUN

#################################################################
#
#                Cria mapa com dados synop do Brasil
#
#################################################################

############ Define o arquivo de saida #################
set SAIDA2=${DESTINO2}/metar${YMD}${HORA}'Z'.gif
#set SAIDA=${DESTINO}/metar${YMD}${HORA}.gif

if (-e ${SAIDA2}) then
 rm -f ${SAIDA2}
endif

############## Define area de dados e grafico ###########
set STATION=dset
set GAREA='-50;-80;-10;-30'
set ARQSAIDA = 'gif|'${SAIDA2}'|2500;2000'
#set ARQSAIDA = xw
#

gpcolor <<EOF
 colors = 101=white;1=black
 DEVICE = ${ARQSAIDA}
r

e
EOF

echo " "

gpmap << EOF
 CLEAR  = YES
 GAREA = ${GAREA}
 PROJ  = CED
 DEVICE = ${ARQSAIDA}
 LATLON = 9/10/1/1/10;10
 \$MAPFIL=histbr.uni+base
 MAP   = 1/10/1 + 1//2
 TEXT   = 2/22/sw
 TITLE  = 1/-3/ METAR ${HORA}Z ${DD}/${MM}/${YY}
 r

 e
EOF
echo " "

sfmap << EOF
 CLEAR  = NO
 colors = 1
 SFFILE        = ${SFFILE}
 AREA  = ${STATION}
 GAREA = ${GAREA}
 DATTIM        = ${HORA}
 SFPARM = SKYC;TMPC;WSYM;ALTM;;DWPC;BRBK
 OUTPUT = xw
 PROJ  = CED
 DEVICE = ${ARQSAIDA}
 MAP   = 0
 LATLON = 0/10/1/1/20;20
 FILTER = 0.5
 TEXT   = 1.0/1/1/hw
 TITLE  =

r

e
EOF
echo " "

rm -f gemglb.nts last.nts
rm -f GEMGLB.NTS LAST.NTS
gpend
cleanup
exit(0)

# end of shell....
##########################################


2009/6/22 <bernardinavaz@xxxxxxxxx>

>
> Prezado
> Bom Dia Professor Waldenio Almeida,
> Ficaria muito grato se me pudesse fazer o especial favor de enviar um
> script que descodificasse o sinop se possivel.
> Agradeço desde ja com antecedência.
> Com os meus melhores cumprimentos.
> Obrigado
> Bernardina Vaz-São Tomé e Principe
>
>
>
>
>
> --- On Tue, 3/17/09, Waldenio <waldenio.almeida@xxxxxxxxxxxxx> wrote:
>
> > From: Waldenio <waldenio.almeida@xxxxxxxxxxxxx>
> > Subject: [idd-brasil] testar link
> > To: idd-brasil@xxxxxxxxxxxxxxxx
> > Date: Tuesday, March 17, 2009, 2:48 AM
> > Prezados,
> >
> > Estamos iniciando um novo endereo para o servidor LDM do
> > CPTEC. Ele
> > passar a ser acessado atravs do "link" idd.cptec.inpe.br.
> >
> > Num futuro prximo este endereo substituir os atuais
> > "moingobe.cptec.inpe.br" e "mopora.cptec.inpe.br".
> >
> > Est em fase de testes, portanto peo que nos ajudem a
> > test-lo e nos
> > informem sobre qualquer problema.
> >
> > Att.
> > Waldenio.
> >
> > _______________________________________________
> > idd-brasil mailing list
> > idd-brasil@xxxxxxxxxxxxxxxx
> > For list information or to unsubscribe,  visit:
> http://www.unidata.ucar.edu/mailing_lists/
>
>
>
>
>
> _______________________________________________
> idd-brasil mailing list
> idd-brasil@xxxxxxxxxxxxxxxx
> For list information or to unsubscribe,  visit:
> http://www.unidata.ucar.edu/mailing_lists/
>
  • 2009 messages navigation, sorted by:
    1. Thread
    2. Subject
    3. Author
    4. Date
    5. ↑ Table Of Contents
  • Search the idd-brasil archives: