adding else abstractions in Plugins/Examples folder and adding [decla…

…re -path else] to some patch examples

Plugins/Examples/PdStal/PdStal.pd

@@ -1,4 +1,5 @@
-#N canvas 685 83 718 307 10;
+#N canvas 562 83 718 307 10;
+#X declare -path else;
 #N canvas 0 23 450 300 \$0-internal 0;
 #X coords 0 -1 1 1 460 160 2 2 2;
 #X restore 2 28 pd \$0-internal;
@@ -288,4 +289,5 @@
 #X obj 230 8 bng 15 250 50 0 \$0-close empty empty 17 7 0 10 -262144
 -1 -1;
 #X text 247 7 Close;
+#X obj 478 7 declare -path else;
 #X coords 0 -1 1 1 460 186 2 2 2;

Plugins/Examples/PdStalFx/PdStalFx.pd

@@ -1,4 +1,5 @@
-#N canvas 685 83 718 307 10;
+#N canvas 562 83 718 307 10;
+#X declare -path else;
 #N canvas 0 23 450 300 \$0-internal 0;
 #X coords 0 -1 1 1 460 160 2 2 2;
 #X restore 2 28 pd \$0-internal;
@@ -287,4 +288,5 @@
 #X obj 230 8 bng 15 250 50 0 \$0-close empty empty 17 7 0 10 -262144
 -1 -1;
 #X text 247 7 Close;
+#X obj 479 7 declare -path else;
 #X coords 0 -1 1 1 460 186 2 2 2;

Plugins/Examples/else/above.pd

@@ -0,0 +1,18 @@
+#N canvas 712 203 486 290 12;
+#X declare -path else;
+#X obj 87 199 outlet;
+#X obj 147 199 outlet;
+#X obj 87 47 inlet;
+#X obj 140 47 inlet;
+#X obj 87 96 > \$1;
+#X obj 87 155 select 1 0;
+#X obj 87 126 change;
+#X text 199 122 Part of ELSE \; https://github.com/porres/pd-else;
+#X text 201 103 Alexandre Torres Porres (2019);
+#X obj 248 52 declare -path else;
+#X connect 2 0 4 0;
+#X connect 3 0 4 1;
+#X connect 4 0 6 0;
+#X connect 5 0 0 0;
+#X connect 5 1 1 0;
+#X connect 6 0 5 0;

Plugins/Examples/else/add.pd

@@ -0,0 +1,23 @@
+#N canvas 679 101 496 340 10;
+#X declare -path else;
+#X obj 143 231 f;
+#X obj 85 113 route float bang set;
+#X obj 163 142 route float;
+#X obj 124 199 f \$1;
+#X obj 109 230 +;
+#X obj 85 57 inlet;
+#X obj 109 264 outlet;
+#X text 205 198 Part of ELSE \; https://github.com/porres/pd-else;
+#X text 207 179 Alexandre Torres Porres (2018);
+#X obj 100 85 lb -init;
+#X obj 262 91 declare -path else;
+#X connect 0 0 4 1;
+#X connect 1 0 4 0;
+#X connect 1 1 3 0;
+#X connect 1 2 2 0;
+#X connect 2 0 3 0;
+#X connect 3 0 4 1;
+#X connect 4 0 0 0;
+#X connect 4 0 6 0;
+#X connect 5 0 1 0;
+#X connect 9 0 1 0;

Plugins/Examples/else/allpass.filt~.pd

