From 3faf17f7b713905f582def227df90dac15f3468d Mon Sep 17 00:00:00 2001 From: "N.N." Date: Tue, 10 Jul 2007 07:47:46 +0000 Subject: This commit was generated by cvs2svn to compensate for changes in r7969, which included commits to RCS files with non-trunk default branches. svn path=/trunk/abstractions/s-abstractions/; revision=7970 --- s-perc~.pd | 92 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 92 insertions(+) create mode 100644 s-perc~.pd (limited to 's-perc~.pd') diff --git a/s-perc~.pd b/s-perc~.pd new file mode 100644 index 0000000..23e992f --- /dev/null +++ b/s-perc~.pd @@ -0,0 +1,92 @@ +#N canvas 370 86 402 478 10; +#X obj 5 31 nbx 3 15 0 127 0 1 \$0-height \$0-height height 0 -6 0 +8 -260818 -1 -1 16 256; +#X obj 58 63 nbx 4 15 1 5000 0 0 \$0-length \$0-length length 0 -6 +0 8 -260818 -1 -1 107 256; +#N canvas 59 114 781 546 internals 0; +#X obj 88 288 osc~; +#X obj 89 196 cos~; +#X obj 90 171 line~; +#X msg 60 74 0; +#X obj 60 95 t b f; +#X obj 113 131 pack 0.25 f; +#X obj 88 220 *~; +#X obj 88 263 +~; +#X obj 289 490 outlet~; +#X obj 144 195 mtof; +#X obj 143 238 mtof; +#X obj 420 160 line~; +#X obj 517 83 * 1.1; +#X obj 288 380 *~; +#X obj 379 85 t b b; +#X obj 447 110 delay 3; +#X obj 517 58 * 4; +#X obj 185 97 * 4; +#X obj 517 30 r \$0-length; +#X obj 144 173 r \$0-height; +#X obj 143 217 r \$0-end_freq; +#X obj 185 64 r \$0-length; +#X obj 60 44 r \$0-shot; +#X obj 379 34 r \$0-shot; +#X obj 419 208 clip~ -2 2; +#X obj 419 185 expr~ -ln(1 - $v1); +#X msg 409 109 1 3; +#X obj 447 131 pack 0 f; +#X connect 0 0 13 0; +#X connect 1 0 6 0; +#X connect 2 0 1 0; +#X connect 3 0 4 0; +#X connect 4 0 5 0; +#X connect 4 1 2 0; +#X connect 5 0 2 0; +#X connect 6 0 7 0; +#X connect 7 0 0 0; +#X connect 9 0 6 1; +#X connect 10 0 7 1; +#X connect 11 0 25 0; +#X connect 12 0 27 1; +#X connect 13 0 8 0; +#X connect 14 0 15 0; +#X connect 14 1 26 0; +#X connect 15 0 27 0; +#X connect 16 0 12 0; +#X connect 17 0 5 1; +#X connect 18 0 16 0; +#X connect 19 0 9 0; +#X connect 20 0 10 0; +#X connect 21 0 17 0; +#X connect 22 0 3 0; +#X connect 23 0 14 0; +#X connect 24 0 13 1; +#X connect 25 0 24 0; +#X connect 26 0 11 0; +#X connect 27 0 11 0; +#X restore 253 19 pd internals; +#X obj 5 63 nbx 3 15 0 127 0 1 \$0-end_freq \$0-end_freq end_freq 0 +-6 0 8 -260818 -1 -1 33 256; +#X obj 253 67 outlet~; +#X obj 73 27 bng 16 250 50 0 \$0-shot \$0-shot shot 0 -6 0 8 -260818 +-1 -1; +#X obj 1 264 s-connect \$1-height \$0-height; +#X obj 1 285 s-connect \$1-end_freq \$0-end_freq; +#X obj 1 327 s-connect \$1-shot \$0-shot; +#X obj 1 306 s-connect \$1-length \$0-length; +#X obj 253 43 *~ 2; +#X obj 0 89 inlet; +#X obj 0 112 unpack f f; +#X obj 0 134 t b f; +#X obj 0 239 s \$0-shot; +#X msg 0 217 bang; +#X obj 65 136 / 12; +#X obj 65 159 s \$0-vol; +#X obj 30 188 s \$0-end_freq; +#X connect 2 0 10 0; +#X connect 10 0 4 0; +#X connect 11 0 12 0; +#X connect 12 0 13 0; +#X connect 12 1 16 0; +#X connect 13 0 15 0; +#X connect 13 1 18 0; +#X connect 15 0 14 0; +#X connect 16 0 17 0; +#X coords 0 0 1 1 100 84 1 0 0; -- cgit v1.2.1