# Simple ParselTongue script for backing up an entire AIPS catalogue to disk.
# Spits out every file in your catalogue to the current working directory.

# Change the usernumber and disk number if needed
aipsdisk = 1
usernum = 666

import os
from AIPS import AIPS
from AIPSTask import AIPSTask, AIPSList
from AIPSData import AIPSUVData, AIPSImage, AIPSCat

AIPS.userno = usernum
outdir = outdir = os.getcwd()
fittp = AIPSTask('FITTP')
pca = AIPSCat(aipsdisk)
for fitsfil in pca[aipsdisk]:
   file = AIPSImage(fitsfil.name, fitsfil.klass, aipsdisk, fitsfil.seq)
   fittp.indata = file
   filename = fitsfil.name + '.' + fitsfil.klass + '.' + format(fitsfil.seq) + '.fits'
   fittp.dataout = outdir + "/" + filename
   print fittp.dataout
   fittp.go()