On Sat, Nov 9, 2013 at 6:42 PM, Julian Brooks jbeezez@gmail.com wrote:
Michael - would you mind knocking up a quick example
This seems to work (roughly) so far as I understand Peiman's original request correctly. I can't vouch for it being the most efficient or bug-free solution. It polls the buffer array using a metro counter so that changes to the active table are updated on the fly. Switching the active table just dumps that table to the buffer array.
#N canvas 555 248 450 300 10; #N canvas 553 638 450 300 gui 0; #N canvas 1 52 450 250 (subpatch) 0; #X array buffer 100 float 3; #A 0 -0.585714 -0.585714 -0.585714 -0.585714 -0.585714 -0.585714 -0.585714 -0.585714 -0.585714 -0.585714 -0.585714 -0.585714 -0.585714 -0.585714 -0.585714 -0.585714 -0.585714 -0.585714 -0.585714 -0.585714 -0.571428 -0.571428 -0.571428 -0.557143 -0.557143 -0.557143 -0.557143 -0.557143 -0.557143 -0.542857 -0.542857 -0.542857 -0.542857 -0.542857 -0.542857 -0.542857 -0.542857 -0.542857 -0.542857 -0.542857 -0.542857 -0.542857 -0.542857 -0.542857 -0.542857 -0.542857 -0.542857 -0.542857 -0.542857 -0.542857 -0.542857 -0.542857 -0.542857 -0.542857 -0.542857 -0.542857 -0.542857 -0.542857 -0.542857 -0.542857 -0.542857 -0.542857 -0.542857 -0.542857 -0.542857 -0.542857 -0.542857 -0.542857 -0.542857 -0.542857 -0.542857 -0.542857 -0.542857 -0.542857 -0.542857 -0.542857 -0.542857 -0.542857 -0.542857 -0.542857 -0.542857 -0.542857 -0.542857 -0.542857 -0.542857 -0.542857 -0.542857 -0.542857 -0.542857 -0.542857 -0.542857 -0.542857 -0.542857 -0.542857 -0.542857 -0.542857 -0.542857 -0.542857 -0.542857 -0.471428; #X coords 0 1 99 -1 200 140 1; #X restore 100 50 graph; #X obj 100 211 hradio 25 1 0 8 tablenum empty empty 0 -8 0 10 -262144 -1 -1 0; #X coords 0 -1 1 1 200 200 2 100 50; #X restore 48 70 pd gui; #N canvas 1 52 450 300 tables 1; #X obj 46 27 table x1; #X obj 46 49 table x2; #X obj 46 71 table x3; #X obj 46 93 table x4; #X obj 46 115 table x5; #X obj 46 137 table x6; #X obj 46 159 table x7; #X obj 46 181 table x8; #X restore 294 68 pd tables; #N canvas 1048 269 755 530 guts 0; #X obj 236 18 r tablenum; #X msg 302 101 set x$1; #X obj 399 324 tabread; #X obj 270 82 + 1; #X obj 461 322 tabwrite; #X obj 271 332 t f f; #X obj 292 437 tabwrite buffer; #X obj 327 393 swap; #X obj 222 135 metro 1; #X obj 222 165 f 0; #X obj 274 182 + 1; #X msg 85 156 0; #X obj 181 234 sel 99; #X obj 222 203 t f f; #X obj 584 137 f 0; #X obj 636 154 + 1; #X obj 588 191 mod 100; #X obj 600 233 t f f; #X obj 515 294 tabread buffer; #X obj 593 64 loadbang; #X obj 398 246 t a a; #X msg 515 54 1; #X msg 545 19 0; #X obj 584 107 metro 1; #X obj 236 54 t b f b; #X obj 128 96 t b f f; #X connect 0 0 24 0; #X connect 1 0 20 0; #X connect 2 0 7 1; #X connect 3 0 1 0; #X connect 5 0 7 0; #X connect 5 1 2 0; #X connect 7 0 6 0; #X connect 7 1 6 1; #X connect 8 0 9 0; #X connect 9 0 10 0; #X connect 9 0 13 0; #X connect 10 0 9 1; #X connect 11 0 25 0; #X connect 12 0 11 0; #X connect 13 0 12 0; #X connect 13 1 5 0; #X connect 14 0 15 0; #X connect 14 0 16 0; #X connect 15 0 14 1; #X connect 16 0 17 0; #X connect 17 0 18 0; #X connect 17 1 4 1; #X connect 18 0 4 0; #X connect 19 0 23 0; #X connect 20 0 2 0; #X connect 20 1 4 0; #X connect 21 0 23 0; #X connect 22 0 23 0; #X connect 23 0 14 0; #X connect 24 0 8 0; #X connect 24 1 3 0; #X connect 24 2 22 0; #X connect 25 0 21 0; #X connect 25 1 9 1; #X connect 25 2 8 0; #X restore 299 138 pd guts;