diff --git a/puredata/piano_access_radio_roomB.pd b/puredata/piano_access_radio_roomB.pd
index 47a6e50..b34ab39 100644
--- a/puredata/piano_access_radio_roomB.pd
+++ b/puredata/piano_access_radio_roomB.pd
@@ -297,7 +297,7 @@
 #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 0;
+#N canvas 479 25 801 747 crickets 1;
 #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;
@@ -305,9 +305,9 @@
 #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 1.06111e-08 0.249905 3.03309e-30 0 4.77619e-13 0.0999365
-3.27876e-21 7.97657e-18 1.59528e-34 1.01127e-36 1.74349e-10 0.123003
-5.25672e-22 3.05661e-13 0 0 0 0 0;
+#A 0 2.66675e-06 1.27604e-16 0 7.28098e-26 3.08159e-06 0.349867 1.4965e-05
+6.39328e-20 0 1.36697e-11 9.44045e-34 0.172635 1.46164e-16 4.07346e-25
+0.199924 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;
@@ -536,7 +536,7 @@
 #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 0.28;
 #X coords 0 2 20 0 200 100 1 0 0;
-#X restore 794 36 graph;
+#X restore 764 36 graph;
 #X obj 1065 75 f;
 #X obj 1098 75 + 1;
 #X obj 1065 98 mod 20;
@@ -552,8 +552,8 @@
 #X obj 1045 9 loadbang;
 #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 14;
+#X obj 764 136 hradio 10 1 0 20 empty empty empty 0 -8 0 10 -257985
+-4160 -1 11;
 #X obj 204 406 * 0.2;
 #X obj 384 406 * 0.25;
 #X obj 1104 406 * 0.1;
@@ -603,6 +603,12 @@
 #X msg 700 151 \$1 10000;
 #X obj 924 406 * 0.35;
 #X obj 700 213 s E_SEQ_line;
+#X obj 980 126 loadbang;
+#X msg 980 147 12;
+#X obj 965 188 sel;
+#X floatatom 980 168 5 0 0 0 - - -;
+#X obj 965 209 bng 15 250 50 0 WORLD_evt_half empty s:WORLD_evt_half
+17 7 0 10 -262144 -1 -1;
 #X connect 0 0 17 0;
 #X connect 1 0 16 0;
 #X connect 4 0 3 0;
@@ -816,6 +822,7 @@
 #X connect 213 0 214 0;
 #X connect 214 0 215 0;
 #X connect 214 0 224 0;
+#X connect 214 0 261 0;
 #X connect 215 0 217 0;
 #X connect 216 0 211 0;
 #X connect 217 0 222 0;
@@ -857,6 +864,10 @@
 #X connect 255 0 258 0;
 #X connect 256 0 254 0;
 #X connect 257 0 68 0;
+#X connect 259 0 260 0;
+#X connect 260 0 262 0;
+#X connect 261 0 263 0;
+#X connect 262 0 261 1;
 #X coords 0 -1 1 1 220 100 1 5 5;
 #X restore 7 7 pd;
 #X text 68 658 change stress rate...;
diff --git a/puredata/radio_alumi_A.pd b/puredata/radio_alumi_A.pd
index 0f5dd18..f731570 100644
--- a/puredata/radio_alumi_A.pd
+++ b/puredata/radio_alumi_A.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 502 95 533 644 world 1;
+#N canvas 502 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;
@@ -223,14 +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.761905 0.638095 0.580952 0.485714 0.390476 0.32381 0.266668
-0.180954 0.0380977 -1.19209e-07 -0.00952399 -0.00952399 -0.00952399
--0.00952399 0.828571 0.647619 0.542857 0.457143 0.371429 0.304762 0.228572
-0.123811 0.0190499 0.0190476 0.0190476 0.0190476 0.0190476 0.0190476
-0.723809 0.647619 0.552382 0.466668 0.295239 0.219049 0.123811 0.0571451
-0.0190476 0.00952381 0.00952381 0.704762 0.628572 0.485714 0.352381
-0.295239 0.133335 0.0761926 0.0190476 0.0190476 0.0190476 -8.34465e-07
-;
+#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;
 #X coords 0 1 50 0 50 50 1 0 0;
 #X restore 29 46 graph;
 #X obj 88 429 s NOTE;
@@ -251,16 +250,13 @@
 -1 -1 0 1;
 #X msg 249 329 alumiA;
 #X obj 231 452 s ALUMI_A_DONE;
-#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;
-#X obj 325 142 r E_SEQ;
-#X obj 250 137 v \$0-STRESS;
-#X obj 250 160 *;
-#X obj 250 183 v \$0-STRESS;
 #X obj 88 306 riff1 900 3202 500;
-#X obj 250 61 loadbang;
-#X connect 0 0 31 0;
+#X obj 259 121 v \$0-STRESS;
+#X obj 259 167 v \$0-STRESS;
+#X obj 259 101 bng 15 250 50 0 empty WORLD_evt_half r:WORLD_evt_half
+17 7 0 10 -262144 -1 -1;
+#X obj 259 144 * 0.5;
+#X connect 0 0 25 0;
 #X connect 1 0 23 0;
 #X connect 2 0 5 0;
 #X connect 2 0 24 0;
@@ -268,7 +264,7 @@
 #X connect 5 0 6 0;
 #X connect 7 0 8 0;
 #X connect 9 0 4 0;
-#X connect 10 0 31 0;
+#X connect 10 0 25 0;
 #X connect 13 0 12 0;
 #X connect 14 0 13 1;
 #X connect 15 0 14 0;
@@ -276,12 +272,10 @@
 #X connect 17 0 7 0;
 #X connect 17 0 21 0;
 #X connect 18 0 10 0;
-#X connect 23 0 31 1;
-#X connect 25 0 28 0;
-#X connect 26 0 25 0;
-#X connect 27 0 29 1;
-#X connect 28 0 29 0;
-#X connect 29 0 30 0;
-#X connect 31 0 13 0;
-#X connect 31 3 2 0;
+#X connect 23 0 25 1;
+#X connect 25 0 13 0;
+#X connect 25 3 2 0;
+#X connect 26 0 29 0;
+#X connect 28 0 26 0;
+#X connect 29 0 27 0;
 #X coords 0 -1 1 1 100 150 2 5 5;
