Add pd-sampler files

files/pd-sampler/main.pd

@@ -0,0 +1,144 @@
+#N canvas 41 85 1387 711 12;
+#X obj 1164 106 vline~;
+#X obj 1141 224 hsl 128 15 0 100 0 0 empty empty empty -2 -8 0 10 -262144
+-1 -1 0 1;
+#X obj 1143 183 snapshot~;
+#X obj 1054 151 metro 10;
+#X obj 1051 128 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1
+0 1;
+#X msg 1096 72 0;
+#X msg 1160 31 0 0.1 \, 100 1000 1 \, 0 100 1000;
+#X obj 308 93 pack 0 0 0;
+#X obj 58 189 stripnote;
+#X msg 1035 271 60 64;
+#X msg 1101 267 62 64;
+#X msg 984 296 clear;
+#X obj 1071 342 s toPoly;
+#X obj 308 37 r toPoly;
+#X obj 308 65 poly 8 1;
+#X obj 308 121 route 1 2 3 4 5 6 7 8;
+#X obj 63 217 r filename;
+#X obj 1114 463 s filename;
+#X obj 147 245 note;
+#X obj 147 189 stripnote;
+#X obj 152 217 r filename;
+#X obj 236 245 note;
+#X obj 236 189 stripnote;
+#X obj 241 217 r filename;
+#X obj 325 245 note;
+#X obj 325 189 stripnote;
+#X obj 330 217 r filename;
+#X obj 414 245 note;
+#X obj 414 189 stripnote;
+#X obj 419 217 r filename;
+#X obj 503 245 note;
+#X obj 503 189 stripnote;
+#X obj 508 217 r filename;
+#X obj 592 245 note;
+#X obj 592 189 stripnote;
+#X obj 597 217 r filename;
+#X obj 681 245 note;
+#X obj 681 189 stripnote;
+#X obj 686 217 r filename;
+#X obj 58 273 *~ 0.125;
+#X obj 147 273 *~ 0.125;
+#X obj 236 273 *~ 0.125;
+#X obj 325 273 *~ 0.125;
+#X obj 414 273 *~ 0.125;
+#X obj 503 273 *~ 0.125;
+#X obj 592 273 *~ 0.125;
+#X obj 681 273 *~ 0.125;
+#X obj 360 411 +~;
+#X obj 360 439 dac~;
+#X msg 1168 268 64 64;
+#X msg 1231 279 65 64;
+#X msg 1267 314 67 64;
+#X obj 1113 514 loadbang;
+#X obj 1126 574 stdout;
+#X obj 1119 652 print;
+#X msg 1109 546 main;
+#X obj 58 245 note;
+#X msg 1102 435 ../iOS/resources/Sounds/Xylo-C5.wav;
+#X obj 1118 403 loadbang;
+#X msg 160 470 poly-1: \$1;
+#X obj 50 465 r toPoly;
+#X obj 147 566 stdout -f -cr;
+#X msg 178 499 poly-2: \$1;
+#X msg 196 528 poly-3: \$1;
+#X obj 80 567 print --;
+#X connect 0 0 2 0;
+#X connect 2 0 1 0;
+#X connect 3 0 2 0;
+#X connect 4 0 3 0;
+#X connect 5 0 0 0;
+#X connect 6 0 0 0;
+#X connect 7 0 15 0;
+#X connect 8 0 56 0;
+#X connect 9 0 12 0;
+#X connect 10 0 12 0;
+#X connect 11 0 12 0;
+#X connect 13 0 14 0;
+#X connect 14 0 7 0;
+#X connect 14 0 59 0;
+#X connect 14 1 7 1;
+#X connect 14 1 62 0;
+#X connect 14 2 7 2;
+#X connect 14 2 63 0;
+#X connect 15 0 8 0;
+#X connect 15 1 19 0;
+#X connect 15 2 22 0;
+#X connect 15 3 25 0;
+#X connect 15 4 28 0;
+#X connect 15 5 31 0;
+#X connect 15 6 34 0;
+#X connect 15 7 37 0;
+#X connect 16 0 56 1;
+#X connect 18 0 40 0;
+#X connect 19 0 18 0;
+#X connect 20 0 18 1;
+#X connect 21 0 41 0;
+#X connect 22 0 21 0;
+#X connect 23 0 21 1;
+#X connect 24 0 42 0;
+#X connect 25 0 24 0;
+#X connect 26 0 24 1;
+#X connect 27 0 43 0;
+#X connect 28 0 27 0;
+#X connect 29 0 27 1;
+#X connect 30 0 44 0;
+#X connect 31 0 30 0;
+#X connect 32 0 30 1;
+#X connect 33 0 45 0;
+#X connect 34 0 33 0;
+#X connect 35 0 33 1;
+#X connect 36 0 46 0;
+#X connect 37 0 36 0;
+#X connect 38 0 36 1;
+#X connect 39 0 47 0;
+#X connect 40 0 47 0;
+#X connect 41 0 47 0;
+#X connect 42 0 47 0;
+#X connect 43 0 47 0;
+#X connect 44 0 47 0;
+#X connect 45 0 47 0;
+#X connect 46 0 47 0;
+#X connect 47 0 48 0;
+#X connect 47 0 48 1;
+#X connect 49 0 12 0;
+#X connect 50 0 12 0;
+#X connect 51 0 12 0;
+#X connect 52 0 55 0;
+#X connect 55 0 53 0;
+#X connect 55 0 54 0;
+#X connect 56 0 39 0;
+#X connect 57 0 17 0;
+#X connect 58 0 57 0;
+#X connect 59 0 61 0;
+#X connect 59 0 64 0;
+#X connect 60 0 61 0;
+#X connect 60 0 64 0;
+#X connect 62 0 61 0;
+#X connect 62 0 64 0;
+#X connect 63 0 61 0;
+#X connect 63 0 64 0;
+#X coords 0 0 1 1 85 60 0;

