anchor.diff:    ( CodePage:      50936; CharSet: UNKNOWN_CHARSET;     Converter: TBuffConvSingleByte;  Name: 'EBCDIC Simplified Chinese'),
     ( CodePage:      50937; CharSet: UNKNOWN_CHARSET;     Converter: TBuffConvSingleByte;  Name: 'EBCDIC US-Canada and Traditional Chinese'),
     ( CodePage:      50939; CharSet: UNKNOWN_CHARSET;     Converter: TBuffConvSingleByte;  Name: 'EBCDIC Japanese (Latin) Extended and Japanese'),
  -  ( CodePage:      51932; CharSet: UNKNOWN_CHARSET;     Converter: TBuffConvSingleByte;  Name: 'EUC Japanese'),
  -  ( CodePage:      51936; CharSet: UNKNOWN_CHARSET;     Converter: TBuffConvEUC_CN;      Name: 'EUC Simplified Chinese; Chinese Simplified (EUC)'),
  -  ( CodePage:      51949; CharSet: UNKNOWN_CHARSET;     Converter: TBuffConvEUC_KR;      Name: 'EUC Korean'),
  -  ( CodePage:      51950; CharSet: UNKNOWN_CHARSET;     Converter: TBuffConvSingleByte;  Name: 'EUC Traditional Chinese'),
  +  ( CodePage:      51932; CharSet: SHIFTJIS_CHARSET;    Converter: TBuffConvEUC_JP;      Name: 'EUC Japanese'),
  +  ( CodePage:      51936; CharSet: GB2312_CHARSET;      Converter: TBuffConvEUC_CN_GB;   Name: 'EUC Simplified Chinese; Chinese Simplified (EUC)'),
  +  ( CodePage:      51949; CharSet: HANGEUL_CHARSET;     Converter: TBuffConvEUC_KR;      Name: 'EUC Korean'),
  +  ( CodePage:      51950; CharSet: CHINESEBIG5_CHARSET; Converter: TBuffConvBig5CP950;   Name: 'EUC Traditional Chinese'),
     ( CodePage:      52936; CharSet: UNKNOWN_CHARSET;     Converter: TBuffConvSingleByte;  Name: 'HZ-GB2312 Simplified Chinese; Chinese Simplified (HZ)'),
     ( CodePage:      54936; CharSet: UNKNOWN_CHARSET;     Converter: TBuffConvSingleByte;  Name: 'Windows XP and later: GB18030 Simplified Chinese (4 byte); Chinese Simplified (GB18030)'),
     ( CodePage:      57002; CharSet: UNKNOWN_CHARSET;     Converter: TBuffConvSingleByte;  Name: 'ISCII Devanagari'),
  
positive.code:     case c1 of
        $A1..$A2:
          case c2 of
            $40..$7E: Result := WideChar($E4C6 + 96 * (c1 - $81) + (c2 - $40));
            $80..$A0: Result := WideChar($E4C6 + 96 * (c1 - $A1) + (c2 - $41));
          end;
  
        $AA..$AF, $F8..$FE:
          case c2 of
            $A1..$F7: Result := WideChar($E000 + 94 * (c1 - $AA) + (c2 - $A1));
            $F8..$FE: Result := WideChar($E000 + 94 * (c1 - $F2) + (c2 - $A1));
          end;
      end;
    end;
  end;
  
negative.code: 
  //-- BG ---------------------------------------------------------- 02.10.2012 --
  procedure TBuffConvHighMap.Assign(Source: TBuffConverter);
  begin
    inherited;
    UpdateHighMap;
  