diff --git a/puredata/radio_alumi_B.pd b/puredata/radio_alumi_B.pd
index fb6cd79..20befb8 100644
--- a/puredata/radio_alumi_B.pd
+++ b/puredata/radio_alumi_B.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 95 533 644 world 1;
+#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;
@@ -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.142857 0.180952 0.195238 0.238095 0.304763 0.352381 0.409524
-0.809524 0.0190477 0.0285714 0.161905 0.209524 0.295239 0.380953 0.885714
-0.0285714 0.0285714 0.0285714 0.209524 0.219048 0.304762 0.723809 0.133333
-0.161905 0.195238 0.228572 0.238096 0.371428 0.961905 0.00952375 0.00952375
-0.00952375 0.238096 0.2 0.32381 0.409524 0.828571 0.0285714 0.0285714
-0.0190476 0.190476 0.257143 0.342858 0.685714 0.0380952 0.0285715 0.0190476
-0.238096 0.380953 0.533333;
+#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.6 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 0;
+-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
@@ -249,16 +249,13 @@
 #X obj 167 269 s ALUMI_B;
 #X msg 249 329 alumiB;
 #X obj 231 452 s ALUMI_B_DONE;
-#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;
-#X obj 346 143 r E_SEQ;
-#X obj 271 138 v \$0-STRESS;
-#X obj 271 161 *;
-#X obj 271 184 v \$0-STRESS;
 #X obj 88 306 riff1 900 3205 500;
-#X obj 271 62 loadbang;
-#X connect 0 0 31 0;
+#X obj 272 112 v \$0-STRESS;
+#X obj 272 158 v \$0-STRESS;
+#X obj 272 92 bng 15 250 50 0 empty WORLD_evt_half r:WORLD_evt_half
+17 7 0 10 -262144 -1 -1;
+#X obj 272 135 * 0.5;
+#X connect 0 0 25 0;
 #X connect 1 0 23 0;
 #X connect 2 0 5 0;
 #X connect 2 0 24 0;
@@ -266,7 +263,7 @@
 #X connect 5 0 6 0;
 #X connect 7 0 8 0;
 #X connect 9 0 4 0;
-#X connect 10 0 31 0;
+#X connect 10 0 25 0;
 #X connect 13 0 12 0;
 #X connect 14 0 13 1;
 #X connect 15 0 14 0;
@@ -274,12 +271,10 @@
 #X connect 20 0 10 0;
 #X connect 21 0 7 0;
 #X connect 21 0 18 0;
-#X connect 23 0 31 1;
-#X connect 25 0 28 0;
-#X connect 26 0 25 0;
-#X connect 27 0 29 1;
-#X connect 28 0 29 0;
-#X connect 29 0 30 0;
-#X connect 31 0 13 0;
-#X connect 31 3 2 0;
+#X connect 23 0 25 1;
+#X connect 25 0 13 0;
+#X connect 25 3 2 0;
+#X connect 26 0 29 0;
+#X connect 28 0 26 0;
+#X connect 29 0 27 0;
 #X coords 0 -1 1 1 100 150 2 5 5;
diff --git a/puredata/radio_bongbong.pd b/puredata/radio_bongbong.pd
index c6068e7..ea67362 100644
--- a/puredata/radio_bongbong.pd
+++ b/puredata/radio_bongbong.pd
@@ -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 1.01905 1.03809 1.05714 0.990476 0.952381 0.933334 0.904762 0.819048
-0.838095 0.857143;
+#A 0 1.77873 1.51677 1.81633 1.49051 1.73577 1.37524 1.68919 1.3473
+1.33718 1.60217;
 #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 0;
+-4034 -1 3;
 #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 3 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 obj 164 67 v \$0-STATE;
-#N canvas 241 187 533 644 world 1;
+#N canvas 241 128 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 +;
@@ -54,7 +54,7 @@
 #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 3
+#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;
@@ -271,13 +271,8 @@
 #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 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 317 129 v \$0-STRESS;
+#X obj 317 175 v \$0-STRESS;
 #X obj 231 426 v \$0-STATE;
 #X obj 326 427 == 0;
 #X obj 326 448 sel 1;
@@ -296,15 +291,17 @@
 #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 obj 317 109 bng 15 250 50 0 empty WORLD_evt_half r:WORLD_evt_half
+17 7 0 10 -262144 -1 -1;
+#X obj 317 152 * 0.5;
 #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 41 0;
+#X connect 4 0 37 0;
 #X connect 9 0 19 0;
-#X connect 9 3 31 0;
+#X connect 9 3 27 0;
 #X connect 11 0 12 0;
 #X connect 13 0 16 0;
 #X connect 15 0 11 0;
@@ -312,23 +309,21 @@
 #X connect 19 0 18 0;
 #X connect 20 0 19 1;
 #X connect 21 0 20 0;
-#X connect 22 0 25 0;
-#X connect 23 0 22 0;
-#X connect 24 0 26 1;
+#X connect 22 0 40 0;
+#X connect 24 0 28 0;
 #X connect 25 0 26 0;
-#X connect 26 0 27 0;
-#X connect 28 0 32 0;
-#X connect 29 0 30 0;
-#X connect 30 0 2 0;
-#X connect 30 1 42 0;
-#X connect 31 0 28 0;
-#X connect 32 0 34 0;
-#X connect 33 0 29 0;
-#X connect 33 0 38 0;
-#X connect 34 0 33 0;
-#X connect 34 1 33 0;
-#X connect 35 0 36 0;
-#X connect 37 0 16 0;
-#X connect 41 0 14 0;
-#X connect 42 0 39 0;
+#X connect 26 0 2 0;
+#X connect 26 1 38 0;
+#X connect 27 0 24 0;
+#X connect 28 0 30 0;
+#X connect 29 0 25 0;
+#X connect 29 0 34 0;
+#X connect 30 0 29 0;
+#X connect 30 1 29 0;
+#X connect 31 0 32 0;
+#X connect 33 0 16 0;
+#X connect 37 0 14 0;
+#X connect 38 0 35 0;
+#X connect 39 0 22 0;
+#X connect 40 0 23 0;
 #X coords 0 -1 1 1 100 100 2 5 5;
