checking in some more abstractions

svn path=/trunk/abstractions/tb/; revision=3984

8 files changed, 309 insertions, 0 deletions

diff --git a/tbEnvify~/_bpe_stuff.pd b/tbEnvify~/_bpe_stuff.pd
new file mode 100644
index 0000000..ed20a63
--- /dev/null
+++ b/tbEnvify~/_bpe_stuff.pd
@@ -0,0 +1,34 @@
+#N canvas 0 0 631 540 10;
+#X obj 204 21 inlet control;
+#X obj 455 328 1;
+#X obj 413 286 delay;
+#X obj 413 307 0;
+#X obj 455 198 t b b;
+#X obj 485 219 zl reg stop;
+#X obj 413 350 pre_switch 10;
+#X obj 55 131 t b a;
+#X obj 55 250 bpe ---;
+#X obj 413 267 10;
+#X obj 204 42 t a b;
+#X obj 413 399 outlet switch~;
+#X obj 55 286 outlet factor;
+#X obj 77 309 outlet time;
+#X obj 55 80 py bpe parse_arguments @detach 0;
+#X text 47 460 $Id: _bpe_stuff.pd 195 2005-11-20 01:25:43Z tim $;
+#X connect 0 0 10 0;
+#X connect 1 0 6 0;
+#X connect 2 0 3 0;
+#X connect 3 0 6 0;
+#X connect 4 0 1 0;
+#X connect 4 1 5 0;
+#X connect 5 0 2 0;
+#X connect 6 0 11 0;
+#X connect 7 0 8 0;
+#X connect 7 1 8 0;
+#X connect 8 0 12 0;
+#X connect 8 1 13 0;
+#X connect 8 2 9 0;
+#X connect 9 0 2 0;
+#X connect 10 0 14 1;
+#X connect 10 1 4 0;
+#X connect 14 0 7 0;
diff --git a/tbEnvify~/_env_lookup~.pd b/tbEnvify~/_env_lookup~.pd
new file mode 100644
index 0000000..2588f7b
--- /dev/null
+++ b/tbEnvify~/_env_lookup~.pd
@@ -0,0 +1,31 @@
+#N canvas 518 105 575 385 10;
+#X obj 45 31 inlet duration;
+#X obj 148 31 inlet peak_time;
+#X obj 45 98 *;
+#X obj 45 61 t f f;
+#X obj 45 215 t b f;
+#X obj 67 148 delay;
+#X obj 45 119 t f f f;
+#X obj 89 169 !-;
+#X obj 67 193 pack 0 f;
+#X obj 45 276 line~;
+#X text 339 80 \$1 max_scaling;
+#X obj 45 246 pack \$1 f;
+#X obj 45 299 outlet~;
+#X text 101 300 outlet function;
+#X text 47 329 $Id: _env_lookup~.pd 195 2005-11-20 01:25:43Z tim $;
+#X connect 0 0 3 0;
+#X connect 1 0 2 1;
+#X connect 2 0 6 0;
+#X connect 3 0 2 0;
+#X connect 3 1 7 1;
+#X connect 4 0 11 0;
+#X connect 4 1 11 1;
+#X connect 5 0 8 0;
+#X connect 6 0 4 0;
+#X connect 6 1 5 0;
+#X connect 6 2 7 0;
+#X connect 7 0 8 1;
+#X connect 8 0 9 0;
+#X connect 9 0 12 0;
+#X connect 11 0 9 0;
diff --git a/tbEnvify~/bpe.pd b/tbEnvify~/bpe.pd
new file mode 100644
index 0000000..321c4bb
--- /dev/null
+++ b/tbEnvify~/bpe.pd
@@ -0,0 +1,15 @@
+#N canvas 365 133 527 148 10;
+#X obj 19 59 volctl~ 0 0;
+#X obj 204 15 inlet control;
+#X obj 269 70 switch~;
+#X obj 19 11 inlet~;
+#X obj 19 80 outlet~;
+#X text 304 14 duration [bp time] * n;
+#X obj 204 42 _bpe_stuff;
+#X text 21 119 $Id: bpe.pd 195 2005-11-20 01:25:43Z tim $;
+#X connect 0 0 4 0;
+#X connect 1 0 6 0;
+#X connect 3 0 0 0;
+#X connect 6 0 0 1;
+#X connect 6 1 0 2;
+#X connect 6 2 2 0;
diff --git a/tbEnvify~/bpe_rampsmooth.pd b/tbEnvify~/bpe_rampsmooth.pd
new file mode 100644
index 0000000..b0d53c4
--- /dev/null
+++ b/tbEnvify~/bpe_rampsmooth.pd
@@ -0,0 +1,40 @@
+#N canvas 20 105 625 441 10;
+#X obj 204 15 inlet control;
+#X obj 269 332 switch~;
+#X obj 19 11 inlet~;
+#X obj 19 379 outlet~;
+#X text 304 14 duration [bp time] * n;
+#X obj 204 92 _bpe_stuff;
+#X obj 204 47 zl ecils 2;
+#X obj 19 360 *~;
+#X obj 36 164 pack f f;
+#X obj 36 188 line~;
+#X obj 36 231 rampsmooth~;
+#X obj 162 131 unpack f f;
+#X obj 162 193 prepend rampup;
+#X obj 227 214 prepend rampdown;
+#X obj 269 259 sel 1;
+#X obj 269 281 1;
+#X obj 72 262 edge~;
+#X obj 102 282 0;
+#X text 21 407 $Id: bpe_rampsmooth.pd 195 2005-11-20 01:25:43Z tim $;
+#X connect 0 0 6 0;
+#X connect 2 0 7 0;
+#X connect 5 0 8 0;
+#X connect 5 1 8 1;
+#X connect 5 2 14 0;
+#X connect 6 0 5 0;
+#X connect 6 1 11 0;
+#X connect 7 0 3 0;
+#X connect 8 0 9 0;
+#X connect 9 0 10 0;
+#X connect 10 0 7 1;
+#X connect 10 0 16 0;
+#X connect 11 0 12 0;
+#X connect 11 1 13 0;
+#X connect 12 0 10 0;
+#X connect 13 0 10 0;
+#X connect 14 0 15 0;
+#X connect 15 0 1 0;
+#X connect 16 1 17 0;
+#X connect 17 0 1 0;
diff --git a/tbEnvify~/bpe_slide.pd b/tbEnvify~/bpe_slide.pd
new file mode 100644
index 0000000..28eb4d6
--- /dev/null
+++ b/tbEnvify~/bpe_slide.pd
@@ -0,0 +1,40 @@
+#N canvas 84 183 625 441 10;
+#X obj 204 15 inlet control;
+#X obj 269 332 switch~;
+#X obj 19 11 inlet~;
+#X obj 19 379 outlet~;
+#X text 304 14 duration [bp time] * n;
+#X obj 204 92 _bpe_stuff;
+#X obj 204 47 zl ecils 2;
+#X obj 19 360 *~;
+#X obj 36 164 pack f f;
+#X obj 36 188 line~;
+#X obj 162 124 unpack f f;
+#X obj 162 152 t f f;
+#X obj 227 152 t f f;
+#X obj 269 252 sel 1;
+#X obj 269 273 1;
+#X obj 121 271 edge~;
+#X obj 37 231 slide~;
+#X obj 151 291 0;
+#X text 21 401 $Id: bpe_slide.pd 195 2005-11-20 01:25:43Z tim $;
+#X connect 0 0 6 0;
+#X connect 2 0 7 0;
+#X connect 5 0 8 0;
+#X connect 5 1 8 1;
+#X connect 5 2 13 0;
+#X connect 6 0 5 0;
+#X connect 6 1 10 0;
+#X connect 7 0 3 0;
+#X connect 8 0 9 0;
+#X connect 9 0 16 0;
+#X connect 10 0 11 0;
+#X connect 10 1 12 0;
+#X connect 11 0 16 1;
+#X connect 12 0 16 2;
+#X connect 13 0 14 0;
+#X connect 14 0 1 0;
+#X connect 15 1 17 0;
+#X connect 16 0 7 1;
+#X connect 16 0 15 0;
+#X connect 17 0 1 0;
diff --git a/tbEnvify~/hanning.pd b/tbEnvify~/hanning.pd
new file mode 100644
index 0000000..b6c8c9f
--- /dev/null
+++ b/tbEnvify~/hanning.pd
@@ -0,0 +1,48 @@
+#N canvas 121 117 559 504 10;
+#X obj 177 15 inlet control;
+#X obj 177 40 t a b;
+#X text 277 14 duration peak peak_time;
+#X obj 177 65 unpack f f f;
+#X obj 19 378 *~ 0;
+#X obj 20 359 *~;
+#X obj 323 339 switch~;
+#X obj 365 268 1;
+#X obj 323 226 delay;
+#X obj 323 247 0;
+#X obj 323 204 + 10;
+#X obj 365 138 t b b;
+#X obj 395 159 zl reg stop;
+#X obj 323 290 pre_switch 10;
+#X obj 56 335 +~ 1;
+#X obj 216 361 * 0.5;
+#X obj 177 92 t f f;
+#X obj 55 288 cos~;
+#X obj 56 312 *~ -1;
+#X obj 19 11 inlet~;
+#X obj 19 399 outlet~;
+#X obj 55 268 _env_lookup~ 0.5;
+#X text 21 425 $Id: hanning.pd 195 2005-11-20 01:25:43Z tim $;
+#X connect 0 0 1 0;
+#X connect 1 0 3 0;
+#X connect 1 1 11 0;
+#X connect 3 0 16 0;
+#X connect 3 1 15 0;
+#X connect 3 2 21 1;
+#X connect 4 0 20 0;
+#X connect 5 0 4 0;
+#X connect 7 0 13 0;
+#X connect 8 0 9 0;
+#X connect 9 0 13 0;
+#X connect 10 0 8 0;
+#X connect 11 0 7 0;
+#X connect 11 1 12 0;
+#X connect 12 0 8 0;
+#X connect 13 0 6 0;
+#X connect 14 0 5 1;
+#X connect 15 0 4 1;
+#X connect 16 0 21 0;
+#X connect 16 1 10 0;
+#X connect 17 0 18 0;
+#X connect 18 0 14 0;
+#X connect 19 0 5 0;
+#X connect 21 0 17 0;
diff --git a/tbEnvify~/sine.pd b/tbEnvify~/sine.pd
new file mode 100644
index 0000000..abc725a
--- /dev/null
+++ b/tbEnvify~/sine.pd
@@ -0,0 +1,42 @@
+#N canvas 0 0 555 438 10;
+#X obj 177 15 inlet control;
+#X obj 177 40 t a b;
+#X text 277 14 duration peak peak_time;
+#X obj 177 65 unpack f f f;
+#X obj 55 288 sinx~;
+#X obj 19 338 *~ 0;
+#X obj 20 315 *~;
+#X obj 323 339 switch~;
+#X obj 365 268 1;
+#X obj 323 226 delay;
+#X obj 323 247 0;
+#X obj 323 204 + 10;
+#X obj 365 138 t b b;
+#X obj 395 159 zl reg stop;
+#X obj 323 290 pre_switch 10;
+#X obj 55 268 _env_lookup~ 1.5708;
+#X obj 177 92 t f f;
+#X obj 19 11 inlet~;
+#X obj 19 359 outlet~;
+#X text 19 385 $Id: sine.pd 195 2005-11-20 01:25:43Z tim $;
+#X connect 0 0 1 0;
+#X connect 1 0 3 0;
+#X connect 1 1 12 0;
+#X connect 3 0 16 0;
+#X connect 3 1 5 1;
+#X connect 3 2 15 1;
+#X connect 4 0 6 1;
+#X connect 5 0 18 0;
+#X connect 6 0 5 0;
+#X connect 8 0 14 0;
+#X connect 9 0 10 0;
+#X connect 10 0 14 0;
+#X connect 11 0 9 0;
+#X connect 12 0 8 0;
+#X connect 12 1 13 0;
+#X connect 13 0 9 0;
+#X connect 14 0 7 0;
+#X connect 15 0 4 0;
+#X connect 16 0 15 0;
+#X connect 16 1 11 0;
+#X connect 17 0 6 0;
diff --git a/tbEnvify~/triangle.pd b/tbEnvify~/triangle.pd
new file mode 100644
index 0000000..b302a27
--- /dev/null
+++ b/tbEnvify~/triangle.pd
@@ -0,0 +1,59 @@
+#N canvas 569 176 587 435 10;
+#X obj 19 292 volctl~ 0 0;
+#X obj 177 15 inlet control;
+#X obj 413 339 switch~;
+#X obj 177 40 t a b;
+#X obj 455 268 1;
+#X obj 413 226 delay;
+#X obj 413 247 0;
+#X obj 177 120 *;
+#X obj 55 156 t b f;
+#X obj 199 168 delay;
+#X obj 177 139 t f f f;
+#X obj 221 189 !-;
+#X obj 177 92 t f f f;
+#X obj 199 212 t b b;
+#X obj 229 238 f;
+#X obj 199 238 0;
+#X text 277 14 duration peak peak_time;
+#X obj 177 65 unpack f f f;
+#X obj 55 176 f;
+#X obj 413 204 + 10;
+#X obj 455 138 t b b;
+#X obj 485 159 zl reg stop;
+#X obj 413 290 pre_switch 10;
+#X obj 19 11 inlet~;
+#X obj 19 313 outlet~;
+#X text 23 391 $Id: triangle.pd 195 2005-11-20 01:25:43Z tim $;
+#X connect 0 0 24 0;
+#X connect 1 0 3 0;
+#X connect 3 0 17 0;
+#X connect 3 1 20 0;
+#X connect 4 0 22 0;
+#X connect 5 0 6 0;
+#X connect 6 0 22 0;
+#X connect 7 0 10 0;
+#X connect 8 0 18 0;
+#X connect 8 1 0 2;
+#X connect 9 0 13 0;
+#X connect 10 0 8 0;
+#X connect 10 1 9 0;
+#X connect 10 2 11 0;
+#X connect 11 0 14 1;
+#X connect 12 0 7 0;
+#X connect 12 1 11 1;
+#X connect 12 2 19 0;
+#X connect 13 0 15 0;
+#X connect 13 1 14 0;
+#X connect 14 0 0 2;
+#X connect 15 0 0 1;
+#X connect 17 0 12 0;
+#X connect 17 1 18 1;
+#X connect 17 2 7 1;
+#X connect 18 0 0 1;
+#X connect 19 0 5 0;
+#X connect 20 0 4 0;
+#X connect 20 1 21 0;
+#X connect 21 0 5 0;
+#X connect 22 0 2 0;
+#X connect 23 0 0 0;