Готовые скрипты

Defy
Синхронизация времени
Очистка временных директорий
Пример работы с файлами
Пример работы с архивами
Разделить снимки по датам
Перезапуск модемов 3G
Перезапуск Ammyy
Перезапуск компьютера
Автовыключение компьютера
Автовыключение компьютера вечером
Узнать текущий курс Евро
Создать архив с текущей датой
Настройка подменю в проводнике
Переводчик
Faster
Старт 2
Синхронизация времени
Блок в условие
Вопрос в условие
Сворачивание активности пользователя
Сократить буфер
Сократить буфер - слова
Очистка временных директорий
Перезапуск Ammyy
Автозакрытие всех окон c YouTube
Поиск выделенного текста
Перевод выделенного текста
Перевернуть выделенный текст
Исправить текст
Исправить набранный текст
Исправить выделенный текст
Сохранить положение гаджетов
Восстановить положение гаджетов
Создание кода 1С из буфера обмена
Увеличение номера документов в конфигураторе 1С 8
Свернуть текст в буфере обмена
Установить ClearType
Закрыть все открытые папки
Анализ внешних модулей 1С
Сформировать сообщить
Быстрый поиск в активном окне
Средняя мышь
Левая мышь
Правая мышь
Двойная левая мышь
Скрипт в отдельном окне
Калькулятор в отдельном окне
Текстовая заметка в отдельном окне
Анализ директории
Автовыключение компьютера
Автовыключение компьютера вечером
Отключить компьютер через час бездействия
Скрипт для клавиши F7
Дубликат строки в текстовых редакторах
Забрать текст из Войснот
Подмена заголовка 1С
Отключить напоминания на час
Создать архив с текущей датой
Настройка подменю в проводнике
Периодическое нажатие на клавишу
TrueCrypt подключить usb
TrueCrypt отключить usb
Запрет просмотра YouTube
Фильтрация просмотра YouTube
Переводчик
Запуск VPN и RDP
Сортировать строки в буфере обмена
DBI
Очистка временных директорий
Автовыключение компьютера вечером
Регистрация Com 1С без установки
Подмена заголовка 1С
Отслеживание завершения обработки в 1С
Создать архив с текущей датой
Настройка подменю в проводнике


Блок в условие

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

  

http://moolex.ru