Извините за любые ошибки, английский не является моим родным языком
Мне нужен определенный скрипт для манипулирования кучей изображений, чтобы не беспокоить людей до смерти, спрашивая: «Может ли кто-то сделать это дляя? ", я пытаюсь научиться писать их самостоятельно.
Я начинаю с создания сценария, который будет перемещать изображения из одной папки в другую, из / Images / origin в / Images / destination , мне нужно, чтобы это был относительный путь, поскольку мне нужно, чтобы он работал где угодно, если в папке Images есть папка источника и назначения.
В настоящее время у меня есть папкаследующий сценарий (взятый из того, что я мог выучить, скопировать и понять), но при сохранении изображения оно не сохраняет то, куда я ожидаю, оно фактически ничего не делает.
(define (batch-move)
(let* (filelist (cadr (file-glob "/Image/origin/*.png" 1))))
(while (not (null? filelist))
(let* ((filename (car filelist))
(image (car (gimp-file-load RUN-NONINTERACTIOVE filename filename)))
(draw (car (gimp-image-get-active-layer image)))
(gimp-file-save RUN-NONINTERACTIVE image draw filename/../destination filename)
(set! filelist (cdr filelist))
))))
Место, где находитсяФункция (?) gimp-file-save, я пытался указать путь до и в этом примере после, но он не работает.
Предполагается, что имя файла - это полный путь с использованием /../ чтобы вернуться в папку и / destination / go to next, так же, как и для навигации по окнам с использованием каталогов относительного пути
Я также понимаю, что gimp-image-get-active-layer, вероятно, не является необходимым, но я позже добавлю всефункции, которые мне нужны.
И мой вопрос: почему это не работает? Из того, что я понял, переменная имени файла - это полный путь, но если это не так, то что это?