diff options
| -rw-r--r-- | script-fu/3.2/przem-hitchcock-d400-film-effect-v32.scm | 72 | ||||
| -rw-r--r-- | script-fu/changelog.md | 3 |
2 files changed, 75 insertions, 0 deletions
diff --git a/script-fu/3.2/przem-hitchcock-d400-film-effect-v32.scm b/script-fu/3.2/przem-hitchcock-d400-film-effect-v32.scm new file mode 100644 index 0000000..35cd3c1 --- /dev/null +++ b/script-fu/3.2/przem-hitchcock-d400-film-effect-v32.scm @@ -0,0 +1,72 @@ +; przem-hitchcock-d400-film-effect-v3 - Imitacja filmu chińskiego HITCHOCK D400: kontrast, ciepłe światła, chłodne cienie, bloom +; author: PRP +; licencja: Public Domain +; Gdańsk - 14-06-2026 +; ver. 2.260615-0 + +(define (przem-hitchcock-d400-film-effect-v3 image drawable + contrast + lift-blacks + warm-highlights + cool-shadows + bloom-strength) + (gimp-context-push) + (gimp-image-undo-group-start image) + + ;; Duplikat warstwy bazowej + (let* ( + (type-layer (vector-ref drawable 0)) + (layer (vector-ref drawable 0)) + (work-layer (car (gimp-layer-copy layer TRUE))) + (bloom-layer 0) + ) + + (if (> (car (gimp-drawable-type type-layer)) 1) + (gimp-image-convert-rgb image) + ) + + (gimp-image-insert-layer image work-layer 0 -1) + + + (let* ((finish-layer (car (gimp-layer-copy layer TRUE))) + (gimp-drawable-curves-spline finish-layer HISTOGRAM-VALUE 10 #( 0 lift-blacks 64 (+ 48 contrast) 128 128 192 (- 208 contrast) 255 255)) + (gimp-layer-set-opacity finish-layer 40) + + )) + + ;; 2. Ciepłe światła – Color Balance (midtones + highlights) + ; cyan-red - magenta-green - yellow-blue (ujemne = więcej żółtego, dodatnie = więcej niebieskiego) + (gimp-drawable-color-balance work-layer TRANSFER-SHADOWS FALSE 0 0 cool-shadows) + (gimp-drawable-color-balance work-layer TRANSFER-MIDTONES FALSE warm-highlights 0 (- warm-highlights)) + (gimp-drawable-color-balance work-layer TRANSFER-HIGHLIGHTS FALSE warm-highlights 0 (- warm-highlights)) + + ;; 3. Delikatny bloom / glow (kopiujemy warstwę, rozmywamy, Soft light) + (set! bloom-layer (car (gimp-layer-copy layer TRUE))) + (gimp-image-insert-layer image bloom-layer 0 -1) + (gimp-layer-set-mode bloom-layer LAYER-MODE-SUBTRACT) + (gimp-drawable-merge-new-filter bloom-layer "gegl:gaussian-blur" 1 LAYER-MODE-REPLACE 1.0 "std-dev-x" 8.0 "std-dev-y" 8.0 "filter" "iir") + (gimp-layer-set-opacity bloom-layer bloom-strength) + + (gimp-image-undo-group-end image) + (gimp-displays-flush) + (gimp-context-pop) + ) +) + +(script-fu-register-filter "przem-hitchcock-d400-film-effect-v3" + _"Hitchock d400 effect" + _"Imitacja filmu chińskiego HITCHCOCK D400: kontrast, ciepłe światła, chłodne cienie, bloom." + _"P.R.P" + "Public Domain" + "2026-06-14" + "*" + SF-ONE-OR-MORE-DRAWABLE + SF-ADJUSTMENT "Kontrast (0–80)" '(40 0 80 1 5 0 1) + SF-ADJUSTMENT "Black up (0–40)" '(12 0 40 1 5 0 1) + SF-ADJUSTMENT "Warm lights(–50 do 50)" '(15 -50 50 1 5 0 1) + SF-ADJUSTMENT "Cool shadows (–50 do 50)" '(-10 -50 50 1 5 0 1) + SF-ADJUSTMENT "Bloom – power (0–100)" '(35 0 100 1 5 0 1) +) + +(script-fu-menu-register "przem-hitchcock-d400-film-effect-v3" + "<Image>/Filters/PIETRASZCZYK/") diff --git a/script-fu/changelog.md b/script-fu/changelog.md index aec139d..ede0079 100644 --- a/script-fu/changelog.md +++ b/script-fu/changelog.md @@ -1,3 +1,6 @@ +# [2.260615-0] przem-hitchcock-d400-film-effect-v32.scm +* Przekopiowanie filtra dla Gimpa 3.2 + # [2.260615-0] przem-hitchcock-d400-film-effect-v3.scm * Poprawki literówek w gui |