upd..(wip)

2021-04-07 00:12:49 +09:00 · 2021-04-07 00:12:49 +09:00 · 1201a8fbc5
commit 1201a8fbc5
parent 9d5b7cc4c2
18 changed files with 1382 additions and 1289 deletions
--- a/puredata/piano_access_radio_roomB.pd
+++ b/puredata/piano_access_radio_roomB.pd
--- a/puredata/radio_alumi_A.pd
+++ b/puredata/radio_alumi_A.pd
@ -1,4 +1,4 @@
-#N canvas 536 181 399 491 10;
+#N canvas 85 25 399 491 10;
 #X msg 37 337 0;
 #X obj 249 306 loadbang;
 #X obj 231 406 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
@ -10,7 +10,7 @@
 #X obj 251 429 v \$0-STATE;
 #X msg 164 44 1;
 #X obj 164 67 v \$0-STATE;
-#N canvas 747 89 533 644 world 0;
+#N canvas 187 25 533 644 world 0;
 #X floatatom 16 94 5 0 0 0 - - -;
 #X obj 16 293 t a b;
 #X obj 16 372 spigot;
@ -24,7 +24,7 @@
 #X obj 16 544 sel 1;
 #X obj 65 562 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
 1;
-#X floatatom 110 504 5 0 0 0 stress - -;
+#X floatatom 110 504 15 0 0 0 stress - -;
 #X obj 238 555 +;
 #X obj 238 502 t a b;
 #X obj 238 326 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
@ -36,7 +36,6 @@
 #X obj 285 416 sel 1 0;
 #X obj 64 164 bng 15 250 50 0 empty empty listen 17 7 0 10 -191407
 -257985 -1;
-#X obj 16 114 resample 1000;
 #X obj 238 578 max 0;
 #X text 109 114 listening speed;
 #X text 56 93 speed of happenings;
@ -47,12 +46,12 @@
 #X obj 16 451 abs;
 #N canvas 0 50 450 250 (subpatch) 0;
 #X array \$0-stress 100 float 2;
-#X coords 0 3 100 0 200 50 1 0 0;
+#X coords 0 10 100 0 200 50 1 0 0;
 #X restore 295 45 graph;
 #X obj 238 303 loadbang;
 #X text 78 227 condition of state change;
 #X obj 238 346 metro 100;
-#N canvas 1 89 319 212 (subpatch) 0;
+#N canvas 84 89 319 212 (subpatch) 0;
 #X obj 12 54 metro 100;
 #X obj 12 34 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 1
 ;
@ -90,55 +89,56 @@
 #X obj 16 39 r WORLD_ENERGY;
 #X text 378 440 working stress;
 #X text 378 460 resting relax;
-#X msg 304 462 -0.005;
-#X obj 16 210 < 0.5;
 #X obj 16 66 +;
 #X obj 51 66 tgl 15 0 empty ONOFF r:ONOFF 17 7 0 10 -262144 -1 -1 0
 1;
-#X msg 285 439 0.1;
-#X connect 0 0 21 0;
+#X obj 16 114 resample 100;
+#X msg 304 462 -0.05;
+#X obj 16 210 < 0.54;
+#X msg 285 439 0.37;
+#X connect 0 0 48 0;
 #X connect 1 0 5 0;
-#X connect 1 1 37 0;
+#X connect 1 1 36 0;
 #X connect 2 0 7 0;
 #X connect 3 0 2 1;
 #X connect 4 0 3 0;
 #X connect 5 0 2 0;
-#X connect 7 0 28 0;
+#X connect 7 0 27 0;
 #X connect 8 0 16 0;
-#X connect 9 0 38 0;
+#X connect 9 0 37 0;
 #X connect 11 0 16 1;
-#X connect 12 0 22 0;
+#X connect 12 0 21 0;
 #X connect 13 0 12 0;
-#X connect 13 1 35 0;
-#X connect 14 0 32 0;
+#X connect 13 1 34 0;
+#X connect 14 0 31 0;
 #X connect 15 0 13 0;
 #X connect 16 0 9 0;
 #X connect 16 0 10 0;
 #X connect 17 0 20 0;
-#X connect 17 0 48 0;
+#X connect 17 0 50 0;
 #X connect 18 0 15 0;
-#X connect 18 1 34 0;
+#X connect 18 1 33 0;
 #X connect 19 0 51 0;
-#X connect 19 1 47 0;
-#X connect 21 0 17 0;
-#X connect 22 0 11 0;
-#X connect 22 0 36 0;
-#X connect 28 0 8 0;
-#X connect 30 0 14 0;
-#X connect 32 0 18 0;
-#X connect 34 0 19 0;
-#X connect 35 0 12 1;
-#X connect 37 0 4 0;
-#X connect 37 0 27 0;
-#X connect 39 0 40 0;
-#X connect 40 0 42 0;
-#X connect 41 0 39 0;
-#X connect 42 0 43 0;
-#X connect 44 0 49 0;
-#X connect 47 0 15 0;
-#X connect 48 0 1 0;
-#X connect 49 0 0 0;
-#X connect 50 0 49 1;
+#X connect 19 1 49 0;
+#X connect 21 0 11 0;
+#X connect 21 0 35 0;
+#X connect 27 0 8 0;
+#X connect 29 0 14 0;
+#X connect 31 0 18 0;
+#X connect 33 0 19 0;
+#X connect 34 0 12 1;
+#X connect 36 0 4 0;
+#X connect 36 0 26 0;
+#X connect 38 0 39 0;
+#X connect 39 0 41 0;
+#X connect 40 0 38 0;
+#X connect 41 0 42 0;
+#X connect 43 0 46 0;
+#X connect 46 0 0 0;
+#X connect 47 0 46 1;
+#X connect 48 0 17 0;
+#X connect 49 0 15 0;
+#X connect 50 0 1 0;
 #X connect 51 0 15 0;
 #X restore 167 226 pd world and me;
 #N canvas 473 25 708 510 expressions 0;
@ -223,13 +223,13 @@
 #X restore 48 226 pd expressions;
 #N canvas 0 23 450 278 (subpatch) 0;
 #X array alumiA 50 float 3;
-#A 0 0.542857 0.590476 0.704761 0.75238 0.761903 0.742857 0.638095
-0.504763 0.371431 0.209527 0.161908 0.133337 0.133337 0.19048 0.342857
-0.514287 0.647619 0.714286 0.742857 0.752381 0.714286 0.647619 0.49524
-0.380955 0.257143 0.190476 0.171429 0.180953 0.285714 0.476189 0.619048
-0.666667 0.723809 0.752381 0.733333 0.67619 0.609524 0.44762 0.285715
-0.2 0.152381 0.190476 0.42857 0.552379 0.685711 0.723806 0.704759 0.65714
-0.561903 0.476189;
+#A 0 0.219048 0.247619 0.27619 0.314285 0.35238 0.42857 0.847619 0.00952387
+0.00952387 0.00952375 0.209523 0.295238 0.361903 0.390474 0.504762
+0.876188 0.0190476 0.0190476 0.0190476 0.152383 0.276192 0.333334 0.466667
+0.828571 0.0285713 0.0285713 0.0285713 0.266667 0.314285 0.419048 0.476188
+0.704762 0.0285714 0.0285714 0.0190476 0.266666 0.342856 0.485714 0.514285
+0.714286 0.0190475 0.266666 0.323809 0.457141 0.714286 0.152381 0.2
+0.238096 0.333334 0.390478;
 #X coords 0 1 50 0 50 50 1 0 0;
 #X restore 29 46 graph;
 #X obj 88 429 s NOTE;
@ -243,7 +243,7 @@
 #X obj 48 188 r ALUMI_A;
 #X obj 167 269 s ALUMI_A;
 #X obj 23 138 hradio 15 1 0 4 empty \$0-word empty 0 -8 0 10 -262144
-203904 -1 0;
+-203904 -1 1;
 #X obj 88 7 bng 15 250 50 0 empty empty empty 17 7 0 10 -228856 -1
 -1;
 #X obj 88 24 tgl 15 0 empty \$0-status-now empty 17 7 0 10 -228856
--- a/puredata/radio_alumi_B.pd
+++ b/puredata/radio_alumi_B.pd
@ -1,4 +1,4 @@
-#N canvas 567 135 419 510 10;
+#N canvas 692 72 419 510 10;
 #X msg 37 337 0;
 #X obj 249 306 loadbang;
 #X obj 231 406 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
@ -22,9 +22,9 @@
 #X obj 16 428 gauss 1 0;
 #X floatatom 16 474 5 0 0 0 - - -;
 #X obj 16 544 sel 1;
-#X obj 65 562 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+#X obj 65 562 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
 1;
-#X floatatom 110 504 5 0 0 0 stress - -;
+#X floatatom 110 504 15 0 0 0 stress - -;
 #X obj 238 555 +;
 #X obj 238 502 t a b;
 #X obj 238 326 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
@ -36,7 +36,6 @@
 #X obj 285 416 sel 1 0;
 #X obj 64 164 bng 15 250 50 0 empty empty listen 17 7 0 10 -191407
 -257985 -1;
-#X obj 16 114 resample 1000;
 #X obj 238 578 max 0;
 #X text 109 114 listening speed;
 #X text 56 93 speed of happenings;
@ -47,7 +46,7 @@
 #X obj 16 451 abs;
 #N canvas 0 50 450 250 (subpatch) 0;
 #X array \$0-stress 100 float 2;
-#X coords 0 3 100 0 200 50 1 0 0;
+#X coords 0 10 100 0 200 50 1 0 0;
 #X restore 295 45 graph;
 #X obj 238 303 loadbang;
 #X text 78 227 condition of state change;
@ -90,56 +89,57 @@
 #X obj 16 39 r WORLD_ENERGY;
 #X text 378 440 working stress;
 #X text 378 460 resting relax;
-#X msg 304 462 -0.005;
-#X obj 16 210 < 0.49;
-#X msg 285 439 0.1;
 #X obj 16 66 +;
-#X obj 49 66 tgl 15 0 empty ONOFF r:ONOFF 17 7 0 10 -262144 -1 -1 1
+#X obj 49 66 tgl 15 0 empty ONOFF r:ONOFF 17 7 0 10 -262144 -1 -1 0
 1;
-#X connect 0 0 21 0;
+#X obj 16 114 resample 100;
+#X msg 304 462 -0.05;
+#X obj 16 210 < 0.52;
+#X msg 285 439 0.4;
+#X connect 0 0 48 0;
 #X connect 1 0 5 0;
-#X connect 1 1 37 0;
+#X connect 1 1 36 0;
 #X connect 2 0 7 0;
 #X connect 3 0 2 1;
 #X connect 4 0 3 0;
 #X connect 5 0 2 0;
-#X connect 7 0 28 0;
+#X connect 7 0 27 0;
 #X connect 8 0 16 0;
-#X connect 9 0 38 0;
+#X connect 9 0 37 0;
 #X connect 11 0 16 1;
-#X connect 12 0 22 0;
+#X connect 12 0 21 0;
 #X connect 13 0 12 0;
-#X connect 13 1 35 0;
-#X connect 14 0 32 0;
+#X connect 13 1 34 0;
+#X connect 14 0 31 0;
 #X connect 15 0 13 0;
 #X connect 16 0 9 0;
 #X connect 16 0 10 0;
 #X connect 17 0 20 0;
-#X connect 17 0 48 0;
+#X connect 17 0 50 0;
 #X connect 18 0 15 0;
-#X connect 18 1 34 0;
-#X connect 19 0 49 0;
-#X connect 19 1 47 0;
-#X connect 21 0 17 0;
-#X connect 22 0 11 0;
-#X connect 22 0 36 0;
-#X connect 28 0 8 0;
-#X connect 30 0 14 0;
-#X connect 32 0 18 0;
-#X connect 34 0 19 0;
-#X connect 35 0 12 1;
-#X connect 37 0 4 0;
-#X connect 37 0 27 0;
-#X connect 39 0 40 0;
-#X connect 40 0 42 0;
-#X connect 41 0 39 0;
-#X connect 42 0 43 0;
-#X connect 44 0 50 0;
-#X connect 47 0 15 0;
-#X connect 48 0 1 0;
+#X connect 18 1 33 0;
+#X connect 19 0 51 0;
+#X connect 19 1 49 0;
+#X connect 21 0 11 0;
+#X connect 21 0 35 0;
+#X connect 27 0 8 0;
+#X connect 29 0 14 0;
+#X connect 31 0 18 0;
+#X connect 33 0 19 0;
+#X connect 34 0 12 1;
+#X connect 36 0 4 0;
+#X connect 36 0 26 0;
+#X connect 38 0 39 0;
+#X connect 39 0 41 0;
+#X connect 40 0 38 0;
+#X connect 41 0 42 0;
+#X connect 43 0 46 0;
+#X connect 46 0 0 0;
+#X connect 47 0 46 1;
+#X connect 48 0 17 0;
 #X connect 49 0 15 0;
-#X connect 50 0 0 0;
-#X connect 51 0 50 1;
+#X connect 50 0 1 0;
+#X connect 51 0 15 0;
 #X restore 167 226 pd world and me;
 #N canvas 421 137 698 462 expressions 0;
 #X obj 42 185 inlet;
@ -222,13 +222,13 @@
 #X restore 48 226 pd expressions;
 #N canvas 0 23 450 278 (subpatch) 0;
 #X array alumiB 50 float 3;
