# 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; } menu HTML_Physical { item '&Bold C-E C-B' { HTML_B } item '&Italic C-E C-I' { HTML_I } item '&Typewriter C-E C-T' { HTML_TT } } menu HTML_Logical { item '&Definition C-E C-D' { HTML_DFN } item '&Emphasize C-E C-E' { HTML_EM } item 'Citati&on C-E C-O' { HTML_CITE } item '&Code C-E C-C' { HTML_CODE } item '&Kbd entry C-E C-K' { HTML_KBD } item 'Sam&ple msg C-E C-M' { HTML_SAMP } item '&Strong EM C-E C-S' { HTML_STRONG } item '&Variable C-E C-V' { HTML_VAR } } menu HTML_Header { item '&1

    C-E 1' { HTML_H1 } item '&2

    C-E 2' { HTML_H2 } item '&3

    C-E 3' { HTML_H3 } item '&4

    C-E 4' { HTML_H4 } item '&5

    C-E 5' { HTML_H5 } item '&6
    C-E 6' { HTML_H6 } } menu HTML_List { item 'List &item
  • C-E i' { HTML_LI } item '&Unordered list C-E u' { HTML_UL } item '&Ordered list
      C-E o' { HTML_OL } item 'Definition &list
      C-E l' { HTML_DL } item 'Definition &tag
      C-E t' { HTML_DT } item '&Definition
      C-E d' { HTML_DD } } menu HTML_Table { item '&Table C-E A-T' { HTML_TABLE } item '&Caption C-E A-R' { HTML_TR } item '&Data
      C-E A-C' { HTML_CAPTION } item '&Header
      C-E A-H' { HTML_TH } item '&Row
      C-E A-D' { HTML_TD } } menu HTMLTags { item '&Paragraph

      C-E C-P ' { HTML_P } item 'Line brea&k
      C-E Enter' { HTML_BR } item 'Horiz.line


      C-E &- ' { HTML_HR } item; submenu 'P&hysical styles ', HTML_Physical; submenu 'Logical &styles ', HTML_Logical; submenu '&Header ', HTML_Header; submenu '&Lists ', HTML_List; submenu '&Tables ', HTML_Table; item; item 'Pre&formatted
           C-E C-F  ' { HTML_PRE }
          item    '&Centered      
      C-E . ' { HTML_CENTER } item; item 'Anchor &Name C-E C-N ' { HTML_ANAME } item 'Anchor H&Ref C-E C-H ' { HTML_AHREF } item; item 'Basic document C-E &0 ' { HTML_Base } } menu Main_HTML { submenu '&File', File; submenu '&Edit', Edit; submenu '&Block', Block; submenu '&Search', Search; submenu 'Fol&d', Fold; submenu 'HT&ML', HTMLTags; submenu '&Options', Options; submenu '&Help', Help; } mode HTML: PLAIN, '\\.\\c{HTML?}|{SGML?}$' { HilitOn = 1; HilitMode = 'HTML'; MultiLineHilit = 1; MainMenu = 'Main_HTML'; # menu for menubar RoutineRegexp = '\\<[Hh]\\d\\>'; SaveFolds = 2; # save fold info at end of line CommentStart = ' '; key [C-E_0] { HTML_Base } # headers key [C-E_1] { HTML_H1 } key [C-E_2] { HTML_H2 } key [C-E_3] { HTML_H3 } key [C-E_4] { HTML_H4 } key [C-E_5] { HTML_H5 } key [C-E_6] { HTML_H6 } # physical key [C-E_C-B] { HTML_B } key [C-E_C-I] { HTML_I } key [C-E_C-T] { HTML_TT } # logical key [C-E_C-D] { HTML_DFN } key [C-E_C-E] { HTML_EM } key [C-E_C-O] { HTML_CITE } key [C-E_C-C] { HTML_CODE } key [C-E_C-K] { HTML_KBD } key [C-E_C-M] { HTML_SAMP } key [C-E_C-S] { HTML_STRONG } key [C-E_C-V] { HTML_VAR } # lists key [C-E_i] { HTML_LI } key [C-E_u] { HTML_UL } key [C-E_o] { HTML_OL } key [C-E_l] { HTML_DL } key [C-E_t] { HTML_DT } key [C-E_d] { HTML_DD } # tables key [C-E_A-T] { HTML_TABLE } key [C-E_A-C] { HTML_CAPTION } key [C-E_A-H] { HTML_TH } key [C-E_A-R] { HTML_TR } key [C-E_A-D] { HTML_TD } # anchors key [C-E_C-N] { HTML_ANAME } key [C-E_C-H] { HTML_AHREF } key [C-E_C-G] { HTML_IMG } key [C-E_C-F] { HTML_PRE } key [C-E_Enter] { HTML_BR } key [C-E_-] { HTML_HR } key [C-E_.] { HTML_CENTER } key [C-E_C-P] { HTML_P } # character escapes key [C-E_&] { InsertString '&'; } key [C-E_<] { InsertString '<'; } key [C-E_>] { InsertString '>'; } key [C-E_"] { InsertString '"'; } # hilit bug keyword '-F' { 'HTML', 'HEAD', 'TITLE', 'BODY', 'H1', 'H2', 'H3', 'H4', 'H5', 'H6', 'HR', 'BR', 'B', 'I', 'U', 'TT', 'EM', 'STRONG', 'A', 'P', 'DL', 'UL', 'LI', 'DD', 'DT', 'OL', 'PRE', 'IMG', 'CENTER', 'ADDRESS', 'NOTE', 'FONT', 'TABLE', 'TR', 'TD', 'TH', }; keyword '-B' { 'NAME', 'HREF', 'ALIGN', 'VALIGN', 'BACKGROUND', 'SRC', 'ALT', 'SIZE', 'BORDER', 'WIDTH', 'COLSPAN', 'ROWSPAN', }; }