Name

---

      TXTYESNO

Purpose

---

      Ask a yes/on question and read the answer.

Category

---

Calling Sequence

---

      ans = txtyesno(txt)

Inputs

---

      txt = string or string array containing question. in

Keyword Parameters

---

Keywords

---

        /NOCLEAR inhibits the screen clear but will erase
          displayed text on exit.
        X=x text starting column (def=centered around col 40).
        Y=y text starting line (def=centered around line 10).

Outputs

---

      ans = answer: 0=no, 1=yes. out

Common Blocks

---

Notes

---

      Note: must enter Y for yes or N for no (case insensitive).

Modification History

---

      R. Sterner, 26 Feb, 1992
      R. Sterner, 2010 Jun 07 --- Converted arrays from () to [].
  Copyright (C) 1992, 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.