-#A 0 0.590476 0.590476 0.590476 0.590476 0.590476 0.590476 0.590476
-0.590476 0.590476 0.590476 0.590476 0.590476 0.590476 0.590476 0.590476
-0.590476 0.590476 0.590476 0.590476 0.590476 0.590476 0.590476 0.590476
-0.590476 0.590476 0.590476 0.590476 0.590476 0.590476 0.590476 0.590476
-0.590476 0.590476 0.590476 0.590476 0.590476 0.590476 0.590476 0.590476
-0.590476 0.590476 0.590476 0.590476 0.590476 0.590476 0.590476 0.590476
-0.590476 0.580953 0.533334;
+#A 0 0.542857 0.619047 0.657142 0.666666 0.619047 0.552381 0.514286
+0.428571 0.323811 0.228572 -0.00952399 -0.00952399 -0.00952399 -0.00952399
+-0.00952399 0.514286 0.6 0.619047 0.14 0.552381 0.447618 0.380951 0.314285
+0.247619 0.0190476 0.0190476 0.0190476 0.0190476 0.0190476 0.571428
+0.628571 0.571428 0.504762 0.428572 0.352382 0.285714 0.00952381 0.0285713
+0.0190476 0.638095 0.657142 0.619047 0.514286 0.476191 0.419049 0.333335
+0.00952387 0.00952387 0.00952387 0.00952387;
 #X coords 0 1 50 0 50 50 1 0 0;
 #X restore 29 46 graph;
 #X obj 88 429 s NOTE;
@ -239,7 +239,7 @@
 #X obj 269 352 bng 15 250 50 0 empty \$0-reload r:reload 17 7 0 10
 -262144 -1 -1;
 #X obj 23 138 hradio 15 1 0 4 empty \$0-word empty 0 -8 0 10 -262144
-203904 -1 2;
+-203904 -1 3;
 #X obj 88 7 bng 15 250 50 0 empty empty empty 17 7 0 10 -228856 -1
 -1;
 #X obj 88 24 tgl 15 0 empty \$0-status-now empty 17 7 0 10 -228856
--- a/puredata/radio_bongbong.pd
+++ b/puredata/radio_bongbong.pd
@ -1,7 +1,7 @@
-#N canvas 518 57 410 511 10;
+#N canvas 194 25 496 559 10;
 #X msg 37 337 0;
 #X obj 249 306 loadbang;
-#X obj 231 406 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
+#X obj 326 469 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
 -1 -1;
 #X msg 249 329 bongbong;
 #X obj 164 21 r BONGBONG;
@ -18,14 +18,11 @@
 #X text 35 318 stop!;
 #X obj 88 306 riff1 800 4100 400;
 #X obj 88 25 tgl 15 0 empty \$0-status-now empty 17 7 0 10 -261682
-1 -1 1 1;
+-1 -1 0 1;
 #X obj 167 249 bng 15 250 50 0 empty empty motivated! 17 7 0 10 -262144
 -1 -1;
 #X obj 167 279 s BONGBONG;
 #X obj 48 188 r BONGBONG;
-#X msg 251 406 0;
-#X obj 251 429 v \$0-STATE;
-#X msg 164 44 1;
 #X obj 164 67 v \$0-STATE;
 #N canvas 557 89 533 644 world 0;
 #X floatatom 16 94 5 0 0 0 - - -;
@ -39,7 +36,7 @@
 #X obj 16 428 gauss 1 0;
 #X floatatom 16 474 5 0 0 0 - - -;
 #X obj 16 544 sel 1;
-#X obj 65 562 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+#X obj 65 562 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
 1;
 #X floatatom 110 504 5 0 0 0 stress - -;
 #X obj 238 555 +;
@ -50,10 +47,8 @@
 #X obj 16 521 >;
 #X floatatom 16 137 5 0 0 0 - - -;
 #X obj 238 375 t b b;
-#X obj 285 416 sel 1 0;
 #X obj 64 164 bng 15 250 50 0 empty empty listen 17 7 0 10 -191407
 -257985 -1;
-#X obj 16 114 resample 1000;
 #X obj 238 578 max 0;
 #X text 109 114 listening speed;
 #X text 56 93 speed of happenings;
@ -64,12 +59,12 @@
 #X obj 16 451 abs;
 #N canvas 0 50 450 250 (subpatch) 0;
 #X array \$0-stress 100 float 2;
-#X coords 0 3 100 0 200 50 1 0 0;
+#X coords 0 10 100 0 200 50 1 0 0;
 #X restore 295 45 graph;
 #X obj 238 303 loadbang;
 #X text 78 227 condition of state change;
 #X obj 238 346 metro 100;
-#N canvas 1 89 319 212 (subpatch) 0;
+#N canvas 84 89 319 212 (subpatch) 0;
 #X obj 12 54 metro 100;
 #X obj 12 34 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 1
 ;
@ -107,58 +102,66 @@
 #X obj 16 39 r WORLD_ENERGY;
 #X text 378 440 working stress;
 #X text 378 460 resting relax;
-#X msg 285 439 0.005;
-#X msg 304 462 -0.005;
-#X obj 16 210 < 0.7;
 #X obj 16 66 +;
 #X obj 49 66 tgl 15 0 empty ONOFF r:ONOFF 17 7 0 10 -262144 -1 -1 0
 1;
-#X connect 0 0 21 0;
+#X obj 249 439 * 1;
+#X floatatom 246 413 5 0 0 0 - - -;
+#X msg 285 458 -0.05;
+#X obj 285 416 sel 0;
+#X msg 312 437 0.1;
+#X obj 16 114 resample 100;
+#X obj 16 210 < 0.77;
+#X obj 129 454 print abc;
+#X connect 0 0 52 0;
 #X connect 1 0 5 0;
-#X connect 1 1 37 0;
+#X connect 1 1 35 0;
 #X connect 2 0 7 0;
 #X connect 3 0 2 1;
 #X connect 4 0 3 0;
 #X connect 5 0 2 0;
-#X connect 7 0 28 0;
+#X connect 7 0 26 0;
 #X connect 8 0 16 0;
-#X connect 9 0 38 0;
+#X connect 9 0 36 0;
 #X connect 11 0 16 1;
-#X connect 12 0 22 0;
+#X connect 12 0 20 0;
 #X connect 13 0 12 0;
-#X connect 13 1 35 0;
-#X connect 14 0 32 0;
+#X connect 13 1 33 0;
+#X connect 14 0 30 0;
 #X connect 15 0 13 0;
 #X connect 16 0 9 0;
 #X connect 16 0 10 0;
-#X connect 17 0 20 0;
-#X connect 17 0 49 0;
+#X connect 17 0 19 0;
+#X connect 17 0 53 0;
 #X connect 18 0 15 0;
-#X connect 18 1 34 0;
-#X connect 19 0 47 0;
-#X connect 19 1 48 0;
-#X connect 21 0 17 0;
-#X connect 22 0 11 0;
-#X connect 22 0 36 0;
-#X connect 28 0 8 0;
-#X connect 30 0 14 0;
-#X connect 32 0 18 0;
-#X connect 34 0 19 0;
-#X connect 35 0 12 1;
-#X connect 37 0 4 0;
-#X connect 37 0 27 0;
-#X connect 39 0 40 0;
-#X connect 40 0 42 0;
-#X connect 41 0 39 0;
-#X connect 42 0 43 0;
-#X connect 44 0 50 0;
+#X connect 18 1 32 0;
+#X connect 20 0 11 0;
+#X connect 20 0 34 0;
+#X connect 20 0 54 0;
+#X connect 26 0 8 0;
+#X connect 28 0 14 0;
+#X connect 30 0 18 0;
+#X connect 32 0 50 0;
+#X connect 33 0 12 1;
+#X connect 35 0 4 0;
+#X connect 35 0 25 0;
+#X connect 37 0 38 0;
+#X connect 38 0 40 0;
+#X connect 39 0 37 0;
+#X connect 40 0 41 0;
+#X connect 42 0 45 0;
+#X connect 45 0 0 0;
+#X connect 46 0 45 1;
 #X connect 47 0 15 0;
-#X connect 48 0 15 0;
-#X connect 49 0 1 0;
-#X connect 50 0 0 0;
-#X connect 51 0 50 1;
+#X connect 48 0 47 1;
+#X connect 49 0 15 0;
+#X connect 50 0 49 0;
+#X connect 50 1 51 0;
+#X connect 51 0 47 0;
+#X connect 52 0 17 0;
+#X connect 53 0 1 0;
 #X restore 167 226 pd world and me;
-#N canvas 124 52 582 656 expressions 0;
+#N canvas 605 25 582 656 expressions 0;
 #N canvas 0 50 450 250 (subpatch) 0;
 #X array bongbong1 50 float 3;
 #A 0 1.01905 1.03809 1.05714 0.990476 0.952381 0.933334 0.904762 0.819048
@ -264,42 +267,71 @@
 #X connect 31 0 28 0;
 #X connect 32 0 29 0;
 #X restore 48 226 pd expressions;
-#X obj 231 452 s BONGBONG_DONE;
+#X obj 326 519 s BONGBONG_DONE;
 #X obj 88 429 s NOTE;
 #X obj 88 406 spigot;
 #X obj 7 420 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 1
 ;
 #X obj 7 397 loadbang;
-#X obj 259 57 loadbang;
-#X obj 259 100 metro 2000;
-#X obj 259 80 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
-#X obj 334 128 r E_SEQ;
-#X obj 259 123 v \$0-STRESS;
-#X obj 259 146 *;
-#X obj 259 169 v \$0-STRESS;
+#X obj 313 98 loadbang;
+#X obj 313 141 metro 2000;
+#X obj 313 121 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
+-1 -1;
+#X obj 388 169 r E_SEQ;
+#X obj 313 164 v \$0-STRESS;
+#X obj 313 187 *;
+#X obj 313 210 v \$0-STRESS;
+#X obj 231 426 v \$0-STATE;
+#X obj 326 427 == 0;
+#X obj 326 448 sel 1;
+#X obj 231 406 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
+-1 -1;
+#X obj 231 447 - 1;
+#X obj 231 489 v \$0-STATE;
+#X obj 231 468 t b a;
+#X msg 370 290 0;
+#X obj 370 313 v \$0-STATE;
+#X obj 138 191 bng 15 250 50 0 empty \$0-more-word r:0-more-word 17
+7 0 10 -262144 -1 -1;
+#X floatatom 175 526 5 0 0 0 - - -;
+#X obj 364 492 bng 15 250 50 0 \$0-more-word empty s:0-more-word 17
+7 0 10 -262144 -1 -1;
+#X text 213 44 <--- how many words per sentence?;
+#X msg 164 44 6;
+#X obj 364 471 del 1000;
 #X connect 0 0 9 0;
 #X connect 1 0 3 0;
-#X connect 2 0 14 0;
-#X connect 2 0 20 0;
+#X connect 2 0 17 0;
 #X connect 3 0 9 1;
 #X connect 4 0 6 0;
-#X connect 4 0 16 0;
-#X connect 9 0 22 0;
-#X connect 9 3 2 0;
+#X connect 4 0 42 0;
+#X connect 9 0 19 0;
+#X connect 9 3 32 0;
 #X connect 11 0 12 0;
-#X connect 13 0 19 0;
-#X connect 14 0 15 0;
-#X connect 16 0 17 0;
-#X connect 18 0 11 0;
-#X connect 19 0 9 0;
-#X connect 22 0 21 0;
-#X connect 23 0 22 1;
+#X connect 13 0 16 0;
+#X connect 15 0 11 0;
+#X connect 16 0 9 0;
+#X connect 19 0 18 0;
+#X connect 20 0 19 1;
+#X connect 21 0 20 0;
+#X connect 22 0 24 0;
+#X connect 23 0 26 0;
 #X connect 24 0 23 0;
-#X connect 25 0 27 0;
-#X connect 26 0 29 0;
-#X connect 27 0 26 0;
-#X connect 28 0 30 1;
-#X connect 29 0 30 0;
+#X connect 25 0 27 1;
+#X connect 26 0 27 0;
+#X connect 27 0 28 0;
+#X connect 29 0 33 0;
 #X connect 30 0 31 0;
+#X connect 31 0 2 0;
+#X connect 31 1 43 0;
+#X connect 32 0 29 0;
+#X connect 33 0 35 0;
+#X connect 34 0 30 0;
+#X connect 34 0 39 0;
+#X connect 35 0 34 0;
+#X connect 35 1 34 0;
+#X connect 36 0 37 0;
+#X connect 38 0 16 0;
+#X connect 42 0 14 0;
+#X connect 43 0 40 0;
 #X coords 0 -1 1 1 100 100 2 5 5;
--- a/puredata/radio_copper.pd
+++ b/puredata/radio_copper.pd
@ -1,4 +1,4 @@
-#N canvas 84 89 461 502 10;
+#N canvas 485 25 461 502 10;
 #X msg 37 337 0;
 #X obj 349 303 loadbang;
 #X obj 302 406 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
@ -10,19 +10,19 @@
 #X obj 322 429 v \$0-STATE;
 #X msg 164 44 1;
 #X obj 164 67 v \$0-STATE;
-#N canvas 747 89 533 644 world 0;
+#N canvas 651 67 533 644 world 0;
 #X floatatom 16 94 5 0 0 0 - - -;
 #X obj 16 293 t a b;
 #X obj 16 372 spigot;
 #X obj 67 357 tgl 15 0 empty empty free_:) 17 7 0 10 -262144 -1 -1
-1 1;
+0 1;
 #X obj 67 334 == 0;
 #X obj 16 316 sel 1;
 #X text 41 402 think;
 #X obj 16 428 gauss 1 0;
 #X floatatom 16 474 5 0 0 0 - - -;
 #X obj 16 544 sel 1;
-#X obj 65 562 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
+#X obj 65 562 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
 1;
 #X floatatom 110 504 5 0 0 0 stress - -;
 #X obj 238 555 +;
@ -36,18 +36,17 @@
 #X obj 285 416 sel 1 0;
 #X obj 64 164 bng 15 250 50 0 empty empty listen 17 7 0 10 -191407
 -257985 -1;
-#X obj 16 114 resample 1000;
 #X obj 238 578 max 0;
 #X text 109 114 listening speed;
 #X text 56 93 speed of happenings;
 #X text 69 210 world is quiet?;
 #X text 90 285 status of me;