diff --git a/puredata/radio_copper.pd b/puredata/radio_copper.pd
index 686c086..6c2e9b0 100644
--- a/puredata/radio_copper.pd
+++ b/puredata/radio_copper.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
-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,7 +41,7 @@
 #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;
@@ -221,19 +221,18 @@
 #X connect 19 0 7 0;
 #X restore 48 226 pd expressions;
 #N canvas 0 23 450 278 (subpatch) 0;
-#X array copper 25 float 3;
-#A 0 0.314285 0.314285 0.314285 0.00952381 0.00952387 0.00952387 0.314286
-0.314285 0.304762 0.0190476 0.0190476 0.0190476 0.314286 0.314286 0.314286
-0.304762 0.0190476 0.0190476 0.0190476 0.314285 0.314285 0.323809 0.323809
-0.0190476 0.0190476;
-#X coords 0 1 25 0 50 50 1 0 0;
+#X array copper 15 float 3;
+#A 0 0.380952 0.428575 0.447622 0.485717 0.523812 0.580955 0.61905
+0.657145 0.714287 0.780954 0.800001 0.857144 0.895239 0.933334 0.971429
+;
+#X coords 0 1 15 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 3;
+-262144 -1 1;
 #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
@@ -246,16 +245,13 @@
 #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 112 metro 2000;
-#X obj 302 92 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
--1;
-#X obj 377 140 r E_SEQ;
-#X obj 302 135 v \$0-STRESS;
-#X obj 302 158 *;
-#X obj 302 181 v \$0-STRESS;
 #X obj 88 306 riff1_random 900 3204 1000 1300;
-#X obj 302 59 loadbang;
-#X connect 0 0 31 0;
+#X obj 317 129 v \$0-STRESS;
+#X obj 317 175 v \$0-STRESS;
+#X obj 317 109 bng 15 250 50 0 empty WORLD_evt_half r:WORLD_evt_half
+17 7 0 10 -262144 -1 -1;
+#X obj 317 152 * 0.5;
+#X connect 0 0 25 0;
 #X connect 1 0 23 0;
 #X connect 2 0 5 0;
 #X connect 2 0 22 0;
@@ -263,20 +259,18 @@
 #X connect 5 0 6 0;
 #X connect 7 0 8 0;
 #X connect 9 0 4 0;
-#X connect 10 0 31 0;
+#X connect 10 0 25 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 31 1;
+#X connect 23 0 25 1;
 #X connect 24 0 23 0;
-#X connect 25 0 28 0;
-#X connect 26 0 25 0;
-#X connect 27 0 29 1;
-#X connect 28 0 29 0;
-#X connect 29 0 30 0;
-#X connect 31 0 16 0;
-#X connect 31 3 2 0;
+#X connect 25 0 16 0;
+#X connect 25 3 2 0;
+#X connect 26 0 29 0;
+#X connect 28 0 26 0;
+#X connect 29 0 27 0;
 #X coords 0 -1 1 1 100 150 2 5 5;
diff --git a/puredata/radio_drawer.pd b/puredata/radio_drawer.pd
index 9d910a8..9d94ec7 100644
--- a/puredata/radio_drawer.pd
+++ b/puredata/radio_drawer.pd
@@ -239,16 +239,13 @@
 #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 98 metro 2000;
-#X obj 280 78 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
--1;
-#X obj 355 126 r E_SEQ;
-#X obj 280 121 v \$0-STRESS;
-#X obj 280 144 *;
-#X obj 280 167 v \$0-STRESS;
 #X obj 89 307 riff1_random 700 4403 700 1000;
-#X obj 280 45 loadbang;
-#X connect 0 0 31 0;
+#X obj 282 108 v \$0-STRESS;
+#X obj 282 154 v \$0-STRESS;
+#X obj 282 88 bng 15 250 50 0 empty WORLD_evt_half r:WORLD_evt_half
+17 7 0 10 -262144 -1 -1;
+#X obj 282 131 * 0.5;
+#X connect 0 0 25 0;
 #X connect 1 0 19 0;
 #X connect 2 0 5 0;
 #X connect 2 0 17 0;
@@ -256,20 +253,18 @@
 #X connect 5 0 6 0;
 #X connect 7 0 8 0;
 #X connect 9 0 4 0;
-#X connect 10 0 31 0;
+#X connect 10 0 25 0;
 #X connect 14 0 7 0;
 #X connect 14 0 13 0;
 #X connect 15 0 10 0;
-#X connect 19 0 31 1;
+#X connect 19 0 25 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 28 0;
-#X connect 26 0 25 0;
-#X connect 27 0 29 1;
-#X connect 28 0 29 0;
-#X connect 29 0 30 0;
-#X connect 31 0 21 0;
-#X connect 31 3 2 0;
+#X connect 25 0 21 0;
+#X connect 25 3 2 0;
+#X connect 26 0 29 0;
+#X connect 28 0 26 0;
+#X connect 29 0 27 0;
 #X coords 0 -1 1 1 100 150 2 5 5;
diff --git a/puredata/radio_drummer.pd b/puredata/radio_drummer.pd
index 0c1a8cd..9a5498f 100644
--- a/puredata/radio_drummer.pd
+++ b/puredata/radio_drummer.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 +;
@@ -41,7 +41,7 @@
 #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;
@@ -255,18 +255,18 @@
 #X restore 48 226 pd expressions;
 #N canvas 0 23 450 278 (subpatch) 0;
 #X array drummerA 30 float 3;
-#A 0 0.095238 0.133333 0.12381 0.200001 0.304763 0.190477 0.24762 0.380954
-0.238096 0.0476186 0.0666664 0.24762 0.180953 0.285714 0.171429 0.180953
-0.228572 0.295239 0.419048 0.12381 0.24762 0.161905 0.361906 0.314287
-0.37143 0.180953 0.257144 0.104762 0.0666664 0.266668;
+#A 0 0.180952 0.161905 0.161905 0.161905 0.161905 0.161905 0.161905
+0.161905 0.161905 0.161905 0.161905 0.161905 0.161905 0.161905 0.152381
+0.152381 0.152381 0.152381 0.152381 0.152381 0.152381 0.152381 0.152381
+0.152381 0.152381 0.152381 0.152381 0.152381 0.152381 0.152381;
 #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 2;
