#N canvas 685 105 560 505 10;
#X obj 6 467 cnv 15 552 21 empty empty empty 20 12 0 14 -233017 -33289
0;
#X obj 6 270 cnv 3 550 3 empty empty inlets 8 12 0 13 -228856 -1 0
;
#X obj 6 391 cnv 3 550 3 empty empty outlets 8 12 0 13 -228856 -1 0
;
#X obj 6 421 cnv 3 550 3 empty empty arguments 8 12 0 13 -228856 -1
0;
#X obj 85 278 cnv 17 3 57 empty empty 0 5 9 0 16 -228856 -162280 0
;
#X obj 85 339 cnv 17 3 23 empty empty 1 5 9 0 16 -228856 -162280 0
;
#X text 147 448 2) float;
#X obj 85 367 cnv 17 3 17 empty empty 2 5 9 0 16 -228856 -162280 0
;
#X text 169 367 float;
#X text 127 316 set <symbol>;
#X text 127 278 float/signal;
#X text 127 339 float/signal;
#X text 211 277 - values to write into an array;
#X obj 2 6 cnv 15 553 42 empty empty empty 20 12 0 14 -233017 -66577
0;
#N canvas 0 22 450 278 (subpatch) 0;
#X coords 0 1 100 -1 554 42 1 0 0;
#X restore 2 5 graph;
#X obj 305 6 cnv 15 250 40 empty empty empty 12 13 0 18 -128992 -233080
0;
#N canvas 382 141 749 319 (subpatch) 0;
#X coords 0 -1 1 1 252 42 2 100 100;
#X restore 304 5 pd;
#X text 211 317 - sets array name;
#X text 210 367 - sets the channel for the value being recorded, f
56;
#X text 147 429 1) symbol;
#X text 163 399 (none);
#X obj 17 8 cyclone/comment 425 33 DejaVu\ Sans\ Mono empty 0 0 0 0
0 255 255 255 0 0 poke~;
#X obj 18 60 cyclone/comment 425 14 DejaVu\ Sans\ Mono empty 0 0 0
0 0 255 255 255 0 0 Write to an array;
#X obj 322 30 cyclone/comment 425 13 DejaVu\ Sans\ Mono empty 0 224
228 220 0 255 255 255 0 0 Objects cloned from Max/MSP;
#X obj 363 6 cyclone/comment 425 24 DejaVu\ Sans\ Mono empty 0 224
228 220 0 255 255 255 0 0 cyclone;
#X text 33 153 1;
#X text 27 245 -1;
#X obj 48 157 cnv 15 148 98 empty empty empty 20 12 0 14 -233017 -66577
0;
#N canvas 1 79 450 300 (subpatch) 0;
#X array \$0-array 22050 float 0;
#X coords 0 1.1 22049 -1.1 150 100 1 0 0;
#X restore 47 156 graph;
#X text 213 429 - array name to write to;
#X text 115 296 list <f \, f \, f>;
#X text 211 296 - <value> \, <index> and <channel>;
#X obj 329 141 sig~ -1;
#X msg 292 138 1;
#X msg 299 162 2;
#X obj 292 193 selector~ 2 2;
#X text 264 138 off;
#X text 275 162 on;
#N canvas 933 72 415 486 control 0;
#X obj 157 104 bng 15 250 50 0 empty empty empty 17 7 0 10 -228856
-1 -1;
#X text 276 149 <= index;
#X text 184 103 write to array;
#X text 108 315 1;
#X text 102 425 -1;
#X obj 126 319 cnv 15 198 118 empty empty empty 20 12 0 14 -233017
-66577 0;
#N canvas 1 79 450 300 (subpatch) 0;
#X array \$0-table 44100 float 0;
#X coords 0 1.1 44099 -1.1 200 120 1 0 0;
#X restore 125 318 graph;
#X text 29 21 You can use control messages isntead of signals. In this
way \, [poke~] behaves similarly to the [peek~] object. Note \, however
\, that the left two inlets are reversed on [poke~] when compared to
[peek~].;
#X obj 157 127 cyclone/uzi 44110 0;
#X obj 158 175 expr random(-1000 \, 1001)/1000.0;
#X obj 231 241 cyclone/poke~;
#X obj 52 159 symbol \$0-table;
#X obj 52 125 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#X msg 52 184 set \$1;
#X obj 52 100 loadbang;
#X text 70 124 <= set table;
#X text 89 136 name;
#X connect 0 0 8 0;
#X connect 8 0 9 0;
#X connect 8 2 10 1;
#X connect 9 0 10 0;
#X connect 11 0 13 0;
#X connect 12 0 11 0;
#X connect 13 0 10 0;
#X connect 14 0 12 0;
#X restore 484 215 pd control;
#N canvas 550 188 841 430 multichannel 0;
#X obj 407 31 cnv 15 198 118 empty empty empty 20 12 0 14 -233017 -66577
0;
#N canvas 0 22 450 278 (subpatch) 0;
#X array 0-quadraphonic_\$0 100 float 0;
#X coords 0 1.1 99 -1.1 200 120 2 0 0;
#X restore 406 30 graph;
#X obj 239 241 nbx 2 14 1 4 0 0 empty empty empty 0 -8 0 10 -228856
-1 -1 1 256;
#X msg 189 208 1;
#X msg 221 208 2;
#X msg 254 208 3;
#X msg 286 208 4;
#X obj 622 30 cnv 15 198 118 empty empty empty 20 12 0 14 -233017 -66577
0;
#N canvas 0 22 450 278 (subpatch) 0;
#X array 1-quadraphonic_\$0 100 float 0;
#X coords 0 1.1 99 -1.1 200 120 2 0 0;
#X restore 621 29 graph;
#X obj 408 176 cnv 15 198 118 empty empty empty 20 12 0 14 -233017
-66577 0;
#N canvas 0 22 450 278 (subpatch) 0;
#X array 2-quadraphonic_\$0 100 float 0;
#X coords 0 1.1 99 -1.1 200 120 2 0 0;
#X restore 407 175 graph;
#X obj 623 175 cnv 15 198 118 empty empty empty 20 12 0 14 -233017
-66577 0;
#N canvas 0 22 450 278 (subpatch) 0;
#X array 3-quadraphonic_\$0 100 float 0;
#X coords 0 1.1 99 -1.1 200 120 2 0 0;
#X restore 622 174 graph;
#X obj 56 265 cyclone/poke~ quadraphonic_\$0 1;
#X obj 56 228 noise~;
#X obj 147 177 cyclone/count~ 0 100 1;
#N canvas 207 34 366 264 (subpatch) 0;
#X obj 51 101 tgl 42 0 \$0-tgl-s \$0-tgl-r empty 1 8 1 9 -74965 -212593
-262144 1 1;
#X obj 215 68 route dsp;
#X obj 215 37 receive pd;
#N canvas 977 77 379 291 set_color 0;
#X obj 47 30 inlet;
#X obj 147 200 s \$0-cnv;
#X obj 47 83 select 0 1;
#X obj 47 220 s \$0-tgl-r;
#N canvas 0 22 712 637 off 0;
#X obj 490 220 * -1;
#X obj 424 300 +;
#X obj 409 325 +;
#X obj 347 219 * -65536;
#X obj 424 220 * -256;
#X obj 409 356 - 1;
#X obj 390 189 unpack f f f;
#X obj 225 295 +;
#X obj 210 320 +;
#X obj 148 214 * -65536;
#X obj 225 215 * -256;
#X obj 291 215 * -1;
#X obj 210 351 - 1;
#X obj 191 184 unpack f f f;
#X obj 379 423 pack;
#X msg 395 152 124 124 124;
#X msg 203 154 220 220 220;
#X obj 238 121 t b b;
#X obj 238 81 inlet;
#X obj 378 485 outlet;
#X connect 0 0 1 1;
#X connect 1 0 2 1;
#X connect 2 0 5 0;
#X connect 3 0 2 0;
#X connect 4 0 1 0;
#X connect 5 0 14 1;
#X connect 6 0 3 0;
#X connect 6 1 4 0;
#X connect 6 2 0 0;
#X connect 7 0 8 1;
#X connect 8 0 12 0;
#X connect 9 0 8 0;
#X connect 10 0 7 0;
#X connect 11 0 7 1;
#X connect 12 0 14 0;
#X connect 13 0 9 0;
#X connect 13 1 10 0;
#X connect 13 2 11 0;
#X connect 14 0 19 0;
#X connect 15 0 6 0;
#X connect 16 0 13 0;
#X connect 17 0 16 0;
#X connect 17 1 15 0;
#X connect 18 0 17 0;
#X restore 47 113 pd off;
#X msg 47 180 color \$1 \$2 0;
#X msg 147 131 -4.86997e+06 -1.34937e+07;
#X msg 147 171 color \$1 0 \$2;
#X connect 0 0 2 0;
#X connect 2 0 4 0;
#X connect 2 1 6 0;
#X connect 4 0 5 0;
#X connect 4 0 7 0;
#X connect 5 0 3 0;
#X connect 6 0 7 0;
#X connect 6 0 5 0;
#X connect 7 0 1 0;
#X restore 215 165 pd set_color;
#X obj 135 122 r \$0-tgl-s;
#N canvas 121 482 450 300 (subpatch) 0;
#X obj 101 101 cnv 25 40 25 empty \$0-cnv DSP 3 13 0 20 -74965 -212593
0;
#X coords 0 -1 1 1 42 27 1 100 100;
#X restore 51 144 pd;
#X obj 226 139 s \$0-tgl-r;
#X msg 226 115 set \$1;
#X msg 135 177 \; pd dsp \$1;
#N canvas 256 32 278 194 load_check 0;
#X obj 136 53 sig~ 1;
#X obj 74 24 loadbang;
#X obj 136 86 snapshot~;
#X obj 91 52 del 5;
#X obj 136 151 outlet;
#X obj 74 103 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
1;
#X obj 74 126 switch~;
#X connect 0 0 2 0;
#X connect 1 0 3 0;
#X connect 1 0 5 0;
#X connect 2 0 4 0;
#X connect 3 0 2 0;
#X connect 3 0 5 0;
#X connect 5 0 6 0;
#X restore 51 72 pd load_check;
#X connect 1 0 3 0;
#X connect 1 0 7 0;
#X connect 2 0 1 0;
#X connect 4 0 8 0;
#X connect 4 0 3 0;
#X connect 7 0 6 0;
#X connect 9 0 0 0;
#X coords 0 -1 1 1 44 72 2 50 100;
#X restore 353 222 pd;
#X text 12 102 The name convention for multi channel arrays is the
table name preceded by the channel number (starting from zero) and
"-" \, such as: "0-" \, "1-" \, "2-" \, "3-" \, and so on...;
#X text 11 31 The [poke~] object also works with multi channel arrays
(maximum 64). In this example we have 4 channels \, which can be accessed
as an argument or a float input into the right inlet. No argument loads
the first channel by default., f 60;
#X obj 549 345 cyclone/buffer~;
#X text 145 345 Please check the [buffer~] object for multichannel
buffers =>, f 61;
#X text 237 376 Internally \, it creates buffers with the above mentioned
naming convention.;
#X connect 2 0 13 2;
#X connect 3 0 2 0;
#X connect 4 0 2 0;
#X connect 5 0 2 0;
#X connect 6 0 2 0;
#X connect 14 0 13 0;
#X connect 15 0 13 1;
#X restore 454 238 pd multichannel;
#X text 77 92 [poke~] writes signals to an array at indexes specified
by a signal.;
#X obj 228 193 osc~ 9.9;
#X obj 367 167 cyclone/count~ 0 22050 1;
#X obj 228 227 cyclone/poke~ \$0-array;
#X text 210 337 -;
#X text 213 448 - channel (default 1 \, maximum 64);
#X text 222 336 index to record to (if negative or larger than the
buffer \, no data is written), f 54;
#X obj 499 69 cyclone/setdsp~;
#X connect 32 0 35 1;
#X connect 33 0 35 0;
#X connect 34 0 35 0;
#X connect 35 0 43 1;
#X connect 41 0 43 0;
#X connect 42 0 35 2;