-#X obj 147 329 tgl 15 0 empty empty busy. 17 7 0 10 -262144 -1 -1 0
+#X obj 147 329 tgl 15 0 empty empty busy. 17 7 0 10 -262144 -1 -1 1
 1;
 #X obj 16 451 abs;
 #N canvas 0 50 450 250 (subpatch) 0;
 #X array \$0-stress 100 float 2;
-#X coords 0 3 100 0 200 50 1 0 0;
+#X coords 0 10 100 0 200 50 1 0 0;
 #X restore 295 45 graph;
 #X obj 238 303 loadbang;
 #X text 78 227 condition of state change;
@ -90,55 +89,56 @@
 #X obj 16 39 r WORLD_ENERGY;
 #X text 378 440 working stress;
 #X text 378 460 resting relax;
-#X msg 304 462 -0.005;
-#X obj 16 210 < 0.5;
 #X obj 16 66 +;
 #X obj 43 66 tgl 15 0 empty ONOFF r:ONOFF 17 7 0 10 -262144 -1 -1 0
 1;
-#X msg 285 439 0.1;
-#X connect 0 0 21 0;
+#X obj 16 114 resample 100;
+#X msg 304 462 -0.05;
+#X obj 16 210 < 0.65;
+#X msg 285 439 0.25;
+#X connect 0 0 48 0;
 #X connect 1 0 5 0;
-#X connect 1 1 37 0;
+#X connect 1 1 36 0;
 #X connect 2 0 7 0;
 #X connect 3 0 2 1;
 #X connect 4 0 3 0;
 #X connect 5 0 2 0;
-#X connect 7 0 28 0;
+#X connect 7 0 27 0;
 #X connect 8 0 16 0;
-#X connect 9 0 38 0;
+#X connect 9 0 37 0;
 #X connect 11 0 16 1;
-#X connect 12 0 22 0;
+#X connect 12 0 21 0;
 #X connect 13 0 12 0;
-#X connect 13 1 35 0;
-#X connect 14 0 32 0;
+#X connect 13 1 34 0;
+#X connect 14 0 31 0;
 #X connect 15 0 13 0;
 #X connect 16 0 9 0;
 #X connect 16 0 10 0;
 #X connect 17 0 20 0;
-#X connect 17 0 48 0;
+#X connect 17 0 50 0;
 #X connect 18 0 15 0;
-#X connect 18 1 34 0;
+#X connect 18 1 33 0;
 #X connect 19 0 51 0;
-#X connect 19 1 47 0;
-#X connect 21 0 17 0;
-#X connect 22 0 11 0;
-#X connect 22 0 36 0;
-#X connect 28 0 8 0;
-#X connect 30 0 14 0;
-#X connect 32 0 18 0;
-#X connect 34 0 19 0;
-#X connect 35 0 12 1;
-#X connect 37 0 4 0;
-#X connect 37 0 27 0;
-#X connect 39 0 40 0;
-#X connect 40 0 42 0;
-#X connect 41 0 39 0;
-#X connect 42 0 43 0;
-#X connect 44 0 49 0;
-#X connect 47 0 15 0;
-#X connect 48 0 1 0;
-#X connect 49 0 0 0;
-#X connect 50 0 49 1;
+#X connect 19 1 49 0;
+#X connect 21 0 11 0;
+#X connect 21 0 35 0;
+#X connect 27 0 8 0;
+#X connect 29 0 14 0;
+#X connect 31 0 18 0;
+#X connect 33 0 19 0;
+#X connect 34 0 12 1;
+#X connect 36 0 4 0;
+#X connect 36 0 26 0;
+#X connect 38 0 39 0;
+#X connect 39 0 41 0;
+#X connect 40 0 38 0;
+#X connect 41 0 42 0;
+#X connect 43 0 46 0;
+#X connect 46 0 0 0;
+#X connect 47 0 46 1;
+#X connect 48 0 17 0;
+#X connect 49 0 15 0;
+#X connect 50 0 1 0;
 #X connect 51 0 15 0;
 #X restore 167 226 pd world and me;
 #N canvas 548 100 682 544 expressions 0;
@ -236,7 +236,7 @@
 #X obj 88 7 bng 15 250 50 0 empty empty empty 17 7 0 10 -83269 -262144
 -1;
 #X obj 88 24 tgl 15 0 empty \$0-status-now empty 17 7 0 10 -83269 -262144
-1 0 1;
+-1 1 1;
 #X obj 88 429 s NOTE;
 #X obj 88 406 spigot;
 #X obj 7 420 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 1
--- a/puredata/radio_drawer.pd
+++ b/puredata/radio_drawer.pd
@ -10,7 +10,7 @@
 #X obj 315 429 v \$0-STATE;
 #X msg 164 44 1;
 #X obj 164 67 v \$0-STATE;
-#N canvas 747 89 533 644 world 1;
+#N canvas 747 89 533 644 world 0;
 #X floatatom 16 94 5 0 0 0 - - -;
 #X obj 16 293 t a b;
 #X obj 16 372 spigot;
@ -36,7 +36,6 @@
 #X obj 285 416 sel 1 0;
 #X obj 64 164 bng 15 250 50 0 empty empty listen 17 7 0 10 -191407
 -257985 -1;
-#X obj 16 114 resample 1000;
 #X obj 238 578 max 0;
 #X text 109 114 listening speed;
 #X text 56 93 speed of happenings;
@ -47,7 +46,7 @@
 #X obj 16 451 abs;
 #N canvas 0 50 450 250 (subpatch) 0;
 #X array \$0-stress 100 float 2;
-#X coords 0 3 100 0 200 50 1 0 0;
+#X coords 0 10 100 0 200 50 1 0 0;
 #X restore 295 45 graph;
 #X obj 238 303 loadbang;
 #X text 78 227 condition of state change;
@ -90,55 +89,56 @@
 #X obj 16 39 r WORLD_ENERGY;
 #X text 378 440 working stress;
 #X text 378 460 resting relax;
-#X msg 304 462 -0.005;
-#X obj 16 210 < 0.5;
 #X obj 16 66 +;
 #X obj 49 66 tgl 15 0 empty ONOFF r:ONOFF 17 7 0 10 -262144 -1 -1 0
 1;
-#X msg 285 439 0.03;
-#X connect 0 0 21 0;
+#X obj 16 114 resample 100;
+#X msg 304 462 -0.05;
+#X obj 16 210 < 0.6;
+#X msg 285 439 0.2;
+#X connect 0 0 48 0;
 #X connect 1 0 5 0;
-#X connect 1 1 37 0;
+#X connect 1 1 36 0;
 #X connect 2 0 7 0;
 #X connect 3 0 2 1;
 #X connect 4 0 3 0;
 #X connect 5 0 2 0;
-#X connect 7 0 28 0;
+#X connect 7 0 27 0;
 #X connect 8 0 16 0;
-#X connect 9 0 38 0;
+#X connect 9 0 37 0;
 #X connect 11 0 16 1;
-#X connect 12 0 22 0;
+#X connect 12 0 21 0;
 #X connect 13 0 12 0;
-#X connect 13 1 35 0;
-#X connect 14 0 32 0;
+#X connect 13 1 34 0;
+#X connect 14 0 31 0;
 #X connect 15 0 13 0;
 #X connect 16 0 9 0;
 #X connect 16 0 10 0;
 #X connect 17 0 20 0;
-#X connect 17 0 48 0;
+#X connect 17 0 50 0;
 #X connect 18 0 15 0;
-#X connect 18 1 34 0;
+#X connect 18 1 33 0;
 #X connect 19 0 51 0;
-#X connect 19 1 47 0;
-#X connect 21 0 17 0;
-#X connect 22 0 11 0;
-#X connect 22 0 36 0;
-#X connect 28 0 8 0;
-#X connect 30 0 14 0;
-#X connect 32 0 18 0;
-#X connect 34 0 19 0;
-#X connect 35 0 12 1;
-#X connect 37 0 4 0;
-#X connect 37 0 27 0;
-#X connect 39 0 40 0;
-#X connect 40 0 42 0;
-#X connect 41 0 39 0;
-#X connect 42 0 43 0;
-#X connect 44 0 49 0;
-#X connect 47 0 15 0;
-#X connect 48 0 1 0;
-#X connect 49 0 0 0;
-#X connect 50 0 49 1;
+#X connect 19 1 49 0;
+#X connect 21 0 11 0;
+#X connect 21 0 35 0;
+#X connect 27 0 8 0;
+#X connect 29 0 14 0;
+#X connect 31 0 18 0;
+#X connect 33 0 19 0;
+#X connect 34 0 12 1;
+#X connect 36 0 4 0;
+#X connect 36 0 26 0;
+#X connect 38 0 39 0;
+#X connect 39 0 41 0;
+#X connect 40 0 38 0;
+#X connect 41 0 42 0;
+#X connect 43 0 46 0;
+#X connect 46 0 0 0;
+#X connect 47 0 46 1;
+#X connect 48 0 17 0;
+#X connect 49 0 15 0;
+#X connect 50 0 1 0;
 #X connect 51 0 15 0;
 #X restore 167 226 pd world and me;
 #N canvas 153 171 688 374 expressions 0;
@ -212,15 +212,17 @@
 #X connect 16 0 14 0;
 #X restore 48 226 pd expressions;
 #N canvas 0 23 450 278 (subpatch) 0;
-#X array drawer 30 float 3;
-#A 0 0.428572 0.542858 0.561906 0.552382 0.533334 0.371428 0.333333
-0.333333 0.390476 0.457143 0.495239 0.552382 0.590477 0.590477 0.580952
-0.552381 0.304761 0.257142 0.257142 0.266666 0.295237 0.371428 0.438095
-0.504763 0.542858 0.57143 0.590477 0.580953 0.542858 0.409524;
-#X coords 0 1 30 0 50 50 1 0 0;
+#X array drawer 40 float 3;
+#A 0 0.219048 0.209524 0.209524 0.209524 0.2 0.2 0.190476 0.180952
+0.180952 0.180952 0.171428 0.171428 0.161904 0.161904 0.152381 0.142857
+0.142857 0.133333 0.133333 0.123809 0.123809 0.114285 0.114285 0.104761
+0.104761 0.0952374 0.0857135 0.0761896 0.0761896 0.0761896 0.0761896
+0.0761896 0.0666658 0.0666658 0.0666658 0.0666658 0.0571419 0.047618
+0.047618 0.0380942;
+#X coords 0 1 40 0 50 50 1 0 0;
 #X restore 29 76 graph;
 #X obj 31 138 hradio 15 1 0 3 empty \$0-word empty 0 -8 0 10 -204800
-4160 -1 3;
+-4160 -1 0;
 #X obj 88 7 bng 15 250 50 0 empty empty empty 17 7 0 10 -4032 -1 -1
 ;
 #X obj 164 21 r DRAWER;
--- a/puredata/radio_drummer.pd
+++ b/puredata/radio_drummer.pd
@ -1,4 +1,4 @@
-#N canvas 745 132 829 496 10;
+#N canvas 451 132 829 496 10;
 #X msg 37 337 0;
 #X obj 316 306 loadbang;
 #X obj 288 406 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
@ -15,14 +15,14 @@
 #X obj 16 293 t a b;
 #X obj 16 372 spigot;
 #X obj 67 357 tgl 15 0 empty empty free_:) 17 7 0 10 -262144 -1 -1
-1 1;
+0 1;
 #X obj 67 334 == 0;
 #X obj 16 316 sel 1;
 #X text 41 402 think;
 #X obj 16 428 gauss 1 0;
 #X floatatom 16 474 5 0 0 0 - - -;
 #X obj 16 544 sel 1;
-#X obj 65 562 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
+#X obj 65 562 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
 1;
 #X floatatom 110 504 5 0 0 0 stress - -;
 #X obj 238 555 +;
@ -36,18 +36,17 @@
 #X obj 285 416 sel 1 0;
 #X obj 64 164 bng 15 250 50 0 empty empty listen 17 7 0 10 -191407
 -257985 -1;
-#X obj 16 114 resample 1000;
 #X obj 238 578 max 0;
 #X text 109 114 listening speed;
 #X text 56 93 speed of happenings;
 #X text 69 210 world is quiet?;
 #X text 90 285 status of me;
-#X obj 147 329 tgl 15 0 empty empty busy. 17 7 0 10 -262144 -1 -1 0
+#X obj 147 329 tgl 15 0 empty empty busy. 17 7 0 10 -262144 -1 -1 1
 1;
 #X obj 16 451 abs;
 #N canvas 0 50 450 250 (subpatch) 0;
 #X array \$0-stress 100 float 2;
-#X coords 0 3 100 0 200 50 1 0 0;
+#X coords 0 10 100 0 200 50 1 0 0;
 #X restore 295 45 graph;
 #X obj 238 303 loadbang;
 #X text 78 227 condition of state change;
@ -90,58 +89,59 @@
 #X obj 16 39 r WORLD_ENERGY;
 #X text 378 440 working stress;
 #X text 378 460 resting relax;
-#X msg 304 462 -0.005;
-#X obj 16 210 < 0.5;
 #X obj 16 66 +;
 #X obj 49 66 tgl 15 0 empty ONOFF r:ONOFF 17 7 0 10 -262144 -1 -1 0
 1;
-#X msg 285 439 0.02;
-#X connect 0 0 21 0;
+#X obj 16 114 resample 100;
+#X msg 285 439 0.1;
+#X msg 304 462 -0.05;
+#X obj 16 210 < 0.67;
+#X connect 0 0 48 0;
 #X connect 1 0 5 0;
-#X connect 1 1 37 0;
+#X connect 1 1 36 0;
 #X connect 2 0 7 0;
 #X connect 3 0 2 1;
 #X connect 4 0 3 0;
 #X connect 5 0 2 0;
-#X connect 7 0 28 0;
+#X connect 7 0 27 0;
 #X connect 8 0 16 0;
