; PLAYR
;---------------------------------------------------------------
;! Verb to load an image into a TV channel
;# TASK TV-APPL OOP INTERACTIVE
;-----------------------------------------------------------------------
;;  Copyright (C) 1995, 1999
;;  Associated Universities, Inc. Washington DC, USA.
;;
;;  This program is free software; you can redistribute it and/or
;;  modify it under the terms of the GNU General Public License as
;;  published by the Free Software Foundation; either version 2 of
;;  the License, or (at your option) any later version.
;;
;;  This program is distributed in the hope that it will be useful,
;;  but WITHOUT ANY WARRANTY; without even the implied warranty of
;;  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
;;  GNU General Public License for more details.
;;
;;  You should have received a copy of the GNU General Public
;;  License along with this program; if not, write to the Free
;;  Software Foundation, Inc., 675 Massachusetts Ave, Cambridge,
;;  MA 02139, USA.
;;
;;  Correspondence concerning AIPS should be addressed as follows:
;;         Internet email: aipsmail@nrao.edu.
;;         Postal address: AIPS Project Office
;;                         National Radio Astronomy Observatory
;;                         520 Edgemont Road
;;                         Charlottesville, VA 22903-2475 USA
;-----------------------------------------------------------------------
;---------------------------------------------------------------
PLAYR     LLLLLLLLLLLLUUUUUUUUUUUU CCCCCCCCCCCCCCCCCCCCCCCCCCCCC
PLAYR:  Task to load either of two images and play with them
INNAME                             Image name(name).
INCLASS                            Image name(class).
INSEQ           0.0      9999.0    Image name(seq. #). 0=>high
INDISK          0.0         9.0    Disk drive #. 0=>any
IN2NAME                            Image name(name).
IN2CLASS                           Image name(class).
IN2SEQ          0.0      9999.0    Image name(seq. #). 0=>high
IN2DISK         0.0         9.0    Disk drive #. 0=>any
TBLC            0.0      4096.0    Bottom Left Corner of image
                                     0=>entire image
TTRC            0.0      4096.0    Top Right Corner of image
                                     0=>entire image
TXINC        -100.0       256.0    Load every TXINC'th column
TYINC        -100.0       256.0    Load every TYINC'th row
TVCHAN          1.0        44.0    Image channel to load
TVCORN          0.0      2048.0    TV pixel location of bottom
                                     left corner of image
PIXRANGE                           Min,Max  of image intensity
                                     0=>entire range
AXVAL                              Pixrange for 2nd image
FUNCTYPE                           Image intensity transfer func
                                     'LN' Linear.  unknown=>'LN'
                                     'LG' Logarithmic
                                     'SQ' Square root
                                     'NE' Negative linear
                                     'NG' Negative logarithmic
                                     'NQ' Negative square root
UVWTFN                             Function type for 2nd image
DETIME         120                 Delay time to quit (sec)
LTYPE          -10.0       10.0    Labeling type
DOCIRCLE       -1.0         1.0    > 0 => extend ticks to form
                                   coordinate grid
SCALR1         -64.        64.     Step wedge width: 0 => -16
                                   < 0 => ask position
DOWEDGE         0.0       128.0    # of contours or wedges in
                                   OFM contour/wedge, <= 0 => 8
OFMFILE                            Name of OFM text file used
----------------------------------------------------------------
PLAYR
Type: Task
Use:  PLAYR loads 2 cataloged images into two television image
      memories.  Then interactive options are offered.  This is
      a demo of TV DEVICE object code.
Adverbs:
  USERID......User ID of owner of image.  0 => current user,
                32000 => any user.
  INNAME......Image name(name).       Standard defaults.
  INCLASS.....Image name(class).      Standard defaults.
  INSEQ.......Image name(seq. #).     0 => highest.
  INDISK......Disk drive # of image.  0 => any.
  TBLC........The Bottom Left-hand pixel of the subarray of
              the map to be displayed. The value (0,0,...)
              means take the entire first plane of the image.
  TTRC........The Top Right-hand pixel of the subarray of
              the map to be displayed.  The value (0,0) means
              take the entire plane of the image.
  TXINC.......Load every TXINC'th column beginning at TBLC.
              TXINC = -1 => interpolate columns to fill as much
              of the screen as possible.  TXINC = -2 =>
              interpolate one column between image columns (if
              possible), -3 => 2 interpolated columns, etc.
  TYINC.......Load every TYINC'th row beginning at TBLC.
              TYINC = -1 => interpolate rows to fill as much of
              the screen as possible.  TYINC = -2 =>
              interpolate one row between image rows (if
              possible), -3 => 2 interpolated rows, etc.
  TVCHAN......Image channel to load.  Lowest channel is used
              if more than one specified (via decimal code).
              0  =>  channel 1.
  TVCORN......TV pixel location (X,Y) of the bottom left-corner
              of the image.  0 => center on TV
  PIXRANGE....Min,Max intensity to display. 0 => entire range.
  FUNCTYPE....Image intensity transfer function
              'LN' => linear; 'LG' => log; 'NE' => negative lin.
              'NG' => negative log;  'SQ' => square root,;
              'NQ' => negative square root; others => linear.
  UVWTFN......FUNCTYPE for second image.
  DETIME......Delay time in seconds (>= 120) to quit if you stop
              playing.
  LTYPE.......Labelling type: 1 = border, 2 = no ticks,
              3 = standard, 4 = relative to ref. pixel,
              5 = relative to subimage (BLC, TRC) center
              6 = pixels, 7-10 as 3-6 but with only tick numbers
              and X and Y axis types shown
  DOCIRCLE....False (<= 0) means that tick marks are short lines
              extending inward from the plot borders.  True (>0)
              requests that a full coordinate grid be drawn.
  SCALR1......Specifies the width of any step wedges.  0 => -16
              < 0 => set position with the cursor.
  DOWEDGE.....Specifies the number of contours to use with
              OFMCONTOUR and OFMWEDGE.  Can be reset
              interactively.  <= 0 => 8.
  OFMFILE.....Name of the OFM file to be gotten, saved, zapped.
              Can be changed interactively.
----------------------------------------------------------------