@@ -0,0 +1,97 @@
+#N canvas 852 105 485 347 10;
+#X declare -path else;
+#N canvas 348 60 465 617 \$0-Allpass-stages 0;
+#X obj 60 19 inlet~;
+#X obj 60 864 outlet~;
+#X restore 62 163 pd \$0-Allpass-stages;
+#N canvas 652 370 484 311 set 0;
+#X obj 199 195 s~ \$0-q;
+#X obj 148 265 outlet~;
+#X obj 108 91 - 10;
+#X obj 63 186 s~ \$0-freq;
+#X obj 64 28 inlet~;
+#X obj 63 118 clip~ 10;
+#X obj 108 67 sr~;
+#X obj 199 29 inlet~;
+#X obj 199 135 max~ 0.1;
+#X connect 2 0 5 2;
+#X connect 4 0 5 0;
+#X connect 5 0 3 0;
+#X connect 6 0 2 0;
+#X connect 7 0 8 0;
+#X connect 8 0 0 0;
+#X restore 120 127 pd set;
+#X obj 62 91 inlet~;
+#X obj 62 216 outlet~;
+#X text 221 160 Part of ELSE \; https://github.com/porres/pd-else;
+#X text 223 141 Alexandre Torres Porres (2017);
+#X obj 120 91 inlet~;
+#X obj 120 60 r \$0-hz;
+#X obj 175 60 r \$0-q;
+#X obj 175 91 inlet~;
+#N canvas 723 101 551 466 init 0;
+#X obj 176 238 loop;
+#X obj 149 215 t f f;
+#X obj 176 262 sel 0;
+#X obj 176 333 f \$0;
+#X obj 149 333 + 1;
+#X obj 104 122 select 0;
+#X obj 149 150 clip 2 64;
+#X obj 149 171 / 2;
+#X obj 149 192 int;
+#X msg 104 183 1;
+#X obj 234 419 s pd-\$0-Allpass-stages;
+#X msg 149 375 connect \$1 0 1 0, f 8;
+#X obj 203 283 expr 50 + 25 * $f1 \; $f1 + 1 \; $f1 + 2;
+#X obj 233 334 pack f f f \$0;
+#X obj 104 50 args;
+#X obj 104 95 unpack float float float;
+#X obj 180 122 s \$0-hz;
+#X obj 258 122 s \$0-q;
+#X obj 104 22 lb -init 2;
+#X msg 258 95 1;
+#X msg 180 69 10;
+#X obj 47 72 route bang;
+#X msg 233 358 obj 60 \$1 allpass_unit \$4 \, connect \$2 0 \$3 0,
+f 47;
+#X msg 242 388 obj 60 50 allpass_unit \$1 \, connect 0 0 2 0;
+#X connect 0 0 2 0;
+#X connect 1 0 4 0;
+#X connect 1 1 0 0;
+#X connect 2 0 3 0;
+#X connect 2 1 12 0;
+#X connect 3 0 23 0;
+#X connect 4 0 11 0;
+#X connect 5 0 9 0;
+#X connect 5 1 6 0;
+#X connect 6 0 7 0;
+#X connect 7 0 8 0;
+#X connect 8 0 1 0;
+#X connect 9 0 1 0;
+#X connect 11 0 10 0;
+#X connect 12 0 13 0;
+#X connect 12 1 13 1;
+#X connect 12 2 13 2;
+#X connect 13 0 22 0;
+#X connect 14 0 21 0;
+#X connect 15 0 5 0;
+#X connect 15 1 16 0;
+#X connect 15 2 17 0;
+#X connect 18 0 14 0;
+#X connect 18 1 19 0;
+#X connect 18 1 20 0;
+#X connect 19 0 17 0;
+#X connect 20 0 16 0;
+#X connect 21 0 9 0;
+#X connect 21 1 15 0;
+#X connect 22 0 10 0;
+#X connect 23 0 10 0;
+#X restore 239 91 pd init;
+#X obj 278 217 declare -path else;
+#X connect 0 0 3 0;
+#X connect 1 0 0 0;
+#X connect 2 0 0 0;
+#X connect 6 0 1 0;
+#X connect 7 0 6 0;
+#X connect 8 0 9 0;
+#X connect 9 0 1 1;

Plugins/Examples/else/any2symbol.pd