+-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
--1 -1 1 1;
+-1 -1 0 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;
@@ -276,9 +276,9 @@
 #X obj 275 78 s DRUMMER;
 #N canvas 0 23 450 278 (subpatch) 0;
 #X array drummerB 30 float 3;
-#A 0 1.78814e-07 1.78814e-07 0.00952393 0.00952393 0.00952393 0.00952393
-0.00952393 1.78814e-07 1.78814e-07 1.78814e-07 0.00952375 0.00952375
-0.00952375 0.00952375 0.00952375 0 0 0 0 0 0 0 0 0 0 -0.00952357 -0.00952357
+#A 0 1.78814e-07 1.78814e-07 0.628571 0.00952393 0.00952393 0.00952393
+0.00952393 1.78814e-07 1.78814e-07 1.78814e-07 0.67619 0.00952375 0.00952375
+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;
@@ -301,19 +301,16 @@
 #X obj 631 428 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
 1;
 #X obj 498 443 spigot;
-#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;
-#X obj 712 134 r E_SEQ;
-#X obj 637 129 v \$0-STRESS;
-#X obj 637 152 *;
-#X obj 637 175 v \$0-STRESS;
 #X obj 221 405 > 1;
 #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 obj 637 53 loadbang;
-#X connect 0 0 45 0;
+#X obj 473 137 v \$0-STRESS;
+#X obj 473 183 v \$0-STRESS;
+#X obj 473 117 bng 15 250 50 0 empty WORLD_evt_half r:WORLD_evt_half
+17 7 0 10 -262144 -1 -1;
+#X obj 473 160 * 0.5;
+#X connect 0 0 39 0;
 #X connect 1 0 22 0;
 #X connect 2 0 5 0;
 #X connect 2 0 19 0;
@@ -321,36 +318,34 @@
 #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 39 0;
+#X connect 10 0 40 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 45 1;
+#X connect 22 0 39 1;
 #X connect 23 0 7 0;
 #X connect 23 0 13 0;
 #X connect 24 0 22 0;
-#X connect 25 0 46 0;
+#X connect 25 0 40 0;
 #X connect 26 0 30 0;
 #X connect 28 0 36 0;
 #X connect 29 0 30 0;
-#X connect 30 0 46 1;
+#X connect 30 0 40 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 40 0;
-#X connect 38 0 37 0;
-#X connect 39 0 41 1;
-#X connect 40 0 41 0;
-#X connect 41 0 42 0;
-#X connect 43 0 32 0;
-#X connect 44 0 35 0;
-#X connect 45 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 37 0 32 0;
+#X connect 38 0 35 0;
+#X connect 39 0 15 0;
+#X connect 39 2 37 0;
+#X connect 39 3 2 0;
+#X connect 40 0 28 0;
+#X connect 40 2 38 0;
+#X connect 41 0 44 0;
+#X connect 43 0 41 0;
+#X connect 44 0 42 0;
 #X coords 0 -1 1 1 100 150 2 5 5;
diff --git a/puredata/radio_flasher.pd b/puredata/radio_flasher.pd
index 28201df..8e4957f 100644
--- a/puredata/radio_flasher.pd
+++ b/puredata/radio_flasher.pd
@@ -1,4 +1,4 @@
-#N canvas 472 383 704 515 10;
+#N canvas 472 257 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
-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,7 +34,7 @@
 #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;
@@ -261,9 +261,9 @@
 #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 1 1;
+-1 0 1;
 #X obj 564 161 s NOTE;
-#X obj 564 118 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+#X obj 564 118 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
 1;
 #X msg 564 138 1500 1000 0 \$1;
 #X obj 281 231 loadbang;
@@ -313,14 +313,13 @@
 #X obj 418 406 spigot;
 #X obj 418 467 s NOTE;
 #X obj 513 406 > 50;
-#X obj 513 429 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+#X obj 513 429 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
 1;
 #X obj 418 444 spigot;
 #X obj 418 306 riff1 1000 1500 1000;
 #X obj 601 231 loadbang;
 #X msg 601 254 1002;
 #X msg 579 329 flasherB;
-#X obj 412 109 loadbang;
 #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;
@@ -329,13 +328,11 @@
 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 obj 397 166 v \$0-STRESS;
+#X obj 397 212 v \$0-STRESS;
+#X obj 397 146 bng 15 250 50 0 empty WORLD_evt_half r:WORLD_evt_half
+17 7 0 10 -262144 -1 -1;
+#X obj 397 189 * 0.5;
 #X connect 0 0 19 0;
 #X connect 1 0 2 0;
 #X connect 3 0 0 0;
@@ -381,14 +378,12 @@
 #X connect 49 0 50 0;
 #X connect 50 0 48 2;
 #X connect 51 0 48 1;
-#X connect 53 0 1 0;
+#X connect 52 0 1 0;
+#X connect 53 0 9 0;
 #X connect 54 0 9 0;
-#X connect 55 0 9 0;
+#X connect 55 0 53 0;
 #X connect 56 0 54 0;
-#X connect 57 0 55 0;
-#X connect 58 0 61 0;
-#X connect 59 0 58 0;
-#X connect 60 0 62 1;
-#X connect 61 0 62 0;
-#X connect 62 0 63 0;
+#X connect 57 0 60 0;
+#X connect 59 0 57 0;
+#X connect 60 0 58 0;
 #X coords 0 -1 1 1 100 150 2 5 5;
diff --git a/puredata/radio_frog.pd b/puredata/radio_frog.pd
index fa16397..df10ce6 100644
--- a/puredata/radio_frog.pd
+++ b/puredata/radio_frog.pd
@@ -213,17 +213,16 @@
 #X restore 48 226 pd expressions;
 #N canvas 0 23 450 278 (subpatch) 0;
 #X array frog 50 float 3;
