upd / E_SEQ -> STRESS change <= disable.

2021-04-07 02:27:13 +09:00 · 2021-04-07 02:27:13 +09:00 · c03bb408be
commit c03bb408be
parent 1201a8fbc5
16 changed files with 466 additions and 476 deletions
--- a/puredata/piano_access_radio_roomB.pd
+++ b/puredata/piano_access_radio_roomB.pd
@ -1,4 +1,4 @@
-#N canvas 85 25 623 470 10;
+#N canvas 2 95 623 470 10;
 #X obj 328 198 spigot;
 #X obj 377 183 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
 1;
@ -297,17 +297,17 @@
 #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 479 25 801 747 crickets 1;
+#N canvas 637 95 801 747 crickets 0;
 #X obj 45 28 cnv 15 700 700 empty empty empty 20 12 0 14 -233017 -66577
 0;
-#N canvas 84 25 1196 747 (subpatch) 0;
+#N canvas 95 95 1196 747 (subpatch) 0;
 #X obj 74 266 r BONGBONG_DONE;
 #X obj 24 243 r BONGBONG;
 #N canvas 0 50 450 250 (subpatch) 0;
 #X array world_energy 20 float 3;
-#A 0 0.199924 0.199924 6.80975e-25 3.64624e-17 1.90075e-06 0.349867
+#A 0 1.00132e-14 8.22265e-09 8.76653e-16 0 6.58564e-08 1.40888e-07
-0.0298388 2.21714e-31 0 2.5421e-20 1.10831e-25 1.52967e-14 0.299886
+3.79563e-15 0 7.64929e-06 1.1023e-06 1.87028e-24 5.01252e-13 8.60995e-21
-5.79454e-05 5.85118e-23 0 0 0 0 0;
+0.199924 1.41227e-10 0 0 0 0 0;
 #X coords 0 1 20 0 200 50 1 0 0;
 #X restore 15 36 graph;
 #X msg 24 452 \; world_energy \$2 \$1;
@ -533,8 +533,8 @@
 #X msg 1247 681 13;
 #N canvas 0 50 450 250 (subpatch) 0;
 #X array we_sequence 20 float 3;
-#A 0 1.22 1.3 1.24 1.16 1 0.9 0.86 0.9 0.92 1.06 1.34 1.24 0.66 0.62
+#A 0 1.22 1.3 1.24 1.16 1 0.9 0.84 0.9 0.92 1.06 1.34 1.24 0.66 0.62
-1.06 0.94 0.94 1.06 1.14 1.18;
+1.06 0.94 0.94 1.06 1.14 0.28;
 #X coords 0 2 20 0 200 100 1 0 0;
 #X restore 794 36 graph;
 #X obj 1065 75 f;
@ -553,7 +553,7 @@
 #X obj 1065 188 s E_SEQ;
 #X msg 1167 66 \; we_sequence const 1;
 #X obj 794 136 hradio 10 1 0 20 empty empty empty 0 -8 0 10 -257985
-4160 -1 12;
+-4160 -1 0;
 #X obj 204 406 * 0.2;
 #X obj 384 406 * 0.25;
 #X obj 1104 406 * 0.1;
@ -1236,7 +1236,7 @@ pollintervall 1 \, verbose 1;
 -1 0 1;
 #X msg 221 310 1;
 #X obj 231 194 tgl 15 0 empty empty connected? 17 7 0 10 -262144 -1
-1 1 1;
+-1 0 1;
 #X connect 0 0 18 0;
 #X connect 1 0 0 1;
 #X connect 4 0 16 0;
--- a/puredata/radio_alumi_A.pd
+++ b/puredata/radio_alumi_A.pd
@ -1,4 +1,4 @@
-#N canvas 85 25 399 491 10;
+#N canvas 301 95 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 187 25 533 644 world 0;
+#N canvas 502 95 533 644 world 1;
 #X floatatom 16 94 5 0 0 0 - - -;
 #X obj 16 293 t a b;
 #X obj 16 372 spigot;
@ -46,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 10 100 0 200 50 1 0 0;
+#X coords 0 100 100 0 200 150 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 84 89 319 212 (subpatch) 0;
+#N canvas 84 95 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
 ;
@ -74,18 +74,18 @@
 #X connect 6 0 1 0;
 #X connect 7 0 2 0;
 #X connect 9 0 7 0;
-#X restore 473 100 pd;
+#X restore 473 200 pd;
 #X obj 285 393 v \$0-STATE;
 #X obj 265 525 v \$0-STRESS;
 #X obj 238 601 v \$0-STRESS;
 #X obj 67 311 v \$0-STATE;
 #X obj 16 597 outlet;
-#X obj 373 235 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+#X obj 373 225 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
 1;
-#X obj 373 255 metro 50;
+#X obj 373 245 metro 50;
-#X obj 373 212 loadbang;
+#X obj 373 202 loadbang;
-#X obj 373 278 v \$0-STATE;
+#X obj 373 268 v \$0-STATE;
-#X obj 373 301 s \$0-status-now;
+#X obj 373 291 s \$0-status-now;
 #X obj 16 39 r WORLD_ENERGY;
 #X text 378 440 working stress;
 #X text 378 460 resting relax;
@ -223,13 +223,14 @@
 #X restore 48 226 pd expressions;
 #N canvas 0 23 450 278 (subpatch) 0;
 #X array alumiA 50 float 3;
-#A 0 0.219048 0.247619 0.27619 0.314285 0.35238 0.42857 0.847619 0.00952387
+#A 0 0.761905 0.638095 0.580952 0.485714 0.390476 0.32381 0.266668
-0.00952387 0.00952375 0.209523 0.295238 0.361903 0.390474 0.504762
+0.180954 0.0380977 -1.19209e-07 -0.00952399 -0.00952399 -0.00952399
-0.876188 0.0190476 0.0190476 0.0190476 0.152383 0.276192 0.333334 0.466667
+-0.00952399 0.828571 0.647619 0.542857 0.457143 0.371429 0.304762 0.228572
-0.828571 0.0285713 0.0285713 0.0285713 0.266667 0.314285 0.419048 0.476188
+0.123811 0.0190499 0.0190476 0.0190476 0.0190476 0.0190476 0.0190476
-0.704762 0.0285714 0.0285714 0.0190476 0.266666 0.342856 0.485714 0.514285
+0.723809 0.647619 0.552382 0.466668 0.295239 0.219049 0.123811 0.0571451
-0.714286 0.0190475 0.266666 0.323809 0.457141 0.714286 0.152381 0.2
+0.0190476 0.00952381 0.00952381 0.704762 0.628572 0.485714 0.352381
-0.238096 0.333334 0.390478;
+0.295239 0.133335 0.0761926 0.0190476 0.0190476 0.0190476 -8.34465e-07
 ;
 #X coords 0 1 50 0 50 50 1 0 0;
 #X restore 29 46 graph;
 #X obj 88 429 s NOTE;
@ -243,14 +244,13 @@
 #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 1;
+-203904 -1 0;
 #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
 -1 -1 0 1;
 #X msg 249 329 alumiA;
 #X obj 231 452 s ALUMI_A_DONE;
 #X obj 250 71 loadbang;
 #X obj 250 114 metro 2000;
 #X obj 250 94 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
 -1;
@ -259,7 +259,8 @@
 #X obj 250 160 *;
 #X obj 250 183 v \$0-STRESS;
 #X obj 88 306 riff1 900 3202 500;
-#X connect 0 0 32 0;
+#X obj 250 61 loadbang;
 #X connect 0 0 31 0;
 #X connect 1 0 23 0;
 #X connect 2 0 5 0;
 #X connect 2 0 24 0;
@ -267,7 +268,7 @@
 #X connect 5 0 6 0;
 #X connect 7 0 8 0;
 #X connect 9 0 4 0;
-#X connect 10 0 32 0;
+#X connect 10 0 31 0;
 #X connect 13 0 12 0;
 #X connect 14 0 13 1;
 #X connect 15 0 14 0;
@ -275,13 +276,12 @@
 #X connect 17 0 7 0;
 #X connect 17 0 21 0;
 #X connect 18 0 10 0;
-#X connect 23 0 32 1;
+#X connect 23 0 31 1;
-#X connect 25 0 27 0;
+#X connect 25 0 28 0;
-#X connect 26 0 29 0;
+#X connect 26 0 25 0;
-#X connect 27 0 26 0;
+#X connect 27 0 29 1;
-#X connect 28 0 30 1;
+#X connect 28 0 29 0;
 #X connect 29 0 30 0;
-#X connect 30 0 31 0;
+#X connect 31 0 13 0;
-#X connect 32 0 13 0;
+#X connect 31 3 2 0;
 #X connect 32 3 2 0;
 #X coords 0 -1 1 1 100 150 2 5 5;
--- a/puredata/radio_alumi_B.pd
+++ b/puredata/radio_alumi_B.pd
@ -1,4 +1,4 @@
-#N canvas 692 72 419 510 10;
+#N canvas 692 95 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
@ -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 747 95 533 644 world 1;
 #X floatatom 16 94 5 0 0 0 - - -;
 #X obj 16 293 t a b;
 #X obj 16 372 spigot;
@ -46,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 10 100 0 200 50 1 0 0;
+#X coords 0 100 100 0 200 150 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 2 95 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
 ;
@ -74,7 +74,7 @@
 #X connect 6 0 1 0;
 #X connect 7 0 2 0;
 #X connect 9 0 7 0;
-#X restore 473 100 pd;
+#X restore 473 200 pd;
 #X obj 285 393 v \$0-STATE;
 #X obj 265 525 v \$0-STRESS;
 #X obj 238 601 v \$0-STRESS;
