* (MacroMaker) v2.4 * 旼컴컴컴컴컴컴컴컴컴컴컴�[ Index of Macros ]컴 컴컴컴컴컴컴컴컴컴컴컴컴컴컴� * �(Ctl_1) - Finds first word on cursor line "marked" with () in document below� * �(Alt_1) - Loads txtfile from list of available txtfiles sorted by name � * �(Alt_2) - Refresh with "standard" macfile � * �(Alt_3) - Merges current macros with designated txtfile, reads macfile � * �(Alt_4) - Appends txtfile to "standard" txtfile & macfile, reads macfile � * �(Alt_5) - Gets error file � * �(Alt_6) - Makes dummy txtfile from current txtfile � * �(Alt_7) - Makes & reads dummy macfile from txtfile � * �(Alt_8) - Reads macfile of txtfile � * �(Alt_9) - Makes macfile only � * �(Alt_0) - Makes & reads macfile � * �(Alt_t) - Reads macfiles from list by date � * �(Alt_n) - Reads macfiles from list by name � * � � * �(Description) - MacroMaker Macros � * �(Requirements) - and use � * �(Startup) - See MACRO.DOC for startup instructions � * �(Macros) - MacroMaker Macros � * �(Other) Macros - not included � * �(Version) history � * 읕컴컴컴�[ be sure to leave at least one blank line at end of Index ]컴컴컴컴� * (Description): * * (MacroMaker) MACRO24.ZIP Contains QEdit macros to easily convert * macros to & from text/binary (txtfile/macfile): * * @1 - Loads txtfile from list of available txtfiles sorted by name * @2 - Refresh with "standard" macfile * @3 - Merges current macros with designated txtfile, reads macfile * @4 - Appends txtfile to "standard" txtfile & macfile, reads macfile * @5 - Gets error file * @6 - Makes dummy txtfile from current txtfile * @7 - Makes & reads dummy macfile from txtfile * @8 - Reads macfile of txtfile * @9 - Makes macfile only * @0 - Makes & reads macfile * @t - Reads macfiles from list by date * @n - Reads macfiles from list by name * ^1- Finds first word on cursor line "marked" with () in document below * * Primary file names in FILE11.ZIP have been changed from SORTxx.xxx * in SORT10.ZIP. Alt_f1-f3 in MACRO24.ZIP are nearly identical to * Alt_1-3 in FILE11.ZIP except Alt_1-3 macros in SORT10.ZIP require * the use of Norton's DS and Buerg's SORTF. Macros in FILE11.ZIP * use Directory Extender DX included in FILE11.ZIP. The latest * version now is FILE12.ZIP. * * * * * (Requirements) and Use (see MACRO.DOC for (startup) instructions): * * 1. Txtfile name extension must be [file].QM, Macfile [file].MAC. * 2. Change G:\QE (location of QMAC) and optional ram disk J:\ (also * in batch files) for your setup. Ram disk is optional but faster * than a hard drive. Use any active drive letter to replace J:\. * 3. Batch files must be in path or current directory. INSERT must * be ON. Run macros and press Enter to continue when paused. * 4. Modify "g:\qe\MACROS.xxx" in macros to your "standard" macro. * Be careful to use or not use extension as shown, with spaces. * 5. Must have Norton DS to use Alt-1 & N and Buerg's SORTF to * use Alt T. (DS & SORTF are not included.) * Macros Included: * * @1-Selects txtfile to load from txtfile list of all available * txtfiles in directory sorted by Name. * @2-Refreshes macro buffer with "standard" macfile. * @3-Merges designated txtfile [file].qm with current macros. * QEdit overwrites current macros when reading a new macfile. * @4-Appends txtfile [file].qm to "standard" txt and macfile and reads. * @5-Refreshes and gets error file j:j in window. * @6-Makes dummy txtfile from current macros. * @7-Makes and reads dummy macfile from txtfile [file].qm. * @8-Reads macfile of txtfile [file].qm. * @9-Makes macfile only from txtfile [file].qm. No read. * @0-Makes and reads macfile from txtfile [file].qm. * @t-Selects macfile to read from macro list of all available * macfiles in directory sorted by Date. * (Uses Norton DS not included) * @n-Selects macfile to read from macro list of all available * macfiles in directory sorted by Name. * (Uses Vernon Buerg's SORTF not included) * (Macros): * *旼컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴� *�(Alt_1) Selects txtfile to load from txtfile list sorted by Name � *읕컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴� * Does not read macfile of txtfile selected. * @1 macrobegin dos "sort-N1" return return * Sort list/name editfile "j:j" return quit editfile "j:j" return * get file list delline delline delline return * del dir heading "Cursor "#25 * instructions markblockend begline markblockbegin * highlight gotoblockend return return * space pause markword copy * get macfile name editfile paste ".qm" return quit * load text macro editfile paste ".qm" return * no read macfile * * 86 bytes Thu 07-26-1990 02:11:42 *旼컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴� *�(Alt_2) Refreshes macro buffer with "standard" macfile � *읕컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴� * Remember to modify "g:\qe\macros.mac" with your "standard" macfile. * @2 MacroBegin MacroRead "g:\qe\macros.mac" Return * * 38 bytes Thu 07-26-1990 02:16:58 *旼컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴커 *�(Alt_3) Merges designated txtfile [file].qm with current macros � *읕컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴켸 * @3 macrobegin editfile "j:$" return killfile quit * gets macro to editfile "j:$" return return * be merged with "Merge macro ? "return cursorup endline cursorright pause * cursorleft markword cut killfile quit * * macrowrite "dum4.mac" return return * write cur macros dos "qmacM " paste return return * makes apnd macro horizontalwindow * editfile "j:j" return quit editfile "j:j" return * get error file insertdate inserttime * put date in j:j find "(" return return jfalse labl1: * get error line # wordright unmarkblock markblockbegin wordright * cursorleft markblockend copy savefile prevwindow * gotoline paste return makectrofscreen pause zoomwindow * go to error #1 jump labl2: * labl1: prevwindow zoomwindow * no error, go to jump labl2: * prevwindow labl2: editfile "dum4.qm" return * load apnd. txtfil splitline newfile "N" return endfile return * "*...Tom Hogshead " insertdate inserttime * stamp bottom "Appended " paste endline ".qm to current macros" * w/ date/time unmarkblock savefile macroread "dum4.mac" return * read apnd. macfil * * 288 bytes Thu 07-26-1990 02:17:16 *旼컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴� *�(Alt_4) Appends txtfile [file].qm to a "standard" txtfile � *� named macros.qm and reads appended macfile. � *읕컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴� * Remember to modify "g:\qe\macros" (no extension) in this * macro to your "standard" macfile. * @4 macrobegin savefile dos "qmacTA2 " currentfilename * make file.mac backspace backspace backspace " " * "g:\qe\macros" return **(no EXTension)** * unmarkblock * unmarkblock insertline * insert blank line markcolumn * markcolumn currentfilename * get currentfilename storescrbuff "1" return * store currentfilename/scrbf 1 copy * copy filename to scrap delline * delline editfile "j:j" return quit * quit j:j editfile paste return horizontalwindow * load file.qm editfile "j:j" return * get error file insertdate inserttime * put date in j:j find "(" return return jfalse labl1: * get error line # wordright unmarkblock markblockbegin wordright * cursorleft markblockend copy savefile prevwindow * gotoline paste return makectrofscreen pause zoomwindow * go to error line jump labl2: * labl1: * prevwindow zoomwindow * no error, go to jump labl2: * prevwindow labl2: * labl2: editfile "j:$" return quit * editfile "j:$" return killfile * load dum3.qm editfile "dum3.qm" return quit editfile "dum3.qm" return * load dum3.qm begfile cursordown endline * stamp cursorright "from:" cursorright getscrbuff "1" return unmarkblock endfile return * line on bot "*" cursorright "Tom Hogshead" cursorright cursorright* cursorright insertdate inserttime * - name/date bot "Appnd:" cursorright getscrbuff "1" return unmarkblock * - file on bot savefile macroread currentfilename * read dum3.mac backspace backspace "MAC" return * * * 279 bytes Thu 07-26-1990 02:17:34 * 251 bytes Thu 07-26-1990 09:00:10 *旼컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴커 *�(Alt_5) Gets error file (j:j) in window. Press ENTER to remove� *읕컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴켸 * @5 macrobegin unmarkblock begline return cursorup * cut name/scrap markblockbegin currentfilename markblockend cut * editfile paste return * restore name horizontalwindow * make window editfile "j:j" return * load j:j makectrofscreen pause zoomwindow * zoom on pause editfile paste return * restore name * * 30 bytes Thu 07-26-1990 09:03:05 * 旼컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴커 * � (Alt_6) Makes textfile from current macros � * 읕컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴켸 * @6 macrobegin macrowrite "c:$.mac" return return * write to dum.mac dos "qmact c:$" return return * make dum.qm editfile "c:$" return quit * quit old dum.qm editfile return * load new dum.qm endfile * * * 54 bytes Thu 08-21-1980 19:54:12 *旼컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴� *� (Alt_7) Copies txtfile [file].QM to dummy txtfile. � *� Makes and reads macfile. � *읕컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴� * @7 macrobegin savefile unmarkblock writeblock "c:$.qm" * copy file.qm return return * to c:$.qm unmarkblock begline return cursorup * cut name/scrbuf 1 markcolumn currentfilename * storescrbuff "1" return delline * editfile "c:$.qm" return quit editfile return * load c:$.qm dos "qmacbj c:$" return * make file.mac unmarkblock begline return cursorup * cut name/scrap markblockbegin currentfilename markblockend cut * editfile "j:j" return quit * quit j:j editfile paste return horizontalwindow * load file.qm editfile "j:j" return * get error file insertdate inserttime * put date in j:j find "(" return return jfalse labl1: * get error line # wordright unmarkblock markblockbegin wordright * cursorleft markblockend copy savefile prevwindow * gotoline paste return makectrofscreen pause zoomwindow * go to error line jump labl2: * labl1: * prevwindow zoomwindow * no error, go to jump labl2: * prevwindow labl2: * dos "qmact c:$" return return * make c:$.qm editfile "c:$.qm" return quit editfile return * load c:$.qm endfile return * "*" insertdate inserttime * - name/date bot getscrbuff "1" return unmarkblock * - file on bot savefile * macroread currentfilename * read c:$.mac backspace backspace "MAC" return * * * 194 bytes Thu 08-21-1980 19:54:29 *旼컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴� *�(Alt_8) Reads macfile from txtfile [file].QM � *읕컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴� * @8 macrobegin macroread currentfilename backspace backspace "mac" return * * * 15 bytes Thu 07-26-1990 02:18:38 *旼컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴� *�(Alt_9) Makes macfile from txtfile [file].QM, no read � *읕컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴� * @9 macrobegin savefile dos "qmacb " currentfilename * make file.mac backspace backspace backspace return * remove ".qm" * * 23 bytes Thu 07-26-1990 02:18:56 9 *旼컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴� *�(Alt_0) Makes macfile from txtfile [file].QM � *� Loads macfile [file].MAC. � *읕컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴� * @0 macrobegin savefile dos "qmacbj " currentfilename * make file.mac backspace backspace backspace return * unmarkblock begline return cursorup * cut name/scrap markblockbegin currentfilename markblockend cut * editfile "j:j" return quit * quit j:j editfile paste return horizontalwindow * load file.qm editfile "j:j" return * get error file insertdate inserttime * put date in j:j find "(" return return jfalse labl1: * get error line # wordright unmarkblock markblockbegin wordright * cursorleft markblockend copy savefile prevwindow * gotoline paste return makectrofscreen pause zoomwindow * go to error line jump labl2: * labl1: * prevwindow zoomwindow * no error, go to jump labl2: * prevwindow labl2: * macroread currentfilename backspace backspace "mac" return* read new macro * * 98 bytes Thu 07-26-1990 09:08:31 *旼컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴커 *�(Alt_t) Selects macfile to read from macfile list sorted by Date� *읕컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴켸 * @t macrobegin dos "sort-T" return return * Sort list/date editfile "j:j" return quit editfile "j:j" return * get file list delline delline delline return * del dir heading "Cursor " #25 * instructions markblockend begline markblockbegin * highlight cursordown return * space pause markword copy * get macfile name editfile paste ".qm" return quit * load text macro editfile paste ".qm" return * macroread paste ".mac" return * read macfile * * 94 bytes Thu 07-26-1990 02:14:10 *旼컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴� *�(Alt_n) Selects macfile to read from macfile list sorted by Name � *읕컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴� * @n macrobegin dos "sort-N" return return * Sort list/name editfile "j:j" return quit editfile "j:j" return * get file list delline delline delline return * del dir heading "Cursor "#25 * instructions markblockend begline markblockbegin * highlight gotoblockend return return * space pause markword copy * get macfile name editfile paste ".qm" return quit * load text macro editfile paste ".qm" return * macroread paste ".mac" return * read macfile * * 95 bytes Thu 07-26-1990 02:14:28 *旼컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴� *�(Ctl_1) Finds first word on cursor line marked in document below � *읕컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴� * * Ctl_1 macro has 2 steps: * * 1. Press Alt and 1 at the same time. A down arrow shows at the * end of the top line. Cursor down to desired line in Index. * * 2. Press Enter. The macro first erases the down arrow, and * then finds the first word on the cursor line in the document * below marked with (...). * * If you load this macro in your QCONFIG.DAT, substitute #25 * with "" (^P_Y). Remember ^1 requires scan code 02 to * convert with QMAC on my system. Your's may be different. * 02 macrobegin unmarkblock * unmark any marked blocks begfile endline * go to file begin endline #25 * put down arrow at endline begline find #25 return return begline * highlight down arrow pause * pause for Index selection wordright markword * mark first word on line copy * copy word to scrap buffer begfile * begfile find #25 return return delch * find & delete down arrow 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: * * 47 bytes Thu 07-26-1990 13:02:27 * (Other) Macros available: See ALLMACRO.INF * * (Version) History: * * v1.0 - initial version * v1.1 - Changed Alt-6 to keep [file].qm in ring after running. * v1.2 - Date & time stamp put in dum.qm (Alt-6, Alt-7). * v1.3 - Added batch files to macro13.ZIP. * v1.4 - Changed Alt-6 & 7 to stamp [file].QM translated from. * - Changed Alt-0 to not pause if no errors. * - Added Alt-5 to see error file in window. * - Changed /W60 to /W70 and removed "pause" in qmact.bat. * v1.5 - Changed Alt-7 to not pause if no errors. * v1.6 - Shortened Alt-6, 7 & 10. Faster & no pause now if no errors. * v1.7 - Corrected Alt-6 to write macros first. Sorry. * v1.8 - Added Alt-4 to append text file [file].qm macros * to a "standard" macro and read appended macro. * v1.9 - Added Alt-3 to merge designated macro [file].mac * with current macros. QEdit normally overwrites * current macros when reading a new macro. * v2.0 - Added Alt-2 to refresh macro buffer with "standard" macro. * - New qmacTA2.bat for Alt-4, gets "standard" name as %2. * - Added Alt T & Alt N to select txtfile to read from * sorted list of all avaialable txtfiles in directory. * - New SORT-T.BAT and SORT-F.BAT for Alt T & N to sort macro list. * - Changed Alt-4 to identify "standard" rather than batch file. * (Modify g:\qe\macros for the name of your "standard" macro.) * - Shortened Alt-3,7 & 0, total 91 bytes. (Important when merging * since QEdit macro buffer is limited to 2046 bytes macros.) * - Moved macroread to end of Alt-3. No problem, just in case. * (Reading macros while executing can sometimes cause problems.) * - Changed Alt-5 to refresh j:j. * v2.1 - (Internal) * v2.2 - Added Alt-1 to select txtfile to load from list of all txtfiles * in directory sorted by Name. Added sort-N2.bat for this macro. * - Changed Alt T & Alt N to select macfile, not txtfile as v2.0, * from sorted list of all available macfiles in directory. * - Changed sort-T.bat, sort-N.bat and sort-N1.bat for macr s. * - Renamed MACCMTxx to MACROxx. Dropped MACCMTxx. Macros comments * and instructions are now are in MACROxx.qm. * - Shortened highlight bar in Alt N,t. Saves ~30 bytes/macro. * - Changed dum.dir to $ in Alt-4 & qmacTA2.bat to shorten * - Added killfile to Alt-3 & 4. Changed endfile display in Alt-4. * - Replaced "j:\j" with "j:j" in macros and batch files to shorten. * - Changed qmacTA2.bat for better display. * - Changed select window from "j:j" to "j:$" in batch files * - Sort batch files (sort-xx.bat) also changed. * v2.3 - Changed @5 to keep error file j:j in ring. * - By removing " "'s, changing file name tracking in buffers, * and shortening header and footer labels: * - shortened @4 28 bytes * - shortened @5 5 " * - shortened @6 67 " * - shortened @7 24 " * - shortened @9 3 " * - added macro size 'bytes line' at end of each macro * v2.4 - removed dum.qm and dum.mac from zip package * - shortened Alt_6 from 147 to 54 bytes * - shortened Alt_7 from 258 to 194 bytes r * error_sample, remove asterisk to test for errors * * ...Tom Hogshead Tue 08-21-1990 19:54:47