From bd3f96eddd7c65d19d16c05be9ce994a51475896 Mon Sep 17 00:00:00 2001 From: Frank Barknecht Date: Sat, 9 Oct 2004 15:32:34 +0000 Subject: added chorus svn path=/trunk/abstractions/rradical/; revision=2090 --- effects/rrad.chorus~-help.pd | 44 ++++++++++++ effects/rrad.chorus~-ng.pd | 157 +++++++++++++++++++++++++++++++++++++++++++ effects/rrad.chorus~.pd | 157 +++++++++++++++++++++++++++++++++++++++++++ 3 files changed, 358 insertions(+) create mode 100644 effects/rrad.chorus~-help.pd create mode 100644 effects/rrad.chorus~-ng.pd create mode 100644 effects/rrad.chorus~.pd diff --git a/effects/rrad.chorus~-help.pd b/effects/rrad.chorus~-help.pd new file mode 100644 index 0000000..619af1a --- /dev/null +++ b/effects/rrad.chorus~-help.pd @@ -0,0 +1,44 @@ +#N canvas 243 295 803 324 10; +#X obj 161 33 metro 1000; +#X obj 164 10 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 1 1 +; +#X msg 159 53 60 100; +#X obj 166 84 pluck~; +#X obj 321 263 ezdac~; +#X obj 376 121 rrad.chorus~ /bla2; +#X obj 408 71 vline~; +#X obj 392 37 osc~ 0; +#X obj 329 34 mtof; +#X obj 381 87 *~; +#X obj 576 93 tabwrite~ x; +#X obj 583 138 table x; +#X obj 513 61 t b; +#X msg 461 23 0; +#X msg 682 132 \; x resize 10000; +#X msg 327 6 72; +#X msg 492 35 0.3 50 \, 0 200 50; +#X obj 159 119 rrad.chorus~-ng /bla; +#X connect 0 0 2 0; +#X connect 0 0 16 0; +#X connect 1 0 0 0; +#X connect 2 0 3 0; +#X connect 3 0 5 0; +#X connect 3 0 17 0; +#X connect 5 0 4 0; +#X connect 5 1 4 1; +#X connect 5 2 4 0; +#X connect 5 3 4 1; +#X connect 6 0 9 1; +#X connect 6 0 10 0; +#X connect 7 0 9 0; +#X connect 8 0 7 0; +#X connect 9 0 5 0; +#X connect 13 0 6 0; +#X connect 13 0 12 0; +#X connect 15 0 8 0; +#X connect 16 0 6 0; +#X connect 16 0 12 0; +#X connect 17 0 4 0; +#X connect 17 1 4 1; +#X connect 17 2 4 0; +#X connect 17 3 4 1; diff --git a/effects/rrad.chorus~-ng.pd b/effects/rrad.chorus~-ng.pd new file mode 100644 index 0000000..82d9281 --- /dev/null +++ b/effects/rrad.chorus~-ng.pd @@ -0,0 +1,157 @@ +#N canvas 500 433 176 90 10; +#X obj 2 17 cnv 15 170 70 empty \$0-background-cnv empty 20 12 1 14 +-225271 -66577 0; +#X obj 377 2 inlet OSC; +#N canvas 183 51 981 424 saves 0; +#X obj 45 160 originator \$1 \$0; +#X obj 152 132 inlet OSC; +#X obj 47 55 r \$0-substate; +#X obj 15 13 inlet substate; +#X obj 15 35 route substate; +#X obj 159 55 r \$0-copy; +#X msg 159 76 copy; +#X obj 243 50 r \$0-paste; +#X msg 241 71 paste; +#X text 154 15 This is the originator \, including some ready to use +standard functionality.; +#X text 507 56 Put your commun sends here \, if you like.; +#X msg 15 91 setsub \$1; +#X msg 249 184 svdir \$1; +#X obj 250 139 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 +-1; +#X obj 250 163 savepanel; +#X obj 152 189 outlet OSC; +#X msg 108 214 svxdir /tmp/svdir.xml; +#X msg 78 241 ldxdir /tmp/svdir.xml; +#X obj 507 86 r \$0-freq; +#X obj 507 110 commun /freq \$0; +#X obj 507 135 s \$0-freq; +#X obj 621 86 r \$0-mod; +#X obj 621 135 s \$0-mod; +#X obj 621 110 commun /mod \$0; +#X connect 0 2 15 0; +#X connect 1 0 0 1; +#X connect 2 0 11 0; +#X connect 3 0 4 0; +#X connect 4 0 11 0; +#X connect 4 1 0 0; +#X connect 5 0 6 0; +#X connect 6 0 0 0; +#X connect 7 0 8 0; +#X connect 8 0 0 0; +#X connect 11 0 0 0; +#X connect 12 0 0 0; +#X connect 13 0 14 0; +#X connect 14 0 12 0; +#X connect 16 0 0 0; +#X connect 17 0 0 0; +#X connect 18 0 19 0; +#X connect 19 0 20 0; +#X connect 21 0 23 0; +#X connect 23 0 22 0; +#X restore 315 1 pd saves; +#N canvas 569 61 450 300 cnv.ctl 0; +#X obj 90 188 s \$0-background-cnv; +#X floatatom 108 59 5 100 1000 0 width - -; +#X floatatom 112 83 4 50 500 0 height - -; +#X obj 92 132 pack 0 0; +#X msg 92 159 vis_size \$1 \$2; +#X obj 110 106 t b f; +#X connect 1 0 3 0; +#X connect 2 0 5 0; +#X connect 3 0 4 0; +#X connect 4 0 0 0; +#X connect 5 0 3 0; +#X connect 5 1 3 1; +#X restore 240 1 pd cnv.ctl; +#X obj 35 33 hsl 128 15 0 5 0 0 \$0-freq \$0-freq freq_0-5 -2 -6 0 +8 -261689 -1 -1 1800 1; +#X obj 35 63 hsl 128 15 0 127 0 0 \$0-mod \$0-mod mod -2 -6 0 8 -261681 +-1 -1 900 1; +#X obj 5 32 vradio 15 1 0 3 \$0-substate \$0-substate-r empty 0 -6 +0 8 -225280 -1 -1 0; +#X text 106 2 look! ==>; +#X obj 315 29 outlet OSC; +#N canvas 131 66 756 534 engine 0; +#X obj 84 199 cos~; +#X obj 84 222 +~ 1; +#X obj 171 143 +~ 0.25; +#X obj 171 198 cos~; +#X obj 171 221 +~ 1; +#X obj 84 325 outlet~; +#X obj 171 326 outlet~; +#X obj 270 142 +~ 0.25; +#X obj 270 197 cos~; +#X obj 270 220 +~ 1; +#X obj 365 140 +~ 0.25; +#X obj 365 195 cos~; +#X obj 365 218 +~ 1; +#X obj 14 32 inlet~; +#X obj 420 224 line~; +#X obj 420 203 pack 0 50; +#X obj 365 279 *~; +#X obj 270 281 *~; +#X obj 171 282 *~; +#X obj 84 283 *~; +#X obj 180 94 line~; +#X obj 180 73 pack 0 50; +#X obj 84 124 phasor~; +#X obj 270 324 outlet~; +#X obj 365 321 outlet~; +#X text 424 135 modulation; +#X text 174 28 frequence; +#X obj 14 91 delwrite~ \$0-c 1000; +#X obj 84 304 vd~ \$0-c; +#X obj 171 304 vd~ \$0-c; +#X obj 270 302 vd~ \$0-c; +#X obj 365 300 vd~ \$0-c; +#X text 451 45 taken from the abstrus collection; +#X obj 180 48 r \$0-freq; +#X obj 420 161 r \$0-mod; +#X connect 0 0 1 0; +#X connect 1 0 19 0; +#X connect 2 0 3 0; +#X connect 2 0 7 0; +#X connect 3 0 4 0; +#X connect 4 0 18 0; +#X connect 7 0 8 0; +#X connect 7 0 10 0; +#X connect 8 0 9 0; +#X connect 9 0 17 0; +#X connect 10 0 11 0; +#X connect 11 0 12 0; +#X connect 12 0 16 0; +#X connect 13 0 27 0; +#X connect 14 0 16 1; +#X connect 14 0 17 1; +#X connect 14 0 18 1; +#X connect 14 0 19 1; +#X connect 15 0 14 0; +#X connect 16 0 31 0; +#X connect 17 0 30 0; +#X connect 18 0 29 0; +#X connect 19 0 28 0; +#X connect 20 0 22 0; +#X connect 21 0 20 0; +#X connect 22 0 0 0; +#X connect 22 0 2 0; +#X connect 28 0 5 0; +#X connect 29 0 6 0; +#X connect 30 0 23 0; +#X connect 31 0 24 0; +#X connect 33 0 21 0; +#X connect 34 0 15 0; +#X restore 198 27 pd engine; +#X obj 198 2 inlet~; +#X obj 179 58 outlet~; +#X obj 200 80 outlet~; +#X obj 225 103 outlet~; +#X obj 254 129 outlet~; +#X connect 1 0 2 1; +#X connect 2 0 8 0; +#X connect 9 0 11 0; +#X connect 9 1 12 0; +#X connect 9 2 13 0; +#X connect 9 3 14 0; +#X connect 10 0 9 0; +#X coords 0 0 0.00568182 0.0111111 172 90 0; diff --git a/effects/rrad.chorus~.pd b/effects/rrad.chorus~.pd new file mode 100644 index 0000000..084b7e8 --- /dev/null +++ b/effects/rrad.chorus~.pd @@ -0,0 +1,157 @@ +#N canvas 500 433 176 90 10; +#X obj 2 17 cnv 15 170 70 empty \$0-background-cnv empty 20 12 1 14 +-225271 -66577 0; +#X obj 377 2 inlet OSC; +#N canvas 183 51 981 424 saves 0; +#X obj 45 160 originator \$1 \$0; +#X obj 152 132 inlet OSC; +#X obj 47 55 r \$0-substate; +#X obj 15 13 inlet substate; +#X obj 15 35 route substate; +#X obj 159 55 r \$0-copy; +#X msg 159 76 copy; +#X obj 243 50 r \$0-paste; +#X msg 241 71 paste; +#X text 154 15 This is the originator \, including some ready to use +standard functionality.; +#X text 507 56 Put your commun sends here \, if you like.; +#X msg 15 91 setsub \$1; +#X msg 249 184 svdir \$1; +#X obj 250 139 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 +-1; +#X obj 250 163 savepanel; +#X obj 152 189 outlet OSC; +#X msg 108 214 svxdir /tmp/svdir.xml; +#X msg 78 241 ldxdir /tmp/svdir.xml; +#X obj 507 86 r \$0-freq; +#X obj 507 110 commun /freq \$0; +#X obj 507 135 s \$0-freq; +#X obj 621 86 r \$0-mod; +#X obj 621 135 s \$0-mod; +#X obj 621 110 commun /mod \$0; +#X connect 0 2 15 0; +#X connect 1 0 0 1; +#X connect 2 0 11 0; +#X connect 3 0 4 0; +#X connect 4 0 11 0; +#X connect 4 1 0 0; +#X connect 5 0 6 0; +#X connect 6 0 0 0; +#X connect 7 0 8 0; +#X connect 8 0 0 0; +#X connect 11 0 0 0; +#X connect 12 0 0 0; +#X connect 13 0 14 0; +#X connect 14 0 12 0; +#X connect 16 0 0 0; +#X connect 17 0 0 0; +#X connect 18 0 19 0; +#X connect 19 0 20 0; +#X connect 21 0 23 0; +#X connect 23 0 22 0; +#X restore 315 1 pd saves; +#N canvas 569 61 450 300 cnv.ctl 0; +#X obj 90 188 s \$0-background-cnv; +#X floatatom 108 59 5 100 1000 0 width - -; +#X floatatom 112 83 4 50 500 0 height - -; +#X obj 92 132 pack 0 0; +#X msg 92 159 vis_size \$1 \$2; +#X obj 110 106 t b f; +#X connect 1 0 3 0; +#X connect 2 0 5 0; +#X connect 3 0 4 0; +#X connect 4 0 0 0; +#X connect 5 0 3 0; +#X connect 5 1 3 1; +#X restore 240 1 pd cnv.ctl; +#X obj 35 33 hsl 128 15 0 5 0 0 \$0-freq \$0-freq freq_0-5 -2 -6 0 +8 -261689 -1 -1 6200 1; +#X obj 35 63 hsl 128 15 0 127 0 0 \$0-mod \$0-mod mod -2 -6 0 8 -261681 +-1 -1 1800 1; +#X obj 5 32 vradio 15 1 0 3 \$0-substate \$0-substate-r empty 0 -6 +0 8 -225280 -1 -1 0; +#X text 106 2 look! ==>; +#X obj 315 29 outlet OSC; +#N canvas 131 66 756 534 engine 0; +#X obj 84 199 cos~; +#X obj 84 222 +~ 1; +#X obj 171 143 +~ 0.25; +#X obj 171 198 cos~; +#X obj 171 221 +~ 1; +#X obj 84 325 outlet~; +#X obj 171 326 outlet~; +#X obj 270 142 +~ 0.25; +#X obj 270 197 cos~; +#X obj 270 220 +~ 1; +#X obj 365 140 +~ 0.25; +#X obj 365 195 cos~; +#X obj 365 218 +~ 1; +#X obj 14 32 inlet~; +#X obj 420 224 line~; +#X obj 420 203 pack 0 50; +#X obj 365 279 *~; +#X obj 270 281 *~; +#X obj 171 282 *~; +#X obj 84 283 *~; +#X obj 180 94 line~; +#X obj 180 73 pack 0 50; +#X obj 84 124 phasor~; +#X obj 270 324 outlet~; +#X obj 365 321 outlet~; +#X text 424 135 modulation; +#X text 174 28 frequence; +#X obj 14 91 delwrite~ \$0-c 1000; +#X obj 84 304 vd~ \$0-c; +#X obj 171 304 vd~ \$0-c; +#X obj 270 302 vd~ \$0-c; +#X obj 365 300 vd~ \$0-c; +#X text 451 45 taken from the abstrus collection; +#X obj 180 48 r \$0-freq; +#X obj 420 161 r \$0-mod; +#X connect 0 0 1 0; +#X connect 1 0 19 0; +#X connect 2 0 3 0; +#X connect 2 0 7 0; +#X connect 3 0 4 0; +#X connect 4 0 18 0; +#X connect 7 0 8 0; +#X connect 7 0 10 0; +#X connect 8 0 9 0; +#X connect 9 0 17 0; +#X connect 10 0 11 0; +#X connect 11 0 12 0; +#X connect 12 0 16 0; +#X connect 13 0 27 0; +#X connect 14 0 16 1; +#X connect 14 0 17 1; +#X connect 14 0 18 1; +#X connect 14 0 19 1; +#X connect 15 0 14 0; +#X connect 16 0 31 0; +#X connect 17 0 30 0; +#X connect 18 0 29 0; +#X connect 19 0 28 0; +#X connect 20 0 22 0; +#X connect 21 0 20 0; +#X connect 22 0 0 0; +#X connect 22 0 2 0; +#X connect 28 0 5 0; +#X connect 29 0 6 0; +#X connect 30 0 23 0; +#X connect 31 0 24 0; +#X connect 33 0 21 0; +#X connect 34 0 15 0; +#X restore 198 27 pd engine; +#X obj 198 2 inlet~; +#X obj 179 58 outlet~; +#X obj 200 80 outlet~; +#X obj 225 103 outlet~; +#X obj 254 129 outlet~; +#X connect 1 0 2 1; +#X connect 2 0 8 0; +#X connect 9 0 11 0; +#X connect 9 1 12 0; +#X connect 9 2 13 0; +#X connect 9 3 14 0; +#X connect 10 0 9 0; +#X coords 0 0 1 1 172 90 1; -- cgit v1.2.1