files/pd-sampler/note.pd

@@ -0,0 +1,78 @@
+#N canvas 484 -943 1237 732 12;
+#X obj 223 507 vline~;
+#X msg 159 469 0 0.1;
+#X obj 343 288 /;
+#X obj 343 316 * 1000;
+#X obj 70 253 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
+-1;
+#X floatatom 256 371 8 0 0 0 - - -;
+#X floatatom 325 371 8 0 0 0 - - -;
+#X obj 353 583 *~;
+#X obj 441 507 vline~;
+#N canvas 0 22 450 278 (subpatch) 0;
+#X array \$0-sample 705600 float 2;
+#X coords 0 1 705600 -1 200 140 1;
+#X restore 642 466 graph;
+#X obj 256 213 soundfiler;
+#X floatatom 256 251 8 0 0 0 - - -;
+#X obj 361 250 unpack 0;
+#X obj 105 66 inlet;
+#X obj 256 66 inlet;
+#X obj 223 545 tabread4~ \$0-sample;
+#X obj 223 431 pack s f f;
+#X obj 309 109 f \$0;
+#X obj 309 84 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
+-1;
+#X obj 256 137 pack s f;
+#X msg 256 175 read -resize \$1 \$2-sample;
+#X obj 105 213 mtof;
+#X obj 359 635 outlet~;
+#X obj 105 251 expr 261.625 / $f1;
+#X obj 325 343 *;
+#X msg 441 469 0 1 \, 1 1 1 \, 0 1 \$3;
+#X msg 223 469 0 1 \, \$2 \$3 1 \, 0 2 \$3;
+#X obj 144 133 stdout;
+#X obj 628 406 stdout;
+#X msg 501 350 samples read: \$1;
+#X msg 144 113 l-in \$1;
+#X msg 666 273 rate: \$1 -- header size: \$2 -- channels: \$3 -- bytes
+per sample: \$4 -- endianness: \$5;
+#X obj 139 171 print l-in;
+#X connect 0 0 15 0;
+#X connect 1 0 0 0;
+#X connect 1 0 8 0;
+#X connect 2 0 3 0;
+#X connect 3 0 24 1;
+#X connect 4 0 16 0;
+#X connect 5 0 16 1;
+#X connect 6 0 16 2;
+#X connect 7 0 22 0;
+#X connect 8 0 7 1;
+#X connect 10 0 11 0;
+#X connect 10 0 29 0;
+#X connect 10 1 12 0;
+#X connect 10 1 31 0;
+#X connect 11 0 5 0;
+#X connect 11 0 2 0;
+#X connect 12 0 2 1;
+#X connect 13 0 21 0;
+#X connect 13 0 4 0;
+#X connect 13 0 30 0;
+#X connect 13 0 32 0;
+#X connect 14 0 18 0;
+#X connect 14 0 19 0;
+#X connect 15 0 7 0;
+#X connect 16 0 25 0;
+#X connect 16 0 26 0;
+#X connect 17 0 19 1;
+#X connect 18 0 17 0;
+#X connect 19 0 20 0;
+#X connect 20 0 10 0;
+#X connect 21 0 23 0;
+#X connect 23 0 24 0;
+#X connect 24 0 6 0;
+#X connect 25 0 8 0;
+#X connect 26 0 0 0;
+#X connect 29 0 28 0;
+#X connect 30 0 27 0;
+#X connect 31 0 28 0;