Re: Буква Е и Ё
Пользователь:
FNS (IP-адрес скрыт)
Дата: 19, May, 2016 21:45
Способ не претендует на премию, но.. Возможно, подойдет или натолкнёт на нужную мысль. Код следует добавить в db_name.fst и db_name.ifs. После добавления, нужно создать словарь заново. Будет добавлена дополнительная запись в словарь авторов, и к примеру, Аксёнов можно будет найти введя в поиск Аксенов. По аналогии можно сделать и для других словарей. Следует так же подключить 702 и 961 поле к словарю авторов добавив измененные штатные записи из db_name.fst и db_name.ifs.
db_name.fst
___________
7001 0 MHL,if &unifor('Q'v700^a):'ё' then 'A='&unifor('G0ё'&unifor('Q'v700^a)),'е',&unifor('G2ё'&unifor('Q'v700^a))," "v700^d,", "v700^g,if a(v700^g) then|, |d700^b,if v700^b:'. 'or (not(v700^b:'.')) then v700^b else &unifor('G0.'v700^b),'. '&unifor('G2.'v700^b) fi fi,if &uf('Korg.mnu\A')='1' then &uf('+7W700#1') else if s(v700^1,v700^c,v700^f)<>''then' (',v700^1,if s(v700^1)<>''then"; "d700^c fi,v700^c,if s(v700^1,v700^c)<>''then"; "d700^f fi,v700^f,')' fi,"\"v700^4*4,", "v700^5*4,", "v700^6*4,"("v700^7")","\"d700^4 fi fi
db_name.ifs
___________
7001,700 0 MHL,if &unifor('Q'v700^a):'ё' then 'A='&unifor('G0ё'&unifor('Q'v700^a)),'е',&unifor('G2ё'&unifor('Q'v700^a))," "v700^d,", "v700^g,if a(v700^g) then|, |d700^b,if v700^b:'. 'or (not(v700^b:'.')) then v700^b else &unifor('G0.'v700^b),'. '&unifor('G2.'v700^b) fi fi,if &uf('Korg.mnu\A')='1' then &uf('+7W700#1') else if s(v700^1,v700^c,v700^f)<>''then' (',v700^1,if s(v700^1)<>''then"; "d700^c fi,v700^c,if s(v700^1,v700^c)<>''then"; "d700^f fi,v700^f,')' fi,"\"v700^4*4,", "v700^5*4,", "v700^6*4,"("v700^7")","\"d700^4 fi fi