diff Propellor/Propellor.pd @ 225:f13bc86bb52f

Propellor GUI added for Will's demo
Improved hysteresis for the Aeolian Harp.
New Harp model added for further drafting

--- a/Propellor/Propellor.pd	Tue May 31 10:53:35 2016 +0100
+++ b/Propellor/Propellor.pd	Mon Jun 06 11:00:13 2016 +0100
@@ -3,9 +3,9 @@
 #X obj 315 44 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
 1;
 #X obj 315 85 s myMet;
-#X obj -273 428 hsl 100 20 0 4000 0 0 empty empty RPM 2 10 0 10 -262144
+#X obj -266 427 hsl 100 20 0 4000 0 0 empty empty RPM 2 10 0 10 -262144
 -1 -1 0 1;
-#X floatatom -276 455 8 0 0 0 - - -;
+#X floatatom 76 540 0 0 0 0 - - -;
 #X obj 143 73 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
 -1;
 #X obj 143 126 s GO;
@@ -22,9 +22,9 @@
 #X obj 83 21 loadbang;
 #X obj 83 45 delay 13;
 #X obj -275 52 hsl 100 20 -50 50 0 0 empty empty empty -2 -8 0 10 -262144
--1 -1 7654 1;
+-1 -1 4554 1;
 #X obj -276 146 hsl 100 20 -50 50 0 0 empty empty empty -2 -8 0 10
--262144 -1 -1 5440 1;
+-262144 -1 -1 5940 1;
 #X obj -276 237 hsl 100 20 -50 50 0 0 empty empty empty -2 -8 0 10
 -262144 -1 -1 4999 1;
 #X obj -278 75 s Xobs;
@@ -69,8 +69,8 @@
 #X connect 7 0 4 1;
 #X connect 7 0 3 1;
 #X restore 427 102 pd opLevels;
-#X obj 430 73 hsl 100 25 0.001 1e+12 1 0 empty empty empty -2 -8 0
-10 -262144 -1 -1 3959 1;
+#X obj 77 426 hsl 100 25 1000 10000 1 0 empty empty Gain 2 13 0 10
+-261682 -1 -66577 0 1;
 #X obj 427 2 r GAIN;
 #X floatatom 370 103 8 0 0 0 - - -;
 #N canvas 361 203 1002 525 sources 0;
@@ -1920,7 +1920,7 @@
 #X connect 33 0 38 6;
 #X restore 292 254 pd sources;
 #X floatatom 227 52 5 0 0 0 - - -;
-#X obj -276 345 hsl 100 20 0.1 3 0 0 empty empty Blade_Length 2 10
+#X obj -271 342 hsl 100 20 0.1 3 0 0 empty empty Blade_Length 2 10
 0 10 -262144 -1 -1 4384 1;
 #X floatatom -319 368 5 0 0 0 - - -;
 #X obj -324 319 r setUp;
@@ -1932,20 +1932,7 @@
 #X msg -232 322 1;
 #X msg -190 317 2;
 #X obj 83 126 Uzi 20;
-#X obj 439 694 s thisPoE;
-#X obj 415 715 s thisPrE;
-#X obj 392 736 s thisPoA;
-#X obj 368 654 s thisPrA;
-#X obj 202 720 s thisXobs;
-#X obj 344 676 s thisTT;
-#X obj 320 698 s thisHT;
-#X obj 297 721 s thisTS;
-#X obj 273 653 s thisLength;
-#X obj 249 676 s thisZobs;
-#X obj 225 698 s thisYobs;
-#X obj 463 674 s GAIN;
 #X obj 62 0 r preswing;
-#X obj 487 653 s preswing;
 #X obj -170 100 loadbang;
 #X obj -158 25 loadbang;
 #X obj -196 189 loadbang;
@@ -1967,29 +1954,11 @@
 -1 -1;
 #X obj 584 132 uzi 20;
 #X obj 584 152 s SWD2;
-#X obj 426 518 r MLB;
-#X obj 425 443 r SWD1;
-#X obj 424 296 r PGA;
-#X obj 424 370 r SWD2;
-#X obj 202 616 route Xpos Ypos Zpos Len TopSpeed HiltThick TipThick
-PreAzim PostAzim PreElev PostElev Gain Trigger;
 #X obj 634 104 bng 25 250 50 0 empty empty empty 17 7 0 10 -204800
 -1 -1;
 #X obj 634 132 uzi 20;
 #X obj 634 152 s PGA;
 #X msg -128 120 0.35;
