some more ugens

svn path=/trunk/externals/tb/; revision=1902

3 files changed, 61 insertions, 9 deletions

diff --git a/sc4pd/pd/impulse.pd b/sc4pd/pd/impulse.pd
new file mode 100644
index 0000000..5381863
--- /dev/null
+++ b/sc4pd/pd/impulse.pd
@@ -0,0 +1,31 @@
+#N canvas 0 0 782 300 10;
+#X obj 93 170 dac~;
+#X obj 108 75 sig~ 440;
+#X floatatom 227 53 5 0 0 0 - - -;
+#X msg 20 31 kr;
+#X msg 62 30 ar;
+#X floatatom 363 150 5 0 0 0 - - -;
+#X obj 343 235 timer;
+#X floatatom 343 267 5 0 0 0 - - -;
+#X obj 353 197 t b b;
+#X msg 402 29 0.1;
+#X msg 451 39 kr 10;
+#X msg 223 88 freq \$1;
+#X obj 373 128 change;
+#X obj 107 117 Impulse~ 440 ar;
+#X obj 376 89 Impulse 1 20;
+#X connect 1 0 13 0;
+#X connect 2 0 11 0;
+#X connect 3 0 13 0;
+#X connect 4 0 13 0;
+#X connect 5 0 8 0;
+#X connect 6 0 7 0;
+#X connect 8 0 6 0;
+#X connect 8 1 6 1;
+#X connect 9 0 14 0;
+#X connect 10 0 14 0;
+#X connect 11 0 13 0;
+#X connect 12 0 5 0;
+#X connect 13 0 0 0;
+#X connect 13 0 0 1;
+#X connect 14 0 12 0;
diff --git a/sc4pd/pd/integrator.pd b/sc4pd/pd/integrator.pd
new file mode 100644
index 0000000..3c8719d
--- /dev/null
+++ b/sc4pd/pd/integrator.pd
@@ -0,0 +1,21 @@
+#N canvas 0 0 450 300 10;
+#X obj 12 159 dac~;
+#X obj 89 131 print~;
+#X obj 144 112 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X floatatom 112 20 5 0 0 0 - - -;
+#X floatatom 265 37 9 0 0 0 - - -;
+#X floatatom 266 110 9 0 0 0 - - -;
+#X obj 18 86 Integrator~ 0.3;
+#X msg 89 60 leak \$1;
+#X obj 18 28 Dust~ 441;
+#X obj 266 78 Integrator 0.5;
+#X connect 2 0 1 0;
+#X connect 3 0 7 0;
+#X connect 4 0 9 0;
+#X connect 6 0 1 0;
+#X connect 6 0 0 0;
+#X connect 6 0 0 1;
+#X connect 7 0 6 0;
+#X connect 8 0 6 0;
+#X connect 9 0 5 0;
diff --git a/sc4pd/pd/mantissamask.pd b/sc4pd/pd/mantissamask.pd
index 5e2d3ed..b99ca00 100644
--- a/sc4pd/pd/mantissamask.pd
+++ b/sc4pd/pd/mantissamask.pd
@@ -4,18 +4,18 @@
 #X obj 89 131 print~;
 #X obj 144 112 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
 -1;
-#X obj 18 86 MantissaMask~ 3;
 #X floatatom 112 20 5 0 0 0 - - -;
-#X msg 89 60 set \$1;
 #X floatatom 265 37 9 0 0 0 - - -;
 #X floatatom 266 110 9 0 0 0 - - -;
 #X obj 266 78 MantissaMask 0;
-#X connect 0 0 4 0;
+#X obj 18 86 MantissaMask~ 3;
+#X msg 89 60 set \$1;
+#X connect 0 0 8 0;
 #X connect 3 0 2 0;
-#X connect 4 0 2 0;
-#X connect 4 0 1 0;
-#X connect 4 0 1 1;
-#X connect 5 0 6 0;
-#X connect 6 0 4 0;
-#X connect 7 0 9 0;
+#X connect 4 0 9 0;
+#X connect 5 0 7 0;
+#X connect 7 0 6 0;
+#X connect 8 0 2 0;
+#X connect 8 0 1 0;
+#X connect 8 0 1 1;
 #X connect 9 0 8 0;