diff options
| -rw-r--r-- | script-fu/3.0/przem-cyanotype-color-effect-multi-v3.scm | 58 | ||||
| -rw-r--r-- | script-fu/3.0/przem-wet-collodion-v3.scm | 2 | ||||
| -rw-r--r-- | script-fu/changelog.md | 3 |
3 files changed, 62 insertions, 1 deletions
diff --git a/script-fu/3.0/przem-cyanotype-color-effect-multi-v3.scm b/script-fu/3.0/przem-cyanotype-color-effect-multi-v3.scm new file mode 100644 index 0000000..199bdfc --- /dev/null +++ b/script-fu/3.0/przem-cyanotype-color-effect-multi-v3.scm @@ -0,0 +1,58 @@ +; przem-cyanotype-color-effect-multi-v3 - Efekty cyjanotypi na kolor +; author: PRP +; licencja: Public Domain +; Gdańsk - 24-08-2025 +; ver. 2.250824-2 + +(define (przem-cyanotype-color-effect-multi-v3 img drawable black blue) + + (gimp-context-push) + (gimp-image-undo-group-start img) + + ; Cyjanotypia (zostaw tylko niebieski kanał) + (let* ( + (layer (vector-ref drawable 0)) + ;(type (car (gimp-drawable-type-with-alpha cyan-layer))) + (type (car (gimp-drawable-type-with-alpha (car (gimp-layer-copy (vector-ref drawable 0)))))) + + ;(cyan-layer (car (gimp-layer-copy drawable TRUE))) + (mask (car (gimp-channel-new img "Engraving Mask" (car (gimp-image-get-width img)) (car (gimp-image-get-height img)) black '(0.0 0.0 1.0 0.0 0.0 1.0 0.0 0.0 1.0)))) + ) + (if (> (car (gimp-drawable-type layer)) 1) + (gimp-image-convert-rgb img)) + + ;; Desaturacja + ;(if (= type RGBA-IMAGE) + ;(gimp-drawable-desaturate layer DESATURATE-LIGHTNESS)) + + (let* ( + (cyan-layer (car (gimp-layer-copy (vector-ref drawable 0)))) + ) + (gimp-context-set-foreground '(0 51 102)) ; Kolor błękitu pruskiego + (gimp-image-insert-layer img cyan-layer 0 -1) + (gimp-item-set-name cyan-layer "Cyanotype") + (gimp-layer-set-mode cyan-layer LAYER-MODE-SCREEN) ; Tryb mieszania: Screen + ) + ;(gimp-hue-saturation cyan-layer 0 blue 50 0) + (gimp-image-insert-channel img mask -1 0) + ) + + (gimp-image-undo-group-end img) + (gimp-displays-flush) + (gimp-context-pop)) + + +(script-fu-register-filter "przem-cyanotype-color-effect-multi-v3" + _"Add Cyanotype Color Multi..." + _"Efekty cyjanotypii na kolor" + "PRP" + "Public Domain" + "2025-08-24" + "RGB* GRAY*" + SF-ONE-OR-MORE-DRAWABLE + SF-ADJUSTMENT "Black" '(5 0 100 1 10 0 0) + SF-ADJUSTMENT "Pastel blue" '(40 30 70 1 10 1 0)) + +(script-fu-menu-register "przem-cyanotype-color-effect-multi-v3" + "<Image>/Filters/PIETRASZCZYK/") + diff --git a/script-fu/3.0/przem-wet-collodion-v3.scm b/script-fu/3.0/przem-wet-collodion-v3.scm index 1ab6656..3e7e908 100644 --- a/script-fu/3.0/przem-wet-collodion-v3.scm +++ b/script-fu/3.0/przem-wet-collodion-v3.scm @@ -45,7 +45,7 @@ ; Skopiuj szum do każdego kanału (gimp-edit-copy (vector noise-layer)) - + ; czy to potrzebne ? (gimp-edit-copy (vector drawable)) (let* ( (pasted (car (gimp-edit-paste h-channel TRUE))) diff --git a/script-fu/changelog.md b/script-fu/changelog.md index 37afbbe..f4a6374 100644 --- a/script-fu/changelog.md +++ b/script-fu/changelog.md @@ -1,3 +1,6 @@ +# [2.250824-2] przem-cyanotype-color-effect-multi-v3.scm +* Uproszczona konwersja (bez gumy) przem-cyanotype-gum-effect.scm + # [2.250824-1] * dodanie opcji MODE dla rozmycia z trybami: AUTO, IIR, FIR |