Feedback loops in Pure Data. Now with masking!

feedback_loops.pd

#N canvas 1295 426 450 300 10;
#N canvas 957 82 929 997 feedback 0;
#X obj 360 250 cnv 15 220 180 empty empty empty 20 12 0 14 -228856
-262144 0;
#X obj 67 647 rotateXYZ;
#X obj 67 567 translateXYZ;
#X obj 364 275 grid grid1 100 0 10 100 0 10 0 0.1 0.1 10 10 236 82
;
#N canvas 65 118 450 300 translated 0;
#X obj 119 196 line;
#X obj 192 196 line;
#X obj 119 156 inlet;
#X obj 192 156 inlet;
#X obj 119 236 outlet;
#X obj 192 236 outlet;
#X obj 119 216 - 5;
#X obj 192 216 - 5;
#X msg 192 176 \$1 25;
#X msg 119 176 \$1 25;
#X connect 0 0 6 0;
#X connect 1 0 7 0;
#X connect 2 0 9 0;
#X connect 3 0 8 0;
#X connect 6 0 4 0;
#X connect 7 0 5 0;
#X connect 8 0 1 0;
#X connect 9 0 0 0;
#X restore 90 537 pd translated;
#X obj 368 405 hsl 110 15 -4 4 0 0 empty empty empty -2 -8 0 10 -260097
-1 -1 0 1;
#X obj 368 385 hsl 110 15 0 360 0 0 empty empty empty -2 -8 0 10 -260097
-1 -1 0 1;
#X text 490 384 rotate;
#X obj 364 255 tgl 15 0 empty empty empty 17 7 0 10 -258113 -262144
-1 1 1;
#X text 490 403 size;
#X text 381 253 render;
#X obj 364 200 loadbang;
#X obj 364 220 t b b;
#X msg 474 476 goto 50 50;
#X obj 474 275 bng 15 250 50 0 empty empty empty 17 7 0 10 -258113
-262144 -1;
#X msg 456 224 1;
#X obj 67 204 pix_snap 0 0;
#X obj 136 174 r windowdimen;
#X obj 709 379 gemframebuffer;
#X msg 729 329 color 1 1 1;
#X obj 709 570 color 0 0 0;
#X obj 709 724 t a b;
#X msg 736 764 snap;
#X obj 709 859 t a b;
#X msg 892 884 1;
#X obj 709 904 pix_buffer_write \$0-framebuffer;
#X msg 739 349 color 0 0 0;
#X msg 772 520 1 1 1;
#X msg 782 540 0 0 0;
#X obj 112 314 t a b;
#X msg 289 334 1;
#X obj 112 354 pix_buffer_read \$0-framebuffer;
#X msg 729 239 dimen \$1 \$2;
#X obj 729 209 r windowdimen;
#X obj 67 474 pix_texture;
#X obj 67 394 pix_mask;
#X obj 473 65 pix_buffer \$0-framebuffer 2;
#X obj 67 434 alpha;
#X obj 778 805 r windowdimen;
#X obj 709 835 pix_snap 0 0;
#X obj 852 177 alternate;
#X obj 709 672 translateXYZ;
#X floatatom 778 652 5 0 0 0 - - -;
#X obj 709 478 rotateXYZ 0 0 45;
#X obj 112 274 gemhead 50;
#X msg 94 134 snap;
#X obj 67 104 t a b;
#X obj 67 72 gemhead -1;
#X obj 177 72 gemhead 60;
#X obj 709 134 gemhead 20;
#X obj 709 692 square;
#X obj 67 697 rectangle 4 4;
#X text 491 273 centre;
#X obj 474 305 tgl 15 0 empty empty empty 17 7 0 10 -258113 -262144
-1 1 1;
#X obj 544 276 vsl 15 100 -20 -1.01 0 0 empty empty empty 0 -9 0 10
-260097 -1 -1 9800 1;
#X text 491 298 invert;
#X text 491 308 mask;
#X text 511 348 mask;
#X text 511 358 size;
#X connect 1 0 51 0;
#X connect 2 0 1 0;
#X connect 3 0 4 0;
#X connect 3 1 4 1;
#X connect 4 0 2 1;
#X connect 4 1 2 2;
#X connect 5 0 51 1;
#X connect 5 0 51 2;
#X connect 6 0 1 3;
#X connect 8 0 47 0;
#X connect 8 0 48 0;
#X connect 8 0 49 0;
#X connect 11 0 12 0;
#X connect 11 0 15 0;
#X connect 12 0 8 0;
#X connect 12 1 8 0;
#X connect 13 0 3 0;
#X connect 14 0 13 0;
#X connect 15 0 5 0;
#X connect 16 0 35 0;
#X connect 17 0 16 2;
#X connect 18 0 43 0;
#X connect 19 0 18 0;
#X connect 20 0 41 0;
#X connect 21 0 39 0;
#X connect 21 1 22 0;
#X connect 22 0 39 0;
#X connect 23 0 25 0;
#X connect 23 1 24 0;
#X connect 24 0 25 1;
#X connect 26 0 18 0;
#X connect 27 0 20 1;
#X connect 28 0 20 1;
#X connect 29 0 31 0;
#X connect 29 1 30 0;
#X connect 30 0 31 1;
#X connect 31 0 35 1;
#X connect 32 0 18 0;
#X connect 33 0 32 0;
#X connect 34 0 2 0;
#X connect 35 0 37 0;
#X connect 37 0 34 0;
#X connect 38 0 39 2;
#X connect 39 0 23 0;
#X connect 40 0 19 0;
#X connect 40 0 28 0;
#X connect 40 1 26 0;
#X connect 40 1 27 0;
#X connect 41 0 50 0;
#X connect 42 0 41 3;
#X connect 43 0 20 0;
#X connect 44 0 29 0;
#X connect 45 0 16 0;
#X connect 46 0 16 0;
#X connect 46 1 45 0;
#X connect 47 0 46 0;
#X connect 48 0 16 0;
#X connect 49 0 18 0;
#X connect 50 0 21 0;
#X connect 53 0 40 0;
#X connect 54 0 42 0;
#X coords 0 -1 1 1 220 180 1 360 250;
#X restore 193 12 pd feedback;
#N canvas 836 82 929 997 window 0;
#X obj 320 300 cnv 15 140 70 empty empty empty 20 12 0 14 -261234 -66577
0;
#X obj 24 805 gemwin;
#X msg 124 745 0 \, destroy;
#X obj 364 320 bng 15 250 50 0 empty empty empty 17 7 0 10 -258113
-1 -1;
#X text 384 318 destroy;
#X obj 324 305 bng 30 250 50 0 empty empty empty 17 7 0 10 -4034 -1
-1;
#X floatatom 324 345 7 0 0 0 - - -;
#X floatatom 388 345 7 0 0 0 - - -;
#X text 371 344 w;
#X text 435 344 h;
#X obj 324 616 pack f f;
#X obj 324 576 f;
#X obj 369 576 f;
#X obj 324 506 t b b;
#X obj 324 638 s windowdimen;
#X msg 24 705 dimen \$1 \$2 \, create \, 1;
#X text 362 301 create;
#X connect 2 0 1 0;
#X connect 3 0 2 0;
#X connect 5 0 13 0;
#X connect 6 0 11 1;
#X connect 7 0 12 1;
#X connect 10 0 14 0;
#X connect 10 0 15 0;
#X connect 11 0 10 0;
#X connect 12 0 10 1;
#X connect 13 0 11 0;
#X connect 13 1 12 0;
#X connect 15 0 1 0;
#X coords 0 -1 1 1 140 70 2 320 300;
#X restore 13 12 pd window;
#X obj 16 107 gemhead;
#X obj 16 129 pix_video;
#X obj 16 151 pix_texture;
#X obj 16 173 rectangle 4 4;
#X connect 2 0 3 0;
#X connect 3 0 4 0;
#X connect 4 0 5 0;