view SwordSounds2/centreAngles.pd @ 303:8b51c20529a6

Edgetone development models
author Rod Selfridge <r.selfridge@qmul.ac.uk>
date Sat, 11 Nov 2017 17:43:39 +0000
parents 6aaeb2789f99
children
line wrap: on
line source
#N canvas 0 22 1376 625 10;
#X obj 69 140 f;
#X obj 69 97 r GO;
#X obj 84 118 r preswingTime;
#X obj 231 198 line~;
#X obj 96 262 loadbang;
#X obj 96 283 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
1;
#X obj 96 301 metro 10;
#X obj 96 323 snapshot~;
#X floatatom 96 343 5 0 0 0 - - -;
#X obj 177 359 hsl 128 15 -180 180 0 0 empty empty empty -2 -8 0 10
-262144 -1 -1 9172 1;
#X obj 231 97 r setUp;
#X text 214 78 Start at 0 speed;
#X obj 246 118 r presweepAzim;
#X obj 231 141 f;
#X msg 231 164 \$1;
#X msg 69 163 0 \$1;
#X obj 355 42 t f b;
#X obj 356 70 delay;
#X obj 370 -3 r preswingTime;
#X obj 377 119 r postswingTime;
#X obj 355 -23 r GO;
#X obj 355 19 f;
#X obj 356 97 f;
#X obj 356 142 pack;
#X obj 398 71 r postsweepAzim;
#X msg 356 168 \$1 \$2;
#X obj 179 97 r myEnd;
#X text 294 217 Current source Azimuth angle;
#X obj 858 109 f;
#X obj 858 66 r GO;
#X obj 879 132 r preswingTime;
#X obj 1029 232 line~;
#X obj 882 295 loadbang;
#X obj 882 316 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
1;
#X obj 882 334 metro 10;
#X obj 882 356 snapshot~;
#X floatatom 882 376 5 0 0 0 - - -;
#X obj 963 392 hsl 128 15 -90 90 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 6350 1;
#X obj 1029 131 r setUp;
#X text 1012 112 Start at 0 speed;
#X obj 1029 175 f;
#X msg 1029 198 \$1;
#X obj 1141 75 t f b;
#X obj 1142 103 delay;
#X obj 1156 30 r preswingTime;
#X obj 1163 152 r postswingTime;
#X obj 1141 10 r GO;
#X obj 1141 52 f;
#X obj 1142 130 f;
#X obj 1142 175 pack;
#X msg 1142 201 \$1 \$2;
#X obj 1044 152 r presweepElev;
#X obj 1184 78 r postsweepElev;
#X obj 858 156 pack;
#X obj 873 88 r midElev;
#X msg 858 190 \$1 \$2;
#X obj 658 74 +;
#X obj 643 101 /;
#X obj 616 53 t f f;
#X floatatom 589 132 5 0 0 0 - - -;
#X obj 658 124 r presweepElev;
#X obj 673 146 r postsweepElev;
#X obj 658 30 r postswingTime;
#X obj 673 52 r preswingTime;
#X obj 643 199 *;
#X floatatom 606 267 5 0 0 0 - - -;
#X obj 643 267 s midElev;
#X text 536 -100 Calculate the angles with respect to the centre of
the swing circle;
#X text 1092 251 Current source Elevation angle;
#X obj 1085 304 s~ currentElev;
#X obj 248 265 s~ currentAzim;
#X obj 951 -54 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
-1;
#X obj 951 -1 s GO;
#X obj 891 -54 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985
-1 -1;
#X obj 891 -1 s setUp;
#X obj 980 130 r myEnd;
#X obj 658 175 -;
#X obj 643 242 +;
#X obj 658 219 r postsweepElev;
#X connect 0 0 15 0;
#X connect 1 0 0 0;
#X connect 2 0 0 1;
#X connect 3 0 7 0;
#X connect 3 0 70 0;
#X connect 4 0 5 0;
#X connect 5 0 6 0;
#X connect 6 0 7 0;
#X connect 7 0 8 0;
#X connect 7 0 9 0;
#X connect 10 0 13 0;
#X connect 12 0 13 1;
#X connect 13 0 14 0;
#X connect 14 0 3 0;
#X connect 15 0 3 0;
#X connect 16 0 17 1;
#X connect 16 1 17 0;
#X connect 17 0 22 0;
#X connect 18 0 21 1;
#X connect 19 0 23 1;
#X connect 20 0 21 0;
#X connect 21 0 16 0;
#X connect 22 0 23 0;
#X connect 23 0 25 0;
#X connect 24 0 22 1;
#X connect 25 0 3 0;
#X connect 26 0 13 0;
#X connect 28 0 53 0;
#X connect 29 0 28 0;
#X connect 30 0 53 1;
#X connect 31 0 35 0;
#X connect 31 0 69 0;
#X connect 32 0 33 0;
#X connect 33 0 34 0;
#X connect 34 0 35 0;
#X connect 35 0 36 0;
#X connect 35 0 37 0;
#X connect 38 0 40 0;
#X connect 40 0 41 0;
#X connect 41 0 31 0;
#X connect 42 0 43 1;
#X connect 42 1 43 0;
#X connect 43 0 48 0;
#X connect 44 0 47 1;
#X connect 45 0 49 1;
#X connect 46 0 47 0;
#X connect 47 0 42 0;
#X connect 48 0 49 0;
#X connect 49 0 50 0;
#X connect 50 0 31 0;
#X connect 51 0 40 1;
#X connect 52 0 48 1;
#X connect 53 0 55 0;
#X connect 54 0 28 1;
#X connect 55 0 31 0;
#X connect 56 0 57 1;
#X connect 57 0 59 0;
#X connect 57 0 64 0;
#X connect 58 0 56 0;
#X connect 58 1 57 0;
#X connect 60 0 76 0;
#X connect 61 0 76 1;
#X connect 62 0 58 0;
#X connect 63 0 56 1;
#X connect 64 0 77 0;
#X connect 71 0 72 0;
#X connect 73 0 74 0;
#X connect 75 0 40 0;
#X connect 76 0 64 1;
#X connect 77 0 66 0;
#X connect 77 0 65 0;
#X connect 78 0 77 1;