object TTypeSet
  TypName = 'diaryŚ`Ž®'
  Exts = 'html'
  AutoIndent = True
  FreeRow = False
  ChgIndent = False
  TabIndent = True
  WrapByte = 80
  WordWrap = 4111
  TabCnt = 4
  Commenter = '//'
  HexPrefix = '0x'
  Quotation = '"'
  DBSpaceMark = True
  SpaceMark = True
  TabMark = True
  Url = True
  Mail = True
  ControlCode = False
  LeftBar = True
  OutLineItem.Strings = (
    '0,"^<DT>(\d+\/\d+\/\d+ \(\w+\.\))<DD>$",,,\1'
    
      '1,"^<div class=""emph""><A HREF=""[^""]+"">(\[[^\]]+\])<\/A> <A ' +
      'NAME=""[^""]+"">([^<]+)<\/A><\/div>$",,,\1\2')
end