1 files changed, 144 insertions, 0 deletions
diff --git a/nusmuk-audio/spatialisation.pd b/nusmuk-audio/spatialisation.pd
new file mode 100644
index 0000000..e80625b
--- /dev/null
+++ b/nusmuk-audio/spatialisation.pd
@@ -0,0 +1,144 @@
+#N canvas 223 520 724 341 10;
+#X obj 30 10 inlet~;
+#X obj 157 9 inlet~;
+#X obj 284 7 inlet~;
+#X text 47 28 audio;
+#N canvas 0 0 722 382 modulo 0;
+#X obj 46 17 inlet~;
+#X obj 281 17 inlet~;
+#X obj 45 245 outlet~;
+#X obj 281 247 outlet~;
+#X obj 45 42 abs~;
+#X connect 0 0 4 0;
+#X connect 1 0 3 0;
+#X connect 4 0 2 0;
+#X restore 156 69 pd modulo _________;
+#X obj 30 278 outlet~;
+#X obj 285 277 outlet~;
+#N canvas 90 498 718 372 pan 0;
+#X obj 30 35 inlet~;
+#X obj 28 266 outlet~;
+#X obj 256 40 inlet~;
+#X obj 257 160 cos~;
+#X obj 299 183 cos~;
+#X obj 97 266 outlet~;
+#X obj 97 36 inlet~;
+#X obj 186 36 inlet~;
+#X obj 98 227 *~;
+#X obj 29 225 *~;
+#X obj 299 159 +~ 0.25;
+#X obj 256 198 abs~;
+#X obj 298 205 abs~;
+#X obj 255 105 +~ 1;
+#X obj 256 129 /~ 12.56;
+#X text 312 43 pan;
+#X obj 256 74 *~ \$4;
+#X connect 0 0 9 0;
+#X connect 2 0 16 0;
+#X connect 3 0 11 0;
+#X connect 4 0 12 0;
+#X connect 6 0 8 0;
+#X connect 8 0 5 0;
+#X connect 9 0 1 0;
+#X connect 10 0 4 0;
+#X connect 11 0 9 1;
+#X connect 12 0 8 1;
+#X connect 13 0 14 0;
+#X connect 14 0 3 0;
+#X connect 14 0 10 0;
+#X connect 16 0 13 0;
+#X restore 30 230 pd pan ______________________________;
+#X text 307 28 theta (radian);
+#N canvas 866 546 478 334 volume_distance 0;
+#X obj 26 15 inlet~;
+#X obj 193 13 inlet~;
+#X obj 256 13 inlet~;
+#X obj 26 250 outlet~;
+#X obj 194 250 outlet~;
+#X obj 255 249 outlet~;
+#X obj 25 208 /~;
+#X obj 42 165 +~ 1;
+#X obj 43 139 *~ \$1;
+#X connect 0 0 6 0;
+#X connect 1 0 4 0;
+#X connect 1 0 8 0;
+#X connect 2 0 5 0;
+#X connect 6 0 3 0;
+#X connect 7 0 6 1;
+#X connect 8 0 7 0;
+#X restore 29 115 pd volume_distance __________________;
+#N canvas 0 0 853 406 doppler 0;
+#X obj 47 233 vd~ \$0-doepler;
+#X obj 46 41 inlet~;
+#X obj 48 262 outlet~;
+#X obj 46 83 delwrite~ \$0-doepler 1000;
+#X obj 324 45 inlet~;
+#X obj 505 46 inlet~;
+#X obj 324 266 outlet~;
+#X obj 505 262 outlet~;
+#X obj 48 207 *~ 0.34;
+#X text 112 208 convertion mettre -> ms;
+#X obj 49 186 *~ \$2;
+#X connect 0 0 2 0;
+#X connect 1 0 3 0;
+#X connect 4 0 6 0;
+#X connect 4 0 10 0;
+#X connect 5 0 7 0;
+#X connect 8 0 0 0;
+#X connect 10 0 8 0;
+#X restore 30 152 pd doppler __________________________;
+#N canvas 66 205 779 732 decalage_temporel 0;
+#X obj 29 44 inlet~;
+#X obj 131 357 outlet~;
+#X obj 496 49 inlet~;
+#X obj 32 355 outlet~;
+#X obj 29 85 delwrite~ \$0-delay 100;
+#X obj 131 330 vd~ \$0-delay;
+#X obj 32 330 vd~ \$0-delay;
+#X obj 278 49 inlet~;
+#X obj 278 352 outlet~;
+#X obj 495 353 outlet~;
+#X obj 33 251 cos~;
+#X obj 133 248 cos~;
+#X obj 33 222 -~ 0.25;
+#X obj 30 144 /~ 6.28;
+#X obj 132 222 +~ 0.25;
+#X obj 32 273 *~ \$3;
+#X obj 132 271 *~ \$3;
+#X connect 0 0 4 0;
+#X connect 2 0 9 0;
+#X connect 2 0 13 0;
+#X connect 5 0 1 0;
+#X connect 6 0 3 0;
+#X connect 7 0 8 0;
+#X connect 10 0 15 0;
+#X connect 11 0 16 0;
+#X connect 12 0 10 0;
+#X connect 13 0 12 0;
+#X connect 13 0 14 0;
+#X connect 14 0 11 0;
+#X connect 15 0 6 0;
+#X connect 16 0 5 0;
+#X restore 30 190 pd decalage_temporel ________________;
+#X text 309 117 \$1 : amplitude atenuation regarding the distance;
+#X text 309 152 \$2 : doepler effect;
+#X text 310 190 \$3 : distance beetween 2 speeker;
+#X text 310 230 \$4 : panoramic effect;
+#X text 171 30 r (metter);
+#X connect 0 0 9 0;
+#X connect 1 0 4 0;
+#X connect 2 0 4 1;
+#X connect 4 0 9 1;
+#X connect 4 1 9 2;
+#X connect 7 0 5 0;
+#X connect 7 1 6 0;
+#X connect 9 0 10 0;
+#X connect 9 1 10 1;
+#X connect 9 2 10 2;
+#X connect 10 0 11 0;
+#X connect 10 1 11 1;
+#X connect 10 2 11 2;
+#X connect 11 0 7 0;
+#X connect 11 1 7 1;
+#X connect 11 2 7 2;
+#X connect 11 3 7 3;