@ -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.542857 0.619047 0.657142 0.666666 0.619047 0.552381 0.514286
+#A 0 0.142857 0.180952 0.195238 0.238095 0.304763 0.352381 0.409524
-0.428571 0.323811 0.228572 -0.00952399 -0.00952399 -0.00952399 -0.00952399
+0.809524 0.0190477 0.0285714 0.161905 0.209524 0.295239 0.380953 0.885714
-0.00952399 0.514286 0.6 0.619047 0.14 0.552381 0.447618 0.380951 0.314285
+0.0285714 0.0285714 0.0285714 0.209524 0.219048 0.304762 0.723809 0.133333
-0.247619 0.0190476 0.0190476 0.0190476 0.0190476 0.0190476 0.571428
+0.161905 0.195238 0.228572 0.238096 0.371428 0.961905 0.00952375 0.00952375
-0.628571 0.571428 0.504762 0.428572 0.352382 0.285714 0.00952381 0.0285713
+0.00952375 0.238096 0.2 0.32381 0.409524 0.828571 0.0285714 0.0285714
-0.0190476 0.638095 0.657142 0.619047 0.514286 0.476191 0.419049 0.333335
+0.0190476 0.190476 0.257143 0.342858 0.685714 0.0380952 0.0285715 0.0190476
-0.00952387 0.00952387 0.00952387 0.00952387;
+0.238096 0.380953 0.533333;
 #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 3;
+-203904 -1 0;
 #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
@ -249,7 +249,6 @@
 #X obj 167 269 s ALUMI_B;
 #X msg 249 329 alumiB;
 #X obj 231 452 s ALUMI_B_DONE;
 #X obj 271 72 loadbang;
 #X obj 271 115 metro 2000;
 #X obj 271 95 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
 -1;
@ -258,7 +257,8 @@
 #X obj 271 161 *;
 #X obj 271 184 v \$0-STRESS;
 #X obj 88 306 riff1 900 3205 500;
-#X connect 0 0 32 0;
+#X obj 271 62 loadbang;
 #X connect 0 0 31 0;
 #X connect 1 0 23 0;
 #X connect 2 0 5 0;
 #X connect 2 0 24 0;
@ -266,7 +266,7 @@
 #X connect 5 0 6 0;
 #X connect 7 0 8 0;
 #X connect 9 0 4 0;
-#X connect 10 0 32 0;
+#X connect 10 0 31 0;
 #X connect 13 0 12 0;
 #X connect 14 0 13 1;
 #X connect 15 0 14 0;
@ -274,13 +274,12 @@
 #X connect 20 0 10 0;
 #X connect 21 0 7 0;
 #X connect 21 0 18 0;
-#X connect 23 0 32 1;
+#X connect 23 0 31 1;
-#X connect 25 0 27 0;
+#X connect 25 0 28 0;
-#X connect 26 0 29 0;
+#X connect 26 0 25 0;
-#X connect 27 0 26 0;
+#X connect 27 0 29 1;
-#X connect 28 0 30 1;
+#X connect 28 0 29 0;
 #X connect 29 0 30 0;
-#X connect 30 0 31 0;
+#X connect 31 0 13 0;
-#X connect 32 0 13 0;
+#X connect 31 3 2 0;
 #X connect 32 3 2 0;
 #X coords 0 -1 1 1 100 150 2 5 5;
--- a/puredata/radio_bongbong.pd
+++ b/puredata/radio_bongbong.pd
@ -1,4 +1,4 @@
-#N canvas 194 25 496 559 10;
+#N canvas 194 95 496 559 10;
 #X msg 37 337 0;
 #X obj 249 306 loadbang;
 #X obj 326 469 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
@ -7,36 +7,36 @@
 #X obj 164 21 r BONGBONG;
 #N canvas 0 50 450 250 (subpatch) 0;
 #X array bongbong 10 float 3;
-#A 0 -0.771422 -0.390472 -0.390472 0.0761905 -0.399996 -0.504758 -0.476186
+#A 0 1.01905 1.03809 1.05714 0.990476 0.952381 0.933334 0.904762 0.819048
-0.457139 -0.438091 -0.48571;
+0.838095 0.857143;
 #X coords 0 1 10 0 50 50 1 0 0;
 #X restore 30 32 graph;
 #X obj 88 8 bng 15 250 50 0 empty empty empty 17 7 0 10 -261682 -1
 -1;
 #X obj 25 85 hradio 15 1 0 4 empty \$0-word empty 0 -8 0 10 -261682
-4034 -1 2;
+-4034 -1 0;
 #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 0 1;
+-1 -1 3 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 obj 164 67 v \$0-STATE;
-#N canvas 557 89 533 644 world 0;
+#N canvas 241 187 533 644 world 1;
 #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 +;
@ -54,17 +54,17 @@
 #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 3
 1;
 #X obj 16 451 abs;
 #N canvas 0 50 450 250 (subpatch) 0;
 #X array \$0-stress 100 float 2;
-#X coords 0 10 100 0 200 50 1 0 0;
+#X coords 0 100 100 0 200 150 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 84 89 319 212 (subpatch) 0;
+#N canvas 84 95 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
 ;
@ -87,7 +87,7 @@
 #X connect 6 0 1 0;
 #X connect 7 0 2 0;
 #X connect 9 0 7 0;
-#X restore 473 100 pd;
+#X restore 473 200 pd;
 #X obj 285 393 v \$0-STATE;
 #X obj 265 525 v \$0-STRESS;
 #X obj 238 601 v \$0-STRESS;
@ -112,7 +112,6 @@
 #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 35 0;
@ -137,7 +136,6 @@
 #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;
@ -273,7 +271,6 @@
 #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 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;
@ -299,14 +296,15 @@
 #X text 213 44 <--- how many words per sentence?;
 #X msg 164 44 6;
 #X obj 364 471 del 1000;
 #X obj 313 88 loadbang;
 #X connect 0 0 9 0;
 #X connect 1 0 3 0;
 #X connect 2 0 17 0;
 #X connect 3 0 9 1;
 #X connect 4 0 6 0;
-#X connect 4 0 42 0;
+#X connect 4 0 41 0;
 #X connect 9 0 19 0;
-#X connect 9 3 32 0;
+#X connect 9 3 31 0;
 #X connect 11 0 12 0;
 #X connect 13 0 16 0;
 #X connect 15 0 11 0;
@ -314,24 +312,23 @@
 #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 22 0 25 0;
-#X connect 23 0 26 0;
+#X connect 23 0 22 0;
-#X connect 24 0 23 0;
+#X connect 24 0 26 1;
-#X connect 25 0 27 1;
+#X connect 25 0 26 0;
 #X connect 26 0 27 0;
-#X connect 27 0 28 0;
+#X connect 28 0 32 0;
-#X connect 29 0 33 0;
+#X connect 29 0 30 0;
-#X connect 30 0 31 0;
+#X connect 30 0 2 0;
-#X connect 31 0 2 0;
+#X connect 30 1 42 0;
-#X connect 31 1 43 0;
+#X connect 31 0 28 0;
-#X connect 32 0 29 0;
+#X connect 32 0 34 0;
-#X connect 33 0 35 0;
+#X connect 33 0 29 0;
-#X connect 34 0 30 0;
+#X connect 33 0 38 0;
-#X connect 34 0 39 0;
+#X connect 34 0 33 0;
-#X connect 35 0 34 0;
+#X connect 34 1 33 0;
-#X connect 35 1 34 0;
+#X connect 35 0 36 0;
-#X connect 36 0 37 0;
+#X connect 37 0 16 0;
-#X connect 38 0 16 0;
+#X connect 41 0 14 0;
-#X connect 42 0 14 0;
+#X connect 42 0 39 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 485 25 461 502 10;
+#N canvas 485 95 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 651 67 533 644 world 0;
+#N canvas 651 95 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
-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 +;
@ -41,12 +41,12 @@
 #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 10 100 0 200 50 1 0 0;
+#X coords 0 100 100 0 200 150 1 0 0;
 #X restore 295 45 graph;
 #X obj 238 303 loadbang;
 #X text 78 227 condition of state change;
@ -74,7 +74,7 @@
 #X connect 6 0 1 0;
 #X connect 7 0 2 0;
 #X connect 9 0 7 0;
-#X restore 473 100 pd;
+#X restore 473 200 pd;
 #X obj 285 393 v \$0-STATE;
 #X obj 265 525 v \$0-STRESS;
 #X obj 238 601 v \$0-STRESS;
@ -221,22 +221,19 @@
 #X connect 19 0 7 0;
 #X restore 48 226 pd expressions;
 #N canvas 0 23 450 278 (subpatch) 0;
-#X array copper 50 float 3;
+#X array copper 25 float 3;
-#A 0 0.161905 0.171429 0.190476 0.209524 0.24762 0.323809 0.361904
+#A 0 0.314285 0.314285 0.314285 0.00952381 0.00952387 0.00952387 0.314286
-0.390476 0.428571 0.438094 0.419047 0.371428 0.333333 0.257144 0.190476
+0.314285 0.304762 0.0190476 0.0190476 0.0190476 0.314286 0.314286 0.314286
-0.161905 0.133333 0.12381 0.12381 0.133333 0.190476 0.2 0.266667 0.352381
+0.304762 0.0190476 0.0190476 0.0190476 0.314285 0.314285 0.323809 0.323809
-0.390476 0.419045 0.409522 0.371429 0.333334 0.266667 0.219049 0.228571
+0.0190476 0.0190476;
-0.161905 0.133334 0.142857 0.152381 0.209525 0.238096 0.333331 0.4
+#X coords 0 1 25 0 50 50 1 0 0;
 0.419047 0.419047 0.380952 0.314286 0.266667 0.238096 0.209525 0.200001
 0.190477 0.190477;
 #X coords 0 1 50 0 50 50 1 0 0;
 #X restore 29 76 graph;
 #X obj 24 138 hradio 15 1 0 4 empty \$0-word empty 0 -8 0 10 -83269
-262144 -1 0;
+-262144 -1 3;
 #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 1 1;
