diff scene demo/freqCalcCyl3No_D2Mach.pd @ 165:6aaeb2789f99

Start of sword with presets
author Rod Selfridge <r.selfridge@qmul.ac.uk>
date Tue, 02 Feb 2016 10:56:55 +0000
parents cd1f59cfc390
children 444570dd6918
line wrap: on
line diff
--- a/scene demo/freqCalcCyl3No_D2Mach.pd	Fri Jan 29 21:14:12 2016 +0000
+++ b/scene demo/freqCalcCyl3No_D2Mach.pd	Tue Feb 02 10:56:55 2016 +0000
@@ -103,7 +103,7 @@
 #X obj 303 132 r~ \$0-str;
 #X obj 321 173 r \$0-leng;
 #X obj 346 231 r \$0-dist;
-#N canvas 203 82 1238 721 GoldfreqGain 0;
+#N canvas 205 143 1238 721 GoldfreqGain 1;
 #N canvas 759 125 286 294 pow6 0;
 #X obj 47 67 *~;
 #X obj 76 67 *~;
@@ -303,10 +303,45 @@
 #X obj 424 17 inlet~;
 #X obj 219 11 sig~;
 #X floatatom 265 13 5 0 0 0 - - -;
-#X obj 219 -11 average~ 512;
 #X obj 234 494 sin~;
-#X floatatom 351 12 5 0 0 0 - - -;
-#X obj 305 -12 ave~;
+#X floatatom 357 -7 5 0 0 0 - - -;
+#X obj 219 -11 average~ 4096;
+#N canvas 801 264 426 401 aveTimeCal 0;
+#X text 224 38 Elevation;
+#X obj 226 56 r \$0-elev;
+#X floatatom 240 81 5 0 0 0 - - -;
+#X obj 205 17 r~ MY_MACH;
+#X obj 226 135 cos;
+#X obj 226 107 * 0.01745;
+#X obj 205 158 *~ 1;
+#X obj 161 131 sig~ 1;
+#X obj 161 185 -~;
+#X obj 121 104 r~ \$0-myFreq;
+#X obj 106 82 sig~ 6.28318;
+#X obj 106 128 /~;
+#X obj 106 219 *~;
+#X obj 36 204 r myMet;
+#X obj 106 242 snapshot~;
+#X floatatom 44 283 0 0 0 0 - - -;
+#X obj 106 263 * 44100;
+#X obj 106 292 outlet;
+#X connect 1 0 2 0;
+#X connect 1 0 5 0;
+#X connect 3 0 6 0;
+#X connect 4 0 6 1;
+#X connect 5 0 4 0;
+#X connect 6 0 8 1;
+#X connect 7 0 8 0;
+#X connect 8 0 12 1;
+#X connect 9 0 11 1;
+#X connect 10 0 11 0;
+#X connect 11 0 12 0;
+#X connect 12 0 14 0;
+#X connect 13 0 14 0;
+#X connect 14 0 16 0;
+#X connect 16 0 15 0;
+#X connect 16 0 17 0;
+#X restore 348 -33 pd aveTimeCal;
 #X connect 0 0 2 0;
 #X connect 1 0 2 1;
 #X connect 2 0 106 0;
@@ -314,8 +349,7 @@
 #X connect 3 0 100 0;
 #X connect 8 0 1 0;
 #X connect 8 0 1 1;
-#X connect 9 0 110 0;
-#X connect 9 0 113 0;
+#X connect 9 0 112 0;
 #X connect 11 0 105 1;
 #X connect 12 0 5 0;
 #X connect 12 0 89 0;
@@ -323,7 +357,7 @@
 #X connect 17 0 38 0;
 #X connect 18 0 20 0;
 #X connect 19 0 42 0;
-#X connect 20 0 111 0;
+#X connect 20 0 110 0;
 #X connect 21 0 22 1;
 #X connect 22 0 45 0;
 #X connect 23 0 26 0;
@@ -393,11 +427,12 @@
 #X connect 106 0 39 0;
 #X connect 107 0 103 0;
 #X connect 108 0 0 0;
-#X connect 110 0 108 0;
-#X connect 110 0 109 0;
-#X connect 111 0 21 0;
-#X connect 111 0 21 1;
+#X connect 110 0 21 0;
+#X connect 110 0 21 1;
+#X connect 112 0 108 0;
+#X connect 112 0 109 0;
 #X connect 113 0 112 0;
+#X connect 113 0 111 0;
 #X restore 303 297 pd GoldfreqGain;
 #X obj 964 504 r \$0-thisPan;
 #X obj 918 461 r~ \$0-myFreq;