-#X connect 9 0 38 0;
+#X connect 9 0 37 0;
 #X connect 11 0 16 1;
-#X connect 12 0 22 0;
+#X connect 12 0 21 0;
 #X connect 13 0 12 0;
-#X connect 13 1 35 0;
-#X connect 14 0 32 0;
+#X connect 13 1 34 0;
+#X connect 14 0 31 0;
 #X connect 15 0 13 0;
 #X connect 16 0 9 0;
 #X connect 16 0 10 0;
 #X connect 17 0 20 0;
-#X connect 17 0 48 0;
+#X connect 17 0 51 0;
 #X connect 18 0 15 0;
-#X connect 18 1 34 0;
-#X connect 19 0 51 0;
-#X connect 19 1 47 0;
-#X connect 21 0 17 0;
-#X connect 22 0 11 0;
-#X connect 22 0 36 0;
-#X connect 28 0 8 0;
-#X connect 30 0 14 0;
-#X connect 32 0 18 0;
-#X connect 34 0 19 0;
-#X connect 35 0 12 1;
-#X connect 37 0 4 0;
-#X connect 37 0 27 0;
-#X connect 39 0 40 0;
-#X connect 40 0 42 0;
-#X connect 41 0 39 0;
-#X connect 42 0 43 0;
-#X connect 44 0 49 0;
-#X connect 47 0 15 0;
-#X connect 48 0 1 0;
-#X connect 49 0 0 0;
-#X connect 50 0 49 1;
-#X connect 51 0 15 0;
+#X connect 18 1 33 0;
+#X connect 19 0 49 0;
+#X connect 19 1 50 0;
+#X connect 21 0 11 0;
+#X connect 21 0 35 0;
+#X connect 27 0 8 0;
+#X connect 29 0 14 0;
+#X connect 31 0 18 0;
+#X connect 33 0 19 0;
+#X connect 34 0 12 1;
+#X connect 36 0 4 0;
+#X connect 36 0 26 0;
+#X connect 38 0 39 0;
+#X connect 39 0 41 0;
+#X connect 40 0 38 0;
+#X connect 41 0 42 0;
+#X connect 43 0 46 0;
+#X connect 46 0 0 0;
+#X connect 47 0 46 1;
+#X connect 48 0 17 0;
+#X connect 49 0 15 0;
+#X connect 50 0 15 0;
+#X connect 51 0 1 0;
 #X restore 275 25 pd world and me;
-#N canvas 88 149 730 545 expressions 1;
+#N canvas 88 149 730 545 expressions 0;
 #N canvas 0 23 450 278 (subpatch) 0;
 #X array drummerA1 18 float 3;
 #A 0 3.57628e-07 -0.00952339 -0.00952339 -0.00952339 -0.00952339 -0.00952339
@ -267,7 +267,7 @@
 #X obj 88 7 bng 15 250 50 0 empty empty empty 17 7 0 10 -203904 -1
 -1;
 #X obj 88 24 tgl 15 0 empty \$0-status-now empty 17 7 0 10 -203904
-1 -1 0 1;
+-1 -1 1 1;
 #X obj 88 406 spigot;
 #X obj 397 460 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
 1;
--- a/puredata/radio_flasher.pd
+++ b/puredata/radio_flasher.pd
@ -1,4 +1,4 @@
-#N canvas 107 257 704 515 10;
+#N canvas 472 643 704 515 10;
 #X obj 284 93 bng 15 250 50 0 empty empty motivated! 17 7 0 10 -262144
 -1 -1;
 #X msg 164 44 1;
@ -8,14 +8,14 @@
 #X obj 16 293 t a b;
 #X obj 16 372 spigot;
 #X obj 67 357 tgl 15 0 empty empty free_:) 17 7 0 10 -262144 -1 -1
-1 1;
+0 1;
 #X obj 67 334 == 0;
 #X obj 16 316 sel 1;
 #X text 41 402 think;
 #X obj 16 428 gauss 1 0;
 #X floatatom 16 474 5 0 0 0 - - -;
 #X obj 16 544 sel 1;
-#X obj 65 562 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
+#X obj 65 562 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
 1;
 #X floatatom 110 504 5 0 0 0 stress - -;
 #X obj 238 555 +;
@ -29,18 +29,17 @@
 #X obj 285 416 sel 1 0;
 #X obj 64 164 bng 15 250 50 0 empty empty listen 17 7 0 10 -191407
 -257985 -1;
-#X obj 16 114 resample 1000;
 #X obj 238 578 max 0;
 #X text 109 114 listening speed;
 #X text 56 93 speed of happenings;
 #X text 69 210 world is quiet?;
 #X text 90 285 status of me;
-#X obj 147 329 tgl 15 0 empty empty busy. 17 7 0 10 -262144 -1 -1 0
+#X obj 147 329 tgl 15 0 empty empty busy. 17 7 0 10 -262144 -1 -1 1
 1;
 #X obj 16 451 abs;
 #N canvas 0 50 450 250 (subpatch) 0;
 #X array \$0-stress 100 float 2;
-#X coords 0 3 100 0 200 50 1 0 0;
+#X coords 0 10 100 0 200 50 1 0 0;
 #X restore 295 45 graph;
 #X obj 238 303 loadbang;
 #X text 78 227 condition of state change;
@ -83,56 +82,57 @@
 #X obj 16 39 r WORLD_ENERGY;
 #X text 378 440 working stress;
 #X text 378 460 resting relax;
-#X msg 304 462 -0.005;
-#X msg 285 439 0.05;
-#X obj 16 210 < 0.6;
 #X obj 16 66 +;
-#X obj 49 66 tgl 15 0 empty ONOFF r:ONOFF 17 7 0 10 -262144 -1 -1 1
+#X obj 49 66 tgl 15 0 empty ONOFF r:ONOFF 17 7 0 10 -262144 -1 -1 0
 1;
-#X connect 0 0 21 0;
+#X obj 16 114 resample 100;
+#X msg 304 461 -0.05;
+#X msg 285 439 0.18;
+#X obj 16 210 < 0.7;
+#X connect 0 0 48 0;
 #X connect 1 0 5 0;
-#X connect 1 1 37 0;
+#X connect 1 1 36 0;
 #X connect 2 0 7 0;
 #X connect 3 0 2 1;
 #X connect 4 0 3 0;
 #X connect 5 0 2 0;
-#X connect 7 0 28 0;
+#X connect 7 0 27 0;
 #X connect 8 0 16 0;
-#X connect 9 0 38 0;
+#X connect 9 0 37 0;
 #X connect 11 0 16 1;
-#X connect 12 0 22 0;
+#X connect 12 0 21 0;
 #X connect 13 0 12 0;
-#X connect 13 1 35 0;
-#X connect 14 0 32 0;
+#X connect 13 1 34 0;
+#X connect 14 0 31 0;
 #X connect 15 0 13 0;
 #X connect 16 0 9 0;
 #X connect 16 0 10 0;
 #X connect 17 0 20 0;
-#X connect 17 0 49 0;
+#X connect 17 0 51 0;
 #X connect 18 0 15 0;
-#X connect 18 1 34 0;
-#X connect 19 0 48 0;
-#X connect 19 1 47 0;
-#X connect 21 0 17 0;
-#X connect 22 0 11 0;
-#X connect 22 0 36 0;
-#X connect 28 0 8 0;
-#X connect 30 0 14 0;
-#X connect 32 0 18 0;
-#X connect 34 0 19 0;
-#X connect 35 0 12 1;
-#X connect 37 0 4 0;
-#X connect 37 0 27 0;
-#X connect 39 0 40 0;
-#X connect 40 0 42 0;
-#X connect 41 0 39 0;
-#X connect 42 0 43 0;
-#X connect 44 0 50 0;
-#X connect 47 0 15 0;
-#X connect 48 0 15 0;
-#X connect 49 0 1 0;
-#X connect 50 0 0 0;
-#X connect 51 0 50 1;
+#X connect 18 1 33 0;
+#X connect 19 0 50 0;
+#X connect 19 1 49 0;
+#X connect 21 0 11 0;
+#X connect 21 0 35 0;
+#X connect 27 0 8 0;
+#X connect 29 0 14 0;
+#X connect 31 0 18 0;
+#X connect 33 0 19 0;
+#X connect 34 0 12 1;
+#X connect 36 0 4 0;
+#X connect 36 0 26 0;
+#X connect 38 0 39 0;
+#X connect 39 0 41 0;
+#X connect 40 0 38 0;
+#X connect 41 0 42 0;
+#X connect 43 0 46 0;
+#X connect 46 0 0 0;
+#X connect 47 0 46 1;
+#X connect 48 0 17 0;
+#X connect 49 0 15 0;
+#X connect 50 0 15 0;
+#X connect 51 0 1 0;
 #X restore 284 70 pd world and me;
 #N canvas 481 162 685 519 expressions 0;
 #N canvas 0 23 450 278 (subpatch) 0;
@ -249,22 +249,23 @@
 #X connect 24 0 22 0;
 #X restore 48 226 pd expressions;
 #N canvas 490 171 966 616 (subpatch) 0;
-#X array flasherA 30 float 3;
-#A 0 0.409525 0.409525 0.409525 0.0095253 0.0095253 0.304762 0.304762
-0.0095253 0.0095253 0.466667 0.466667 2.92063e-06 2.92063e-06 0.361905
-0.361905 2.92063e-06 2.92063e-06 0.0761909 0.0761909 0.0761909 0.0761909
-0.0761909 0.0761909 -0.00952375 0.390476 0.390476 0 0.0952381 0.0952381
-0.0952381;
-#X coords 0 1 30 0 25 25 1 0 0;
+#X array flasherA 40 float 3;
+#A 0 0.133333 0.133333 0.142857 0.161905 0.190476 0.238095 0.285713
+0.333332 0.380951 0.457141 0.552378 0.676187 0.780948 0.904757 0.980947
+1.01904 0.0380951 0.0380951 0.0380951 0.0380951 0.0380951 0.0380951
+0.0380951 0.0380951 0.0380951 0.0380951 0.171429 0.180952 0.2 0.238095
+0.266666 0.314285 0.361904 0.42857 0.485712 0.590474 0.704759 0.866662
+0.952376 1.04761;
+#X coords 0 1 40 0 25 25 1 0 0;
 #X restore 27 44 graph;
 #X obj 23 138 hradio 15 1 0 4 empty \$0-word empty 0 -8 0 10 -66577
-257985 -1 0;
+-257985 -1 1;
 #X obj 88 7 bng 15 250 50 0 empty empty empty 17 7 0 10 -66577 -257985
 -1;
 #X obj 88 24 tgl 15 0 empty \$0-status-now empty 17 7 0 10 -66577 -257985
-1 0 1;
+-1 1 1;
 #X obj 564 161 s NOTE;
-#X obj 564 118 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
+#X obj 564 118 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
 1;
 #X msg 564 138 1500 1000 0 \$1;
 #X obj 281 231 loadbang;
@ -277,13 +278,14 @@
 #X obj 164 21 r FLASHER;
 #X obj 284 123 s FLASHER;
 #N canvas 0 23 450 278 (subpatch) 0;
-#X array flasherB 30 float 3;
-#A 0 0.0761905 0.0761905 0.0761905 0.0095253 0.0095253 0.0666667 0.0666667
-0.0095253 0.0095253 0.0761905 0.0761905 2.92063e-06 2.92063e-06 0.0857143
-0.0857143 2.92063e-06 2.92063e-06 0.380952 0.0761909 0.380952 0.0761909
-0.371429 -4.76837e-07 -0.00952375 0.104762 0.104762 0.104762 0.266667
-0.390476 0.266667;
-#X coords 0 1 30 0 25 25 1 0 0;
+#X array flasherB 40 float 3;
+#A 0 0.133333 0.133333 0.142857 0.161905 0.190476 0.238095 0.285713
+0.333332 0.380951 0.457141 0.552378 0.676187 0.780948 0.904757 0.980947
+1.01904 0.0380951 0.0380951 0.0380951 0.0380951 0.0380951 0.0380951
+0.0380951 0.0380951 0.0380951 0.0380951 0.171429 0.180952 0.2 0.238095
+0.266666 0.314285 0.361904 0.42857 0.485712 0.590474 0.704759 0.866662
+0.952376 1.04761;
+#X coords 0 1 40 0 25 25 1 0 0;
 #X restore 27 94 graph;
 #X obj 48 187 r FLASHER;
 #X msg 37 337 0;
--- a/puredata/radio_frog.pd
+++ b/puredata/radio_frog.pd
@ -22,7 +22,7 @@
 #X obj 16 428 gauss 1 0;
 #X floatatom 16 474 5 0 0 0 - - -;
 #X obj 16 544 sel 1;
-#X obj 65 562 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+#X obj 65 562 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
 1;
 #X floatatom 110 504 5 0 0 0 stress - -;
 #X obj 238 555 +;
@ -36,7 +36,6 @@
 #X obj 285 416 sel 1 0;
 #X obj 64 164 bng 15 250 50 0 empty empty listen 17 7 0 10 -191407
 -257985 -1;
-#X obj 16 114 resample 1000;
 #X obj 238 578 max 0;
 #X text 109 114 listening speed;
 #X text 56 93 speed of happenings;
@ -47,12 +46,12 @@
 #X obj 16 451 abs;
 #N canvas 0 50 450 250 (subpatch) 0;
 #X array \$0-stress 100 float 2;
-#X coords 0 3 100 0 200 50 1 0 0;
+#X coords 0 10 100 0 200 50 1 0 0;
 #X restore 295 45 graph;
 #X obj 238 303 loadbang;
 #X text 78 227 condition of state change;
 #X obj 238 346 metro 100;
-#N canvas 1 89 319 212 (subpatch) 0;
+#N canvas 84 89 319 212 (subpatch) 0;
 #X obj 12 54 metro 100;
 #X obj 12 34 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 1
 ;
