sound-from-earth/sound-from-earth-workshop/newstart_example.pd

#N canvas 0 35 1440 837 10;
#N canvas 498 35 1440 744 radio 0;
#X obj 333 282 spigot;
#X obj 382 267 tgl 15 0 empty empty empty 17 7 0 10 #fcfcfc #000000 #000000 0 1;
#N canvas 676 408 512 395 buildOSC 0;
#X obj 319 66 t a b;
#X msg 456 84 [;
#X msg 34 327 ];
#X obj 68 236 r X1;
#X obj 98 236 r X2;
#X obj 128 236 r X3;
#X obj 158 236 r X4;
#X obj 53 266 f;
#X obj 34 126 t b b a;
#X obj 254 345 outlet;
#X obj 140 17 inlet;
#X obj 188 236 r PS;
#X obj 88 284 pack f f f f f;
#X msg 319 112 sendtyped /note/onoff f \$1;
#X msg 254 141 sendtyped /note/velocity f \$1;
#X msg 88 307 sendtyped /note/x fffff \$1 \$2 \$3 \$4 \$5;
#X msg 73 199 sendtyped /note/id i \$1;
#X msg 167 170 sendtyped /note/pitch f \$1;
#X obj 140 39 unpack f f f f;
#X connect 0 0 13 0;
#X connect 0 1 1 0;
#X connect 1 0 9 0;
#X connect 2 0 9 0;
#X connect 3 0 7 1;
#X connect 4 0 12 1;
#X connect 5 0 12 2;
#X connect 6 0 12 3;
#X connect 7 0 12 0;
#X connect 8 0 2 0;
#X connect 8 1 7 0;
#X connect 8 2 16 0;
#X connect 10 0 18 0;
#X connect 11 0 12 4;
#X connect 12 0 15 0;
#X connect 13 0 9 0;
#X connect 14 0 9 0;
#X connect 15 0 9 0;
#X connect 16 0 9 0;
#X connect 17 0 9 0;
#X connect 18 0 8 0;
#X connect 18 1 17 0;
#X connect 18 2 14 0;
#X connect 18 3 0 0;
#X restore 413 286 pd buildOSC for all;
#X obj 112 210 o.io.slipserial;
#X msg 138 98 devices;
#X msg 209 98 close;
#X obj 112 189 packOSC;
#X obj 112 144 r OSC;
#X obj 112 231 unpackOSC;
#X obj 112 286 routeOSC /hello;
#X obj 112 309 s HELLO;
#X obj 19 171 print OSC;
#X obj 19 144 spigot;
#X obj 68 129 tgl 15 0 empty empty empty 17 7 0 10 #fcfcfc #000000 #000000 0 1;
#X obj 413 309 s OSC;
#X obj 413 255 r NOTE;
#X obj 333 309 print NOTE;
#X text 414 234 /id /pitch /velocity /onoff;
#X floatatom 636 254 5 0 0 0 - - - 0;
#X obj 636 276 s PS;
#X obj 629 169 tgl 16 0 empty empty hello 20 8 0 10 #9c00fc #f8fc00 #9c00fc 0 1;
#X obj 629 121 loadbang;
#X msg 629 142 1;
#X obj 629 196 sel 1;
#X obj 19 282 spigot;
#X obj 68 267 tgl 15 0 empty empty empty 17 7 0 10 #fcfcfc #000000 #000000 0 1;
#X obj 19 309 print HELLO;
#X text 14 12 * a wireless "field synth" - based on 'esp now' protocol, f 14;
#X msg 629 217 2000;
#X obj 215 262 tgl 15 0 empty empty connected? 17 7 0 10 #fcfcfc #000000 #000000 0 1;
#X floatatom 299 144 3 0 0 1 device\ id - - 0;
#X msg 299 164 open \$1 \, baud 57600 \, pollintervall 1 \, verbose 1;
#X obj 216 226 print info(\$0), f 8;
#X obj 226 303 outlet;
#X obj 209 15 inlet;
#X obj 209 36 tgl 16 0 empty empty empty 0 -8 0 10 #c6feff #000000 #000000 0 1;
#X obj 209 57 sel 0 1;
#X msg 268 98 devicename /dev/tty.usbserial-0001 \, baud 57600 \, pollintervall 1 \, verbose 1;
#X connect 0 0 16 0;
#X connect 1 0 0 1;
#X connect 2 0 14 0;
#X connect 3 0 8 0;
#X connect 3 1 29 0;
#X connect 3 2 32 0;
#X connect 4 0 3 1;
#X connect 5 0 3 1;
#X connect 6 0 3 0;
#X connect 7 0 6 0;
#X connect 7 0 12 0;
#X connect 8 0 9 0;
#X connect 9 0 10 0;
#X connect 9 0 24 0;
#X connect 12 0 11 0;
#X connect 13 0 12 1;
#X connect 15 0 0 0;
#X connect 15 0 2 0;
#X connect 18 0 19 0;
#X connect 20 0 23 0;
#X connect 21 0 22 0;
#X connect 22 0 20 0;
#X connect 23 0 28 0;
#X connect 23 1 18 0;
#X connect 24 0 26 0;
#X connect 25 0 24 1;
#X connect 28 0 18 0;
#X connect 29 0 33 0;
#X connect 30 0 31 0;
#X connect 31 0 3 1;
#X connect 34 0 35 0;
#X connect 35 0 36 0;
#X connect 36 0 5 0;
#X connect 36 1 37 0;
#X connect 37 0 3 1;
#X restore 21 92 pd radio;
#X obj 21 113 tgl 15 0 empty empty connected? 17 7 0 10 #fcfcfc #000000 #000000 0 1;
#X obj 21 71 tgl 16 0 empty empty connect/disconnect 0 -8 0 10 #c6feff #000000 #000000 0 1;
#X text 22 17 // + Sound From Earth @ Sandberg Instituut \, Amsterdam + //;
#X obj 491 537 s array1;
#X msg 537 450 const 0;
#X msg 550 494 sinesum 100 0.15;
#X obj 73 424 s NOTE;
#X msg 73 375 4567 1 1000 1;
#X text 94 344 /id /motor# /speed /onoff;
#X obj 73 290 metro 1000;
#X obj 73 264 tgl 18 0 empty empty empty 0 -9 0 10 #fcfcfc #000000 #000000 0 1;
#X obj 73 312 bng 18 250 50 0 empty empty empty 0 -9 0 10 #fcfcfc #000000 #000000;
#N canvas 0 50 450 250 (subpatch) 0;
#X array array1 67 float 3;
#A 0 0 0.0980171 0.19509 0.290285 0.382683 0.471397 0.55557 0.634393 0.707107 0.77301 0.83147 0.881921 0.92388 0.95694 0.980785 0.995185 1 0.995185 0.980785 0.95694 0.92388 0.881921 0.83147 0.77301 0.707107 0.634393 0.55557 0.471397 0.382683 0.290285 0.19509 0.0980171 1.22465e-16 -0.0980171 -0.19509 -0.290285 -0.382683 -0.471397 -0.55557 -0.634393 -0.707107 -0.77301 -0.83147 -0.881921 -0.92388 -0.95694 -0.980785 -0.995185 -1 -0.995185 -0.980785 -0.95694 -0.92388 -0.881921 -0.83147 -0.77301 -0.707107 -0.634393 -0.55557 -0.471397 -0.382683 -0.290285 -0.19509 -0.0980171 -2.44929e-16 0.0980171 0.19509;
#X coords 0 1 67 -1 200 140 1 0 0;
#X restore 424 191 graph;
#X obj 325 509 s NOTE;
#X floatatom 325 353 5 0 0 0 - - - 0;
#X floatatom 325 399 5 0 0 0 - - - 0;
#X obj 325 377 tabread array1;
#X obj 764 471 f;
#X floatatom 755 437 5 0 0 0 - - - 0;
#X floatatom 801 435 5 0 0 0 - - - 0;
#X floatatom 764 493 5 0 0 0 - - - 0;
#X obj 714 436 bng 18 250 50 0 empty empty empty 0 -9 0 10 #fcfcfc #000000 #000000;
#X obj 325 271 f;
#X obj 364 270 + 1;
#X floatatom 325 293 5 0 0 0 - - - 0;
#X obj 325 314 mod 100;
#X floatatom 801 182 5 0 0 0 - - - 0;
#X listbox 801 283 20 0 0 0 - - - 0;
#X obj 801 261 list;
#X obj 801 203 pack f f;
#X floatatom 838 182 5 0 0 0 - - - 0;
#X msg 801 239 juju heerko \$1 \$2;
#X obj 325 420 * 1000;
#X floatatom 325 442 5 0 0 0 - - - 0;
#X msg 325 480 4567 1 \$1 1;
#X obj 325 186 tgl 18 0 empty empty empty 0 -9 0 10 #fcfcfc #000000 #000000 0 1;
#X obj 325 232 bng 18 250 50 0 empty empty empty 0 -9 0 10 #fcfcfc #000000 #000000;
#X obj 325 209 metro 100;
#X text 384 100 scanning & loop over a array;
#X text 464 401 some array goodies helpful;
#X text 794 148 what is \$1 \$2 in the messages ?;
#X text 692 408 understanding what is [f ] object;
#X text 89 225 basic motor driving;
#X obj 1026 172 r HELLO;
#X obj 1026 236 unpack f f f f;
#X floatatom 1053 258 5 0 0 0 - - - 0;
#X obj 1053 279 / 1023;
#X floatatom 1053 301 5 0 0 0 - - - 0;
#X obj 1055 441 vsl 50 100 0 127 0 0 empty empty wind\ sensor 0 -9 0 10 #c6feff #000000 #000000 0 1;
#X obj 1053 322 * 127;
#X obj 1026 194 route 6002 6011;
#X obj 1151 286 unpack f f f f;
#X floatatom 1178 308 5 0 0 0 - - - 0;
#X obj 1178 329 / 1023;
#X floatatom 1178 351 5 0 0 0 - - - 0;
#X obj 1178 372 * 127;
#X obj 1178 439 vsl 50 100 0 127 0 0 empty empty light\ sensor 0 -9 0 10 #feffc6 #000000 #000000 0 1;
#X text 1075 128 getting sensor values;
#X msg 614 126 \; array1 sinesum 100 1;
#X obj 1357 177 sigmund~;
#X floatatom 1357 198 5 0 0 0 - - - 0;
#X obj 1601 119 adc~;
#X obj 1353 317 vsl 19 60 0 127 0 0 empty empty empty 0 -9 0 12 #fcfcfc #000000 #000000 0 1;
#X obj 1601 146 env~;
#X obj 1408 374 spigot;
#X obj 1568 164 vsl 19 60 0 127 0 0 empty empty empty 0 -9 0 12 #fcfcfc #000000 #000000 0 1;
#X obj 1441 344 tgl 19 0 empty empty empty 0 -10 0 12 #fcfcfc #000000 #000000 0 1;
#X floatatom 1601 173 5 0 0 0 - - - 0;
#X obj 1454 266 line;
#X msg 1454 239 \$1 50;
#X floatatom 1316 485 5 0 0 0 - - - 0;
#X obj 1408 459 skip 100;
#X obj 1357 218 sel -1500;
#X msg 1571 367 0;
#X obj 1601 293 change;
#X obj 1357 150 adc~;
#X obj 1408 401 mtof;
#X floatatom 1408 438 14 0 0 0 - - - 0;
#X obj 1601 254 t a a;
#X obj 1601 320 sel 0;
#X msg 1605 341 2000;
#X obj 1601 361 del;
#X msg 1287 614 9005 0 \$1 1;
#X obj 1314 689 s NOTE;
#X obj 1533 462 sel 1;
#X obj 1475 495 random 500;
#X floatatom 1274 548 5 0 0 0 - - - 0;
#X obj 1592 416 skip 100;
#X obj 1601 227 > 80;
#X msg 1311 435 0;
#X msg 1654 143 75;
#X msg 1708 149 100;
#X obj 1757 592 s NOTE;
#X msg 1730 517 9005 0 0 1;
#X msg 1800 468 9001 0 0 1;
#X msg 1813 492 9002 0 0 1;
#X msg 1829 515 9003 0 0 1;
#X msg 1861 536 9004 0 0 1;
#X obj 1807 414 bng 16 250 50 0 empty empty stop-all 0 -8 0 10 #ff0400 #000000 #000000;
#X floatatom 1678 237 5 0 0 0 - - - 0;
#X obj 1510 531 + 3000;
#X obj 1451 532 + 3000;
#X msg 1467 616 9003 0 \$1 1;
#X msg 1556 618 9002 0 \$1 1;
#X obj 1624 535 + 3000;
#X obj 1567 535 + 3000;
#X msg 1647 497 1000;
#X floatatom 1676 562 5 0 0 0 - - - 0;
#X msg 1641 190 70;
#X msg 1376 616 9006 0 \$1 1;
#X obj 1274 578 pipe 100;
#X obj 1363 574 pipe 100;
#X obj 1452 581 pipe 100;
#X obj 1541 577 pipe 100;
#X msg 1667 183 60;
#X msg 1566 628 9004 0 \$1 1;
#X msg 1237 624 9001 0 \$1 1;
#X msg 1700 180 65;
#X obj 899 50 hsl 136 16 0 127 0 1 empty empty empty -2 -8 0 10 #fcfcfc #000000 #000000 7600 1;
#X floatatom 893 92 5 0 0 0 - - - 0;
#X floatatom 264 670 5 0 0 0 - - - 0;
#X msg 266 632 25;
#X obj 260 600 loadbang;
#X connect 0 0 1 0;
#X connect 2 0 0 0;
#X connect 5 0 4 0;
#X connect 6 0 4 0;
#X connect 8 0 7 0;
#X connect 10 0 12 0;
#X connect 11 0 10 0;
#X connect 12 0 8 0;
#X connect 15 0 17 0;
#X connect 16 0 33 0;
#X connect 17 0 16 0;
#X connect 18 0 21 0;
#X connect 19 0 18 0;
#X connect 20 0 18 1;
#X connect 22 0 18 0;
#X connect 23 0 24 0;
#X connect 23 0 25 0;
#X connect 24 0 23 1;
#X connect 25 0 26 0;
#X connect 26 0 15 0;
#X connect 27 0 30 0;
#X connect 29 0 28 0;
#X connect 30 0 32 0;
#X connect 31 0 30 1;
#X connect 32 0 29 0;
#X connect 33 0 34 0;
#X connect 34 0 35 0;
#X connect 35 0 14 0;
#X connect 36 0 38 0;
#X connect 37 0 23 0;
#X connect 38 0 37 0;
#X connect 44 0 51 0;
#X connect 45 1 46 0;
#X connect 46 0 47 0;
#X connect 47 0 48 0;
#X connect 48 0 50 0;
#X connect 50 0 49 0;
#X connect 51 0 45 0;
#X connect 51 1 52 0;
#X connect 52 1 53 0;
#X connect 53 0 54 0;
#X connect 54 0 55 0;
#X connect 55 0 56 0;
#X connect 56 0 57 0;
#X connect 60 0 61 0;
#X connect 61 0 73 0;
#X connect 62 0 64 0;
#X connect 64 0 66 0;
#X connect 64 0 68 0;
#X connect 65 0 63 0;
#X connect 65 0 77 0;
#X connect 67 0 65 1;
#X connect 67 0 85 0;
#X connect 68 0 89 0;
#X connect 70 0 69 0;
#X connect 71 0 111 0;
#X connect 71 0 112 0;
#X connect 71 0 113 0;
#X connect 71 0 114 0;
#X connect 72 0 71 0;
#X connect 73 1 65 0;
#X connect 74 0 78 0;
#X connect 75 0 80 0;
#X connect 76 0 60 0;
#X connect 77 0 78 0;
#X connect 78 0 72 0;
#X connect 79 0 75 0;
#X connect 79 1 67 0;
#X connect 80 0 74 0;
#X connect 80 0 81 0;
#X connect 81 0 82 0;
#X connect 82 0 74 0;
#X connect 83 0 84 0;
#X connect 85 0 86 0;
#X connect 86 0 87 0;
#X connect 86 0 101 0;
#X connect 86 0 102 0;
#X connect 86 0 106 0;
#X connect 86 0 105 0;
#X connect 89 0 79 0;
#X connect 90 0 71 0;
#X connect 91 0 89 1;
#X connect 92 0 89 1;
#X connect 94 0 93 0;
#X connect 95 0 93 0;
#X connect 96 0 93 0;
#X connect 97 0 93 0;
#X connect 98 0 93 0;
#X connect 99 0 94 0;
#X connect 99 0 98 0;
#X connect 99 0 97 0;
#X connect 99 0 96 0;
#X connect 99 0 95 0;
#X connect 101 0 112 1;
#X connect 102 0 111 1;
#X connect 103 0 84 0;
#X connect 104 0 84 0;
#X connect 105 0 108 0;
#X connect 105 0 114 1;
#X connect 106 0 113 1;
#X connect 107 0 102 1;
#X connect 107 0 101 1;
#X connect 107 0 106 1;
#X connect 107 0 105 1;
#X connect 109 0 89 1;
#X connect 110 0 84 0;
#X connect 111 0 83 0;
#X connect 111 0 117 0;
#X connect 112 0 110 0;
#X connect 113 0 103 0;
#X connect 114 0 104 0;
#X connect 114 0 116 0;
#X connect 115 0 89 1;
#X connect 116 0 84 0;
#X connect 117 0 84 0;
#X connect 118 0 89 1;
#X connect 119 0 120 0;
#X connect 122 0 121 0;
#X connect 123 0 122 0;