CCCPaste

GIMP Script/Plugin Example

(define (fbk-effect image drawable)
(let* (
(img-height (car (gimp-image-height image)))
(img-width (car (gimp-image-width image)))
(new-layer)
)
(gimp-image-undo-group-start image)
;(gimp-convert-grayscale image)
(gimp-desaturate drawable)
(plug-in-neon 0 image drawable 5 5)

(set! new-layer (car (gimp-layer-new image img-width img-height RGBA-IMAGE "layer" 100 LAYER-MODE-HARDLIGHT)))
(gimp-image-insert-layer image new-layer 0 0)
(gimp-selection-flood image)
(gimp-drawable-edit-fill new-layer FILL-FOREGROUND)

(gimp-displays-flush)
(gimp-image-undo-group-end image)
)
)

(script-fu-register
"fbk-effect" ;function name
"Test Effect with Layers" ;menu label
"Add some effects and layers." ;description
"Kris Occhipinti" ;author
"Copyright 2023,Kris Occhipinti;\
GPLv3" ;copyright notice
"March 25, 2023" ;date created
"" ;image type that the script works on
SF-IMAGE "Image" 0
SF-DRAWABLE "Drawable" 0
)
(script-fu-menu-register "fbk-effect" "<Image>/FBK")