* RING@0.QM * [ See RINGxx.QM for discussion ] * August 3, 1991 * ---------------------------------------------------------------------- * @(0)ý Load At Command Line First File In a Pre-Made List of Files, * Faster Version of @1, Does Not Enter All Files In Ring * ---------------------------------------------------------------------- * (Emulates PC Magazine's FILECTRL.COM After Loading) * > Must be first macro in file to autoexecute at start up < @0 macrobegin * horizontalwindow * * editfile escape * changefilename "NUL" return * Markline Copy * Copy selected file name to scrap horizontalwindow * | Editfile Paste Return * Load first file in list prevwindow * NUL window SELECT: * Pause * Pause to select file to edit * UnmarkBlock | MarkLine Copy * Copy selected file name to scrap nextwindow * Selected file EditFile Paste Return * Edit selected file zoomwindow * Zoom until Pause * to select another file EDIT: * nextwindow * Selected window makectrofscreen * jump SELECT: * Loop again * * 31 bytes Thu 05-09-1991 16:25:46 (TH @0, QLST14.qm) * 36 bytes Mon 06-24-1991 13:29:54 (TH, @0) * 33 bytes Wed 06-26-1991 10:26:58 (TH, @0, removed unnecessary unmarkblock) * ( moved window opening down )