*                               RING@7.QM
*                    [ See RINGxx.QM for discussion ]
*                             August 3, 1991
* ----------------------------------------------------------------------
*   @(7)ý Load At Command Line All Files From a Pre-Made List of Files,
*         Modification of @1
*        (Emulates PC Magazine's FILECTRL.COM After Loading)
* ----------------------------------------------------------------------
*     > Must be first macro in file to autoexecute at start up <

@7  MacroBegin
    changefilename "NUL" return *                                           |
*-- This section written by Kyles Watkins of SemWare -----
    EndFile BegLine             * start at last line
  REPEAT:
*     UnmarkBlock                 * (line removed by TH, not needed)        |
    MarkLine Copy               * grab this name
    EditFile                    * get ready to load
    CurrentFilename " "         * to force return *here*
    Paste Return                * paste file name & do it!
    CursorUp                    * more lines above?
    JTrue REPEAT:               * if yes, repeat.
*---------------------------------------------------------
*     OneWindow                   * Close all windows (not necessary)       |
    HorizontalWindow            * Open one window
    EditFile Paste Return
    PrevWindow                  * Window 1
 SELECT:                        *
    Pause                       * Pause to select file to edit
    UnmarkBlock                 *
    BegLine MarkLine            *
    Copy                        * Copy selected file name to scrap
    NextWindow                  *
    EditFile Paste Return       * Edit selected file
    ZoomWindow                  *
    Pause                       *
 EDIT:                          *
    NextWindow                  * Return to PickList for another selection
    MakeCtrofScreen             *
 jump SELECT:                   *
*
* 41 bytes Mon  06-24-1991  23:23:00 (TH @7)
* 47 bytes Wed  06-26-1991  10:12:41 (TH @7, added changefilename "NUL")
*                                    (       removed unnecessary unmarkblock)
*                                    (       removed unnecessary onewindow  )