+-1 0 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
@ -249,7 +246,6 @@
 #X msg 349 326 copper;
 #X obj 369 349 bng 15 250 50 0 empty \$0-reload r:reload 17 7 0 10
 -262144 -1 -1;
 #X obj 302 69 loadbang;
 #X obj 302 112 metro 2000;
 #X obj 302 92 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
 -1;
@ -258,7 +254,8 @@
 #X obj 302 158 *;
 #X obj 302 181 v \$0-STRESS;
 #X obj 88 306 riff1_random 900 3204 1000 1300;
-#X connect 0 0 32 0;
+#X obj 302 59 loadbang;
 #X connect 0 0 31 0;
 #X connect 1 0 23 0;
 #X connect 2 0 5 0;
 #X connect 2 0 22 0;
@ -266,21 +263,20 @@
 #X connect 5 0 6 0;
 #X connect 7 0 8 0;
 #X connect 9 0 4 0;
-#X connect 10 0 32 0;
+#X connect 10 0 31 0;
 #X connect 16 0 15 0;
 #X connect 17 0 16 1;
 #X connect 18 0 17 0;
 #X connect 19 0 7 0;
 #X connect 19 0 13 0;
 #X connect 21 0 10 0;
-#X connect 23 0 32 1;
+#X connect 23 0 31 1;
 #X connect 24 0 23 0;
-#X connect 25 0 27 0;
+#X connect 25 0 28 0;
-#X connect 26 0 29 0;
+#X connect 26 0 25 0;
-#X connect 27 0 26 0;
+#X connect 27 0 29 1;
-#X connect 28 0 30 1;
+#X connect 28 0 29 0;
 #X connect 29 0 30 0;
-#X connect 30 0 31 0;
+#X connect 31 0 16 0;
-#X connect 32 0 16 0;
+#X connect 31 3 2 0;
 #X connect 32 3 2 0;
 #X coords 0 -1 1 1 100 150 2 5 5;
--- a/puredata/radio_drawer.pd
+++ b/puredata/radio_drawer.pd
@ -1,4 +1,4 @@
-#N canvas 655 55 432 493 10;
+#N canvas 655 95 432 493 10;
 #X msg 37 337 0;
 #X obj 319 300 loadbang;
 #X obj 295 406 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
@ -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 0;
+#N canvas 747 95 533 644 world 0;
 #X floatatom 16 94 5 0 0 0 - - -;
 #X obj 16 293 t a b;
 #X obj 16 372 spigot;
@ -46,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 10 100 0 200 50 1 0 0;
+#X coords 0 100 100 0 200 150 1 0 0;
 #X restore 295 45 graph;
 #X obj 238 303 loadbang;
 #X text 78 227 condition of state change;
@ -74,7 +74,7 @@
 #X connect 6 0 1 0;
 #X connect 7 0 2 0;
 #X connect 9 0 7 0;
-#X restore 473 100 pd;
+#X restore 473 200 pd;
 #X obj 285 393 v \$0-STATE;
 #X obj 265 525 v \$0-STRESS;
 #X obj 238 601 v \$0-STRESS;
@ -213,16 +213,16 @@
 #X restore 48 226 pd expressions;
 #N canvas 0 23 450 278 (subpatch) 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
+#A 0 0.380952 0.00952381 0.361905 -5.96046e-08 0.361905 -5.96046e-08
-0.180952 0.180952 0.171428 0.171428 0.161904 0.161904 0.152381 0.142857
+0.342857 0.8 0.352381 0 0.361905 0 0.371429 0 0.361905 -4.76837e-07
-0.142857 0.133333 0.133333 0.123809 0.123809 0.114285 0.114285 0.104761
+0.361905 0 -4.76837e-07 0.742857 -4.76837e-07 -4.76837e-07 -4.76837e-07
-0.104761 0.0952374 0.0857135 0.0761896 0.0761896 0.0761896 0.0761896
+-0.00952435 -4.76837e-07 0 0 0 0 0.285714 0.00952381 0.27619 0.819048
-0.0761896 0.0666658 0.0666658 0.0666658 0.0666658 0.0571419 0.047618
+-3.57628e-06 -3.57628e-06 -3.57628e-06 -3.57628e-06 -3.57628e-06 0.00952029
-0.047618 0.0380942;
+0.00952029;
 #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 0;
+-4160 -1 1;
 #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;
@ -239,7 +239,6 @@
 #X obj 7 397 loadbang;
 #X obj 339 346 bng 15 250 50 0 empty \$0-reload r:reload 17 7 0 10
 -262144 -1 -1;
 #X obj 280 55 loadbang;
 #X obj 280 98 metro 2000;
 #X obj 280 78 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
 -1;
@ -248,7 +247,8 @@
 #X obj 280 144 *;
 #X obj 280 167 v \$0-STRESS;
 #X obj 89 307 riff1_random 700 4403 700 1000;
-#X connect 0 0 32 0;
+#X obj 280 45 loadbang;
 #X connect 0 0 31 0;
 #X connect 1 0 19 0;
 #X connect 2 0 5 0;
 #X connect 2 0 17 0;
@ -256,21 +256,20 @@
 #X connect 5 0 6 0;
 #X connect 7 0 8 0;
 #X connect 9 0 4 0;
-#X connect 10 0 32 0;
+#X connect 10 0 31 0;
 #X connect 14 0 7 0;
 #X connect 14 0 13 0;
 #X connect 15 0 10 0;
-#X connect 19 0 32 1;
+#X connect 19 0 31 1;
 #X connect 21 0 20 0;
 #X connect 22 0 21 1;
 #X connect 23 0 22 0;
 #X connect 24 0 19 0;
-#X connect 25 0 27 0;
+#X connect 25 0 28 0;
-#X connect 26 0 29 0;
+#X connect 26 0 25 0;
-#X connect 27 0 26 0;
+#X connect 27 0 29 1;
-#X connect 28 0 30 1;
+#X connect 28 0 29 0;
 #X connect 29 0 30 0;
-#X connect 30 0 31 0;
+#X connect 31 0 21 0;
-#X connect 32 0 21 0;
+#X connect 31 3 2 0;
 #X connect 32 3 2 0;
 #X coords 0 -1 1 1 100 150 2 5 5;
--- a/puredata/radio_drummer.pd
+++ b/puredata/radio_drummer.pd
@ -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 0;
+#N canvas 747 95 533 644 world 0;
 #X floatatom 16 94 5 0 0 0 - - -;
 #X obj 16 293 t a b;
 #X obj 16 372 spigot;
@ -46,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 10 100 0 200 50 1 0 0;
+#X coords 0 100 100 0 200 150 1 0 0;
 #X restore 295 45 graph;
 #X obj 238 303 loadbang;
 #X text 78 227 condition of state change;
@ -74,7 +74,7 @@
 #X connect 6 0 1 0;
 #X connect 7 0 2 0;
 #X connect 9 0 7 0;
-#X restore 473 100 pd;
+#X restore 473 200 pd;
 #X obj 285 393 v \$0-STATE;
 #X obj 265 525 v \$0-STRESS;
 #X obj 238 601 v \$0-STRESS;
@ -255,15 +255,14 @@
 #X restore 48 226 pd expressions;
 #N canvas 0 23 450 278 (subpatch) 0;
 #X array drummerA 30 float 3;
-#A 0 0.628571 0.00952381 0.00952381 0.00952381 0.733333 0.00952381
+#A 0 0.180952 0.161905 0.161905 0.161905 0.161905 0.161905 0.161905
-0.00952381 -0.00952381 -0.00952381 -0.00952381 -0.00952381 -0.00952381
+0.161905 0.161905 0.161905 0.161905 0.161905 0.161905 0.161905 0.152381
-0.00952381 0.647619 -0.00952381 -0.00952381 -0.00952381 0 0.761905
+0.152381 0.152381 0.152381 0.152381 0.152381 0.152381 0.152381 0.152381
-0.00634921 -0.0031746 0 0.0031746 0.438095 0.00952381 0.00952381 0.00952381
+0.152381 0.152381 0.152381 0.152381 0.152381 0.152381 0.152381;
 0.00952381 0.723809 0.00952381;
 #X coords 0 1 30 0 25 25 1 0 0;
 #X restore 29 50 graph;
 #X obj 21 138 hradio 15 1 0 4 empty \$0-word empty 0 -8 0 10 -203904
-260097 -1 1;
+-260097 -1 3;
 #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
@ -277,9 +276,10 @@
 #X obj 275 78 s DRUMMER;
 #N canvas 0 23 450 278 (subpatch) 0;
 #X array drummerB 30 float 3;
-#A 0 0.52381 0.342857 -0.00952381 -0.00952381 0 0 0 0.00952381 0.838095
+#A 0 1.78814e-07 1.78814e-07 0.628571 0.00952393 0.00952393 0.00952393
-0.419048 0 0 0 0.561905 0.361905 0 0 0 0 0 0 0.733333 0.333333 0 0
+0.00952393 1.78814e-07 1.78814e-07 1.78814e-07 0.67619 0.00952375 0.00952375
-0 0.47619 0.295238 0.00952381 0.00952381;
+0.00952375 0.00952375 0 0 0 0 0.638095 0 0 0 0 0 0.638095 -0.00952357
 -0.00952357 -0.00952357 -0.00952357;
 #X coords 0 1 30 0 25 25 1 0 0;
 #X restore 29 100 graph;
 #X msg 316 329 drummerA;
@ -294,14 +294,13 @@
 -262144 -1 -1;
 #X msg 726 329 drummerB;
 #X obj 88 466 s NOTE;
-#X obj 221 428 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
+#X obj 221 428 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
 1;
 #X obj 88 443 spigot;
 #X obj 498 466 s NOTE;
-#X obj 631 428 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
+#X obj 631 428 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
 1;
 #X obj 498 443 spigot;
 #X obj 637 63 loadbang;
 #X obj 637 106 metro 2000;
 #X obj 637 86 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
 -1;
@ -313,7 +312,8 @@
 #X obj 631 405 > 1;
 #X obj 88 306 riff1_random 40 1031 600 1000;
 #X obj 498 306 riff1_random 90 1032 600 1000;
