faa/puredata/radio_roller.pd

179 lines
6.1 KiB
Text

#N canvas 250 164 818 587 10;
#N canvas 294 82 697 282 radio 0;
#X obj 333 222 spigot;
#X obj 382 207 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 226 pd buildOSC for all;
#X obj 112 150 o.io.slipserial;
#X msg 319 157 devices;
#X msg 319 178 close;
#X obj 112 129 packOSC;
#X obj 112 84 r OSC;
#X obj 112 171 unpackOSC;
#X obj 112 226 routeOSC /hello;
#X obj 112 249 s HELLO;
#X obj 19 111 print OSC;
#X obj 19 84 spigot;
#X obj 68 69 tgl 15 0 empty empty empty 17 7 0 10 #fcfcfc #000000 #000000 0 1;
#X obj 413 249 s OSC;
#X obj 413 195 r NOTE;
#X obj 333 249 print NOTE;
#X text 414 174 /id /pitch /velocity /onoff;
#X floatatom 636 194 5 0 0 0 - - - 0;
#X obj 636 216 s PS;
#X obj 629 109 tgl 16 0 empty empty hello 20 8 0 10 #9c00fc #f8fc00 #9c00fc 0 1;
#X obj 629 61 loadbang;
#X msg 629 82 1;
#X obj 629 136 sel 1;
#X obj 19 222 spigot;
#X obj 68 207 tgl 15 0 empty empty empty 17 7 0 10 #fcfcfc #000000 #000000 0 1;
#X obj 19 249 print HELLO;
#X text 165 63 * a wireless "field synth" - based on 'esp now' protocol, f 14;
#X msg 629 157 2000;
#X obj 215 202 tgl 15 0 empty empty connected? 17 7 0 10 #fcfcfc #000000 #000000 0 1;
#X msg 279 64 devicename /dev/tty.SLAB_USBtoUART \, baud 57600 \, pollintervall 1 \, verbose 1;
#X floatatom 279 106 3 0 0 1 device\ id - - 0;
#X msg 279 126 open \$1 \, baud 57600 \, pollintervall 1 \, verbose 1;
#X obj 216 166 print info(\$0), f 8;
#X obj 226 243 outlet;
#X obj 325 10 inlet;
#X obj 325 31 bng 16 250 50 0 empty empty empty 0 -8 0 10 #fcfcfc #000000 #000000;
#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 33 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 34 0;
#X connect 30 0 3 1;
#X connect 31 0 32 0;
#X connect 32 0 3 1;
#X connect 35 0 36 0;
#X connect 36 0 30 0;
#X restore 11 32 pd radio;
#X obj 11 53 tgl 15 0 empty empty connected? 17 7 0 10 #fcfcfc #000000 #000000 0 1;
#X obj 11 10 bng 16 250 50 0 empty empty empty 0 -8 0 10 #fcfcfc #000000 #000000;
#X obj 321 168 s NOTE;
#X obj 321 114 tgl 16 0 empty empty start/stop 0 -8 0 10 #fcfcfc #000000 #000000 0 1;
#X text 222 21 for example \, to send motor speed message to 'faa_roller';
#X msg 321 141 4001 0 500 \$1;
#X obj 461 168 s NOTE;
#X floatatom 461 115 5 -1000 1000 2 set\ speed - - 0;
#X msg 461 141 4001 0 \$1 1;
#X obj 606 346 s NOTE;
#X floatatom 651 238 5 -1000 1000 2 set\ speed - - 0;
#X obj 606 292 pack f f;
#X obj 606 215 tgl 16 0 empty empty start/stop 0 -8 0 10 #fcfcfc #000000 #000000 0 1;
#X msg 606 319 4001 0 \$2 \$1;
#X obj 651 258 t a b;
#X text 621 170 speed & on/off together;
#N canvas 0 22 450 278 (subpatch) 0;
#X array motion 100 float 3;
#A 0 0 -14.2857 14.2856 71.4282 99.9995 128.571 157.142 199.999 264.284 328.57 399.998 457.141 514.283 557.14 542.854 485.712 414.284 314.284 249.999 185.713 128.571 71.4282 28.5712 -14.2857 -57.1426 -90.4758 -123.809 -157.142 -228.57 -249.999 -271.427 -285.713 -299.999 -299.999 -314.284 -307.141 -299.999 -285.713 -271.427 -257.142 -242.856 -171.428 -138.095 -104.761 -71.4283 28.5712 99.9995 171.428 233.332 295.237 357.141 428.569 385.712 299.998 185.713 121.428 57.1425 -42.857 -78.5711 -114.285 -157.142 -171.428 -185.713 -185.713 -185.713 -178.571 -171.428 -157.142 -128.571 -121.428 -114.285 -99.9996 -85.7139 -64.2855 -42.857 -35.7142 -28.5714 -28.5714 -28.5714 -28.5714 -42.8571 -57.1427 -99.9996 -171.428 -214.285 -228.57 -242.856 -242.856 -242.856 -228.57 -228.57 -214.285 -199.999 -171.428 -157.142 -142.857 -128.571 -114.285 -99.9996 -85.714;
#X coords 0 1000 100 -1000 200 140 1 0 0;
#X restore 59 281 graph;
#X text 541 102 -(minus) value means reverse direction;
#X text 120 225 driving with a table is fun.;
#X obj 298 446 tabread motion;
#X obj 298 366 f;
#X obj 338 366 + 1;
#X obj 328 279 tgl 16 0 empty empty empty 0 -8 0 10 #fcfcfc #000000 #000000 0 1;
#X obj 328 306 metro 300;
#X obj 328 327 bng 16 250 50 0 empty empty empty 0 -8 0 10 #fcfcfc #000000 #000000;
#X floatatom 298 424 5 0 0 0 - - - 0;
#X floatatom 298 467 5 0 0 0 - - - 0;
#X obj 298 387 mod 100;
#X obj 444 387 s NOTE;
#X floatatom 444 334 5 -1000 1000 2 set\ speed - - 0;
#X msg 444 360 4001 0 \$1 1;
#X text 48 163 /device_id /motor_id /speed /onoff;
#X msg 49 141 4001 0 500 \$1;
#X connect 0 0 1 0;
#X connect 2 0 0 0;
#X connect 4 0 6 0;
#X connect 6 0 3 0;
#X connect 8 0 9 0;
#X connect 9 0 7 0;
#X connect 11 0 15 0;
#X connect 12 0 14 0;
#X connect 13 0 12 0;
#X connect 14 0 10 0;
#X connect 15 0 12 1;
#X connect 15 1 12 0;
#X connect 20 0 27 0;
#X connect 21 0 22 0;
#X connect 21 0 28 0;
#X connect 22 0 21 1;
#X connect 23 0 24 0;
#X connect 24 0 25 0;
#X connect 25 0 21 0;
#X connect 26 0 20 0;
#X connect 27 0 30 0;
#X connect 28 0 26 0;
#X connect 30 0 31 0;
#X connect 31 0 29 0;