From 47950158fef8a54a1b1e416f5dc7cf6cedcf2989 Mon Sep 17 00:00:00 2001
From: Hans-Christoph Steiner <eighthave@users.sourceforge.net>
Date: Sat, 4 Feb 2006 03:29:40 +0000
Subject: added some more handy objects from Cyrille's collection with only
 tiny modifications

svn path=/trunk/externals/mapping/; revision=4551
---
 pd/distance2d.pd |  30 ++++++++++++++++
 pd/lop.pd        | 106 +++++++++++++++++++++++++++++++++++++++++++++++++++++++
 pd/wave.pd       |  68 +++++++++++++++++++++++++++++++++++
 3 files changed, 204 insertions(+)
 create mode 100644 pd/distance2d.pd
 create mode 100644 pd/lop.pd
 create mode 100644 pd/wave.pd

(limited to 'pd')

diff --git a/pd/distance2d.pd b/pd/distance2d.pd
new file mode 100644
index 0000000..6fc1d3d
--- /dev/null
+++ b/pd/distance2d.pd
@@ -0,0 +1,30 @@
+#N canvas 0 0 450 505 10;
+#X obj 80 47 inlet;
+#X obj 91 285 outlet;
+#X obj 80 80 unpack f f;
+#X obj 216 44 inlet;
+#X obj 216 77 unpack f f;
+#X obj 144 180 t f f;
+#X obj 143 205 *;
+#X obj 82 177 t f f;
+#X obj 81 202 *;
+#X obj 89 238 +;
+#X obj 92 263 sqrt;
+#X obj 84 151 - \$1;
+#X obj 144 152 - \$2;
+#X connect 0 0 2 0;
+#X connect 2 0 11 0;
+#X connect 2 1 12 0;
+#X connect 3 0 4 0;
+#X connect 4 0 11 1;
+#X connect 4 1 12 1;
+#X connect 5 0 6 0;
+#X connect 5 1 6 1;
+#X connect 6 0 9 1;
+#X connect 7 0 8 0;
+#X connect 7 1 8 1;
+#X connect 8 0 9 0;
+#X connect 9 0 10 0;
+#X connect 10 0 1 0;
+#X connect 11 0 7 0;
+#X connect 12 0 5 0;
diff --git a/pd/lop.pd b/pd/lop.pd
new file mode 100644
index 0000000..c978353
--- /dev/null
+++ b/pd/lop.pd
@@ -0,0 +1,106 @@
+#N canvas 1205 247 289 326 10;
+#N canvas 0 0 587 495 coef 0;
+#X obj 62 26 inlet;
+#X obj 213 34 inlet;
+#X text 388 334 B;
+#X obj 224 163 f;
+#X obj 222 241 * 2;
+#X obj 220 216 sqrt;
+#X obj 236 284 cos;
+#X obj 222 305 *;
+#X obj 237 262 * 6.28;
+#X obj 150 110 t b f;
+#X text 257 36 d;
+#X obj 221 129 pow;
+#X msg 224 100 0.5;
+#X obj 225 79 t b f;
+#X obj 221 332 outlet;
+#X obj 323 335 outlet;
+#X connect 0 0 9 0;
+#X connect 1 0 13 0;
+#X connect 3 0 15 0;
+#X connect 3 0 5 0;
+#X connect 4 0 7 0;
+#X connect 5 0 4 0;
+#X connect 6 0 7 1;
+#X connect 7 0 14 0;
+#X connect 8 0 6 0;
+#X connect 9 0 3 0;
+#X connect 9 1 8 0;
+#X connect 11 0 3 0;
+#X connect 12 0 11 0;
+#X connect 13 0 12 0;
+#X connect 13 1 11 1;
+#X restore 85 133 pd coef;
+#N canvas 765 291 521 640 biquad 0;
+#X obj 259 22 inlet;
+#X obj 420 20 inlet;
+#X obj 151 265 f;
+#X obj 132 530 f;
+#X obj 74 196 f;
+#X obj 75 299 *;
+#X obj 74 402 +;
+#X obj 151 339 *;
+#X obj 74 220 t f f b;
+#X obj 74 453 +;
+#X obj 151 361 * -1;
+#X obj 45 20 inlet;
+#X msg 34 135 0 \, 0 \, 0;
+#X obj 138 562 outlet;
+#X obj 38 95 route reset;
+#X obj 161 21 inlet;
+#X obj 103 133 t b b f;
+#X obj 259 73 -;
+#X obj 259 138 * -1;
+#X obj 258 102 - 1;
+#X obj 164 405 *;
+#X obj 219 405 +;
+#X obj 219 434 f;
+#X obj 75 481 +;
+#X msg 103 158 0 0;
+#X connect 0 0 5 1;
+#X connect 0 0 17 0;
+#X connect 1 0 7 1;
+#X connect 1 0 17 1;
+#X connect 2 0 7 0;
+#X connect 3 0 4 1;
+#X connect 3 0 13 0;
+#X connect 4 0 8 0;
+#X connect 5 0 6 0;
+#X connect 6 0 9 0;
+#X connect 7 0 10 0;
+#X connect 8 0 5 0;
+#X connect 8 1 2 1;
+#X connect 8 2 2 0;
+#X connect 9 0 23 0;
+#X connect 10 0 6 1;
+#X connect 11 0 14 0;
+#X connect 12 0 4 0;
+#X connect 14 0 12 0;
+#X connect 14 1 16 0;
+#X connect 15 0 21 0;
+#X connect 16 0 24 0;
+#X connect 16 1 4 0;
+#X connect 16 2 20 0;
+#X connect 17 0 19 0;
+#X connect 18 0 20 1;
+#X connect 19 0 18 0;
+#X connect 20 0 9 1;
+#X connect 21 0 22 0;
+#X connect 22 0 21 1;
+#X connect 22 0 23 1;
+#X connect 23 0 3 0;
+#X connect 24 0 21 0;
+#X restore 47 218 pd biquad;
+#X obj 47 259 outlet;
+#X obj 47 42 inlet;
+#X obj 85 87 inlet;
+#X obj 66 63 inlet;
+#X obj 129 110 inlet;
+#X connect 0 0 1 2;
+#X connect 0 1 1 3;
+#X connect 1 0 2 0;
+#X connect 3 0 1 0;
+#X connect 4 0 0 0;
+#X connect 5 0 1 1;
+#X connect 6 0 0 1;
diff --git a/pd/wave.pd b/pd/wave.pd
new file mode 100644
index 0000000..d026a76
--- /dev/null
+++ b/pd/wave.pd
@@ -0,0 +1,68 @@
+#N canvas 360 127 609 536 10;
+#X obj 25 -15 inlet;
+#X obj 267 -14 inlet;
+#X obj 542 -11 inlet;
+#X text 66 -12 position;
+#X text 405 -9 largeur de la vague;
+#X obj 133 178 until;
+#X obj 133 212 f;
+#X obj 159 212 + 1;
+#X obj 133 260 /;
+#X obj 164 302 abs;
+#X obj 164 346 min 1;
+#X obj 164 365 - 1;
+#X obj 164 385 abs;
+#X obj 164 406 list prepend;
+#X obj 199 442 list;
+#X obj 176 464 list;
+#X obj 176 491 outlet;
+#X msg 73 134 0;
+#X obj 261 174 - 1;
+#X obj 133 130 max 1;
+#X obj 400 118 max 0;
+#X text 153 -14 number of points;
+#X obj 400 69 loadbang;
+#X obj 400 90 float_argument \$2 0.5;
+#X text 460 70 default: 0.5;
+#X obj 164 327 /;
+#X obj 26 74 trigger bang bang bang float bang;
+#X obj 164 282 -;
+#X obj 133 153 trigger float float;
+#X obj 132 26 loadbang;
+#X obj 133 105 float;
+#X obj 132 47 float_argument \$1 25;
+#X text 281 46 default: 25 points;
+#X connect 0 0 26 0;
+#X connect 1 0 31 1;
+#X connect 2 0 23 1;
+#X connect 5 0 6 0;
+#X connect 6 0 7 0;
+#X connect 6 0 8 0;
+#X connect 7 0 6 1;
+#X connect 8 0 27 0;
+#X connect 9 0 25 0;
+#X connect 10 0 11 0;
+#X connect 11 0 12 0;
+#X connect 12 0 13 0;
+#X connect 13 0 14 0;
+#X connect 14 0 13 1;
+#X connect 14 0 15 1;
+#X connect 15 0 16 0;
+#X connect 17 0 6 1;
+#X connect 18 0 8 1;
+#X connect 19 0 28 0;
+#X connect 20 0 25 1;
+#X connect 22 0 23 0;
+#X connect 23 0 20 0;
+#X connect 25 0 10 0;
+#X connect 26 0 15 0;
+#X connect 26 1 30 0;
+#X connect 26 2 17 0;
+#X connect 26 3 27 1;
+#X connect 26 4 13 1;
+#X connect 27 0 9 0;
+#X connect 28 0 5 0;
+#X connect 28 1 18 0;
+#X connect 29 0 31 0;
+#X connect 30 0 19 0;
+#X connect 31 0 30 0;
-- 
cgit v1.2.1