diff --git a/puredata/riff-help.pd b/puredata/riff-help.pd
index e89daf0..69c5165 100644
--- a/puredata/riff-help.pd
+++ b/puredata/riff-help.pd
@@ -1,4 +1,4 @@
-#N canvas 503 141 450 419 12;
+#N canvas 503 141 446 566 12;
 #N canvas 0 23 450 278 (subpatch) 0;
 #X array \$0-riff2 50 float 3;
 #A 0 0.285714 0.304762 0.328572 0.457144 0.504763 0.514287 0.542858
@@ -9,36 +9,59 @@
 0.0761888 0.0571411 0.0571411 0.0571411 0.0476172 0.0476172 0.0380933
 0.0380933 0.0380937 0.0380937 0.333333;
 #X coords 0 1 50 0 150 105 1 0 0;
-#X restore 18 46 graph;
-#X obj 18 178 tgl 20 0 empty empty empty 17 7 0 10 -262130 -1 -1 0
+#X restore 20 185 graph;
+#X obj 20 307 tgl 20 0 empty empty empty 17 7 0 10 -262130 -1 -1 1
 1;
-#X obj 212 163 tgl 20 0 empty empty 3001 17 7 0 10 -257985 -1 -1 0
-1;
-#X text 42 160 buoyfly2;
-#X obj 18 237 riff \$0-riff2 800 3001;
-#X text 258 193 <-- append key;
-#X obj 142 163 tgl 20 0 empty empty 3001 17 7 0 10 -257985 -1 -1 0
-1;
-#X text 218 233 if you don't append key \,;
-#X text 218 253 key might be 0 \,;
-#X text 185 95 <--- this graphic riff;
-#X text 49 368 use it to fill up attaching numbers (e.g. X1~X4 & PS)
+#X obj 163 327 tgl 20 0 empty empty gate_(onoff) 17 7 0 10 -257985
+-1 -1 0 1;
+#X text 177 114 <--- this graphic riff;
+#X text 51 507 use it to fill up attaching numbers (e.g. X1~X4 & PS)
 ;
