forest-all-around/puredata/radio_theatre_0.atm2022/piano_access_radio_theatre.pd
2022-10-21 03:07:04 +09:00

880 lines
26 KiB
Text

#N canvas 552 33 884 489 10;
#X obj 328 198 spigot;
#X obj 377 183 tgl 15 0 empty empty empty 17 7 0 10 #fcfcfc #000000
#000000 0 1;
#X text 11 12 <<<;
#X text 581 12 >>>;
#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 418 194 pd buildOSC for all;
#X obj 123 121 o.io.slipserial;
#X msg 249 142 devices;
#X msg 249 165 close;
#X obj 123 80 packOSC;
#X obj 123 55 r OSC;
#X obj 123 144 unpackOSC;
#X obj 123 167 routeOSC /hello;
#X obj 123 190 s HELLO;
#X obj 40 120 print OSC;
#X obj 40 93 spigot;
#X obj 89 58 tgl 15 0 empty empty empty 17 7 0 10 #fcfcfc #000000 #000000
0 1;
#X obj 418 217 s OSC;
#X obj 418 155 r NOTE;
#X obj 328 225 print NOTE;
#X text 419 134 /id /pitch /velocity /onoff;
#X text 11 442 <<<;
#X text 581 442 >>>;
#X text 297 267 * sub-patches;
#X floatatom 549 325 5 0 0 0 - - - 0;
#X obj 549 347 s PS;
#X obj 500 236 tgl 25 0 empty empty hello 32 7 0 15 #9c00fc #f8fc00
#9c00fc 0 1;
#X obj 549 263 loadbang;
#X msg 549 286 1;
#X obj 500 286 sel 1;
#X obj 40 163 spigot;
#X obj 89 148 tgl 15 0 empty empty empty 17 7 0 10 #fcfcfc #000000
#000000 0 1;
#X obj 40 190 print HELLO;
#N canvas 224 125 706 244 samplers 0;
#X obj 35 142 spigot;
#X obj 84 127 tgl 15 0 empty empty empty 17 7 0 10 #fcfcfc #000000
#000000 0 1;
#X text 11 12 <<<;
#X text 671 12 >>>;
#X text 155 34 /pitch /velocity /onoff;
#X obj 59 93 s OSC;
#X obj 365 32 loadbang;
#X text 489 93 BIG;
#X text 327 93 SMALL;
#X obj 365 94 hradio 15 1 0 8 empty empty vol._override 0 -8 0 10 #f8fc00
#000000 #000000 0;
#X obj 365 117 tabread \$0-volume-list;
#N canvas 763 340 501 420 volume-list 0;
#X msg 146 359 \; \$1-volume-list 0 0 10 25 50 127 180 255 500;
#X obj 146 336 f \$0;
#X obj 146 316 bng 15 250 50 0 empty empty empty 17 7 0 10 #fcfcfc
#000000 #000000;
#X obj 146 276 loadbang;
#N canvas 0 50 450 250 (subpatch) 0;
#X array \$0-volume-list 20 float 3;
#A 0 0 10 25 50 127 180 255 500 0 0 0 0 0 0 0 0 0 0 0 0;
#X coords 0 1000 20 0 200 140 1 0 0;
#X restore 227 181 graph;
#X text 441 311 0;
#X text 445 172 1000;
#X obj 100 169 bng 15 250 50 0 empty empty v+ 17 7 0 10 #fcfcfc #000000
#000000;
#X obj 31 169 bng 15 250 50 0 empty empty v- 17 7 0 10 #fcfcfc #000000
#000000;
#X obj 31 64 unpack f f f;
#X text 127 42 /pitch /velocity /onoff;
#X obj 100 92 tgl 15 0 empty empty empty 17 7 0 10 #fcfcfc #000000
#000000 0 1;
#X obj 31 107 spigot;
#X text 104 128 keys for volume control: vol+ / vol-;
#X text 45 16 volume control w/ keyboard;
#X obj 31 128 sel 38 40;
#X floatatom 71 288 5 0 0 0 s:0-vol - \$0-vol 0;
#X obj 31 250 tabread \$0-volume-list;
#X floatatom 31 228 5 0 0 0 - - - 0;
#X obj 31 205 limitcnt 0 7;
#X obj 31 43 r SAMPLER_NOTE;
#X connect 1 0 0 0;
#X connect 2 0 1 0;
#X connect 7 0 19 1;
#X connect 8 0 19 0;
#X connect 9 0 12 0;
#X connect 9 2 11 0;
#X connect 11 0 12 1;
#X connect 12 0 15 0;
#X connect 15 0 8 0;
#X connect 15 1 7 0;
#X connect 17 0 16 0;
#X connect 18 0 17 0;
#X connect 19 0 18 0;
#X connect 20 0 9 0;
#X restore 413 146 pd volume-list;
#X floatatom 365 146 5 0 0 0 s:0-vol - \$0-vol 0;
#X msg 365 55 4;
#X text 11 212 <<<;
#X text 671 212 >>>;
#X floatatom 586 120 5 0 0 3 r:0-vol \$0-vol - 0;
#X obj 546 67 nbx 5 25 -1e+37 1e+37 0 0 empty empty volume-now 0 -12
0 20 #fcfcc4 #9c00fc #9c00fc 0 256;
#X obj 177 110 tgl 15 0 empty empty empty 17 7 0 10 #fcfcfc #000000
#000000 0 1;
#X floatatom 222 108 5 0 0 0 - - - 0;
#X obj 177 136 pack f f;
#X msg 177 159 \$2 100 \$1;
#N canvas 113 357 512 395 buildOSC 0;
#X obj 319 76 t a b;
#X msg 456 94 [;
#X msg 34 327 ];
#X obj 140 39 unpack f f f;
#X obj 66 226 r X1;
#X obj 96 226 r X2;
#X obj 126 226 r X3;
#X obj 156 226 r X4;
#X obj 51 256 f;
#X obj 254 345 outlet;
#X obj 140 17 inlet;
#X obj 186 226 r PS;
#X obj 86 274 pack f f f f f;
#X msg 319 122 sendtyped /note/onoff f \$1;
#X msg 85 150 sendtyped /note/pitch f \$1;
#X msg 254 150 sendtyped /note/velocity f \$1;
#X msg 86 297 sendtyped /note/x fffff \$1 \$2 \$3 \$4 \$5;
#X floatatom 174 82 5 0 0 0 - - - 0;
#X obj 174 62 bng 15 250 50 0 empty empty empty 17 7 0 10 #fcfcfc #000000
#000000;
#X floatatom 315 19 5 0 0 0 r:0-vol \$0-vol - 0;
#X msg 315 41 set \$1;
#X msg 68 179 sendtyped /note/id i 5000;
#X obj 34 121 t b b b a;
#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 22 0;
#X connect 3 1 18 0;
#X connect 3 2 0 0;
#X connect 4 0 8 1;
#X connect 5 0 12 1;
#X connect 6 0 12 2;
#X connect 7 0 12 3;
#X connect 8 0 12 0;
#X connect 10 0 3 0;
#X connect 11 0 12 4;
#X connect 12 0 16 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 15 0;
#X connect 18 0 17 0;
#X connect 19 0 20 0;
#X connect 20 0 17 0;
#X connect 21 0 9 0;
#X connect 22 0 2 0;
#X connect 22 1 8 0;
#X connect 22 2 21 0;
#X connect 22 3 14 0;
#X restore 59 64 pd buildOSC id 5000;
#X text 183 64 id == 5000 FIXED;
#X text 236 130 TESTER;
#X obj 59 35 r SAMPLER_NOTE;
#X obj 35 169 print SAMPLER_NOTE;
#X obj 177 182 s SAMPLER_NOTE;
#X connect 0 0 26 0;
#X connect 1 0 0 1;
#X connect 6 0 13 0;
#X connect 9 0 10 0;
#X connect 10 0 12 0;
#X connect 13 0 9 0;
#X connect 16 0 17 0;
#X connect 18 0 20 0;
#X connect 19 0 20 1;
#X connect 20 0 21 0;
#X connect 21 0 27 0;
#X connect 22 0 5 0;
#X connect 25 0 22 0;
#X connect 25 0 0 0;
#X coords 0 244 1 243 200 200 0;
#X restore 62 424 pd samplers;
#X text 109 24 * a wireless "field synth" - based on 'esp now' protocol
;
#X msg 500 315 2000;
#N canvas 803 196 443 470 keyboard 0;
#X obj 20 126 unpackOSC;
#X obj 107 18 loadbang;
#X msg 147 103 devices;
#X obj 20 147 routeOSC /note;
#X floatatom 20 189 5 0 0 0 - - - 0;
#X floatatom 77 189 5 0 0 0 - - - 0;
#X floatatom 135 189 5 0 0 0 - - - 0;
#X obj 20 105 o.io.slipserial;
#X msg 147 127 close;
#X obj 20 235 pack f f f;
#X obj 20 168 routeOSC /pitch /velocity /onoff /oncnt;
#X floatatom 193 189 5 0 0 0 - - - 0;
#X obj 135 245 tgl 100 0 empty empty empty 17 7 0 10 #fcfcfc #000000
#000000 0 1;
#X msg 20 52 devicename /dev/tty.HC-06-DevB-1 \, baud 57600 \, pollintervall
1 \, verbose 1;
#X text 1 2 <<<;
#X text 401 2 >>>;
#X text 1 422 <<<;
#X text 401 422 >>>;
#X obj 20 258 s SAMPLER_NOTE;
#X floatatom 185 349 8 0 0 0 pitch - - 0;
#X floatatom 185 369 8 0 0 0 velocity - - 0;
#X obj 259 230 notein 1;
#X floatatom 259 259 5 0 0 0 - - - 0;
#X floatatom 304 259 5 0 0 0 - - - 0;
#X obj 304 287 t a a;
#X floatatom 259 321 5 0 0 0 - - - 0;
#X floatatom 304 321 5 0 0 0 - - - 0;
#X floatatom 361 332 5 0 0 0 - - - 0;
#X obj 259 349 pack f f f;
#X obj 361 305 != 0;
#X obj 259 372 s SAMPLER_NOTE;
#X text 260 205 * from midi master keybrd;
#X text 180 25 * from bt-keybrd made w/ teensy;
#X connect 0 0 3 0;
#X connect 2 0 7 1;
#X connect 3 0 10 0;
#X connect 4 0 9 0;
#X connect 4 0 19 0;
#X connect 5 0 9 1;
#X connect 5 0 20 0;
#X connect 6 0 9 2;
#X connect 6 0 12 0;
#X connect 7 0 0 0;
#X connect 8 0 7 1;
#X connect 9 0 18 0;
#X connect 10 0 4 0;
#X connect 10 1 5 0;
#X connect 10 2 6 0;
#X connect 10 3 11 0;
#X connect 13 0 7 1;
#X connect 21 0 22 0;
#X connect 21 1 23 0;
#X connect 22 0 25 0;
#X connect 23 0 24 0;
#X connect 24 0 26 0;
#X connect 24 1 29 0;
#X connect 25 0 28 0;
#X connect 26 0 28 1;
#X connect 27 0 28 2;
#X connect 27 0 12 0;
#X connect 28 0 30 0;
#X connect 29 0 27 0;
#X coords 0 -1 1 1 110 170 1 130 220;
#X restore 62 244 pd keyboard ctrlr;
#N canvas 624 23 812 741 crickets 0;
#N canvas 0 33 1320 672 (subpatch) 0;
#N canvas 0 50 450 250 (subpatch) 0;
#X array world_energy 20 float 3;
#A 0 0 1.236e-15 0 0.299876 0.0151909 0 5.93902e-12 0 0 0 0 0.249896
0.299876 0.199917 0 0 0 0 0 0;
#X coords 0 1 20 0 200 50 1 0 0;
#X restore 15 36 graph;
#X obj 448 134 array sum;
#X msg 519 116 symbol world_energy;
#X floatatom 183 18 5 0 0 0 sum WORLD_ENERGY - 0;
#X msg 608 52 \; world_energy const 0;
#X obj 448 111 metro 100;
#X obj 448 210 s WORLD_ENERGY;
#X obj 492 39 loadbang;
#X obj 492 62 t b b;
#X msg 24 452 \; world_energy \$2 \$1;
#X obj 24 429 pack f f;
#X obj 130 332 loadbang;
#X obj 24 361 snapshot~;
#X msg 24 309 start;
#X msg 74 309 stop;
#X obj 69 386 tgl 15 0 empty empty empty 17 7 0 10 #fcfcfc #000000
#000000 0 1;
#X floatatom 24 384 5 0 0 0 - - - 0;
#X obj 130 368 t b b;
#X obj 24 243 r ROUNDER;
#X obj 74 266 r ROUNDER_DONE;
#X msg 157 411 1;
#X obj 69 406 metro 50;
#X obj 24 338 ear~ 2000 10000;
#X obj 448 157 max 0.001;
#X obj 262 40 loadbang;
#X msg 262 63 \; pd dsp 1;
#X msg 204 452 \; world_energy \$2 \$1;
#X obj 204 429 pack f f;
#X obj 310 332 loadbang;
#X obj 204 361 snapshot~;
#X msg 204 309 start;
#X msg 254 309 stop;
#X obj 249 386 tgl 15 0 empty empty empty 17 7 0 10 #fcfcfc #000000
#000000 0 1;
#X floatatom 204 384 5 0 0 0 - - - 0;
#X obj 310 368 t b b;
#X obj 249 406 metro 50;
#X obj 204 338 ear~ 2000 10000;
#X msg 337 411 3;
#X msg 554 452 \; world_energy \$2 \$1;
#X obj 554 429 pack f f;
#X obj 660 332 loadbang;
#X obj 554 361 snapshot~;
#X msg 554 309 start;
#X msg 604 309 stop;
#X obj 599 386 tgl 15 0 empty empty empty 17 7 0 10 #fcfcfc #000000
#000000 0 1;
#X floatatom 554 384 5 0 0 0 - - - 0;
#X obj 660 368 t b b;
#X obj 599 406 metro 50;
#X obj 554 338 ear~ 2000 10000;
#X obj 554 243 r YELLOW;
#X obj 604 266 r YELLOW_DONE;
#X msg 204 722 \; world_energy \$2 \$1;
#X obj 204 699 pack f f;
#X obj 310 602 loadbang;
#X obj 204 631 snapshot~;
#X msg 204 579 start;
#X msg 254 579 stop;
#X obj 249 656 tgl 15 0 empty empty empty 17 7 0 10 #fcfcfc #000000
#000000 0 1;
#X floatatom 204 654 5 0 0 0 - - - 0;
#X obj 310 638 t b b;
#X obj 249 676 metro 50;
#X obj 204 608 ear~ 2000 10000;
#X msg 384 722 \; world_energy \$2 \$1;
#X obj 384 699 pack f f;
#X obj 490 602 loadbang;
#X obj 384 631 snapshot~;
#X msg 384 579 start;
#X msg 434 579 stop;
#X obj 429 656 tgl 15 0 empty empty empty 17 7 0 10 #fcfcfc #000000
#000000 0 1;
#X floatatom 384 654 5 0 0 0 - - - 0;
#X obj 490 638 t b b;
#X obj 429 676 metro 50;
#X obj 384 608 ear~ 2000 10000;
#X obj 384 676 * 0.3;
#X msg 564 722 \; world_energy \$2 \$1;
#X obj 564 699 pack f f;
#X obj 670 602 loadbang;
#X obj 564 631 snapshot~;
#X msg 564 579 start;
#X msg 614 579 stop;
#X obj 609 656 tgl 15 0 empty empty empty 17 7 0 10 #fcfcfc #000000
#000000 0 1;
#X floatatom 564 654 5 0 0 0 - - - 0;
#X obj 670 638 t b b;
#X obj 609 676 metro 50;
#X obj 564 608 ear~ 2000 10000;
#X obj 204 513 r DRUMMER;
#X obj 254 536 r DRUMMER_DONE;
#X obj 384 513 r COPPER;
#X obj 434 536 r COPPER_DONE;
#X obj 564 513 r YHOSE;
#X obj 614 536 r YHOSE_DONE;
#X msg 384 452 \; world_energy \$2 \$1;
#X obj 384 429 pack f f;
#X obj 490 332 loadbang;
#X obj 384 361 snapshot~;
#X msg 384 309 start;
#X msg 434 309 stop;
#X obj 429 386 tgl 15 0 empty empty empty 17 7 0 10 #fcfcfc #000000
#000000 0 1;
#X floatatom 384 384 5 0 0 0 - - - 0;
#X obj 490 368 t b b;
#X obj 429 406 metro 50;
#X obj 384 338 ear~ 2000 10000;
#X msg 517 411 4;
#X msg 687 411 6;
#X msg 337 681 11;
#X msg 517 681 12;
#X msg 697 681 13;
#N canvas 0 50 450 250 (subpatch) 0;
#X array we_sequence 20 float 3;
#A 0 1.22 1.18 1.24 0.66 0.84 0.84 0.58 0.22 0.24 0.98 1.34 1.24 0.36
0.62 1.06 0.94 0.14 0.14 0.14 0.14;
#X coords 0 2 20 0 200 100 1 0 0;
#X restore 764 36 graph;
#X obj 1065 75 f;
#X obj 1098 75 + 1;
#X obj 1065 98 mod 20;
#X floatatom 1065 121 5 0 0 0 - - - 0;
#X obj 1065 143 tabread we_sequence;
#X obj 1045 75 bng 15 250 50 0 empty empty empty 17 7 0 10 #fcfcfc
#000000 #000000;
#X floatatom 1065 166 5 0 0 0 - - - 0;
#X obj 448 183 *;
#X obj 1045 52 metro 60000;
#X obj 1045 32 tgl 15 0 empty empty empty 17 7 0 10 #fcfcfc #000000
#000000 0 1;
#X obj 1045 9 loadbang;
#X obj 1065 188 s E_SEQ;
#X msg 1167 66 \; we_sequence const 1;
#X obj 764 136 hradio 10 1 0 20 empty empty empty 0 -8 0 10 #f8fc00
#0400fc #000000 0;
#X obj 24 406 * 0.2;
#X obj 554 406 * 0.1;
#N canvas 84 89 450 300 backup 0;
#N canvas 0 50 450 250 (subpatch) 0;
#X array we_sequence_backup 20 float 3;
#A 0 0.885714 1 0.685714 1 0.514286 1 0.485714 1 1 0.6 0.585714 0.642857
1 1 0.842857 1 0.857143 1 1 0.885714;
#X coords 0 1 20 0 200 70 1 0 0;
#X restore 22 32 graph;
#N canvas 0 50 450 250 (subpatch) 0;
#X array we_sequence.backup 20 float 3;
#A 0 1 0.91 0.91 0.799999 0.79 0.78 0.73 0.66 1 0.91 0.87 0.85 0.64
0.66 1 1 1 0.8 0.8 1;
#X coords 0 1 20 0 200 100 1 0 0;
#X restore 195 141 graph;
#X restore 137 152 pd backup sequences;
#X obj 564 676 * 0.2;
#X obj 204 676 * 0.25;
#X obj 384 406 * 0.35;
#X obj 205 406 * 0.3;
#X obj 700 172 line;
#X floatatom 700 193 5 0 0 0 - - - 0;
#X msg 700 151 \$1 10000;
#X obj 700 213 s E_SEQ_line;
#X obj 1007 220 bng 15 250 50 0 WORLD_evt_half empty s:WORLD_evt_half
17 7 0 10 #fcfcfc #000000 #000000;
#X obj 362 29 tgl 15 0 empty WORLD_SLEEP r:WORLD_SLEEP 17 7 0 10 #fcfcfc
#000000 #000000 0 1;
#X obj 362 70 tgl 15 0 empty empty empty 17 7 0 10 #fcfcfc #000000
#000000 0 1;
#X msg 351 95 \; pd dsp \$1;
#X obj 362 49 == 0;
#X obj 937 189 sel 12 16 17 18 19;
#X obj 204 243 r CHIME_S;
#X obj 254 266 r CHIME_S_DONE;
#X obj 384 243 r CHIME_T;
#X obj 434 266 r CHIME_T_DONE;
#X connect 1 0 23 0;
#X connect 2 0 1 2;
#X connect 5 0 1 0;
#X connect 7 0 8 0;
#X connect 8 0 5 0;
#X connect 8 1 2 0;
#X connect 8 1 4 0;
#X connect 10 0 9 0;
#X connect 11 0 17 0;
#X connect 12 0 16 0;
#X connect 13 0 22 0;
#X connect 14 0 22 0;
#X connect 15 0 21 0;
#X connect 16 0 122 0;
#X connect 17 0 15 0;
#X connect 17 1 20 0;
#X connect 18 0 13 0;
#X connect 19 0 14 0;
#X connect 20 0 10 1;
#X connect 21 0 12 0;
#X connect 22 0 12 0;
#X connect 23 0 115 0;
#X connect 24 0 25 0;
#X connect 27 0 26 0;
#X connect 28 0 34 0;
#X connect 29 0 33 0;
#X connect 30 0 36 0;
#X connect 31 0 36 0;
#X connect 32 0 35 0;
#X connect 33 0 128 0;
#X connect 34 0 32 0;
#X connect 34 1 37 0;
#X connect 35 0 29 0;
#X connect 36 0 29 0;
#X connect 37 0 27 1;
#X connect 39 0 38 0;
#X connect 40 0 46 0;
#X connect 41 0 45 0;
#X connect 42 0 48 0;
#X connect 43 0 48 0;
#X connect 44 0 47 0;
#X connect 45 0 123 0;
#X connect 46 0 44 0;
#X connect 46 1 103 0;
#X connect 47 0 41 0;
#X connect 48 0 41 0;
#X connect 49 0 42 0;
#X connect 50 0 43 0;
#X connect 52 0 51 0;
#X connect 53 0 59 0;
#X connect 54 0 58 0;
#X connect 55 0 61 0;
#X connect 56 0 61 0;
#X connect 57 0 60 0;
#X connect 58 0 126 0;
#X connect 59 0 57 0;
#X connect 59 1 104 0;
#X connect 60 0 54 0;
#X connect 61 0 54 0;
#X connect 63 0 62 0;
#X connect 64 0 70 0;
#X connect 65 0 69 0;
#X connect 66 0 72 0;
#X connect 67 0 72 0;
#X connect 68 0 71 0;
#X connect 69 0 73 0;
#X connect 70 0 68 0;
#X connect 70 1 105 0;
#X connect 71 0 65 0;
#X connect 72 0 65 0;
#X connect 73 0 63 0;
#X connect 75 0 74 0;
#X connect 76 0 82 0;
#X connect 77 0 81 0;
#X connect 78 0 84 0;
#X connect 79 0 84 0;
#X connect 80 0 83 0;
#X connect 81 0 125 0;
#X connect 82 0 80 0;
#X connect 82 1 106 0;
#X connect 83 0 77 0;
#X connect 84 0 77 0;
#X connect 85 0 55 0;
#X connect 86 0 56 0;
#X connect 87 0 66 0;
#X connect 88 0 67 0;
#X connect 89 0 78 0;
#X connect 90 0 79 0;
#X connect 92 0 91 0;
#X connect 93 0 99 0;
#X connect 94 0 98 0;
#X connect 95 0 101 0;
#X connect 96 0 101 0;
#X connect 97 0 100 0;
#X connect 98 0 127 0;
#X connect 99 0 97 0;
#X connect 99 1 102 0;
#X connect 100 0 94 0;
#X connect 101 0 94 0;
#X connect 102 0 92 1;
#X connect 103 0 39 1;
#X connect 104 0 52 1;
#X connect 105 0 63 1;
#X connect 106 0 75 1;
#X connect 108 0 109 0;
#X connect 108 0 110 0;
#X connect 109 0 108 1;
#X connect 110 0 111 0;
#X connect 111 0 112 0;
#X connect 111 0 121 0;
#X connect 111 0 138 0;
#X connect 112 0 114 0;
#X connect 113 0 108 0;
#X connect 114 0 119 0;
#X connect 114 0 131 0;
#X connect 115 0 6 0;
#X connect 116 0 113 0;
#X connect 117 0 116 0;
#X connect 118 0 117 0;
#X connect 122 0 10 0;
#X connect 123 0 39 0;
#X connect 125 0 75 0;
#X connect 126 0 52 0;
#X connect 127 0 92 0;
#X connect 128 0 27 0;
#X connect 129 0 130 0;
#X connect 130 0 115 1;
#X connect 130 0 132 0;
#X connect 131 0 129 0;
#X connect 135 0 136 0;
#X connect 138 0 133 0;
#X connect 138 1 133 0;
#X connect 138 2 133 0;
#X connect 138 3 133 0;
#X connect 138 4 133 0;
#X connect 139 0 30 0;
#X connect 140 0 31 0;
#X connect 141 0 95 0;
#X connect 142 0 96 0;
#X coords 0 -1 1 1 220 100 1 5 5;
#X restore 12 12 pd;
#X obj 36 175 radio_yellow;
#X obj 165 176 radio_rounder;
#X obj 687 23 radio_copper;
#X obj 688 187 radio_drummer;
#X obj 417 10 radio_yellowhose;
#X floatatom 312 14 5 0 0 0 r:E_SEQ_line E_SEQ_line - 0;
#X obj 384 176 radio_chime_short;
#X obj 516 180 radio_chime_tall;
#N canvas 0 265 1436 601 rounder 0;
#N canvas 0 50 450 250 (subpatch) 0;
#X array rounder_energy 3 float 2;
#X coords 0 1 3 0 200 50 1 0 0;
#X restore 104 121 graph;
#X obj 395 165 + 1;
#X obj 428 136 t b a;
#X obj 690 437 array sum;
#X obj 690 402 metro 100;
#X obj 690 462 max 0.001;
#X obj 690 488 *;
#X obj 690 318 loadbang;
#N canvas 0 50 450 250 (subpatch) 0;
#X array rounder_energy_sequence 20 float 3;
#A 0 1.22 1.18 1.24 0.66 0.84 0.84 0.58 0.22 0.24 0.98 1.34 1.24 0.36
0.62 1.06 0.94 0.14 0.14 0.14 0.14;
#X coords 0 2 20 0 200 100 1 0 0;
#X restore 1015 48 graph;
#X obj 950 278 f;
#X obj 983 278 + 1;
#X obj 950 303 mod 20;
#X floatatom 950 328 5 0 0 0 - - - 0;
#X obj 935 248 bng 15 250 50 0 empty empty empty 17 7 0 10 #fcfcfc
#000000 #000000;
#X floatatom 950 385 5 0 0 0 - - - 0;
#X obj 935 223 metro 60000;
#X obj 935 203 tgl 15 0 empty empty empty 17 7 0 10 #fcfcfc #000000
#000000 0 1;
#X obj 935 178 loadbang;
#X obj 1015 148 hradio 10 1 0 20 empty empty empty 0 -8 0 10 #f8fc00
#0400fc #000000 0;
#X obj 950 442 line;
#X floatatom 950 471 5 0 0 0 - - - 0;
#X msg 950 413 \$1 10000;
#X floatatom 690 511 5 0 0 0 - - - 0;
#X obj 103 182 tgl 15 0 empty empty sleep 17 7 0 10 #ff0400 #ffffff
#000000 0 1;
#X obj 428 194 send;
#X text 436 54 hi \, welcome!;
#X text 798 55 everyone-energy;
#X obj 690 343 t b b b;
#X floatatom 272 181 5 0 0 0 member\ count - - 0;
#X floatatom 272 201 5 0 0 0 e_seq - - 0;
#X floatatom 196 201 5 0 0 0 energy\ all - - 0;
#X obj 67 64 tgl 15 0 empty WORLD_SLEEP r:WORLD_SLEEP 17 7 0 10 #fc0400
#fcfcfc #fc0400 0 1;
#X obj 77 239 v rounder_sleep;
#X text 116 322 rounder;
#X obj 428 107 r rounder_onconnect;
#X obj 428 165 v rounder_member_count;
#X msg 367 235 \; rounder_energy resize \$1;
#X obj 735 167 r rounder_status;
#X msg 735 195 \; rounder_energy \$2 \$1;
#X msg 1222 48 \; rounder_energy_sequence const 1;
#X obj 950 356 tabread rounder_energy_sequence;
#X msg 773 361 \; rounder_energy const 0;
#X msg 774 409 symbol rounder_energy;
#X obj 690 532 v rounder_energy_sum;
#X connect 1 0 36 0;
#X connect 1 0 28 0;
#X connect 1 0 35 0;
#X connect 2 0 35 0;
#X connect 2 1 24 1;
#X connect 3 0 5 0;
#X connect 4 0 3 0;
#X connect 5 0 6 0;
#X connect 6 0 22 0;
#X connect 7 0 27 0;
#X connect 9 0 10 0;
#X connect 9 0 11 0;
#X connect 10 0 9 1;
#X connect 11 0 12 0;
#X connect 12 0 18 0;
#X connect 12 0 40 0;
#X connect 13 0 9 0;
#X connect 14 0 21 0;
#X connect 15 0 13 0;
#X connect 16 0 15 0;
#X connect 17 0 16 0;
#X connect 19 0 20 0;
#X connect 20 0 6 1;
#X connect 20 0 29 0;
#X connect 21 0 19 0;
#X connect 22 0 30 0;
#X connect 22 0 43 0;
#X connect 23 0 32 0;
#X connect 27 0 4 0;
#X connect 27 1 42 0;
#X connect 27 2 41 0;
#X connect 31 0 23 0;
#X connect 34 0 2 0;
#X connect 35 0 1 0;
#X connect 35 0 24 0;
#X connect 37 0 38 0;
#X connect 40 0 14 0;
#X connect 42 0 3 2;
#X coords 0 -1 1 1 207 120 2 100 100;
#X restore 544 392 pd rounder world;
#X obj 296 438 radio_mote;
#A saved 0.0666656 -0.0095253 -0.028573 -0.0476208 -1.43175e-06 -0.0444462
0.133333 0.0571418 0.104761 0.104761 0.180952 0.171428 0.133333 0.15238
0.171428 -0.0190492 -0.0571446 -0.0714304 -0.0857162 0.0761895 0.161904
0.161904 0.161904 0.123809 0.15238 0.161904 0.136507 0.123809 -0.0666685
-0.0952401 -0.0380969 -0.0507954 0.0666656 0.15238 0.104761 -0.0571446
-0.0666685 -0.0761924 0.0285702 -0.0476208 40 0.180952 0.180952 0.180952
0.180952 0.180952 0.180952 0.180952 0.180952 0.180952 0.180952 0.180952
0.171428 0.171428 0.169047 0.166666 0.164285 0.161904 0.15873 0.155555
0.15238 0.149206 0.146031 0.142857 0.142857 0.142857 0.142857 0.133333
0.133333 0.123809 0.123809 0.120634 0.11746 0.114285 0.11111 0.107936
0.104761 0.104761 0.104761 0.104761 0.104761 0.104761 0.104761 0.114286
0.114286 0.114286 0.114286 0.114286 0.12381 0.133333 0.142857 50 0.285714
0.27619 0.0190476 -0.247621 -0.247621 -1.78814e-07 0.200001 0.209525
0.0285714 -0.438095 -0.428571 0.0190476 0.304762 0.304762 0.0285714
-0.352383 -0.371433 -0.352385 0.257144 0.0285714 0.0285714 -0.304764
-0.371431 0.304762 0.295238 -0.428571 0.314286 0.0190476 -0.447619
0 30 0.152381 0.180952 0.247619 0.304763 0.199999 0.266666 0.380953
0.400001 0.15238 0.190476 0.247619 0.361905 0.228571 -0.0857149 -0.12381
-0.161906 -0.209525 -0.257145 -0.095239 -0.133335 -0.17143 -0.209525
-0.276193 -0.0952392 -0.0952392 -0.142859 -0.228573 -0.257145 -0.266669
0.171429 30 4004 0 900 500 r2 rounder 0.7 0.49 0.15 -0.05;
#X obj 64 439 radio_mote;
#A saved 0.0666656 -0.0095253 -0.028573 -0.0476208 -1.43175e-06 -0.0444462
0.133333 0.0571418 0.104761 0.104761 0.180952 0.171428 0.133333 0.15238
0.171428 -0.0190492 -0.0571446 -0.0714304 -0.0857162 0.0761895 0.161904
0.161904 0.161904 0.123809 0.15238 0.161904 0.136507 0.123809 -0.0666685
-0.0952401 -0.0380969 -0.0507954 0.0666656 0.15238 0.104761 -0.0571446
-0.0666685 -0.0761924 0.0285702 -0.0476208 40 0.180952 0.180952 0.180952
0.180952 0.180952 0.180952 0.180952 0.180952 0.180952 0.180952 0.180952
0.171428 0.171428 0.169047 0.166666 0.164285 0.161904 0.15873 0.155555
0.15238 0.149206 0.146031 0.142857 0.142857 0.142857 0.142857 0.133333
0.133333 0.123809 0.123809 0.120634 0.11746 0.114285 0.11111 0.107936
0.104761 0.104761 0.104761 0.104761 0.104761 0.104761 0.104761 0.114286
0.114286 0.114286 0.114286 0.114286 0.12381 0.133333 0.142857 50 0.285714
0.27619 0.0190476 -0.247621 -0.247621 -1.78814e-07 0.200001 0.209525
0.0285714 -0.438095 -0.428571 0.0190476 0.304762 0.304762 0.0285714
-0.352383 -0.371433 -0.352385 0.257144 0.0285714 0.0285714 -0.304764
-0.371431 0.304762 0.295238 -0.428571 0.314286 0.0190476 -0.447619
0 30 0.152381 0.180952 0.247619 0.304763 0.199999 0.266666 0.380953
0.400001 0.15238 0.190476 0.247619 0.361905 0.228571 -0.0857149 -0.12381
-0.161906 -0.209525 -0.257145 -0.095239 -0.133335 -0.17143 -0.209525
-0.276193 -0.0952392 -0.0952392 -0.142859 -0.228573 -0.257145 -0.266669
0.171429 30 4002 0 900 500 r1 rounder 0.6 0.49 0.2 -0.05;
#X obj 44 580 radio_mote_random;
#A saved 0.628571 0.419048 0.400001 0.828571 0.571429 0.314286 0.380953
0.409524 0.409524 0.32381 0.590476 0.180952 0.228571 0.657143 0.333333
0.342857 0.32381 0.6 0.266666 0.704762 0.742857 0.266666 0.266666 0.580952
0.342857 0.361905 0.590476 0.228571 0.485714 0.514286 30 0.380953 0.466668
0.561907 0.438096 0.295238 0.352381 0.457144 0.380953 0.361905 0.590478
0.609526 0.752381 0.771428 0.790476 0.552381 0.380951 0.42857 0.695238
0.714286 0.380952 0.380952 0.638097 0.790476 0.761904 0.761904 0.704762
0.495239 0.600002 0.580954 0.647621 30 0.485712 0.266663 0.180948 0.0666616
-0.0285771 0.771428 0.561903 0.342854 0.199996 0.133328 0.0285659 -0.0761966
0.685713 0.495235 0.399997 0.295234 0.190472 0.095233 0.00951815 -5.72205e-06
0.371425 0.104757 -0.00952935 -0.13334 -0.0952442 1.19048 0.885714
0.695236 0.58095 0.428568 30 0.780952 0.0761905 0.0761905 0.933333
0.0666667 0.780952 0.809524 0.828571 0.0666665 0.0761904 0.8 0.0952381
0.542857 0.104762 0.733333 0.704761 0.12381 0.742857 0.146031 0.149206
0.885714 0.152381 0.152381 0.704762 0.152381 0.6 0.723809 0.457143
0.647619 0.161904 30 4802 1 900 1000 1300 d4 rounder 0.570002 0.3 0.25
-0.05;
#X restore 371 319 pd crickets;
#X obj 491 25 loadbang;
#X obj 221 399 tgl 25 0 WORLD_SLEEP empty WORLD_SLEEP 27 7 0 14 #fc0400
#fcfcfc #fc0400 0 1;
#X floatatom 221 380 5 0 0 1 WORLD_ENERGY WORLD_ENERGY - 0;
#X obj 535 410 bng 25 250 50 0 ACT0 empty ACT0 27 7 0 15 #00fc04 #0400fc
#000000;
#X obj 221 333 tgl 25 0 ONOFF empty s:ONOFF 27 7 0 15 #00f8fc #9c00fc
#000000 0 1;
#X msg 221 310 1;
#X obj 231 194 tgl 15 0 empty empty connected? 17 7 0 10 #fcfcfc #000000
#000000 0 1;
#X obj 731 283 radio_toner;
#X msg 210 58 devicename /dev/tty.usbmodem4871051 \, baud 57600 \,
pollintervall 1 \, verbose 1;
#X msg 285 436 1;
#X obj 317 436 bng 20 250 50 0 WORLD_evt_half empty s:WORLD_evt_half
22 7 0 10 #f8fc00 #000000 #000000;
#X msg 249 98 devicename /dev/ttyUSB0 \, baud 57600 \, pollintervall
1 \, verbose 1;
#X obj 731 120 timer;
#X obj 758 100 bng 15 250 50 0 empty empty empty 17 7 0 10 #fcfcfc
#000000 #000000;
#X obj 684 70 bng 15 250 50 0 empty empty restart 17 7 0 10 #ff0400
#000000 #000000;
#X floatatom 731 143 5 0 0 0 - - - 0;
#X obj 758 77 metro 1000;
#X obj 758 57 tgl 15 0 empty empty empty 17 7 0 10 #fcfcfc #000000
#000000 0 1;
#X obj 731 165 / 1000;
#X obj 731 188 int;
#X floatatom 731 211 5 0 0 0 - - - 0;
#X obj 731 233 / 60;
#X floatatom 731 256 5 0 0 0 - - - 0;
#X obj 721 30 loadbang;
#X obj 673 346 s NOTE;
#X msg 649 402 10005 1 1 1;
#X msg 580 202 timetagoffset -1;
#X msg 565 169 timetagoffset 0;
#X obj 765 345 tgl 15 0 empty empty empty 17 7 0 10 #fcfcfc #000000
#000000 0 1;
#X obj 765 365 metro 1000;
#X msg 611 235 timetagoffset 1000;
#X connect 0 0 18 0;
#X connect 1 0 0 1;
#X connect 4 0 16 0;
#X connect 5 0 10 0;
#X connect 5 1 43 0;
#X connect 6 0 5 1;
#X connect 7 0 5 1;
#X connect 8 0 5 0;
#X connect 9 0 8 0;
#X connect 9 0 14 0;
#X connect 10 0 11 0;
#X connect 11 0 12 0;
#X connect 11 0 29 0;
#X connect 14 0 13 0;
#X connect 15 0 14 1;
#X connect 17 0 0 0;
#X connect 17 0 4 0;
#X connect 23 0 24 0;
#X connect 25 0 28 0;
#X connect 26 0 27 0;
#X connect 27 0 25 0;
#X connect 28 0 34 0;
#X connect 28 1 23 0;
#X connect 29 0 31 0;
#X connect 30 0 29 1;
#X connect 34 0 23 0;
#X connect 37 0 48 0;
#X connect 42 0 41 0;
#X connect 45 0 5 1;
#X connect 46 0 38 0;
#X connect 48 0 5 1;
#X connect 49 0 52 0;
#X connect 50 0 49 1;
#X connect 51 0 49 0;
#X connect 52 0 55 0;
#X connect 53 0 50 0;
#X connect 54 0 53 0;
#X connect 55 0 56 0;
#X connect 56 0 57 0;
#X connect 57 0 58 0;
#X connect 58 0 59 0;
#X connect 59 0 44 0;
#X connect 60 0 54 0;
#X connect 62 0 61 0;
#X connect 63 0 16 0;
#X connect 64 0 16 0;
#X connect 65 0 66 0;
#X connect 66 0 62 0;
#X connect 67 0 16 0;