Блок в условие
// Заключает выделенный блок в условие(Кт+И)
Если (Окна.Класс()="V8TopLevelFrame") Тогда
СтарыйБуфер = Буфер.Текст;
Нажать(Клавиши.Кт|Клавиши.С);
СтрокаБуфера = Буфер.Текст;
НовыйТекст = Слова.Массив();
// в начало получаемого текста добавим отступы
Текст = Слова.Массив(СтрокаБуфера);
Если (Текст.Количество()=0) Тогда Возврат 0; Конец;
п = 0;
Пока (п<Текст.Количество()) Цикл
Если (Слова.Пустое(Текст.Получить(п))=0) Тогда Прервать; Конец;
НовыйТекст.Добавить(Текст.Получить(п));
п = п + 1;
Конец;
Текст = Слова.Массив(СтрокаБуфера, 1); // теперь анализируем полученный текст без пустых слов
Если (Текст.Количество()=0) Тогда Возврат 0; Конец;
НовыйТекст.Добавить("Если");
НовыйТекст.Добавить("(");
НовыйТекст.Добавить(" ");
НовыйТекст.Добавить(")");
НовыйТекст.Добавить("Тогда");
НовыйТекст.Добавить(Слова.Перенос);
п = 0;
к = Текст.Количество();
Пока (п<к) Цикл
НовыйТекст.Добавить(Текст.Получить(п));
п = п + 1;
Конец;
НовыйТекст.Добавить("КонецЕсли");
НовыйТекст.Добавить(";");
НовыйТекст.Добавить(Слова.Перенос);
Буфер.Текст = Слова.Строка(НовыйТекст, 1);
Нажать(Клавиши.Кт|Клавиши.М);
Буфер.Текст = СтарыйБуфер;
Конец;