From 35994ca3a4ef6a136a16cac63b4f68540d0434e1 Mon Sep 17 00:00:00 2001
From: Frank Barknecht <fbar@users.sourceforge.net>
Date: Fri, 23 Apr 2004 16:22:42 +0000
Subject: This commit was generated by cvs2svn to compensate for changes in
 r1630, which included commits to RCS files with non-trunk default branches.

svn path=/trunk/abstractions/rradical/; revision=1631
---
 effects/rrad.filt~.pd | 233 ++++++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 233 insertions(+)
 create mode 100644 effects/rrad.filt~.pd

(limited to 'effects/rrad.filt~.pd')

diff --git a/effects/rrad.filt~.pd b/effects/rrad.filt~.pd
new file mode 100644
index 0000000..a591d4f
--- /dev/null
+++ b/effects/rrad.filt~.pd
@@ -0,0 +1,233 @@
+#N canvas 415 35 191 107 10;
+#N canvas 757 353 450 300 noise 0;
+#X obj 215 52 == 1;
+#X obj 151 51 == 0;
+#X obj 106 228 outlet~;
+#X obj 257 79 inlet;
+#X obj 214 4 r \$0-filt_type;
+#X obj 33 52 inlet~;
+#N canvas 358 389 450 300 hip 0;
+#X obj 130 69 inlet~;
+#X obj 130 207 outlet~;
+#X obj 251 70 inlet;
+#X obj 251 119 switch~ 0;
+#X obj 130 114 hip~ 4000;
+#X obj 188 70 inlet;
+#X obj 352 74 r \$0-Q;
+#X obj 225 157 hp2~ 4000 0.707 10;
+#X connect 0 0 4 0;
+#X connect 0 0 7 0;
+#X connect 2 0 3 0;
+#X connect 5 0 4 1;
+#X connect 5 0 7 1;
+#X connect 6 0 7 2;
+#X connect 7 0 1 0;
+#X restore 91 146 pd hip;
+#N canvas 358 389 450 300 lop 0;
+#X obj 130 69 inlet~;
+#X obj 130 168 outlet~;
+#X obj 251 70 inlet;
+#X obj 188 70 inlet;
+#X obj 130 114 lop~ 4000;
+#X obj 251 120 switch~ 1;
+#X obj 350 83 r \$0-Q;
+#X obj 172 146 lp2~ 4000 0.707 20;
+#X connect 0 0 4 0;
+#X connect 0 0 7 0;
+#X connect 2 0 5 0;
+#X connect 3 0 4 1;
+#X connect 3 0 7 1;
+#X connect 6 0 7 2;
+#X connect 7 0 1 0;
+#X restore 158 145 pd lop;
+#N canvas 201 195 450 300 bap 0;
+#X obj 130 69 inlet~;
+#X obj 130 168 outlet~;
+#X obj 251 70 inlet;
+#X obj 188 70 inlet;
+#X obj 130 114 lop~ 4000;
+#X obj 350 83 r \$0-Q;
+#X obj 172 146 bpq2~ 400 0.707 20;
+#X obj 251 120 switch~ 0;
+#X connect 0 0 4 0;
+#X connect 0 0 6 0;
+#X connect 2 0 7 0;
+#X connect 3 0 4 1;
+#X connect 3 0 6 1;
+#X connect 5 0 6 2;
+#X connect 6 0 1 0;
+#X restore 245 147 pd bap;
+#X obj 262 52 == 2;
+#X obj 215 24 unpack 0 0;
+#N canvas 0 0 450 300 off 0;
+#X obj 251 70 inlet~;
+#X obj 247 170 outlet~;
+#X obj 318 66 r \$0-wet;
+#X obj 308 120 line~;
+#X obj 260 118 *~;
+#X msg 312 93 \$1 100;
+#X connect 0 0 4 0;
+#X connect 2 0 5 0;
+#X connect 3 0 4 1;
+#X connect 4 0 1 0;
+#X connect 5 0 3 0;
+#X restore 38 146 pd off;
+#X obj 311 206 s \$0-wet;
+#X obj 313 152 f;
+#X obj 313 80 select 0 1;
+#X obj 311 183 f;
+#X obj 347 132 r \$0-wet;
+#X connect 0 0 7 2;
+#X connect 1 0 6 2;
+#X connect 3 0 6 1;
+#X connect 3 0 7 1;
+#X connect 3 0 8 1;
+#X connect 4 0 10 0;
+#X connect 5 0 7 0;
+#X connect 5 0 6 0;
+#X connect 5 0 8 0;
+#X connect 5 0 11 0;
+#X connect 6 0 2 0;
+#X connect 7 0 2 0;
+#X connect 8 0 2 0;
+#X connect 9 0 8 2;
+#X connect 10 0 1 0;
+#X connect 10 0 0 0;
+#X connect 10 0 9 0;
+#X connect 11 0 2 0;
+#X connect 13 0 15 1;
+#X connect 14 0 13 0;
+#X connect 14 1 15 0;
+#X connect 15 0 12 0;
+#X connect 16 0 13 1;
+#X restore 199 133 pd noise;
+#X obj 250 110 r \$0-filt_freq;
+#X obj 144 101 inlet~;
+#X obj 163 170 outlet~;
+#X obj 232 77 s \$0-filt_type;
+#X obj 42 76 hradio 15 1 0 3 \$0-filt_type \$0-filt_type hip/lop/bp
+0 -6 0 8 -262144 -1 -1 2;
+#X obj 232 36 loadbang;
+#X obj 14 40 hsl 64 15 0 127 0 0 \$0-freq \$0-freq freq -2 -6 0 8 -262144
+-1 -1 5100 1;
+#X obj 317 -4 r \$0-freq;
+#X obj 317 21 mtof;
+#X obj 317 43 s \$0-filt_freq;
+#X obj 353 68 inlet;
+#X obj 356 89 s \$0-freq;
+#X obj 102 40 hsl 64 15 0 1 0 0 \$0-wet \$0-wet dry-level -2 -6 0 8
+-262144 -1 -1 6300 1;
+#N canvas 803 359 450 300 noise 0;
+#X obj 215 52 == 1;
+#X obj 151 51 == 0;
+#X obj 106 228 outlet~;
+#X obj 257 79 inlet;
+#X obj 214 4 r \$0-filt_type;
+#X obj 33 52 inlet~;
+#N canvas 358 389 450 300 hip 0;
+#X obj 130 69 inlet~;
+#X obj 130 207 outlet~;
+#X obj 251 70 inlet;
+#X obj 251 119 switch~ 0;
+#X obj 130 114 hip~ 4000;
+#X obj 188 70 inlet;
+#X obj 352 74 r \$0-Q;
+#X obj 225 157 hp2~ 4000 0.707 10;
+#X connect 0 0 4 0;
+#X connect 0 0 7 0;
+#X connect 2 0 3 0;
+#X connect 5 0 4 1;
+#X connect 5 0 7 1;
+#X connect 6 0 7 2;
+#X connect 7 0 1 0;
+#X restore 91 146 pd hip;
+#N canvas 358 389 450 300 lop 0;
+#X obj 130 69 inlet~;
+#X obj 130 168 outlet~;
+#X obj 251 70 inlet;
+#X obj 188 70 inlet;
+#X obj 130 114 lop~ 4000;
+#X obj 251 120 switch~ 1;
+#X obj 350 83 r \$0-Q;
+#X obj 172 146 lp2~ 4000 0.707 20;
+#X connect 0 0 4 0;
+#X connect 0 0 7 0;
+#X connect 2 0 5 0;
+#X connect 3 0 4 1;
+#X connect 3 0 7 1;
+#X connect 6 0 7 2;
+#X connect 7 0 1 0;
+#X restore 158 145 pd lop;
+#N canvas 201 195 450 300 bap 0;
+#X obj 130 69 inlet~;
+#X obj 130 168 outlet~;
+#X obj 251 70 inlet;
+#X obj 188 70 inlet;
+#X obj 130 114 lop~ 4000;
+#X obj 350 83 r \$0-Q;
+#X obj 172 146 bpq2~ 400 0.707 20;
+#X obj 251 120 switch~ 0;
+#X connect 0 0 4 0;
+#X connect 0 0 6 0;
+#X connect 2 0 7 0;
+#X connect 3 0 4 1;
+#X connect 3 0 6 1;
+#X connect 5 0 6 2;
+#X connect 6 0 1 0;
+#X restore 245 147 pd bap;
+#X obj 262 52 == 2;
+#X obj 215 24 unpack 0 0;
+#N canvas 0 0 450 300 off 0;
+#X obj 251 70 inlet~;
+#X obj 247 170 outlet~;
+#X obj 318 66 r \$0-wet;
+#X obj 308 120 line~;
+#X obj 260 118 *~;
+#X msg 312 93 \$1 100;
+#X connect 0 0 4 0;
+#X connect 2 0 5 0;
+#X connect 3 0 4 1;
+#X connect 4 0 1 0;
+#X connect 5 0 3 0;
+#X restore 38 146 pd off;
+#X connect 0 0 7 2;
+#X connect 1 0 6 2;
+#X connect 3 0 6 1;
+#X connect 3 0 7 1;
+#X connect 3 0 8 1;
+#X connect 4 0 10 0;
+#X connect 5 0 7 0;
+#X connect 5 0 6 0;
+#X connect 5 0 8 0;
+#X connect 5 0 11 0;
+#X connect 6 0 2 0;
+#X connect 7 0 2 0;
+#X connect 8 0 2 0;
+#X connect 9 0 8 2;
+#X connect 10 0 1 0;
+#X connect 10 0 0 0;
+#X connect 10 0 9 0;
+#X connect 11 0 2 0;
+#X restore 339 170 pd noise;
+#X obj 390 147 r \$0-filt_freq;
+#X obj 284 138 inlet~;
+#X obj 303 207 outlet~;
+#X msg 232 57 3;
+#X msg 186 52 1;
+#X obj 181 78 s \$0-wet;
+#X obj 111 76 tgl 15 0 \$0-filt-on empty filter-on? 0 -6 0 8 -262144
+-1 -1 0 1;
+#X connect 0 0 3 0;
+#X connect 1 0 0 1;
+#X connect 2 0 0 0;
+#X connect 6 0 18 0;
+#X connect 6 0 19 0;
+#X connect 8 0 9 0;
+#X connect 9 0 10 0;
+#X connect 11 0 12 0;
+#X connect 14 0 17 0;
+#X connect 15 0 14 1;
+#X connect 16 0 14 0;
+#X connect 18 0 4 0;
+#X connect 19 0 20 0;
+#X coords 0 0 1 1 180 80 1;
-- 
cgit v1.2.1