Re: [Gimp-user] Script-fu in GIMP - and batch processing.

[ludo0565 <ludo0565 dbmail com>]

Hello Robbie,

First of all I present my excuses to you: 
My mail box placed your mail in spam - and I only saw it yesterday.

So thanks a lot for your answer. It's not so easy to find someone interested in a question about scheme & 
script-fu ...
;-)

I'll try this as soon as I get time - which is pretty scarce at the moment... unfortunately.
And I I'll let you know as soon as I do.

Thanks again.

ludo

Le 26 mai 2021 00:26:56 GMT+02:00, Robbie Huffman <robbie huffman nundrum net> a écrit :
> On Sat, May 15, 2021 at 05:45:47PM +0200, ludo0565 dbmail com wrote:
> > Then I tried with this:
> >
> > (define (batch-unsharp-mask pattern radius amount threshold
> filenamenew)
> >   (let* ((filelist (cadr (file-glob pattern 1))))
> >     (while (not (null? filelist))
> >            (let* ((filename (car filelist))
> >                  (filenamenew (+ "(car filelist)" "-new"))
> >                   (image (car (gimp-file-load RUN-NONINTERACTIVE
> filename filename)))
> >                   (drawable (car (gimp-image-get-active-layer
> image))))
> >              (plug-in-unsharp-mask RUN-NONINTERACTIVE image drawable
> radius amount threshold)
> >              (gimp-file-save RUN-NONINTERACTIVE image drawable
> filenamenew filenamenew)
> >              (gimp-image-delete image))
> >            (set! filelist (cdr filelist)))))
> >           
> > But that didn't work either, because the argument to " + " (sum) must
> be a number.
>
> I think you could (string-append filename "-new") to get something that
> works OK.

-- 
Envoyé de mon appareil Android avec Courriel K-9 Mail. Veuillez excuser ma brièveté.