comparison June/harp_D1.pd @ 87:94fdafb68c3e

Sources made to match the one for the harp. Corrections to angle gain calculations made

 -1 -1;
 #X obj -52 0 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0;
 #X obj 11 0 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0;
 #X text 8 -91 Gain;
 #X obj -53 -117 loadbang;
-#N canvas 865 368 284 318 opLevels 1;
+#N canvas 865 368 284 318 opLevels 0;
 #X obj 74 188 dac~;
 #X obj 30 70 catch~ l;
 #X obj 128 70 catch~ r;
 #X obj 129 104 *~ 0.45;
 #X obj 30 104 *~ 0.45;

 #X connect 12 0 11 1;
 #X connect 13 0 3 1;
 #X connect 13 0 4 1;
 #X restore -53 -43 pd opLevels;
 #X obj -50 -72 hsl 100 25 0 127 0 0 empty empty empty -2 -8 0 10 -262144
--1 -1 2039 1;
+-1 -1 3898 1;
 #X obj 67 -69 hsl 100 25 0 127 0 0 empty empty empty -2 -8 0 10 -262144
 -1 -1 390 1;
 #X obj 68 -116 loadbang;
 #X msg 68 -93 5;
 #X text 129 -90 No Of Sources;
 #X msg 209 69 0;
-#X obj -59 429 stringE;
 #X msg -53 258 0.0093;
 #X msg 35 260 0.006129;
 #X text -9 241 E4;
 #X text 64 241 B4;
 #X msg 118 261 0.004585;

 #X obj 198 231 r dia;
 #X obj 280 231 r dia;
 #X obj 359 229 r dia;
 #X obj 222 4 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
 -1;
-#X obj 29 432 stringE;
-#X obj 112 432 stringE;
-#X obj 192 434 stringE;
-#X obj 274 436 stringE;
-#X obj 353 435 stringE;
 #X msg 249 72 3;
 #X msg 168 68 45;
-#X obj 222 -18 loadbang;
+#X obj 222 -56 loadbang;
 #X msg -59 194 10;
 #X msg 112 202 14;
 #X msg 192 205 16;
 #X msg 274 206 18;
 #X msg 353 206 20;
 #X text 253 -110 6 string Aeolian Harp;
 #X text 252 -97 Strings tuned to approx E major chord;
 #X text 252 -83 IF wind speed = 12 m/s;
-#X msg -53 -94 30;
 #X msg -147 -92 9;
 #X text -351 137 Light air = 0.56 m/s - 1.39 m/s;
 #X text -351 159 Light Breeze = 1.67 m/s - 3.33 m/s;
 #X text -351 179 Gentle Breeze = 3.61 m/s - 5.56 m/s;
 #X text -351 199 Moderate Breeze = 5.83 m/s - 8.33 m/s;

 #X msg 287 309 28;
 #X msg 205 308 26;
 #X msg 125 303 24;
 #X msg 42 304 22;
 #X msg -46 303 20;
+#X obj 222 -33 t b b;
+#X obj 249 -13 delay 9;
+#X obj -59 429 stringE;
+#X msg -53 -94 50;
+#X obj 353 435 stringE;
+#X obj 29 432 stringE;
+#X obj 112 432 stringE;
+#X obj 192 434 stringE;
+#X obj 274 436 stringE;
 #X connect 0 0 7 0;
 #X connect 2 0 7 1;
 #X connect 2 0 8 1;
 #X connect 3 0 6 0;
 #X connect 3 0 11 0;

 #X connect 5 0 4 0;
 #X connect 7 0 8 0;
 #X connect 8 0 1 0;
 #X connect 8 0 3 0;
 #X connect 9 0 5 0;
-#X connect 12 0 122 0;
+#X connect 12 0 115 0;
 #X connect 13 0 15 0;
-#X connect 15 0 113 0;
-#X connect 19 0 121 0;
+#X connect 15 0 107 0;
+#X connect 19 0 138 0;
 #X connect 20 0 16 0;
 #X connect 20 1 17 0;
 #X connect 21 0 20 0;
 #X connect 22 0 20 1;
 #X connect 23 0 24 0;
 #X connect 24 0 22 0;
-#X connect 26 0 42 0;
-#X connect 27 0 14 0;
-#X connect 28 0 27 1;
-#X connect 29 0 105 1;
-#X connect 32 0 106 1;
-#X connect 37 0 107 1;
-#X connect 38 0 109 1;
-#X connect 39 0 108 1;
-#X connect 46 0 61 0;
-#X connect 47 0 27 5;
-#X connect 48 0 27 4;
-#X connect 49 0 27 3;
-#X connect 50 0 141 0;
-#X connect 56 0 106 6;
-#X connect 57 0 107 6;
-#X connect 58 0 108 6;
-#X connect 59 0 109 6;
-#X connect 60 0 105 6;
-#X connect 61 0 27 6;
-#X connect 62 0 60 0;
-#X connect 63 0 105 5;
-#X connect 64 0 105 4;
-#X connect 65 0 105 3;
-#X connect 66 0 140 0;
+#X connect 26 0 41 0;
+#X connect 27 0 137 1;
+#X connect 28 0 140 1;
+#X connect 31 0 141 1;
+#X connect 36 0 142 1;
+#X connect 37 0 139 1;
+#X connect 38 0 143 1;
+#X connect 45 0 60 0;
+#X connect 46 0 137 5;
+#X connect 47 0 137 4;
+#X connect 48 0 137 3;
+#X connect 49 0 134 0;
+#X connect 55 0 141 6;
+#X connect 56 0 142 6;
+#X connect 57 0 143 6;
+#X connect 58 0 139 6;
+#X connect 59 0 140 6;
+#X connect 60 0 137 6;
+#X connect 61 0 59 0;
+#X connect 62 0 140 5;
+#X connect 63 0 140 4;
+#X connect 64 0 140 3;
+#X connect 65 0 133 0;
+#X connect 66 0 67 0;
 #X connect 67 0 68 0;
