--------------------- CUT HERE ------------------------------
* Useful HTML macros for QEDIT
*
* The key mappings roughly follow Marc Andreessen's html-mode.el
* collection for emacs, except that I like to type first, then add the
* markup.
*
* Convert these to binary with SEMWARE's qmac utility:
* qmac htmlmacr.qm htmlmacr.txt /b
*
* You can load these by default when you start qedit:
* q editthis.htm /lc:\qedit\htmlmacr.qm
*
* Version 1.0, 16-Sep-93 by Archie Warnock ([email protected])
*
* Distribute freely. Suggestions, fixes and enhancements welcome.
*
* Command Summary:
* @a Make a line into an ADDRESS block
* @b Open a BLOCKQUOTE block
* @c Make a line into a comment
* @d Open a display list, with the first element
* @e Insert a display list description element <DT> and <DD>
* @g Make a line into a graphics IMAGE anchor
* @i Insert a list element <LI>
* @k Konstruct an HTML empty document (hey! I already used @c!)
* @l Try and make the URL you just typed into an anchor
* @m Open a menu list
* @n Open an ordered (numbered) list
* @s Open an unordered (bulleted) list
* @p Open a PREFORMAT block
* @t Make a line into a TITLE
* @1 Make a line into a level 1 HEADING
* @2 Make a line into a level 2 HEADING
* @3 Make a line into a level 3 HEADING
* @7 Insert the entity for ">"
* @8 Insert the entity for "<"
* @9 Insert the entity for "&"
*
*^b Make the word you just typed BOLD
*^c Open a CODE block
*^e Make the word you just typed EMPHASIZED
*^i Make the word you just typed ITALIC
*^p Put a paragraph tag at the end of a line
*^t Make the word you just typed TT (fixed)
*^u Make the word you just typed UNDERLINE
*
@a macrobegin begline "<ADDRESS>" endline "</ADDRESS>"
@b macrobegin begline "<BLOCKQUOTE>" return return "</BLOCKQUOTE>"
@c macrobegin begline "<!--" endline "-->"
@d macrobegin "<DL>" return "<DT>" return "<DD>" return "</DL>" &
cursorup cursorup endline
@e macrobegin "<DT>" return "<DD>" cursorup
@g macrobegin '<IMG SRC="' endline '">'
@i macrobegin "<LI>"
@k macrobegin "<HTML>" return "<HEAD>" return return "</HEAD>" &
return "<BODY>" return return "</BODY>" return "</HTML>"
@l macrobegin wordleft '<A HREF="' wordright cursorleft '"></A>' &
wordleft cursorleft cursorleft cursorleft
@m macrobegin begline "<MENU>" return "<LI>" return "</MENU>" cursorup endline
@n macrobegin begline "<OL>" return "<LI>" return "</OL>" cursorup endline
@s macrobegin begline "<UL>" return "<LI>" return "</UL>" cursorup endline
@p macrobegin begline "<PRE>" return return "</PRE>" cursorup endline
@t macrobegin begline "<TITLE>" endline "</TITLE>"
*
* This was a close to mnemonic as I could get for these
*
@1 macrobegin begline "<H1>" endline "</H1>"
@2 macrobegin begline "<H2>" endline "</H2>"
@3 macrobegin begline "<H3>" endline "</H3>"
@7 macrobegin ">"
@8 macrobegin "<"
@9 macrobegin "&"
*
* These are all the attributes I had patience to define. There are
* others, if anyone wants to put them in.
*
^b macrobegin wordleft "<B>" wordright cursorleft "</B>"
^c macrobegin "<CODE>" return "</CODE>"
^e macrobegin wordleft "<EM>" wordright cursorleft "</EM>"
^i macrobegin wordleft "<I>" wordright cursorleft "</I>"
^p macrobegin endline "<P>" return
^t macrobegin wordleft "<TT>" wordright cursorleft "</TT>"
^u macrobegin wordleft "<U>" wordright cursorleft "</U>"
--------------------- CUT HERE ------------------------------
_______________________________________________________________________
-- Archie Warnock Internet: [email protected]
-- Hughes STX "WAIS is the engine, WWW is the track"
-- NASA/GSFC Project STELAR: WAIS to do science