guides using gimp batch processing gimp-2.4.6 for slicing scanned photos
Michael Ole Olsen
; uses guillotine on 4 scanned normal size photos to slice them out into
; 4 new images and save them
;
; use scanguides *.png 0 1 50 50
; filename guide directions and percents
; gimp -i -b '(scanguides "*.png" 0 1 50 50)' -b '(gimp-quit 0)'
(define (scanguides filename direction1 direction2 percent1 percent2)
(let* ((filelist (cadr (file-glob pattern 1))))
(while (not (null? filelist))
(let* ((filename (car filelist))
(image (car (gimp-file-load RUN-NONINTERACTIVE filename filename)))
(drawable (car (gimp-image-get-active-layer image))))
(script-fu-guide-new-percent 0 image drawable direction1 percent1)
(script-fu-guide-new-percent 0 image drawable direction2 percent2)
(plug-in-guillotine 0 image drawable)
(gimp-file-save RUN-NONINTERACTIVE image drawable filename filename)
(gimp-image-delete image)))
(set! filelist (cdr filelist))))
any idea what is wrong with this script?
it should save 4 slices in 4 different files after run.
i just get an "unexpected error" message when running with the above command.
Niels Giesen
Hi Michael,
Yes, I know what is wrong:
plug-in-guillotine makes four new images in this case, gives (#t) as
return value, so you will have to find the integers referring to the
new images yourself (if the original image had int 3, your four new
images should have ints 4,5,6 and 7 right after creation). Not nice to
have to rely on these internals, but so be it.
Either that, or loop through the vector returned by (gimp-image-list),
skipping the original image.
Get their filenames with (gimp-image-get-filename int) to pass on to
gimp-file-save. And note that you will have to get the active drawable
for each image separately.