From 4f59a6ad1f6fff30c4473059d5edd4b60ee9af0e Mon Sep 17 00:00:00 2001 From: Cyrille Henry Date: Tue, 8 Jul 2008 11:38:59 +0000 Subject: add band limited oscillartors svn path=/trunk/externals/nusmuk/; revision=10149 --- oscillators/pwm~.pd | 49 +++++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 49 insertions(+) create mode 100644 oscillators/pwm~.pd (limited to 'oscillators/pwm~.pd') diff --git a/oscillators/pwm~.pd b/oscillators/pwm~.pd new file mode 100644 index 0000000..f78a3df --- /dev/null +++ b/oscillators/pwm~.pd @@ -0,0 +1,49 @@ +#N canvas 699 168 644 573 10; +#X obj 31 156 -~ 0.5; +#X obj 76 186 *~ 2; +#X obj 32 271 -~; +#X obj 32 207 wrap~; +#X obj 76 246 *~ 0.5; +#X obj 445 178 /~; +#X obj 444 153 sig~ 22050; +#X obj 31 19 inlet~; +#X obj 76 208 expr~ sin($v1*$v2) * (1/(0.00000001 + abs($v1)*$v2) - +1/(0.00000001 + $v2)); +#X obj 32 49 phasor~ \$1; +#X obj 171 319 -~ 0.5; +#X obj 216 349 *~ 2; +#X obj 172 434 -~; +#X obj 172 370 wrap~; +#X obj 216 409 *~ 0.5; +#X obj 34 547 outlet~; +#X obj 216 371 expr~ sin($v1*$v2) * (1/(0.00000001 + abs($v1)*$v2) +- 1/(0.00000001 + $v2)); +#X obj 172 269 +~; +#X obj 191 19 inlet~; +#X obj 171 295 wrap~; +#X obj 34 516 -~; +#X connect 0 0 1 0; +#X connect 0 0 3 0; +#X connect 1 0 8 0; +#X connect 2 0 20 0; +#X connect 3 0 2 0; +#X connect 4 0 2 0; +#X connect 5 0 8 1; +#X connect 5 0 16 1; +#X connect 6 0 5 0; +#X connect 7 0 5 1; +#X connect 7 0 9 0; +#X connect 8 0 4 0; +#X connect 9 0 0 0; +#X connect 9 0 17 0; +#X connect 10 0 11 0; +#X connect 10 0 13 0; +#X connect 11 0 16 0; +#X connect 12 0 20 1; +#X connect 13 0 12 0; +#X connect 14 0 12 0; +#X connect 16 0 14 0; +#X connect 17 0 19 0; +#X connect 18 0 17 1; +#X connect 19 0 10 0; +#X connect 20 0 15 0; -- cgit v1.2.1