Another package of HTML macros - for MS-DOS/QEDIT

warnock@hypatia.gsfc.nasa.gov (Archie Warnock)
From: warnock@hypatia.gsfc.nasa.gov (Archie Warnock)
Message-id: <9309161738.AA07901@Hypatia.gsfc.nasa.gov>
Subject: Another package of HTML macros - for MS-DOS/QEDIT
To: www-talk@nxoc01.cern.ch
Date: Thu, 16 Sep 93 13:38:30 EDT
X-Mailer: ELM [version 2.3 PL11]
Status: RO
I don't know if anyone uses Qedit as an editor on PCs - I do.  Anyway,
I've shamelessly glommed Marc Andreessen's html-mode.el into a set of
Qedit macros.  Here they are, if anyone's interested.  Hope they're
useful. 

--------------------- 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 (archie.warnock@gsfc.nasa.gov)
*
*  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 "&gt"
@8     macrobegin "&lt"
@9     macrobegin "&amp"
*
*  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:  Archie.Warnock@gsfc.nasa.gov
-- Hughes STX                  "WAIS is the engine, WWW is the track"
-- NASA/GSFC                   Project STELAR: WAIS to do science