-#A 0 0.095238 0.12381 0.171429 0.219048 0.295239 0.438097 0.514288
-0.552384 0.552384 0.514288 0.457145 0.380954 0.295239 0.190477 0.133333
-0.104762 0.0857141 0.0761902 0.0761902 0.0761902 0.00952369 0.0190476
-0.00952357 0.00952357 0.00952357 0.00952357 0.00952357 0.00952357 0.0857134
-0.0857134 0.0857134 0.104761 0.133333 0.190476 0.257143 0.390477 0.533335
-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;
+#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 0;
+-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
@@ -240,21 +239,18 @@
 #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 1
+#X obj 183 444 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
 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 117 metro 2000;
-#X obj 259 97 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
--1;
-#X obj 334 145 r E_SEQ;
-#X obj 259 140 v \$0-STRESS;
-#X obj 259 163 *;
-#X obj 259 186 v \$0-STRESS;
-#X obj 259 64 loadbang;
+#X obj 277 117 v \$0-STRESS;
+#X obj 277 163 v \$0-STRESS;
+#X obj 277 97 bng 15 250 50 0 empty WORLD_evt_half r:WORLD_evt_half
+17 7 0 10 -262144 -1 -1;
+#X obj 277 140 * 0.5;
 #X connect 0 0 23 0;
 #X connect 1 0 22 0;
 #X connect 2 0 5 0;
@@ -280,8 +276,6 @@
 #X connect 28 0 23 0;
 #X connect 29 0 22 0;
 #X connect 30 0 33 0;
-#X connect 31 0 30 0;
-#X connect 32 0 34 1;
-#X connect 33 0 34 0;
-#X connect 34 0 35 0;
+#X connect 32 0 30 0;
+#X connect 33 0 31 0;
 #X coords 0 -1 1 1 100 150 2 5 5;
diff --git a/puredata/radio_rounder.pd b/puredata/radio_rounder.pd
index 540a485..946a4a1 100644
--- a/puredata/radio_rounder.pd
+++ b/puredata/radio_rounder.pd
@@ -214,17 +214,19 @@
 #X connect 16 0 14 0;
 #X restore 48 226 pd expressions;
 #N canvas 0 23 450 278 (subpatch) 0;
-#X array rounder 40 float 3;
-#A 0 0.333333 0.409523 0.476189 0.552379 0.599998 0.599998 0.209524
-0.285714 0.361904 0.419046 0.457141 0.485712 0.485712 0.104762 0.228571
-0.314285 0.380951 0.447617 0.52381 0.161905 0.571429 -0.18095 -0.238093
--0.285711 -0.314283 -0.304759 -0.00952274 -0.123808 -0.238093 -0.323806
--0.380949 -0.447615 -0.533329 -0.0190467 -0.190474 -0.295235 -0.342854
--0.361902 -0.390473 -0.419044;
-#X coords 0 1 40 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 0;
+-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
@@ -241,16 +243,13 @@
 #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 114 metro 2000;
-#X obj 238 94 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
--1;
-#X obj 313 142 r E_SEQ;
-#X obj 238 137 v \$0-STRESS;
-#X obj 238 160 *;
-#X obj 238 183 v \$0-STRESS;
 #X obj 88 306 riff1 900 4002 500;
-#X obj 238 61 loadbang;
-#X connect 0 0 31 0;
+#X obj 233 129 v \$0-STRESS;
+#X obj 233 175 v \$0-STRESS;
+#X obj 233 109 bng 15 250 50 0 empty WORLD_evt_half r:WORLD_evt_half
+17 7 0 10 -262144 -1 -1;
+#X obj 233 152 * 0.5;
+#X connect 0 0 25 0;
 #X connect 1 0 19 0;
 #X connect 2 0 5 0;
 #X connect 2 0 18 0;
@@ -258,20 +257,18 @@
 #X connect 5 0 6 0;
 #X connect 7 0 8 0;
 #X connect 9 0 4 0;
-#X connect 10 0 31 0;
+#X connect 10 0 25 0;
 #X connect 15 0 7 0;
 #X connect 15 0 13 0;
 #X connect 16 0 10 0;
-#X connect 19 0 31 1;
+#X connect 19 0 25 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 28 0;
-#X connect 26 0 25 0;
-#X connect 27 0 29 1;
-#X connect 28 0 29 0;
-#X connect 29 0 30 0;
-#X connect 31 0 21 0;
-#X connect 31 3 2 0;
+#X connect 25 0 21 0;
+#X connect 25 3 2 0;
+#X connect 26 0 29 0;
+#X connect 28 0 26 0;
+#X connect 29 0 27 0;
 #X coords 0 -1 1 1 100 150 2 5 5;
diff --git a/puredata/radio_suitcase.pd b/puredata/radio_suitcase.pd
index d50097a..625bc1e 100644
--- a/puredata/radio_suitcase.pd
+++ b/puredata/radio_suitcase.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 +;
@@ -342,42 +342,24 @@
 1;
 #X obj 350 450 loadbang;
 #N canvas 0 23 450 278 (subpatch) 0;
-#X array suitcaseA 100 float 3;
-#A 0 0.552379 0.257145 0.409523 0.457141 0.476188 0.495235 0.504759
-0.523806 0.523806 0.523806 0.514282 0.495235 0.476188 0.32381 0.285715
-0.276192 0.276192 0.295239 0.352383 0.409525 0.447619 0.485714 0.495238
-0.514285 0.523808 0.533332 0.533332 0.514285 0.504761 0.47619 0.342857
-0.304763 0.295239 0.295239 0.39048 0.39048 0.466669 0.485716 0.523811
-0.542858 0.561906 0.571429 0.590476 0.6 0.609524 0.609524 0.609524
-0.580948 0.523806 0.228574 0.200003 0.200003 0.209526 0.21905 0.228574
-0.247621 0.400003 0.41905 0.466668 0.52381 0.571428 0.580952 0.580952
-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 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 restore 26 46 graph;
 #X obj 10 138 hradio 15 1 0 6 empty \$0-word empty 0 -8 0 10 -204786
--13381 -1 5;
+-13381 -1 3;
 #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 100 float 3;
