*                            COMT16.QM, v1.6c
*                     Commenting/Uncommenting Macros
*                        Written by Tom Hogshead
*            With Macro Contributions by John Goodman, et al
*                                8/15/91
*  Key    Subfile              Description
* =====  =========  =====================================================
*                              New Macros
*                              ----------
* @(1)    {e:\up\rfr003}                                                  |new
*                 --Formats Commented or Uncommented PARAGRAPH,
*                       Leaves Commented Paragraph Uncommented,
*                       and Vice Versa
* @(2)    {e:\up\rfr003}                                                  |new
*                 --Formats Commented or Uncommented PARAGRAPH,
*                       Leaves Paragraph in Original Commented
*                       or Uncommented State
*--
* ^(cursordown) {e:\up\com001}
*                 --Comment or Un-Comment Line or Block With * in Col 1,
*                       Blank Lines NOT Commented,
*                       Pauses To Mark Block If Not Marked
*                            (John Goodman and Tom Hogshead, Authors)
* @(3)    {e:\up\com001}
*                 --Comment or Un-Comment Line or Block With * in Col 1,
*                       Blank Lines NOT Commented
*                            (John Goodman and Tom Hogshead, Authors)
* @(8)    {e:\up\com001}
*                 --Comment or Un-Comment Line or Block With * in Col 1,
*                       Blank Lines Are Commented,
*                            (John Goodman and Tom Hogshead, Authors)
* @(2)    {e:\up\com001}
*                 --Comment or Un-comment With "*¯" in Col 1,
*                       Blank Lines NOT Commented,
*¯                      (like this)
* @(1)    {e:\up\com001}
*                 --Add/Delete '*-- ' in Front Of Commenting Line,
*--                 (like this)
* @(4)    {e:\up\com001}
*                 --Center Macro Comment * -- <Comment> --*
* @(7)    {e:\up\com001}
*                 --Remove Macro Comment * -- <Comment> --*
* @(F1)   {e:\up\com001}
*                 --Comment Non-macro Portion Of File
* @(5)    {e:\up\com001}
*                 --Un-comment Non-macro Portion Of File
* @(F5)   {e:\up\com001}
*                 --Original Commenting Macro     (John Goodman, Author)
* ^(F5_)  {e:\up\com001}
*                 --Original Un-commenting Macro  (John Goodman, Author)
* #(F5__) {e:\up\com001}
*                 --Revised Original Goodman Un-commenting,
*                       Checks Before Un-commenting
* @(F2)   {e:\up\com001}
*                 --Comment Paragraph or Block
* #(F2__) {e:\up\com001}
*                 --Builds A "Comment Box" For C Programmers,
*                       (Tim Farley, Author)
* @(F3)   {e:\up\com001}
*                 --Comment Whole File
* ^(F3_)  {e:\up\com001}
*                 --Un-comment Whole File
* #(F3__) {e:\up\com001}
*                 --Center C Program Comment (Richard Blackburn, Author)
*--
* @(5)    {e:\up\com002}
*                 --Make Macro Title Box
* @(6)    {e:\up\com002}
*                 --Copy Macro Title To Index
* @(9)    {e:\up\com002}
*                 --Remove Macro Title Box
*--
* #(F4__) {e:\up\com003}
*       --Surround Column-Blocked Text With Box Of Desired Characters,
*             (John Goodman, Author)
*                                   ********
*         (Box Drawn Around Outside *Border* Of Column Block, Juxtapose Text)
*                                   ********
* @(F4)   {e:\up\com003}
*       --Erase Outside Border Of Column-Blocked Text and Collapse Text
*         Surronding Block To Original Position Before Box Was Made,
*             (John Goodman, Author)
* @(F8)   {e:\up\com003}
*       --Put Colon in Front Of "Rem" Lines For Faster Batch File Operation
* ^(F7_)  {e:\up\com003}
*       --Prepend Prompted Text To, or Delete Prompted Text From,
*         The Beginning Of The Current or Blocked Line(s),
*             (John Goodman, Author)
* #(F7__) {e:\up\com003}
*       --Prepend Prompted Text To, or Delete Prompted Text From,
*         The Beginning Of The Current or Blocked Line(s),
*         Initialize Find Prompt With Last Prompted Text
*             (Tom Hogshead Modification Of ^F7)
* @(F7)   {e:\up\com003}
*       --Insert Text At Beginning Of All Blocked Lines,
*             (John Goodman, Author)
* @(8)    {e:\up\com003}
*       --Insert Text at Beginning of Blocked Lines (or Current
*         Line If No Blocks Marked), John Goodman, Author
*--
*         {e:\up\com004}  [ Reserved for later use ]
*--
* @(h)    Jump From Index Line To (Locate) Macro or Item in Document Below
*
*
* (Index) - How to locate macro or item below from Index using @h
* (Description)
* (Startup)
* (Macros)
* (Other) Macros
* (Version) history
*
*-- eoi

