summaryrefslogtreecommitdiff
path: root/2.10
diff options
context:
space:
mode:
Diffstat (limited to '2.10')
-rw-r--r--2.10/przem-traditional-photo.scm40
1 files changed, 40 insertions, 0 deletions
diff --git a/2.10/przem-traditional-photo.scm b/2.10/przem-traditional-photo.scm
new file mode 100644
index 0000000..f89051f
--- /dev/null
+++ b/2.10/przem-traditional-photo.scm
@@ -0,0 +1,40 @@
+; przem-traditional-photo - luźne nawiązanie do chemii tradycyjnej fototgrafii
+; author: PRP
+; licencja: Public Domain
+; Gdańsk - 15-02-2025
+; ver. 0.250215-0
+
+(define (cross drawable)
+ ; crossing photo
+ (gimp-curves-spline drawable HISTOGRAM-VALUE 10 #(0 0 64 90 128 160 192 230 255 255))
+ (gimp-curves-spline drawable HISTOGRAM-RED 10 #(0 0 64 50 128 180 192 230 255 255))
+ (gimp-curves-spline drawable HISTOGRAM-GREEN 10 #(0 0 64 80 128 120 192 200 255 255))
+ (gimp-curves-spline drawable HISTOGRAM-BLUE 10 #(0 0 64 30 128 150 192 220 255 255))
+)
+
+(define (przem-traditional-photo image drawable)
+
+ (gimp-image-undo-group-start image)
+
+ (cross drawable)
+ ;(define value #(0 0 64 90 128 160 192 230 255 255))
+ ;(gimp-drawable-curves-spline drawable HISTOGRAM-VALUE 10 value)
+
+
+ (gimp-image-undo-group-end image)
+ (gimp-displays-flush)
+)
+
+(script-fu-register "przem-traditional-photo"
+ _"Convert photo to neo traditional photo"
+ _"KOnwertuje na neotradycyjną fotografię"
+ "Przemyslaw R. Pietraszczyk"
+ "Public Domain"
+ "2025-02-15"
+ "RGB*"
+ SF-IMAGE "Image" 0
+ SF-DRAWABLE "Drawable" 0
+)
+
+(script-fu-menu-register "przem-traditional-photo"
+ "<Image>/Filters/PIETRASZCZYK/")