-#A 0 0.409523 0.42857 0.438094 0.447618 0.447618 0.457141 0.466665
-0.466665 0.476188 0.476188 0.476188 0.466665 0.438094 0.419047 0.409523
-0.399999 0.399999 0.399999 0.399999 0.399999 0.409523 0.419047 0.457141
-0.485712 0.495236 0.504759 0.514283 0.514283 0.523807 0.523807 0.523807
-0.523807 0.523807 0.520632 0.517458 0.514283 0.504759 0.495236 0.447618
-0.438094 0.399999 0.390476 0.380952 0.371429 0.366667 0.361905 0.361905
-0.357143 0.352381 0.352381 0.352381 0.361905 0.361905 0.390476 0.4
-0.404762 0.419047 0.428571 0.457142 0.476189 0.485712 0.485712 0.485712
-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 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 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;
@@ -412,14 +394,11 @@
 -1 -1;
 #X obj 641 127 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
 -1 -1;
-#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;
-#X obj 461 217 r E_SEQ;
-#X obj 386 212 v \$0-STRESS;
-#X obj 386 235 *;
-#X obj 386 258 v \$0-STRESS;
-#X obj 386 136 loadbang;
+#X obj 369 185 v \$0-STRESS;
+#X obj 369 231 v \$0-STRESS;
+#X obj 369 165 bng 15 250 50 0 empty WORLD_evt_half r:WORLD_evt_half
+17 7 0 10 -262144 -1 -1;
+#X obj 369 208 * 0.5;
 #X connect 0 0 31 0;
 #X connect 1 0 24 0;
 #X connect 2 0 5 0;
@@ -458,8 +437,6 @@
 #X connect 42 0 46 0;
 #X connect 44 0 41 0;
 #X connect 47 0 50 0;
-#X connect 48 0 47 0;
-#X connect 49 0 51 1;
-#X connect 50 0 51 0;
-#X connect 51 0 52 0;
+#X connect 49 0 47 0;
+#X connect 50 0 48 0;
 #X coords 0 -1 1 1 100 150 2 5 5;
diff --git a/puredata/radio_tanker_head.pd b/puredata/radio_tanker_head.pd
index f3d5818..24fbf37 100644
--- a/puredata/radio_tanker_head.pd
+++ b/puredata/radio_tanker_head.pd
@@ -224,14 +224,17 @@
 #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;
-#A 0 -1.13333 -1.02856 -0.895231 -0.761898 -0.590471 -0.761899 -0.933326
--1.06666 -0.771422 -0.609519 -0.771422 -0.980946 -1.08571 -0.86666
--0.742851;
-#X coords 0 1 15 0 50 50 1 0 0;
+#X array tankerH 40 float 3;
+#A 0 0.590476 0.609524 0.628571 0.628571 0.628571 0.628571 0.590476
+0.542857 0.52381 0.485715 0.466667 0.476191 0.476191 0.495239 0.514286
+0.533334 0.542857 0.552381 0.552381 0.552381 0.561905 0.47619 -0.590472
+-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
@@ -248,16 +251,13 @@
 #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 111 metro 2000;
-#X obj 264 91 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
--1;
-#X obj 339 139 r E_SEQ;
-#X obj 264 134 v \$0-STRESS;
-#X obj 264 157 *;
-#X obj 264 180 v \$0-STRESS;
 #X obj 88 305 riff1 500 4001 800;
-#X obj 264 58 loadbang;
-#X connect 0 0 31 0;
+#X obj 265 104 v \$0-STRESS;
+#X obj 265 150 v \$0-STRESS;
+#X obj 265 84 bng 15 250 50 0 empty WORLD_evt_half r:WORLD_evt_half
+17 7 0 10 -262144 -1 -1;
+#X obj 265 127 * 0.5;
+#X connect 0 0 25 0;
 #X connect 1 0 23 0;
 #X connect 2 0 5 0;
 #X connect 2 0 22 0;
@@ -265,20 +265,18 @@
 #X connect 5 0 6 0;
 #X connect 7 0 8 0;
 #X connect 9 0 4 0;
-#X connect 10 0 31 0;
+#X connect 10 0 25 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 31 1;
+#X connect 23 0 25 1;
 #X connect 24 0 23 0;
-#X connect 25 0 28 0;
-#X connect 26 0 25 0;
-#X connect 27 0 29 1;
-#X connect 28 0 29 0;
-#X connect 29 0 30 0;
-#X connect 31 0 16 0;
-#X connect 31 3 2 0;
+#X connect 25 0 16 0;
+#X connect 25 3 2 0;
+#X connect 26 0 29 0;
+#X connect 28 0 26 0;
+#X connect 29 0 27 0;
 #X coords 0 -1 1 1 100 150 2 5 5;
diff --git a/puredata/radio_tanker_side.pd b/puredata/radio_tanker_side.pd
index 433eb68..99e9d30 100644
--- a/puredata/radio_tanker_side.pd
+++ b/puredata/radio_tanker_side.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 +;
@@ -208,14 +208,15 @@
 #X connect 16 0 14 0;
 #X restore 48 226 pd expressions;
 #N canvas 0 23 450 278 (subpatch) 0;
-#X array tankerS 16 float 3;
-#A 0 0.819047 0.771428 0.752381 2.74181e-06 0.00952315 0.00952315 0.638096
-0.666667 0.8 0.942857 0.161907 0.019051 0.866666 0.428573 0.342856
-0.257142;
-#X coords 0 1 16 0 50 50 1 0 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 restore 29 46 graph;
 #X obj 23 138 hradio 15 1 0 4 empty \$0-word empty 0 -8 0 10 -204786
--159808 -1 1;
+-159808 -1 2;
 #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
@@ -232,16 +233,13 @@
 #X obj 167 269 s TANKER_S;
 #X msg 300 329 tankerS;
 #X obj 288 452 s TANKER_S_DONE;
-#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;
-#X obj 385 142 r E_SEQ;
-#X obj 310 137 v \$0-STRESS;
-#X obj 310 160 *;
-#X obj 310 183 v \$0-STRESS;
 #X obj 85 306 riff1_random 20 1041 500 700;