-#X msg 425 464 Xpos 0.2 \, Ypos 1 \, Zpos 1 \, Len 1.118 \, TopSpeed
-36 \, HiltThick 0.013 \, TipThick 0.008 \, PreAzim 112 \, PostAzim
-235 \, PreElev 90 \, PostElev 90 \, Gain 5e+06 \, Trigger bang;
-#X msg 424 390 Xpos 0.2 \, Ypos 0.5 \, Zpos 1 \, Len 1.2 \, TopSpeed
-36 \, HiltThick 0.016 \, TipThick 0.013 \, PreAzim 60 \, PostAzim 235
-\, PreElev 45 \, PostElev 120 \, Gain 5e+06 \, Trigger bang;
-#X msg 424 317 Xpos 0.2 \, Ypos 0.5 \, Zpos 2 \, Len 1.143 \, TopSpeed
-40 \, HiltThick 0.0152 \, TipThick 0.0085 \, PreAzim 1 \, PostAzim
-250 \, PreElev 5 \, PostElev 170 \, Gain 5e+06 \, Trigger bang;
-#X msg 426 541 Xpos 3 \, Ypos 1 \, Zpos 0.5 \, Len 0.781 \, TopSpeed
-35 \, HiltThick 0.028 \, TipThick 0.057 \, PreAzim 6 \, PostAzim 300
-\, PreElev 25 \, PostElev 90 \, Gain 5e+06 \, Trigger bang;
 #X obj -221 455 s RPM;
 #X msg -181 383 10;
 #X obj -279 368 s length;
@@ -3846,9 +3815,8 @@
 #X connect 31 0 38 6;
 #X connect 32 0 37 6;
 #X restore 223 254 pd sources;
-#X msg 436 48 2000;
 #X obj 1 152 line;
-#N canvas 534 388 542 473 myMotor 0;
+#N canvas 828 355 542 473 myMotor 0;
 #X obj 170 159 phasor~;
 #X obj 173 116 hsl 64 12 0 1 0 1 empty empty engine-speed -2 6 1 8
 -262144 -1 -1 0 1;
@@ -4044,9 +4012,12 @@
 #X msg 99 80 0.7 1500;
 #X obj 10 244 * 85;
 #X obj 220 311 * 0.1;
+#X obj 302 81 inlet;
+#X floatatom 239 142 0 0 0 0 - - -;
 #X connect 0 0 3 1;
 #X connect 1 0 3 0;
 #X connect 1 0 21 0;
+#X connect 1 0 26 0;
 #X connect 2 0 7 0;
 #X connect 3 0 2 0;
 #X connect 3 1 2 0;
@@ -4075,6 +4046,7 @@
 #X connect 23 0 18 0;
 #X connect 24 0 9 0;
 #X connect 24 0 7 1;
+#X connect 25 0 1 0;
 #X restore 0 328 pd myMotor;
 #X msg -231 29 -4;
 #X msg -78 119 -1;
@@ -4082,10 +4054,15 @@
 #X msg 11 128 35 2000;
 #X msg -171 120 10;
 #X msg -141 404 0;
+#X obj 78 509 hsl 100 20 0 1 0 0 empty empty Engine_Speed 2 10 0 10
+-204800 -1 -1 0 1;
+#X msg 436 48 1000;
+#X text 51 541 RPM;
+#X floatatom 274 476 0 0 0 0 - - -;
 #X connect 0 0 1 0;
-#X connect 1 0 105 0;
+#X connect 1 0 83 0;
 #X connect 3 0 4 0;
-#X connect 3 0 101 0;
+#X connect 3 0 79 0;
 #X connect 5 0 6 0;
 #X connect 7 0 8 0;
 #X connect 8 0 5 0;
@@ -4112,76 +4089,58 @@
 #X connect 32 0 16 0;
 #X connect 33 0 17 0;
 #X connect 34 0 18 0;