-#X connect 0 0 46 0;
+#X obj 637 53 loadbang;
 #X connect 0 0 45 0;
 #X connect 1 0 22 0;
 #X connect 2 0 5 0;
 #X connect 2 0 19 0;
@ -321,37 +321,36 @@
 #X connect 5 0 6 0;
 #X connect 7 0 8 0;
 #X connect 9 0 4 0;
 #X connect 10 0 45 0;
 #X connect 10 0 46 0;
 #X connect 10 0 47 0;
 #X connect 15 0 33 0;
 #X connect 16 0 15 1;
 #X connect 16 0 28 1;
 #X connect 17 0 16 0;
 #X connect 18 0 10 0;
-#X connect 22 0 46 1;
+#X connect 22 0 45 1;
 #X connect 23 0 7 0;
 #X connect 23 0 13 0;
 #X connect 24 0 22 0;
-#X connect 25 0 47 0;
+#X connect 25 0 46 0;
 #X connect 26 0 30 0;
 #X connect 28 0 36 0;
 #X connect 29 0 30 0;
-#X connect 30 0 47 1;
+#X connect 30 0 46 1;
 #X connect 32 0 33 1;
 #X connect 33 0 31 0;
 #X connect 35 0 36 1;
 #X connect 36 0 34 0;
-#X connect 37 0 39 0;
+#X connect 37 0 40 0;
-#X connect 38 0 41 0;
+#X connect 38 0 37 0;
-#X connect 39 0 38 0;
+#X connect 39 0 41 1;
-#X connect 40 0 42 1;
+#X connect 40 0 41 0;
 #X connect 41 0 42 0;
-#X connect 42 0 43 0;
+#X connect 43 0 32 0;
-#X connect 44 0 32 0;
+#X connect 44 0 35 0;
-#X connect 45 0 35 0;
+#X connect 45 0 15 0;
-#X connect 46 0 15 0;
+#X connect 45 2 43 0;
 #X connect 45 3 2 0;
 #X connect 46 0 28 0;
 #X connect 46 2 44 0;
 #X connect 46 3 2 0;
 #X connect 47 0 28 0;
 #X connect 47 2 45 0;
 #X coords 0 -1 1 1 100 150 2 5 5;
--- a/puredata/radio_flasher.pd
+++ b/puredata/radio_flasher.pd
@ -1,9 +1,9 @@
-#N canvas 472 643 704 515 10;
+#N canvas 472 383 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;
 #X obj 164 67 v \$0-STATE;
-#N canvas 747 89 533 644 world 0;
+#N canvas 747 95 533 644 world 0;
 #X floatatom 16 94 5 0 0 0 - - -;
 #X obj 16 293 t a b;
 #X obj 16 372 spigot;
@ -39,12 +39,12 @@
 #X obj 16 451 abs;
 #N canvas 0 50 450 250 (subpatch) 0;
 #X array \$0-stress 100 float 2;
-#X coords 0 10 100 0 200 50 1 0 0;
+#X coords 0 100 100 0 200 150 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 2 95 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
 ;
@ -67,7 +67,7 @@
 #X connect 6 0 1 0;
 #X connect 7 0 2 0;
 #X connect 9 0 7 0;
-#X restore 473 100 pd;
+#X restore 473 200 pd;
 #X obj 285 393 v \$0-STATE;
 #X obj 265 525 v \$0-STRESS;
 #X obj 238 601 v \$0-STRESS;
@ -249,17 +249,15 @@
 #X connect 24 0 22 0;
 #X restore 48 226 pd expressions;
 #N canvas 490 171 966 616 (subpatch) 0;
-#X array flasherA 40 float 3;
+#X array flasherA 30 float 3;
-#A 0 0.133333 0.133333 0.142857 0.161905 0.190476 0.238095 0.285713
+#A 0 0.0761905 0.0761905 0 0.0761905 0.0761905 0.0761905 0 0.0761905
-0.333332 0.380951 0.457141 0.552378 0.676187 0.780948 0.904757 0.980947
+0.0761905 0 0.0761905 0.0761905 0.2 0 0.0761905 0 0.0761905 0.0857143
-1.01904 0.0380951 0.0380951 0.0380951 0.0380951 0.0380951 0.0380951
+0.00952381 0.0666668 0.00952381 0.0666668 0.0666668 0.180952 0.00952381
-0.0380951 0.0380951 0.0380951 0.0380951 0.171429 0.180952 0.2 0.238095
+-0.00952369 0.0666668 0.0190476 0.0666668 0.0666668;
-0.266666 0.314285 0.361904 0.42857 0.485712 0.590474 0.704759 0.866662
+#X coords 0 1 30 0 25 25 1 0 0;
 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 1;
+-257985 -1 3;
 #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
@ -278,14 +276,12 @@
 #X obj 164 21 r FLASHER;
 #X obj 284 123 s FLASHER;
 #N canvas 0 23 450 278 (subpatch) 0;
-#X array flasherB 40 float 3;
+#X array flasherB 30 float 3;
-#A 0 0.133333 0.133333 0.142857 0.161905 0.190476 0.238095 0.285713
+#A 0 0.0761905 -0.00952429 0 0.0761905 0.0761905 0.00952345 0 0.0761905
-0.333332 0.380951 0.457141 0.552378 0.676187 0.780948 0.904757 0.980947
+-0.00952446 0 0.00952345 0.0952383 0.2 0 0.0761905 0 0.00952381 0.0857143
-1.01904 0.0380951 0.0380951 0.0380951 0.0380951 0.0380951 0.0380951
+0.00952381 0.342858 0.00952381 0.00952351 0.0666668 0.180952 0.00952381
-0.0380951 0.0380951 0.0380951 0.0380951 0.171429 0.180952 0.2 0.238095
+-0.00952369 0.0666668 0.0190476 0.133334 0.0190474;
-0.266666 0.314285 0.361904 0.42857 0.485712 0.590474 0.704759 0.866662
+#X coords 0 1 30 0 25 25 1 0 0;
 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;
@ -325,13 +321,6 @@
 #X msg 601 254 1002;
 #X msg 579 329 flasherB;
 #X obj 412 109 loadbang;
 #X obj 412 152 metro 2000;
 #X obj 412 132 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
 -1 -1;
 #X obj 487 180 r E_SEQ;
 #X obj 412 175 v \$0-STRESS;
 #X obj 412 198 *;
 #X obj 412 221 v \$0-STRESS;
 #X obj 253 29 bng 15 250 50 0 empty ACT0 r:ACT0 17 7 0 10 -262144 -1
 -1;
 #X msg 459 44 1500 1001 0 \$1;
@ -340,6 +329,13 @@
 1;
 #X obj 437 45 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
 1;
 #X obj 412 162 metro 2000;
 #X obj 412 142 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
 -1 -1;
 #X obj 487 190 r E_SEQ;
 #X obj 412 185 v \$0-STRESS;
 #X obj 412 208 *;
 #X obj 412 231 v \$0-STRESS;
 #X connect 0 0 19 0;
 #X connect 1 0 2 0;
 #X connect 3 0 0 0;
@ -385,15 +381,14 @@
 #X connect 49 0 50 0;
 #X connect 50 0 48 2;
 #X connect 51 0 48 1;
-#X connect 52 0 54 0;
+#X connect 53 0 1 0;
-#X connect 53 0 56 0;
+#X connect 54 0 9 0;
-#X connect 54 0 53 0;
+#X connect 55 0 9 0;
-#X connect 55 0 57 1;
+#X connect 56 0 54 0;
-#X connect 56 0 57 0;
+#X connect 57 0 55 0;
-#X connect 57 0 58 0;
+#X connect 58 0 61 0;
-#X connect 59 0 1 0;
+#X connect 59 0 58 0;
-#X connect 60 0 9 0;
+#X connect 60 0 62 1;
-#X connect 61 0 9 0;
+#X connect 61 0 62 0;
-#X connect 62 0 60 0;
+#X connect 62 0 63 0;
 #X connect 63 0 61 0;
 #X coords 0 -1 1 1 100 150 2 5 5;
--- a/puredata/radio_frog.pd
+++ b/puredata/radio_frog.pd
@ -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 747 95 533 644 world 0;
 #X floatatom 16 94 5 0 0 0 - - -;
 #X obj 16 293 t a b;
 #X obj 16 372 spigot;
@ -46,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 10 100 0 200 50 1 0 0;
+#X coords 0 100 100 0 200 150 1 0 0;
 #X restore 295 45 graph;
 #X obj 238 303 loadbang;
 #X text 78 227 condition of state change;
@ -74,7 +74,7 @@
 #X connect 6 0 1 0;
 #X connect 7 0 2 0;
 #X connect 9 0 7 0;
-#X restore 473 100 pd;
+#X restore 473 200 pd;
 #X obj 285 393 v \$0-STATE;
 #X obj 265 525 v \$0-STRESS;
 #X obj 238 601 v \$0-STRESS;
@ -213,16 +213,17 @@
 #X restore 48 226 pd expressions;
 #N canvas 0 23 450 278 (subpatch) 0;
 #X array frog 50 float 3;
-#A 0 0.0952381 0.104762 0.109524 0.114286 0.119048 0.12381 0.133333
+#A 0 0.095238 0.12381 0.171429 0.219048 0.295239 0.438097 0.514288
-0.142857 0.152381 0.171429 0.180952 0.2 0.2 0.228571 0.238095 0.257143
+0.552384 0.552384 0.514288 0.457145 0.380954 0.295239 0.190477 0.133333
-0.27619 0.304762 0.32381 0.352381 0.371429 0.409524 0.457143 0.533333
+0.104762 0.0857141 0.0761902 0.0761902 0.0761902 0.00952369 0.0190476
-0.6 0.695238 0.761905 0.857143 0.971429 1.00952 1 1 1 1 1 1 1 0.990476
+0.00952357 0.00952357 0.00952357 0.00952357 0.00952357 0.00952357 0.0857134
-0.990476 0.990476 0.990476 0.0190476 0.0190476 0.0190476 0.0190476
+0.0857134 0.0857134 0.104761 0.133333 0.190476 0.257143 0.390477 0.533335
-0.0190476 0.0190476 0.0190476 0.0190476 0.0190476;
+0.571431 0.571431 0.571431 0.552383 0.523811 0.457144 0.390477 0.314286
 0.2 0.161904 0.133333 0.114285 0.0952373;
 #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 1;