* (DESCRIPTION):  COMT16.QM contains macros to comment and un-comment
* lines, blocks, paragraphs, macros, C programs, and dBase lines. Also
* has macros to insert and delete text at beginning of lines or blocks,
* macro to speed up batch file running, and macro to make and remove
* boxes with any desired border surrounding text.

* (INDEX) USE: To locate a macro or item in this file, press @h, place
* the cursor line on the desired item in the Index above, and press
* <enter>. See BOOKxx.QM for more details.

* (STARTUP): To BEGIN, just type "START COMT" <Enter>. All pertinent
* files will be loaded in the "Ring" for viewing, and COMT16.MAC is
* read. Alternatively, type "START COMT 0" <Enter> and the disk copies
* of all files in the "Ring" will be loaded ready for editing, saving
* time.

* These macros require "QEdit and QMAC v2.1, February, 1990" or later.
* For (other) macros, see ALLMACRO.INF.

* (MACROS)
* ---------
*  See subfiles 'com00x.qm' for macros.  Use @f in BOOKxx.QM to access
*  macros.

* 
* ----------------------------------------------------------------------
* @(h)  Jump From Index Line To (Locate) Macro or Item in Document Below
* ----------------------------------------------------------------------

*        Alt_h can be used to quickly jump from Index Line to the desired
*        item or macro in the document below:

*        1. Press Alt and h at the same time. Line 1 is marked to
*           highlight. Cursor down to desired line in Index.

*        2. Press Enter. The macro then locates and jumps to the item
*           selected on the cursor line in the document below.

*   See BOOKxx.Qm and JMPPOSxx.QM in AMACxx.ZIP for more discussion about
*   using bookmarks and positions markers ( ) to jump to positions in
*   files.

@h macrobegin
        unmarkblock                     * Unmark any marked blocks
        defaultwordset                  * in case altwordset on
        begfile                         * Go to file begin
        markline markline               * and highlight line 1
        pause                           * Pause for Index selection
        wordright markword              * Mark first word on line
        copy                            * Copy word to scrap
        endpara                         * Go to end of Index
        makectrofscreen                 * Cursor line center of window
        find "(" paste ")"
        return "I" return               * Find first marked word in doc
        jfalse NOMARK:
        begline                         * If mark found, go to begline
        jump END:
        NOMARK:
        begfile                         * if no mark found, go to begfile
    END:
*
* 33 bytes Wed  07-10-1991  10:11:24 (TH @1 in BOOKxx.QM)


* (Version) History;
*
*   1.0 -   Initial
*   1.1 -   Modified @5, @6 and @9 to handle multi-line titles.
*       -   Added ^F7, #F4 and #F7
*       -   Added @2 and @3
*   1.2 -   Shortened #F4 from 92 to 67 bytes. Handles full documents OK.
*       -   Modified @9 to remove macro title box if marked with JMPPOS.
*   1.3 -   Shortened #f4 from 67 to 49 bytes. Added alternate version
*           written by John Goodman.
*   1.4 -   Added new #F4 written by John Goodman.
*   1.4a-   Changed description of @2.
*   1.5 -   Modified @8 description.
*       -   Changed ^F6 key to #F5.
*       -   Modified @5 to put position marker on top of box and pause to
*           select title lines.
*       -   Added @1 to Add/Delete '* -- ' in Front of Commenting Line, Like         <new
*-- this.
*       -   Added latest version of @h.
*       -   Added [ ^cursordown ] to comment/uncoment without having to mark
*           block before macro execuction.  Column/Char/Line blocks OK.
*   1.5a-   Moved begline up in [ ^cursordown ] to keep cursor in col 1.
*       -   Included in AMAC38.ZIP, July 21, 1991.
*   1.6 -   Modified ^cursordown per John Goodman, shortened 3 bytes to
*           71 bytes, July 24, 1991.
*   1.6a-   Added subfiles com001/002/003, July 26, 1991.
*       -   Added @8 to com003, July 28, 1991.
*       -   Included in AMAC39A.ZIP.                                   7/29/91
*   1.6b-   Changed ^f1 in com001.qm to @5.                            7/30/91
*                   (ver 1.6b in AMACxx.ZIP, v4.0)
*   1.6c-   Added cross reference to macros in rfr003.qm.               8/6/91
*           Modified @7 in com001.qm.                                   8/6/91
*           Added com004.qm and com004.mac reserved for later use.      8/7/91
*           Modified com003.qm documentation.                           8/8/91
*           Added new macros @1 and @2 from rfr003.qm.                 8/15/91
*