@ -90,56 +89,57 @@
 #X obj 16 39 r WORLD_ENERGY;
 #X text 378 440 working stress;
 #X text 378 460 resting relax;
-#X msg 304 462 -0.005;
-#X msg 285 439 0.01;
-#X obj 16 210 < 0.6;
 #X obj 16 66 +;
-#X obj 43 66 tgl 15 0 empty ONOFF r:ONOFF 17 7 0 10 -262144 -1 -1 1
+#X obj 43 66 tgl 15 0 empty ONOFF r:ONOFF 17 7 0 10 -262144 -1 -1 0
 1;
-#X connect 0 0 21 0;
+#X obj 16 113 resample 100;
+#X msg 285 439 0.2;
+#X msg 304 462 -0.05;
+#X obj 16 210 < 0.68;
+#X connect 0 0 48 0;
 #X connect 1 0 5 0;
-#X connect 1 1 37 0;
+#X connect 1 1 36 0;
 #X connect 2 0 7 0;
 #X connect 3 0 2 1;
 #X connect 4 0 3 0;
 #X connect 5 0 2 0;
-#X connect 7 0 28 0;
+#X connect 7 0 27 0;
 #X connect 8 0 16 0;
-#X connect 9 0 38 0;
+#X connect 9 0 37 0;
 #X connect 11 0 16 1;
-#X connect 12 0 22 0;
+#X connect 12 0 21 0;
 #X connect 13 0 12 0;
-#X connect 13 1 35 0;
-#X connect 14 0 32 0;
+#X connect 13 1 34 0;
+#X connect 14 0 31 0;
 #X connect 15 0 13 0;
 #X connect 16 0 9 0;
 #X connect 16 0 10 0;
 #X connect 17 0 20 0;
-#X connect 17 0 49 0;
+#X connect 17 0 51 0;
 #X connect 18 0 15 0;
-#X connect 18 1 34 0;
-#X connect 19 0 48 0;
-#X connect 19 1 47 0;
-#X connect 21 0 17 0;
-#X connect 22 0 11 0;
-#X connect 22 0 36 0;
-#X connect 28 0 8 0;
-#X connect 30 0 14 0;
-#X connect 32 0 18 0;
-#X connect 34 0 19 0;
-#X connect 35 0 12 1;
-#X connect 37 0 4 0;
-#X connect 37 0 27 0;
-#X connect 39 0 40 0;
-#X connect 40 0 42 0;
-#X connect 41 0 39 0;
-#X connect 42 0 43 0;
-#X connect 44 0 50 0;
-#X connect 47 0 15 0;
-#X connect 48 0 15 0;
-#X connect 49 0 1 0;
-#X connect 50 0 0 0;
-#X connect 51 0 50 1;
+#X connect 18 1 33 0;
+#X connect 19 0 49 0;
+#X connect 19 1 50 0;
+#X connect 21 0 11 0;
+#X connect 21 0 35 0;
+#X connect 27 0 8 0;
+#X connect 29 0 14 0;
+#X connect 31 0 18 0;
+#X connect 33 0 19 0;
+#X connect 34 0 12 1;
+#X connect 36 0 4 0;
+#X connect 36 0 26 0;
+#X connect 38 0 39 0;
+#X connect 39 0 41 0;
+#X connect 40 0 38 0;
+#X connect 41 0 42 0;
+#X connect 43 0 46 0;
+#X connect 46 0 0 0;
+#X connect 47 0 46 1;
+#X connect 48 0 17 0;
+#X connect 49 0 15 0;
+#X connect 50 0 15 0;
+#X connect 51 0 1 0;
 #X restore 167 226 pd world and me;
 #N canvas 250 164 688 488 expressions 0;
 #N canvas 0 23 450 278 (subpatch) 0;
@ -212,14 +212,17 @@
 #X connect 16 0 14 0;
 #X restore 48 226 pd expressions;
 #N canvas 0 23 450 278 (subpatch) 0;
-#X array frog 21 float 3;
-#A 0 0.0761905 0.285714 0.552381 0.0761905 0.257143 0.542857 0.00952381
-0.00952381 0.0761905 0.266667 0.495238 0.0666667 0.228571 0.485714
-0.0857143 0.238095 0.504762 0.904762 0.904762 0 0;
-#X coords 0 1 21 0 50 50 1 0 0;
+#X array frog 50 float 3;
+#A 0 0.0952381 0.104762 0.109524 0.114286 0.119048 0.12381 0.133333
+0.142857 0.152381 0.171429 0.180952 0.2 0.2 0.228571 0.238095 0.257143
+0.27619 0.304762 0.32381 0.352381 0.371429 0.409524 0.457143 0.533333
+0.6 0.695238 0.761905 0.857143 0.971429 1.00952 1 1 1 1 1 1 1 0.990476
+0.990476 0.990476 0.990476 0.0190476 0.0190476 0.0190476 0.0190476
+0.0190476 0.0190476 0.0190476 0.0190476 0.0190476;
+#X coords 0 1 50 0 50 50 1 0 0;
 #X restore 29 46 graph;
 #X obj 23 138 hradio 15 1 0 4 empty \$0-word empty 0 -8 0 10 -262144
-128992 -1 2;
+-128992 -1 1;
 #X obj 88 7 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
 -1;
 #X obj 88 24 tgl 15 0 empty \$0-status-now empty 17 7 0 10 -262144
--- a/puredata/radio_rounder.pd
+++ b/puredata/radio_rounder.pd
@ -15,14 +15,14 @@
 #X obj 16 293 t a b;
 #X obj 16 372 spigot;
 #X obj 67 357 tgl 15 0 empty empty free_:) 17 7 0 10 -262144 -1 -1
-0 1;
+1 1;
 #X obj 67 334 == 0;
 #X obj 16 316 sel 1;
 #X text 41 402 think;
 #X obj 16 428 gauss 1 0;
 #X floatatom 16 474 5 0 0 0 - - -;
 #X obj 16 544 sel 1;
-#X obj 65 562 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+#X obj 65 562 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
 1;
 #X floatatom 110 504 5 0 0 0 stress - -;
 #X obj 238 555 +;
@ -36,18 +36,17 @@
 #X obj 285 416 sel 1 0;
 #X obj 64 164 bng 15 250 50 0 empty empty listen 17 7 0 10 -191407
 -257985 -1;
-#X obj 16 114 resample 1000;
 #X obj 238 578 max 0;
 #X text 109 114 listening speed;
 #X text 56 93 speed of happenings;
 #X text 69 210 world is quiet?;
 #X text 90 285 status of me;
-#X obj 147 329 tgl 15 0 empty empty busy. 17 7 0 10 -262144 -1 -1 1
+#X obj 147 329 tgl 15 0 empty empty busy. 17 7 0 10 -262144 -1 -1 0
 1;
 #X obj 16 451 abs;
 #N canvas 0 50 450 250 (subpatch) 0;
 #X array \$0-stress 100 float 2;
-#X coords 0 3 100 0 200 50 1 0 0;
+#X coords 0 10 100 0 200 50 1 0 0;
 #X restore 295 45 graph;
 #X obj 238 303 loadbang;
 #X text 78 227 condition of state change;
@ -90,56 +89,57 @@
 #X obj 16 39 r WORLD_ENERGY;
 #X text 378 440 working stress;
 #X text 378 460 resting relax;
-#X msg 304 462 -0.005;
-#X msg 285 439 0.05;
-#X obj 16 210 < 0.7;
 #X obj 16 66 +;
 #X obj 49 66 tgl 15 0 empty ONOFF r:ONOFF 17 7 0 10 -262144 -1 -1 0
 1;
-#X connect 0 0 21 0;
+#X obj 16 114 resample 100;
+#X msg 285 439 0.1;
+#X msg 304 462 -0.05;
+#X obj 16 210 < 0.75;
+#X connect 0 0 48 0;
 #X connect 1 0 5 0;
-#X connect 1 1 37 0;
+#X connect 1 1 36 0;
 #X connect 2 0 7 0;
 #X connect 3 0 2 1;
 #X connect 4 0 3 0;
 #X connect 5 0 2 0;
-#X connect 7 0 28 0;
+#X connect 7 0 27 0;
 #X connect 8 0 16 0;
-#X connect 9 0 38 0;
+#X connect 9 0 37 0;
 #X connect 11 0 16 1;
-#X connect 12 0 22 0;
+#X connect 12 0 21 0;
 #X connect 13 0 12 0;
-#X connect 13 1 35 0;
-#X connect 14 0 32 0;
+#X connect 13 1 34 0;
+#X connect 14 0 31 0;
 #X connect 15 0 13 0;
 #X connect 16 0 9 0;
 #X connect 16 0 10 0;
 #X connect 17 0 20 0;
-#X connect 17 0 49 0;
+#X connect 17 0 51 0;
 #X connect 18 0 15 0;
-#X connect 18 1 34 0;
-#X connect 19 0 48 0;
-#X connect 19 1 47 0;
-#X connect 21 0 17 0;
-#X connect 22 0 11 0;
-#X connect 22 0 36 0;
-#X connect 28 0 8 0;
-#X connect 30 0 14 0;
-#X connect 32 0 18 0;
-#X connect 34 0 19 0;
-#X connect 35 0 12 1;
-#X connect 37 0 4 0;
-#X connect 37 0 27 0;
-#X connect 39 0 40 0;
-#X connect 40 0 42 0;
-#X connect 41 0 39 0;
-#X connect 42 0 43 0;
-#X connect 44 0 50 0;
-#X connect 47 0 15 0;
-#X connect 48 0 15 0;
-#X connect 49 0 1 0;
-#X connect 50 0 0 0;
-#X connect 51 0 50 1;
+#X connect 18 1 33 0;
+#X connect 19 0 49 0;
+#X connect 19 1 50 0;
+#X connect 21 0 11 0;
+#X connect 21 0 35 0;
+#X connect 27 0 8 0;
+#X connect 29 0 14 0;
+#X connect 31 0 18 0;
+#X connect 33 0 19 0;
+#X connect 34 0 12 1;
+#X connect 36 0 4 0;
+#X connect 36 0 26 0;
+#X connect 38 0 39 0;
+#X connect 39 0 41 0;
+#X connect 40 0 38 0;
+#X connect 41 0 42 0;
+#X connect 43 0 46 0;
+#X connect 46 0 0 0;
+#X connect 47 0 46 1;
+#X connect 48 0 17 0;
+#X connect 49 0 15 0;
+#X connect 50 0 15 0;
+#X connect 51 0 1 0;
 #X restore 167 226 pd world and me;
 #N canvas 84 248 697 398 expressions 0;
 #X obj 42 195 inlet;
@ -214,19 +214,23 @@
 #X connect 16 0 14 0;
 #X restore 48 226 pd expressions;
 #N canvas 0 23 450 278 (subpatch) 0;
-#X array rounder 30 float 3;
-#A 0 0.371429 0.371429 0.0190476 -0.428571 -0.438095 0 0.390476 0.4
-0.0285714 -0.438095 -0.428571 0.0190476 0.4 0.4 0.0285714 -0.447619
-0.447619 0.409524 0.409524 0.0285714 -0.457143 -0.457143 0.409524
-0.409524 0.00952381 -0.428571 0.438095 0.0190476 -0.447619 0;
-#X coords 0 1 30 0 50 50 1 0 0;
+#X array rounder 50 float 3;
+#A 0 -0.628567 -0.628567 -0.628567 -0.638091 -0.638091 -0.638091 -0.638091
+-0.638091 -0.638091 -0.638091 -0.638091 -0.638091 -0.495234 -0.495234
+-0.495234 -0.495234 -0.495234 -0.495234 -0.495234 -0.504758 -0.504758
+-0.504758 -0.504758 -0.514282 -0.314283 -0.314283 -0.314283 -0.314283
+-0.314283 -0.314283 -0.314283 -0.314283 -0.314283 -0.323806 -0.323806
+-0.323806 -0.171427 -0.161903 -0.161903 -0.161903 -0.161903 -0.161903
+-0.161903 -0.161903 -0.161903 -0.171427 -0.171427 -0.171427 -0.171427
+-0.171427;
+#X coords 0 1 50 0 50 50 1 0 0;
 #X restore 29 46 graph;
 #X obj 23 138 hradio 15 1 0 4 empty \$0-word empty 0 -8 0 10 -262130
-128992 -1 2;
+-128992 -1 1;
 #X obj 88 7 bng 15 250 50 0 empty empty empty 17 7 0 10 -262130 -1
 -1;
 #X obj 88 24 tgl 15 0 empty \$0-status-now empty 17 7 0 10 -262130
-1 -1 1 1;
+-1 -1 0 1;
 #X obj 164 21 r ROUNDER;
 #X obj 48 188 r ROUNDER;
 #X obj 167 269 s ROUNDER;
--- a/puredata/radio_suitcase.pd
+++ b/puredata/radio_suitcase.pd
@ -10,7 +10,7 @@
 #X obj 251 429 v \$0-STATE;
 #X msg 114 44 1;
 #X obj 114 67 v \$0-STATE;
-#N canvas 701 43 533 644 world 1;
+#N canvas 701 43 533 644 world 0;
 #X floatatom 16 94 5 0 0 0 - - -;
 #X obj 16 293 t a b;
 #X obj 16 372 spigot;
@ -36,7 +36,6 @@
 #X obj 285 416 sel 1 0;
 #X obj 64 164 bng 15 250 50 0 empty empty listen 17 7 0 10 -191407
 -257985 -1;
-#X obj 16 114 resample 1000;
 #X obj 238 578 max 0;
 #X text 109 114 listening speed;
 #X text 56 93 speed of happenings;
@ -47,7 +46,7 @@
 #X obj 16 451 abs;
 #N canvas 0 50 450 250 (subpatch) 0;
 #X array \$0-stress 100 float 2;
-#X coords 0 3 100 0 200 50 1 0 0;
+#X coords 0 10 100 0 200 50 1 0 0;
 #X restore 295 45 graph;
 #X obj 238 303 loadbang;
 #X text 78 227 condition of state change;
