view June/wirePosition.pd @ 199:2ded41e29e57

Projection matrix now calculated using control signals rather than audio. This makes sense as it was eating too much processing power for something that doesn't chage during the sound effect.

#N canvas 213 227 1440 721 10;
#X obj 197 -11 -;
#X obj 197 16 *;
#X obj 212 88 *;
#X obj 197 143 sqrt;
#X floatatom 257 176 5 0 0 0 - - -;
#X obj 197 176 outlet;
#X obj 197 -62 r Xpos;
#X obj -135 119 outlet;
#X obj 532 -28 inlet;
#X obj 212 -39 inlet;
#X obj 197 119 +;
#X obj 590 -27 inlet;
#X obj 517 27 +;
#X obj 590 -6 * -1;
#X obj 590 31 +;
#X obj 575 93 <;
#X obj 502 89 >;
#X obj 542 123 spigot;
#X obj 469 122 spigot;
#X floatatom 503 181 5 0 0 0 - - -;
#X obj 542 151 f;
#X floatatom 640 51 5 0 0 0 - - -;
#X floatatom 422 52 5 0 0 0 - - -;
#X obj 468 45 r Zpos;
#X obj 541 46 r Zpos;
#X obj 575 66 r Zpos;
#X obj 502 67 r Zpos;
#X obj 469 96 -;
#X obj 542 95 -;
#X obj 627 -6 t b;
#X msg 627 121 0;
#X obj 268 -38 inlet;
#X obj 253 -15 -;
#X obj 253 13 *;
#X text 302 42 Height Calc;
#X floatatom 268 38 5 0 0 0 - - -;
#X obj 197 43 +;
#X text 455 212 Calculates if the ball is between;
#X text 456 224 the end of the fence and then the;
#X text 455 236 distance in the z direction;
#X obj 476 -4 s \$0_myZp;
#X obj 253 -60 r Ypos;
#X obj 542 178 s \$0_zRel;
#X obj -136 -74 r \$0_zRel;
#X obj -135 38 atan;
#X obj -135 16 /;
#X floatatom -170 119 5 0 0 0 - - -;
#X obj -135 62 * 360;
#X obj -135 86 / 6.28319;
#X obj 163 419 outlet;
#X obj 163 338 atan;
#X obj 163 316 /;
#X floatatom 128 419 5 0 0 0 - - -;
#X obj 163 362 * 360;
#X obj 163 386 / 6.28319;
#X obj 136 13 s \$0_xRel;
#X obj 178 291 r \$0_xRel;
#X obj 299 17 s \$0_yRel;
#X obj 163 268 r \$0_yRel;
#X obj 212 65 r \$0_zRel;
#X obj -120 -53 r \$0_xRel;
#X text 128 -101 Calculates the distance between;
#X text 146 -88 the wire and the ball;
#X text -139 -95 Calculates the azimuth;
#X text 117 245 Calculates the elevation;
#X obj -110 255 r \$0_xRel;
#X obj -74 281 > 0;
#X obj -110 281 <= 0;
#X obj -78 310 spigot;
#X obj -144 314 spigot;
#X obj -83 120 abs;
#X obj -83 143 / 90;
#X obj -83 167 swap 1;
#X obj -83 193 -;
#X obj -83 217 / 2;
#X obj -155 259 + 0.5;
#X obj -42 255 - 0.5;
#X obj -42 277 * -1;
#X obj -101 352 outlet;
#X text -5 348 Calculates the pan value;
#X obj -120 -30 t f b;
#X obj -93 -4 delay 9;
#X obj 664 -6 s \$0_myLY;
#N canvas 583 169 806 722 thisOrent 0;
#X obj 219 21 inlet;
#X floatatom 243 48 8 0 0 0 - - -;
#X floatatom 63 53 8 0 0 0 - - -;
#X obj 121 33 r \$0_myLY;
#X obj 337 27 inlet;
#X floatatom 361 54 8 0 0 0 - - -;
#X obj 429 326 inlet;
#X floatatom 461 353 5 0 0 0 - - -;
#X obj 479 324 inlet;
#X floatatom 511 351 5 0 0 0 - - -;
#X obj 527 323 inlet;
#X floatatom 559 350 5 0 0 0 - - -;
#X text 120 11 Y-Length;
#X text 210 1 X-Length;
#X text 333 9 Z-Length;
#X text 415 305 Y-Rota;
#X text 474 303 X-Rota;
#X text 522 304 Z-Rota;
#X floatatom 220 232 5 0 0 0 - - -;
#X floatatom 77 231 5 0 0 0 - - -;
#X obj 337 141 t f b;
#X obj 364 168 delay 9;
#X obj 135 149 t f b;
#X obj 162 176 delay 9;
#X obj 235 145 t f b;
#X obj 262 172 delay 9;
#X obj 322 193 >;
#X obj 220 197 >;
#X obj 121 201 >;
#X floatatom 349 229 5 0 0 0 - - -;
#X obj 122 277 +;
#X obj 122 308 +;
#X floatatom 77 333 5 0 0 0 - - -;
#X text 176 278 0 = z longest;
#X text 176 293 1 = x longest;
#X text 176 310 2 = y longest;
#X obj 122 335 select 0 1 2;
#X obj 412 404 r azim;
#X floatatom 344 431 5 0 0 0 - - -;
#X msg 168 370 \; azim 10;
#X msg 145 417 \; azim 20;
#X msg 122 464 \; azim 12;
#X connect 0 0 1 0;
#X connect 0 0 22 0;
#X connect 0 0 26 0;
#X connect 3 0 2 0;
#X connect 3 0 27 0;
#X connect 3 0 28 0;
#X connect 4 0 5 0;
#X connect 4 0 20 0;
#X connect 4 0 24 0;
#X connect 6 0 7 0;
#X connect 8 0 9 0;
#X connect 10 0 11 0;
#X connect 20 0 26 1;
#X connect 20 1 21 0;
#X connect 21 0 26 0;
#X connect 22 0 28 1;
#X connect 22 1 23 0;
#X connect 23 0 28 0;
#X connect 24 0 27 1;
#X connect 24 1 25 0;
#X connect 25 0 27 0;
#X connect 26 0 29 0;
#X connect 26 0 31 1;
#X connect 27 0 18 0;
#X connect 27 0 30 1;
#X connect 28 0 19 0;
#X connect 28 0 30 0;
#X connect 30 0 31 0;
#X connect 31 0 32 0;
#X connect 31 0 36 0;
#X connect 36 0 41 0;
#X connect 36 1 40 0;
#X connect 36 2 39 0;
#X connect 37 0 38 0;
#X restore 800 7 pd thisOrent;
#X obj 817 -79 inlet;
#X obj 851 -37 inlet;
#X obj 800 -102 inlet;
#X obj 834 -58 inlet;
#X obj 869 -16 inlet;
#X connect 0 0 1 0;
#X connect 0 0 1 1;
#X connect 0 0 55 0;
#X connect 1 0 36 0;
#X connect 2 0 10 1;
#X connect 3 0 4 0;
#X connect 3 0 5 0;
#X connect 6 0 0 0;
#X connect 8 0 12 1;
#X connect 8 0 14 1;
#X connect 8 0 40 0;
#X connect 9 0 0 1;
#X connect 10 0 3 0;
#X connect 11 0 12 0;
#X connect 11 0 13 0;
#X connect 11 0 29 0;
#X connect 11 0 82 0;
#X connect 12 0 16 1;
#X connect 12 0 22 0;
#X connect 12 0 27 1;
#X connect 13 0 14 0;
#X connect 14 0 15 1;
#X connect 14 0 21 0;
#X connect 14 0 28 1;
#X connect 15 0 17 1;
#X connect 16 0 18 1;
#X connect 17 0 20 0;
#X connect 18 0 20 0;
#X connect 20 0 19 0;
#X connect 20 0 42 0;
#X connect 23 0 27 0;
#X connect 24 0 28 0;
#X connect 25 0 15 0;
#X connect 26 0 16 0;
#X connect 27 0 18 0;
#X connect 28 0 17 0;
#X connect 29 0 30 0;
#X connect 30 0 20 0;
#X connect 31 0 32 1;
#X connect 32 0 33 0;
#X connect 32 0 33 1;
#X connect 32 0 57 0;
#X connect 33 0 35 0;
#X connect 33 0 36 1;
#X connect 36 0 10 0;
#X connect 41 0 32 0;
#X connect 43 0 45 0;
#X connect 44 0 47 0;
#X connect 45 0 44 0;
#X connect 47 0 48 0;
#X connect 48 0 46 0;
#X connect 48 0 7 0;
#X connect 48 0 70 0;
#X connect 50 0 53 0;
#X connect 51 0 50 0;
#X connect 53 0 54 0;
#X connect 54 0 52 0;
#X connect 54 0 49 0;
#X connect 56 0 51 1;
#X connect 58 0 51 0;
#X connect 59 0 2 0;
#X connect 59 0 2 1;
#X connect 60 0 80 0;
#X connect 65 0 67 0;
#X connect 65 0 66 0;
#X connect 66 0 68 1;
#X connect 67 0 69 1;
#X connect 68 0 78 0;
#X connect 69 0 78 0;
#X connect 70 0 71 0;
#X connect 71 0 72 0;
#X connect 72 0 73 0;
#X connect 72 1 73 1;
#X connect 73 0 74 0;
#X connect 74 0 75 0;
#X connect 74 0 76 0;
#X connect 75 0 69 0;
#X connect 76 0 77 0;
#X connect 77 0 68 0;
#X connect 80 0 45 1;
#X connect 80 1 81 0;
#X connect 81 0 45 0;
#X connect 84 0 83 1;
#X connect 85 0 83 3;
#X connect 86 0 83 0;
#X connect 87 0 83 2;
#X connect 88 0 83 4;