started collection of pd-ified versions of existing objectssvn2git-root

svn path=/trunk/externals/hcs/purepd/; revision=3368

6 files changed, 120 insertions, 0 deletions

diff --git a/delta.pd b/delta.pd
new file mode 100644
index 0000000..dc4f549
--- /dev/null
+++ b/delta.pd
@@ -0,0 +1,46 @@
+#N canvas 634 304 437 438 10;
+#X obj 114 136 f;
+#X obj 114 114 f;
+#X obj 85 71 t f b;
+#X obj 84 136 f;
+#X obj 97 166 -;
+#X obj 84 45 inlet;
+#X obj 135 381 outlet;
+#X obj 183 111 f \$1;
+#X obj 183 85 loadbang;
+#X obj 183 130 sel 2;
+#X text 228 117 go into 2nd order mode;
+#X obj 203 303 f;
+#X obj 203 281 f;
+#X obj 174 238 t f b;
+#X obj 173 303 f;
+#X obj 186 333 -;
+#X obj 97 212 spigot 1;
+#X obj 174 212 spigot 0;
+#X msg 147 183 0;
+#X msg 224 182 1;
+#X text 19 10 replacement for maxlib's [delta] written in Pd;
+#X connect 0 0 4 1;
+#X connect 1 0 0 0;
+#X connect 2 0 1 1;
+#X connect 2 0 3 0;
+#X connect 2 1 1 0;
+#X connect 3 0 4 0;
+#X connect 4 0 16 0;
+#X connect 4 0 17 0;
+#X connect 5 0 2 0;
+#X connect 7 0 9 0;
+#X connect 8 0 7 0;
+#X connect 9 0 19 0;
+#X connect 9 0 18 0;
+#X connect 11 0 15 1;
+#X connect 12 0 11 0;
+#X connect 13 0 12 1;
+#X connect 13 0 14 0;
+#X connect 13 1 12 0;
+#X connect 14 0 15 0;
+#X connect 15 0 6 0;
+#X connect 16 0 6 0;
+#X connect 17 0 13 0;
+#X connect 18 0 16 1;
+#X connect 19 0 17 1;
diff --git a/float_argument.pd b/float_argument.pd
new file mode 100644
index 0000000..ad44b17
--- /dev/null
+++ b/float_argument.pd
@@ -0,0 +1,14 @@
+#N canvas 390 291 482 332 10;
+#X obj 143 96 f \$1;
+#X obj 244 203 outlet;
+#X obj 143 14 loadbang;
+#X text 40 248 If the argument is not equal to 0 \, use it. Pd init
+arguments to 0 so unused arguments will be 0;
+#X obj 194 153 select 0;
+#X obj 142 51 trigger bang bang;
+#X text 39 285 This is useful to have internals inited \, but not reset
+if there is no argument specified.;
+#X connect 0 0 4 0;
+#X connect 2 0 5 0;
+#X connect 4 1 1 0;
+#X connect 5 0 0 0;
diff --git a/inv.pd b/inv.pd
new file mode 100644
index 0000000..d8605fb
--- /dev/null
+++ b/inv.pd
@@ -0,0 +1,11 @@
+#N canvas 682 147 454 304 10;
+#X obj 139 34 inlet;
+#X obj 152 255 outlet;
+#X obj 153 133 /;
+#X obj 140 88 t b f;
+#X msg 140 109 1;
+#X connect 0 0 3 0;
+#X connect 2 0 1 0;
+#X connect 3 0 4 0;
+#X connect 3 1 2 1;
+#X connect 4 0 2 0;
diff --git a/oneshot.pd b/oneshot.pd
new file mode 100644
index 0000000..e87e8ca
--- /dev/null
+++ b/oneshot.pd
@@ -0,0 +1,23 @@
+#N canvas 108 421 470 320 10;
+#X msg 228 125 1;
+#X obj 150 20 inlet;
+#X obj 259 256 outlet;
+#X text 10 7 [oneshot];
+#X text 309 255 bang;
+#X obj 228 99 t b b;
+#X msg 149 125 0;
+#X text 85 105 reset;
+#X obj 149 75 route clear;
+#X obj 149 102 bang;
+#X obj 259 206 select 0;
+#X obj 259 184 float 0;
+#X connect 0 0 11 1;
+#X connect 1 0 8 0;
+#X connect 5 0 0 0;
+#X connect 5 1 11 0;
+#X connect 6 0 11 1;
+#X connect 8 0 9 0;
+#X connect 8 1 5 0;
+#X connect 9 0 6 0;
+#X connect 10 0 2 0;
+#X connect 11 0 10 0;
diff --git a/symbol_argument.pd b/symbol_argument.pd
new file mode 100644
index 0000000..29c72bc
--- /dev/null
+++ b/symbol_argument.pd
@@ -0,0 +1,13 @@
+#N canvas 0 22 454 304 10;
+#X obj 142 28 loadbang;
+#X obj 141 63 trigger bang bang;
+#X obj 256 92 symbol;
+#X obj 141 129 select symbol;
+#X obj 141 91 symbol \$1;
+#X obj 227 261 outlet;
+#X connect 0 0 1 0;
+#X connect 1 0 4 0;
+#X connect 1 1 2 0;
+#X connect 2 0 3 1;
+#X connect 3 1 5 0;
+#X connect 4 0 3 0;
diff --git a/velocity.pd b/velocity.pd
new file mode 100644
index 0000000..a43fd3f
--- /dev/null
+++ b/velocity.pd
@@ -0,0 +1,13 @@
+#N canvas 136 458 454 304 10;
+#X obj 177 14 inlet;
+#X obj 177 268 outlet;
+#X obj 177 64 t b b;
+#X obj 178 115 timer;
+#X msg 178 159 1000 \$1;
+#X obj 178 186 /;
+#X connect 0 0 2 0;
+#X connect 2 0 3 0;
+#X connect 2 1 3 1;
+#X connect 3 0 4 0;
+#X connect 4 0 5 0;
+#X connect 5 0 1 0;