#! /bin/csh -f
#
#    Observing Script for ORIMSR
#
#    PI:  Jim Morgan (UMD)
#    Email: morgan@astro.umd.edu
#    Telephone: (301) 405-6853
#    Correlator set to observe CO
#    LST Range of main source: 01:00 - 10:00.
#    Main source = ORIMSR
#
# Setups follow     ==========================================
#
setup name=quality s=orimsr c=0541-056 f=0541-056 \
  p=3C273.w,3c273.n,3c454.3.w,3c454.3.n
#
setup name=tuning freq=115.271201 iffreq=450 obsline=co \
  dopsrc=orimsr dopcat=j2000.cat
#
setup name=corr restfqs=115.271201,115.271201 elevlim=11 itime=50 nchan=-1
#
setup name=wide setup=corr cormode=8 corbw=100,100 corf=175,375,575,775
#
setup name=narrow setup=corr cormode=2 corbw=50,50 corf=485,415
#
setup name=orimsr setup=narrow source=orimsr vis=orimsr catalog=j2000.cat \
  nchan=1 stop=+24
#
setup name=3c273.w setup=wide source=3c273 vis=3c273.w \
  stop=+9 maxobs=2 lstrange=0730,1730
#
setup name=3c273.n setup=narrow source=3c273 vis=3c273.n \
  stop=+30 maxobs=1 lstrange=0730,1730
#
setup name=3c454.3.w setup=wide source=3c454.3 vis=3c454.3.w \
  stop=+9 maxobs=2 lstrange=1700,0200
#
setup name=3c454.3.n setup=narrow source=3c454.3 vis=3c454.3.n \
  stop=+30 maxobs=1 lstrange=1700,0200
#
setup name=0541-056 setup=wide source=0541-056 vis=0541-056 stop=+9
#
# Observing follows ==========================================
#
#  Since the tuning and correlator setup only needs to be
#  done once for the entire project, it is done as following:
#
scan setup='tuning'
#
#  The passband sources will only be observed if the current
#  time is not right in the midst of the best time to observe
#  the main source (see the keywords lstrange for these setups).
#  Note, that the maxobs keyword will insure these only get done
#  once even if the script restarts.
#
scan setup='(3c273.w,3c273.n,3c273.w)|(3c454.3.w,3c454.3.n,3c454.3.w)'
#
#  Start the main loop.  The loop stop time is set according
#  to whether or not the passband observation has been done yet.
#  The amount of time reserved has been determined from the sum
#  of the stop values in the setups defined above.
#
set numobs = `svalue setup=3c273.w,3c273.n,3c454.3.w,3c454.3.n`
set quittime="stop-50"
if ($numobs > 2) set quittime="stop"
loop srcsetup='orimsr' calsetup='0541-056' stop="$quittime"
#
#  If the passband observations were missed at the beginning,
#  then get them now.  If they have already been observed,
#  then this next command will just be ignored.
#
scan setup='(3c273.w,3c273.n,3c273.w)|(3c454.3.w,3c454.3.n,3c454.3.w)'
#
# End of script    ===========================================
#
exit 0