*                              MENU12.QM
*                             Menu Macros
*                      Written by Tom Hogshead
*                            July 15, 1991
*
* -------------------------------------------------------------
* @(-) Menu Macro, Start up macro for start.bat and menu.bat
* -------------------------------------------------------------
*
* Type MENU or START for a demonstration. Cursor down to macro name
* to load it's file list, then press <enter>. All files pertaining
* to the selected macros will be loaded and the macros read ready
* for running.
*
* More to come!
*
@-  Macrobegin
*---- Select File List To Load Files ---*
    InsertLine                          * Insert line for instructions |1.2
    Markcolumn                          * Instructions
    "" CursorRight 7 "ΔΩ"             *      "
    Markcolumn                          *      "
    Begline CursorDown                  * Put cursor on first file list
    Pause                               * Pause to select file list
    DeleteBlock                         * Clear instructions from screen
    Markline Copy                       * Copy file name to scrap
    EditFile Paste Return               * Load selected file list
    Prevfile Quit                       * Quit menul.ql
*----- Load Files From File List -------*
    Endfile Begline                     * Get to last file first
 REPEAT:                                *
    Unmarkblock Markline                * Mark file name
    Copy                                * Copy file name to scrap
    Editfile Currentfilename " "        * Load current file plus
    Paste Return                        * last marked on list into ring
    Cursorup                            * If another file, move up, loop
 Jtrue REPEAT:                          * until no more files to load
*----- Read Macro Of First File --------*ELSE
    Nextfile Macroread                  * Read first file macro
    Currentfilename                     *
    Backspace Backspace "Mac" Return    *
*
* 57 bytes Wed  03-20-1991  16:48:53
* 58 bytes Mon  04-29-1991  12:41:58 added InsertLine

* (Version) history:
*
*   1.0 -   Initial
*   1.1 -   Added InsertLine
*   1.2 -   Minor documentation changes.
*
*
*