1 files changed, 142 insertions, 0 deletions
diff --git a/packages/noncvs/windows/extra/Gem/examples/10.glsl/02.primitive_distortion.pd b/packages/noncvs/windows/extra/Gem/examples/10.glsl/02.primitive_distortion.pd
new file mode 100644
index 00000000..8d2e976f
--- /dev/null
+++ b/packages/noncvs/windows/extra/Gem/examples/10.glsl/02.primitive_distortion.pd
@@ -0,0 +1,142 @@
+#N canvas 464 25 520 667 10;
+#X obj 74 -1 gemhead;
+#X msg 29 80 print;
+#X obj 74 372 glsl_program;
+#X obj 147 281 pack 0 0;
+#X msg 31 162 print;
+#X obj 168 261 t b f;
+#X obj 168 216 change;
+#X obj 146 121 change;
+#X msg 147 301 link \$1 \$2;
+#X msg 98 343 print;
+#X floatatom 168 242 2 0 0 0 ID - -;
+#X floatatom 146 144 2 0 0 0 ID - -;
+#X obj 165 322 print linking;
+#X obj 74 196 glsl_fragment;
+#X obj 74 102 glsl_vertex;
+#X obj 74 561 pix_texture;
+#X obj 124 59 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 74 24 alpha;
+#X obj 101 507 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
+1;
+#X floatatom 292 312 5 0 0 0 - - -;
+#X msg 101 485 0;
+#X msg 292 333 K \$1;
+#X obj 74 604 sphere 2 30;
+#N canvas 0 0 450 300 load_shader 0;
+#X obj 89 99 t b b;
+#X msg 119 126 0;
+#X obj 89 154 outlet;
+#X obj 89 71 gemhead 1;
+#X connect 0 0 2 0;
+#X connect 0 1 1 0;
+#X connect 1 0 3 0;
+#X connect 3 0 0 0;
+#X restore 124 38 pd load_shader;
+#N canvas 0 0 450 300 init_shader 0;
+#X obj 89 154 outlet;
+#X obj 89 45 inlet;
+#X obj 89 73 change;
+#X obj 89 100 t b;
+#X connect 1 0 2 0;
+#X connect 2 0 3 0;
+#X connect 3 0 0 0;
+#X restore 153 396 pd init_shader;
+#X obj 101 464 loadbang;
+#X text 347 311 <- 2;
+#X text 395 670 ch 20007;
+#X msg 103 415 open texture.jpg;
+#X obj 74 581 rotateXYZ -90 0 0;
+#X msg 292 287 0.1;
+#X obj 74 438 pix_image img3.jpg;
+#X msg 88 80 open P_distord.vert;
+#X msg 85 166 open P_distord.frag;
+#X text 69 637 this shader create a dirty pseudo random value \, and
+move all vertices separatly;
+#N canvas 87 154 247 179 Gem.init 0;
+#X obj 118 46 loadbang;
+#X msg 118 81 reset;
+#X obj 118 113 outlet;
+#X connect 0 0 1 0;
+#X connect 1 0 2 0;
+#X restore 389 41 pd Gem.init;
+#N canvas 340 107 682 322 gemwin 0;
+#X obj 102 122 tgl 15 0 \$0-gemstart \$0-gemstart empty 17 7 0 10 -262144
+-1 -1 1 1;
+#X obj 102 161 r \$0-gemstart;
+#X obj 102 182 select 1 0;
+#X msg 102 214 create \, 1;
+#X msg 177 215 destroy;
+#X obj 102 239 t a;
+#X obj 318 54 inlet;
+#X obj 318 255 gemwin;
+#X obj 318 100 t a a;
+#X obj 318 287 outlet;
+#X obj 350 128 route create destroy;
+#X obj 350 150 t b;
+#X msg 350 172 1;
+#X obj 390 150 t b;
+#X msg 390 172 0;
+#X obj 350 195 t f;
+#X msg 350 219 set \$1;
+#X text 118 122 rendering;
+#X connect 1 0 2 0;
+#X connect 2 0 3 0;
+#X connect 2 1 4 0;
+#X connect 3 0 5 0;
+#X connect 4 0 5 0;
+#X connect 5 0 8 0;
+#X connect 6 0 8 0;
+#X connect 7 0 9 0;
+#X connect 8 0 7 0;
+#X connect 8 1 10 0;
+#X connect 10 0 11 0;
+#X connect 10 1 13 0;
+#X connect 11 0 12 0;
+#X connect 12 0 15 0;
+#X connect 13 0 14 0;
+#X connect 14 0 15 0;
+#X connect 15 0 16 0;
+#X connect 16 0 0 0;
+#X coords 0 -1 1 1 85 40 1 100 100;
+#X restore 359 58 pd gemwin;
+#X msg 101 527 rectangle \$1;
+#X connect 0 0 17 0;
+#X connect 1 0 14 0;
+#X connect 2 0 31 0;
+#X connect 2 1 24 0;
+#X connect 3 0 8 0;
+#X connect 4 0 13 0;
+#X connect 5 0 3 0;
+#X connect 5 1 3 1;
+#X connect 6 0 10 0;
+#X connect 7 0 11 0;
+#X connect 8 0 2 0;
+#X connect 8 0 12 0;
+#X connect 9 0 2 0;
+#X connect 10 0 5 0;
+#X connect 11 0 3 0;
+#X connect 13 0 2 0;
+#X connect 13 1 6 0;
+#X connect 14 0 13 0;
+#X connect 14 1 7 0;
+#X connect 15 0 29 0;
+#X connect 16 0 32 0;
+#X connect 16 0 33 0;
+#X connect 17 0 14 0;
+#X connect 18 0 37 0;
+#X connect 19 0 21 0;
+#X connect 20 0 18 0;
+#X connect 21 0 2 0;
+#X connect 23 0 16 0;
+#X connect 24 0 30 0;
+#X connect 25 0 20 0;
+#X connect 28 0 31 0;
+#X connect 29 0 22 0;
+#X connect 30 0 19 0;
+#X connect 31 0 15 0;
+#X connect 32 0 14 0;
+#X connect 33 0 13 0;
+#X connect 35 0 36 0;
+#X connect 37 0 15 0;