Name

---

      PUT_SCALE

Purpose

---

      Embed in current image values needed to restore scaling.

Category

---

Calling Sequence

---

      put_scale

Inputs

---

Keyword Parameters

---

Keywords

---

        The following are only used to add scaling to an
        existing image not easily regenerated:
        IX=[ix1,ix2] Plot window x device coordinates.
        IY=[iy1,iy2] Plot window y device coordinates.
        X = [x1,x2] Plot window x data coordinates.
        Y = [y1,y2] Plot window y data coordinates.
        TYPE_X=xtyp X axis type: 0=linear, 1=log.
        TYPE_Y=ytyp Y axis type: 0=linear, 1=log.
        LOG=name Logs values to $HOME/put_scale.txt under
          name (anything, but image name is useful).
        TEXT=stxt Returned scaling info as text.
        INFO=bb Returned scaling info as a byte array.

Outputs

---

Common Blocks

---

Notes

---

      Notes: Embeds in dispayed image the following values:
        1234567890 - Used to determine if scaling available (I10).
        ix1, ix2 - Plot window device coordinates in X (2I6).
        iy1, iy2 - Plot window device coordinates in Y (2I6).
        x1, x2 - Plot window data coordinates in X (2G13.6).
        y1, y2 - Plot window data coordinates in Y (2G13.6).
        xtype, ytype - X and Y axis type: 0=linear, 1=log (2I2).
        For type=1 the data range is really the log10 of
        the actual data range for that axis.
     
        Use set_scale to read these values and set scaling.
        May also read 90 bytes and convert to string:
          print,string(tvrd(0,0,90,1))
        Only works if image stored in non-lossy format.

Modification History

---

      R. Sterner, 1995 Feb 28
      R. Sterner, 1995 Aug 24 --- Added keywords.
      R. Sterner, 1999 Jul 8 --- Added LOG=name keyword.
      R. Sterner, 2001 Mar 30 --- Modified for 8 or 24 bit color.
      R. Sterner, 2001 Apr 04 --- Added /NOEMBED and TEXT=txt
      R. Sterner, 2011 Feb 25 --- Added INFO=embedded, added help for TEXT.
  Copyright (C) 1995, Johns Hopkins University/Applied Physics Laboratory
  This software may be used, copied, or redistributed as long as it is not
  sold and this copyright notice is reproduced on each copy made. This
  routine is provided as is without any express or implied warranties
  whatsoever. Other limitations apply as described in the file disclaimer.txt.