Can someone help me please? Am a complete newbie to Script-Fu... I just need to make a script based on the "image-subtraction" plug-in ( http://registry.gimp.org/node/11696 ). The script should 'image subtract' back.jpeg from photoin.jpeg using a threshold of 30 and save the result to photoout.jpeg.
I've come up with:
(define (photo-mask input backer output)
(let* ((image (car (file-jpeg-load RUN-NONINTERACTIVE input input)))
(imageBack (car (file-jpeg-load RUN-NONINTERACTIVE backer backer)))
(drawableM (car (gimp-image-get-active-drawable image)))
(drawableS (car (gimp-image-get-active-drawable imageBack)))
(imageOut (car (image-subtraction RUN-NONINTERACTIVE image drawableM drawableS 30)))
(drawableOut (car (gimp-image-get-active-drawable imageOut))))
(file-jpeg-save RUN-NONINTERACTIVE imageOut drawableOut output output 0.8 0 1 1 "" 0 1 0 0))
But when I call this with :
(photo-mask "c:\photoin.jpeg" "c:\back.jpeg" "c:\photoout.jpeg")
Error: Procedure execution of image-subtraction failed on invalid input arguments
Parameters for the image-subtraction plug-in are supposed to be :
run-mode INT32 Interactive, non-interactive
image IMAGE Input image
drawable DRAWABLE Master drawable
drawable DRAWABLE Slave drawable
threshold INT32 Threshold
I expect the main problem is my complete lack of Script-Fu knowledge , I've looked through lots of tutorials but just need a little bit of help with this ....
Thanks in anticipation...