#N canvas 0 0 450 184 10;
#N canvas 0 0 507 636 bar 1;
#X obj 168 54 filledpolygon y y 5 -5 5 5 5 5 y(0:127)(5:132) -5 y(0:127)(5:132)
;
#X obj 168 121 drawnumber y -5 -20 c;
#X obj 168 94 drawnumber y -5 y(0:127)(10:137) c;
#X obj 122 27 struct bar float y float c;
#X obj 122 281 f;
#X obj 179 308 + 1;
#X msg 202 256 0;
#X msg 245 300 traverse pd-paint \, next;
#X obj 245 327 pointer graph;
#X msg 282 354 next;
#X obj 122 348 element graph bars;
#X obj 122 402 get bar y;
#X obj 122 432 +;
#X obj 122 454 t a;
#X obj 122 481 /;
#X obj 122 308 t a a;
#X obj 122 514 set graph mean;
#X obj 25 472 set bar c;
#X obj 122 375 t a a;
#X obj 290 194 del 10;
#X msg 290 169 stop;
#X msg 290 226 1;
#X obj 245 273 spigot 1;
#X msg 290 251 0;
#X msg 25 445 9;
#X obj 202 415 t a;
#X obj 218 204 t b b;
#X msg 64 445 0;
#X obj 25 419 sel 127 0;
#X obj 122 152 t b b b;
#X connect 3 0 29 0;
#X connect 4 0 15 0;
#X connect 5 0 4 1;
#X connect 5 0 14 1;
#X connect 6 0 4 1;
#X connect 6 0 25 0;
#X connect 7 0 8 0;
#X connect 8 0 10 1;
#X connect 8 0 16 1;
#X connect 8 1 9 0;
#X connect 9 0 8 0;
#X connect 10 0 18 0;
#X connect 11 0 12 0;
#X connect 11 0 28 0;
#X connect 12 0 13 0;
#X connect 13 0 12 1;
#X connect 13 0 14 0;
#X connect 14 0 16 0;
#X connect 15 0 10 0;
#X connect 15 1 5 0;
#X connect 18 0 11 0;
#X connect 18 1 17 1;
#X connect 19 0 6 0;
#X connect 19 0 21 0;
#X connect 20 0 19 0;
#X connect 21 0 22 1;
#X connect 22 0 7 0;
#X connect 23 0 22 1;
#X connect 24 0 17 0;
#X connect 25 0 12 1;
#X connect 26 0 23 0;
#X connect 26 1 22 0;
#X connect 27 0 17 0;
#X connect 28 0 24 0;
#X connect 28 1 24 0;
#X connect 28 2 27 0;
#X connect 29 0 4 0;
#X connect 29 1 19 0;
#X connect 29 1 26 0;
#X connect 29 2 20 0;
#X restore 19 24 pd bar;
#N canvas 409 1 437 654 paint 1;
#X restore 71 24 pd paint;
#N canvas 0 0 489 475 graph 0;
#X obj 127 83 plot curve -y y(0:127)(0:-127) bars 999 1 20 0 25;
#X obj 127 110 drawpolygon 777 2 0 -127 0 30 400 30;
#X obj 101 36 struct graph float x float y array bars bar float mean
;
#X obj 130 135 drawnumber mean 0 40 0 mean=;
#X restore 19 78 pd graph;
#N canvas 0 0 317 611 init 0;
#X obj 107 155 pointer;
#X msg 107 122 traverse pd-paint \, bang;
#X obj 14 182 append graph x y;
#X msg 14 145 10 200;
#X obj 48 285 setsize graph bars;
#X obj 14 14 loadbang;
#X msg 208 84 \; pd-paint clear;
#X obj 14 45 t b b b;
#X msg 33 251 16;
#X obj 41 472 element graph bars;
#X obj 14 206 t a b a;
#X obj 14 383 until;
#X obj 14 361 f;
#X obj 14 408 f;
#X obj 44 408 + 1;
#X obj 14 439 t b a;
#X obj 14 526 set bar y;
#X obj 14 499 random 127;
#X obj 14 312 t b b a;
#X msg 52 384 0;
#X obj 118 14 inlet;
#X msg 74 13 bang;
#X connect 0 0 2 2;
#X connect 1 0 0 0;
#X connect 2 0 10 0;
#X connect 3 0 2 0;
#X connect 5 0 7 0;
#X connect 7 0 3 0;
#X connect 7 1 1 0;
#X connect 7 2 6 0;
#X connect 8 0 4 0;
#X connect 8 0 12 1;
#X connect 9 0 16 1;
#X connect 10 0 18 0;
#X connect 10 1 8 0;
#X connect 10 2 4 1;
#X connect 11 0 13 0;
#X connect 12 0 11 0;
#X connect 13 0 14 0;
#X connect 13 0 15 0;
#X connect 14 0 13 1;
#X connect 15 0 17 0;
#X connect 15 1 9 0;
#X connect 17 0 16 0;
#X connect 18 0 12 0;
#X connect 18 1 19 0;
#X connect 18 2 9 1;
#X connect 19 0 13 1;
#X connect 20 0 21 0;
#X connect 21 0 7 0;
#X restore 80 79 pd init;
#X text 129 24 <- bargraph inside;
#X obj 80 59 bng 15 250 50 0 empty empty reset 17 7 0 10 -262144 -1
-1;
#X connect 5 0 3 0;