From eabf5ebdf95c0f7c664610fc59e1c44542616f96 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Przemys=C5=82aw?= Date: Tue, 5 May 2026 19:45:23 +0200 Subject: 2.260505-0 --- .../3.0/przem-hitchcock-d400-film-effect-v3.scm | 35 ++++-- .../3.2/przem-add-background-under-text-v32.scm | 8 +- script-fu/3.2/przem-apply-sepia-v32.scm | 8 +- .../3.2/przem-cyanotype-color-effect-multi-v32.scm | 8 +- script-fu/3.2/przem-ilford-expired-v32.scm | 8 +- script-fu/3.2/przem-kodachrome-v32.scm | 8 +- script-fu/3.2/przem-lith-effect-v32.scm | 118 +++++++++++++++++++++ script-fu/3.2/przem-oldschool-photography-v32.scm | 8 +- script-fu/3.2/przem-prussian-blue-effect-v32.scm | 8 +- .../3.2/przem-soft-focus-noninteractive-v32.scm | 4 +- script-fu/3.2/przem-sunset-effect-v32.scm | 8 +- script-fu/3.2/przem-surreal-v32.scm | 98 +++++++++++++++++ script-fu/3.2/przem-teal-portrait-look-v32.scm | 8 +- script-fu/3.2/przem-traditional-photo-v32.scm | 8 +- script-fu/3.2/przem-true-cyjanotype-v32.scm | 8 +- script-fu/3.2/przem-wet-collodion-v32.scm | 8 +- script-fu/changelog.md | 4 + 17 files changed, 294 insertions(+), 61 deletions(-) create mode 100644 script-fu/3.2/przem-lith-effect-v32.scm create mode 100644 script-fu/3.2/przem-surreal-v32.scm diff --git a/script-fu/3.0/przem-hitchcock-d400-film-effect-v3.scm b/script-fu/3.0/przem-hitchcock-d400-film-effect-v3.scm index 9d4bfe3..aac6d35 100644 --- a/script-fu/3.0/przem-hitchcock-d400-film-effect-v3.scm +++ b/script-fu/3.0/przem-hitchcock-d400-film-effect-v3.scm @@ -98,6 +98,7 @@ (define (przem-hitchcock-d400-film-effect-v3 image drawable) (let* ( + (layer (vector-ref drawable 0)) (film-grain-layer (vector-ref drawable 0)) (width (car (gimp-image-get-width image))) (height (car (gimp-image-get-height image))) @@ -146,15 +147,31 @@ ;; --------------------------------------------------------- ;; 3. WARSTWA KORYGUJĄCA KOLORY (Color Grading D400) ;; --------------------------------------------------------- - ; (set! color-grade-layer (car (gimp-layer-new image width height RGBA-IMAGE "Color Grade D400" 100 NORMAL-MODE))) - ; (gimp-image-insert-layer image color-grade-layer 0 -1) - ; (gimp-drawable-fill color-grade-layer TRANSPARENT-FILL) - + (set! color-grade-layer (car (gimp-layer-new image "Color Grade D400" width height RGBA-IMAGE 100 LAYER-MODE-NORMAL))) + (gimp-image-insert-layer image color-grade-layer 0 2) + (gimp-drawable-edit-clear color-grade-layer) + + ;(gimp-drawable-fill color-grade-layer FILL-FOREGROUND) + (gimp-drawable-fill color-grade-layer FILL-BACKGROUND) + ;; Cienie – lekko zielonkawe (charakterystyczne dla D400) - ; (gimp-context-set-foreground '(40 70 50)) - ; (gimp-edit-fill color-grade-layer FOREGROUND-FILL) + (gimp-context-set-foreground '(40 70 50)) + + (gimp-edit-copy (vector layer)) + + (let* ( + (pasted (car (gimp-edit-paste color-grade-layer FALSE))) + (num-pasted (vector-length pasted)) + (floating-sel (vector-ref pasted (- num-pasted 1))) + ) + (gimp-floating-sel-anchor floating-sel) + ) + (gimp-image-set-selected-layers image (vector color-grade-layer)) + (set! color-grade-layer layer) + ; (gimp-layer-set-mode color-grade-layer COLOR-MODE) - ; (gimp-layer-set-opacity color-grade-layer 35) + (gimp-layer-set-mode color-grade-layer LAYER-MODE-MULTIPLY) + (gimp-layer-set-opacity color-grade-layer 35) ;; Światła – ciepłe, kremowe ; (let* ((warm-lights (car (gimp-layer-new image width height RGBA-IMAGE "Warm Lights" 100 NORMAL-MODE)))) @@ -216,10 +233,6 @@ ) ) -;; ============================================================= -;; REJESTRACJA SKRYPTU W MENU GIMP -;; ============================================================= - (script-fu-register-filter "przem-hitchcock-d400-film-effect-v3" "_Hitchcock D400 Film Effect..." "Konwertuje kolorowe zdjęcie na efekt analogowej kliszy HITCHCOCK D400.\n\ diff --git a/script-fu/3.2/przem-add-background-under-text-v32.scm b/script-fu/3.2/przem-add-background-under-text-v32.scm index 7ea23da..7e557c6 100644 --- a/script-fu/3.2/przem-add-background-under-text-v32.scm +++ b/script-fu/3.2/przem-add-background-under-text-v32.scm @@ -1,10 +1,10 @@ -; przem-add-background-under-text-v3 - Script-fu dodający podpis z tłem +; przem-add-background-under-text-v32 - Script-fu dodający podpis z tłem ; author: PRP ; licencja: Public Domain ; Gdańsk - 06-02-2025 ; ver. 2.260116-1~beta for Gimp 3.0 -(define (przem-add-background-under-text-v3 image drawable text font font-size fg-color bg-color background-transparency opacity) +(define (przem-add-background-under-text-v32 image drawable text font font-size fg-color bg-color background-transparency opacity) (let* ( (type-layer (vector-ref drawable 0)) @@ -71,7 +71,7 @@ ) ) -(script-fu-register-filter "przem-add-background-under-text-v3" +(script-fu-register-filter "przem-add-background-under-text-v32" _"Add Background Under Text" _"Dodaje kolorowe tło pod tekstem z możliwością wyboru czcionki i rozmiaru." "Przemysław R. Pietraszczyk" @@ -88,5 +88,5 @@ SF-ADJUSTMENT "Transparency Value" (list 100 1 100 1 10 0 1) ) -(script-fu-menu-register "przem-add-background-under-text-v3" +(script-fu-menu-register "przem-add-background-under-text-v32" "/Filters/PIETRASZCZYK/") diff --git a/script-fu/3.2/przem-apply-sepia-v32.scm b/script-fu/3.2/przem-apply-sepia-v32.scm index 9ba52b4..f82ac3b 100644 --- a/script-fu/3.2/przem-apply-sepia-v32.scm +++ b/script-fu/3.2/przem-apply-sepia-v32.scm @@ -1,4 +1,4 @@ -; przem-apply-sepia-v3 - Script-fu dodający prawdziwą sepie do zdjęcia +; przem-apply-sepia-v32 - Script-fu dodający prawdziwą sepie do zdjęcia ; author: PRP ; licencja: GPL v3 ; Gdańsk - 07-02-2025 @@ -18,7 +18,7 @@ ; along with this program. If not, see . ; -(define (przem-apply-sepia-v3 image drawable value-slider-sepia shadow-sepia gradient-reverse in-sepia gradient-shape) +(define (przem-apply-sepia-v32 image drawable value-slider-sepia shadow-sepia gradient-reverse in-sepia gradient-shape) (let* ( (image-width (car (gimp-image-get-width image))) (image-height (car (gimp-image-get-height image))) @@ -126,7 +126,7 @@ ) ) -(script-fu-register-filter "przem-apply-sepia-v3" +(script-fu-register-filter "przem-apply-sepia-v32" _"_Apply a sepia effect to the image" _"Tworzy obraz sepii" "Przemyslaw R. Pietraszczyk" @@ -144,5 +144,5 @@ ) -(script-fu-menu-register "przem-apply-sepia-v3" +(script-fu-menu-register "przem-apply-sepia-v32" "/Filters/PIETRASZCZYK/") diff --git a/script-fu/3.2/przem-cyanotype-color-effect-multi-v32.scm b/script-fu/3.2/przem-cyanotype-color-effect-multi-v32.scm index 199bdfc..8b8d079 100644 --- a/script-fu/3.2/przem-cyanotype-color-effect-multi-v32.scm +++ b/script-fu/3.2/przem-cyanotype-color-effect-multi-v32.scm @@ -1,10 +1,10 @@ -; przem-cyanotype-color-effect-multi-v3 - Efekty cyjanotypi na kolor +; przem-cyanotype-color-effect-multi-v32 - 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) +(define (przem-cyanotype-color-effect-multi-v32 img drawable black blue) (gimp-context-push) (gimp-image-undo-group-start img) @@ -42,7 +42,7 @@ (gimp-context-pop)) -(script-fu-register-filter "przem-cyanotype-color-effect-multi-v3" +(script-fu-register-filter "przem-cyanotype-color-effect-multi-v32" _"Add Cyanotype Color Multi..." _"Efekty cyjanotypii na kolor" "PRP" @@ -53,6 +53,6 @@ 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" +(script-fu-menu-register "przem-cyanotype-color-effect-multi-v32" "/Filters/PIETRASZCZYK/") diff --git a/script-fu/3.2/przem-ilford-expired-v32.scm b/script-fu/3.2/przem-ilford-expired-v32.scm index f89ebdd..de8fc89 100644 --- a/script-fu/3.2/przem-ilford-expired-v32.scm +++ b/script-fu/3.2/przem-ilford-expired-v32.scm @@ -1,4 +1,4 @@ -; przem-ilford-expired-v3 - Fotografia imitująca przeterminowany film Ilforda +; przem-ilford-expired-v32 - Fotografia imitująca przeterminowany film Ilforda ; 2025-10-05 - Przemysław R. Pietraszczyk ; licence: Public Domain ; ver. 2.251006-0 @@ -63,7 +63,7 @@ -(define (przem-ilford-expired-v3 image drawable temperature strength apply brightness contrast saturation lightness hc cc) +(define (przem-ilford-expired-v32 image drawable temperature strength apply brightness contrast saturation lightness hc cc) ; use v3 binding of return args from PDB ;(script-fu-use-v3) @@ -119,7 +119,7 @@ ) ) -(script-fu-register-filter "przem-ilford-expired-v3" +(script-fu-register-filter "przem-ilford-expired-v32" _"Ilford film expired" _"Fotografia imitująca przeterminowany film Ilforda" "Przemysław R. Pietraszczyk" @@ -139,6 +139,6 @@ ) -(script-fu-menu-register "przem-ilford-expired-v3" +(script-fu-menu-register "przem-ilford-expired-v32" "/Filters/PIETRASZCZYK/") diff --git a/script-fu/3.2/przem-kodachrome-v32.scm b/script-fu/3.2/przem-kodachrome-v32.scm index 534d482..526e96c 100644 --- a/script-fu/3.2/przem-kodachrome-v32.scm +++ b/script-fu/3.2/przem-kodachrome-v32.scm @@ -1,4 +1,4 @@ -; przem-kodachrome-v3 - Fotografia z okresu 20-sto lecia między wojennego +; przem-kodachrome-v32 - Fotografia z okresu 20-sto lecia między wojennego ; 2025-09-25 - Przemysław R. Pietraszczyk ; licence: Public Domain ; ver. 2.250929-0 @@ -93,7 +93,7 @@ ;(define (przem-oldschool-photogrphy-v3 image drawable temperature strength tint-use ; brightness contrast highlights shadows whites blacks saturation lightness hc cc) -(define (przem-kodachrome-v3 image drawable highlights shadows saturation lightness hc cc) +(define (przem-kodachrome-v32 image drawable highlights shadows saturation lightness hc cc) ; use v3 binding of return args from PDB ;(script-fu-use-v3) @@ -139,7 +139,7 @@ ) ) -(script-fu-register-filter "przem-kodachrome-v3" +(script-fu-register-filter "przem-kodachrome-v32" _"Kodachrome" _"Imitacja Kodachrome" "PRP" @@ -155,5 +155,5 @@ SF-COLOR _"Chrome balance" "black" ) -(script-fu-menu-register "przem-kodachrome-v3" +(script-fu-menu-register "przem-kodachrome-v32" "/Filters/PIETRASZCZYK/") diff --git a/script-fu/3.2/przem-lith-effect-v32.scm b/script-fu/3.2/przem-lith-effect-v32.scm new file mode 100644 index 0000000..0de2220 --- /dev/null +++ b/script-fu/3.2/przem-lith-effect-v32.scm @@ -0,0 +1,118 @@ +; przem-lith-effect-v32 - imitacja odbitki litowej +; author: PRP +; licencja: Public Domain +; Gdańsk - 25-12-2025 +; ver. 2.260505-0~prealpha + +(define (przem-lith-effect-v32 img drawable shades) + (let* ( + (source-layer (vector-ref (car (gimp-image-get-layers img)) 0 )) + (type-layer (vector-ref drawable 0)) + (type (car (gimp-drawable-type type-layer))) + ) + (gimp-context-push) + (gimp-image-undo-group-start img) + + + + ; Konwersja obrazu do skali szarości + (if (= type RGB-IMAGE) + (gimp-drawable-desaturate type-layer DESATURATE-LIGHTNESS) + ) + ;; jeśli obraz jest szary to konwertuje go na RGB - tak na sztukę + (if (> (car (gimp-drawable-type type-layer)) 1) + (gimp-image-convert-rgb img)) + + ;; 1. Mocny kontrast (levels) + (gimp-drawable-merge-new-filter + type-layer + "gegl:levels" + 0 + LAYER-MODE-REPLACE + 0.5 + "in-low" 0.15 + "in-high" 0.85 + ) + + (let* ( + (lit 0) + (hot-lith (list 150 75 0)) + (light-lithium-brown (list 217 169 121)) + (warm-honey-brown (list 200 146 90)) + (golden-clay (list 185 125 74)) + (amber-brown (list 168 106 58)) + + (if (= shades 0) + (begin + (set! lit hot-lith) + )) + (if (= shades 1) + (begin + (set! lit light-lithium-brown) + )) + (if (= shades 2) + (begin + (set! lit warm-honey-brown) + )) + (if (= shades 3) + (begin + (set! lit golden-clay) + )) + (if (= shades 4) + (begin + (set! lit amber-brown) + )) + + ;; 2. Miękkie światła (soft-kight) + (gimp-drawable-merge-new-filter + type-layer + "gegl:soft-light" + 0 + LAYER-MODE-REPLACE + 0.5 + ) + ;; 3. Tonowanie (ciepły lith) + (gimp-drawable-merge-new-filter + type-layer + "gegl:color" + "color-filter" + LAYER-MODE-REPLACE + 0.5 + "value" lit + ) + ) + ) + ;; 4. Ziarno (noise-rgb) + (gimp-drawable-merge-new-filter + type-layer + "gegl:noise-rgb" + 0 + LAYER-MODE-NORMAL + 0.5 + "red" 0.2 + "green" 0.2 + "blue" 0.2 + "alpha" 0.0 + "independent" TRUE + ) + + (gimp-image-undo-group-end img) + (gimp-displays-flush) + (gimp-context-pop) + ) +) + +(script-fu-register-filter "przem-lith-effect-v32" + "_Lith effect" + "_Odbitka Litowa" + "P.R.P" + "Public Domain" + "25-12-2025" + "RGB* GRAY*" + SF-ONE-OR-MORE-DRAWABLE + SF-OPTION _"Shades of lithium" '("Hot Lith" "Light Lithium Brown" "Warm Honey Brown" "Golden Clay" "Amber Brown") + +) + +(script-fu-menu-register "przem-lith-effect-v32" + "/Filters/PIETRASZCZYK/") diff --git a/script-fu/3.2/przem-oldschool-photography-v32.scm b/script-fu/3.2/przem-oldschool-photography-v32.scm index 36c3459..3277166 100644 --- a/script-fu/3.2/przem-oldschool-photography-v32.scm +++ b/script-fu/3.2/przem-oldschool-photography-v32.scm @@ -1,4 +1,4 @@ -; przem-oldschool-photography-v3 - Fotografia z okresu 20-sto lecia między wojennego +; przem-oldschool-photography-v32 - Fotografia z okresu 20-sto lecia między wojennego ; 2025-10-01 - Przemysław R. Pietraszczyk ; licence: Public Domain ; ver. 2.251001-0 @@ -14,7 +14,7 @@ ) -(define (przem-oldschool-photography-v3 image drawable temperature strength apply brightness contrast) +(define (przem-oldschool-photography-v32 image drawable temperature strength apply brightness contrast) ; use v3 binding of return args from PDB ;(script-fu-use-v3) @@ -55,7 +55,7 @@ ) ) -(script-fu-register-filter "przem-oldschool-photography-v3" +(script-fu-register-filter "przem-oldschool-photography-v32" _"Oldschool Photography" _"Nawiązanie do fotografii 20-sto lecia międzywojennego" "PRP" @@ -71,5 +71,5 @@ ) -(script-fu-menu-register "przem-oldschool-photography-v3" +(script-fu-menu-register "przem-oldschool-photography-v32" "/Filters/PIETRASZCZYK/") diff --git a/script-fu/3.2/przem-prussian-blue-effect-v32.scm b/script-fu/3.2/przem-prussian-blue-effect-v32.scm index c439013..5a26f3c 100644 --- a/script-fu/3.2/przem-prussian-blue-effect-v32.scm +++ b/script-fu/3.2/przem-prussian-blue-effect-v32.scm @@ -1,10 +1,10 @@ -; przem-prussian-blue-effect-v3 - nieudalna próba nawiązania do efektu cyjanotypii +; przem-prussian-blue-effect-v32 - nieudalna próba nawiązania do efektu cyjanotypii ; author: PRP ; licencja: Public Domain ; Gdańsk - 22-6-2025 ; ver. 2.250712-0~beta -(define (przem-prussian-blue-effect-v3 img drawable mode black value-blue brightness contrast invert) +(define (przem-prussian-blue-effect-v32 img drawable mode black value-blue brightness contrast invert) ;(script-fu-use-v3) @@ -73,7 +73,7 @@ ) ) -(script-fu-register-filter "przem-prussian-blue-effect-v3" +(script-fu-register-filter "przem-prussian-blue-effect-v32" _"Apply prussian blue effect" _"Nakłada efekt błękitu pruskiego na zdjęcie." "PRP" @@ -89,5 +89,5 @@ SF-TOGGLE "Invert" FALSE ) -(script-fu-menu-register "przem-prussian-blue-effect-v3" +(script-fu-menu-register "przem-prussian-blue-effect-v32" "/Filters/PIETRASZCZYK/") diff --git a/script-fu/3.2/przem-soft-focus-noninteractive-v32.scm b/script-fu/3.2/przem-soft-focus-noninteractive-v32.scm index 98d5ed0..b6940e6 100644 --- a/script-fu/3.2/przem-soft-focus-noninteractive-v32.scm +++ b/script-fu/3.2/przem-soft-focus-noninteractive-v32.scm @@ -1,10 +1,10 @@ -; przem-soft-focus-noninteractive-v3.sh - Filtr dodający miękki focus +; przem-soft-focus-noninteractive-v32.sh - Filtr dodający miękki focus ; 2025-06-19 - PRP ; Public Domain ; ver. 2025-06-19 ;(define (przem-soft-focus-noninteractive-v3 basout savename) -(define (przem-soft-focus-noninteractive-v3 ask-fileglob) +(define (przem-soft-focus-noninteractive-v32 ask-fileglob) (let* ( (thefiles (cadr (file-glob ask-fileglob 0))) diff --git a/script-fu/3.2/przem-sunset-effect-v32.scm b/script-fu/3.2/przem-sunset-effect-v32.scm index 0dbc201..ba501ae 100644 --- a/script-fu/3.2/przem-sunset-effect-v32.scm +++ b/script-fu/3.2/przem-sunset-effect-v32.scm @@ -1,4 +1,4 @@ -; przem-sunset-effect-v3 - imituje efekt zachodzącego słońca +; przem-sunset-effect-v32 - imituje efekt zachodzącego słońca ; author: PRP ; licencja: Public Domain ; Gdańsk - 01-09-2025 @@ -25,7 +25,7 @@ (caddr col)) -(define (przem-sunset-effect-v3 img drawable) +(define (przem-sunset-effect-v32 img drawable) (gimp-image-undo-group-start img) ; Tworzenie warstw dla różnych efektów @@ -90,7 +90,7 @@ ) ) -(script-fu-register-filter "przem-sunset-effect-v3" +(script-fu-register-filter "przem-sunset-effect-v32" _"Sunset Effect" _"Imitacja kolorystyki zachodu słońca" "P.R.P." @@ -99,5 +99,5 @@ "*" SF-ONE-OR-MORE-DRAWABLE) -(script-fu-menu-register "przem-sunset-effect-v3" +(script-fu-menu-register "przem-sunset-effect-v32" "/Filters/PIETRASZCZYK/") diff --git a/script-fu/3.2/przem-surreal-v32.scm b/script-fu/3.2/przem-surreal-v32.scm new file mode 100644 index 0000000..c69355f --- /dev/null +++ b/script-fu/3.2/przem-surreal-v32.scm @@ -0,0 +1,98 @@ +; przem-surreal-v32 - imitacja surrealistycznych obrazów +; author: PRP +; licencja: Public Domain +; Gdańsk - 24-12-2025 +; ver. 2.260505-0~beta + +(define (przem-surreal-v32 img drawable shades) + (let* ( + (width (car (gimp-image-get-width img))) + (height (car (gimp-image-get-height img))) + (layer-copy 0) + (source-layer 0) + (green-layer 0) + (type-layer (vector-ref drawable 0)) + (type (car (gimp-drawable-type type-layer))) + (blue-glow (list 102 204 255)) + (blue-pastel (list 153 221 255)) + (blue 0) + ) + + (gimp-context-push) + (gimp-image-undo-group-start img) + + (if (> (car (gimp-drawable-type type-layer)) 1) + (gimp-image-convert-rgb img) + ) + (set! source-layer (vector-ref (car (gimp-image-get-layers img)) 0 )) + (set! layer-copy (car (gimp-layer-copy source-layer))) + + ; Dodajemy skopiowaną warstwę + (gimp-image-insert-layer img layer-copy -1) + + ;; jeśli obraz jest szary to konwertuje go na RGB - tak na sztukę + (if (> (car (gimp-drawable-type type-layer)) 1) + (gimp-image-convert-rgb img)) + + ; Konwersja obrazu do skali szarości + (if (= type RGB-IMAGE) + (gimp-drawable-desaturate type-layer DESATURATE-LIGHTNESS) + ) + + (if (= shades 0) + (begin + (set! blue blue-glow) + )) + (if (= shades 1) + (begin + (set! blue blue-pastel) + )) + + (let* ( + ; ; 3. Tonowanie (niebieska poświata) + (gimp-drawable-merge-new-filter + layer-copy + "gegl:color" + "color-filter" + LAYER-MODE-ADDITION + 0.1 + "value" blue + ) + ) + ) + ; Rozmycie dla efektu mgły + (gimp-drawable-merge-new-filter layer-copy "gegl:gaussian-blur" RUN-NONINTERACTIVE LAYER-MODE-REPLACE 1.0 "std-dev-x" 10.0 "std-dev-y" 10.0 "filter" "auto") + + ; Tryb mieszania: Overlay + (gimp-layer-set-mode layer-copy LAYER-MODE-ADDITION) + (gimp-layer-set-opacity layer-copy 70.0) + + ; Dodajemy zieloną warstwę + (set! green-layer (car (gimp-layer-new img "Green" width height RGB-IMAGE 100 LAYER-MODE-NORMAL))) + + (gimp-image-insert-layer img green-layer -1) + (gimp-context-set-foreground '(60 120 60)) ; ciemna zieleń + (gimp-drawable-edit-fill green-layer FILL-FOREGROUND) + (gimp-layer-set-mode green-layer LAYER-MODE-MULTIPLY) + (gimp-layer-set-opacity green-layer 25.0) + + (gimp-image-undo-group-end img) + (gimp-displays-flush) + (gimp-context-pop) + ) +) + +(script-fu-register-filter "przem-surreal-v32" + "_Surreal Toning with Green" + "_Nadaje obrazowi chłodne barwy z zielonymi akcentami i efektem mgły" + "P.R.P" + "Public Domain" + "24-12-2025" + "RGB* GRAY*" + SF-ONE-OR-MORE-DRAWABLE + SF-OPTION _"Shades of blue" '("Glow" "Pastel") + +) + +(script-fu-menu-register "przem-surreal-v32" + "/Filters/PIETRASZCZYK/") diff --git a/script-fu/3.2/przem-teal-portrait-look-v32.scm b/script-fu/3.2/przem-teal-portrait-look-v32.scm index 1e45612..9f582ce 100644 --- a/script-fu/3.2/przem-teal-portrait-look-v32.scm +++ b/script-fu/3.2/przem-teal-portrait-look-v32.scm @@ -1,4 +1,4 @@ -; przem-teal-portrait-look-v3 - Fotografia portretowa na sterydach +; przem-teal-portrait-look-v32 - Fotografia portretowa na sterydach ; 2026-04-06 - Przemysław R. Pietraszczyk ; licence: GPL v3 ; ver. 2.260409-0 @@ -100,7 +100,7 @@ (highlights (bval c3))) )) -(define (przem-teal-portrait-look-v3 img drawable mode noise) +(define (przem-teal-portrait-look-v32 img drawable mode noise) (let* ( (ref-layer (vector-ref drawable 0)) @@ -150,7 +150,7 @@ (gimp-context-pop) )) -(script-fu-register-filter "przem-teal-portrait-look-v3" +(script-fu-register-filter "przem-teal-portrait-look-v32" _"_Teal portrait look" _"Nadaje zdjęciu miękki portretowy look: lekko przygaszone kolory, podbity turkus, ocieplona skóra, umiarkowany kontrast." "Przemysław R. Pietraszczyk" @@ -162,5 +162,5 @@ SF-TOGGLE _"Sand Noise" FALSE ) -(script-fu-menu-register "przem-teal-portrait-look-v3" +(script-fu-menu-register "przem-teal-portrait-look-v32" "/Filters/PIETRASZCZYK/") diff --git a/script-fu/3.2/przem-traditional-photo-v32.scm b/script-fu/3.2/przem-traditional-photo-v32.scm index ee9b727..e544e50 100644 --- a/script-fu/3.2/przem-traditional-photo-v32.scm +++ b/script-fu/3.2/przem-traditional-photo-v32.scm @@ -1,11 +1,11 @@ -; przem-traditional-photo-v3 - luźne nawiązanie do chemii tradycyjnej fototgrafii +; przem-traditional-photo-v32 - luźne nawiązanie do chemii tradycyjnej fototgrafii ; author: PRP ; licencja: Public Domain ; Gdańsk - 15-02-2025 ; ver. 2.250217-0~beta for GIMP 3 -(define (przem-traditional-photo-v3 image drawable crossing contrast-colors balance-color) +(define (przem-traditional-photo-v32 image drawable crossing contrast-colors balance-color) (let ( ;(the-image (car (gimp-image-duplicate image)) image) (the-layer 0) @@ -51,7 +51,7 @@ )) ) -(script-fu-register-filter "przem-traditional-photo-v3" +(script-fu-register-filter "przem-traditional-photo-v32" _"_Convert photographs to neotraditional" _"Konwertuje na neotradycyjną fotografię" "Przemyslaw R. Pietraszczyk" @@ -65,5 +65,5 @@ SF-ADJUSTMENT _"Balance Color" (list -30 -100 100 1 1 0 0) ) -(script-fu-menu-register "przem-traditional-photo-v3" +(script-fu-menu-register "przem-traditional-photo-v32" "/Filters/PIETRASZCZYK/") diff --git a/script-fu/3.2/przem-true-cyjanotype-v32.scm b/script-fu/3.2/przem-true-cyjanotype-v32.scm index c67476f..6e83425 100644 --- a/script-fu/3.2/przem-true-cyjanotype-v32.scm +++ b/script-fu/3.2/przem-true-cyjanotype-v32.scm @@ -1,10 +1,10 @@ -; przem-true-cyjantype-v3 - imituje efekt prawdziwej cyjanotypii +; przem-true-cyjantype-v32 - imituje efekt prawdziwej cyjanotypii ; author: PRP ; licencja: Public Domain ; Gdańsk - 14-10-2025 ; ver. 2.251104-1 -(define (przem-true-cyjantype-v3 image drawable black normalize value-blue invert replace tone-curve) +(define (przem-true-cyjantype-v32 image drawable black normalize value-blue invert replace tone-curve) (let* ((gradient-layer 0) (type-layer (vector-ref drawable 0)) (mask (car (gimp-channel-new image "Engraving Mask" (car (gimp-image-get-width image)) (car (gimp-image-get-height image)) black '(0.4 0.4 0.2 0.0 0.0 0.0 0.0 0.0 0.0)))) @@ -78,7 +78,7 @@ ) ) -(script-fu-register-filter "przem-true-cyjantype-v3" +(script-fu-register-filter "przem-true-cyjantype-v32" _"Apply true cyjanotype effect" _"Pseudo-prawdziwa próba imitacji cyjanotypii" "Przemysław R. Pietraszczyk" @@ -95,5 +95,5 @@ ) -(script-fu-menu-register "przem-true-cyjantype-v3" +(script-fu-menu-register "przem-true-cyjantype-v32" "/Filters/PIETRASZCZYK/") diff --git a/script-fu/3.2/przem-wet-collodion-v32.scm b/script-fu/3.2/przem-wet-collodion-v32.scm index 1fa2ba3..4d1373d 100644 --- a/script-fu/3.2/przem-wet-collodion-v32.scm +++ b/script-fu/3.2/przem-wet-collodion-v32.scm @@ -1,4 +1,4 @@ -; przem-wet-collodion-v3 - imituje efekt mokrego kolodionu +; przem-wet-collodion-v32 - imituje efekt mokrego kolodionu ; author: PRP ; licencja: Public Domain ; Gdańsk - 24-08-2025 @@ -92,7 +92,7 @@ -(define (przem-wet-collodion-v3 image drawable mode intensity-h intensity-s intensity-v grain blur) +(define (przem-wet-collodion-v32 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))) @@ -131,7 +131,7 @@ ) ) -(script-fu-register-filter "przem-wet-collodion-v3" +(script-fu-register-filter "przem-wet-collodion-v32" _"Wet Collodion" _"Imituje efekt mokrego kolodionu" "PRP" @@ -147,5 +147,5 @@ SF-ADJUSTMENT "Blur" '(2 0 100 1 10 0 0) ) -(script-fu-menu-register "przem-wet-collodion-v3" +(script-fu-menu-register "przem-wet-collodion-v32" "/Filters/PIETRASZCZYK/") diff --git a/script-fu/changelog.md b/script-fu/changelog.md index 846f648..71376b4 100644 --- a/script-fu/changelog.md +++ b/script-fu/changelog.md @@ -1,3 +1,7 @@ +# [2.260505-0] przem-surreal-v32.scm && przem-lith-effect-v32.scm +* Uzdatnienie w pelni filtra 'surreal' +* filtr 'lith' przeksztalca obraz na odcienie szarości zamiast sepii + # [2.260424-1] przem-hitchcock-d400-film-effect.scm * Poprawka w nazwie filtra -- cgit v1.2.3