@ -90,56 +89,57 @@
 #X obj 16 39 r WORLD_ENERGY;
 #X text 378 440 working stress;
 #X text 378 460 resting relax;
-#X msg 304 462 -0.005;
-#X obj 16 210 < 0.4;
 #X obj 16 66 +;
 #X obj 43 66 tgl 15 0 empty ONOFF r:ONOFF 17 7 0 10 -262144 -1 -1 0
 1;
-#X msg 285 436 0.01;
-#X connect 0 0 21 0;
+#X obj 16 114 resample 100;
+#X msg 285 436 0.1;
+#X msg 304 462 -0.05;
+#X obj 16 210 < 0.63;
+#X connect 0 0 48 0;
 #X connect 1 0 5 0;
-#X connect 1 1 37 0;
+#X connect 1 1 36 0;
 #X connect 2 0 7 0;
 #X connect 3 0 2 1;
 #X connect 4 0 3 0;
 #X connect 5 0 2 0;
-#X connect 7 0 28 0;
+#X connect 7 0 27 0;
 #X connect 8 0 16 0;
-#X connect 9 0 38 0;
+#X connect 9 0 37 0;
 #X connect 11 0 16 1;
-#X connect 12 0 22 0;
+#X connect 12 0 21 0;
 #X connect 13 0 12 0;
-#X connect 13 1 35 0;
-#X connect 14 0 32 0;
+#X connect 13 1 34 0;
+#X connect 14 0 31 0;
 #X connect 15 0 13 0;
 #X connect 16 0 9 0;
 #X connect 16 0 10 0;
 #X connect 17 0 20 0;
-#X connect 17 0 48 0;
+#X connect 17 0 51 0;
 #X connect 18 0 15 0;
-#X connect 18 1 34 0;
-#X connect 19 0 51 0;
-#X connect 19 1 47 0;
-#X connect 21 0 17 0;
-#X connect 22 0 11 0;
-#X connect 22 0 36 0;
-#X connect 28 0 8 0;
-#X connect 30 0 14 0;
-#X connect 32 0 18 0;
-#X connect 34 0 19 0;
-#X connect 35 0 12 1;
-#X connect 37 0 4 0;
-#X connect 37 0 27 0;
-#X connect 39 0 40 0;
-#X connect 40 0 42 0;
-#X connect 41 0 39 0;
-#X connect 42 0 43 0;
-#X connect 44 0 49 0;
-#X connect 47 0 15 0;
-#X connect 48 0 1 0;
-#X connect 49 0 0 0;
-#X connect 50 0 49 1;
-#X connect 51 0 15 0;
+#X connect 18 1 33 0;
+#X connect 19 0 49 0;
+#X connect 19 1 50 0;
+#X connect 21 0 11 0;
+#X connect 21 0 35 0;
+#X connect 27 0 8 0;
+#X connect 29 0 14 0;
+#X connect 31 0 18 0;
+#X connect 33 0 19 0;
+#X connect 34 0 12 1;
+#X connect 36 0 4 0;
+#X connect 36 0 26 0;
+#X connect 38 0 39 0;
+#X connect 39 0 41 0;
+#X connect 40 0 38 0;
+#X connect 41 0 42 0;
+#X connect 43 0 46 0;
+#X connect 46 0 0 0;
+#X connect 47 0 46 1;
+#X connect 48 0 17 0;
+#X connect 49 0 15 0;
+#X connect 50 0 15 0;
+#X connect 51 0 1 0;
 #X restore 267 79 pd world and me;
 #N canvas 202 79 809 655 expressions 0;
 #X obj 28 419 inlet;
@ -342,24 +342,32 @@
 1;
 #X obj 350 450 loadbang;
 #N canvas 0 23 450 278 (subpatch) 0;
-#X array suitcaseA 30 float 3;
-#A 0 0.8 0.847619 0.885715 0.904763 0.895239 0.885715 0.828572 0.809524
-0.780952 0.761905 0.752381 0.714285 0.685714 0.638094 0.609523 0.571427
-0.542856 0.50476 0.466665 0.447617 0.419045 0.399998 0.371426 0.352378
-0.342854 0.333331 0.323807 0.304759 0.295235 0.285711;
-#X coords 0 1 30 0 25 25 1 0 0;
+#X array suitcaseA 60 float 3;
+#A 0 0.514285 0.523809 0.533332 0.542856 0.542856 0.542856 0.6 0.619047
+0.504761 0.495238 0.485714 0.466668 0.466668 0.457144 0.457144 0.457144
+0.476191 0.495238 0.542857 0.55238 0.571429 0.495239 0.500001 0.647621
+0.666669 0.714287 0.72381 0.742858 0.752381 0.771429 0.466667 0.457143
+0.457143 0.438096 0.438096 0.428572 0.428572 0.609521 0.609521 0.676187
+0.676187 0.68571 0.68571 0.68571 0.68571 0.647616 0.619045 0.600002
+0.590478 0.561907 0.580954 0.600002 0.523809 0.533332 0.533332 0.523809
+0.495238 0.485714 0.457143 0.44762;
+#X coords 0 1 60 0 25 25 1 0 0;
 #X restore 26 46 graph;
 #X obj 10 138 hradio 15 1 0 6 empty \$0-word empty 0 -8 0 10 -204786
-13381 -1 0;
+-13381 -1 2;
 #X obj 88 7 bng 15 250 50 0 empty empty empty 17 7 0 10 -204786 -1
 -1;
 #N canvas 0 23 450 278 (subpatch) 0;
-#X array suitcaseB 30 float 3;
-#A 0 0.761905 0.790476 0.857144 0.876191 0.885715 0.885715 0.866667
-0.819048 0.8 0.771429 0.752381 0.714285 0.685714 0.657142 0.62857 0.609523
-0.590475 0.580951 0.561903 0.542856 0.523808 0.50476 0.485712 0.466665
-0.438093 0.428569 0.409521 0.390474 0.371426 0.352378;
-#X coords 0 1 30 0 25 25 1 0 0;
+#X array suitcaseB 60 float 3;
+#A 0 0.514285 0.523809 0.533332 0.542856 0.542856 0.542856 0.6 0.619047
+0.504761 0.495238 0.485714 0.47619 0.466667 0.809524 0.571429 0.638095
+0.638095 0.647619 0.828571 0.657142 0.657142 0.495239 0.500001 0.809523
+0.819046 0.82857 0.82857 0.838094 0.838094 0.771428 0.466667 0.457143
+0.457143 0.438096 0.438096 0.428572 0.428572 0.609521 0.609521 0.676187
+0.676187 0.68571 0.68571 0.68571 0.68571 0.647616 0.619045 0.599997
+0.847616 0.847616 0.676194 0.66667 0.619049 0.609525 0.609525 0.609525
+0.780951 0.780951 0.761903 0.75238;
+#X coords 0 1 60 0 25 25 1 0 0;
 #X restore 26 96 graph;
 #X obj 88 24 tgl 15 0 empty \$0-status-now empty 17 7 0 10 -204786
 -1 -1 0 1;
--- a/puredata/radio_tanker_head.pd
+++ b/puredata/radio_tanker_head.pd
@ -1,4 +1,4 @@
-#N canvas 224 83 400 493 10;
+#N canvas 186 86 400 493 10;
 #X msg 37 337 0;
 #X obj 249 306 loadbang;
 #X obj 231 406 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
@ -10,7 +10,7 @@
 #X obj 251 429 v \$0-STATE;
 #X msg 164 44 1;
 #X obj 164 67 v \$0-STATE;
-#N canvas 747 89 533 644 world 1;
+#N canvas 747 89 533 644 world 0;
 #X floatatom 16 94 5 0 0 0 - - -;
 #X obj 16 293 t a b;
 #X obj 16 372 spigot;
@ -36,7 +36,6 @@
 #X obj 285 416 sel 1 0;
 #X obj 64 164 bng 15 250 50 0 empty empty listen 17 7 0 10 -191407
 -257985 -1;
-#X obj 16 114 resample 1000;
 #X obj 238 578 max 0;
 #X text 109 114 listening speed;
 #X text 56 93 speed of happenings;
@ -47,7 +46,7 @@
 #X obj 16 451 abs;
 #N canvas 0 50 450 250 (subpatch) 0;
 #X array \$0-stress 100 float 2;
-#X coords 0 3 100 0 200 50 1 0 0;
+#X coords 0 10 100 0 200 50 1 0 0;
 #X restore 295 45 graph;
 #X obj 238 303 loadbang;
 #X text 78 227 condition of state change;
@ -90,55 +89,56 @@
 #X obj 16 39 r WORLD_ENERGY;
 #X text 378 440 working stress;
 #X text 378 460 resting relax;
-#X msg 304 462 -0.005;
-#X obj 16 210 < 0.4;
 #X obj 16 66 +;
 #X obj 49 66 tgl 15 0 empty ONOFF r:ONOFF 17 7 0 10 -262144 -1 -1 0
 1;
-#X msg 285 439 0.02;
-#X connect 0 0 21 0;
+#X obj 16 114 resample 100;
+#X msg 304 462 -0.05;
+#X obj 16 210 < 0.5;
+#X msg 285 439 0.2;
+#X connect 0 0 48 0;
 #X connect 1 0 5 0;
-#X connect 1 1 37 0;
+#X connect 1 1 36 0;
 #X connect 2 0 7 0;
 #X connect 3 0 2 1;
 #X connect 4 0 3 0;
 #X connect 5 0 2 0;
-#X connect 7 0 28 0;
+#X connect 7 0 27 0;
 #X connect 8 0 16 0;
-#X connect 9 0 38 0;
+#X connect 9 0 37 0;
 #X connect 11 0 16 1;
-#X connect 12 0 22 0;
+#X connect 12 0 21 0;
 #X connect 13 0 12 0;
-#X connect 13 1 35 0;
-#X connect 14 0 32 0;
+#X connect 13 1 34 0;
+#X connect 14 0 31 0;
 #X connect 15 0 13 0;
 #X connect 16 0 9 0;
 #X connect 16 0 10 0;
 #X connect 17 0 20 0;
-#X connect 17 0 48 0;
+#X connect 17 0 50 0;
 #X connect 18 0 15 0;
-#X connect 18 1 34 0;
+#X connect 18 1 33 0;
 #X connect 19 0 51 0;
-#X connect 19 1 47 0;
-#X connect 21 0 17 0;
-#X connect 22 0 11 0;
-#X connect 22 0 36 0;
-#X connect 28 0 8 0;
-#X connect 30 0 14 0;
-#X connect 32 0 18 0;
-#X connect 34 0 19 0;
-#X connect 35 0 12 1;
-#X connect 37 0 4 0;
-#X connect 37 0 27 0;
-#X connect 39 0 40 0;
-#X connect 40 0 42 0;
-#X connect 41 0 39 0;
-#X connect 42 0 43 0;
-#X connect 44 0 49 0;
-#X connect 47 0 15 0;
-#X connect 48 0 1 0;
-#X connect 49 0 0 0;
-#X connect 50 0 49 1;
+#X connect 19 1 49 0;
+#X connect 21 0 11 0;
+#X connect 21 0 35 0;
+#X connect 27 0 8 0;
+#X connect 29 0 14 0;
+#X connect 31 0 18 0;
+#X connect 33 0 19 0;
+#X connect 34 0 12 1;
+#X connect 36 0 4 0;
+#X connect 36 0 26 0;
+#X connect 38 0 39 0;
+#X connect 39 0 41 0;
+#X connect 40 0 38 0;
+#X connect 41 0 42 0;
+#X connect 43 0 46 0;
+#X connect 46 0 0 0;
+#X connect 47 0 46 1;
+#X connect 48 0 17 0;
+#X connect 49 0 15 0;
+#X connect 50 0 1 0;
 #X connect 51 0 15 0;
 #X restore 167 226 pd world and me;
 #N canvas 588 137 683 529 expressions 0;
--- a/puredata/radio_tanker_side.pd
+++ b/puredata/radio_tanker_side.pd
@ -1,4 +1,4 @@
-#N canvas 346 129 462 511 10;
+#N canvas 587 86 462 511 10;
 #X msg 37 337 0;
 #X obj 300 306 loadbang;
 #X obj 288 406 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
@ -10,7 +10,7 @@
 #X obj 308 429 v \$0-STATE;
 #X msg 164 44 1;
 #X obj 164 67 v \$0-STATE;
-#N canvas 747 89 533 644 world 1;
+#N canvas 747 89 533 644 world 0;
 #X floatatom 16 94 5 0 0 0 - - -;
 #X obj 16 293 t a b;
 #X obj 16 372 spigot;
@ -22,7 +22,7 @@
 #X obj 16 428 gauss 1 0;
 #X floatatom 16 474 5 0 0 0 - - -;
 #X obj 16 544 sel 1;
-#X obj 65 562 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+#X obj 65 562 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
 1;
 #X floatatom 110 504 5 0 0 0 stress - -;
 #X obj 238 555 +;
@ -36,7 +36,6 @@
 #X obj 285 416 sel 1 0;
 #X obj 64 164 bng 15 250 50 0 empty empty listen 17 7 0 10 -191407
 -257985 -1;
-#X obj 16 114 resample 1000;
 #X obj 238 578 max 0;
 #X text 109 114 listening speed;
 #X text 56 93 speed of happenings;
@ -47,7 +46,7 @@
 #X obj 16 451 abs;
 #N canvas 0 50 450 250 (subpatch) 0;
 #X array \$0-stress 100 float 2;
-#X coords 0 3 100 0 200 50 1 0 0;
+#X coords 0 10 100 0 200 50 1 0 0;
 #X restore 295 45 graph;
 #X obj 238 303 loadbang;
 #X text 78 227 condition of state change;
