#N canvas 342 32 786 583 10; #N canvas 109 550 751 371 controller 0; #X obj 603 213 makefilename pd-%s; #X msg 603 240 traverse \$1 \, bang; #X obj 603 183 symbol \$0-show; #X obj 603 261 pointer; #X obj 405 322 outlet; #X obj 405 146 inlet; #X obj 23 35 struct \$0-controller float x0 float y0 float id; #X msg 405 261 100 100 \$1; #X obj 405 205 t f b b b b; #X msg 433 171 1; #X obj 405 286 append \$0-controller x0 y0 id; #X obj 24 82 filledpolygon id 999 1 x0(0:200)(0:200) y0(0:200)(0:200) x0(0:200)(10:210) y0(0:200)(0:200) x0(0:200)(10:210) y0(0:200)(10:210) x0(0:200)(0:200) y0(0:200)(10:210); #X connect 0 0 1 0; #X connect 1 0 3 0; #X connect 2 0 0 0; #X connect 3 0 10 3; #X connect 5 0 8 0; #X connect 7 0 10 0; #X connect 8 0 7 0; #X connect 8 4 2 0; #X connect 9 0 8 0; #X connect 10 0 4 0; #X restore 395 114 pd controller; #X obj 244 102 metro 100; #X obj 92 42 tgl 15 0 empty empty empty 0 -6 0 8 -1 -262131 -1 0 1 ; #N canvas 0 0 450 300 1007-pointer-pool 0; #X restore 340 449 pd \$0-pointer-pool; #X obj 589 284 makefilename pd-%s; #X obj 589 254 symbol \$0-pointer-pool; #X msg 654 226 bang; #X obj 395 62 hradio 15 1 0 8 empty empty make_new 0 -6 0 8 -262144 -1 -1 0; #X text 561 81 make colorful; #X obj 395 209 get \$0-controller id; #X obj 517 311 pack 0 \$0 s; #X msg 517 334 \; \$3 obj 100 100 ctl-parser \$1 \$2; #X msg 164 317 clear; #X obj 395 182 t p p; #X obj 395 314 s \$0-pointer; #X obj 395 279 pack 0 p; #X obj 395 238 t f f; #X obj 42 401 r \$0-result; #X obj 244 128 s \$0-readout; #X obj 589 225 loadbang; #N canvas 0 0 590 367 clear-all 0; #X msg 89 155 \; \$1 clear; #X obj 254 134 makefilename pd-%s; #X obj 254 104 symbol \$0-show; #X obj 89 133 makefilename pd-%s; #X obj 89 103 symbol \$0-pointer-pool; #X obj 89 72 t b b; #X obj 89 46 inlet; #X connect 1 0 0 0; #X connect 2 0 1 0; #X connect 3 0 0 0; #X connect 4 0 3 0; #X connect 5 0 4 0; #X connect 5 1 2 0; #X connect 6 0 5 0; #X restore 164 361 pd clear-all; #X obj 170 338 loadbang; #X text 339 412 cache active pointers to speed up access and avoid frequent subpatch traversal:; #X obj 136 42 hradio 15 1 0 6 empty empty empty 0 -6 0 8 -1 -262144 -262144 0; #X obj 42 487 outlet; #X obj 115 42 bng 15 250 50 0 \$0-clear empty empty 0 -6 0 8 -233017 -1 -1; #X obj 235 338 r \$0-clear; #X obj 395 82 expr 5 * pow(2 \, $f1); #X obj 16 64 cnv 15 210 210 empty empty empty 20 12 0 14 -1 -66577 0; #N canvas 0 0 450 300 1007-show 0; #X coords 0 210 210 0 210 210 1; #X restore 15 64 pd \$0-show; #X obj 496 110 loadbang; #X obj 496 132 del 10; #X msg 496 155 0; #X connect 0 0 13 0; #X connect 1 0 18 0; #X connect 2 0 1 0; #X connect 4 0 10 2; #X connect 5 0 4 0; #X connect 6 0 5 0; #X connect 7 0 27 0; #X connect 9 0 16 0; #X connect 10 0 11 0; #X connect 12 0 20 0; #X connect 13 0 9 0; #X connect 13 1 15 1; #X connect 15 0 14 0; #X connect 16 0 15 0; #X connect 16 1 10 0; #X connect 17 0 24 0; #X connect 19 0 5 0; #X connect 21 0 20 0; #X connect 23 0 27 0; #X connect 26 0 20 0; #X connect 27 0 0 0; #X connect 30 0 31 0; #X connect 31 0 32 0; #X connect 32 0 0 0; #X coords 0 -1 1 1 220 250 1 10 30;