1 files changed, 81 insertions, 0 deletions
diff --git a/externals/gridflow/pd_examples/saturation.pd b/externals/gridflow/pd_examples/saturation.pd
new file mode 100644
index 00000000..d6cbda6c
--- /dev/null
+++ b/externals/gridflow/pd_examples/saturation.pd
@@ -0,0 +1,81 @@
+#N canvas 904 61 449 319 10;
+#X obj 11 117 print;
+#X obj 11 77 #out window;
+#X text 342 55 OR;
+#X text 238 30 global saturation;
+#N canvas 0 0 441 339 #saturation 0;
+#X obj 63 88 # inv+ 255;
+#X obj 14 219 # +;
+#X obj 37 47 #rgb_to_greyscale;
+#X obj 14 239 # >> 8;
+#X obj 162 146 loadbang;
+#X obj 14 158 #finished;
+#X text 68 266 keep values inside visible range;
+#X obj 14 199 # *;
+#X obj 14 178 #store;
+#X obj 37 88 # *;
+#X msg 133 146 0;
+#X obj 8 9 inlet image;
+#X obj 14 293 outlet image;
+#X obj 107 126 inlet saturation;
+#X text 230 130 0 = grey \; 256 = identity;
+#X text 40 222 mix the original picture with its greyed version;
+#X obj 37 107 t a a;
+#X obj 8 28 t a a;
+#X obj 37 67 #greyscale_to_rgb;
+#X obj 107 146 t a;
+#X obj 14 265 #clip;
+#X connect 0 0 9 1;
+#X connect 1 0 3 0;
+#X connect 2 0 18 0;
+#X connect 3 0 20 0;
+#X connect 4 0 10 0;
+#X connect 5 0 8 0;
+#X connect 7 0 1 0;
+#X connect 8 0 7 0;
+#X connect 9 0 16 0;
+#X connect 10 0 19 0;
+#X connect 11 0 17 0;
+#X connect 13 0 19 0;
+#X connect 16 0 5 0;
+#X connect 16 1 1 1;
+#X connect 17 0 8 1;
+#X connect 17 1 2 0;
+#X connect 18 0 9 0;
+#X connect 19 0 7 1;
+#X connect 19 0 0 0;
+#X connect 20 0 12 0;
+#X restore 11 53 pd #saturation;
+#X obj 11 98 fps detailed;
+#X text 203 68 per-channel saturation;
+#X msg 194 25 0;
+#X obj 194 4 loadbang;
+#X obj 197 46 hsl 137 15 -256 512 0 0 empty empty empty -2 -6 0 8 -260818
+-128992 -1 4533 1;
+#X floatatom 155 47 5 0 0 0 - - -;
+#X obj 11 -26 tgl 15 0 empty empty empty 0 -6 0 8 -24198 -1 -1 0 1
+;
+#X obj 11 3 metro 33.3667;
+#X obj 11 30 #in teapot.png;
+#X obj 147 95 #color -256 512 1;
+#X msg 147 69 3 # \$1;
+#X obj -16 -85 cnv 15 450 30 empty empty empty 20 12 0 14 -233017 -66577
+0;
+#X text -3 -72 Copyright 2002 Mathieu Bouchard;
+#X obj -15 203 cnv 15 450 30 empty empty empty 20 12 0 14 -200249 -66577
+0;
+#X text -7 210 GridFlow 0.8.0;
+#X text -7 210 GridFlow 0.8.0;
+#X text -3 -85 saturation.pd;
+#X connect 1 0 5 0;
+#X connect 4 0 1 0;
+#X connect 5 0 0 0;
+#X connect 7 0 9 0;
+#X connect 8 0 7 0;
+#X connect 9 0 10 0;
+#X connect 9 0 15 0;
+#X connect 11 0 12 0;
+#X connect 12 0 13 0;
+#X connect 13 0 4 0;
+#X connect 14 0 4 1;
+#X connect 15 0 14 0;