-#X text 202 114 will be sent as 'velocity' values;
-#X text 218 273 if no one changed;
-#X text 168 344 ^--2nd outlet acts before 1st outlet;
-#X obj 18 342 print RIFF;
-#X msg 212 194 \$1 10;
-#X floatatom 205 316 5 0 0 0 - - -;
-#X obj 18 203 metro 1000;
-#X text 226 14 arguments:;
-#X text 236 28 (1) table name;
-#X text 236 42 (2) multiplier;
-#X text 236 56 (3) id value;
-#X connect 1 0 17 0;
-#X connect 2 0 15 0;
-#X connect 4 0 14 0;
-#X connect 4 1 16 0;
-#X connect 6 0 4 1;
-#X connect 15 0 4 1;
-#X connect 17 0 4 0;
+#X text 194 133 will be sent as 'velocity' values;
+#X text 163 483 ^--2nd outlet acts before 1st outlet;
+#X obj 20 481 print RIFF;
+#X floatatom 115 481 5 0 0 0 - - -;
+#X text 208 53 arguments:;
+#N canvas 1 89 450 278 (subpatch) 0;
+#X array \$0-riff1 50 float 3;
+#A 0 0.219048 0.228572 0.266667 0.276191 0.285715 0.295239 0.32381
+0.333334 0.361906 0.37143 0.380953 0.400001 0.414287 0.428573 0.447621
+0.466668 0.476192 0.485716 0.504764 0.514288 0.51905 0.523811 0.533335
+0.542859 0.547621 0.552383 0.571431 0.580955 0.590479 0.59524 0.600002
+0.609526 0.61905 0.623812 0.628574 0.638098 0.647622 0.657146 0.676193
+0.680955 0.685717 0.695241 0.704765 0.709527 0.714289 0.74286 0.752384
+0.761908 0.771432 0.895242;
+#X coords 0 1 50 0 150 105 1 0 0;
+#X restore 20 55 graph;
+#X obj 20 376 riff 800 3001;
+#X text 164 421 <-- onoff indicator.;
+#X text 165 446 <-- key == 0 \, unless you change.;
+#X text 300 53 (1) multiplier;
+#X text 300 67 (2) id value;
+#X obj 285 290 f \$0;
+#X obj 261 350 f \$0;
+#X obj 245 235 hradio 15 1 0 8 empty empty empty 0 -8 0 10 -262144
+-1 -1 0;
+#X obj 245 255 sel 0 1 2 3 4 5 6 7;
+#X msg 285 315 symbol \$1-riff1;
+#X floatatom 115 318 5 0 0 2 key_(pitch) - -;
+#X text 6 2 <<<;
+#X text 416 2 >>>;
+#X text 6 542 <<<;
+#X text 416 542 >>>;
+#X text 197 206 choose/change array on the fly;
+#X msg 261 375 symbol \$1-riff2;
+#X obj 20 332 metro 100;
+#X connect 1 0 28 0;
+#X connect 2 0 11 3;
+#X connect 11 0 7 0;
+#X connect 11 1 8 0;
+#X connect 16 0 20 0;
+#X connect 17 0 27 0;
+#X connect 18 0 19 0;
+#X connect 19 0 16 0;
+#X connect 19 1 17 0;
+#X connect 20 0 11 1;
+#X connect 21 0 11 2;
+#X connect 27 0 11 1;
+#X connect 28 0 11 0;
diff --git a/puredata/riff.pd b/puredata/riff.pd
index a03869d..763d67e 100644
--- a/puredata/riff.pd
+++ b/puredata/riff.pd
@@ -1,64 +1,91 @@
-#N canvas 1 89 500 333 12;
-#X obj 223 134 f;
-#X obj 259 134 + 1;
-#X floatatom 223 241 5 0 0 0 - - -;
-#X floatatom 223 290 5 0 0 0 - - -;
-#X floatatom 315 105 5 0 0 0 - - -;
-#X obj 29 66 hsl 134 20 0 400 0 0 empty empty empty -2 -8 0 10 -262130
+#N canvas 243 431 509 358 12;
+#X obj 193 94 f;
+#X obj 229 94 + 1;
+#X floatatom 193 144 5 0 0 0 - - -;
+#X floatatom 193 193 5 0 0 0 - - -;
+#X floatatom 193 242 5 0 0 0 - - -;
+#X obj 28 66 hsl 110 20 0 800 0 0 empty \$0-val empty -2 -8 0 10 -262130
 -1 -1 0 1;
-#X obj 223 265 tabread \$1;
-#X obj 223 38 inlet;
-#X obj 378 38 inlet;
-#X obj 223 91 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
+#X obj 193 18 inlet;
+#X obj 399 98 inlet;
+#X obj 193 71 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
 -1;
-#X obj 64 194 loadbang;
-#X msg 64 247 range 0 \$1;
-#X obj 26 41 bng 20 250 50 0 empty empty empty 17 7 0 10 -159808 -261234
+#X obj 54 148 loadbang;
+#X msg 54 198 range 0 \$1;
+#X obj 25 41 bng 14 250 50 0 empty empty empty 17 7 0 10 -159808 -261234
 -1;