+-128992 -1 0;
 #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
@ -239,14 +240,13 @@
 #X obj 88 306 riff1 1000 1061 800;
 #X obj 167 269 s FROG;
 #X obj 183 421 > 50;
-#X obj 183 444 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
+#X obj 183 444 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
 1;
 #X obj 88 459 spigot;
 #X obj 102 277 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
 -1 -1;
 #X obj 269 352 bng 15 250 50 0 empty \$0-reload r:reload 17 7 0 10
 -262144 -1 -1;
 #X obj 259 74 loadbang;
 #X obj 259 117 metro 2000;
 #X obj 259 97 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
 -1;
@ -254,6 +254,7 @@
 #X obj 259 140 v \$0-STRESS;
 #X obj 259 163 *;
 #X obj 259 186 v \$0-STRESS;
 #X obj 259 64 loadbang;
 #X connect 0 0 23 0;
 #X connect 1 0 22 0;
 #X connect 2 0 5 0;
@ -278,10 +279,9 @@
 #X connect 27 0 15 0;
 #X connect 28 0 23 0;
 #X connect 29 0 22 0;
-#X connect 30 0 32 0;
+#X connect 30 0 33 0;
-#X connect 31 0 34 0;
+#X connect 31 0 30 0;
-#X connect 32 0 31 0;
+#X connect 32 0 34 1;
-#X connect 33 0 35 1;
+#X connect 33 0 34 0;
 #X connect 34 0 35 0;
 #X connect 35 0 36 0;
 #X coords 0 -1 1 1 100 150 2 5 5;
--- a/puredata/radio_rounder.pd
+++ b/puredata/radio_rounder.pd
@ -1,4 +1,4 @@
-#N canvas 698 89 367 511 10;
+#N canvas 698 95 367 511 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,19 +10,19 @@
 #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 747 95 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 +;
@ -41,12 +41,12 @@
 #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 10 100 0 200 50 1 0 0;
+#X coords 0 100 100 0 200 150 1 0 0;
 #X restore 295 45 graph;
 #X obj 238 303 loadbang;
 #X text 78 227 condition of state change;
@ -74,7 +74,7 @@
 #X connect 6 0 1 0;
 #X connect 7 0 2 0;
 #X connect 9 0 7 0;
-#X restore 473 100 pd;
+#X restore 473 200 pd;
 #X obj 285 393 v \$0-STATE;
 #X obj 265 525 v \$0-STRESS;
 #X obj 238 601 v \$0-STRESS;
@ -214,23 +214,21 @@
 #X connect 16 0 14 0;
 #X restore 48 226 pd expressions;
 #N canvas 0 23 450 278 (subpatch) 0;
-#X array rounder 50 float 3;
+#X array rounder 40 float 3;
-#A 0 -0.628567 -0.628567 -0.628567 -0.638091 -0.638091 -0.638091 -0.638091
+#A 0 0.333333 0.409523 0.476189 0.552379 0.599998 0.599998 0.209524
-0.638091 -0.638091 -0.638091 -0.638091 -0.638091 -0.495234 -0.495234
+0.285714 0.361904 0.419046 0.457141 0.485712 0.485712 0.104762 0.228571
-0.495234 -0.495234 -0.495234 -0.495234 -0.495234 -0.504758 -0.504758
+0.314285 0.380951 0.447617 0.52381 0.161905 0.571429 -0.18095 -0.238093
-0.504758 -0.504758 -0.514282 -0.314283 -0.314283 -0.314283 -0.314283
+-0.285711 -0.314283 -0.304759 -0.00952274 -0.123808 -0.238093 -0.323806
-0.314283 -0.314283 -0.314283 -0.314283 -0.314283 -0.323806 -0.323806
+-0.380949 -0.447615 -0.533329 -0.0190467 -0.190474 -0.295235 -0.342854
-0.323806 -0.171427 -0.161903 -0.161903 -0.161903 -0.161903 -0.161903
+-0.361902 -0.390473 -0.419044;
-0.161903 -0.161903 -0.161903 -0.171427 -0.171427 -0.171427 -0.171427
+#X coords 0 1 40 0 50 50 1 0 0;
 -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 1;
+-128992 -1 0;
 #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 0 1;
+-1 -1 1 1;
 #X obj 164 21 r ROUNDER;
 #X obj 48 188 r ROUNDER;
 #X obj 167 269 s ROUNDER;
@ -243,7 +241,6 @@
 #X obj 7 397 loadbang;
 #X obj 269 352 bng 15 250 50 0 empty \$0-reload r:reload 17 7 0 10
 -262144 -1 -1;
 #X obj 238 71 loadbang;
 #X obj 238 114 metro 2000;
 #X obj 238 94 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
 -1;
@ -252,7 +249,8 @@
 #X obj 238 160 *;
 #X obj 238 183 v \$0-STRESS;
 #X obj 88 306 riff1 900 4002 500;
-#X connect 0 0 32 0;
+#X obj 238 61 loadbang;
 #X connect 0 0 31 0;
 #X connect 1 0 19 0;
 #X connect 2 0 5 0;
 #X connect 2 0 18 0;
@ -260,21 +258,20 @@
 #X connect 5 0 6 0;
 #X connect 7 0 8 0;
 #X connect 9 0 4 0;
-#X connect 10 0 32 0;
+#X connect 10 0 31 0;
 #X connect 15 0 7 0;
 #X connect 15 0 13 0;
 #X connect 16 0 10 0;
-#X connect 19 0 32 1;
+#X connect 19 0 31 1;
 #X connect 21 0 20 0;
 #X connect 22 0 21 1;
 #X connect 23 0 22 0;
 #X connect 24 0 19 0;
-#X connect 25 0 27 0;
+#X connect 25 0 28 0;
-#X connect 26 0 29 0;
+#X connect 26 0 25 0;
-#X connect 27 0 26 0;
+#X connect 27 0 29 1;
-#X connect 28 0 30 1;
+#X connect 28 0 29 0;
 #X connect 29 0 30 0;
-#X connect 30 0 31 0;
+#X connect 31 0 21 0;
-#X connect 32 0 21 0;
+#X connect 31 3 2 0;
 #X connect 32 3 2 0;
 #X coords 0 -1 1 1 100 150 2 5 5;
--- a/puredata/radio_suitcase.pd
+++ b/puredata/radio_suitcase.pd
@ -1,4 +1,4 @@
-#N canvas 597 82 683 521 10;
+#N canvas 597 95 683 521 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,19 +10,19 @@
 #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 0;
+#N canvas 701 95 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 +;
@ -41,12 +41,12 @@
 #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 10 100 0 200 50 1 0 0;
+#X coords 0 100 100 0 200 150 1 0 0;
 #X restore 295 45 graph;
 #X obj 238 303 loadbang;
 #X text 78 227 condition of state change;
@ -74,7 +74,7 @@
 #X connect 6 0 1 0;
 #X connect 7 0 2 0;
 #X connect 9 0 7 0;
-#X restore 473 100 pd;
+#X restore 473 200 pd;
 #X obj 285 393 v \$0-STATE;
 #X obj 265 525 v \$0-STRESS;
 #X obj 238 601 v \$0-STRESS;
@ -342,35 +342,45 @@
 1;
 #X obj 350 450 loadbang;
 #N canvas 0 23 450 278 (subpatch) 0;
-#X array suitcaseA 60 float 3;
+#X array suitcaseA 100 float 3;
-#A 0 0.514285 0.523809 0.533332 0.542856 0.542856 0.542856 0.6 0.619047
+#A 0 0.552379 0.257145 0.409523 0.457141 0.476188 0.495235 0.504759
-0.504761 0.495238 0.485714 0.466668 0.466668 0.457144 0.457144 0.457144
+0.523806 0.523806 0.523806 0.514282 0.495235 0.476188 0.32381 0.285715
-0.476191 0.495238 0.542857 0.55238 0.571429 0.495239 0.500001 0.647621
+0.276192 0.276192 0.295239 0.352383 0.409525 0.447619 0.485714 0.495238
-0.666669 0.714287 0.72381 0.742858 0.752381 0.771429 0.466667 0.457143
+0.514285 0.523808 0.533332 0.533332 0.514285 0.504761 0.47619 0.342857
-0.457143 0.438096 0.438096 0.428572 0.428572 0.609521 0.609521 0.676187
+0.304763 0.295239 0.295239 0.39048 0.39048 0.466669 0.485716 0.523811
-0.676187 0.68571 0.68571 0.68571 0.68571 0.647616 0.619045 0.600002
+0.542858 0.561906 0.571429 0.590476 0.6 0.609524 0.609524 0.609524
-0.590478 0.561907 0.580954 0.600002 0.523809 0.533332 0.533332 0.523809
+0.580948 0.523806 0.228574 0.200003 0.200003 0.209526 0.21905 0.228574
-0.495238 0.485714 0.457143 0.44762;
+0.247621 0.400003 0.41905 0.466668 0.52381 0.571428 0.580952 0.580952
-#X coords 0 1 60 0 25 25 1 0 0;
+0.571428 0.571428 0.561905 0.552381 0.523806 0.495235 0.409523 0.342857
 0.21905 0.200003 0.200003 0.215875 0.231748 0.247621 0.380955 0.419049
 0.504762 0.523809 0.542856 0.542856 0.55238 0.561904 0.561904 0.55238
 0.523809 0.295241 0.257147 0.247623 0.238099 0.228576 0.228576 0.26667
 0.419048 0.476189 0.485713 0.50476 0.514284;
 #X coords 0 1 100 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 2;
