# Rachael Sigler  Computer Assignment #11

#!/bin/csh

# Define the variables needed based on the prgram argumetns.
set STATION1_ID=$1
set STATION1_DATE=$2
set STATION1_HOUR=$3
set STATION2_ID=$4
set STATION2_DATE=$5
set STATION2_HOUR=$6

# Idiotprrof the user's input.  If there is a problem, print out 
# an error message.
if ($STATION1_ID == "" || $STATION1_DATE == "" || $STATION1_HOUR == "" || \
    $STATION2_ID == "" || $STATION2_DATE == "" || $STATION2_HOUR == "" ) then
  echo ""
  echo "This program is going to generate two skew-t's side by side for you."
  echo "Please input the parameters for the grafic you want in the following order:"
  echo "ca11script.g @[station 1 ID] [station 1 date] [station 1 hour] @[station 2 ID] [station 2 date] [station 2 hour]"
  echo "So it should look like this: 'ca11script.g @oun 20040409 1200 @oun 20040410 0000'"
  exit 0
endif

# Source the Gemenviron file to be sure our environment is set up properly.
source /usr/local/nawips/Gemenviron

# Remove the previous gif file.
rm CA11real.gif

# Run snprof to get the two skew-t soundings on one page.
snprof << EOF
	 SNFILE   = /data/gempak/upperair/${STATION1_DATE}_upa.gem
	 DATTIM   = ${STATION1_HOUR}
	 AREA     = ${STATION1_ID}
	 SNPARM   = tmpc;dwpc
	 LINE     = 2;3//2
	 PTYPE    = skewt
	 VCOORD   = PRES
	 STNDEX   = stid/stnm
	 STNCOL   = 1
	 WIND     = BM4
	 WINPOS   = 1
	 MARKER   = 0
	 BORDER   = 1
	 TITLE    = 1/0/Sigler: skew-t: ${STATION1_ID} on ${STATION1_DATE} at${STATION1_HOUR}
	 DEVICE   = gif|CA11.gif|800;600
	 YAXIS    = ///;1
	 XAXIS    = ///;1
	 FILTER   = YES
	 CLEAR    = y	
	 PANEL    = l
	 TEXT     = .7
	 THTALN   = 1/2
	 THTELN   = 1/10
	 MIXRLN   = 1/10
         list         
         run

EOF

snprof << EOF
	 SNFILE   = /data/gempak/upperair/${STATION2_DATE}_upa.gem
	 DATTIM   = ${STATION2_HOUR}
         AREA     = ${STATION2_ID}
         TITLE    = 1/0/Sigler: skew-t: ${STATION2_ID} on ${STATION2_DATE} at${STATION2_HOUR}
	 CLEAR    = n	
	 PANEL    = r
         list
	 run

EOF

# gpend after all the runs.
gpend

# Echo to get a new line.  Then exit to a promt.
echo ""

exit 0