Функция КодСимвола() возвращает код UNICODE. Чем узнать код ASCII ?

Волшебник, я уверен - ты знаешь.

Очень жаль, что никто не знает такой функции. Но тем не менее, методом проб и ошибок такая функция рождена! Вот она:

Функция КодСимволаASCII(Символ)
   КодUNICODE = КодСимвола(Символ);
   Если ((КодUNICODE > 1039) И (КодUNICODE < 1104)) Тогда
       Возврат (КодUNICODE - 848);
   ИначеЕсли КодUNICODE = 8470 Тогда
       Возврат 185;
   ИначеЕсли КодUNICODE = 1105 Тогда
       Возврат 184;
   ИначеЕсли КодUNICODE = 1025 Тогда
       Возврат 168;
   Иначе
       Возврат КодUNICODE;
   КонецЕсли;
КонецФункции

Ну и не менее полезная функция для поиска сивола в кодировке UNICODE соответствующего кода в ASCII:

Функция UNOCODE2ASCII(КодUNICODE)
   Возврат КодСимволаASCII(Символ(КодUNICODE));
КонецФункции

Функционал был бы не полным без функции конвертирования кода ASCII в UNICODE:

Функция ASCII2UNOCODE(КодASCII)
   Если ((КодASCII > 191) И (КодASCII < 256)) Тогда
       Возврат (КодASCII + 848);
   ИначеЕсли КодASCII = 185 Тогда
       Возврат 8470;
   ИначеЕсли КодASCII = 184 Тогда
       Возврат 1105;
   ИначеЕсли КодASCII = 168 Тогда
       Возврат 1025;
   Иначе
       Возврат КодASCII;
   КонецЕсли;
КонецФункции