#!/bin/csh -f
#
#  This script is run after each frame is displayed withing Desi.  V-LAN
#  commands are issued to record the displayed frame.
#
#  Perform the edit.
#
set inpoint = `vfr_vlan_cmd RI`
echo -n "Recording $1 at $inpoint[1]..."
set vl_stat = `vfr_vlan_cmd PF`
#
#  Let the user know what is going on...
#
set VL_STAT = NULL
while 1
   set vl_stat = `/usr/video/vfr/bin/vfr_vlan_cmd ES`
   if ($vl_stat[1] == ABORTED) then
      echo "ERROR\: The edit was aborted??? -- Re-do this frame."
      break
   endif
   if ($vl_stat[1] == DONE) break
   if ($VL_STAT == $vl_stat[1]) then
      echo -n "."
   else
      echo -n $vl_stat[1]
   endif
   set VL_STAT = $vl_stat[1]
   sleep 1
end
echo $vl_stat[1]
#
#  Goto the pre-roll position for the next frame.
#
set vl_stat = `vfr_vlan_cmd GP`
