#help_index "DolDoc"

U0 DocInit()
{//$LK-UL,"CMD Defines",A="MN:DOCT_TEXT"$
  CLex *lx;
  I64 i;
  CHashGeneric *temph;

  DefineLstLoad("ST_DOC_CMDS",
	"TX\0CR\0SR\0CU\0TB\0CL\0PB\0DA\0PL\0LM\0RM\0HD\0FO\0ID\0"
	"FG\0BG\0FD\0BD\0PT\0WW\0UL\0IV\0BK\0SX\0SY\0CM\0AN\0LK\0BT\0"
	"CB\0LS\0MA\0MU\0HX\0TR\0SP\0IB\0IS\0SO\0HL\0HC\0ER\0");
  DefineLstLoad("ST_DOC_FLAGS",
	"T\0A\0D\0HTML\0LE\0LM\0RE\0RM\0BI\0BP\0RT\0SX\0SY\0SCX\0U\0"
	"LC\0LA\0RC\0RA\0TC\0LX\0CX\0RX\0TY\0CY\0BY\0"
	"HL\0WW\0BK\0IV\0SEL\0UL\0"
	"PRY\0MRX\0WR\0L\0X\0Q\0FST\0B\0S\0BD\0C\0CA\0RD\0P\0TRM\0Z\0H\0"
	"TR\0LS\0SK\0PU\0SIF\0HS\0FS\0NC\0DD\0UD\0");
  DefineLstLoad("ST_LINK_TYPES",
	"FI\0FA\0FF\0FL\0MN\0PI\0PF\0PL\0BF\0DF\0HI\0AD\0AI\0AA\0AF\0AL\0");

  doldoc.hash=HashTableNew(512);
  HashDefineLstAdd("ST_DOC_CMDS",DHT_DOC_CMD,doldoc.hash);
  HashDefineLstAdd("ST_DOC_FLAGS",DHT_DOC_FLAG,doldoc.hash);
  HashDefineLstAdd("ST_COLORS",DHT_COLOR,doldoc.hash);

  MemSet(doldoc.dft_de_flags,	0,sizeof(doldoc.dft_de_flags));
  MemSet(doldoc.dft_type_flags,	0,sizeof(doldoc.dft_type_flags));
  lx=LexNew("TX+T;DA+P+TRM+T;CM+LE+RE;AN+T;LK+L+UL+T;MA+X+UL+T;MU+X+UL+T;"
	"BT+X+B+T;CB+CA+P+T;LS+LS+P+T;HX+P+Z;TR+TR+C+CA+UL+T;SP+T;IB+T;IS+T;"
	"SO+T;HC+T;",LF_DONT_FREE_BUF);
  lx->htc.hash_table_lst=NULL;
  Lex(lx);
  while (lx->token==TK_IDENT) {
    if (temph=HashFind(lx->cur_str,doldoc.hash,DHT_DOC_CMD)) {
      i=temph->user_data0;
      Lex(lx);
      PrsDocFlags(lx,&doldoc.dft_de_flags[i],&doldoc.dft_type_flags[i]);
    }
    if (lx->token==';')
      Lex(lx);
  }
  LexDel(lx);

  for (i=0;i<DOCT_NUM_TYPES;i++)
    doldoc.dft_de_flags[i]&=~DOCG_BL_IV_UL;

  doldoc.type_flags_form[0]=0;
  for (i=0;i<DOCT_NUM_TYPES;i++)
    if (Bt(&doldoc.dft_de_flags[i],DOCEf_TAG) && i!=DOCT_TEXT || i==DOCT_HEX_ED)
      Bts(doldoc.type_flags_form,i);

  //Don't forget $LK,"cmp_type_flags_src_code",A="MN:cmp_type_flags_src_code"$.
  doldoc.type_flags_nontag_invisible[0]=
	1<<DOCT_PAGE_LEN|
	1<<DOCT_LEFT_MARGIN|
	1<<DOCT_RIGHT_MARGIN|
	1<<DOCT_HEADER|
	1<<DOCT_FOOTER|
	1<<DOCT_INDENT|
	1<<DOCT_FOREGROUND|
	1<<DOCT_BACKGROUND|
	1<<DOCT_DFT_FOREGROUND|
	1<<DOCT_DFT_BACKGROUND|
	1<<DOCT_PMT|
	1<<DOCT_WORD_WRAP|
	1<<DOCT_UNDERLINE|
	1<<DOCT_INVERT|
	1<<DOCT_BLINK|
	1<<DOCT_SHIFTED_X|
	1<<DOCT_SHIFTED_Y|
	1<<DOCT_SPRITE|
	1<<DOCT_HIGHLIGHT;

  doldoc.type_flags_data[0]=1<<DOCT_DATA|1<<DOCT_HEX_ED|1<<DOCT_CHECK_BOX;

  Bts(doldoc.clean_scan_codes,SC_CURSOR_RIGHT);
  Bts(doldoc.clean_scan_codes,SC_CURSOR_LEFT);
  Bts(doldoc.clean_scan_codes,SC_CURSOR_UP);
  Bts(doldoc.clean_scan_codes,SC_CURSOR_DOWN);
  Bts(doldoc.clean_scan_codes,SC_PAGE_UP);
  Bts(doldoc.clean_scan_codes,SC_PAGE_DOWN);
  Bts(doldoc.clean_scan_codes,SC_ALT);
  Bts(doldoc.clean_scan_codes,SC_CTRL);
  Bts(doldoc.clean_scan_codes,SC_SHIFT);
  Bts(doldoc.clean_scan_codes,SC_CAPS);
  Bts(doldoc.clean_scan_codes,SC_NUM);
  Bts(doldoc.clean_scan_codes,SC_SCROLL);
  Bts(doldoc.clean_scan_codes,SC_HOME);
  Bts(doldoc.clean_scan_codes,SC_END);
  Bts(doldoc.clean_scan_codes,SC_GUI);
  Bts(doldoc.clean_scan_codes,SC_BACKSPACE); //Handled specially
}

DocInit;