-#X floatatom 142 41 3 0 0 0 idx - -;
-#X floatatom 79 91 12 0 0 0 val - -;
-#X obj 417 150 loadbang;
-#X obj 375 261 array size \$1;
-#X floatatom 375 286 5 0 0 0 - - -;
-#X obj 223 216 mod;
-#X obj 375 236 loadbang;
-#X obj 64 219 f \$2;
-#X obj 315 80 * \$2;
-#X obj 417 179 f \$3;
-#X obj 405 209 outlet;
-#X obj 378 69 unpack f f;
-#X obj 315 129 pack f f f f;
-#X floatatom 76 41 5 0 0 0 key - -;
-#X msg 315 170 \$4 \$3 \$1 \$2;
-#X obj 315 209 outlet;
+#X floatatom 142 41 3 0 0 0 i #0-i -;
+#X floatatom 50 91 7 0 0 0 val #0-val -;
+#X obj 417 130 loadbang;
+#X floatatom 298 100 5 0 0 0 - - -;
+#X obj 193 119 mod;
+#X obj 412 282 outlet;
+#X obj 315 179 pack f f f f;
+#X floatatom 129 91 5 0 0 0 key #0-key -;
+#X obj 315 282 outlet;
+#X obj 275 18 inlet;
+#X obj 193 168 tabread;
+#X obj 417 159 f \$2;
+#X obj 193 217 * \$1;
+#X obj 298 75 array size;
+#X msg 275 130 set \$1;
+#X obj 54 173 f \$1;
+#X obj 342 148 inlet;
+#X obj 275 44 t a b a;
+#X obj 193 266 s \$0-val;
+#X obj 412 251 r \$0-val;
+#X text 201 38 1-bng;
+#X text 321 18 2-array name;
+#X text 341 125 3-key;
+#X text 400 74 4-onoff;
+#X text 314 305 1#msg;
+#X text 414 305 2#val;
+#X obj 145 66 tgl 20 0 empty \$0-onoff empty 17 7 0 8 -257985 -1 -1
+0 1;
+#X obj 249 168 s \$0-key;
+#X obj 415 44 s \$0-onoff;
+#X symbolatom 42 41 12 0 0 0 - - -;
+#X msg 18 254 symbol no-array;
+#X obj 18 229 loadbang;
+#X obj 345 38 s \$0-an;
+#X obj 119 288 r \$0-an;
+#X msg 315 220 \$4 \$2 \$1 \$3;
+#X obj 136 144 s \$0-i;
 #X connect 0 0 1 0;
-#X connect 0 0 18 0;
+#X connect 0 0 16 0;
 #X connect 1 0 0 1;
-#X connect 2 0 6 0;
-#X connect 3 0 21 0;
-#X connect 4 0 5 0;
-#X connect 4 0 14 0;
-#X connect 4 0 25 0;
-#X connect 4 0 23 0;
-#X connect 6 0 3 0;
-#X connect 7 0 9 0;
-#X connect 8 0 24 0;
-#X connect 9 0 0 0;
-#X connect 9 0 12 0;
-#X connect 10 0 20 0;
-#X connect 11 0 5 0;
-#X connect 15 0 22 0;
-#X connect 16 0 17 0;
-#X connect 17 0 18 1;
-#X connect 18 0 2 0;
-#X connect 18 0 13 0;
-#X connect 19 0 16 0;
-#X connect 20 0 11 0;
-#X connect 21 0 4 0;
-#X connect 22 0 25 3;
-#X connect 24 0 25 1;
-#X connect 24 1 25 2;
-#X connect 24 1 26 0;
-#X connect 25 0 27 0;
-#X connect 27 0 28 0;
-#X coords 0 -1 1 1 150 100 1 20 20;
+#X connect 2 0 22 0;
+#X connect 2 0 47 0;
+#X connect 3 0 24 0;
+#X connect 4 0 18 0;
+#X connect 4 0 30 0;
+#X connect 6 0 8 0;
+#X connect 7 0 18 2;
+#X connect 7 0 40 0;
+#X connect 8 0 0 0;
+#X connect 8 0 11 0;
+#X connect 9 0 27 0;
+#X connect 10 0 5 0;
+#X connect 14 0 23 0;
+#X connect 15 0 16 1;
+#X connect 16 0 2 0;
+#X connect 18 0 46 0;
+#X connect 21 0 29 0;
+#X connect 21 0 44 0;
+#X connect 22 0 3 0;
+#X connect 23 0 18 3;
+#X connect 24 0 4 0;
+#X connect 25 0 15 0;
+#X connect 26 0 22 0;
+#X connect 27 0 10 0;
+#X connect 28 0 18 1;
+#X connect 28 0 39 0;
+#X connect 29 0 26 0;
+#X connect 29 1 25 0;
+#X connect 29 2 25 1;
+#X connect 31 0 17 0;
+#X connect 42 0 41 0;
+#X connect 43 0 42 0;
+#X connect 45 0 41 0;
+#X connect 46 0 20 0;
+#X coords 0 -1 1 1 150 95 1 20 20;