-#X obj 310 61 loadbang;
-#X connect 0 0 31 0;
+#X obj 317 129 v \$0-STRESS;
+#X obj 317 175 v \$0-STRESS;
+#X obj 317 109 bng 15 250 50 0 empty WORLD_evt_half r:WORLD_evt_half
+17 7 0 10 -262144 -1 -1;
+#X obj 317 152 * 0.5;
+#X connect 0 0 25 0;
 #X connect 1 0 23 0;
 #X connect 2 0 5 0;
 #X connect 2 0 24 0;
@@ -249,7 +247,7 @@
 #X connect 5 0 6 0;
 #X connect 7 0 8 0;
 #X connect 9 0 4 0;
-#X connect 10 0 31 0;
+#X connect 10 0 25 0;
 #X connect 16 0 15 0;
 #X connect 17 0 16 1;
 #X connect 18 0 17 0;
@@ -257,12 +255,10 @@
 #X connect 20 0 7 0;
 #X connect 20 0 13 0;
 #X connect 21 0 10 0;
-#X connect 23 0 31 1;
-#X connect 25 0 28 0;
-#X connect 26 0 25 0;
-#X connect 27 0 29 1;
-#X connect 28 0 29 0;
-#X connect 29 0 30 0;
-#X connect 31 0 16 0;
-#X connect 31 3 2 0;
+#X connect 23 0 25 1;
+#X connect 25 0 16 0;
+#X connect 25 3 2 0;
+#X connect 26 0 29 0;
+#X connect 28 0 26 0;
+#X connect 29 0 27 0;
 #X coords 0 -1 1 1 100 150 2 5 5;
diff --git a/puredata/radio_tissue.pd b/puredata/radio_tissue.pd
index 3c4cb2b..90d956d 100644
--- a/puredata/radio_tissue.pd
+++ b/puredata/radio_tissue.pd
@@ -266,28 +266,28 @@
 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 1.0476 1.23808 1.90475 3.04762 5.2381 0 1.23808 1.61903 2.76189
+5.42858 0.0952377 1.90475 3.14285 4.7619 0.0952377 1.42856 2.38095
+4.38095 0.190476 0.190476 1.23808 1.5238 2.09523 2.66666 4.28571 0
+0.857131 1.42856 1.99999 4.47619;
+#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 3;
+-159808 -1 0;
 #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.48571 -0.504758 -0.504758 -0.495234 -0.495234 -0.466663 -0.428568
+-0.40952 -0.399996 -0.390473 -0.390473 -0.380949 -0.380949 -0.390473
+-0.419044 -0.447615 -0.457139 -0.476186 -0.504758 -0.504758 -0.48571
+-0.504758 -0.504758 -0.495234 -0.495234 -0.466663 -0.428568 -0.40952
+-0.399996 -0.390473 -0.390473 -0.380949 -0.380949 -0.390473 -0.419044
+-0.447615 -0.457139 -0.476186 -0.504758 -0.504758 -0.48571 -0.504758
+-0.504758 -0.495234 -0.495234 -0.466663 -0.428568 -0.40952 -0.399996
+-0.390473;
+#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;
@@ -300,13 +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 189 metro 2000;
-#X obj 386 169 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
--1 -1;
-#X obj 461 217 r E_SEQ;
-#X obj 386 212 v \$0-STRESS;
-#X obj 386 235 *;
-#X obj 386 258 v \$0-STRESS;
 #X obj 114 21 r TISSUE;
 #X obj 48 188 r TISSUE;
 #X obj 267 122 s TISSUE;
@@ -334,51 +327,53 @@
 #X obj 375 424 v \$0-STATE;
 #X obj 355 446 s TISSUE_DONE;
 #X obj 216 549 dac~;
-#X obj 386 136 loadbang;
-#X connect 0 0 36 0;
-#X connect 1 0 33 0;
-#X connect 3 0 32 0;
+#X obj 433 140 v \$0-STRESS;
+#X obj 433 186 v \$0-STRESS;
+#X obj 433 120 bng 15 250 50 0 empty WORLD_evt_half r:WORLD_evt_half
+17 7 0 10 -262144 -1 -1;
+#X obj 433 163 * 0.5;
+#X connect 0 0 30 0;
+#X connect 1 0 27 0;
+#X connect 3 0 26 0;
 #X connect 4 0 5 0;
 #X connect 6 0 3 0;
-#X connect 7 0 36 0;
-#X connect 7 0 47 0;
+#X connect 7 0 30 0;
+#X connect 7 0 41 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 35 0;
-#X connect 18 0 34 0;
-#X connect 22 0 33 0;
-#X connect 23 0 34 0;
-#X connect 24 0 27 0;
-#X connect 25 0 24 0;
-#X connect 26 0 28 1;
-#X connect 27 0 28 0;
-#X connect 28 0 29 0;
-#X connect 30 0 4 0;
-#X connect 30 0 14 0;
-#X connect 31 0 7 0;
-#X connect 33 0 36 1;
-#X connect 34 0 35 1;
-#X connect 35 0 21 0;
-#X connect 35 2 43 0;
-#X connect 36 0 9 0;
-#X connect 36 2 38 0;
-#X connect 36 3 46 0;
-#X connect 36 3 50 0;
-#X connect 37 0 39 0;
-#X connect 38 0 37 0;
-#X connect 39 0 45 0;
-#X connect 40 0 41 0;
-#X connect 40 1 42 0;
-#X connect 43 0 40 0;
-#X connect 44 0 48 0;
-#X connect 45 0 54 0;
-#X connect 45 0 54 1;
-#X connect 46 0 44 0;
-#X connect 47 0 44 0;
-#X connect 48 0 45 1;
-#X connect 50 0 51 0;
-#X connect 50 0 53 0;
-#X connect 51 0 52 0;
+#X connect 17 0 29 0;
+#X connect 18 0 28 0;
+#X connect 22 0 27 0;
+#X connect 23 0 28 0;
+#X connect 24 0 4 0;
+#X connect 24 0 14 0;
+#X connect 25 0 7 0;
+#X connect 27 0 30 1;
+#X connect 28 0 29 1;
+#X connect 29 0 21 0;
+#X connect 29 2 37 0;
+#X connect 30 0 9 0;
+#X connect 30 2 32 0;
+#X connect 30 3 40 0;
+#X connect 30 3 44 0;
+#X connect 31 0 33 0;
+#X connect 32 0 31 0;
+#X connect 33 0 39 0;
+#X connect 34 0 35 0;
+#X connect 34 1 36 0;
+#X connect 37 0 34 0;
+#X connect 38 0 42 0;
+#X connect 39 0 48 0;
+#X connect 39 0 48 1;
+#X connect 40 0 38 0;
+#X connect 41 0 38 0;
+#X connect 42 0 39 1;
+#X connect 44 0 45 0;
+#X connect 44 0 47 0;
+#X connect 45 0 46 0;
+#X connect 49 0 52 0;
+#X connect 51 0 49 0;
+#X connect 52 0 50 0;
 #X coords 0 -1 1 1 100 150 2 5 5;
