add a speedlim clone

svn path=/trunk/abstractions/nusmuk/; revision=14181

2 files changed, 55 insertions, 0 deletions

diff --git a/puremapping/speedlimit-help.pd b/puremapping/speedlimit-help.pd
new file mode 100644
index 0000000..49020db
--- /dev/null
+++ b/puremapping/speedlimit-help.pd
@@ -0,0 +1,15 @@
+#N canvas 630 215 450 300 10;
+#X floatatom 96 112 5 0 0 0 - - -;
+#X floatatom 96 153 5 0 0 0 - - -;
+#X text 55 31 limit data flow to the specific time;
+#X obj 139 179 t b b;
+#X obj 139 202 timer;
+#X floatatom 139 226 5 0 0 0 - - -;
+#X obj 96 131 speedlimit 500;
+#X text 54 47 (same than speedlim \, but as an abstraction);
+#X connect 0 0 6 0;
+#X connect 3 0 4 0;
+#X connect 3 1 4 1;
+#X connect 4 0 5 0;
+#X connect 6 0 1 0;
+#X connect 6 0 3 0;
diff --git a/puremapping/speedlimit.pd b/puremapping/speedlimit.pd
new file mode 100644
index 0000000..8b732f3
--- /dev/null
+++ b/puremapping/speedlimit.pd
@@ -0,0 +1,40 @@
+#N canvas 0 0 440 550 10;
+#X obj 45 33 inlet;
+#X obj 44 448 outlet;
+#X obj 68 124 list;
+#X msg 122 272 1;
+#X msg 111 102 1;
+#X msg 70 273 0;
+#X obj 44 214 t a b b;
+#X obj 90 350 sel 1;
+#X obj 89 378 f;
+#X obj 59 402 sel 1;
+#X obj 45 68 t a a b;
+#X obj 44 162 spigot 1;
+#X obj 177 339 f;
+#X obj 121 297 t f f;
+#X obj 71 298 t f f;
+#X obj 265 24 inlet;
+#X obj 121 248 delay \$1;
+#X connect 0 0 10 0;
+#X connect 2 0 11 0;
+#X connect 3 0 13 0;
+#X connect 4 0 8 1;
+#X connect 5 0 14 0;
+#X connect 6 0 1 0;
+#X connect 6 1 5 0;
+#X connect 6 2 16 0;
+#X connect 7 0 8 0;
+#X connect 8 0 9 0;
+#X connect 9 0 2 0;
+#X connect 10 0 11 0;
+#X connect 10 1 2 1;
+#X connect 10 2 4 0;
+#X connect 11 0 6 0;
+#X connect 12 0 11 1;
+#X connect 13 0 7 0;
+#X connect 13 1 12 0;
+#X connect 14 0 8 1;
+#X connect 14 1 12 0;
+#X connect 15 0 16 1;
+#X connect 16 0 3 0;