diff options
author | Przemysław R. Pietraszczyk <przem@prymula.ct8.pl> | 2025-08-24 10:53:48 +0200 |
---|---|---|
committer | Przemysław R. Pietraszczyk <przem@prymula.ct8.pl> | 2025-08-24 10:53:48 +0200 |
commit | a2598247ce33142145aa656b094c4467e6335527 (patch) | |
tree | bd7e8c8bffbc00951d59efd68093288b58d69483 /script-fu | |
parent | b6baa808dc8c15e24c605e3eeef356d53f4b7bd4 (diff) |
2.250824-1
Diffstat (limited to 'script-fu')
-rw-r--r-- | script-fu/3.0/przem-wet-collodion-v3.scm | 15 | ||||
-rw-r--r-- | script-fu/changelog.md | 3 |
2 files changed, 12 insertions, 6 deletions
diff --git a/script-fu/3.0/przem-wet-collodion-v3.scm b/script-fu/3.0/przem-wet-collodion-v3.scm index 88f1b18..1ab6656 100644 --- a/script-fu/3.0/przem-wet-collodion-v3.scm +++ b/script-fu/3.0/przem-wet-collodion-v3.scm @@ -2,12 +2,10 @@ ; author: PRP ; licencja: Public Domain ; Gdańsk - 24-08-2025 -; ver. 2.250824-0~beta +; ver. 2.250824-1~beta (define (add-hsv-noise img drawable intensity-h intensity-s intensity-v grain) (let* ( - ;(width (car (gimp-image-get-width drawable))) - ;(height (car (gimp-image-get-height drawable))) (width (car (gimp-image-get-width img))) (height (car (gimp-image-get-height img))) (noise-layer (car (gimp-layer-new img "Noise" width height RGB-IMAGE 100 LAYER-MODE-NORMAL))) @@ -97,12 +95,13 @@ -(define (przem-wet-collodion-v3 image drawable intensity-h intensity-s intensity-v grain blur) +(define (przem-wet-collodion-v3 image drawable mode intensity-h intensity-s intensity-v grain blur) (let* ( (layer (vector-ref drawable 0)) (type (car (gimp-drawable-type-with-alpha layer))) (width (car (gimp-image-get-width image))) (height (car (gimp-image-get-height image))) + (mode-blur 0) ) (gimp-image-undo-group-start image) @@ -123,7 +122,10 @@ ;;(plug-in-noisify RUN-NONINTERACTIVE image layer FALSE grain grain grain 0) ;; Dodanie lekkiego rozmycia - (gimp-drawable-merge-new-filter layer "gegl:gaussian-blur" 0 LAYER-MODE-REPLACE 1.0 "std-dev-x" blur "std-dev-y" blur "filter" "auto") + (if (= mode 0) (begin (set! mode-blur "auto"))) + (if (= mode 1) (begin (set! mode-blur "iir"))) + (if (= mode 2) (begin (set! mode-blur "fir"))) + (gimp-drawable-merge-new-filter layer "gegl:gaussian-blur" 0 LAYER-MODE-REPLACE 1.0 "std-dev-x" blur "std-dev-y" blur "filter" mode-blur) (gimp-image-undo-group-end image) (gimp-displays-flush) @@ -136,8 +138,9 @@ "PRP" "Public Domain" "2025-07-15" - "RGB*" + "RGB* GRAY*" SF-ONE-OR-MORE-DRAWABLE + SF-OPTION "Mode" '("AUTO" "IIR" "FIR") SF-ADJUSTMENT "Hue Noise Intensity" '(30 0 100 1 10 0 0) SF-ADJUSTMENT "Saturation Noise Intensity" '(20 0 100 1 10 0 0) SF-ADJUSTMENT "Value Noise Intensity" '(15 0 100 1 10 0 0) diff --git a/script-fu/changelog.md b/script-fu/changelog.md index 9486683..37afbbe 100644 --- a/script-fu/changelog.md +++ b/script-fu/changelog.md @@ -1,3 +1,6 @@ +# [2.250824-1] +* dodanie opcji MODE dla rozmycia z trybami: AUTO, IIR, FIR + # [2.250824-0] przem-wet-collodion-v3 * Mokry kolodion dla Gimpa 3.0 |