# basic document sub HTML_Base { InsertString ""; LineSplit; 7:MoveLeft; LineSplit; 7:MoveLeft; LineSplit; 6:MoveLeft; LineSplit; 7:MoveLeft; LineSplit; 6:MoveLeft; LineSplit; 2:MoveDown; MoveLineStart; InsertString ""; LineSplit; 8:MoveLeft; } # headers sub HTML_H1 { ?MoveBlockStart; InsertString "

"; ?MoveBlockEnd; InsertString "

"; 5:MoveLeft; BlockUnmark; } sub HTML_H2 { ?MoveBlockStart; InsertString "

"; ?MoveBlockEnd; InsertString "

"; 5:MoveLeft; BlockUnmark; } sub HTML_H3 { ?MoveBlockStart; InsertString "

"; ?MoveBlockEnd; InsertString "

"; 5:MoveLeft; BlockUnmark; } sub HTML_H4 { ?MoveBlockStart; InsertString "

"; ?MoveBlockEnd; InsertString "

"; 5:MoveLeft; BlockUnmark; } sub HTML_H5 { ?MoveBlockStart; InsertString "
"; ?MoveBlockEnd; InsertString "
"; 5:MoveLeft; BlockUnmark; } sub HTML_H6 { ?MoveBlockStart; InsertString "
"; ?MoveBlockEnd; InsertString "
"; 5:MoveLeft; BlockUnmark; } # physical styles sub HTML_B { ?MoveBlockStart; InsertString ""; ?MoveBlockEnd; InsertString ""; 4:MoveLeft; BlockUnmark; } sub HTML_I { ?MoveBlockStart; InsertString ""; ?MoveBlockEnd; InsertString ""; 4:MoveLeft; BlockUnmark; } sub HTML_TT { ?MoveBlockStart; InsertString ""; ?MoveBlockEnd; InsertString ""; 5:MoveLeft; BlockUnmark; } # logical styles sub HTML_DFN { ?MoveBlockStart; InsertString ""; ?MoveBlockEnd; InsertString ""; 6:MoveLeft; BlockUnmark; } sub HTML_EM { ?MoveBlockStart; InsertString ""; ?MoveBlockEnd; InsertString ""; 5:MoveLeft; BlockUnmark; } sub HTML_CITE { ?MoveBlockStart; InsertString ""; ?MoveBlockEnd; InsertString ""; 7:MoveLeft; BlockUnmark; } sub HTML_CODE { ?MoveBlockStart; InsertString ""; ?MoveBlockEnd; InsertString ""; 7:MoveLeft; BlockUnmark; } sub HTML_KBD { ?MoveBlockStart; InsertString ""; ?MoveBlockEnd; InsertString ""; 6:MoveLeft; BlockUnmark; } sub HTML_SAMP { ?MoveBlockStart; InsertString ""; ?MoveBlockEnd; InsertString ""; 7:MoveLeft; BlockUnmark; } sub HTML_STRONG { ?MoveBlockStart; InsertString ""; ?MoveBlockEnd; InsertString ""; 9:MoveLeft; BlockUnmark; } sub HTML_VAR { ?MoveBlockStart; InsertString ""; ?MoveBlockEnd; InsertString ""; 6:MoveLeft; BlockUnmark; } # lists sub HTML_LI { InsertString "
  • "; } sub HTML_DT { InsertString "
    "; } sub HTML_DD { InsertString "
    "; } sub HTML_UL { ?MoveBlockStart; InsertString ""; 5:MoveLeft; BlockUnmark; } sub HTML_OL { ?MoveBlockStart; InsertString "
      "; ?MoveBlockEnd; InsertString "
    "; 5:MoveLeft; BlockUnmark; } sub HTML_DL { ?MoveBlockStart; InsertString "
    "; ?MoveBlockEnd; InsertString "
    "; 5:MoveLeft; BlockUnmark; } sub HTML_BR { InsertString "
    "; } sub HTML_HR { InsertString "
    "; } sub HTML_P { InsertString "

    "; } sub HTML_PRE { ?MoveBlockStart; InsertString "

    ";
        ?MoveBlockEnd; InsertString "
    "; 6:MoveLeft; } sub HTML_CENTER { ?MoveBlockStart; InsertString "
    "; ?MoveBlockEnd; InsertString "
    "; 9:MoveLeft; } sub HTML_IMG { InsertString ""; 2:MoveLeft } # anchors sub HTML_ANAME { ?MoveBlockStart; InsertString ""; 2:MoveLeft; SavePos; 2:MoveRight; ?MoveBlockEnd; InsertString ""; BlockUnmark; MoveSavedPos; } sub HTML_AHREF { ?MoveBlockStart; InsertString ""; 2:MoveLeft; SavePos; 2:MoveRight; ?MoveBlockEnd; InsertString ""; BlockUnmark; MoveSavedPos; } # tables sub HTML_TABLE { ?MoveBlockStart; InsertString ""; ?MoveBlockEnd; InsertString "
    "; 8:MoveLeft; BlockUnmark; } sub HTML_CAPTION { ?MoveBlockStart; InsertString ""; ?MoveBlockEnd; InsertString ""; 11:MoveLeft; BlockUnmark; } sub HTML_TH { ?MoveBlockStart; InsertString ""; ?MoveBlockEnd; InsertString ""; 5:MoveLeft; BlockUnmark; } sub HTML_TR { ?MoveBlockStart; InsertString ""; ?MoveBlockEnd; InsertString ""; 5:MoveLeft; BlockUnmark; } sub HTML_TD { ?MoveBlockStart; InsertString ""; ?MoveBlockEnd; InsertString ""; 5:MoveLeft; BlockUnmark; } sub HTML_NOFRAMES { ?MoveBlockStart; InsertString ""; ?MoveBlockEnd; InsertString ""; 11:MoveLeft; BlockUnmark; } sub HTML_FRAMESET { ?MoveBlockStart; InsertString ""; ?MoveBlockEnd; InsertString ""; 11:MoveLeft; BlockUnmark; } colorize HTML { SyntaxParser = 'SIMPLE'; color { { 'Normal', 'Editor_Default' }, { 'Command', 'Markup_Punctuation' }, { 'String', 'Markup_String' }, { 'Symbol', 'Markup_Symbol' }, { 'Tag', 'Markup_Tag' }, { 'Comment', 'Markup_Comment' }, { 'Special', 'Markup_Special' }, }; keyword "Editor_Keywords" { # should be HTML 3.2 complete # HEAD section "HEAD", "TITLE", "ISINDEX", "META", "LINK", "BASE", "SCRIPT", "STYLE", # BODY section "BODY", # headings "H1", "H2", "H3", "H4", "H5", "H6", # lists "UL", "OL", "DIR", "MENU", "LI", "DL", "DT", "DD", # text containers "P", "PRE", "BLOCKQUOTE", "ADDRESS", # others "DIV", "CENTER", "HR", "FORM", "TABLE", "LEFT", "RIGHT", "TOP", # logical markup "EM", "STRONG", "DFN", "CODE", "SAMP", "KBD", "VAR", "CITE", # physical markup "TT", "I", "B", "U", "STRIKE", "BIG", "SMALL", "SUB", "SUP", # special markup "A", "BASEFONT", "IMG", "APPLET", "PARAM", "FONT", "BR", "MAP", "AREA", # forms "INPUT", "SELECT", "OPTION", "TEXTAREA", "ONCLICK", # tables "CAPTION", "TR", "TH", "TD", # oops, almost forgot this one ;-) "HTML", # "DOCTYPE", "PUBLIC", "FRAME", "FRAMESET", "NOFRAMES", }; keyword "Editor_Keywords2" { "ACTION", "ALIGN", "ALINK", "BACKGROUND", "BGCOLOR", "COLOR", "COMPACT", "CONTENT", "ENCTYPE", "FACE", "HEIGHT", "HREF", #"TITLE", "HTTP-EQUIV", "LINK", "METHOD", "NAME", "PROMPT", "REL", "REV", "START", "TEXT", "TYPE", "VALUE", "VLINK", "WIDTH", "ADD_DATE", "ALT", "BORDER", "CELLPADDING", "CELLSPACING", "CHECKED", "CLEAR", "CODE", "CODEBASE", "COLS", "COLSPAN", "COORDS", "FOLDED", "HSPACE", "ISMAP", "LAST_MODIFIED", "LAST_VISIT", "MAXLENGTH", "MULTIPLE", "NORESIZE", "NOSHADE", "NOWRAP", "ROWS", "ROWSPAN", "SELECTED", "SHAPE", "SIZE", "SRC", "TARGET", "USEMAP", "VALIGN", "VSPACE", }; h_state 0 { 'Normal' } h_trans { 5, '<', '"; }