. One way
// is by adding the following line to STARTUP.VDM:
//
// Key_Add("Shft-F5",'[VISUAL EXIT] Call_File(122,"txt2html.vdm")',OK)
//
// OR: Add this function to the {USER} menu by adding these lines
// to USER.MNU:
//
// 1
// Text to HTML
// CallF(122,"txt2html.vdm")
//
// Resources: T-Reg 103
//
begin_of_file()
ins_text("")
ins_newline()
ins_text("")
ins_newline()
ins_text("")
get_input(103,"HTML Title =",statline+nocr)
reg_ins(103)
ins_text("")
ins_newline()
ins_text("")
ins_newline()
ins_text(//)
ins_newline()
ins_text("")
ins_newline()
end_of_file()
ins_newline()
ins_text("
")
ins_newline()
ins_text("")
ins_newline()
ins_text("")
ins_newline()
return