// HTM-Z.VDM
// May 1999 originally by Fritz Heberlein (sla019@ku-eichstaett.de) (HTM.VDM)
// 30.06.1999 completely new coded by Christian Ziemski
// 15.08.2000 Modif. f. 5.20 DI1
//
// Calls a menu of the html shortcuts used in html.vtm (additions marked with an *)
// and prompts for one.
//
// Assign it to a function key in your startup.vdm, section
// "File-type specific configuration" by adding something like:
// Key_Add("F12","[VISUAL EXIT] CALLF(100,'HTM-Z.VDM')",NOCONFIRM)
//
// Shortcuts "00" and "TM" call TXT2HTML.VDM and HTMLTABL.VDM (written by Scott Lambert).
//
// If a block is marked before executing this macro:
// - The cursor position is forced to the block begin !
// - The block is inserted into the tag (if approp.)
//
//
// Now easy to modify or expand. See the table below.
//
// The color code "FC" uses a menu (like Fritz' one) for the colors.
// But if you know the correct code you can call it directly by FCb, FCm etc.
//
// -------------------------------------------------------------------------------------
//
// Resources:
//
// 80 = table of shortcuts and commands
// 81 = user input
// 82 = command
// 83 = temp. for marked block
// 84 = menu
//
// #80 = buffer number
// #81 = number for cursor movement
// #82 = flag
// #83 = input
//
// Buffer 35
//
// ---------------------------------------------
if(#82!=13579){
#82=13579 // flag (for faster execution)
//
// Table of shortcuts. Here you can modify/expand this macro.
//
// The '$'-sign is used as delimiter for RS()==> '$' must not occur in the text!!!!
//
//
// Shortcut code : command/text
//
// code: 0 = only insert the text
// -n = place the cursor n characters back (and insert the block there)
// [+]n = place the cursor n characters after the inserted text
// @ = execute the command after the ":"
//
RS(80,$
Q @ : VM(NOMSG) return
TM @ : chain_file(100,'htmltabl.vdm')
00 @ : chain_file(100,'txt2html.vdm')
AD -10 :