#!/bin/csh -f
#+
# tvfocus -- show or set the DEIMOS guider focus value
#
# Purpose:
#	With no arguments, print the current DEIMOS TV focus setting.
#	With one numeric argument, set the DEIMOS TV focus setting,
#
# Usage:
#	tvfocus [x]
# 
# Arguments:
#	x = tvfocus setting to select
# 
# Output:
#	- With no arguments, the tvfocus setting is printed
# 
# Restrictions:
# 
# Exit values:
#	 0 = normal completion
#	 1 = wrong number of arguments
#
# Example:
#	1) Print the current TV focus value:
#		tvfocus
# 
#	2) Reset the TV focus to 970 units:
#		tvfocus 970
#-
# Modification history:
#	2002-Jul-06	GDW	Original version
#-----------------------------------------------------------------------

set buf = $0
set cmd = $buf:t
set usage = "Usage: $cmd"

# verify args...
if ( $#argv > 1 ) then
  printf "$usage\n"
  exit 1
endif

if ( $#argv == 0 ) then
	show -s deimot -terse TVFOCVAL
else
	modify -s deimot TVFOCVAL="$1"
	exit $status
endif