1 files changed, 158 insertions, 0 deletions
diff --git a/Gem/examples/99.games/puzzle.pd b/Gem/examples/99.games/puzzle.pd
new file mode 100644
index 0000000..d02322c
--- /dev/null
+++ b/Gem/examples/99.games/puzzle.pd
@@ -0,0 +1,158 @@
+#N canvas 14 64 584 223 12;
+#X obj 171 14 cnv 15 200 130 empty empty empty 20 12 0 14 -233017 -66577
+0;
+#X obj 258 30 bng 30 250 50 0 up y up 8 -8 192 12 -261681 -1 -1;
+#X obj 258 90 bng 30 250 50 0 down y down -5 38 192 12 -261681 -1 -1
+;
+#X obj 288 60 bng 30 250 50 0 right y right 33 15 192 12 -261681 -1
+-1;
+#X obj 228 60 bng 30 250 50 0 left y left -53 15 192 12 -261681 -1
+-1;
+#N canvas 133 127 818 527 code 0;
+#X obj 128 45 gemkeyname;
+#X obj 128 77 select 1;
+#X obj 128 104 symbol;
+#X msg 128 131 \$1 0;
+#X obj 411 229 r reset;
+#X obj 411 255 t b b;
+#X msg 505 229 bang;
+#X obj 418 194 gemwin;
+#X msg 415 132 create;
+#X msg 422 157 destroy;
+#X obj 501 147 tgl 30 0 empty empty empty 20 8 0 8 -262144 -1 -1 1
+1;
+#X obj 342 79 del 100;
+#X msg 342 130 1;
+#X obj 342 17 r start;
+#X msg 509 113 reset;
+#X obj 584 204 gemmouse;
+#X obj 617 239 s help;
+#X obj 342 45 t b b b;
+#X obj 342 103 t b b b;
+#N canvas 81 93 600 400 original 0;
+#X obj 86 109 gemhead;
+#X obj 86 345 square 4;
+#X obj 86 30 r help;
+#X obj 86 73 != 0;
+#X obj 173 45 loadbang;
+#X msg 173 68 0;
+#X obj 86 143 pix_image ../data/fractal.JPG;
+#X obj 86 272 pix_texture;
+#X connect 0 0 6 0;
+#X connect 2 0 3 0;
+#X connect 3 0 0 0;
+#X connect 4 0 5 0;
+#X connect 5 0 3 0;
+#X connect 6 0 7 0;
+#X connect 7 0 1 0;
+#X restore 445 390 pd original image;
+#N canvas 4 20 450 300 control 0;
+#X obj 149 48 route Left Right Up Down;
+#X msg 191 206 move \$1;
+#X msg 191 138 5;
+#X msg 149 138 4;
+#X msg 231 138 6;
+#X msg 192 111 8;
+#X msg 193 165 2;
+#X obj 48 98 r up;
+#X obj 47 167 r down;
+#X obj 0 129 r left;
+#X obj 71 131 r right;
+#X obj 194 256 outlet;
+#X obj 146 18 inlet;
+#X obj 295 109 inlet;
+#X connect 0 0 3 0;
+#X connect 0 1 4 0;
+#X connect 0 2 5 0;
+#X connect 0 3 6 0;
+#X connect 1 0 11 0;
+#X connect 2 0 1 0;
+#X connect 3 0 1 0;
+#X connect 4 0 1 0;
+#X connect 5 0 1 0;
+#X connect 6 0 1 0;
+#X connect 7 0 5 0;
+#X connect 8 0 6 0;
+#X connect 9 0 3 0;
+#X connect 10 0 4 0;
+#X connect 12 0 0 0;
+#X connect 13 0 2 0;
+#X restore 128 276 pd control;
+#N canvas 113 141 600 498 puzzled 0;
+#X obj 120 110 gemhead;
+#X obj 120 415 square 4;
+#X floatatom 179 389 5 0 0 0 - - -;
+#X obj 120 309 pix_puzzle 4 4;
+#X msg 221 203 size 4 4;
+#X obj 120 213 pix_image;
+#X msg 153 175 open ../data/fractal.JPG;
+#X obj 204 97 loadbang;
+#X obj 204 125 t b b;
+#X obj 221 48 t b a;
+#X obj 341 56 t b b;
+#X obj 117 40 r help;
+#X obj 120 79 == 0;
+#X obj 37 27 loadbang;
+#X msg 38 52 0;
+#X obj 120 342 pix_texture;
+#X obj 343 27 inlet scramble!;
+#X obj 222 18 inlet move!;
+#X connect 0 0 5 0;
+#X connect 2 0 1 1;
+#X connect 3 0 15 0;
+#X connect 4 0 3 0;
+#X connect 5 0 3 0;
+#X connect 6 0 5 0;
+#X connect 7 0 8 0;
+#X connect 8 0 4 0;
+#X connect 8 1 6 0;
+#X connect 9 0 6 0;
+#X connect 9 1 3 0;
+#X connect 10 0 6 0;
+#X connect 10 1 3 0;
+#X connect 11 0 12 0;
+#X connect 12 0 0 0;
+#X connect 13 0 14 0;
+#X connect 14 0 12 0;
+#X connect 15 0 1 0;
+#X connect 16 0 10 0;
+#X connect 17 0 9 0;
+#X restore 128 390 pd puzzled image;
+#X obj 213 249 loadbang;
+#X text 116 439 we use [pix_puzzle] to scramble the image. this is
+not very effective (as we could use openGL-texture coordinates too).
+anyhow it is just simple;
+#X connect 0 0 1 0;
+#X connect 0 1 2 1;
+#X connect 1 0 2 0;
+#X connect 2 0 3 0;
+#X connect 3 0 20 0;
+#X connect 4 0 5 0;
+#X connect 5 0 20 1;
+#X connect 5 1 21 1;
+#X connect 6 0 5 0;
+#X connect 8 0 7 0;
+#X connect 9 0 7 0;
+#X connect 10 0 7 0;
+#X connect 11 0 18 0;
+#X connect 12 0 7 0;
+#X connect 13 0 17 0;
+#X connect 14 0 7 0;
+#X connect 15 2 16 0;
+#X connect 17 0 11 0;
+#X connect 17 1 14 0;
+#X connect 17 2 9 0;
+#X connect 18 0 12 0;
+#X connect 18 1 8 0;
+#X connect 18 2 6 0;
+#X connect 20 0 21 0;
+#X connect 22 0 20 1;
+#X restore 420 99 pd code;
+#X obj 435 39 bng 50 250 50 0 reset empty RESET 0 -8 128 12 -258699
+-1 -1;
+#X obj 50 38 bng 50 250 50 0 start empty start 0 -8 128 12 -24198 -1
+-1;
+#X obj 257 60 tgl 30 0 help help ? 7 15 192 24 -262144 -258699 -1 0
+1;
+#X text 61 168 on linux you can use the arrow-keys too...;
+#X text 46 187 first mouse-button toggles between help/game;