Name

---

      TEXT_BLOCK

Purpose

---

      Print or return a block of inline text (lines starts with ;).

Category

---

Calling Sequence

---

      text_block, out

Inputs

---

Keyword Parameters

---

Keywords

---

        /WIDGET Display text in a text widget.
        GROUP_LEADER=grp Assign a group leader widget ID
          to the text display widget. When the leader widget is
          destroyed the text display widget will also be destroyed.
        /WAIT With /WIDGET, wait until exit button is pressed.
        /QUIET Do not print text.

Outputs

---

      out = returned text block. out

Common Blocks

---

Notes

---

      Notes: Block of text must directly follow text_block.

Examples

---

          text_block
        ; This is a test.
     
      text_block
      ; Line 1
      ; Line 2
      ; Line 3
       
        <> The semicolon comment character must be in column 1.
        <> The first character is dropped (semicolon is not printed).

Modification History

---

      R. Sterner, 1998 Mar 3
      R. Sterner, 2006 May 03 --- Allowed longer lines.
      R. Sterner, 2007 Sep 04 --- Added /WIDGET.
      R. Sterner, 2007 Sep 11 --- Added /WAIT.
      R. Sterner, 2008 Aug 19 --- Added GROUP_LEADER=grp.
      R. Sterner, 2010 May 07 --- Converted arrays from () to [].
  Copyright (C) 1998, 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.