Commit 9f978f75 authored by J Reso's avatar J Reso
Browse files

clean/update _mem and mem objects, debug recording folder for audio-out,...

clean/update _mem and mem objects, debug recording folder for audio-out, update audio-bank with alphabetic  order for files
parent 226631b9
#N canvas 129 82 525 674 10;
#N canvas 127 83 496 610 10;
#X declare -path ../core;
#X obj 53 147 bng 15 250 50 0 empty empty load 17 7 0 10 -262144 -1
-1;
#X floatatom 53 222 5 0 0 0 - - -;
#X text 87 218 number of sounds loaded;
#X msg 307 176 see;
#X floatatom 201 398 5 0 0 0 nb_of_sounds - -;
#X floatatom 59 396 5 0 0 1 nb_of_sounds - -;
#X text 52 22 audio-bank \; ---------- \; Load a folder of sounds \;
Arguments \; \$1:ID \; \$2: folder/pattern \, ex: ./samples/*.wav;
#X obj 201 447 hradio 15 1 0 9 empty empty SOUNDS -40 5 0 10 -262144
-1 -1 0;
#X msg 201 421 number \$1;
#X obj 201 331 bng 15 250 50 0 empty empty load 17 7 0 10 -262144 -1
#X obj 59 329 bng 15 250 50 0 empty empty load 17 7 0 10 -262144 -1
-1;
#X text 49 299 //////////////// EXAMPLE /////////////////;
#X msg 201 472 snd-outside 1 \, snd-bank MYBANK1 \, snd \$1 \, play
;
#X obj 201 562 route ms;
#X floatatom 201 586 5 0 0 0 - - -;
#X obj 68 493 audio-sampler;
#X text 111 125 Choose files pattern in the arguments or with this
message;
#X text 336 178 see the tables of sounds;
#X obj 201 374 audio-bank MYBANK1;
#X msg 153 333 see;
#X obj 67 570 out~;
#X msg 201 350 files ../../medias/sounds/*.wav;
#X obj 55 547 out~;
#X msg 59 348 files ../../medias/sounds/*.wav;
#X msg 114 148 files ../../medias/sounds/*.wav;
#X obj 53 193 audio-bank \$0-SMP ../../medias/sounds/*.wav;
#X connect 0 0 21 0;
#X connect 3 0 21 0;
#X connect 4 0 7 0;
#X connect 6 0 10 0;
#X connect 7 0 6 0;
#X connect 8 0 19 0;
#X connect 10 0 13 1;
#X connect 11 0 12 0;
#X connect 13 0 18 0;
#X connect 13 1 11 0;
#X connect 16 0 4 0;
#X obj 59 372 audio-bank \$0-S;
#X obj 56 480 audio-sampler \$0-S;
#X msg 189 459 snd \$1 \, play;
#X obj 189 440 hradio 15 1 0 8 empty empty empty 0 -8 0 10 -262144
-1 -1 0;
#X connect 0 0 13 0;
#X connect 3 0 13 0;
#X connect 6 0 11 0;
#X connect 11 0 14 0;
#X connect 12 0 13 0;
#X connect 13 0 1 0;
#X connect 14 0 4 0;
#X connect 15 0 10 0;
#X connect 16 0 15 1;
#X connect 17 0 16 0;
#X connect 19 0 16 0;
#X connect 20 0 21 0;
#X connect 21 0 1 0;
#N canvas 44 246 459 384 10;
#N canvas 483 219 459 384 10;
#X floatatom 88 214 5 0 0 1 sounds - -;
#X obj 88 134 inlet;
#X msg 187 274 see;
......@@ -6,6 +6,14 @@
#X text 82 38 Arguments \; \$1:ID \; \$2: folder/pattern \, ex: ./samples/*.wav
;
#N canvas 675 342 299 425 \$1 0;
#X obj 5 10 table 1002-SMP-0 100;
#X obj 5 30 table 1002-SMP-1 100;
#X obj 5 50 table 1002-SMP-2 100;
#X obj 5 70 table 1002-SMP-3 100;
#X obj 5 90 table 1002-SMP-4 100;
#X obj 5 110 table 1002-SMP-5 100;
#X obj 5 130 table 1002-SMP-6 100;
#X obj 5 150 table 1002-SMP-7 100;
#X restore 337 295 pd \$1;
#X obj 73 350 outlet;
#X obj 73 323 pipe 100;
......@@ -13,31 +21,29 @@
-33289;
#X obj 73 301 f;
#X text 120 352 number of sounds loaded;
#N canvas 167 79 848 688 _LOAD_TABLES_ 0;
#X obj 337 73 inlet;
#X obj 133 550 soundfiler;
#X obj 133 504 pack s s;
#X msg 133 527 read -resize \$1 \$2;
#X obj 133 411 t a b;
#X obj 178 428 f;
#X obj 209 427 + 1;
#X floatatom 178 452 5 0 0 0 - - -;
#X obj 356 537 outlet;
#X obj 356 283 hcs/folder_list;
#X obj 392 334 list append;
#X obj 356 334 list;
#X floatatom 356 412 5 0 0 0 - - -;
#X obj 133 314 list;
#X text 353 557 int : number of sounds;
#X text 34 312 list of sounds;
#X text 557 298 clear lists;
#N canvas 159 80 733 607 _LOAD_TABLES_ 1;
#X obj 337 98 inlet;
#X obj 133 420 soundfiler;
#X obj 133 374 pack s s;
#X msg 133 397 read -resize \$1 \$2;
#X obj 133 281 t a b;
#X obj 178 298 f;
#X obj 209 297 + 1;
#X floatatom 178 322 5 0 0 0 - - -;
#X obj 356 317 outlet;
#X obj 356 173 hcs/folder_list;
#X floatatom 356 282 5 0 0 0 - - -;
#X obj 133 204 list;
#X text 353 337 int : number of sounds;
#X text 34 202 list of sounds;
#X text 557 188 clear lists;
#X text 47 17 Load sounds from a folder into tables;
#X msg 193 393 0;
#X text 24 549 load into tables;
#X obj 337 158 t b a b;
#X obj 178 472 makefilename \$1-%d;
#X obj 356 357 list length;
#N canvas 1 80 450 300 serializer 0;
#X msg 193 263 0;
#X text 24 419 load into tables;
#X obj 337 133 t b a b;
#X obj 178 342 makefilename \$1-%d;
#X obj 356 247 list length;
#N canvas 1 82 450 300 serializer 0;
#X obj 59 187 list split 1;
#X obj 59 104 until;
#X obj 59 142 list append;
......@@ -54,22 +60,21 @@
#X connect 3 1 2 1;
#X connect 4 0 1 1;
#X connect 5 0 3 0;
#X restore 133 351 pd serializer;
#X obj 210 609 f;
#X obj 246 611 + 1;
#X obj 210 584 b;
#X obj 210 633 sel;
#X obj 133 230 t b b b;
#X obj 456 661 outlet;
#X text 453 681 bang : all sounds loaded;
#X msg 236 584 1;
#X obj 449 110 bng 15 250 50 0 empty empty Load_sounds 0 -7 1 9 -187776
-33289 -33289;
#X msg 449 128 ../../data/*.wav;
#X obj 524 297 b;
#X text 332 52 symbol (sounds folder and pattern);
#X connect 0 0 20 0;
#X connect 1 0 26 0;
#X restore 133 241 pd serializer;
#X obj 210 479 f;
#X obj 246 481 + 1;
#X obj 210 454 b;
#X obj 210 503 sel;
#X obj 133 150 t b b b;
#X obj 502 520 outlet;
#X text 499 540 bang : all sounds loaded;
#X msg 236 454 1;
#X obj 524 187 b;
#X text 332 77 symbol (sounds folder and pattern);
#X obj 455 224 list append;
#X obj 356 224 list prepend;
#X connect 0 0 18 0;
#X connect 1 0 24 0;
#X connect 2 0 3 0;
#X connect 3 0 1 0;
#X connect 4 0 2 0;
......@@ -77,35 +82,34 @@
#X connect 5 0 6 0;
#X connect 5 0 7 0;
#X connect 6 0 5 1;
#X connect 7 0 21 0;
#X connect 9 0 11 0;
#X connect 10 0 11 1;
#X connect 11 0 10 0;
#X connect 11 0 13 1;
#X connect 11 0 22 0;
#X connect 12 0 8 0;
#X connect 12 0 27 1;
#X connect 13 0 23 0;
#X connect 18 0 5 1;
#X connect 20 0 28 0;
#X connect 20 1 9 0;
#X connect 20 2 34 0;
#X connect 21 0 2 1;
#X connect 22 0 12 0;
#X connect 23 0 4 0;
#X connect 24 0 25 0;
#X connect 24 0 27 0;
#X connect 25 0 24 1;
#X connect 26 0 24 0;
#X connect 27 0 29 0;
#X connect 28 0 13 0;
#X connect 28 1 18 0;
#X connect 28 2 31 0;
#X connect 31 0 24 1;
#X connect 32 0 33 0;
#X connect 34 0 10 1;
#X connect 34 0 11 1;
#X connect 34 0 13 1;
#X connect 7 0 19 0;
#X connect 9 0 33 0;
#X connect 10 0 8 0;
#X connect 10 0 25 1;
#X connect 11 0 21 0;
#X connect 16 0 5 1;
#X connect 18 0 26 0;
#X connect 18 1 9 0;
#X connect 18 2 30 0;
#X connect 19 0 2 1;
#X connect 20 0 10 0;
#X connect 21 0 4 0;
#X connect 22 0 23 0;
#X connect 22 0 25 0;
#X connect 23 0 22 1;
#X connect 24 0 22 0;
#X connect 25 0 27 0;
#X connect 26 0 11 0;
#X connect 26 1 16 0;
#X connect 26 2 29 0;
#X connect 29 0 22 1;
#X connect 30 0 11 1;
#X connect 30 0 32 1;
#X connect 30 0 33 1;
#X connect 32 0 33 1;
#X connect 33 0 11 1;
#X connect 33 0 20 0;
#X connect 33 0 32 0;
#X restore 88 193 pd _LOAD_TABLES_;
#N canvas 314 228 707 539 _BUILD_TABLES_ 0;
#X msg 323 162 clear;
......@@ -194,7 +198,7 @@
#X connect 33 0 0 0;
#X connect 34 0 24 0;
#X restore 187 295 pd _BUILD_TABLES_;
#N canvas 487 246 534 402 _ARGUMENTS_ 1;
#N canvas 485 247 534 402 _ARGUMENTS_ 0;
#X msg 144 283 error : no folder;
#X obj 144 307 print LOAD_SOUNDS;
#X obj 44 23 inlet bang;
......@@ -202,7 +206,7 @@
#X obj 272 197 sel 0;
#X msg 272 283 error : no group name;
#X obj 144 218 sel 0;
#N canvas 137 467 450 300 test_symbol 1;
#N canvas 137 467 450 300 test_symbol 0;
#X obj 172 112 symbol;
#X obj 97 135 select symbol;
#X obj 97 84 t b b;
......
#N canvas 68 80 610 596 10;
#N canvas 64 82 612 508 10;
#X declare -path ../numbers;
#X msg 517 68 \; pd dsp 1;
#X text 517 47 Audio on;
......@@ -9,44 +9,6 @@
-262144 -1 -1 0 1;
#X msg 166 262 on \$1;
#X obj 61 307 synth 9 50;
#N canvas 540 170 593 549 -PRESETS-MESSAGES- 0;
#X msg 96 286 file tmp2.txt;
#X text 92 266 Change filename preset;
#X obj 148 452 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
1;
#X msg 135 375 length;
#X msg 112 333 update;
#X obj 97 66 hradio 15 1 0 8 empty empty Read 0 -8 0 10 -262144 -1
-1 0;
#X msg 148 475 auto-max \$1;
#X msg 142 420 reset;
#X msg 131 139 write;
#X msg 121 112 id 4;
#X msg 138 169 write 1;
#X text 160 109 preset number to write;
#X text 173 136 write to the file;
#X text 188 167 write this preset number;
#X text 108 314 Current state;
#X text 133 354 Number of presets recorded;
#X text 141 402 Clear all presets;
#X text 227 457 Auto-max constraint \; If 1: the maximum is limited
to the number of presets \; Default : 1;
#X obj 190 419 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 97 224 s \$0-to-synth;
#X obj 96 505 s \$0-to-synth;
#X connect 0 0 20 0;
#X connect 2 0 6 0;
#X connect 3 0 20 0;
#X connect 4 0 20 0;
#X connect 5 0 19 0;
#X connect 6 0 20 0;
#X connect 7 0 20 0;
#X connect 8 0 19 0;
#X connect 9 0 19 0;
#X connect 10 0 19 0;
#X connect 18 0 20 0;
#X restore 371 326 pd -PRESETS-MESSAGES-;
#X obj 166 242 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
1;
#X obj 167 309 r \$0-to-synth;
......@@ -59,12 +21,70 @@ to the number of presets \; Default : 1;
#X text 49 33 synth \; ----- \; Simple audio synthetizer with waveforms
\; Presets file in abstractions/core/presets/waves.txt \; Arguments
\; \$1: preset number \; \$2: pitch in Midi (0-127) \;;
#X obj 373 352 s \$0-to-synth;
#N canvas 342 79 635 626 -PRESET-MESSAGES 0;
#X msg 63 219 file tmp2.txt;
#X text 59 199 Change filename preset;
#X obj 115 385 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
1;
#X msg 102 308 length;
#X msg 79 266 update;
#X obj 62 55 hradio 15 1 0 8 empty empty Read_a_preset 0 -8 0 10 -262144
-1 -1 0;
#X msg 115 408 auto-max \$1;
#X msg 86 108 write;
#X obj 63 438 s \$0-to-mem;
#X obj 62 164 s \$0-to-mem;
#X msg 76 81 id 4;
#X msg 93 138 write 1;
#X text 108 335 Clear all presets;
#X text 194 390 Auto-max constraint \; If 1: the maximum is limited
to the number of presets \; Default : 1;
#X obj 339 132 rand-n 100 10;
#X obj 339 112 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 339 159 s \$0-to-mem;
#X text 336 91 Fill with 10 numbers from 0 to 99;
#X msg 109 353 clear;
#X text 100 287 Number of presets stored;
#X text 75 247 Output current state;
#X text 115 78 Preset number to write;
#X text 128 105 Write into the file;
#X text 143 137 Write with a preset number;
#X msg 66 491 20 10 29 1092 288 199;
#X text 63 470 Fill the preset with lists;
#X obj 66 515 s \$0-to-mem;
#X msg 340 223 delete;
#X obj 340 299 s \$0-to-mem;
#X text 338 205 Delete current preset;
#X msg 351 265 delete 3;
#X text 349 247 Delete preset number;
#X obj 69 561 r \$0-to-mem;
#X obj 69 586 outlet;
#X connect 0 0 8 0;
#X connect 2 0 6 0;
#X connect 3 0 8 0;
#X connect 4 0 8 0;
#X connect 5 0 9 0;
#X connect 6 0 8 0;
#X connect 7 0 9 0;
#X connect 10 0 9 0;
#X connect 11 0 9 0;
#X connect 14 0 16 0;
#X connect 15 0 14 0;
#X connect 18 0 8 0;
#X connect 24 0 26 0;
#X connect 27 0 28 0;
#X connect 30 0 28 0;
#X connect 32 0 33 0;
#X restore 374 327 pd -PRESET-MESSAGES;
#X connect 3 0 6 1;
#X connect 4 0 6 0;
#X connect 5 0 6 1;
#X connect 6 0 2 0;
#X connect 6 0 2 1;
#X connect 8 0 5 0;
#X connect 9 0 6 1;
#X connect 11 0 15 0;
#X connect 12 0 15 0;
#X connect 7 0 5 0;
#X connect 8 0 6 1;
#X connect 10 0 14 0;
#X connect 11 0 14 0;
#X connect 17 0 16 0;
#N canvas 1 133 514 443 10;
#N canvas 1 137 514 443 10;
#X declare -path ../numbers;
#X obj 105 400 outlet~;
#X obj 159 351 switch~;
......@@ -12,42 +12,41 @@
0;
#N canvas 1 85 450 300 (subpatch) 0;
#X array \$0- 259 float 5;
#A 0 -0.980952 -0.966666 -0.90238 -0.90238 -0.816666 -0.809523 -0.788095
-0.745237 -0.70238 -0.688095 -0.673809 -0.659523 -0.588095 -0.502381
-0.495238 -0.430952 -0.402381 -0.316667 -0.309524 -0.245239 -0.230953
-0.17381 -0.145239 -0.138096 -0.088096 -0.0166676 0.0547608 0.0619037
0.0833322 0.126189 0.183332 0.197618 0.211903 0.226189 0.25476 0.264284
0.273808 0.283332 0.297617 0.311903 0.311903 0.311903 0.311903 0.311903
0.316665 0.321427 0.326189 0.340474 0.340474 0.340474 0.340474 0.35476
0.35476 0.35476 0.35476 0.35476 0.35476 0.35476 0.35476 0.35476 0.35476
0.35476 0.297617 0.297617 0.283332 0.283332 0.269046 0.269046 0.269046
0.269046 0.269046 0.269046 0.269046 0.269046 0.269046 0.27857 0.288094
0.297617 0.297617 0.311903 0.311903 0.311903 0.326189 0.326189 0.326189
0.326189 0.326189 0.326189 0.340474 0.340474 0.340474 0.340474 0.340474
0.347617 0.35476 0.35476 0.35476 0.35476 0.35476 0.35476 0.35476 0.35476
0.35476 0.35476 0.35476 0.340474 0.311903 0.297617 0.283332 0.276189
0.269046 0.261903 0.25476 0.226189 0.211903 0.173808 0.164284 0.154761
0.140475 0.119046 0.111904 0.0976179 0.0833322 0.0690465 0.0619037
0.0547608 0.0547608 0.0404751 0.0333323 0.0261894 0.0261894 0.0119038
-0.00238192 -0.0380961 -0.045239 -0.045239 -0.045239 -0.045239 -0.045239
-0.045239 -0.045239 -0.045239 -0.045239 -0.045239 -0.045239 -0.045239
-0.045239 -0.045239 -0.0309533 -0.0309533 -0.0238104 -0.0166676 -0.00238192
0.0119038 0.0119038 0.0119038 0.0190466 0.0261894 0.0404751 0.045237
0.0499989 0.0547608 0.0547608 0.0619037 0.0690465 0.0833322 0.0833322
0.0833322 0.0833322 0.0833322 0.0833322 0.0833322 0.0833322 0.0833322
0.0833322 0.0833322 0.0833322 0.0833322 0.0690465 0.0690465 0.0547608
0.047618 0.0404751 0.0119038 -0.0166676 -0.0523818 -0.0595247 -0.0738103
-0.088096 -0.145239 -0.180953 -0.188096 -0.202381 -0.216667 -0.22381
-0.230953 -0.245239 -0.245239 -0.245239 -0.245239 -0.245239 -0.245239
-0.245239 -0.245239 -0.245239 -0.245239 -0.245239 -0.238096 -0.230953
-0.216667 -0.202381 -0.188096 -0.184524 -0.180953 -0.177382 -0.17381
-0.166667 -0.159524 -0.152382 -0.145239 -0.145239 -0.145239 -0.145239
-0.145239 -0.145239 -0.145239 -0.145239 -0.159524 -0.17381 -0.180953
-0.188096 -0.202381 -0.202381 -0.216667 -0.238096 -0.245239 -0.27381
-0.288096 -0.295238 -0.302381 -0.316667 -0.516667 -0.595238 -0.602381
-0.745237 -0.773809 -0.788095 -0.85238 -0.859523 -0.930951 -0.959523
-0.980951 -0.988094 -0.988094 -0.988094 -0.988094 -0.988094 -0.988094
-0.988094;
#A 0 -0.0245412 0 0.0245412 0.0490676 0.0735645 0.0980171 0.122411
0.14673 0.170962 0.19509 0.219101 0.24298 0.266713 0.290284 0.313681
0.33689 0.359895 0.382683 0.405241 0.427555 0.449611 0.471396 0.492898
0.514102 0.534997 0.55557 0.575808 0.595699 0.615231 0.634393 0.653172
0.671558 0.68954 0.707106 0.724247 0.740951 0.757208 0.77301 0.788346
0.803207 0.817584 0.831469 0.844853 0.857728 0.870087 0.881921 0.893224
0.903989 0.914209 0.923879 0.932992 0.941544 0.949528 0.95694 0.963776
0.970031 0.975702 0.980785 0.985277 0.989176 0.992479 0.995185 0.99729
0.998795 0.999699 1 0.999699 0.998796 0.997291 0.995185 0.99248 0.989177
0.985278 0.980786 0.975702 0.970032 0.963776 0.956941 0.949529 0.941545
0.932993 0.92388 0.91421 0.90399 0.893225 0.881922 0.870088 0.85773
0.844855 0.831471 0.817586 0.803209 0.788348 0.773012 0.75721 0.740952
0.724248 0.707108 0.689542 0.67156 0.653174 0.634395 0.615233 0.595701
0.57581 0.555572 0.534999 0.514105 0.4929 0.471399 0.449613 0.427557
0.405243 0.382686 0.359897 0.336892 0.313684 0.290287 0.266715 0.242983
0.219104 0.195093 0.170964 0.146733 0.122413 0.0980197 0.0735671 0.0490703
0.0245439 2.65359e-06 -0.0245386 -0.049065 -0.0735619 -0.0980144 -0.122408
-0.146728 -0.170959 -0.195088 -0.219098 -0.242977 -0.26671 -0.290282
-0.313679 -0.336887 -0.359892 -0.382681 -0.405239 -0.427552 -0.449609
-0.471394 -0.492896 -0.5141 -0.534995 -0.555568 -0.575806 -0.595697
-0.615229 -0.634391 -0.65317 -0.671557 -0.689538 -0.707104 -0.724245
-0.740949 -0.757207 -0.773008 -0.788344 -0.803205 -0.817583 -0.831468
-0.844852 -0.857727 -0.870085 -0.88192 -0.893223 -0.903988 -0.914208
-0.923878 -0.932992 -0.941543 -0.949527 -0.956939 -0.963775 -0.97003
-0.975701 -0.980785 -0.985277 -0.989176 -0.992479 -0.995184 -0.99729
-0.998795 -0.999699 -1 -0.999699 -0.998796 -0.997291 -0.995185 -0.99248
-0.989177 -0.985278 -0.980786 -0.975703 -0.970032 -0.963777 -0.956942
-0.94953 -0.941545 -0.932994 -0.923881 -0.914212 -0.903991 -0.893226
-0.881923 -0.870089 -0.857731 -0.844856 -0.831472 -0.817587 -0.80321
-0.788349 -0.773013 -0.757212 -0.740954 -0.72425 -0.70711 -0.689544
-0.671562 -0.653176 -0.634397 -0.615235 -0.595703 -0.575812 -0.555574
-0.535002 -0.514107 -0.492902 -0.471401 -0.449616 -0.42756 -0.405246
-0.382688 -0.3599 -0.336895 -0.313687 -0.29029 -0.266718 -0.242985
-0.219106 -0.195095 -0.170967 -0.146736 -0.122416 -0.0980223 -0.0735698
-0.0490729 -0.0245465 -5.30718e-06 0.0245359;
#X coords 0 1 259 -1 100 60 1 0 0;
#X restore 100 79 graph;
#X obj 101 67 cnv 13 98 11 empty empty empty 2 5 1 9 -187776 -33289
......@@ -57,205 +56,28 @@
#X obj 106 170 inlet;
#X obj 106 228 mtof;
#X obj 174 249 r \$0-phase;
#X obj 326 172 inlet;
#X obj 326 145 inlet;
#X obj 106 251 sig~;
#X obj 118 198 r \$0-freq;
#N canvas 404 191 537 377 \$0-PRESETS 0;
#N canvas 396 195 537 377 \$0-PRESETS 1;
#X obj 120 242 list prepend 0;
#X obj 120 264 s \$0-;
#X obj 120 150 tabdump \$0-;
#X obj 72 127 t b b;
#X obj 285 156 inlet;
#N canvas 471 264 623 408 \$0-AUTO-GUI 0;
#X obj 120 185 change;
#X obj 132 100 t b f;
#X obj 236 202 sel 1 0;
#X obj 120 221 sel 1 0;
#X obj 120 127 >=;
#N canvas 122 314 450 300 _color_ 0;
#X obj 210 199 * 256;
#X obj 254 178 * 256;
#X obj 254 199 * 256;
#X obj 210 259 +;
#X obj 210 220 t b f;
#X obj 210 290 +;
#X obj 254 221 t b f;
#X obj 160 242 int;
#X obj 160 222 * -1;
#X obj 210 179 * -1;
#X obj 254 158 * -1;
#X obj 160 203 int;
#X obj 210 158 int;
#X obj 254 137 int;
#X obj 171 122 unpack f f f;
#X obj 70 41 inlet;
#X obj 70 67 route bang list;
#X obj 211 328 outlet float;
#X connect 0 0 4 0;
#X connect 1 0 2 0;
#X connect 2 0 6 0;
#X connect 3 0 5 0;
#X connect 4 0 3 0;
#X connect 4 1 3 1;
#X connect 5 0 17 0;
#X connect 6 0 3 0;
#X connect 6 1 5 1;
#X connect 7 0 3 0;
#X connect 8 0 7 0;
#X connect 9 0 0 0;
#X connect 10 0 1 0;
#X connect 11 0 8 0;
#X connect 12 0 9 0;
#X connect 13 0 10 0;
#X connect 14 0 11 0;
#X connect 14 1 12 0;
#X connect 14 2 13 0;
#X connect 15 0 16 0;
#X connect 16 1 14 0;
#X restore 139 275 pd _color_;
#X msg 255 263 color \$1 12 12;
#X msg 236 338 color \$1 13 13;
#X msg 139 297 color \$1 12 12;
#N canvas 124 313 450 300 _color_ 0;
#X obj 210 199 * 256;
#X obj 254 178 * 256;
#X obj 254 199 * 256;
#X obj 210 259 +;
#X obj 210 220 t b f;
#X obj 210 290 +;
#X obj 254 221 t b f;
#X obj 160 242 int;
#X obj 160 222 * -1;
#X obj 210 179 * -1;
#X obj 254 158 * -1;
#X obj 160 203 int;
#X obj 210 158 int;
#X obj 254 137 int;
#X obj 171 122 unpack f f f;
#X obj 70 41 inlet;
#X obj 70 67 route bang list;
#X obj 211 328 outlet float;
#X connect 0 0 4 0;
#X connect 1 0 2 0;
#X connect 2 0 6 0;
#X connect 3 0 5 0;
#X connect 4 0 3 0;
#X connect 4 1 3 1;
#X connect 5 0 17 0;
#X connect 6 0 3 0;
#X connect 6 1 5 1;
#X connect 7 0 3 0;
#X connect 8 0 7 0;
#X connect 9 0 0 0;
#X connect 10 0 1 0;
#X connect 11 0 8 0;
#X connect 12 0 9 0;
#X connect 13 0 10 0;
#X connect 14 0 11 0;
#X connect 14 1 12 0;
#X connect 14 2 13 0;
#X connect 15 0 16 0;
#X connect 16 1 14 0;
#X restore 255 243 pd _color_;
#N canvas 124 313 450 300 _color_ 0;
#X obj 210 199 * 256;
#X obj 254 178 * 256;
#X obj 254 199 * 256;
#X obj 210 259 +;
#X obj 210 220 t b f;
#X obj 210 290 +;
#X obj 254 221 t b f;
#X obj 160 242 int;
#X obj 160 222 * -1;
#X obj 210 179 * -1;
#X obj 254 158 * -1;
#X obj 160 203 int;
#X obj 210 158 int;
#X obj 254 137 int;
#X obj 171 122 unpack f f f;
#X obj 70 41 inlet;
#X obj 70 67 route bang list;
#X obj 211 328 outlet float;
#X connect 0 0 4 0;
#X connect 1 0 2 0;
#X connect 2 0 6 0;
#X connect 3 0 5 0;
#X connect 4 0 3 0;
#X connect 4 1 3 1;
#X connect 5 0 17 0;
#X connect 6 0 3 0;
#X connect 6 1 5 1;
#X connect 7 0 3 0;
#X connect 8 0 7 0;
#X connect 9 0 0 0;
#X connect 10 0 1 0;
#X connect 11 0 8 0;
#X connect 12 0 9 0;
#X connect 13 0 10 0;
#X connect 14 0 11 0;
#X connect 14 1 12 0;
#X connect 14 2 13 0;
#X connect 15 0 16 0;
#X connect 16 1 14 0;
#X restore 236 312 pd _color_;
#X obj 256 81 sel 0;
#X obj 256 135 b;
#X obj 120 150 spigot 1;
#X obj 273 110 initbang;
#X obj 120 52 r \$0-read;
#X obj 132 78 r \$0-length;
#X obj 236 364 s \$0-read-in;
#X obj 256 55 r \$0-auto-max;
#X obj 120 353 s \$0-write-in;
#X msg 139 250 255 215 183;
#X msg 255 223 255 215 183;
#X msg 236 292 255 215 183;
#X msg 120 325 color 13 22 22;
#X obj 304 142 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X connect 0 0 2 0;
#X connect 0 0 3 0;
#X connect 1 0 4 0;
#X connect 1 1 4 1;
#X connect 2 0 22 0;
#X connect 2 1 21 0;
#X connect 3 0 23 0;
#X connect 3 1 20 0;
#X connect 4 0 13 0;
#X connect 5 0 8 0;
#X connect 6 0 17 0;
#X connect 7 0 17 0;
#X connect 8 0 19 0;
#X connect 9 0 6 0;
#X connect 10 0 7 0;
#X connect 11 0 12 0;
#X connect 12 0 21 0;
#X connect 12 0 20 0;
#X connect 13 0 0 0;
#X connect 14 0 12 0;
#X connect 15 0 4 0;
#X connect 16 0 1 0;