+-13381 -1 5;
 #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 60 float 3;
+#X array suitcaseB 100 float 3;
-#A 0 0.514285 0.523809 0.533332 0.542856 0.542856 0.542856 0.6 0.619047
+#A 0 0.409523 0.42857 0.438094 0.447618 0.447618 0.457141 0.466665
-0.504761 0.495238 0.485714 0.47619 0.466667 0.809524 0.571429 0.638095
+0.466665 0.476188 0.476188 0.476188 0.466665 0.438094 0.419047 0.409523
-0.638095 0.647619 0.828571 0.657142 0.657142 0.495239 0.500001 0.809523
+0.399999 0.399999 0.399999 0.399999 0.399999 0.409523 0.419047 0.457141
-0.819046 0.82857 0.82857 0.838094 0.838094 0.771428 0.466667 0.457143
+0.485712 0.495236 0.504759 0.514283 0.514283 0.523807 0.523807 0.523807
-0.457143 0.438096 0.438096 0.428572 0.428572 0.609521 0.609521 0.676187
+0.523807 0.523807 0.520632 0.517458 0.514283 0.504759 0.495236 0.447618
-0.676187 0.68571 0.68571 0.68571 0.68571 0.647616 0.619045 0.599997
+0.438094 0.399999 0.390476 0.380952 0.371429 0.366667 0.361905 0.361905
-0.847616 0.847616 0.676194 0.66667 0.619049 0.609525 0.609525 0.609525
+0.357143 0.352381 0.352381 0.352381 0.361905 0.361905 0.390476 0.4
-0.780951 0.780951 0.761903 0.75238;
+0.404762 0.419047 0.428571 0.457142 0.476189 0.485712 0.485712 0.485712
-#X coords 0 1 60 0 25 25 1 0 0;
+0.480951 0.476189 0.466665 0.428571 0.4 0.361905 0.352382 0.333334
 0.333334 0.333334 0.333334 0.342858 0.342858 0.152381 0.380952 0.409523
 0.419046 0.438094 0.447617 0.457141 0.466664 0.466664 0.466664 0.457141
 0.447617 0.399999 0.380952 0.361905 0.352381 0.342857 0.352381 0.361905
 0.371428 0.380952 0.390475 0.390475 0.419046;
 #X coords 0 1 100 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;
+-1 -1 1 1;
 #X obj 114 21 r SUITCASE;
 #X obj 48 188 r SUITCASE;
 #X obj 267 122 s SUITCASE;
@ -402,7 +412,6 @@
 -1 -1;
 #X obj 641 127 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
 -1 -1;
 #X obj 386 146 loadbang;
 #X obj 386 189 metro 2000;
 #X obj 386 169 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
 -1 -1;
@ -410,6 +419,7 @@
 #X obj 386 212 v \$0-STRESS;
 #X obj 386 235 *;
 #X obj 386 258 v \$0-STRESS;
 #X obj 386 136 loadbang;
 #X connect 0 0 31 0;
 #X connect 1 0 24 0;
 #X connect 2 0 5 0;
@ -447,10 +457,9 @@
 #X connect 41 2 42 0;
 #X connect 42 0 46 0;
 #X connect 44 0 41 0;
-#X connect 47 0 49 0;
+#X connect 47 0 50 0;
-#X connect 48 0 51 0;
+#X connect 48 0 47 0;
-#X connect 49 0 48 0;
+#X connect 49 0 51 1;
-#X connect 50 0 52 1;
+#X connect 50 0 51 0;
 #X connect 51 0 52 0;
 #X connect 52 0 53 0;
 #X coords 0 -1 1 1 100 150 2 5 5;
--- a/puredata/radio_tanker_head.pd
+++ b/puredata/radio_tanker_head.pd
@ -1,4 +1,4 @@
-#N canvas 186 86 400 493 10;
+#N canvas 186 95 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,12 +10,12 @@
 #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 747 95 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;
@ -41,17 +41,17 @@
 #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 10 100 0 200 50 1 0 0;
+#X coords 0 100 100 0 200 150 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 2 95 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
 ;
@ -74,7 +74,7 @@
 #X connect 6 0 1 0;
 #X connect 7 0 2 0;
 #X connect 9 0 7 0;
-#X restore 473 100 pd;
+#X restore 473 200 pd;
 #X obj 285 393 v \$0-STATE;
 #X obj 265 525 v \$0-STRESS;
 #X obj 238 601 v \$0-STRESS;
@ -224,18 +224,21 @@
 #X connect 18 0 16 0;
 #X restore 48 226 pd expressions;
 #N canvas 0 23 450 278 (subpatch) 0;
-#X array tankerH 15 float 3;
+#X array tankerH 40 float 3;
-#A 0 -1.13333 -1.02856 -0.895231 -0.761898 -0.590471 -0.761899 -0.933326
+#A 0 0.590476 0.609524 0.628571 0.628571 0.628571 0.628571 0.590476
-1.06666 -0.771422 -0.609519 -0.771422 -0.980946 -1.08571 -0.86666
+0.542857 0.52381 0.485715 0.466667 0.476191 0.476191 0.495239 0.514286
-0.742851;
+0.533334 0.542857 0.552381 0.552381 0.552381 0.561905 0.47619 -0.590472
-#X coords 0 1 15 0 50 50 1 0 0;
+-0.599996 -0.590472 -0.571424 -0.552377 -0.542853 -0.533329 -0.533329
 -0.542853 -0.552377 -0.561901 -0.599996 -0.599996 -0.599996 -0.599996
 -0.590472 -0.571424 -0.552377;
 #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 0;
 #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
-159808 -1 0 1;
+-159808 -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
@ -248,7 +251,6 @@
 #X msg 249 329 tankerH;
 #X obj 269 352 bng 15 250 50 0 empty \$0-reload r:reload 17 7 0 10
 -262144 -1 -1;
 #X obj 264 68 loadbang;
 #X obj 264 111 metro 2000;
 #X obj 264 91 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
 -1;
@ -257,7 +259,8 @@
 #X obj 264 157 *;
 #X obj 264 180 v \$0-STRESS;
 #X obj 88 305 riff1 500 4001 800;
-#X connect 0 0 32 0;
+#X obj 264 58 loadbang;
 #X connect 0 0 31 0;
 #X connect 1 0 23 0;
 #X connect 2 0 5 0;
 #X connect 2 0 22 0;
@ -265,21 +268,20 @@
 #X connect 5 0 6 0;
 #X connect 7 0 8 0;
 #X connect 9 0 4 0;
-#X connect 10 0 32 0;
+#X connect 10 0 31 0;
 #X connect 16 0 15 0;
 #X connect 17 0 16 1;
 #X connect 18 0 17 0;
 #X connect 19 0 7 0;
 #X connect 19 0 13 0;
 #X connect 20 0 10 0;
-#X connect 23 0 32 1;
+#X connect 23 0 31 1;
 #X connect 24 0 23 0;
-#X connect 25 0 27 0;
+#X connect 25 0 28 0;
-#X connect 26 0 29 0;
+#X connect 26 0 25 0;
-#X connect 27 0 26 0;
+#X connect 27 0 29 1;
-#X connect 28 0 30 1;
+#X connect 28 0 29 0;
 #X connect 29 0 30 0;
-#X connect 30 0 31 0;
+#X connect 31 0 16 0;
-#X connect 32 0 16 0;
+#X connect 31 3 2 0;
 #X connect 32 3 2 0;
 #X coords 0 -1 1 1 100 150 2 5 5;
--- a/puredata/radio_tanker_side.pd
+++ b/puredata/radio_tanker_side.pd
@ -1,4 +1,4 @@
-#N canvas 587 86 462 511 10;
+#N canvas 587 95 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,19 +10,19 @@
 #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 0;
+#N canvas 747 95 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 +;
@ -41,12 +41,12 @@
 #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 10 100 0 200 50 1 0 0;
+#X coords 0 100 100 0 200 150 1 0 0;
 #X restore 295 45 graph;
 #X obj 238 303 loadbang;
 #X text 78 227 condition of state change;
@ -74,7 +74,7 @@
 #X connect 6 0 1 0;
 #X connect 7 0 2 0;
 #X connect 9 0 7 0;
-#X restore 473 100 pd;
+#X restore 473 200 pd;
 #X obj 285 393 v \$0-STATE;
 #X obj 265 525 v \$0-STRESS;
 #X obj 238 601 v \$0-STRESS;
@ -222,7 +222,7 @@
 #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
-159808 -1 0 1;
+-159808 -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
@ -235,7 +235,6 @@
 #X obj 167 269 s TANKER_S;
 #X msg 300 329 tankerS;
 #X obj 288 452 s TANKER_S_DONE;
 #X obj 310 71 loadbang;
 #X obj 310 114 metro 2000;
 #X obj 310 94 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
 -1;
@ -244,7 +243,8 @@
 #X obj 310 160 *;
 #X obj 310 183 v \$0-STRESS;
 #X obj 85 306 riff1_random 20 1041 500 700;
-#X connect 0 0 32 0;
+#X obj 310 61 loadbang;
 #X connect 0 0 31 0;
 #X connect 1 0 23 0;
 #X connect 2 0 5 0;
 #X connect 2 0 24 0;
@ -252,7 +252,7 @@
 #X connect 5 0 6 0;
 #X connect 7 0 8 0;
 #X connect 9 0 4 0;
-#X connect 10 0 32 0;
+#X connect 10 0 31 0;
 #X connect 16 0 15 0;
 #X connect 17 0 16 1;
 #X connect 18 0 17 0;
@ -260,13 +260,12 @@
 #X connect 20 0 7 0;
 #X connect 20 0 13 0;
 #X connect 21 0 10 0;