-#X connect 68 0 69 0;
-#X connect 69 0 105 0;
-#X connect 70 0 56 0;
-#X connect 71 0 106 5;
-#X connect 72 0 106 4;
-#X connect 73 0 106 3;
-#X connect 74 0 139 0;
-#X connect 75 0 76 0;
-#X connect 76 0 114 0;
-#X connect 77 0 57 0;
-#X connect 78 0 107 5;
-#X connect 79 0 107 4;
-#X connect 80 0 107 3;
-#X connect 81 0 138 0;
-#X connect 82 0 83 0;
-#X connect 83 0 115 0;
-#X connect 84 0 58 0;
-#X connect 85 0 108 5;
-#X connect 86 0 108 4;
-#X connect 87 0 108 3;
-#X connect 88 0 137 0;
-#X connect 89 0 90 0;
-#X connect 90 0 116 0;
-#X connect 91 0 59 0;
-#X connect 92 0 109 5;
-#X connect 93 0 109 4;
-#X connect 94 0 109 3;
-#X connect 95 0 136 0;
-#X connect 96 0 97 0;
-#X connect 97 0 117 0;
+#X connect 68 0 140 0;
+#X connect 69 0 55 0;
+#X connect 70 0 141 5;
+#X connect 71 0 141 4;
+#X connect 72 0 141 3;
+#X connect 73 0 132 0;
+#X connect 74 0 75 0;
+#X connect 75 0 108 0;
+#X connect 76 0 56 0;
+#X connect 77 0 142 5;
+#X connect 78 0 142 4;
+#X connect 79 0 142 3;
+#X connect 80 0 131 0;
+#X connect 81 0 82 0;
+#X connect 82 0 109 0;
+#X connect 83 0 57 0;
+#X connect 84 0 143 5;
+#X connect 85 0 143 4;
+#X connect 86 0 143 3;
+#X connect 87 0 130 0;
+#X connect 88 0 89 0;
+#X connect 89 0 110 0;
+#X connect 90 0 58 0;
+#X connect 91 0 139 5;
+#X connect 92 0 139 4;
+#X connect 93 0 139 3;
+#X connect 94 0 129 0;
+#X connect 95 0 96 0;
+#X connect 96 0 111 0;
+#X connect 97 0 27 0;
 #X connect 98 0 28 0;
-#X connect 99 0 29 0;
-#X connect 100 0 32 0;
-#X connect 101 0 37 0;
-#X connect 102 0 39 0;
-#X connect 103 0 38 0;
-#X connect 104 0 40 0;
-#X connect 104 0 111 0;
-#X connect 104 0 26 0;
-#X connect 104 0 110 0;
-#X connect 104 0 45 0;
-#X connect 104 0 44 0;
-#X connect 105 0 51 0;
-#X connect 106 0 52 0;
-#X connect 107 0 53 0;
-#X connect 108 0 54 0;
-#X connect 109 0 55 0;
-#X connect 110 0 43 0;
-#X connect 111 0 41 0;
-#X connect 112 0 104 0;
-#X connect 113 0 27 0;
-#X connect 114 0 106 0;
-#X connect 115 0 107 0;
-#X connect 116 0 108 0;
-#X connect 117 0 109 0;
-#X connect 121 0 21 0;
-#X connect 122 0 2 0;
-#X connect 136 0 109 2;
-#X connect 137 0 108 2;
-#X connect 138 0 107 2;
-#X connect 139 0 106 2;
-#X connect 140 0 105 2;
-#X connect 141 0 27 2;
+#X connect 99 0 31 0;
+#X connect 100 0 36 0;
+#X connect 101 0 38 0;
+#X connect 102 0 37 0;
+#X connect 103 0 39 0;
+#X connect 103 0 105 0;
+#X connect 103 0 26 0;
+#X connect 103 0 104 0;
+#X connect 103 0 44 0;
+#X connect 103 0 43 0;
+#X connect 104 0 42 0;
+#X connect 105 0 40 0;
+#X connect 107 0 137 0;
+#X connect 108 0 141 0;
+#X connect 109 0 142 0;
+#X connect 110 0 143 0;
+#X connect 111 0 139 0;
+#X connect 115 0 2 0;
+#X connect 129 0 139 2;
+#X connect 130 0 143 2;
+#X connect 131 0 142 2;
+#X connect 132 0 141 2;
+#X connect 133 0 140 2;
+#X connect 134 0 137 2;
+#X connect 135 0 103 0;
+#X connect 135 1 136 0;
+#X connect 136 0 103 0;
+#X connect 137 0 14 0;
+#X connect 138 0 21 0;
+#X connect 139 0 54 0;
+#X connect 140 0 50 0;
+#X connect 141 0 51 0;
+#X connect 142 0 52 0;
+#X connect 143 0 53 0;