diff polarD1.pd @ 12:b481d42c58fb

Polar work inc spectral info

--- a/polarD1.pd	Sun Jan 18 19:24:18 2015 +0000
+++ b/polarD1.pd	Mon Jan 19 11:09:58 2015 +0000
@@ -1,17 +1,17 @@
 #N canvas 169 74 991 677 10;
 #X obj 442 -1591 hsl 128 15 0 127 0 0 empty empty empty -2 -8 0 10
--262144 -1 -1 10700 1;
+-262144 -1 -1 4000 1;
 #X obj 439 -1616 inlet;
-#X obj 417 -1249 throw~ l;
-#X obj 482 -1249 throw~ r;
-#X obj 417 -1381 r~ white;
+#X obj 414 -1198 throw~ l;
+#X obj 479 -1198 throw~ r;
+#X obj 417 -1437 r~ white;
 #X obj 495 -1446 cos~;
-#X obj 495 -1358 osc~;
+#X obj 518 -1358 osc~;
 #X obj 417 -1315 *~ 2;
 #X obj 439 -1565 / 127;
-#X text 451 -1212 high Tone;
+#X text 448 -1161 high Tone;
 #X obj 495 -1424 lop~ 0.1;
-#X obj 417 -1271 fcpan 0.48;
+#X obj 414 -1220 fcpan 0.48;
 #X obj 20 -1588 noise~;
 #N canvas 312 129 764 550 windspeed 0;
 #X obj 127 63 +~ 1;
@@ -94,7 +94,7 @@
 #X msg 184 10 0.1;
 #X obj 127 41 osc~ 0.1;
 #X obj 38 103 vsl 15 128 0 127 0 0 empty empty empty 0 -9 0 10 -262144
--1 -1 6600 1;
+-1 -1 0 1;
 #X obj 127 200 *~ 1;
 #X obj 40 256 / 64;
 #X obj 127 233 clip~ 0 2;
@@ -102,7 +102,7 @@
 #X obj 248 93 inlet;
 #X obj 38 68 inlet;
 #X obj 127 -151 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1
-1 1;
+0 1;
 #X obj 127 -100 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
 -1 -1;
 #X floatatom 127 -52 5 0 0 0 - - -;
@@ -150,43 +150,22 @@
 #X obj -30 -1409 prvu~;
 #X obj -29 -1376 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0;
 #X obj 82 -1477 vsl 15 128 0 127 0 0 empty empty empty 0 -9 0 10 -262144
--1 -1 10700 1;
+-1 -1 1100 1;
 #X obj 82 -1329 / 64;
-#X obj 417 -1359 bp~ 300 200;
 #X obj 253 -1504 hsl 128 15 0 127 0 0 empty empty empty -2 -8 0 10
--262144 -1 -1 5900 1;
+-262144 -1 -1 6400 1;
 #X obj 251 -1410 hsl 128 15 0 127 0 0 empty empty empty -2 -8 0 10
--262144 -1 -1 12700 1;
+-262144 -1 -1 4700 1;
 #X obj 250 -1480 / 127;
 #X obj 248 -1388 / 127;
 #X obj 254 -1449 * 600;
 #X obj 247 -1337 + 10;
-#X obj 438 -1405 * 40;
+#X obj 438 -1461 * 40;
 #X floatatom 330 -1465 5 0 0 0 - - -;
 #X floatatom 297 -1302 5 0 0 0 - - -;
 #X obj 626 -1536 hsl 128 15 0 127 0 0 empty empty empty -2 -8 0 10
--262144 -1 -1 1400 1;
+-262144 -1 -1 400 1;
 #X obj 623 -1513 / 127;
-#X obj 573 -1149 *~ 2;
-#X obj 573 -1101 throw~ l;
-#X obj 637 -1101 throw~ r;
-#X obj 573 -1126 fcpan 0.64;
-#X obj 574 -1306 r~ white;
-#X obj 609 -1283 vd~ a 90;
-#X obj 608 -1257 *~ 30;
-#X obj 608 -1237 +~ 200;
-#X obj 574 -1194 vcf~ 200 6;
-#X obj 726 -1200 hsl 128 15 0 127 0 0 empty empty empty -2 -8 0 10
--262144 -1 -1 0 1;
-#X obj 723 -1174 / 127;
-#X obj 727 -1309 hsl 128 15 0 127 0 0 empty empty empty -2 -8 0 10
--262144 -1 -1 12700 1;
-#X obj 724 -1283 / 127;
-#X obj 724 -1233 + 3;
-#X floatatom 781 -1236 5 0 0 0 - - -;
-#X obj 724 -1258 * 1000;
-#X obj 723 -1146 * 100;
-#X obj 540 -1267 lop~ 600 1;
 #N canvas 0 22 450 300 (subpatch) 0;
 #X array \$0-array 100 float 0;
 #X coords 0 1 99 0 100 100 1 0 0;
@@ -196,35 +175,32 @@
 #X obj 77 -1577 loadbang;
 #X obj 61 -1528 tabwrite~ \$0-array;
 #X obj 145 -1575 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1
