C'est fou !

Parce que je n'ai vraiment pas le temps, je vous livre, brut de fonderie[1], mon premier script-fu écrit à l'arrache cet après-midi. Je mettrais des commentaires plus tard (sinon, vous pouvez en mettre plus bas).

(define (script-fu-greyize image layer)
  (gimp-image-undo-group-start image)
  (gimp-colorize layer 0 0 22)
  (gimp-levels layer 0 0 225 1 0 255)
  (gimp-image-undo-group-end image)
  (gimp-displays-flush)
)

(script-fu-register "script-fu-greyize"
        "<Image>/Colors/Greyize"
        "Converti en greylevels personnalisés"
        "Dimitri Robert"
        "Dimitri Robert"
        "2007"
        ""
        SF-IMAGE "Image" 0
        SF-DRAWABLE "Layer" 0
)

Notes

[1] Et aussi pour me souvenir que j'en ai écrit un.