@@ -0,0 +1,67 @@
+#N canvas 540 183 822 289 10;
+#X obj 171 120 makefilename %g;
+#X obj 288 205 outlet;
+#X obj 54 48 inlet;
+#X obj 288 120 symbol bang;
+#N canvas 727 42 578 444 list-any 0;
+#X obj 69 36 inlet;
+#X obj 69 370 outlet;
+#X obj 69 125 trigger bang list bang;
+#X obj 264 301 list prepend;
+#X obj 69 294 list;
+#X obj 333 259 list append 32;
+#X obj 69 332 list tosymbol;
+#X obj 185 270 list fromsymbol;
+#X obj 69 89 list;
+#N canvas 816 210 280 272 drip 0;
+#X obj 92 201 outlet;
+#X obj 110 32 inlet;
+#X obj 81 90 until;
+#X obj 92 177 list store;
+#X obj 110 61 t b b l;
+#X obj 81 119 f;
+#X obj 116 120 + 1;
+#X msg 129 94 0, f 2;
+#X msg 81 148 get \$1 1;
+#X connect 1 0 4 0;
+#X connect 2 0 5 0;
+#X connect 3 0 0 0;
+#X connect 3 1 2 1;
+#X connect 4 0 2 0;
+#X connect 4 1 7 0;
+#X connect 4 2 3 1;
+#X connect 5 0 6 0;
+#X connect 5 0 8 0;
+#X connect 6 0 5 1;
+#X connect 7 0 5 1;
+#X connect 8 0 3 0;
+#X restore 133 171 pd drip;
+#X obj 133 208 route float symbol;
+#X obj 133 238 makefilename %g;
+#X connect 0 0 8 0;
+#X connect 2 0 4 0;
+#X connect 2 1 9 0;
+#X connect 2 2 3 1;
+#X connect 3 0 4 1;
+#X connect 3 0 5 0;
+#X connect 4 0 6 0;
+#X connect 5 0 3 1;
+#X connect 6 0 1 0;
+#X connect 7 0 3 0;
+#X connect 8 0 2 0;
+#X connect 9 0 10 0;
+#X connect 10 0 11 0;
+#X connect 10 1 7 0;
+#X connect 11 0 7 0;
+#X restore 405 120 pd list-any;
+#X text 529 139 Part of ELSE \; https://github.com/porres/pd-else;
+#X obj 54 87 route symbol float bang, f 59;
+#X text 531 120 Alexandre Torres Porres (2018-2020);
+#X connect 0 0 1 0;
+#X connect 2 0 6 0;
+#X connect 3 0 1 0;
+#X connect 4 0 1 0;
+#X connect 6 0 1 0;
+#X connect 6 1 0 0;
+#X connect 6 2 3 0;
+#X connect 6 3 4 0;

Plugins/Examples/else/autotune.pd