@ -88,58 +87,59 @@
 #X obj 373 278 v \$0-STATE;
 #X obj 373 301 s \$0-status-now;
 #X obj 16 39 r WORLD_ENERGY;
-#X obj 16 210 < 0.3;
 #X text 378 440 working stress;
 #X text 378 460 resting relax;
-#X msg 304 462 -0.005;
 #X obj 16 66 +;
 #X obj 43 66 tgl 15 0 empty ONOFF r:ONOFF 17 7 0 10 -262144 -1 -1 0
 1;
-#X msg 285 438 0.03;
-#X connect 0 0 21 0;
+#X obj 16 114 resample 100;
+#X msg 285 438 0.1;
+#X msg 304 462 -0.05;
+#X obj 16 210 < 0.56;
+#X connect 0 0 48 0;
 #X connect 1 0 5 0;
-#X connect 1 1 37 0;
+#X connect 1 1 36 0;
 #X connect 2 0 7 0;
 #X connect 3 0 2 1;
 #X connect 4 0 3 0;
 #X connect 5 0 2 0;
-#X connect 7 0 28 0;
+#X connect 7 0 27 0;
 #X connect 8 0 16 0;
-#X connect 9 0 38 0;
+#X connect 9 0 37 0;
 #X connect 11 0 16 1;
-#X connect 12 0 22 0;
+#X connect 12 0 21 0;
 #X connect 13 0 12 0;
-#X connect 13 1 35 0;
-#X connect 14 0 32 0;
+#X connect 13 1 34 0;
+#X connect 14 0 31 0;
 #X connect 15 0 13 0;
 #X connect 16 0 9 0;
 #X connect 16 0 10 0;
 #X connect 17 0 20 0;
-#X connect 17 0 45 0;
+#X connect 17 0 51 0;
 #X connect 18 0 15 0;
-#X connect 18 1 34 0;
-#X connect 19 0 51 0;
-#X connect 19 1 48 0;
-#X connect 21 0 17 0;
-#X connect 22 0 11 0;
-#X connect 22 0 36 0;
-#X connect 28 0 8 0;
-#X connect 30 0 14 0;
-#X connect 32 0 18 0;
-#X connect 34 0 19 0;
-#X connect 35 0 12 1;
-#X connect 37 0 4 0;
-#X connect 37 0 27 0;
-#X connect 39 0 40 0;
-#X connect 40 0 42 0;
-#X connect 41 0 39 0;
-#X connect 42 0 43 0;
-#X connect 44 0 49 0;
-#X connect 45 0 1 0;
-#X connect 48 0 15 0;
-#X connect 49 0 0 0;
-#X connect 50 0 49 1;
-#X connect 51 0 15 0;
+#X connect 18 1 33 0;
+#X connect 19 0 49 0;
+#X connect 19 1 50 0;
+#X connect 21 0 11 0;
+#X connect 21 0 35 0;
+#X connect 27 0 8 0;
+#X connect 29 0 14 0;
+#X connect 31 0 18 0;
+#X connect 33 0 19 0;
+#X connect 34 0 12 1;
+#X connect 36 0 4 0;
+#X connect 36 0 26 0;
+#X connect 38 0 39 0;
+#X connect 39 0 41 0;
+#X connect 40 0 38 0;
+#X connect 41 0 42 0;
+#X connect 43 0 46 0;
+#X connect 46 0 0 0;
+#X connect 47 0 46 1;
+#X connect 48 0 17 0;
+#X connect 49 0 15 0;
+#X connect 50 0 15 0;
+#X connect 51 0 1 0;
 #X restore 167 226 pd world and me;
 #N canvas 548 302 673 530 expressions 0;
 #X obj 22 180 inlet;
@ -208,15 +208,17 @@
 #X connect 16 0 14 0;
 #X restore 48 226 pd expressions;
 #N canvas 0 23 450 278 (subpatch) 0;
-#X array tankerS 25 float 3;
-#A 0 1.30476 0.0857143 1.31428 1.31428 1.31428 0.00952381 1.30476 1.31428
-1.31428 1.31428 1.31428 0.12381 1.31428 1.31428 1.31428 0.00952381
-1.30476 0.0857143 1.30476 0.0952381 1.30476 1.30476 0.171429 1.30476
-1.30476;
-#X coords 0 1 25 0 50 50 1 0 0;
+#X array tankerS 40 float 3;
+#A 0 0.0190476 0.0190476 0.104762 0.190479 0.266669 0.342859 0.466668
+0.952379 0.0190476 3.57628e-07 3.57628e-07 3.57628e-07 0.142857 0.238095
+0.342857 0.457144 0.542858 0.647619 0.990474 3.57628e-07 3.57628e-07
+3.57628e-07 0.00952411 0.00952411 0.133333 0.219048 0.352383 0.466668
+0.657143 0.999999 0.0380952 0.0380952 0.0285741 0.0285716 0.19048 0.295238
+0.438096 0.580952 0.666667 0.990476;
+#X coords 0 1 40 0 50 50 1 0 0;
 #X restore 29 46 graph;
 #X obj 23 138 hradio 15 1 0 4 empty \$0-word empty 0 -8 0 10 -204786
-159808 -1 2;
+-159808 -1 3;
 #X obj 88 7 bng 15 250 50 0 empty empty empty 17 7 0 10 -204786 -159808
 -1;
 #X obj 88 24 tgl 15 0 empty \$0-status-now empty 17 7 0 10 -204786
--- a/puredata/radio_tissue.pd
+++ b/puredata/radio_tissue.pd
@ -32,7 +32,6 @@
 #X obj 285 416 sel 1 0;
 #X obj 64 164 bng 15 250 50 0 empty empty listen 17 7 0 10 -191407
 -257985 -1;
-#X obj 16 114 resample 1000;
 #X obj 238 578 max 0;
 #X text 109 114 listening speed;
 #X text 56 93 speed of happenings;
@ -43,7 +42,7 @@
 #X obj 16 451 abs;
 #N canvas 0 50 450 250 (subpatch) 0;
 #X array \$0-stress 100 float 2;
-#X coords 0 3 100 0 200 50 1 0 0;
+#X coords 0 10 100 0 200 50 1 0 0;
 #X restore 295 45 graph;
 #X obj 238 303 loadbang;
 #X text 78 227 condition of state change;
@ -86,58 +85,59 @@
 #X obj 16 39 r WORLD_ENERGY;
 #X text 378 440 working stress;
 #X text 378 460 resting relax;
-#X msg 304 462 -0.005;
-#X obj 16 210 < 0.4;
 #X obj 16 66 +;
 #X obj 49 66 tgl 15 0 empty ONOFF r:ONOFF 17 7 0 10 -262144 -1 -1 0
 1;
-#X msg 285 439 0.01;
-#X connect 0 0 21 0;
+#X obj 16 114 resample 100;
+#X msg 285 439 0.1;
+#X msg 304 462 -0.05;
+#X obj 16 210 < 0.57;
+#X connect 0 0 48 0;
 #X connect 1 0 5 0;
-#X connect 1 1 37 0;
+#X connect 1 1 36 0;
 #X connect 2 0 7 0;
 #X connect 3 0 2 1;
 #X connect 4 0 3 0;
 #X connect 5 0 2 0;
-#X connect 7 0 28 0;
+#X connect 7 0 27 0;
 #X connect 8 0 16 0;
-#X connect 9 0 38 0;
+#X connect 9 0 37 0;
 #X connect 11 0 16 1;
-#X connect 12 0 22 0;
+#X connect 12 0 21 0;
 #X connect 13 0 12 0;
-#X connect 13 1 35 0;
-#X connect 14 0 32 0;
+#X connect 13 1 34 0;
+#X connect 14 0 31 0;
 #X connect 15 0 13 0;
 #X connect 16 0 9 0;
 #X connect 16 0 10 0;
 #X connect 17 0 20 0;
-#X connect 17 0 48 0;
+#X connect 17 0 51 0;
 #X connect 18 0 15 0;
-#X connect 18 1 34 0;
-#X connect 19 0 51 0;
-#X connect 19 1 47 0;
-#X connect 21 0 17 0;
-#X connect 22 0 11 0;
-#X connect 22 0 36 0;
-#X connect 28 0 8 0;
-#X connect 30 0 14 0;
-#X connect 32 0 18 0;
-#X connect 34 0 19 0;
-#X connect 35 0 12 1;
-#X connect 37 0 4 0;
-#X connect 37 0 27 0;
-#X connect 39 0 40 0;
-#X connect 40 0 42 0;
-#X connect 41 0 39 0;
-#X connect 42 0 43 0;
-#X connect 44 0 49 0;
-#X connect 47 0 15 0;
-#X connect 48 0 1 0;
-#X connect 49 0 0 0;
-#X connect 50 0 49 1;
-#X connect 51 0 15 0;
+#X connect 18 1 33 0;
+#X connect 19 0 49 0;
+#X connect 19 1 50 0;
+#X connect 21 0 11 0;
+#X connect 21 0 35 0;
+#X connect 27 0 8 0;
+#X connect 29 0 14 0;
+#X connect 31 0 18 0;
+#X connect 33 0 19 0;
+#X connect 34 0 12 1;
+#X connect 36 0 4 0;
+#X connect 36 0 26 0;
+#X connect 38 0 39 0;
+#X connect 39 0 41 0;
+#X connect 40 0 38 0;
+#X connect 41 0 42 0;
+#X connect 43 0 46 0;
+#X connect 46 0 0 0;
+#X connect 47 0 46 1;
+#X connect 48 0 17 0;
+#X connect 49 0 15 0;
+#X connect 50 0 15 0;
+#X connect 51 0 1 0;
 #X restore 267 79 pd world and me;
-#N canvas 84 89 691 645 expressions 0;
+#N canvas 510 168 691 645 expressions 0;
 #X obj 28 419 inlet;
 #X obj 28 500 outlet;
 #X obj 28 471 t b a;
@ -266,31 +266,30 @@
 1;
 #X obj 365 490 loadbang;
 #N canvas 0 23 450 278 (subpatch) 0;
-#X array tissueA 20 float 3;
-#A 0 6.85715 7.33334 7.52382 7.71429 5.04761 5.14285 5.61904 6.38095
-6.95238 2.19045 4.66666 5.04761 5.23809 1.99997 3.33331 3.80953 3.52381
-3.2381 3.90475 4.85713;
-#X coords 0 10 20 0 25 25 1 0 0;
+#X array tissueA 30 float 3;
+#A 0 6.66666 6.66666 5.71428 4.57141 3.8095 1.99997 3.90474 5.33332
+4.66665 3.71426 2.38095 0.190476 0.0952377 4.2857 3.71426 2.19048 0.0952377
+4.19046 2.95235 1.71429 4.2857 3.42855 2.09521 1.3333 -4.57764e-05
+3.90474 3.42855 2.28568 1.23806 0.28567;
+#X coords 0 10 30 0 25 25 1 0 0;
 #X restore 34 46 graph;
 #X obj 25 138 hradio 15 1 0 4 empty \$0-word empty 0 -8 0 10 -191407
-159808 -1 0;
+-159808 -1 2;
 #X obj 88 7 bng 15 250 50 0 empty empty empty 17 7 0 10 -191407 -159808
 -1;
 #N canvas 0 23 450 278 (subpatch) 0;
-#X array tissueB 60 float 3;
-#A 0 -0.171425 -0.171425 -0.171425 -0.171425 -0.171425 -0.171425 -0.171425
-0.171425 -0.171425 -0.171425 -0.171425 -0.171425 -0.171425 -0.171425
-0.171425 -0.171425 -0.171425 -0.171425 -0.171425 -0.171425 -0.171425
-0.171425 -0.171425 -0.171425 -0.171425 -0.171425 -0.171425 -0.171425
-0.171425 -0.171425 -0.171425 -0.171425 -0.171425 -0.171425 -0.171425
-0.171425 -0.171425 -0.171425 -0.171425 -0.171425 -0.171425 -0.171425
-0.171425 -0.171425 -0.171425 -0.171425 -0.171425 -0.171425 -0.171425
-0.171425 -0.171425 -0.171425 -0.171425 -0.171425 -0.171425 -0.171425
-0.171425 -0.171425 -0.171425 -0.171425;
-#X coords 0 1 60 0 25 25 1 0 0;
+#X array tissueB 50 float 3;
+#A 0 0.0952381 0.114286 0.200001 0.228572 0.228572 0.219048 0.209525
+0.171429 0.0952381 0.0666667 0.0666667 0.0952381 0.12381 0.171429 0.200001
+0.219048 0.219048 0.219048 0.114286 0.990476 0.0952381 0.114286 0.200001
+0.228572 0.228572 0.219048 0.209525 0.171429 0.0952381 0.0666667 0.0666667
+0.0952381 0.12381 0.171429 0.200001 0.219048 0.219048 0.219048 0.114286
+0.0571427 0.0952381 0.114286 0.200001 0.228572 0.228572 0.219048 0.209525
+0.171429 0.0952381 0.0666667;
+#X coords 0 1 50 0 25 25 1 0 0;
 #X restore 34 96 graph;
 #X obj 88 24 tgl 15 0 empty \$0-status-now empty 17 7 0 10 -191407
-159808 -1 0 1;
+-159808 -1 1 1;
 #X msg 417 337 0;
 #X obj 629 306 loadbang;
 #X text 415 318 stop!;
@ -322,7 +321,7 @@
 #X obj 563 561 s X1;
 #X obj 620 561 s X2;
 #X msg 563 516 \$1 1000;
-#X obj 281 429 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
+#X obj 281 429 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
 1;
 #X obj 216 490 *~;
 #X msg 281 406 0;
--- a/puredata/radio_yellow.pd
+++ b/puredata/radio_yellow.pd
@ -31,7 +31,6 @@
 #X obj 285 416 sel 1 0;
 #X obj 64 164 bng 15 250 50 0 empty empty listen 17 7 0 10 -191407
 -257985 -1;
