diff options
Diffstat (limited to 'script-fu')
| -rw-r--r-- | script-fu/3.x/przem-dramatic-light-3x.scm | 30 | ||||
| -rw-r--r-- | script-fu/changelog.md | 6 |
2 files changed, 19 insertions, 17 deletions
diff --git a/script-fu/3.x/przem-dramatic-light-3x.scm b/script-fu/3.x/przem-dramatic-light-3x.scm index bcccc57..20343d9 100644 --- a/script-fu/3.x/przem-dramatic-light-3x.scm +++ b/script-fu/3.x/przem-dramatic-light-3x.scm @@ -1,15 +1,15 @@ -; przem-dramatic-light-3x Tworzy dramatyczne światło z góry, wysoki kontrast i teksturę. -; Przmeysłąw R. Pietraszczyk +; przem-dramatic-light-3x Tworzy dramatyczne światło, wysoki kontrast. +; Przmeysław R. Pietraszczyk ; 2026-07-21 -; ver 2.260721-2 +; ver 2.260722-0 ; editor: KWrite (define (przem-dramatic-light-3x img drawable) + (gimp-context-push) (gimp-image-undo-group-start img) - ;; Duplicate layer for non-destructive workflow (let* ( (base-layer (vector-ref drawable 0)) (type (car (gimp-drawable-type-with-alpha base-layer))) @@ -18,9 +18,9 @@ (if (= type RGBA-IMAGE) (gimp-drawable-desaturate base-layer DESATURATE-LIGHTNESS)) - (gimp-drawable-merge-new-filter base-layer "gegl:noise-hsv" "Noise-HSV" LAYER-MODE-REPLACE 1.0) - (gimp-layer-set-mode base-layer LAYER-MODE-NORMAL) - (gimp-layer-set-opacity base-layer 100) + ;(gimp-drawable-merge-new-filter base-layer "gegl:noise-hsv" "Noise-HSV" LAYER-MODE-REPLACE 1.0) + ;(gimp-layer-set-mode base-layer LAYER-MODE-NORMAL) + ;(gimp-layer-set-opacity base-layer 100) ;; Apply strong curves to push light from top (let* ( @@ -28,14 +28,12 @@ (contrast-layer (car (gimp-layer-copy base-layer TRUE))) (gimp-drawable-curves-spline light-layer HISTOGRAM-VALUE 6 #(0 0 64 180 128 230 255 255)) - ;; Set blending mode - (gimp-layer-set-mode light-layer LAYER-MODE-NORMAL) - (gimp-layer-set-opacity light-layer 90) + (gimp-layer-set-mode light-layer LAYER-MODE-OVERLAY) + (gimp-layer-set-opacity light-layer 100) - (gimp-drawable-curves-spline contrast-layer HISTOGRAM-VALUE 6 #(0 0 64 40 128 128 192 220 255 255)) - ; neo grain- dissolve - (gimp-layer-set-mode contrast-layer LAYER-MODE-DISSOLVE) - (gimp-layer-set-opacity contrast-layer 80) + (gimp-drawable-curves-spline contrast-layer HISTOGRAM-VALUE 8 #(0 0 64 40 128 128 192 220 255 255)) + (gimp-layer-set-mode contrast-layer LAYER-MODE-OVERLAY) + (gimp-layer-set-opacity contrast-layer 85) ;; Add layers (gimp-image-insert-layer img light-layer 0 -1) @@ -43,17 +41,17 @@ )) (let* ((merged-layer (car (gimp-image-merge-visible-layers img CLIP-TO-IMAGE)))) - ;(gimp-image-merge-visible-layers image CLIP-TO-IMAGE) (gimp-item-set-visible merged-layer TRUE)) ) (gimp-image-undo-group-end img) (gimp-displays-flush) + (gimp-context-pop) ) (script-fu-register-filter "przem-dramatic-light-3x" _"Dramatic Light Effect" - _"Tworzy dramatyczne światło z góry, wysoki kontrast i teksturę." + _"Tworzy dramatyczne światło, wysoki kontrast" "Przemysław R. Pietraszczyk" "Public Domain" "21-07-2026" diff --git a/script-fu/changelog.md b/script-fu/changelog.md index ef1c993..29124a2 100644 --- a/script-fu/changelog.md +++ b/script-fu/changelog.md @@ -1,5 +1,9 @@ +# [2.260722-0] przem-dramatic-light-3x.scm +* LAYER-MODE-OVERLAY zamiast LAYER-MODE-NORMAL +* zaremowanie noise-hsv + # [2.260721-2] przem-dramatic-light-3x.scm -* Filtr tworzy dramatyczne światło z góry, wysoki kontrast i teksturę. +* Filtr tworzy dramatyczne światło, wysoki kontrast. # [2.260721-0] przem-dramatic-light-3x.scm * Prealpha nowego filtra |