-1 1;
-#X obj 744 -1430 hsl 128 15 0 127 0 0 empty empty empty -2 -8 0 10
--262144 -1 -1 0 1;
-#X obj 741 -1404 / 127;
-#X obj 744 -1379 * 1000;
-#X obj 745 -1355 + 100;
+0 1;
 #X obj 495 -1556 vd~ a 10;
-#X obj 248 -1363 * 3000;
-#X obj 415 -1291 *~;
-#X obj 495 -1402 *~ 1000;
-#X obj 623 -1480 * 2000;
-#X obj 622 -1451 + 10;
-#X obj 495 -1380 +~ 300;
-#X obj 495 -1534 clip~ 0.5 0.99;
-#X obj 483 -1319 hip~ 60 50;
-#X obj 416 -1336 *~ 1;
+#X obj 248 -1363 * 30;
+#X obj 495 -1402 *~ 100;
+#X obj 495 -1380 +~ 200;
+#X obj 416 -1291 *~;
+#X obj 417 -1359 bp~ 300 200;
+#X obj 622 -1451 + 1;
+#X obj 623 -1480 * 200;
+#X obj 415 -1393 lop~ 400 10;
+#X obj 416 -1336 *~;
+#X obj 332 -1372 / 2;
+#X obj 495 -1534 clip~ 0.7 0.99;
 #X connect 0 0 8 0;
 #X connect 1 0 0 0;
-#X connect 4 0 30 0;
+#X connect 4 0 55 0;
 #X connect 5 0 10 0;
-#X connect 6 0 78 0;
-#X connect 7 0 72 0;
-#X connect 8 0 37 0;
-#X connect 10 0 73 0;
+#X connect 6 0 51 1;
+#X connect 7 0 51 0;
+#X connect 8 0 36 0;
+#X connect 10 0 49 0;
 #X connect 11 0 2 0;
 #X connect 11 1 3 0;
 #X connect 12 0 15 0;
 #X connect 13 0 14 0;
-#X connect 13 0 64 0;
+#X connect 13 0 45 0;
 #X connect 16 0 13 1;
 #X connect 17 0 13 2;
 #X connect 18 0 13 0;
@@ -239,49 +215,32 @@
 #X connect 28 0 29 0;
 #X connect 29 0 22 1;
 #X connect 29 0 23 1;
-#X connect 30 0 79 0;
+#X connect 30 0 32 0;
 #X connect 31 0 33 0;
 #X connect 32 0 34 0;
-#X connect 33 0 35 0;
-#X connect 34 0 71 0;
-#X connect 35 0 30 1;
+#X connect 33 0 48 0;
+#X connect 34 0 37 0;
+#X connect 34 0 57 0;
 #X connect 35 0 38 0;
-#X connect 36 0 30 2;
-#X connect 36 0 39 0;
-#X connect 37 0 7 1;
-#X connect 40 0 41 0;
-#X connect 41 0 74 0;
-#X connect 45 0 43 0;
-#X connect 45 1 44 0;
-#X connect 46 0 59 0;
-#X connect 47 0 48 0;
-#X connect 48 0 49 0;
-#X connect 49 0 50 1;
-#X connect 50 0 42 0;
-#X connect 51 0 52 0;
-#X connect 52 0 58 0;
-#X connect 53 0 54 0;
-#X connect 54 0 57 0;
-#X connect 55 0 50 2;
-#X connect 55 0 56 0;
-#X connect 57 0 55 0;
-#X connect 58 0 42 1;
-#X connect 59 0 50 0;
-#X connect 61 0 64 0;
-#X connect 63 0 61 0;
-#X connect 63 0 61 0;
-#X connect 65 0 61 0;
-#X connect 66 0 67 0;
-#X connect 67 0 68 0;
-#X connect 68 0 69 0;
-#X connect 69 0 59 1;
-#X connect 70 0 77 0;
-#X connect 71 0 36 0;
-#X connect 72 0 11 0;
-#X connect 73 0 76 0;
-#X connect 74 0 75 0;
-#X connect 75 0 73 1;
-#X connect 76 0 6 0;
-#X connect 77 0 5 0;
-#X connect 78 0 72 1;
-#X connect 79 0 7 0;
+#X connect 36 0 7 1;
+#X connect 37 0 52 1;
+#X connect 38 0 52 2;
+#X connect 39 0 40 0;
+#X connect 40 0 54 0;
+#X connect 42 0 45 0;
+#X connect 44 0 42 0;
+#X connect 44 0 42 0;
+#X connect 46 0 42 0;
+#X connect 47 0 58 0;
+#X connect 48 0 35 0;
+#X connect 49 0 50 0;
+#X connect 49 0 56 1;
+#X connect 50 0 6 0;
+#X connect 51 0 11 0;
+#X connect 52 0 56 0;
+#X connect 53 0 49 1;
+#X connect 54 0 53 0;
+#X connect 55 0 52 0;
+#X connect 56 0 7 0;
+#X connect 57 0 55 1;
+#X connect 58 0 5 0;