! MAP.GREG
! Makes a contoured grey-scale plot from a .tab file created in CLASS
! data should be on regularly sampled grid.
! contours are from 20% to 100% of the maximum
! Naomi Ridge 01/12/02


DEFINE CHARACTER IN*20

SAY "ENTER Filename (it should have the extension .tab)"
LET IN =

clear plot
set plot 20 25
set font duplex
set expand 0.8
column x 2 y 3 z 4 /file 'IN'.tab
limits /reverse x

set box match
box

levels 20 to 100 by 10

! there is a bug here - it doesn't seem to calculate
! new contours when you open a new file, so you
! need to exit greg before trying to map a new table.
! nar 02/12/02

rgdata /blanking -1000

rgmap /grey 0 2 /percent
rgmap /per
label "RA Offset" /x
label "Dec Offset" /y