FX Foundry's Make Wonderful script

Apologies if there is a simple explanation but does anyone know how this script works? I’ve no understanding of the script language and tried to guess it was adding gaussian blur, boosting contrast and brightness but got lost over how this effect is masked at the very end of the process.
I use this script occassionaly at a very low level opacity and really like it. I cannot get it to work in GIMP 2.9 and suspect it will get lost.
Perhaps there is something similar in G’MIC?

Thanks

It would help you get an answer if you uploaded the script, using e.g. http://filebin.net/

;
; The GIMP -- an image manipulation program
; Copyright (C) 1995 Spencer Kimball and Peter Mattis
;
; Wonderful script  for GIMP 2.4
; Copyright (C) 2000 Ingo Ruhnke <grumbel@gmx.de>
;
; Tags: photo, effect
;
; Author statement:
;
;
; --------------------------------------------------------------------
; Distributed by Gimp FX Foundry project
; --------------------------------------------------------------------
;   - Changelog -
;
; Updated for GIMP 2.4 by Paul Sherman
; --------------------------------------------------------------------
;
; This program is free software; you can redistribute it and/or modify
; it under the terms of the GNU General Public License as published by
; the Free Software Foundation; either version 2 of the License, or
; (at your option) any later version.
;
; This program is distributed in the hope that it will be useful,
; but WITHOUT ANY WARRANTY; without even the implied warranty of
; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
; GNU General Public License for more details.
;
; You should have received a copy of the GNU General Public License
; along with this program; if not, write to the Free Software
; Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

(define (script-fu-grumbel-wonderful inImage inDrawable blurfactor brightness contrast flatten)
  (gimp-image-undo-group-start inImage) ;; d�but d'historique d'annulation

  (let ((new-layer (car (gimp-layer-copy inDrawable 1))))
    (gimp-image-add-layer inImage  new-layer 0)
    (plug-in-gauss-iir 1 inImage new-layer blurfactor 1 1)
;; Replace this with some level stuff
    (gimp-brightness-contrast new-layer brightness contrast)

    (let ((layer-mask (car (gimp-layer-create-mask inDrawable WHITE-MASK))))
      (gimp-layer-add-mask new-layer layer-mask)
      (gimp-edit-copy new-layer)
      (gimp-floating-sel-anchor (car (gimp-edit-paste layer-mask 0)))
      (gimp-layer-set-mode new-layer ADDITION)))

  (if (= flatten TRUE)
      (gimp-image-flatten inImage))


  (gimp-displays-flush)

  (gimp-image-undo-group-end inImage)) ;; fin d'historique d'annulation

(script-fu-register "script-fu-grumbel-wonderful"
            "<Image>/FX-Foundry/Photo/Effects/Make wonderful..."
            "Creates a new tuxracer level"
            "Ingo Ruhnke"
            "1999, Ingo Ruhnke"
            "2000"
            "RGB RGBA"
            SF-IMAGE "Image" 0
            SF-DRAWABLE "Drawable" 0
            SF-ADJUSTMENT "Flou" '(35 0 5600 1 100 0 1)
            SF-ADJUSTMENT "Luminosite" '(0 -127 127 1 10 0 1)
            SF-ADJUSTMENT "Contraste" '(0 -127 127 1 10 0 1)
            SF-TOGGLE "Aplatir l'image" FALSE)

;; EOF ;;
1 Like

It’s easy enough to fix:

The line that reads

    (let ((layer-mask (car (gimp-layer-create-mask inDrawable WHITE-MASK))))

Should be changed to (let ((layer-mask (car (gimp-layer-create-mask inDrawable ADD-MASK-WHITE))))

And the line that reads (gimp-layer-set-mode new-layer ADDITION)))

Should be changed to (gimp-layer-set-mode new-layer ADDITION-MODE)))

As for function, I believe it’s doing what is sometimes known as local-contrast-enhancement

1 Like

Is this something we should add to the scripts on the github repo (with @paynekj fixes included for 2.9)?

Is there now a GitHub repository? Last I heard (and where I got a copy of the script from) was on SourceForge - last updated 2012-10-09

Sorry, I meant a github repo I set up for pixls/photography specific scripts that might prove useful:

I’d be happy to add anyone to the org that’s interested! This might be a decent place to continue collaborating on things since the registry is still down and we haven’t figured out what to do with it…

1 Like

Thanks everyone, I don’t use many scripts but I do like this one at a very low opacity. Just seems to give a nice little touch in some portraits.
I think its an excellent idea to store favourite scripts because I suspect that quite a few won’t work in GIMP 2.10 and I certainly don’t have the skills to amend them.
Cheers

You know, I’m wondering if we shouldn’t just dump the “FX Foundry” scripts all into a github repo and start maintaining it as needed ourselves?

I’d think so, especially since there isn’t a centralized place to store gimp scripts!

Yeah, I’m checking with the GIMP team to see if there might be some other ideas or objections. :slight_smile:

Well the GimpChat forum did create a spin-off GimpScripts

1 Like

I know this is a really old thread but has the issues with old scripts and plug ins ever resolved. The links do not work. Sorry if this has been tackled elsewhere but I hope these are not lost with the arrival GIIMP3.