# UTILITY SCRIPT NAME : gempak_skewt.sh
#              AUTHOR : Steve Lilly
#
# ABSTRACT : This utility script generates SKEW_T gif's
#            files which will be display on the Model 
#            Analyses and Forecasts website.
#
#
echo "History: SEPTEMBER   2007 - FIRST IMPLEMENTED"
#

cd $DATA

for stn in `cat skew_dict.tbl`
do

 tmpidd=`echo $stn | cut -c1-5 | sed -e 's/%//`
 tmpid=`echo $tmpidd | sed -e 's/%//`
 dattim=`echo $stn | cut -c11-21`
 map=`echo $stn | cut -c6-7`

 if [ $map -gt 59 ]
 then

snprof << EOF
CLEAR   = yes
AREA    = @$tmpid
SNFILE  = $PDY.snd
DATTIM  = $dattim
SNPARM  = tmpc;dwpc;kntv(wnd)
PTYPE   = skewt/1/10;5;15;4
VCOORD  = pres
STNDEX  = lclp;lift;pwat
STNCOL  = 1
WIND    = bk1/1.5//112
WINPOS  = 2
MARKER  = 0
LINE    = 2;3/1/3;3
BORDER  = 4
DEVICE  = gif|${tmpid}_skt_000m.gif|900;650
TITLE   = 1//Temperature(TMPC) in red  Dewpoint(DWPC) in green
YAXIS   = //50/2;1;0
XAXIS   = //10/1;1;0
FILTER  = YES
CLEAR   = YES
PANEL   = 0
TEXT    = .8/2/2/c/sw
THTALN  = 22///210/400/10
THTELN  = 26/3
MIXRLN  = 18/2
l
r

EOF

$GEMEXE/gpend

    if [ $map -ge 80 ] && [ $map -le 89 ]
    then
      MAPAREA="samskt"
    fi

    if [ $map -lt 70 ]
    then
     MAPAREA="afrskt"
    fi

    if [ $map -gt 70 ] && [ $map -lt 79 ]
    then
     MAPAREA="namskt"
    fi

    if [ $map -eq 70 ] || [ $map -ge 90 ]
    then
     MAPAREA="pacskt"
    fi

    export IMAGDIR=${COMOUT}/${MAPAREA}/$RUN/$cyc/images
    mv *.gif $IMAGDIR

  fi

done

msg="HAS COMPLETED NORMALLY!"
echo $msg
postmsg "$jlogfile" "$msg"

############# END OF SCRIPT #######################