#!/bin/csh -f
#+
# gozero -- set slider 3 or 4 to zeroth order imaging position
#
# Purpose:
#	Set the tilt of slider number 3 or 4 to the appropriate position
#	for imaging.
#
# Usage:
#	gozero
# 
# Arguments:
#	None
# 
# Output:
#	None
# 
# Restrictions:
#	None
# 
# Exit values:
#	0 = normal completion
#	1 = wrong number of arguments
#
# Example:
#	1) send the grating to zeroth order
#		gozero
#
#-
# Modification history:
#	2002-Aug-12	GDW	Original version
#	2003-Apr-24	GDW	Modified to support slider 4
#       2004-Apr-24     MK      Temporarily modified the angle.
#	2007-Jun-20	GDW	Changed from using GxTLTVAL to GxTLTNAM
#-----------------------------------------------------------------------

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

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

# set up instrument for zeroth-order imaging...
set slider = `slider`
if ( "$slider" == "3" ) then
    modify -s deimot g3tltnam = Zeroth_Order
else if ( "$slider" == "4" ) then
    modify -s deimot g4tltnam = Zeroth_Order
else
    printf "ERROR: you must select slider 3 or 4 to run this command\n"
    exit 1
endif
exit