-#X connect 23 0 32 1;
+#X connect 23 0 31 1;
-#X connect 25 0 27 0;
+#X connect 25 0 28 0;
-#X connect 26 0 29 0;
+#X connect 26 0 25 0;
-#X connect 27 0 26 0;
+#X connect 27 0 29 1;
-#X connect 28 0 30 1;
+#X connect 28 0 29 0;
 #X connect 29 0 30 0;
-#X connect 30 0 31 0;
+#X connect 31 0 16 0;
-#X connect 32 0 16 0;
+#X connect 31 3 2 0;
 #X connect 32 3 2 0;
 #X coords 0 -1 1 1 100 150 2 5 5;
--- a/puredata/radio_tissue.pd
+++ b/puredata/radio_tissue.pd
@ -1,4 +1,4 @@
-#N canvas 310 48 737 597 10;
+#N canvas 310 95 737 597 10;
 #X msg 37 337 0;
 #X obj 299 306 loadbang;
 #X text 35 318 stop!;
@ -6,12 +6,12 @@
 -1 -1;
 #X msg 114 44 1;
 #X obj 114 67 v \$0-STATE;
-#N canvas 747 89 533 644 world 0;
+#N canvas 747 95 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
-0 1;
+1 1;
 #X obj 67 334 == 0;
 #X obj 16 316 sel 1;
 #X text 41 402 think;
@ -37,12 +37,12 @@
 #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;
+#N canvas 2 95 450 250 (subpatch) 0;
 #X array \$0-stress 100 float 2;
-#X coords 0 10 100 0 200 50 1 0 0;
+#X coords 0 100 100 0 200 150 1 0 0;
 #X restore 295 45 graph;
 #X obj 238 303 loadbang;
 #X text 78 227 condition of state change;
@ -70,7 +70,7 @@
 #X connect 6 0 1 0;
 #X connect 7 0 2 0;
 #X connect 9 0 7 0;
-#X restore 473 100 pd;
+#X restore 473 200 pd;
 #X obj 285 393 v \$0-STATE;
 #X obj 265 525 v \$0-STRESS;
 #X obj 238 601 v \$0-STRESS;
@ -266,30 +266,31 @@
 1;
 #X obj 365 490 loadbang;
 #N canvas 0 23 450 278 (subpatch) 0;
-#X array tissueA 30 float 3;
+#X array tissueA 20 float 3;
-#A 0 6.66666 6.66666 5.71428 4.57141 3.8095 1.99997 3.90474 5.33332
+#A 0 6.85715 7.33334 7.52382 7.71429 5.04761 5.14285 5.61904 6.38095
-4.66665 3.71426 2.38095 0.190476 0.0952377 4.2857 3.71426 2.19048 0.0952377
+6.95238 2.19045 4.66666 5.04761 5.23809 1.99997 3.33331 3.80953 3.52381
-4.19046 2.95235 1.71429 4.2857 3.42855 2.09521 1.3333 -4.57764e-05
+3.2381 3.90475 4.85713;
-3.90474 3.42855 2.28568 1.23806 0.28567;
+#X coords 0 10 20 0 25 25 1 0 0;
 #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 2;
+-159808 -1 3;
 #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 50 float 3;
+#X array tissueB 60 float 3;
-#A 0 0.0952381 0.114286 0.200001 0.228572 0.228572 0.219048 0.209525
+#A 0 -0.171425 -0.171425 -0.171425 -0.171425 -0.171425 -0.171425 -0.171425
-0.171429 0.0952381 0.0666667 0.0666667 0.0952381 0.12381 0.171429 0.200001
+-0.171425 -0.171425 -0.171425 -0.171425 -0.171425 -0.171425 -0.171425
-0.219048 0.219048 0.219048 0.114286 0.990476 0.0952381 0.114286 0.200001
+-0.171425 -0.171425 -0.171425 -0.171425 -0.171425 -0.171425 -0.171425
-0.228572 0.228572 0.219048 0.209525 0.171429 0.0952381 0.0666667 0.0666667
+-0.171425 -0.171425 -0.171425 -0.171425 -0.171425 -0.171425 -0.171425
-0.0952381 0.12381 0.171429 0.200001 0.219048 0.219048 0.219048 0.114286
+-0.171425 -0.171425 -0.171425 -0.171425 -0.171425 -0.171425 -0.171425
-0.0571427 0.0952381 0.114286 0.200001 0.228572 0.228572 0.219048 0.209525
+-0.171425 -0.171425 -0.171425 -0.171425 -0.171425 -0.171425 -0.171425
-0.171429 0.0952381 0.0666667;
+-0.171425 -0.171425 -0.171425 -0.171425 -0.171425 -0.171425 -0.171425
-#X coords 0 1 50 0 25 25 1 0 0;
+-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 restore 34 96 graph;
 #X obj 88 24 tgl 15 0 empty \$0-status-now empty 17 7 0 10 -191407
-159808 -1 1 1;
+-159808 -1 0 1;
 #X msg 417 337 0;
 #X obj 629 306 loadbang;
 #X text 415 318 stop!;
@ -299,7 +300,6 @@
 -262144 -1 -1;
 #X obj 649 352 bng 15 250 50 0 empty \$0-reload r:reload 17 7 0 10
 -262144 -1 -1;
 #X obj 386 146 loadbang;
 #X obj 386 189 metro 2000;
 #X obj 386 169 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
 -1 -1;
@ -321,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 1
+#X obj 281 429 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
 1;
 #X obj 216 490 *~;
 #X msg 281 406 0;
@ -334,51 +334,51 @@
 #X obj 375 424 v \$0-STATE;
 #X obj 355 446 s TISSUE_DONE;
 #X obj 216 549 dac~;
-#X connect 0 0 37 0;
+#X obj 386 136 loadbang;
-#X connect 1 0 34 0;
+#X connect 0 0 36 0;
-#X connect 3 0 33 0;
+#X connect 1 0 33 0;
 #X connect 3 0 32 0;
 #X connect 4 0 5 0;
 #X connect 6 0 3 0;
-#X connect 7 0 37 0;
+#X connect 7 0 36 0;
-#X connect 7 0 48 0;
+#X connect 7 0 47 0;
 #X connect 9 0 8 0;
 #X connect 10 0 9 1;
 #X connect 10 0 21 1;
 #X connect 11 0 10 0;
-#X connect 17 0 36 0;
+#X connect 17 0 35 0;
-#X connect 18 0 35 0;
+#X connect 18 0 34 0;
-#X connect 22 0 34 0;
+#X connect 22 0 33 0;
-#X connect 23 0 35 0;
+#X connect 23 0 34 0;
-#X connect 24 0 26 0;
+#X connect 24 0 27 0;
-#X connect 25 0 28 0;
+#X connect 25 0 24 0;
-#X connect 26 0 25 0;
+#X connect 26 0 28 1;
-#X connect 27 0 29 1;
+#X connect 27 0 28 0;
 #X connect 28 0 29 0;
-#X connect 29 0 30 0;
+#X connect 30 0 4 0;
-#X connect 31 0 4 0;
+#X connect 30 0 14 0;
-#X connect 31 0 14 0;
+#X connect 31 0 7 0;
-#X connect 32 0 7 0;
+#X connect 33 0 36 1;
-#X connect 34 0 37 1;
+#X connect 34 0 35 1;
-#X connect 35 0 36 1;
+#X connect 35 0 21 0;
-#X connect 36 0 21 0;
+#X connect 35 2 43 0;
-#X connect 36 2 44 0;
+#X connect 36 0 9 0;
-#X connect 37 0 9 0;
+#X connect 36 2 38 0;
-#X connect 37 2 39 0;
+#X connect 36 3 46 0;
-#X connect 37 3 47 0;
+#X connect 36 3 50 0;
-#X connect 37 3 51 0;
+#X connect 37 0 39 0;
-#X connect 38 0 40 0;
+#X connect 38 0 37 0;
-#X connect 39 0 38 0;
+#X connect 39 0 45 0;
-#X connect 40 0 46 0;
+#X connect 40 0 41 0;
-#X connect 41 0 42 0;
+#X connect 40 1 42 0;
-#X connect 41 1 43 0;
+#X connect 43 0 40 0;
-#X connect 44 0 41 0;
+#X connect 44 0 48 0;
-#X connect 45 0 49 0;
+#X connect 45 0 54 0;
-#X connect 46 0 55 0;
+#X connect 45 0 54 1;
-#X connect 46 0 55 1;
+#X connect 46 0 44 0;
-#X connect 47 0 45 0;
+#X connect 47 0 44 0;
-#X connect 48 0 45 0;
+#X connect 48 0 45 1;
-#X connect 49 0 46 1;
+#X connect 50 0 51 0;
 #X connect 50 0 53 0;
 #X connect 51 0 52 0;
 #X connect 51 0 54 0;
 #X connect 52 0 53 0;
 #X coords 0 -1 1 1 100 150 2 5 5;
--- a/puredata/radio_yellow.pd
+++ b/puredata/radio_yellow.pd
@ -1,11 +1,11 @@
-#N canvas 97 41 701 521 10;
+#N canvas 97 95 701 521 10;
 #X obj 88 24 tgl 15 0 empty \$0-status-now empty 17 7 0 10 -257985
 -1 -1 0 1;
 #X obj 274 81 bng 15 250 50 0 empty empty motivated! 17 7 0 10 -262144
 -1 -1;
 #X msg 164 44 1;
 #X obj 164 67 v \$0-STATE;
-#N canvas 172 60 533 644 world 0;
+#N canvas 172 95 533 644 world 0;
 #X floatatom 16 94 5 0 0 0 - - -;
 #X obj 16 293 t a b;
 #X obj 16 372 spigot;
@ -41,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 10 100 0 200 50 1 0 0;
+#X coords 0 100 100 0 200 150 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 84 89 319 212 (subpatch) 0;
+#N canvas 84 95 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
 ;
@ -69,7 +69,7 @@
 #X connect 6 0 1 0;
 #X connect 7 0 2 0;
 #X connect 9 0 7 0;
