#!/bin/csh

# RT phase logs and plots

set bdir = $1
set wsta = $2
set datesel = "$3 $4 $5"
  
set prevwd = `pwd`

  # set the sampler
  set wsamp = "SiteTime-Rtpm140-Rtpm"
  set ofil  = "rtpmdat.tmp"

  # echo the command
  echo "$bdir/rfclock_rh7 -p /home/gbtlogs -c $wsamp $datesel -o $ofil -w"

  # actually do the command
  $bdir/rfclock_rh7 -p /home/gbtlogs -c $wsamp $datesel -o $ofil -w

  echo -n "want to plot? (cr)no, (1)yes :"
  set wreply = $<
  if($wreply < 1) then
    exit
  else
    set prevwd = `pwd`
    # set dir to where "giplt" is
    cd /users/fghigo/CLOCKS/dailyplots
  endif

  set tfil = $prevwd/$ofil

  echo -n "hard copy? (cr)no, (1)yes : "
  set hc = $<

  switch ($wreply)
      
    case 1:
       if($hc != 1) then 
         idl -e "giplt,'$tfil','Delay' & t=dialog_message('Done')"
       endif
       if($hc == 1) then 
         idl -e "giplt,'$tfil','Delay',/hcopy"
         lp -d $PRINTER giplt.ps
       endif
       breaksw;

   endsw

 cd $prevwd