So I want to create the option to ignore a certain chunk of the script. For the purpose of asking this question, I've written a basic script below that converts the image to gray scale, changes the threshold based on a user defined input, increase the canvas size, adds a new layer and adds a simple blur effect.

I want to have the option of skipping the hurl & blur effect (Boarder effect). I am guessing that SF-TOGGLE would be used, but I really have no clue how I would write the script. I've looked at other scripts, but I couldn't find anything simple that would help me figure this out.

Any input is greatly appreciated.

(define (script-fu-threshold-boarder image drawable threshold)

(let*

(
(width (car (gimp-image-width image)))
(height (car (gimp-image-height image)))
(boarderLayer)
(nwhCal (* width 0.05))
(newWidth (+ width nwhCal))
(newHeight (+ height nwhCal))
(xyoff (* nwhCal 0.5))
(x-center (* newWidth 0.5))
(y-center (* newHeight 0.5))
)


(gimp-image-convert-grayscale image)

;Apply user defined threshold settings
(gimp-threshold drawable threshold 255)

;Canvas resize for boarder
(set! imageCanvas (car (gimp-image-resize image newWidth newHeight xyoff xyoff)))
(set! drawable (car (gimp-image-get-active-drawable image)))

;New layer
(set! boarderLayer (car (gimp-layer-new image newWidth newHeight GRAYA-IMAGE "Boarder Layer" 100 NORMAL-MODE)))
(gimp-image-insert-layer image boarderLayer 0 +1)
(gimp-drawable-fill boarderLayer BACKGROUND-FILL)

;Boarder effect
(plug-in-randomize-hurl RUN-NONINTERACTIVE image boarderLayer 1 1 1 FALSE)
(plug-in-mblur RUN-NONINTERACTIVE image boarderLayer LINEAR 20 0 x-center y-center)

)

)

(script-fu-register "script-fu-threshold-boarder"
"<Image>/Filters/Threshold &/or Boarder"
"Threshold &/or Boarder"
"PD"
"PD"
"July 2012"
"RGB* Gray*"
SF-IMAGE "image" 0
SF-DRAWABLE "drawable" 0
SF-ADJUSTMENT "Threshold" '(70 40 100 1 10 1 0)
)

Thank you!

Yes, SF-TOGGLE is what you want for this sort of flag.

So in your register block you would put something like:


The procedure define line would be


Then in your code you could put


Kevin

Thank you Kevin. Worked perfectly.

I started working on something similar before I read your post, but for some reason I can't get it to work. It is so simple, yet I always get an error that the procedure has been called with an invalid ID for the argument 'image'. I'm a little perplexed because the script does nothing to the image until the 'begin'.

(define (image-convert-greyscale-pd image drawable effect)

(if (= effect TRUE)
(begin

(gimp-image-convert-grayscale image)
(gimp-displays-flush)

)

(begin

)
)
)

(script-fu-register "image-convert-greyscale-pd"
"<Image>/Filters/PD grayscale"
"convert to greyscale."
"PD"
"PD"
"July 2012"
"RGB* GRAY*"
SF-IMAGE "Image" 0
SF-DRAWABLE "Drawable" 0
SF-TOGGLE "Effect" TRUE
)

I'm really new to this, but this looks like it should work. I'm just trying to better understand the procedure so I can put it to work in other scripts.

That's a bit puzzling because I can only get this new code to go wrong if I run it without an image open:

Which is possible because the "Script-Fu>>Refresh Scripts" doesn't honour the "RGB* GRAY*" filter and enables the scripts for all image types (including no image "" )

Kevin

Sorry about that. Mistake on my side.

Thank you for taking the time to help out! I appreciate the helping hand.