#!/bin/csh
#---------------------------------------------------------------------------
# hdf2gif: Run movie on the CORHEL distribution generated files.
#
# Usage : hdf2gif <Carrington rotation> <resolution> <palette>
#                 <image scale min> <image scale max>
#                 <2.2 * image scale min> <2.2 * image scale max>
#---------------------------------------------------------------------------

set cr = $1
set res = $2
set pal = $3
set min = $4
set max = $5
set rmin = $6
set rmax = $7

setenv CORHEL_DIR "$CORHEL_ROOT"
setenv CORHEL_BIN "$CORHEL_ROOT/bin"
setenv CORHEL_RUN "$CORHEL_ROOT/run/cr$cr-$res"

pushd $CORHEL_DIR/tools/corona > /dev/null
source ./set.sh run
popd > /dev/null

cd $CORHEL_RUN
mkdir movie

if (-e $CORHEL_RUN/corona_bc/br_raw.hdf && -e $CORHEL_RUN/corona_bc/br.mmax.filt3.hdf) then
  cd $CORHEL_RUN/corona_bc
  cp br_raw.hdf $CORHEL_RUN/movie/raw000.hdf
  cp br.mmax.filt3.hdf $CORHEL_RUN/movie/masin000.hdf

  cd ../movie
  cp $CORHEL_DIR/gui/palette/$3 .

  set rawInfo = `$CORONA_BIN/info raw000.hdf`
  set masinInfo = `$CORONA_BIN/info masin000.hdf`
  set rawMin = $rawInfo[17]
  set rawMax = $rawInfo[21]
  set masinMin = $masinInfo[17]
  set masinMax = $masinInfo[21]

  $CORONA_BIN/movie -gif -seq 000 000 raw -palette $pal -scale -min $rmin -max $rmax
  wait
  $CORONA_BIN/movie -gif -seq 000 000 masin -palette $pal -scale -min $min -max $max
  wait
  mv -f raw.gif raw$cr$res.gif
  mv -f masin.gif masin$cr$res.gif
  wait
else
  cp -f $CORHEL_DIR/gui/gif/err.gif $CORHEL_RUN/movie/raw$cr$res.gif
  cp -f $CORHEL_DIR/gui/gif/err.gif $CORHEL_RUN/movie/masin$cr$res.gif
endif

exit 0