-#X restore 473 100 pd;
+#X restore 473 200 pd;
 #X obj 285 393 v \$0-STATE;
 #X obj 265 525 v \$0-STRESS;
 #X obj 238 601 v \$0-STRESS;
@ -275,7 +275,7 @@
 #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 0;
+-128992 -1 1;
 #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;
@ -318,7 +318,6 @@
 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;
 #X obj 430 108 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
 -1 -1;
@ -326,6 +325,7 @@
 #X obj 430 151 v \$0-STRESS;
 #X obj 430 174 *;
 #X obj 430 197 v \$0-STRESS;
 #X obj 430 75 loadbang;
 #X connect 1 0 11 0;
 #X connect 2 0 3 0;
 #X connect 4 0 1 0;
@ -353,10 +353,9 @@
 #X connect 30 0 26 0;
 #X connect 31 0 29 1;
 #X connect 32 0 30 1;
-#X connect 35 0 37 0;
+#X connect 35 0 38 0;
-#X connect 36 0 39 0;
+#X connect 36 0 35 0;
-#X connect 37 0 36 0;
+#X connect 37 0 39 1;
-#X connect 38 0 40 1;
+#X connect 38 0 39 0;
 #X connect 39 0 40 0;
 #X connect 40 0 41 0;
 #X coords 0 -1 1 1 100 150 2 5 5;
--- a/puredata/radio_yellowhose.pd
+++ b/puredata/radio_yellowhose.pd
@ -1,21 +1,21 @@
-#N canvas 451 25 829 496 10;
+#N canvas 451 95 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;
 #X obj 164 67 v \$0-STATE;
-#N canvas 747 89 533 644 world 0;
+#N canvas 747 95 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
-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 +;
@ -34,17 +34,17 @@
 #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 10 100 0 200 50 1 0 0;
+#X coords 0 100 100 0 200 150 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 2 95 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
 ;
@ -67,7 +67,7 @@
 #X connect 6 0 1 0;
 #X connect 7 0 2 0;
 #X connect 9 0 7 0;
-#X restore 473 100 pd;
+#X restore 473 200 pd;
 #X obj 285 393 v \$0-STATE;
 #X obj 265 525 v \$0-STRESS;
 #X obj 238 601 v \$0-STRESS;
@ -344,29 +344,22 @@
 #X connect 29 0 27 0;
 #X restore 48 226 pd expressions;
 #N canvas 0 23 450 278 (subpatch) 0;
-#X array yhoseA 100 float 3;
+#X array yhoseA 50 float 3;
-#A 0 0.00952381 0.00476211 0.00476211 0.514286 0.4 0.371429 0.347619
+#A 0 0.47619 0.495238 0.514286 0.504762 0.495238 0.304762 0.27619 0.257142
-0.00952297 2.38419e-07 2.38419e-07 0.00476193 0.00476193 0.00476193
+0.238095 0.219047 0.199999 0.190475 0.180951 0.180951 0.190475 0.542857
-0.00476193 0.00476193 0.276191 0.347619 0.27619 0.0190475 0.0190475
+0.542857 0.552381 0.561905 0.533333 0.533333 0.35238 0.314284 0.285713
-0.0190475 0.0190475 0.0190475 0.0190475 0.0190475 0.0190475 0.0190475
+0.266665 0.247617 0.247617 0.257141 0.30476 0.504762 0.504762 0.533334
-0.0190475 0.304762 0.32381 0.400001 0.471429 0.771429 0.00952339 0.00952339
+0.542858 0.542858 0.495238 0.285712 0.238093 0.238093 0.238093 0.247617
-0.00952339 0.00952339 0.00952339 0.00952339 0.00952339 0.595238 0.266667
+0.323809 0.447619 0.466667 0.476191 0.4 0.209523 0.161903 0.152379
-0.3 0.00952369 0.00952369 0.00952369 0.00952369 0.00952369 0.00952369
+0.142855 0.142855;
-0.00952369 0.00952369 0.00952369 0.00952369 0.00952369 0.0285714 0.0285714
+#X coords 0 1 50 0 25 25 1 0 0;
 0.0285714 0.0285714 0.0285714 0.52381 0.280952 0.271429 0.285714 0.309523
 0.290476 0.0285714 0.0285714 0.0285714 0.0285714 0.0285714 0.00952405
 0.00952405 0.3 0.338095 0.319048 0.390476 0.476189 0.00952381 0.00952381
 0.00952381 0.00952381 0.00952381 0.00952381 0.00952381 0.00952381 0.0285714
 0.0285714 0.0285714 0.395222 0.419031 0.419031 0.428554 0.490456 0.461886
 0 0 0 0 0 0;
 #X coords 0 1 100 0 25 25 1 0 0;
 #X restore 35 45 graph;
 #X obj 23 138 hradio 15 1 0 4 empty \$0-word empty 0 -8 0 10 -257985
-4034 -1 3;
+-4034 -1 4;
 #X obj 88 7 bng 15 250 50 0 empty empty empty 17 7 0 10 -257985 -4034
 -1;
 #X obj 88 24 tgl 15 0 empty \$0-status-now empty 17 7 0 10 -257985
-4034 -1 1 1;
+-4034 -1 0 1;
 #X obj 164 21 r YHOSE;
 #X obj 48 187 r YHOSE;
 #X obj 283 110 s YHOSE;
@ -396,34 +389,41 @@
 #X msg 726 329 yhoseB;
 #X obj 498 306 riff1_random 600 3206 600 900;
 #N canvas 0 23 450 278 (subpatch) 0;
-#X array yhoseB 50 float 3;
+#X array yhoseB 100 float 3;
-#A 0 0.361905 0.457143 0.552381 0.571429 0.561905 0.438095 0.371429
+#A 0 0.00952381 0.00476211 0.00476211 0.514286 0.4 0.371429 0.347619
-0.314286 0.2 0.0666667 0.0380952 0.00952381 0.00952381 0.00952381 0.00952381
+-0.00952297 2.38419e-07 2.38419e-07 0.00476193 0.00476193 0.00476193
-0.342857 0.4 0.552381 0.6 0.552381 0.419048 0.352381 0.295238 0.228571
+0.00476193 0.00476193 0.276191 0.347619 0.27619 0.0190475 0.0190475
-0.152381 0.00952381 0.00952381 0.0190476 0.0190476 0.0190476 0.0190476
+0.0190475 0.0190475 0.0190475 0.0190475 0.0190475 0.0190475 0.0190475
-0.0285714 0.00952381 0.0285714 0.409524 0.504762 0.552381 0.6 0.533333
+0.0190475 0.304762 0.32381 0.400001 0.471429 0.771429 0.00952339 0.00952339
-0.4 0.304762 0.238095 0.219048 0 0 0 -0.0190476 -0.00952381 -0.00952381
+0.00952339 0.00952339 0.00952339 0.00952339 0.00952339 0.595238 0.266667
-0.0190476;
+0.3 0.00952369 0.00952369 0.00952369 0.00952369 0.00952369 0.00952369
-#X coords 0 1 50 0 25 25 1 0 0;
+0.00952369 0.00952369 0.00952369 0.00952369 0.00952369 0.0285714 0.0285714
 0.0285714 0.0285714 0.0285714 0.52381 0.280952 0.271429 0.285714 0.309523
 0.290476 0.0285714 0.0285714 0.0285714 0.0285714 0.0285714 0.00952405
 0.00952405 0.3 0.338095 0.319048 0.390476 0.476189 0.00952381 0.00952381
 0.00952381 0.00952381 0.00952381 0.00952381 0.00952381 0.00952381 0.0285714
 0.0285714 0.0285714 0.395222 0.419031 0.419031 0.428554 0.490456 0.461886
 0 0 0 0 0 0;
 #X coords 0 1 100 0 25 25 1 0 0;
 #X restore 35 95 graph;
-#X obj 572 62 loadbang;
+#X obj 572 115 metro 2000;
-#X obj 572 105 metro 2000;
+#X obj 572 95 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
 #X obj 572 85 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
 -1;
-#X obj 647 133 r E_SEQ;
+#X obj 647 143 r E_SEQ;
-#X obj 572 128 v \$0-STRESS;
+#X obj 572 138 v \$0-STRESS;
-#X obj 572 151 *;
+#X obj 572 161 *;
-#X obj 572 174 v \$0-STRESS;
+#X obj 572 184 v \$0-STRESS;
 #X obj 88 305 riff1_random 700 3207 600 900;
 #X obj 572 62 loadbang;
 #X connect 0 0 11 0;
 #X connect 1 0 2 0;
 #X connect 3 0 0 0;
 #X connect 4 0 32 0;
-#X connect 4 0 41 0;
+#X connect 4 0 40 0;
 #X connect 9 0 1 0;
 #X connect 9 0 7 0;
 #X connect 10 0 4 0;
-#X connect 12 0 41 0;
+#X connect 12 0 40 0;
 #X connect 13 0 30 0;
 #X connect 14 0 16 0;
 #X connect 14 0 29 0;
@ -437,15 +437,14 @@
 #X connect 24 0 31 0;
 #X connect 27 0 26 0;
 #X connect 28 0 31 0;
-#X connect 30 0 41 1;
+#X connect 30 0 40 1;
 #X connect 31 0 32 1;
 #X connect 32 0 27 0;
-#X connect 34 0 36 0;
+#X connect 34 0 37 0;
-#X connect 35 0 38 0;
+#X connect 35 0 34 0;
-#X connect 36 0 35 0;
+#X connect 36 0 38 1;
-#X connect 37 0 39 1;
+#X connect 37 0 38 0;
 #X connect 38 0 39 0;
-#X connect 39 0 40 0;
+#X connect 40 0 19 0;
-#X connect 41 0 19 0;
+#X connect 40 3 14 0;
 #X connect 41 3 14 0;
 #X coords 0 -1 1 1 100 150 2 5 5;