Что такое ImageMagick
ImageMagick (IM) - свободный графический редактор, ключевой (для нас здесь, в частности) особенностью которого является возможность описать шаблоны редактирования изображения как набор команд терминала или командной строки.
Команд для редактирования огромное количество, а их комбинаций - еще больше, что описано достаточно подробно в официальной документации, но:
- Она на английском
- Примеры все сделаны Unix-like
Что зачастую исключает возможность просто скопировать и вставить интересующий пример в Powershell, а далее и в 1С, если вы пользователь наиболее популярной и православной в желтых кругах операционной системы. Поэтому примеры здесь все под Powershell.
Где может пригодиться IM?
В любом месте, где одни однотипные картинки нужно превращать в другие однотипные картинки. Например:
- Накладывать водяные знаки
- Делать что-нибудь черно-белым
- Делать из одной картинки несколько, но в разных размерах
- Сделать машину по производству смешных картинок для канала в Телеграм
Последнее, конечно же, шутка
На самом деле, те примеры, которые я буду приводить дальше - это часть pet-проекта собственной системы управления контентом для группы ВК и Телеграм канала, которая зашла слишком далеко. Едва ли вам понадобится нечто подобное, но вариации команд, описанные там, без проблем покроют операции работы с картинками из карточек номенклатуры, например.
Как работать?
Я не буду рассказывать, как установить IM, просто оставлю ссылку. Ближе к низу страницы под надписью Windows Binary Release. Устанавливается просто из exe файла. После установки IM становится доступен как команда Powershell или командной строки, с чего мы и начнем.
Первое что нужно отметить - писать сразу в 1С - не удобно. Куда проще сделать скрипт в PS, а потом уже перенести его в 1С. Для задач начальной разработки отлично подходит Powershell ISE: Нужно лишь создать файл .ps1. К слову, ISE решает каким-то образом и другую проблему обычного Powershell - кириллицу. Я не суперуверенный пользователь Powershell и у меня русскоязычный Windows Server, поэтому первое столкновение с "powershellexe завершил свою работу" при вводе пути до картинки с кириллическими символами, вызвало у меня фрустрацию. Возможно у вас таких проблем с кодировкой не будет (или вы знаете, как их решить), но если нет, то ISE - ваш лучший друг.
Кейс: изменение размера, накладывание маски, текст на картинке
Я уже говорил про группу в ВК и Телеграм? Мог бы, конечно, оставить ссылку, но вы теперь знаете, что контент там создает бездушная машина. Первый кейс - создание картинки на день рождения великого человека. Группа про философию и литературу, поэтому подобные темы - настоящее сокровище. Только подумайте: 3 минуты работы и у тебя есть актуальный пост на каждый год. Выглядит этот пост вот так:
Состоит из:
Первая картинка - фото (3.jpg), вторая - маска (bd.png). Здесь она выглядит серой, но вообще фон полупрозрачный. Хотя тут будет и пример затемнения фона без маски. Вот так выглядит сам скрипт в ISE
convert -resize 1143x643 3.jpg 3.jpg
magick 3.jpg bd.png -grayscale Rec709Luminance -geometry 1143x643 -gravity Center -composite final.jpg
magick final.jpg -pointsize 60 -fill white -font Sylfaen -gravity Center -annotate +0+70 'Олдос Хаксли' final.jpg
magick final.jpg -pointsize 27 -fill white -font Tahoma -gravity Center -annotate +0+123 '26 июля 1894г.' final.jpg
Что мы тут видим?
convert -resize 1143x643 3.jpg 3.jpg
convert (часть IM) используется в данном случае для изменения размера фотографии к 1134х643. Если исходное фото больше - сжимает, если меньше - растягивает. Важный момент: при указании размера 1143х643 IM попытается вогнать в него картинку пропорционально по одной стороне, не искажая изображения. Т.е. если вы попытаетесь вогнать прямоугольник в квадрат, то у вас все равно останется прямоугольник, но размер будет совпадать по одной стороне. Для изменения размера без сохранения пропорции по стороне нужно использовать "!" - 1143х643!. Далее, после размера, идет просто два пути к файлам: первый - входной, второй - после обработки. Это может быть, как здесь, один и тот же файл.
magick 3.jpg bd.png -grayscale Rec709Luminance -geometry 1143x643 -gravity Center -composite final.jpg
В данной строке после команды magick идет два пути к файлу для последующего использования -composite: нижний слой, а затем верхний. -grayscale Rec709Luminance - один из вариантов превращения картинки в черно белую, т.е фильтр. -gravity Center определяет положение верхнего слоя (bd.png) на нижнем (3.jpg). В данном случае, первой строкой скрипта у меня фото подгоняется под размер маски (1143х643), а значит она (маска) будет занимать всю площадь нижнего слоя (собственно фото). Но если вы накладываете картинку меньшего размера, тот же водяной знак, например, то gravity будет определять начальную точку ее положения на полотне. Далее мы еще рассмотрим это подробнее.
magick final.jpg -pointsize 60 -fill white -font Sylfaen -gravity Center -annotate +0+70 'Олдос Хаксли' final.jpg
magick final.jpg -pointsize 27 -fill white -font Tahoma -gravity Center -annotate +0+123 '26 июля 1894г.' final.jpg
Эти строки обе накладывают текст. В начале путь к файлу, затем -pointsize - размер шрифта, -fill - цвет текста, -font - шрифт (посмотреть список всех шрифтов можно командой
convert -list font
-gravity - начальное положение текста. Значения также можно посмотреть командой. Они, в большинстве, представлены сторонами света:
convert -list gravity
-annotate непосредственно рисует текст. В начале идут значения +0+70 - это отступ от точки, выбранной в gravity. Например: gravity Center ровняет текст в центр изображения, а +100+50 опускает его на 100 пунктов вниз и на 50 вправо. При создании своего шаблона это, как правило подбирается методом проб и ошибок. Затем в одинарных кавычках идет текст и после - путь к выходному файлу.
Все, наш шаблон готов, осталось лишь перенести его в 1С. Если у вас, как и у меня, возникли сложности с кодировкой кириллицы, то здесь тоже придется провернуть несколько лишних телодвижений. Все знают метод ЗапуститьПриложение(), но в данном случае просто запихнуть туда текст скрипта не вышло. Решение было найдено следующее:
- Создать текстовый документ
- Записать в него текст скрипта
- Записать скрипт во временный файл расширения ps1
- Выполнить файл через ЗапуститьПриложение("powershell -file " + ИмяСкрипта, ,Истина, КодВозврата)
Вот как это выглядит:
ИмяСкрипта = ПолучитьИмяВременногоФайла(".ps1");
ТекстСкрипта = Новый ТекстовыйДокумент();
ТекстСкрипта.УстановитьТекст(
"convert -resize 1143x643 """
+ Путь + """ """
+ Путь
+ """"
+ Символы.ПС
+ "magick """
+ Путь
+ """ """
+ ПутьМаска
+ """"
+ " -grayscale Rec709Luminance -geometry 1143x643 -gravity Center -composite """
+ Путь
+ """"
+ Символы.ПС
+"magick """
+ Путь
+ """ -pointsize 50 -fill white -font Sylfaen -gravity Center -annotate +0+70 '"
+ ВыборкаДетальныеЗаписи.Имя
+ " "
+ ВыборкаДетальныеЗаписи.Фамилия
+ "' """
+ Путь + """"
+ Символы.ПС
+ "magick """
+ Путь
+ """ -pointsize 24 -fill white -font Tahoma -gravity Center -annotate +0+117 '"
+ Формат(ВыборкаДетальныеЗаписи.ДР, "ДЛФ=DD")
+ "' """
+ Путь
+ """"
);
ТекстСкрипта.Записать(ИмяСкрипта, КодировкаТекста.UTF8);
КодВозврата = 0;
ЗапуститьПриложение("powershell -file " + ИмяСкрипта, ,Истина, КодВозврата);
УдалитьФайлы(ИмяСкрипта);
Важно: пути лучше окружать двойными кавычками.
Вот и все. Собственно любые значения, будь то размеры шрифтов, цвета или отступы можно тоже заменять на переменные. Сейчас посмотрим еще несколько вариантов.
Еще несколько вариантов скриптов
1. Рекламка книги из онлайн библиотеки
Скрипт PS:
convert -resize 365x528! book1.png book1.png
convert "book1.png" +clone -background black -shadow 80x3+5+5 +swap -background none -layers merge +repage shadow.png
magick bookpattern.png shadow.png -geometry +125+510 -composite book.png
magick book.png book1.png -geometry +120+500 -composite book.png
magick book.png bookframe.png -geometry +120+500 -composite book.png
magick book.png -pointsize 32 -fill white -font Sylfaen -gravity South -annotate -210+120 'Королева Марго' book.png
magick book.png -pointsize 22 -fill grey -font Tahoma -gravity South -annotate -210+90 'Александр Дюма' book.png
magick book.png -pointsize 88 -fill white -font Sylfaen -gravity Center -annotate +0-290 'Королева Марго' book.png
magick book.png -pointsize 24 -fill grey -font Tahoma -gravity Center -annotate +0-220 'Александр Дюма в библиотеке Two-Digit Athenaeum'book.png
magick book.png -pointsize 66 -fill grey -font Sylfaen -gravity South -annotate +160+330 'по коду:' book.png
magick book.png -pointsize 120 -fill white -font Tahoma -gravity South -annotate +200+195 '9VAN2' book.png
convert -resize 768x768 book.png book.png
P.S. Из нового - строки 2 и 3. В строке 2 создается png тени от book1.png, а в 3 - тень накладывается на фон. На фоне уже есть темное пятно, да, но тень из скрипта тоже рабочая.
В 1С:
Функция СформироватьРекламуКниги(Знач Книга) Экспорт
ФонДД = Справочники.Файлы.РК_Фон.Файл.Получить();
Фон = ПолучитьИмяВременногоФайла(".png");
ФонДД.Записать(Фон);
РамкаДД = Справочники.Файлы.РК_Рамка.Файл.Получить();
Рамка = ПолучитьИмяВременногоФайла(".png");
РамкаДД.Записать(Рамка);
ОбъектКнига = Книга.ПолучитьОбъект();
КартинкаКнигиДД = ОбъектКнига.КартинкаДвоичные.Получить();
КартинкаКниги = ПолучитьИмяВременногоФайла(".png");
КартинкаКнигиДД.Записать(КартинкаКниги);
КодКниги = ОбъектКнига.Код;
НазваниеКниги = ОбъектКнига.Наименование;
АвторКниги = ОбъектКнига.Автор.Имя + " " + ОбъектКнига.Автор.Фамилия;
КартинкаОбработанная = ПолучитьИмяВременногоФайла(".png");
МассивВФ = Новый Массив;
МассивВФ.Добавить(Фон);
МассивВФ.Добавить(Рамка);
МассивВФ.Добавить(КартинкаКниги);
ИмяСкрипта = ПолучитьИмяВременногоФайла(".ps1");
ТекстСкрипта = Новый ТекстовыйДокумент();
ТекстСкрипта.УстановитьТекст(
"convert -resize 365x528! """
+ КартинкаКниги
+ """ """
+ КартинкаКниги
+ """"
+ Символы.ПС
+ "magick """
+ Фон
+ """ """
+ КартинкаКниги
+ """ -geometry +120+500 -composite """
+ КартинкаОбработанная
+ """"
+ Символы.ПС
+ "magick """
+ КартинкаОбработанная
+ """ """
+ Рамка
+ """ -geometry +120+500 -composite """
+ КартинкаОбработанная
+ """"
+ Символы.ПС
+ "magick """
+ КартинкаОбработанная
+ """ -pointsize 32 -fill white -font Sylfaen -gravity South -annotate -210+120 '"
+ НазваниеКниги
+ "' """
+ КартинкаОбработанная
+ """"
+ Символы.ПС
+ "magick """
+ КартинкаОбработанная
+ """ -pointsize 22 -fill grey -font Tahoma -gravity South -annotate -210+90 '"
+ АвторКниги
+ "' """
+ КартинкаОбработанная
+ """"
+ Символы.ПС
+ "magick """
+ КартинкаОбработанная
+ """ -pointsize 88 -fill white -font Sylfaen -gravity Center -annotate +0-290 '"
+ НазваниеКниги
+ "' """
+ КартинкаОбработанная
+ """"
+ Символы.ПС
+ "magick """
+ КартинкаОбработанная
+ """ -pointsize 24 -fill grey -font Tahoma -gravity Center -annotate +0-220 '"
+ АвторКниги
+ " в библиотеке Two-Digit Athenaeum'"""
+ КартинкаОбработанная
+ """"
+ Символы.ПС
+ "magick """
+ КартинкаОбработанная
+ """ -pointsize 66 -fill grey -font Sylfaen -gravity South -annotate +160+330 'по коду:' """
+ КартинкаОбработанная
+ """"
+ Символы.ПС
+ "magick """
+ КартинкаОбработанная
+ """ -pointsize 120 -fill white -font Tahoma -gravity South -annotate +200+195 '"
+ КодКниги
+ "' """
+ КартинкаОбработанная
+ """"
+ Символы.ПС
+ "convert -resize 768x768 """
+ КартинкаОбработанная
+ """ """
+ КартинкаОбработанная
+ """"
);
ТекстСкрипта.Записать(ИмяСкрипта, КодировкаТекста.UTF8);
КодВозврата = 0;
ЗапуститьПриложение("powershell -file " + ИмяСкрипта, ,Истина, КодВозврата);
УдалитьФайлы(ИмяСкрипта);
СтруктураВозврата = Новый Структура;
СтруктураВозврата.Вставить("Картинка", КартинкаОбработанная);
СтруктураВозврата.Вставить("МассивВФ", МассивВФ);
Возврат СтруктураВозврата
КонецФункции
2. Создание карточек разного размера по пути к файлу
Сразу перейду к 1С. Ничего сложного этот код не делает: берет путь к файлу из параметра и обходит соответствие, где ключ - имя файла, а значение - размер. Сохраняется все в webp рядом с основной картинкой
Процедура СоздатьКарточки(Знач ПутьКОригиналу) Экспорт
Картинка = Новый Файл(ПутьКОригиналу);
Путь = Картинка.Путь;
Размеры = Новый Соответствие;
Размеры.Вставить("small" , "175x270");
Размеры.Вставить("medium" , "295x455");
Для Каждого Размер Из Размеры Цикл
РазмерМассив = СтрРазделить(Размер.Значение, "x");
Ширина = РазмерМассив[0];
Высота = РазмерМассив[1];
ИмяСкрипта = ПолучитьИмяВременногоФайла(".ps1");
ТекстСкрипта = Новый ТекстовыйДокумент();
ТекстСкрипта.УстановитьТекст(
"magick convert -resize " + Ширина + "x -unsharp 0x0.55+0.55+0.008 -quality 90 "
+ ПутьКОригиналу
+ " "
+ Путь
+ Размер.Ключ
+ ".webp"
+ Символы.ПС +
"convert "
+ Путь
+ Размер.Ключ
+ ".webp"
+ " -resize " + Размер.Значение + "! -gravity North -extent " + Размер.Значение + " "
+ Путь
+ Размер.Ключ
+ ".webp"
);
ТекстСкрипта.Записать(ИмяСкрипта, КодировкаТекста.UTF8);
КодВозврата = 0;
ЗапуститьПриложение("powershell -file " + ИмяСкрипта + " -noexit", ,Истина, КодВозврата);
УдалитьФайлы(ИмяСкрипта);
КонецЦикла;
КонецПроцедуры
Из незнакомого здесь: -quality и -unsharp. -quality может резать качество, что уменьшает вес картинки. Как работает unsharp никто не знает, но он снижает блюр при изменении размеров.
3. Еще один способ рисовать текст
Рисует текст с подкладкой. Для этого используется вообще другой механизм: не -annotate, а -draw
magick event.jpg -fill white -stroke white -undercolor black -font Sylfaen -pointsize 28 -gravity SouthWest -draw "text 130,65 'Пабло Пикассо, Симона де Бовуар, Жан-Поль Сартр,\n Альбер Камю и другие'" event.jpg
-stroke определяет цвет контура символов, -fill - цвет заливки, -udercolor - цвет подложки. 130, 65 после текст - те же +130+65 у annotate
Важно: \n - перенос строки
1С:
"magick """
+ КартинкаОбработанная
+ """ -fill white -stroke white -undercolor black -font Tahoma -pointsize 18 -gravity SouthWest -draw ""text 130,30 '"
+ Место
+ ", "
+ ДатаСобытия
+ "'"" """
+ КартинкаОбработанная
+ """"
Вот и вся "картиночная магия". Надеюсь, было полезно.