@@ -0,0 +1,141 @@
+#N canvas 725 236 626 520 12;
+#X declare -path else;
+#X obj 345 302 array define \$0-scale;
+#X f 22;
+#X obj 237 270 - 60;
+#X obj 344 238 array max \$0-scale;
+#X obj 344 266 / 100;
+#X obj 344 126 t b l l;
+#X obj 367 186 array set \$0-scale;
+#X obj 418 125 list length;
+#X obj 418 149 array size \$0-scale;
+#X obj 77 45 inlet;
+#X obj 237 299 wrap2 0 12;
+#X obj 160 259 v i_\$0;
+#X obj 160 284 tabread \$0-scale, f 8;
+#X obj 160 321 / 100;
+#X obj 160 360 -;
+#X obj 142 394 +;
+#X obj 137 222 t f b f;
+#N canvas 1052 561 424 442 find-index 0;
+#X obj 135 35 inlet;
+#X obj 196 134 array get \$0-scale, f 9;
+#X obj 196 182 iterate;
+#X obj 135 62 * 100;
+#X msg 181 263 1e+20;
+#X obj 187 292 f;
+#X obj 140 292 min;
+#X obj 140 326 change;
+#X obj 140 361 t f b;
+#X obj 210 326 f;
+#X obj 228 239 count;
+#X obj 196 208 t f b;
+#X obj 210 361 v i_\$0;
+#X obj 140 239 -;
+#X obj 140 263 abs;
+#X obj 135 91 t b f b;
+#X msg 284 132 reset;
+#X msg 77 258 set -1;
+#X connect 0 0 3 0;
+#X connect 1 0 2 0;
+#X connect 2 0 11 0;
+#X connect 3 0 15 0;
+#X connect 4 0 6 1;
+#X connect 5 0 6 1;
+#X connect 6 0 7 0;
+#X connect 7 0 8 0;
+#X connect 8 0 5 0;
+#X connect 8 1 9 0;
+#X connect 9 0 12 0;
+#X connect 10 0 9 1;
+#X connect 11 0 13 0;
+#X connect 11 1 10 0;
+#X connect 13 0 14 0;
+#X connect 14 0 6 0;
+#X connect 15 0 1 0;
+#X connect 15 1 13 1;
+#X connect 15 2 16 0;
+#X connect 15 2 4 0;
+#X connect 15 2 17 0;
+#X connect 16 0 10 0;
+#X connect 17 0 7 0;
+#X restore 237 336 pd find-index;
+#X obj 344 45 inlet;
+#N canvas 999 363 599 403 init 0;
+#X obj 201 369 outlet;
+#X msg 395 194 0 100 200 300 400 500 600 700 800 900 1000 1100 1200
+, f 26;
+#X obj 202 217 list split 1;
+#X obj 201 275 route bang;
+#X obj 107 41 lb -init 2, f 28;
+#X obj 96 273 s \$0-base;
+#X obj 107 76 args -;
+#X obj 107 112 route bang list -base -bypass;
+#X obj 256 146 s \$0-bp;
+#X connect 1 0 0 0;
+#X connect 2 0 5 0;
+#X connect 2 1 3 0;
+#X connect 3 1 0 0;
+#X connect 4 0 6 0;
+#X connect 4 1 1 0;
+#X connect 6 0 7 0;
+#X connect 7 1 0 0;
+#X connect 7 2 2 0;
+#X connect 7 3 8 0;
+#X restore 355 91 pd init;
+#X obj 77 458 outlet;
+#X obj 449 80 declare -path else;
+#X obj 261 204 r \$0-base;
+#X text 247 395 Part of ELSE \; https://github.com/porres/pd-else;
+#X text 249 376 Alexandre Torres Porres (2020);
+#X obj 77 93 route float bypass base;
+#N canvas 931 463 309 350 bypass 0;
+#X obj 73 239 router 2 2;
+#X obj 139 108 == 1;
+#X msg 139 194 1;
+#X obj 139 132 sel 1 0;
+#X msg 175 194 2;
+#X obj 139 75 != 0;
+#X obj 184 161 r \$0-bp;
+#X obj 136 44 inlet;
+#X obj 65 42 inlet;
+#X obj 77 290 outlet;
+#X obj 148 292 outlet;
+#X connect 0 0 9 0;
+#X connect 0 1 10 0;
+#X connect 1 0 3 0;
+#X connect 2 0 0 1;
+#X connect 3 0 2 0;
+#X connect 3 1 4 0;
+#X connect 4 0 0 1;
+#X connect 5 0 1 0;
+#X connect 6 0 2 0;
+#X connect 7 0 5 0;
+#X connect 8 0 0 0;
+#X restore 77 134 pd bypass;
+#X connect 1 0 9 0;
+#X connect 2 0 3 0;
+#X connect 3 0 9 2;
+#X connect 4 0 2 0;
+#X connect 4 1 5 0;
+#X connect 4 2 6 0;
+#X connect 6 0 7 0;
+#X connect 8 0 24 0;
+#X connect 9 0 13 1;
+#X connect 9 0 16 0;
+#X connect 10 0 11 0;
+#X connect 11 0 12 0;
+#X connect 12 0 13 0;
+#X connect 13 0 14 1;
+#X connect 14 0 19 0;
+#X connect 15 0 14 0;
+#X connect 15 1 10 0;
+#X connect 15 2 1 0;
+#X connect 17 0 4 0;
+#X connect 18 0 4 0;
+#X connect 21 0 1 1;
+#X connect 24 0 25 0;
+#X connect 24 1 25 1;
+#X connect 24 2 1 1;
+#X connect 25 0 19 0;
+#X connect 25 1 15 0;