#First version of autophot written 3/18/2002 ---plm
#Assumes that digiphot and daophot have been loaded.
#Rewritten for Swoope data....June 15, 2005
#Modified for Y4k data Aug 19, 2005
#Modified to allow for errors in character Feb 19, 2006
#Broke this into two pieces so that the error stuff would work...2/20/06

#Set things up:

task fitpsf="apphot$x_apphot.e"
task setjd = "astutil$x_astutil.e"


flpr
flpr
flpr 0
#Next, unlearn a bunch of tasks
unlearn daophot
unlearn ptools
unlearn fitpsf
unlearn imstat
unlearn hedit
unlearn setjd
#Now reset some things to reasonable values:
datapars.exposur="exptime"
datapars.airmass="secz"
datapars.ccdread="rdnoise"
datapars.gain="gain"
daophot.cache=yes

delete("tempall")
files("Py*%.fits%%",>"tempall")
#OK, great.  Now, DO IT:
y4kphotit("tempall")