// Возвращает строку по правилам "ЭтоПримерСтроки" -> "Это пример строки"
//
Функция ПолучитьНаименованиеПоИмени( Знач пИмя ) Экспорт
//
v8: Функция преобразования строки
СтрокаВозврата = Сред(пИмя, 1, 1);
Для Сч = 2 По СтрДлина(пИмя) Цикл
ПредыдущийСимвол = Сред(пИмя, Сч - 1, 1);
ТекущийСимвол = Сред(пИмя, Сч, 1);
СледующийСимвол = Сред(пИмя, Сч + 1, 1);
ПослеследующийСимвол = Сред(пИмя, Сч + 2, 1);
Если ТекущийСимвол = "_" Тогда
СтрокаВозврата = СтрокаВозврата + " ";
Продолжить;
ИначеЕсли ВРЕГ(ТекущийСимвол) = ТекущийСимвол Тогда
Если Ложь
ИЛИ ВРЕГ(ПредыдущийСимвол) <> ПредыдущийСимвол
ИЛИ (Истина
И ПредыдущийСимвол <> "_"
И ВРЕГ(ПредыдущийСимвол) = ПредыдущийСимвол
И ВРЕГ(СледующийСимвол) <> СледующийСимвол)
Тогда
СтрокаВозврата = СтрокаВозврата + " ";
Если Ложь
ИЛИ ВРЕГ(СледующийСимвол) <> СледующийСимвол
ИЛИ ВРЕГ(ПослеследующийСимвол) <> ПослеследующийСимвол
Тогда
ТекущийСимвол = НРЕГ(ТекущийСимвол);
КонецЕсли;
КонецЕсли;
КонецЕсли;
СтрокаВозврата = СтрокаВозврата + ТекущийСимвол;
КонецЦикла;
Возврат СтрокаВозврата;
КонецФункции // ПолучитьНаименованиеПоИмени()