annotate SwordSounds/thisAngle.pd @ 176:a297efeba5c0

Sword model - Calculated bases for the plane of the sword, the projection matrix and the position of the observer projected onto this plane. Then can calculate the elevation and the azimuth between source and observer. Next - add additional sources along the blade length.
author Rod Selfridge <r.selfridge@qmul.ac.uk>
date Thu, 11 Feb 2016 13:16:32 +0000
parents 8e555c822804
children
rev   line source
r@131 1 #N canvas 18 44 1440 726 10;
r@101 2 #X obj -19 -52 inlet~;
r@101 3 #X obj 58 -52 inlet~;
r@101 4 #X obj 134 -53 inlet~;
r@101 5 #X obj -19 -31 s~ \$0_Ydiff;
r@101 6 #X obj 58 -31 s~ \$0_Xdiff;
r@101 7 #X obj 134 -32 s~ \$0_Zdiff;
r@101 8 #X obj -130 -58 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
r@101 9 -1;
r@101 10 #X obj -130 -5 s GO;
r@101 11 #X obj -190 -58 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985
r@101 12 -1 -1;
r@101 13 #X obj -190 -5 s setUp;
r@126 14 #X obj 230 -58 inlet~;
r@126 15 #X obj 230 -37 s~ \$0_scrObsDist;
r@126 16 #X obj 451 -74 inlet~;
r@102 17 #X obj 74 5 loadbang;
r@102 18 #X obj 74 26 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 1
r@102 19 ;
r@102 20 #X obj 74 44 metro 10;
r@102 21 #X obj 74 66 snapshot~;
r@126 22 #X floatatom 74 86 8 0 0 0 - - -;
r@102 23 #X obj 139 5 loadbang;
r@102 24 #X obj 139 26 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
r@102 25 1;
r@102 26 #X obj 139 44 metro 10;
r@102 27 #X obj 139 66 snapshot~;
r@126 28 #X floatatom 139 86 8 0 0 0 - - -;
r@102 29 #X obj 205 6 loadbang;
r@102 30 #X obj 205 27 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
r@102 31 1;
r@102 32 #X obj 205 45 metro 10;
r@102 33 #X obj 205 67 snapshot~;
r@126 34 #X floatatom 205 87 8 0 0 0 - - -;
r@126 35 #X obj 338 -72 loadbang;
r@126 36 #X obj 338 -51 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
r@102 37 1;
r@126 38 #X obj 338 -33 metro 10;
r@126 39 #X obj 338 -11 snapshot~;
r@126 40 #X floatatom 338 11 8 0 0 0 - - -;
r@126 41 #X obj 477 -30 loadbang;
r@126 42 #X obj 477 -9 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
r@126 43 1;
r@126 44 #X obj 477 9 metro 10;
r@126 45 #X obj 477 31 snapshot~;
r@126 46 #X floatatom 477 51 8 0 0 0 - - -;
r@126 47 #X text 45 106 Y \, X \, Z dist between source and centre;
r@126 48 #X text 61 119 Based on length \, azim and elev;
r@126 49 #X obj 575 -75 inlet~;
r@126 50 #X obj 601 -31 loadbang;
r@126 51 #X obj 601 -10 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
r@126 52 1;
r@126 53 #X obj 601 8 metro 10;
r@126 54 #X obj 601 30 snapshot~;
r@126 55 #X floatatom 601 50 8 0 0 0 - - -;
r@126 56 #X text 318 30 Distance src to obs;
r@126 57 #X obj 691 -77 inlet~;
r@126 58 #X obj 717 -33 loadbang;
r@126 59 #X obj 717 -12 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
r@126 60 1;
r@126 61 #X obj 717 6 metro 10;
r@126 62 #X obj 717 28 snapshot~;
r@126 63 #X floatatom 717 48 8 0 0 0 - - -;
r@126 64 #X obj 451 -53 s~ \$0_scrObsYDist;
r@126 65 #X obj 575 -54 s~ \$0_scrObsXDist;
r@126 66 #X obj 691 -56 s~ \$0_scrObsZDist;
r@131 67 #X obj 430 443 s~ \$0-Az;
r@131 68 #X obj 79 497 loadbang;
r@131 69 #X obj 79 518 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
r@126 70 1;
r@131 71 #X obj 79 536 metro 10;
r@131 72 #X obj 79 558 snapshot~;
r@131 73 #X floatatom 79 578 8 0 0 0 - - -;
r@131 74 #X obj 343 484 loadbang;
r@131 75 #X obj 343 505 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
r@130 76 1;
r@131 77 #X obj 343 523 metro 10;
r@131 78 #X obj 343 545 snapshot~;
r@131 79 #X floatatom 343 565 8 0 0 0 - - -;
r@133 80 #X obj 820 354 loadbang;
r@133 81 #X obj 820 375 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
r@133 82 1;
r@133 83 #X obj 820 393 metro 10;
r@133 84 #X obj 820 415 snapshot~;
r@133 85 #X floatatom 820 435 8 0 0 0 - - -;
r@133 86 #X obj 354 150 r~ \$0_Xdiff;
r@133 87 #X obj 354 216 -~;
r@133 88 #X obj 427 150 r~ \$0_Zdiff;
r@133 89 #X obj 427 215 -~;
r@133 90 #X obj 369 173 r Xobs;
r@133 91 #X obj 369 194 sig~;
r@133 92 #X obj 442 171 r Zobs;
r@133 93 #X obj 442 193 sig~;
r@131 94 #X obj 412 240 /~;
r@131 95 #X obj 430 270 *~;
r@131 96 #X obj 445 290 sig~ 1;
r@131 97 #X obj 430 312 +~;
r@131 98 #X obj 430 336 sqrt~;
r@131 99 #X obj 412 360 /~;
r@131 100 #X obj 426 408 arcsin~;
r@131 101 #X obj 192 452 r~ currentAzim;
r@131 102 #X obj 192 512 r~ \$0-Az;
r@131 103 #X obj 177 536 -~;
r@133 104 #X obj 888 409 outlet~;
r@133 105 #X obj 1110 365 loadbang;
r@133 106 #X obj 1110 386 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1
r@133 107 1 1;
r@133 108 #X obj 1110 404 metro 10;
r@133 109 #X obj 1110 426 snapshot~;
r@133 110 #X floatatom 1110 446 8 0 0 0 - - -;
r@131 111 #X obj 177 430 sig~ 90;
r@131 112 #X obj 177 484 -~;
r@131 113 #X obj 1018 191 r~ currentAzim;
r@131 114 #X obj 1003 169 sig~ 90;
r@131 115 #X obj 1003 215 -~;
r@131 116 #X obj 939 73 /~;
r@131 117 #X obj 954 103 *~;
r@131 118 #X obj 969 123 sig~ 1;
r@131 119 #X obj 954 145 +~;
r@131 120 #X obj 954 169 sqrt~;
r@131 121 #X obj 939 193 /~;
r@131 122 #X obj 939 216 arcsin~;
r@131 123 #X obj 954 28 r Xobs;
r@131 124 #X obj 954 49 sig~;
r@131 125 #X obj 939 -17 r Zobs;
r@131 126 #X obj 939 5 sig~;
r@131 127 #X obj 988 245 -~;
r@131 128 #X obj 232 570 s~ \$0-Pv;
r@133 129 #X obj 294 337 r~ \$0-Pv;
r@133 130 #X obj 267 319 sig~ 180;
r@131 131 #X obj 958 308 -~;
r@131 132 #X obj 973 281 +~;
r@133 133 #X obj 279 357 +~;
r@131 134 #X obj 902 279 sig~ 180;
r@133 135 #X obj 656 203 /~;
r@133 136 #X obj 671 233 *~;
r@133 137 #X obj 686 253 sig~ 1;
r@133 138 #X obj 671 275 +~;
r@133 139 #X obj 671 299 sqrt~;
r@133 140 #X obj 656 323 /~;
r@133 141 #X obj 656 346 arcsin~;
r@133 142 #X obj 671 179 sig~;
r@133 143 #X obj 656 135 sig~;
r@133 144 #X obj 656 113 r Xobs;
r@133 145 #X obj 671 158 r Zobs;
r@133 146 #X obj 656 392 -~;
r@133 147 #X obj 671 369 r~ \$0-Az;
r@133 148 #X obj 1029 468 outlet~;
r@133 149 #X obj 1036 422 clip~ 0 1;
r@133 150 #X obj 1036 374 /~ 360;
r@133 151 #X obj 986 401 -~ 0.5;
r@101 152 #X connect 0 0 3 0;
r@129 153 #X connect 0 0 16 0;
r@101 154 #X connect 1 0 4 0;
r@129 155 #X connect 1 0 21 0;
r@101 156 #X connect 2 0 5 0;
r@129 157 #X connect 2 0 26 0;
r@101 158 #X connect 6 0 7 0;
r@129 159 #X connect 8 0 9 0;
r@101 160 #X connect 10 0 11 0;
r@129 161 #X connect 10 0 31 0;
r@129 162 #X connect 12 0 36 0;
r@129 163 #X connect 12 0 53 0;
r@101 164 #X connect 13 0 14 0;
r@129 165 #X connect 14 0 15 0;
r@101 166 #X connect 15 0 16 0;
r@129 167 #X connect 16 0 17 0;
r@129 168 #X connect 18 0 19 0;
r@129 169 #X connect 19 0 20 0;
r@129 170 #X connect 20 0 21 0;
r@102 171 #X connect 21 0 22 0;
r@102 172 #X connect 23 0 24 0;
r@102 173 #X connect 24 0 25 0;
r@129 174 #X connect 25 0 26 0;
r@102 175 #X connect 26 0 27 0;
r@129 176 #X connect 28 0 29 0;
r@129 177 #X connect 29 0 30 0;
r@129 178 #X connect 30 0 31 0;
r@102 179 #X connect 31 0 32 0;
r@129 180 #X connect 33 0 34 0;
r@126 181 #X connect 34 0 35 0;
r@102 182 #X connect 35 0 36 0;
r@102 183 #X connect 36 0 37 0;
r@129 184 #X connect 40 0 44 0;
r@129 185 #X connect 40 0 54 0;
r@102 186 #X connect 41 0 42 0;
r@102 187 #X connect 42 0 43 0;
r@129 188 #X connect 43 0 44 0;
r@126 189 #X connect 44 0 45 0;
r@129 190 #X connect 47 0 51 0;
r@129 191 #X connect 47 0 55 0;
r@129 192 #X connect 48 0 49 0;
r@129 193 #X connect 49 0 50 0;
r@126 194 #X connect 50 0 51 0;
r@129 195 #X connect 51 0 52 0;
r@131 196 #X connect 57 0 58 0;
r@129 197 #X connect 58 0 59 0;
r@131 198 #X connect 59 0 60 0;
r@131 199 #X connect 60 0 61 0;
r@131 200 #X connect 62 0 63 0;
r@126 201 #X connect 63 0 64 0;
r@131 202 #X connect 64 0 65 0;
r@131 203 #X connect 65 0 66 0;
r@129 204 #X connect 67 0 68 0;
r@131 205 #X connect 68 0 69 0;
r@129 206 #X connect 69 0 70 0;
r@131 207 #X connect 70 0 71 0;
r@126 208 #X connect 72 0 73 0;
r@133 209 #X connect 73 0 80 0;
r@129 210 #X connect 74 0 75 0;
r@133 211 #X connect 75 0 80 1;
r@126 212 #X connect 76 0 77 0;
r@131 213 #X connect 77 0 73 1;
r@129 214 #X connect 78 0 79 0;
r@131 215 #X connect 79 0 75 1;
r@129 216 #X connect 80 0 81 0;
r@131 217 #X connect 80 0 81 1;
r@131 218 #X connect 80 0 85 0;
r@129 219 #X connect 81 0 83 0;
r@131 220 #X connect 82 0 83 1;
r@131 221 #X connect 83 0 84 0;
r@131 222 #X connect 84 0 85 1;
r@131 223 #X connect 85 0 86 0;
r@131 224 #X connect 86 0 56 0;
r@131 225 #X connect 87 0 65 0;
r@131 226 #X connect 87 0 97 1;
r@131 227 #X connect 88 0 89 1;
r@131 228 #X connect 89 0 60 0;
r@131 229 #X connect 89 0 113 0;
r@131 230 #X connect 91 0 92 0;
r@131 231 #X connect 92 0 93 0;
r@130 232 #X connect 93 0 94 0;
r@130 233 #X connect 94 0 95 0;
r@130 234 #X connect 96 0 97 0;
r@131 235 #X connect 97 0 89 0;
r@131 236 #X connect 98 0 100 1;
r@130 237 #X connect 99 0 100 0;
r@131 238 #X connect 100 0 112 1;
r@130 239 #X connect 101 0 102 0;
r@131 240 #X connect 101 0 102 1;
r@131 241 #X connect 101 0 106 0;
r@131 242 #X connect 102 0 104 0;
r@131 243 #X connect 103 0 104 1;
r@130 244 #X connect 104 0 105 0;
r@131 245 #X connect 105 0 106 1;
r@130 246 #X connect 106 0 107 0;
r@131 247 #X connect 107 0 112 0;
r@130 248 #X connect 108 0 109 0;
r@131 249 #X connect 109 0 101 1;
r@131 250 #X connect 110 0 111 0;
r@131 251 #X connect 111 0 101 0;
r@131 252 #X connect 112 0 117 1;
r@131 253 #X connect 114 0 118 1;
r@131 254 #X connect 115 0 118 0;
r@133 255 #X connect 116 0 70 0;
r@133 256 #X connect 116 0 90 0;
r@133 257 #X connect 116 0 135 0;
r@131 258 #X connect 117 0 116 1;
r@133 259 #X connect 119 0 116 0;
r@133 260 #X connect 120 0 121 0;
r@133 261 #X connect 120 0 121 1;
r@133 262 #X connect 120 0 125 0;
r@133 263 #X connect 121 0 123 0;
r@133 264 #X connect 122 0 123 1;
r@133 265 #X connect 123 0 124 0;
r@133 266 #X connect 124 0 125 1;
r@133 267 #X connect 125 0 126 0;
r@133 268 #X connect 126 0 131 0;
r@133 269 #X connect 127 0 120 1;
r@133 270 #X connect 128 0 120 0;
r@133 271 #X connect 129 0 128 0;
r@133 272 #X connect 130 0 127 0;
r@133 273 #X connect 131 0 117 0;
r@133 274 #X connect 132 0 131 1;
r@133 275 #X connect 134 0 133 0;
r@133 276 #X connect 134 0 94 0;
r@133 277 #X connect 135 0 134 0;