From 61d0996525d4f76135ed4d1a21aa9a1a40df01b5 Mon Sep 17 00:00:00 2001
From: Cyrille Henry <nusmuk@users.sourceforge.net>
Date: Sun, 12 Oct 2008 15:51:41 +0000
Subject: better algorythme for band limited saw and rectangle oscillator

svn path=/trunk/externals/nusmuk/; revision=10329
---
 oscillators/saw~.pd | 57 ++++++++++++++++++++++++++++++-----------------------
 1 file changed, 32 insertions(+), 25 deletions(-)

(limited to 'oscillators/saw~.pd')

diff --git a/oscillators/saw~.pd b/oscillators/saw~.pd
index 473652a..437ba9a 100644
--- a/oscillators/saw~.pd
+++ b/oscillators/saw~.pd
@@ -1,27 +1,34 @@
 #N canvas 228 478 660 293 10;
-#X obj 31 66 -~ 0.5;
-#X obj 76 96 *~ 2;
-#X obj 32 181 -~;
-#X obj 32 117 wrap~;
-#X obj 76 156 *~ 0.5;
-#X obj 33 209 -~ 0.5;
-#X obj 445 88 /~;
-#X obj 444 63 sig~ 22050;
-#X obj 31 19 inlet~;
-#X obj 33 233 outlet~;
-#X obj 76 118 expr~ sin($v1*$v2) * (1/(0.00000001 + abs($v1)*$v2) -
-1/(0.00000001 + $v2));
-#X obj 32 45 phasor~ \$1;
+#X obj 21 -73 phasor~;
+#X obj 22 -50 -~ 0.5;
+#X obj 22 -25 *~ 2;
+#X obj 113 28 wrap~;
+#X obj 114 54 *~ 2;
+#X obj 114 79 -~ 1;
+#X obj 208 76 >~ 0;
+#X obj 317 18 /~;
+#X obj 316 -7 sig~ 22050;
+#X obj 299 41 *~;
+#X obj 300 63 abs~;
+#X obj 299 85 +~ 1.8955;
+#X obj 23 106 expr~ -0.5+($v1/-2)+$v3+$v2*sin($v4)/$v4;
+#X obj 22 -100 inlet~;
+#X obj 23 132 outlet~;
 #X connect 0 0 1 0;
-#X connect 0 0 3 0;
-#X connect 1 0 10 0;
-#X connect 2 0 5 0;
-#X connect 3 0 2 0;
-#X connect 4 0 2 0;
-#X connect 5 0 9 0;
-#X connect 6 0 10 1;
-#X connect 7 0 6 0;
-#X connect 8 0 6 1;
-#X connect 8 0 11 0;
-#X connect 10 0 4 0;
-#X connect 11 0 0 0;
+#X connect 1 0 2 0;
+#X connect 1 0 3 0;
+#X connect 1 0 6 0;
+#X connect 2 0 9 0;
+#X connect 2 0 12 0;
+#X connect 3 0 4 0;
+#X connect 4 0 5 0;
+#X connect 5 0 12 1;
+#X connect 6 0 12 2;
+#X connect 7 0 9 1;
+#X connect 8 0 7 0;
+#X connect 9 0 10 0;
+#X connect 10 0 11 0;
+#X connect 11 0 12 3;
+#X connect 12 0 14 0;
+#X connect 13 0 0 0;
+#X connect 13 0 7 1;
-- 
cgit v1.2.1