-#X obj 16 114 resample 1000;
 #X obj 238 578 max 0;
 #X text 109 114 listening speed;
 #X text 56 93 speed of happenings;
@ -42,12 +41,12 @@
 #X obj 16 451 abs;
 #N canvas 0 50 450 250 (subpatch) 0;
 #X array \$0-stress 100 float 2;
-#X coords 0 3 100 0 200 50 1 0 0;
+#X coords 0 10 100 0 200 50 1 0 0;
 #X restore 295 45 graph;
 #X obj 238 303 loadbang;
 #X text 78 227 condition of state change;
 #X obj 238 346 metro 100;
-#N canvas 1 89 319 212 (subpatch) 0;
+#N canvas 84 89 319 212 (subpatch) 0;
 #X obj 12 54 metro 100;
 #X obj 12 34 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 1
 ;
@ -85,55 +84,56 @@
 #X obj 16 39 r WORLD_ENERGY;
 #X text 378 440 working stress;
 #X text 378 460 resting relax;
-#X msg 304 462 -0.005;
 #X obj 16 210 < 0.8;
 #X obj 16 66 +;
 #X obj 49 66 tgl 15 0 empty ONOFF r:ONOFF 17 7 0 10 -262144 -1 -1 0
 1;
-#X msg 285 439 0.004;
-#X connect 0 0 21 0;
+#X msg 285 439 0.1;
+#X obj 16 114 resample 100;
+#X msg 304 462 -0.05;
+#X connect 0 0 50 0;
 #X connect 1 0 5 0;
-#X connect 1 1 37 0;
+#X connect 1 1 36 0;
 #X connect 2 0 7 0;
 #X connect 3 0 2 1;
 #X connect 4 0 3 0;
 #X connect 5 0 2 0;
-#X connect 7 0 28 0;
+#X connect 7 0 27 0;
 #X connect 8 0 16 0;
-#X connect 9 0 38 0;
+#X connect 9 0 37 0;
 #X connect 11 0 16 1;
-#X connect 12 0 22 0;
+#X connect 12 0 21 0;
 #X connect 13 0 12 0;
-#X connect 13 1 35 0;
-#X connect 14 0 32 0;
+#X connect 13 1 34 0;
+#X connect 14 0 31 0;
 #X connect 15 0 13 0;
 #X connect 16 0 9 0;
 #X connect 16 0 10 0;
 #X connect 17 0 20 0;
-#X connect 17 0 48 0;
+#X connect 17 0 46 0;
 #X connect 18 0 15 0;
-#X connect 18 1 34 0;
-#X connect 19 0 51 0;
-#X connect 19 1 47 0;
-#X connect 21 0 17 0;
-#X connect 22 0 11 0;
-#X connect 22 0 36 0;
-#X connect 28 0 8 0;
-#X connect 30 0 14 0;
-#X connect 32 0 18 0;
-#X connect 34 0 19 0;
-#X connect 35 0 12 1;
-#X connect 37 0 4 0;
-#X connect 37 0 27 0;
-#X connect 39 0 40 0;
-#X connect 40 0 42 0;
-#X connect 41 0 39 0;
-#X connect 42 0 43 0;
-#X connect 44 0 49 0;
-#X connect 47 0 15 0;
-#X connect 48 0 1 0;
-#X connect 49 0 0 0;
-#X connect 50 0 49 1;
+#X connect 18 1 33 0;
+#X connect 19 0 49 0;
+#X connect 19 1 51 0;
+#X connect 21 0 11 0;
+#X connect 21 0 35 0;
+#X connect 27 0 8 0;
+#X connect 29 0 14 0;
+#X connect 31 0 18 0;
+#X connect 33 0 19 0;
+#X connect 34 0 12 1;
+#X connect 36 0 4 0;
+#X connect 36 0 26 0;
+#X connect 38 0 39 0;
+#X connect 39 0 41 0;
+#X connect 40 0 38 0;
+#X connect 41 0 42 0;
+#X connect 43 0 47 0;
+#X connect 46 0 1 0;
+#X connect 47 0 0 0;
+#X connect 48 0 47 1;
+#X connect 49 0 15 0;
+#X connect 50 0 17 0;
 #X connect 51 0 15 0;
 #X restore 274 58 pd world and me;
 #N canvas 642 25 443 747 expressions 0;
@ -264,16 +264,18 @@
 #X connect 25 0 11 0;
 #X restore 48 225 pd expressions;
 #N canvas 0 23 450 278 (subpatch) 0;
-#X array yellowA 30 float 3;
-#A 0 0.885716 0.800003 0.685719 0.619054 -0.0190476 -0.0190476 -0.0190476
-0.92381 0.914286 0.857145 0.800003 0.733337 0.685719 -0.0285714 -0.0285714
-0.0285714 0.904762 0.866668 0.809526 0.771431 0.71429 0.666672 0.666672
-0.0285714 -0.0285714 -0.0285714 0.914287 0.866669 0.771432 0.733338
-;
-#X coords 0 1 30 0 25 25 1 0 0;
+#X array yellowA 50 float 3;
+#A 0 0.0380987 0.0380987 0.0380987 0.0476224 0.0571462 0.0571462 0.0666699
+0.0761937 0.0952412 0.104765 0.123813 0.133337 0.161908 0.171432 0.200003
+0.238098 0.26667 0.304765 0.34286 0.371431 0.409526 0.523809 0.590475
+0.70476 0.809524 0.885714 0.666667 0.609525 0.552382 0.485716 0.428574
+0.390479 0.34286 0.314289 0.276194 0.26667 0.228575 0.209527 0.180956
+0.161909 0.152385 0.133337 0.123814 0.11429 0.11429 0.104766 0.0952425
+0.076195 0.076195 0.0761944;
+#X coords 0 1 50 0 25 25 1 0 0;
 #X restore 35 47 graph;
 #X obj 23 138 hradio 15 1 0 4 empty \$0-word empty 0 -8 0 10 -257985
-128992 -1 2;
+-128992 -1 0;
 #X obj 88 7 bng 15 250 50 0 empty empty empty 17 7 0 10 -257985 -1
 -1;
 #X obj 164 21 r YELLOW;
@ -306,12 +308,15 @@
 #X msg 579 329 yellowB;
 #X obj 231 451 s YELLOW_DONE;
 #N canvas 0 23 450 278 (subpatch) 0;
-#X array yellowB 30 float 3;
-#A 0 0.742857 0.580951 0.466664 0.352378 0.276187 0.223806 0.885714
-0.552379 0.409521 0.352378 0.257139 0.20952 0.123805 0.0857093 0.914286
-0.599998 0.523807 0.447616 0.390473 0.323806 0.257139 0.20952 0.133329
-0.971429 0.723808 0.647618 0.561903 0.485712 0.371425 0.323806;
-#X coords 0 1 30 0 25 25 1 0 0;
+#X array yellowB 50 float 3;
+#A 0 0.0380952 0.0380952 0.0380952 0.047619 0.047619 0.0571427 0.0761902
+0.0952377 0.0952377 0.114285 0.142856 0.161904 0.180951 0.219046 0.247618
+0.266665 0.276189 0.30476 0.333331 0.371426 0.419045 0.476188 0.542854
+0.67619 0.761905 0.638095 0.542857 0.447616 0.409521 0.352379 0.333331
+0.30476 0.266665 0.247618 0.199999 0.180951 0.161904 0.133333 0.114285
+0.104761 0.085714 0.0761902 0.0666665 0.0666665 0.0571427 0.047619
+0.047619 0.047619 0.0380952 0.0190477;
+#X coords 0 1 50 0 25 25 1 0 0;
 #X restore 35 93 graph;
 #X obj 430 85 loadbang;
 #X obj 430 128 metro 2000;
--- a/puredata/radio_yellowhose.pd
+++ b/puredata/radio_yellowhose.pd
@ -1,4 +1,4 @@
-#N canvas 86 90 829 496 10;
+#N canvas 451 25 829 496 10;
 #X obj 283 80 bng 15 250 50 0 empty empty motivated! 17 7 0 10 -262144
 -1 -1;
 #X msg 164 44 1;
@ -29,7 +29,6 @@
 #X obj 285 416 sel 1 0;
 #X obj 64 164 bng 15 250 50 0 empty empty listen 17 7 0 10 -191407
 -257985 -1;
-#X obj 16 114 resample 1000;
 #X obj 238 578 max 0;
 #X text 109 114 listening speed;
 #X text 56 93 speed of happenings;
@ -40,7 +39,7 @@
 #X obj 16 451 abs;
 #N canvas 0 50 450 250 (subpatch) 0;
 #X array \$0-stress 100 float 2;
-#X coords 0 3 100 0 200 50 1 0 0;
+#X coords 0 10 100 0 200 50 1 0 0;
 #X restore 295 45 graph;
 #X obj 238 303 loadbang;
 #X text 78 227 condition of state change;
@ -83,56 +82,57 @@
 #X obj 16 39 r WORLD_ENERGY;
 #X text 378 440 working stress;
 #X text 378 460 resting relax;
-#X msg 304 462 -0.005;
-#X obj 16 210 < 0.6;
 #X obj 16 66 +;
 #X obj 49 66 tgl 15 0 empty ONOFF r:ONOFF 17 7 0 10 -262144 -1 -1 0
 1;
-#X msg 285 439 0.07;
-#X connect 0 0 21 0;
+#X obj 16 114 resample 100;
+#X msg 304 462 -0.05;
+#X msg 285 439 0.15;
+#X obj 16 210 < 0.73;
+#X connect 0 0 48 0;
 #X connect 1 0 5 0;
-#X connect 1 1 37 0;
+#X connect 1 1 36 0;
 #X connect 2 0 7 0;
 #X connect 3 0 2 1;
 #X connect 4 0 3 0;
 #X connect 5 0 2 0;
-#X connect 7 0 28 0;
+#X connect 7 0 27 0;
 #X connect 8 0 16 0;
-#X connect 9 0 38 0;
+#X connect 9 0 37 0;
 #X connect 11 0 16 1;
-#X connect 12 0 22 0;
+#X connect 12 0 21 0;
 #X connect 13 0 12 0;
-#X connect 13 1 35 0;
-#X connect 14 0 32 0;
+#X connect 13 1 34 0;
+#X connect 14 0 31 0;
 #X connect 15 0 13 0;
 #X connect 16 0 9 0;
 #X connect 16 0 10 0;
 #X connect 17 0 20 0;
-#X connect 17 0 48 0;
+#X connect 17 0 51 0;
 #X connect 18 0 15 0;
-#X connect 18 1 34 0;
-#X connect 19 0 51 0;
-#X connect 19 1 47 0;
-#X connect 21 0 17 0;
-#X connect 22 0 11 0;
-#X connect 22 0 36 0;
-#X connect 28 0 8 0;
-#X connect 30 0 14 0;
-#X connect 32 0 18 0;
-#X connect 34 0 19 0;
-#X connect 35 0 12 1;
-#X connect 37 0 4 0;
-#X connect 37 0 27 0;
-#X connect 39 0 40 0;
-#X connect 40 0 42 0;
-#X connect 41 0 39 0;
-#X connect 42 0 43 0;
-#X connect 44 0 49 0;
-#X connect 47 0 15 0;
-#X connect 48 0 1 0;
-#X connect 49 0 0 0;
-#X connect 50 0 49 1;
-#X connect 51 0 15 0;
+#X connect 18 1 33 0;
+#X connect 19 0 50 0;
+#X connect 19 1 49 0;
+#X connect 21 0 11 0;
+#X connect 21 0 35 0;
+#X connect 27 0 8 0;
+#X connect 29 0 14 0;
+#X connect 31 0 18 0;
+#X connect 33 0 19 0;
+#X connect 34 0 12 1;
+#X connect 36 0 4 0;
+#X connect 36 0 26 0;
+#X connect 38 0 39 0;
+#X connect 39 0 41 0;
+#X connect 40 0 38 0;
+#X connect 41 0 42 0;
+#X connect 43 0 46 0;
+#X connect 46 0 0 0;
+#X connect 47 0 46 1;
+#X connect 48 0 17 0;
+#X connect 49 0 15 0;
+#X connect 50 0 15 0;
+#X connect 51 0 1 0;
 #X restore 283 57 pd world and me;
 #N canvas 84 145 1159 537 expressions 0;
 #N canvas 0 23 450 278 (subpatch) 0;
--- a/puredata/values_stress.lst
+++ b/puredata/values_stress.lst
@ -0,0 +1,15 @@
+yellowA/B - 0.8     /// yellowA/B - 0.1
+bongbong - 0.77     /// bongbong - 0.1
+rounder - 0.75      /// rounder - 0.1
+yhoseA/B - 0.73     /// yhoseA/B - 0.15
+flasherA/B - 0.7    /// flasherA/B - 0.18
+frog - 0.68         /// frog - 0.2
+drummerA/B - 0.67   /// drummerA/B - 0.1
+copper - 0.65       /// copper - 0.1
+suitcaseA/B - 0.63  /// suitcaseA/B - 0.1
+drawer - 0.6        /// drawer - 0.2
+tissueA/B - 0.57    /// tissueA/B - 0.1
+tankerS - 0.56      /// tankerS - 0.1
+alumiA - 0.54       /// alumiA - 0.37
+alumiB - 0.52       /// alumiB - 0.4
+tankerH - 0.5       /// tankerH - 0.3
--- a/puredata/values_we_triggering.lst
+++ b/puredata/values_we_triggering.lst
@ -0,0 +1,15 @@
+bongbong - 0.7
+alumiA - 0.5
+alumiB - 0.49
+frog - 0.6
+tankerH - 0.418
+tankerS - 0.425
+flasherA/B - 0.5
+yhoseA/B - 0.6
+drummerA/B - 0.5
+copper - 0.512
+drawer - 0.523
+yellowA/B - 0.8
+rounder - 0.7
+suitcaseA/B - 0.431
+tissueA/B - 0.4