diff --git a/puredata/radio_yellow.pd b/puredata/radio_yellow.pd
index 39a9da4..43853e2 100644
--- a/puredata/radio_yellow.pd
+++ b/puredata/radio_yellow.pd
@@ -264,18 +264,15 @@
 #X connect 25 0 11 0;
 #X restore 48 225 pd expressions;
 #N canvas 0 23 450 278 (subpatch) 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 array yellowA 30 float 3;
+#A 0 0.580952 0.580952 0.580952 0.571429 0.571429 0.571429 0.571429
+0.571429 0.561905 0.561905 0.561905 0.561905 0.561905 0.561905 0.561905
+0.561905 0.561905 0.561905 0.561905 0.561905 0.561905 0.561905 0.561905
+0.561905 0.561905 0.561905 0.561905 0.561905 0.561905 0.561905;
+#X coords 0 1 30 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 1;
+-128992 -1 3;
 #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;
@@ -308,24 +305,18 @@
 #X msg 579 329 yellowB;
 #X obj 231 451 s YELLOW_DONE;
 #N canvas 0 23 450 278 (subpatch) 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 array yellowB 30 float 3;
+#A 0 0.819048 0.819048 0.819048 0.819048 0.819048 0.819048 0.819048
+0.819048 0.819048 0.828571 0.828571 0.828571 0.838095 0.838095 0.847619
+0.847619 0.857143 0.857143 0.857143 0.857143 0.866666 0.866666 0.866666
+0.866666 0.866666 0.866666 0.857143 0.847619 0.838095 0.809524;
+#X coords 0 1 30 0 25 25 1 0 0;
 #X restore 35 93 graph;
-#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;
-#X obj 505 156 r E_SEQ;
-#X obj 430 151 v \$0-STRESS;
-#X obj 430 174 *;
-#X obj 430 197 v \$0-STRESS;
-#X obj 430 75 loadbang;
+#X obj 454 139 v \$0-STRESS;
+#X obj 454 185 v \$0-STRESS;
+#X obj 454 119 bng 15 250 50 0 empty WORLD_evt_half r:WORLD_evt_half
+17 7 0 10 -262144 -1 -1;
+#X obj 454 162 * 0.5;
 #X connect 1 0 11 0;
 #X connect 2 0 3 0;
 #X connect 4 0 1 0;
@@ -354,8 +345,6 @@
 #X connect 31 0 29 1;
 #X connect 32 0 30 1;
 #X connect 35 0 38 0;
-#X connect 36 0 35 0;
-#X connect 37 0 39 1;
-#X connect 38 0 39 0;
-#X connect 39 0 40 0;
+#X connect 37 0 35 0;
+#X connect 38 0 36 0;
 #X coords 0 -1 1 1 100 150 2 5 5;
diff --git a/puredata/radio_yellowhose.pd b/puredata/radio_yellowhose.pd
index e1d2975..a3b8eb0 100644
--- a/puredata/radio_yellowhose.pd
+++ b/puredata/radio_yellowhose.pd
@@ -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 +;
@@ -34,7 +34,7 @@
 #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;
@@ -44,7 +44,7 @@
 #X obj 238 303 loadbang;
 #X text 78 227 condition of state change;
 #X obj 238 346 metro 100;
-#N canvas 2 95 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
 ;
@@ -359,7 +359,7 @@
 #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 0 1;
+-4034 -1 1 1;
 #X obj 164 21 r YHOSE;
 #X obj 48 187 r YHOSE;
 #X obj 283 110 s YHOSE;
@@ -406,24 +406,21 @@
 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 115 metro 2000;
-#X obj 572 95 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
--1;
-#X obj 647 143 r E_SEQ;
-#X obj 572 138 v \$0-STRESS;
-#X obj 572 161 *;
-#X obj 572 184 v \$0-STRESS;
 #X obj 88 305 riff1_random 700 3207 600 900;
-#X obj 572 62 loadbang;
+#X obj 427 120 v \$0-STRESS;
+#X obj 427 166 v \$0-STRESS;
+#X obj 427 100 bng 15 250 50 0 empty WORLD_evt_half r:WORLD_evt_half
+17 7 0 10 -262144 -1 -1;
+#X obj 427 143 * 0.5;
 #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 40 0;
+#X connect 4 0 34 0;
 #X connect 9 0 1 0;
 #X connect 9 0 7 0;
 #X connect 10 0 4 0;
-#X connect 12 0 40 0;
+#X connect 12 0 34 0;
 #X connect 13 0 30 0;
 #X connect 14 0 16 0;
 #X connect 14 0 29 0;
@@ -437,14 +434,12 @@
 #X connect 24 0 31 0;
 #X connect 27 0 26 0;
 #X connect 28 0 31 0;
-#X connect 30 0 40 1;
+#X connect 30 0 34 1;
 #X connect 31 0 32 1;
 #X connect 32 0 27 0;
-#X connect 34 0 37 0;
-#X connect 35 0 34 0;
-#X connect 36 0 38 1;
-#X connect 37 0 38 0;
-#X connect 38 0 39 0;
-#X connect 40 0 19 0;
-#X connect 40 3 14 0;
+#X connect 34 0 19 0;
+#X connect 34 3 14 0;
+#X connect 35 0 38 0;
+#X connect 37 0 35 0;
+#X connect 38 0 36 0;
 #X coords 0 -1 1 1 100 150 2 5 5;