-#X connect 38 0 113 0;
+#X connect 38 0 100 0;
 #X connect 39 0 35 0;
 #X connect 39 1 36 0;
 #X connect 40 0 39 0;
 #X connect 40 0 42 0;
+#X connect 40 0 102 0;
 #X connect 41 0 40 0;
 #X connect 45 0 46 0;
-#X connect 45 0 103 0;
+#X connect 45 0 81 0;
 #X connect 47 0 45 0;
 #X connect 48 0 45 0;
 #X connect 52 0 45 0;
 #X connect 53 0 45 0;
 #X connect 54 0 45 0;
 #X connect 55 0 11 0;
-#X connect 68 0 10 0;
-#X connect 70 0 120 0;
-#X connect 71 0 116 0;
-#X connect 72 0 75 0;
-#X connect 73 0 104 0;
-#X connect 74 0 121 0;
-#X connect 75 0 18 0;
-#X connect 76 0 17 0;
-#X connect 77 0 18 0;
-#X connect 78 0 83 0;
-#X connect 80 0 18 0;
-#X connect 81 0 84 0;
-#X connect 83 0 79 0;
-#X connect 84 0 82 0;
+#X connect 56 0 10 0;
+#X connect 57 0 97 0;
+#X connect 58 0 93 0;
+#X connect 59 0 62 0;
+#X connect 60 0 82 0;
+#X connect 61 0 98 0;
+#X connect 62 0 18 0;
+#X connect 63 0 17 0;
+#X connect 64 0 18 0;
+#X connect 65 0 70 0;
+#X connect 67 0 18 0;
+#X connect 68 0 71 0;
+#X connect 70 0 66 0;
+#X connect 71 0 69 0;
+#X connect 72 0 73 0;
+#X connect 73 0 74 0;
+#X connect 75 0 76 0;
+#X connect 76 0 77 0;
+#X connect 78 0 17 0;
+#X connect 80 0 3 0;
+#X connect 82 0 45 0;
+#X connect 83 0 2 0;
+#X connect 84 0 3 0;
 #X connect 85 0 86 0;
 #X connect 86 0 87 0;
-#X connect 88 0 100 0;
-#X connect 89 0 97 0;
-#X connect 90 0 99 0;
-#X connect 91 0 98 0;
-#X connect 92 0 60 0;
-#X connect 92 1 66 0;
-#X connect 92 2 65 0;
-#X connect 92 3 64 0;
-#X connect 92 4 63 0;
-#X connect 92 5 62 0;
-#X connect 92 6 61 0;
-#X connect 92 7 59 0;
-#X connect 92 8 58 0;
-#X connect 92 9 57 0;
-#X connect 92 10 56 0;
-#X connect 92 11 67 0;
-#X connect 92 12 69 0;
-#X connect 93 0 94 0;
-#X connect 94 0 95 0;
-#X connect 96 0 17 0;
-#X connect 97 0 92 0;
-#X connect 98 0 92 0;
+#X connect 87 0 43 0;
+#X connect 87 0 89 0;
+#X connect 88 0 90 0;
+#X connect 89 0 88 0;
+#X connect 91 0 17 0;
+#X connect 92 0 3 0;
+#X connect 93 0 16 0;
+#X connect 94 0 17 0;
+#X connect 95 0 91 0;
+#X connect 96 0 91 0;
+#X connect 97 0 17 0;
+#X connect 98 0 3 0;
 #X connect 99 0 92 0;
-#X connect 100 0 92 0;
-#X connect 102 0 3 0;
-#X connect 104 0 45 0;
-#X connect 105 0 2 0;
-#X connect 106 0 3 0;
-#X connect 107 0 108 0;
-#X connect 108 0 109 0;
-#X connect 109 0 43 0;
-#X connect 109 0 111 0;
-#X connect 110 0 112 0;
-#X connect 111 0 110 0;
-#X connect 113 0 40 0;
-#X connect 114 0 17 0;
-#X connect 115 0 3 0;
-#X connect 116 0 16 0;
-#X connect 117 0 17 0;
-#X connect 118 0 114 0;
-#X connect 119 0 114 0;
-#X connect 120 0 17 0;
-#X connect 121 0 3 0;
+#X connect 100 0 40 0;
+#X coords 0 -1 1 1 150 200 2 50 400;