diff --git a/crickets/src/main.cpp b/crickets/src/main.cpp
index 5df295f..0589ee2 100755
--- a/crickets/src/main.cpp
+++ b/crickets/src/main.cpp
@@ -21,7 +21,7 @@
 //============<identities>============
 //
 #define MY_GROUP_ID   (3000)
-#define MY_ID         (MY_GROUP_ID + 202)
+#define MY_ID         (MY_GROUP_ID + 789)
 #define MY_SIGN       ("CRICKET")
 //
 //============</identities>============
@@ -96,23 +96,39 @@ Scheduler runner;
 #include <Servo.h>
 // my tasks
 int speed = 0;
+bool isactive = false;
 void set_speed() {
   int r = speed;
   analogWrite(SERVO_PIN, r);
   MONITORING_SERIAL.print("set_speed:");
   MONITORING_SERIAL.println(r);
+  isactive = true;
 }
 Task set_speed_task(0, TASK_ONCE, &set_speed);
 //
 void rest() {
   analogWrite(SERVO_PIN, 0);
+  isactive = false;
 }
 Task rest_task(0, TASK_ONCE, &rest);
+//
+uint8_t watch_counter = 0;
+void watcher() {
+  if (isactive) {
+    if (watch_counter > 3) {
+      rest_task.restartDelayed(10);
+      watch_counter = 0;
+    } else {
+      watch_counter++;
+    }
+  }
+}
+Task watcher_task(1000, TASK_FOREVER, &watcher, &runner, true);
 //*-*-*-*-*-*-*-*-*-*-*-*-*
 
 //
 extern Task hello_task;
-static int hello_delay = 0;
+static int hello_delay = 2000;
 void hello() {
   //
   byte mac[6];
@@ -125,7 +141,7 @@ void hello() {
   count++;
   hello.h1 = (count % 1000);
   hello.h2 = speed;
-  // hello.h3 = 0;
+  hello.h3 = (isactive ? 1 : 0);
   // hello.h4 = 0;
   //
   uint8_t frm_size = sizeof(Hello) + 2;
@@ -185,6 +201,7 @@ void onNoteHandler(Note & n) {
       //
       if (n.onoff == 1) {
         set_speed_task.restartDelayed(10);
+        watch_counter = 0;
       } else if (n.onoff == 0) {
         rest_task.restartDelayed(10);
       }
diff --git a/id.list b/id.list
index e656451..adbe9ae 100644
--- a/id.list
+++ b/id.list
@@ -36,4 +36,4 @@
     == gonggong x 1 ~ 4001
 
 - bird
-    == cricket x 1 ~ 3100
+    == cricket x 1 ~ 4100
diff --git a/puredata/array_copier.pd b/puredata/array_copier.pd
new file mode 100644
index 0000000..6290a4b
--- /dev/null
+++ b/puredata/array_copier.pd
@@ -0,0 +1,36 @@
+#N canvas 1 89 404 298 10;
+#X obj 123 148 array size;
+#X floatatom 123 172 5 0 0 0 - - -;
+#X obj 123 194 array size;
+#X obj 200 153 loadbang;
+#X obj 56 235 array get;
+#X obj 56 258 array set;
+#X obj 76 125 t b b a b a;
+#X obj 127 217 loadbang;
+#X obj 76 23 inlet;
+#X obj 200 176 symbol \$1;
+#X obj 127 240 symbol \$1;
+#X obj 26 143 outlet;
+#X obj 265 14 loadbang;
+#X obj 265 37 symbol \$1;
+#X obj 265 60 makefilename %s%%d;
+#X obj 76 101 makefilename;
+#X msg 265 83 set \$1;
+#X connect 0 0 1 0;
+#X connect 1 0 2 0;
+#X connect 3 0 9 0;
+#X connect 4 0 5 0;
+#X connect 6 0 11 0;
+#X connect 6 1 4 0;
+#X connect 6 2 4 2;
+#X connect 6 3 0 0;
+#X connect 6 4 0 1;
+#X connect 7 0 10 0;
+#X connect 8 0 15 0;
+#X connect 9 0 2 1;
+#X connect 10 0 5 2;
+#X connect 12 0 13 0;
+#X connect 13 0 14 0;
+#X connect 14 0 16 0;
+#X connect 15 0 6 0;
+#X connect 16 0 15 0;
diff --git a/puredata/crickets_save.pd b/puredata/crickets_save.pd
new file mode 100644
index 0000000..997b637
--- /dev/null
+++ b/puredata/crickets_save.pd
@@ -0,0 +1,1185 @@
+#N canvas 1 89 450 300 12;
+#N canvas 223 171 1084 612 crickets 0;
+#X text 1042 577 >>>;
+#X text 1042 17 >>>;
+#X text 12 17 <<<;
+#X text 12 577 <<<;
+#N canvas 197 209 1174 566 save 0;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array riff11 10 float 3;
+#A 0 0.342857 0.67619 0.371429 0.685714 0.352381 0.638095 0.352381
+0.609524 0.333333 0.0285714;
+#X coords 0 1 10 0 150 105 1 0 0;
+#X restore 339 185 graph;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array riff10 50 float 3;
+#A 0 0.809524 0.809524 0.819048 0.819048 0.819048 0.809524 0.7 0.695239
+0.695239 0.695239 0.695239 0.438095 0.695239 0.690477 0.685715 0.447619
+0.680952 0.680952 0.680952 0.680952 0.680952 0.82381 0.82381 0.666666
+0.666666 0.671429 0.671429 0.814286 0.814286 0.657142 0.657142 0.657142
+0.642856 0.623807 0.623807 0.623807 0.809524 0.361905 0.809524 0.361905
+0.714285 0.714285 0.723809 0.761905 0.761905 0.771429 0.771429 0.771429
+0.771429 0.800001;
+#X coords 0 1 50 0 150 105 1 0 0;
+#X restore 179 185 graph;
+#X obj 179 317 tgl 20 0 empty empty empty 17 7 0 10 -262130 -1 -1 0
+1;
+#X obj 292 327 tgl 20 0 empty empty 3001 17 7 0 10 -257985 -1 -1 0
+1;
+#X obj 179 342 metro 2000;
+#X obj 339 317 tgl 20 0 empty empty empty 17 7 0 10 -262130 -1 -1 0
+1;
+#X obj 452 327 tgl 20 0 empty empty 3001 17 7 0 10 -257985 -1 -1 0
+1;
+#X obj 339 342 metro 2000;
+#X obj 499 317 tgl 20 0 empty empty empty 17 7 0 10 -262130 -1 -1 0
+1;
+#X obj 612 327 tgl 20 0 empty empty 3001 17 7 0 10 -257985 -1 -1 0
+1;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array riff15 30 float 3;
+#A 0 0.578571 0.864285 1.39286 0.00952381 0.00952375 0.428571 0.542857
+0.878573 0.00952381 0.00952387 1.1 0.12381 0 0 0 0 0 0 0.152381 0.152381
+0 0 0 0.495238 0 0.685714 0.514286 0 0.238095 0;
+#X coords 0 1 30 0 150 105 1 0 0;
+#X restore 499 185 graph;
+#X obj 499 342 metro 1000;
+#X obj 179 481 s NOTE;
+#X obj 339 481 s NOTE;
+#X obj 499 481 s NOTE;
+#X floatatom 279 501 5 0 0 0 - - -;
+#X obj 279 523 s X3;
+#X floatatom 439 501 5 0 0 0 - - -;
+#X obj 439 523 s X3;
+#N canvas 460 301 980 450 buoyfly 0;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array riff2 50 float 3;
+#A 0 0.285714 0.304762 0.328572 0.457144 0.504763 0.514287 0.542858
+0.542858 0.533335 0.533335 0.514287 0.495239 0.476191 0.428572 0.380953
+0.361905 0.342857 0.333333 0.333333 0.361905 0.4 0.466667 0.466667
+0.552382 0.57143 0.580954 0.590478 0.590478 0.580954 0.523811 0.457144
+0.409524 0.361905 0.304762 0.27619 0.266666 0.257142 0.180951 0.123808
+0.0761888 0.0571411 0.0571411 0.0571411 0.0476172 0.0476172 0.0380933
+0.0380933 0.0380937 0.0380937 0.333333;
+#X coords 0 1 50 0 150 105 1 0 0;
+#X restore 180 84 graph;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array riff3 50 float 3;
+#A 0 0.12381 0.12381 0.12381 0.12381 0.12381 0.12381 0.180952 0.219047
+0.257142 0.27619 0.295237 0.314285 0.323808 0.342856 0.371427 0.466664
+0.514283 0.514283 0.514283 0.504759 0.428569 0.361903 0.285713 0.247618
+0.171428 0.161906 0.200001 0.266667 0.333333 0.409523 0.533332 0.457142
+0.314286 0.180953 0.238096 0.276191 0.285714 0.266667 0.190476 0.161904
+0.123809 0.104761 0.0285701 0.0190462 -0.00952387 -0.00952387 -0.00952387
+-0.00952387 -0.00952387 -0.00952387;
+#X coords 0 1 50 0 150 105 1 0 0;
+#X restore 340 84 graph;
+#X obj 180 216 tgl 20 0 empty empty empty 17 7 0 10 -262130 -1 -1 0
+1;
+#X obj 310 244 tgl 20 0 empty empty empty 17 7 0 10 -257985 -1 -1 0
+1;
+#X obj 340 216 tgl 20 0 empty empty empty 17 7 0 10 -262130 -1 -1 0
+1;
+#X obj 470 244 tgl 20 0 empty empty empty 17 7 0 10 -257985 -1 -1 0
+1;
+#X obj 180 380 s NOTE;
+#X obj 340 380 s NOTE;
+#X floatatom 289 383 5 0 0 0 - - -;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array riff1 50 float 3;
+#A 0 0.2 0.2 0.266666 0.333332 0.390475 0.457141 0.533331 0.590473
+0.666663 0.780948 0.80952 0.80952 0.752377 0.65714 0.561902 0.519045
+0.476188 0.371427 0.257142 0.2 0.152381 0.12381 0.114286 0.0666667
+0.0190476 0.0285714 0.0285714 0.0285714 0.0285714 0.0190476 0.0190476
+0.0190476 0.609524 0.609524 0.609524 0.6 0.228571 0.238095 0.238095
+0.257143 0.12381 0.6 0.590476 0.580953 0.561905 0.552381 0.238095 0.238095
+0.238095 0.238095 ;
+#X coords 0 1 50 0 150 105 1 0 0;
+#X restore 20 84 graph;
+#X obj 20 216 tgl 20 0 empty empty empty 17 7 0 10 -262130 -1 -1 0
+1;
+#X obj 150 244 tgl 20 0 empty empty empty 17 7 0 10 -257985 -1 -1 0
+1;
+#X obj 20 380 s NOTE;
+#X text 23 27 * buoy-fly;
+#X obj 340 241 metro 500;
+#X obj 180 241 metro 500;
+#X obj 20 241 metro 500;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array riff22 50 float 3;
+#A 0 0.180953 0.161905 0.161905 0.161905 0.171429 0.180952 0.190476
+0.2 0.209524 0.209524 0.209524 0.190476 0.114285 0.133333 0.171429
+0.190476 0.228572 0.24762 0.257143 0.266667 0.276191 0.285715 0.285715
+0.276191 0.257143 0.114285 0.133333 0.152381 0.2 0.238096 0.266667
+0.314287 0.323811 0.333334 0.304763 0.142857 0.142857 0.161905 0.180952
+0.2 0.219048 0.24762 0.285715 0.295239 0.314287 0.323811 0.333334 0.333334
+0.219048 0.190476;
+#X coords 0 1 50 0 150 105 1 0 0;
+#X restore 658 82 graph;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array riff23 50 float 3;
+#A 0 0.67619 0.371429 0.390476 0.4 0.419048 0.419048 0.419048 0.419048
+0.409524 0.342857 0.295238 0.247618 0.247618 0.247618 0.266666 0.295238
+0.323809 0.390476 0.4 0.438096 0.438096 0.447619 0.447619 0.457143
+0.457143 0.4 0.314285 0.228571 0.209523 0.228571 0.247618 0.285714
+0.333333 0.4 0.476191 0.485715 0.495239 0.495239 0.495239 0.495239
+0.419048 0.285714 0.27619 0.476191 0.447619 0.380952 0.314285 0.323809
+0.342857 0.371429;
+#X coords 0 1 50 0 150 105 1 0 0;
+#X restore 818 82 graph;
+#X obj 658 214 tgl 20 0 empty empty empty 17 7 0 10 -262130 -1 -1 0
+1;
+#X obj 788 242 tgl 20 0 empty empty empty 17 7 0 10 -257985 -1 -1 0
+1;
+#X obj 818 214 tgl 20 0 empty empty empty 17 7 0 10 -262130 -1 -1 0
+1;
+#X obj 948 242 tgl 20 0 empty empty empty 17 7 0 10 -257985 -1 -1 0
+1;
+#X obj 658 378 s NOTE;
+#X obj 818 378 s NOTE;
+#X floatatom 767 381 5 0 0 0 - - -;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array riff21 50 float 3;
+#A 0 0.209524 0.209524 0.209524 0.209524 0.209524 0.219048 0.180952
+0.142857 0.123809 0.123809 0.123809 0.142857 0.152381 0.161904 0.180952
+0.2 0.2 0.190476 0.152381 0.133333 0.114285 0.114285 0.114285 0.123809
+0.133333 0.171428 0.190476 0.209524 0.238095 0.257143 0.266667 0.257143
+0.247619 0.228571 0.209523 0.190476 0.171428 0.142856 0.142856 0.133332
+0.114285 0.095237 0.0857131 0.123809 0.161904 0.209523 0.228571 0.228572
+0.228572 0.228572;
+#X coords 0 1 50 0 150 105 1 0 0;
+#X restore 498 82 graph;
+#X obj 498 214 tgl 20 0 empty empty empty 17 7 0 10 -262130 -1 -1 0
+1;
+#X obj 628 242 tgl 20 0 empty empty empty 17 7 0 10 -257985 -1 -1 0
+1;
+#X obj 498 378 s NOTE;
+#X obj 818 239 metro 500;
+#X obj 658 239 metro 500;
+#X obj 498 239 metro 500;
+#X obj 20 275 riff 800 3051;
+#X obj 180 275 riff 800 3052;
+#X obj 340 275 riff 800 3053;
+#X obj 498 273 riff 800 3054;
+#X obj 658 273 riff 800 3055;
+#X obj 818 273 riff 800 3056;
+#X msg 81 207 symbol riff1;
+#X msg 241 207 symbol riff2;
+#X msg 401 207 symbol riff3;
+#X msg 561 207 symbol riff21;
+#X msg 721 207 symbol riff22;
+#X msg 881 207 symbol riff23;
+#X connect 2 0 15 0;
+#X connect 3 0 34 3;
+#X connect 4 0 14 0;
+#X connect 5 0 35 3;
+#X connect 10 0 16 0;
+#X connect 11 0 33 3;
+#X connect 14 0 35 0;
+#X connect 15 0 34 0;
+#X connect 16 0 33 0;
+#X connect 19 0 31 0;
+#X connect 20 0 37 3;
+#X connect 21 0 30 0;
+#X connect 22 0 38 3;
+#X connect 27 0 32 0;
+#X connect 28 0 36 3;
+#X connect 30 0 38 0;
+#X connect 31 0 37 0;
+#X connect 32 0 36 0;
+#X connect 33 0 12 0;
+#X connect 34 0 6 0;
+#X connect 34 1 8 0;
+#X connect 35 0 7 0;
+#X connect 36 0 29 0;
+#X connect 37 0 23 0;
+#X connect 37 1 25 0;
+#X connect 38 0 24 0;
+#X connect 39 0 33 1;
+#X connect 40 0 34 1;
+#X connect 41 0 35 1;
+#X connect 42 0 36 1;
+#X connect 43 0 37 1;
+#X connect 44 0 38 1;
+#X restore 241 73 pd buoyfly;
+#N canvas 551 130 439 542 yellow 0;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array riff5 50 float 3;
+#A 0 0.619048 0.619048 0.628571 0.628571 0.628571 0.628571 0.638095
+0.638095 0.638095 0.638095 0.638095 0.638095 0.638095 0.638095 0.628571
+0.619048 0.619048 0.609524 0.609524 0.6 0.590476 0.585714 0.580952
+0.580952 0.571428 0.561904 0.561904 0.561904 0.55238 0.55238 0.55238
+0.542857 0.542857 0.542857 0.542857 0.542857 0.542857 0.542857 0.542857
+0.55238 0.561904 0.561904 0.571428 0.571428 0.571428 0.571428 0.571428
+0.571428 0.571428 0.571428;
+#X coords 0 1 50 0 150 105 1 0 0;
+#X restore 29 161 graph;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array riff6 50 float 3;
+#A 0 0.685715 0.723811 0.800002 0.485714 0.519047 0.552381 0.580953
+0.609524 0.626191 0.642858 0.659525 0.676191 0.685715 0.399999 0.495238
+0.533333 0.571429 0.604762 0.638096 0.653969 0.669842 0.685715 0.695239
+0.704763 0.561905 0.666667 0.704763 0.714287 0.266665 0.323808 0.35238
+0.366666 0.380951 0.399999 0.423809 0.933336 0.952384 0.957145 0.961907
+0.609524 0.628572 0.47619 0.523809 0.523809 0.523809 0.438095 0.457142
+0.457142 0.438095 0.361904;
+#X coords 0 1 50 0 150 105 1 0 0;
+#X restore 189 161 graph;
+#X obj 29 293 tgl 20 0 empty empty empty 17 7 0 10 -204786 -1 -1 0
+1;
+#X obj 159 321 tgl 20 0 empty empty empty 17 7 0 10 -4034 -1 -1 0 1
+;
+#X obj 189 293 tgl 20 0 empty empty empty 17 7 0 10 -204786 -1 -1 0
+1;
+#X obj 319 321 tgl 20 0 empty empty empty 17 7 0 10 -4034 -1 -1 0 1
+;
+#X obj 29 457 s NOTE;
+#X obj 189 457 s NOTE;
+#X text 26 115 * yellow;
+#X obj 189 318 metro 500;
+#X obj 29 318 metro 500;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array riff6-1 50 float 3;
+#A 0 0.142857 0.12381 0.12381 0.12381 0.114286 0.266666 0.304761 0.338094
+0.371428 0.371428 0.0952383 0.0952383 0.0952383 0.0952383 0.0952383
+0.0952383 0.0952383 0.209524 0.247619 0.380951 0.0952383 0.0952383
+0.0952383 0.0952383 0.133333 0.133333 0.133333 0.133333 0.133333 0.133333
+0.133333 0.209524 0.209524 0.209524 0.209524 0.133333 0.133333 0.133333
+0.133333 0.314286 0.142857 0.142857 0.142857 0.142857 0.142857 0.142857
+0.438095 0.142857 0.142857 0.142857;
+#X coords 0 1 50 0 150 105 1 0 0;
+#X restore 189 38 graph;
+#X msg 91 277 symbol riff5;
+#X msg 261 277 symbol riff6;
+#X msg 271 297 symbol riff6-1;
+#X obj 29 352 riff 800 3020;
+#X obj 189 352 riff 800 3021;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array riff6-2 50 float 3;
+#A 0 0.742857 0.580951 0.466664 0.352378 0.276187 0.223806 0.114281
+0.552379 0.409521 0.352378 0.257139 0.20952 0.123805 0.0857093 0.0476138
+0.599998 0.523807 0.447616 0.390473 0.323806 0.257139 0.20952 0.133329
+0.771428 0.723808 0.647618 0.561903 0.485712 0.371425 0.323806 0.247615
+0.223805 0.171424 0.114281 0.0857093 0.0285661 0.742857 0.62857 0.552379
+0.371426 0.304759 0.238092 0.123805 0.67619 0.657142 0.542856 0.476189
+0.409522 0.376188 0.0952342;
+#X coords 0 1 50 0 150 105 1 0 0;
+#X restore 183 -86 graph;
+#X connect 2 0 10 0;
+#X connect 3 0 15 3;
+#X connect 4 0 9 0;
+#X connect 5 0 16 3;
+#X connect 9 0 16 0;
+#X connect 10 0 15 0;
+#X connect 12 0 15 1;
+#X connect 13 0 16 1;
+#X connect 14 0 16 1;
+#X connect 15 0 6 0;
+#X connect 16 0 7 0;
+#X restore 51 54 pd yellow;
+#N canvas 233 89 1003 532 blue 0;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array riff0 50 float 3;
+#A 0 0.457143 0.457143 0.457143 0.457143 0.457143 0.457143 0.457143
+0.457143 0.457143 0.466667 0.466667 0.466667 0.466667 0.466667 0.466667
+0.466667 0.466667 0.466667 0.466667 0.476191 0.476191 0.476191 0.476191
+0.476191 0.476191 0.476191 0.476191 0.476191 0.476191 0.476191 0.466667
+0.466667 0.466667 0.466667 0.466667 0.466667 0.466667 0.466667 0.466667
+0.466667 0.466667 0.466667 0.466667 0.466667 0.457143 0.447619 0.447619
+0.447619 0.447619 0.457143;
+#X coords 0 1 50 0 150 105 1 0 0;
+#X restore 27 58 graph;
+#X obj 27 190 tgl 20 0 empty empty empty 17 7 0 10 -262130 -1 -1 0
+1;
+#X obj 157 218 tgl 20 0 empty empty empty 17 7 0 10 -257985 -1 -1 0
+1;
+#X obj 27 215 metro 2000;
+#X obj 27 354 s NOTE;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array riff12 100 float 3;
+#A 0 0.45714 0.476188 0.476188 0.485711 0.495235 0.504759 0.514283
+0.514283 0.533331 0.542855 0.552378 0.561902 0.58095 0.58095 0.599998
+0.609522 0.614284 0.619046 0.628569 0.638093 0.647617 0.657141 0.666665
+0.676189 0.685713 0.695237 0.714284 0.723808 0.738094 0.75238 0.761904
+0.771427 0.790475 0.819047 0.838095 0.857142 0.885714 0.885714 0.904762
+0.904762 0.914285 0.923809 0.933333 0.942857 0.942857 0.942857 0.952381
+0.952381 0.952381 0.952381 0.952381 0.933336 0.942859 0.980955 0.990479
+0.971434 0.971434 0.96191 0.952386 0.933338 0.89524 0.885716 0.866668
+0.84762 0.819049 0.800001 0.780953 0.780953 0.761906 0.752382 0.72381
+0.714286 0.704762 0.685715 0.676191 0.666667 0.647619 0.628572 0.619048
+0.609524 0.590476 0.590476 0.571428 0.571428 0.552381 0.542857 0.523809
+0.504761 0.495237 0.485713 0.47619 0.457142 0.447618 0.42857 0.409523
+0.409523 0.380951 0.371427 0.352381 0.314285;
+#X coords 0 1 100 0 150 105 1 0 0;
+#X restore 187 58 graph;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array riff13 100 float 3;
+#A 0 0.219048 0.247619 0.257143 0.266667 0.276191 0.285715 0.304762
+0.32381 0.328572 0.333334 0.352382 0.361906 0.371429 0.380953 0.400001
+0.409525 0.419049 0.438097 0.442858 0.457144 0.466668 0.485716 0.49524
+0.523811 0.533335 0.552383 0.552383 0.571431 0.590478 0.600002 0.604764
+0.609526 0.628574 0.657146 0.657146 0.676193 0.695241 0.704765 0.723813
+0.74286 0.752384 0.771432 0.79048 0.800004 0.809527 0.828575 0.838099
+0.857147 0.876194 0.923814 0.942862 0.961909 0.971433 0.980957 0.96191
+0.933338 0.91429 0.895242 0.895242 0.866671 0.866671 0.838099 0.819052
+0.809528 0.79048 0.761908 0.752384 0.733337 0.723813 0.714289 0.695241
+0.685717 0.676193 0.66667 0.657146 0.628574 0.61905 0.609526 0.580955
+0.571431 0.552383 0.542859 0.504764 0.49524 0.466668 0.457144 0.428573
+0.419049 0.400001 0.380954 0.37143 0.361906 0.342858 0.32381 0.304763
+0.295239 0.276191 0.266667 0.247619 0.228572;
+#X coords 0 1 100 0 150 105 1 0 0;
+#X restore 347 58 graph;
+#X obj 594 221 tgl 20 0 empty empty empty 17 7 0 10 -262130 -1 -1 0
+1;
+#X obj 294 197 tgl 20 0 empty empty empty 17 7 0 10 -257985 -1 -1 0
+1;
+#X obj 505 217 tgl 20 0 empty empty empty 17 7 0 10 -257985 -1 -1 0
+1;
+#X text 29 9 * blue drummer;
+#X msg 91 177 symbol riff0;
+#X msg 261 177 symbol riff12;
+#X msg 445 182 symbol riff13;
+#X obj 27 249 riff 400 3031;
+#X obj 314 441 s NOTE;
+#X floatatom 314 379 5 0 0 0 - - -;
+#X obj 314 399 pack f f;
+#X msg 314 420 1031 0 \$1 \$2;
+#X obj 462 439 s NOTE;
+#X floatatom 462 377 5 0 0 0 - - -;
+#X obj 462 397 pack f f;
+#X msg 462 418 1032 0 \$1 \$2;
+#X obj 347 249 riff 40 1032;
+#X obj 411 356 moses 1;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array riff12-1 100 float 3;
+#A 0 0.0190476 0.514286 0.00952375 0.447619 0.00952375 0.00952375 0.00952375
+0.0190476 0.0190476 0.0190476 0.0190476 0.0190476 0.00952375 0.00952375
+0.676191 0.6 0.00952375 0.00952375 -1.19209e-07 -1.19209e-07 -0.00952399
+-0.00952399 -0.00952399 -0.00952399 -0.00952399 -0.00952399 -0.00952399
+0.657144 0.00952381 -1.19209e-07 -1.19209e-07 -1.19209e-07 -1.19209e-07
+-1.19209e-07 0.00952375 0.00952375 0.00952375 0.00952375 0.00952375
+0.00952375 0.00952375 0.00952375 0.00952375 0.00952375 0.00952375 0.942858
+0.0190476 0.0190476 0.0190476 0.0190476 0 0 0 0 0 0 0.533333 0 0 0
+0 0 0 0 0 0 0 0 0.657143 0 0 0 0 0 0 0 0 0 1 0 0 0 0 0 0 0 0 0 0 0
+0 0.504762 0 0 0 0 0 0 0 0;
+#X coords 0 1 100 0 150 105 1 0 0;
+#X restore 519 58 graph;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array riff13-1 100 float 3;
+#A 0 0.0190477 0.0190477 0.276191 0.314286 0.047619 0.380953 0.400001
+0.419049 0.433334 0.44762 0.0571429 0.504763 0.8 0.580954 0.600002
+0.638098 0.638098 0.0285714 0.638098 0.638098 0.895238 0.600002 0.585716
+0.533335 0.514287 0.476192 0.428572 0.371429 0.0285714 0.333334 0.32381
+0.314286 0.314286 0.314286 0.32381 0.0285714 0.371429 0.733333 0.533335
+0.457144 0.409525 0.352381 0.295239 0.295239 0.257143 0.247619 0.219048
+0.171428 0.142857 0.133333 0.123809 0.114285 0.104761 0.00952202 -1.84774e-06
+-1.84774e-06 -1.84774e-06 0.400001 0.419049 0.485716 0.0380952 0.561907
+0.580954 0.838095 0.0190476 0.00952381 0.247619 0.247619 0.247619 0.276191
+0.295238 0.333334 0.342858 0.61905 0.628574 0.666669 0.695241 0.0190476
+1.00952 1.02857 1.0381 1.05714 1.07619 0.723812 0.00952381 0.657145
+0.638098 0.600002 0.390476 0.390476 0.257142 0.247618 0.266666 0.314285
+0.333333 0.428571 0.457143 0 0 0;
+#X coords 0 1 100 0 150 105 1 0 0;
+#X restore 679 58 graph;
+#X obj 187 249 riff 20 1031;
+#N canvas 0 23 450 430 metro 0;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array metroooo 50 float 3;
+#A 0 0.619047 0.75238 0.857141 1.01904 1.25714 1.27619 1.01904 0.752381
+0.647618 0.666666 0.780951 0.533333 0.628571 0.723808 0.942855 1.02857
+1.17142 1.09524 0.857143 0.69524 0.638097 0.647621 0.961902 1.12381
+0.942855 0.990473 1.11428 1.21904 1.01904 0.866665 0.704763 1.04762
+0.933331 1.03809 0.961904 0.923809 0.809524 0.885714 0.971426 0.933331
+0.90476 1.3238 1.26666 1.22857 0.761903 0.666666 0.923807 0.895236
+0.895236 0.876188;
+#X coords 0 1 50 0 150 105 1 0 0;
+#X restore 204 26 graph;
+#X msg 242 146 symbol metroooo;
+#X obj 195 173 riff 1000 1031;
+#X obj 108 129 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
+-1 -1;
+#X obj 338 273 del;
+#X obj 117 314 outlet;
+#X obj 338 294 spigot;
+#X obj 128 129 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
+1;
+#X connect 1 0 2 1;
+#X connect 2 1 4 0;
+#X connect 3 0 5 0;
+#X connect 3 0 2 0;
+#X connect 4 0 6 0;
+#X connect 6 0 3 0;
+#X connect 7 0 6 1;
+#X coords 0 -1 1 1 50 50 1 100 100;
+#X restore 356 174 pd metro;
+#X obj 263 358 moses 1;
+#X obj 739 278 print a;
+#X obj 793 281 print b;
+#X obj 746 221 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
+-1 -1;
+#X obj 739 257 random 5;
+#X obj 793 260 random 5;
+#X obj 669 338 + 400;
+#X obj 624 334 del;
+#X obj 603 262 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
+-1 -1;
+#X obj 626 293 t b b;
+#X obj 624 355 spigot;
+#X obj 634 258 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
+1;
+#X obj 667 306 random 400;
+#X connect 1 0 3 0;
+#X connect 2 0 14 3;
+#X connect 3 0 14 0;
+#X connect 8 0 17 1;
+#X connect 9 0 21 1;
+#X connect 11 0 14 1;
+#X connect 12 0 27 1;
+#X connect 13 0 23 1;
+#X connect 14 0 4 0;
+#X connect 16 0 17 0;
+#X connect 17 0 18 0;
+#X connect 18 0 15 0;
+#X connect 20 0 21 0;
+#X connect 21 0 22 0;
+#X connect 22 0 19 0;
+#X connect 23 1 24 0;
+#X connect 24 1 20 0;
+#X connect 27 1 29 0;
+#X connect 28 0 23 0;
+#X connect 29 1 16 0;
+#X connect 32 0 33 0;
+#X connect 32 0 34 0;
+#X connect 33 0 30 0;
+#X connect 34 0 31 0;
+#X connect 35 0 36 1;
+#X connect 36 0 39 0;
+#X connect 37 0 38 0;
+#X connect 38 0 36 0;
+#X connect 38 1 41 0;
+#X connect 39 0 37 0;
+#X connect 39 0 27 0;
+#X connect 40 0 39 1;
+#X connect 41 0 35 0;
+#X restore 51 83 pd blue drummer;
+#N canvas 97 145 1017 569 green 0;
+#X obj 136 343 tgl 20 0 empty empty empty 17 7 0 10 -262130 -1 -1 0
+1;
+#X obj 296 343 tgl 20 0 empty empty empty 17 7 0 10 -262130 -1 -1 0
+1;
+#X obj 136 507 s NOTE;
+#X obj 296 507 s NOTE;
+#X obj 266 373 tgl 20 0 empty empty empty 17 7 0 10 -257985 -1 -1 0
+1;
+#X obj 426 373 tgl 20 0 empty empty empty 17 7 0 10 -257985 -1 -1 0
+1;
+#X text 30 104 * green suitcase;
+#X obj 296 368 metro 500;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array riff4-1 50 float 3;
+#A 0 0.409523 0.447618 0.533332 0.552379 0.609522 0.619046 0.609522
+0.580951 0.485713 0.52381 0.323809 0.276191 0.247619 0.238096 0.238096
+0.247619 0.295238 0.361904 0.514284 0.619046 0.638093 0.647617 0.628569
+0.599998 0.476189 0.342857 0.219048 0.171429 0.171429 0.180953 0.238096
+0.342857 0.466666 0.590474 0.638093 0.676188 0.695236 0.695236 0.666664
+0.580951 0.409523 0.323809 0.285714 0.247619 0.238096 0.238096 0.238096
+0.257143 0.628569 0.561903;
+#X coords 0 1 50 0 150 105 1 0 0;
+#X restore 137 36 graph;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array riff7-1 50 float 3;
+#A 0 0.27619 0.285714 0.304762 0.323809 0.333333 0.342857 0.342857
+0.333333 0.247619 0.180953 0.161905 0.171429 0.195239 0.27619 0.35238
+0.409523 0.495237 0.495237 0.495237 0.333333 0.257143 0.180953 0.133334
+0.133334 0.152382 0.219048 0.314285 0.533332 0.561903 0.561903 0.533332
+0.514284 0.438094 0.285714 0.0857155 0.066668 0.066668 0.0761917 0.104763
+0.133334 0.171429 0.257143 0.342857 0.419047 0.419047 0.380952 0.314285
+0.266667 0.247619 0.228572;
+#X coords 0 1 50 0 150 105 1 0 0;
+#X restore 297 36 graph;
+#X obj 136 368 metro 500;
+#X msg 191 328 symbol riff4;
+#X msg 201 348 symbol riff4-1;
+#X obj 136 402 riff 800 3011;
+#X obj 296 402 riff 800 3012;
+#X msg 361 328 symbol riff7;
+#X msg 371 348 symbol riff7-1;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array riff7 100 float 3;
+#A 0 0.514285 0.523809 0.533332 0.542856 0.542856 0.542856 0.6 0.619047
+0.504761 0.495238 0.485714 0.47619 0.466667 0.809524 0.571429 0.638095
+0.638095 0.647619 0.914286 0.657142 0.657142 0.495239 0.500001 0.809523
+0.819046 0.82857 0.82857 0.838094 0.838094 0.771428 0.466667 0.457143
+0.457143 0.438096 0.438096 0.428572 0.428572 0.609521 0.609521 0.676187
+0.676187 0.68571 0.68571 0.68571 0.68571 0.647616 0.619045 0.599997
+0.847616 0.847616 0.676194 0.66667 0.619049 0.609525 0.609525 0.609525
+0.780951 0.780951 0.761903 0.75238 0.638099 0.857143 0.428571 0.428571
+0.428571 0.447619 0.457142 0.542855 0.552379 0.571426 0.599997 0.619044
+0.619044 0.619044 0.60952 0.60952 0.60952 0.599997 0.742858 0.704763
+0.685716 0.685716 0.685716 0.733334 0.92381 0.809525 0.53334 0.561911
+0.571434 0.580958 0.580958 0.58572 0.590481 0.600005 0.8 0.609529 0.61429
+0.619052 0.628576 0.6381;
+#X coords 0 1 100 0 150 105 1 0 0;
+#X restore 296 159 graph;
+#N canvas 0 23 1115 625 (subpatch) 0;
+#X array riff4-2 100 float 3;
+#A 0 0.361905 0.371429 0.390477 0.409524 0.44762 0.485715 0.504763
+0.504763 0.514287 0.409523 0.438095 0.485713 0.495237 0.495237 0.352381
+0.371429 0.4 0.428571 0.457142 0.47619 0.495237 0.4928 0.380952 0.390476
+0.419047 0.428571 0.457142 0.47619 0.495237 0.504761 0.371429 0.4 0.428571
+0.447619 0.466666 0.47619 0.485714 0.495237 0.390476 0.390476 0.4 0.409524
+0.438095 0.447619 0.476191 0.495239 0.5456 0.5536 0.592001 0.36 0.3504
+0.3648 0.380801 0.403201 0.452802 0.491202 0.5104 0.528003 0.528003
+0 0.408 0.425601 0.448001 0.492802 0 0.352 0.3664 0.384001 0.409601
+0.4336 0.48 0.507203 0.515203 0.520003 0.528003 0.529603 0.32 0.344
+0.363201 0.384001 0.390401 0.425602 0.449602 0.470403 0.510403 0.352381
+0.361905 0.371429 0.390476 0.395238 0.409524 0.419048 0.466667 0.485715
+0.409524 0.447619 0.485715 0.533334 0.552382 0.57143;
+#X coords 0 1 100 0 150 105 1 0 0;
+#X restore 135 -85 graph;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array riff7-2 100 float 3;
+#A 0 0.371429 0.342857 0.352381 0.361905 0.390476 0.4 0.428572 0.438096
+0.266666 0.304761 0.342856 0.371428 0.4 0.428571 0.457143 0.476191
+0.32381 0.352381 0.380953 0.400001 0.428572 0.438096 0.44762 0.32381
+0.361905 0.390477 0.419048 0.438096 0.476191 0.476191 0.32381 0.361905
+0.390477 0.409524 0.438096 0.457144 0.295238 0.314285 0.352381 0.390476
+0.409524 0.428572 0.44762 0.457143 0.495239 0.523811 0.533334 0.552382
+0.57143 0.352381 0.352381 0.352381 0.371429 0.380953 0.4 0.419048 0.428572
+0.428572 0.352381 0.371429 0.380953 0.4 0.409524 0.419048 0.428572
+0.333333 0.352381 0.361905 0.380953 0.419048 0.438096 0.447619 0.466667
+0.466667 0.47619 0.485714 0.44762 0 0.352381 0.380953 0.390476 0.44762
+0.44762 0.466667 0.380952 0.409524 0.419048 0.438096 0.44762 0.476191
+0.485715 0.504763 0.4 0.419048 0.428572 0.457143 0.466667 0.476191
+0 0;
+#X coords 0 1 100 0 150 105 1 0 0;
+#X restore 295 -85 graph;
+#N canvas 0 23 1115 625 (subpatch) 0;
+#X array riff4-3 100 float 3;
+#A 0 0.552381 0.552381 0.552381 0.552381 0.552381 0.542857 0.542857
+0.542857 0.542857 0.542857 0.542857 0.542857 0.542857 0.533333 0.533333
+0.533333 0.533333 0.533333 0.533333 0.533333 0.533333 0.514286 0.514286
+0.504762 0.504762 0.495238 0.495238 0.495238 0.495238 0.485714 0.485714
+0.476191 0.466667 0.47619 0.466667 0.466667 0.466667 0.466667 0.466667
+0.466667 0.457143 0.457143 0.447619 0.447619 0.457143 0.457143 0.457143
+0.457143 0.457143 0.457143 0.457143 0.457143 0.457143 0.457143 0.457143
+0.457143 0.457143 0.457143 0.457143 0.457143 0.447619 0.447619 0.457143
+0.457143 0.457143 0.457143 0.457143 0.457143 0.466666 0.466666 0.466666
+0.466666 0.466666 0.466666 0.466666 0.47619 0.47619 0.485714 0.495238
+0.495238 0.495238 0.504762 0.52381 0.514286 0.533333 0.533333 0.533333
+0.533333 0.533333 0.533333 0.533333 0.533333 0.533333 0.533333 0.533333
+0.542857 0.533333 0.542857 0.542857 0.542857;
+#X coords 0 1 100 0 150 105 1 0 0;
+#X restore 453 -85 graph;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array riff7-3 100 float 3;
+#A 0 0.495237 0.495237 0.495237 0.495237 0.495237 0.495237 0.495237
+0.495237 0.495237 0.495237 0.495237 0.485714 0.485714 0.485714 0.466667
+0.466667 0.466666 0.466666 0.457142 0.457142 0.447618 0.447618 0.438095
+0.438095 0.438095 0.438095 0.438095 0.438095 0.428571 0.428571 0.428571
+0.428571 0.428571 0.428571 0.428571 0.419048 0.419048 0.419048 0.419048
+0.419048 0.419048 0.419048 0.419048 0.419048 0.419048 0.419048 0.419048
+0.419048 0.419048 0.419048 0.419048 0.4 0.409524 0.4 0.419048 0.419048
+0.419048 0.419047 0.419047 0.419047 0.419047 0.419047 0.419047 0.419047
+0.419047 0.419047 0.419047 0.419047 0.419047 0.419048 0.419048 0.428572
+0.428572 0.438096 0.447619 0.447619 0.447619 0.457143 0.457143 0.457143
+0.47619 0.47619 0.47619 0.485714 0.485714 0.485714 0.485714 0.485714
+0.485714 0.485714 0.485714 0.47619 0.47619 0.47619 0.47619 0.47619
+0.47619 0.47619 0.47619 0.47619;
+#X coords 0 1 100 0 150 105 1 0 0;
+#X restore 613 -86 graph;
+#X msg 186 303 symbol riff4-2;
+#X msg 176 283 symbol riff4-3;
+#X msg 343 284 symbol riff7-3;
+#X msg 354 310 symbol riff7-2;
+#N canvas 0 23 1115 625 (subpatch) 0;
+#X array riff4-4 100 float 3;
+#A 0 0.552382 0.542858 0.533334 0.52381 0.514286 0.504762 0.492064
+0.479365 0.466667 0.452381 0.438095 0.434921 0.431746 0.428571 0.409524
+0.409524 0.4 0.4 0.4 0.4 0.419047 0.423809 0.428571 0.438095 0.457143
+0.457143 0.461905 0.466667 0.466667 0.466667 0.457143 0.447619 0.438095
+0.438095 0.447619 0.457143 0.476191 0.485715 0.485715 0.485715 0.485715
+0.476191 0.466667 0.466667 0.466667 0.466667 0.466667 0.457143 0.447619
+0.447619 0.466666 0.476189 0.514285 0.523809 0.647619 0.685715 0.704762
+0.714286 0.714286 0.714286 0.714286 0.695239 0.685715 0.657143 0.628572
+0.590476 0.571428 0.676191 0.72381 0.77143 0.790477 0.809525 0.809525
+0.819049 0.819049 0.819049 0.809525 0.77143 0.704762 0.704762 0.72381
+0.761906 0.790477 0.819049 0.838097 0.89524 0.89524 0.89524 0.876192
+0.742858 0.742858 0.790477 0.819049 0.923811 0.942859 0.971431 0.971431
+0.971431 0.961907 0.914288;
+#X coords 0 1 100 0 150 105 1 0 0;
+#X restore 455 38 graph;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array riff7-4 100 float 3;
+#A 0 0.438095 0.438095 0.438095 0.438095 0.438095 0.438095 0.438095
+0.438095 0.438095 0.438095 0.438095 0.438095 0.442856 0.447618 0.447618
+0.447618 0.447618 0.447618 0.447618 0.457142 0.457142 0.457142 0.461904
+0.466666 0.466666 0.466666 0.466666 0.466666 0.466666 0.466666 0.466666
+0.466666 0.466666 0.466666 0.457142 0.447618 1.22856 0.628575 0.66667
+0.714288 0.77143 0.790477 0.838095 0.838096 0.838096 0.847619 0.847619
+0.852381 0.857143 0.857143 0.866667 0.87619 0.880952 0.885714 0.885714
+0.895238 0.895238 0.904761 0.914285 0.923808 0.933332 0.942856 0.942856
+0.952379 0.952379 0.961903 0.971428 0.971428 0.971428 0.980952 0.990475
+0.999999 0.999999 1.00952 1.00952 1.01905 1.02857 1.02857 1.03809 1.04762
+1.04762 1.06666 1.06666 1.07619 1.07619 1.08571 1.10476 1.1238 1.13333
+1.14285 1.14285 1.15237 1.1619 1.19047 1.19047 1.19999 1.23809 1.25713
+1.2857 1.29523;
+#X coords 0 1 100 0 150 105 1 0 0;
+#X restore 615 37 graph;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array riff4 100 float 3;
+#A 0 0.514285 0.523809 0.533332 0.542856 0.542856 0.542856 0.6 0.619047
+0.504761 0.495238 0.485714 0.47619 0.466667 0.809524 0.571429 0.638095
+0.638095 0.647619 0.914286 0.657142 0.657142 0.495239 0.500001 0.809523
+0.819046 0.82857 0.82857 0.838094 0.838094 0.771428 0.466667 0.457143
+0.457143 0.438096 0.438096 0.428572 0.428572 0.609521 0.609521 0.676187
+0.676187 0.68571 0.68571 0.68571 0.68571 0.647616 0.619045 0.599997
+0.847616 0.847616 0.676194 0.66667 0.619049 0.609525 0.609525 0.609525
+0.780951 0.780951 0.761903 0.75238 0.638099 0.857143 0.428571 0.428571
+0.428571 0.447619 0.457142 0.542855 0.552379 0.571426 0.599997 0.619044
+0.619044 0.619044 0.60952 0.60952 0.60952 0.599997 0.742858 0.704763
+0.685716 0.685716 0.685716 0.733334 0.92381 0.809525 0.53334 0.561911
+0.571434 0.580958 0.580958 0.58572 0.590481 0.600005 0.8 0.609529 0.61429
+0.619052 0.628576 0.6381;
+#X coords 0 1 100 0 150 105 1 0 0;
+#X restore 140 159 graph;
+#X msg 324 266 symbol riff7-4;
+#X msg 151 265 symbol riff4-4;
+#X connect 0 0 10 0;
+#X connect 1 0 7 0;
+#X connect 4 0 13 3;
+#X connect 5 0 14 3;
+#X connect 7 0 14 0;
+#X connect 10 0 13 0;
+#X connect 11 0 13 1;
+#X connect 12 0 13 1;
+#X connect 13 0 2 0;
+#X connect 14 0 3 0;
+#X connect 15 0 14 1;
+#X connect 16 0 14 1;
+#X connect 22 0 13 1;
+#X connect 23 0 13 1;
+#X connect 24 0 14 1;
+#X connect 25 0 14 1;
+#X connect 29 0 14 1;
+#X connect 30 0 13 1;
+#X restore 51 25 pd green suitcase;
+#X text 208 138 gonggong;
+#X text 368 142 red funnel;
+#X text 565 143 tambourine;
+#X text 537 78 beak;
+#N canvas 307 411 1133 383 roundly 0;
+#X msg 364 139 \$1 5000;
+#X obj 364 162 unpack f f;
+#X obj 364 185 s X1;
+#X obj 421 185 s X2;
+#X obj 54 208 r HELLO;
+#X obj 54 254 unpack f f f f;
+#X floatatom 54 283 5 0 0 0 - - -;
+#X obj 107 311 hsl 1000 15 -50000 50000 0 0 empty empty empty -2 -8
+0 10 -260097 -262144 -1 0 1;
+#X obj 107 331 hsl 1000 15 -50000 50000 0 0 empty empty empty -2 -8
+0 10 -13381 -262144 -1 0 1;
+#X obj 164 254 unpack f f f f;
+#X floatatom 164 283 5 0 0 0 - - -;
+#X floatatom 263 99 5 0 0 0 target_pos - -;
+#X obj 107 31 hsl 1000 15 -50000 50000 0 0 empty empty empty -2 -8
+0 10 -260097 -262144 -1 49950 1;
+#X obj 107 51 hsl 1000 15 -50000 50000 0 0 empty empty empty -2 -8
+0 10 -13381 -262144 -1 49950 1;
+#X obj 263 121 t b a;
+#X msg 714 139 \$1 5000;
+#X obj 714 162 unpack f f;
+#X obj 714 185 s X1;
+#X obj 771 185 s X2;
+#X floatatom 613 99 5 0 0 0 target_pos - -;
+#X obj 613 121 t b a;
+#X obj 16 26 loadbang;
+#X msg 16 49 0;
+#X obj 104 81 skip 500;
+#X obj 358 81 skip 500;
+#X obj 263 209 s NOTE;
+#X obj 613 209 s NOTE;
+#X msg 263 150 20001 0 0 1;
+#X msg 613 150 20002 0 0 1;
+#X obj 54 231 route 20001 20002;
+#X connect 0 0 1 0;
+#X connect 1 0 2 0;
+#X connect 1 1 3 0;
+#X connect 4 0 29 0;
+#X connect 5 0 6 0;
+#X connect 6 0 7 0;
+#X connect 9 0 10 0;
+#X connect 10 0 8 0;
+#X connect 11 0 14 0;
+#X connect 12 0 23 0;
+#X connect 13 0 24 0;
+#X connect 14 0 27 0;
+#X connect 14 1 0 0;
+#X connect 15 0 16 0;
+#X connect 16 0 17 0;
+#X connect 16 1 18 0;
+#X connect 19 0 20 0;
+#X connect 20 0 28 0;
+#X connect 20 1 15 0;
+#X connect 21 0 22 0;
+#X connect 22 0 12 0;
+#X connect 22 0 13 0;
+#X connect 23 0 11 0;
+#X connect 24 0 19 0;
+#X connect 27 0 25 0;
+#X connect 28 0 26 0;
+#X connect 29 0 5 0;
+#X connect 29 1 9 0;
+#X restore 385 79 pd roundly;
+#N canvas 1 89 386 500 gastank 0;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array riff19 50 float 3;
+#A 0 0.485714 0.00952381 0.171429 0.00952381 0.00952381 0.00952381
+0.00952381 0.00952381 0.00952381 5.96046e-08 5.96046e-08 5.96046e-08
+5.96046e-08 0.2 5.96046e-08 5.96046e-08 5.96046e-08 5.96046e-08 0.00952381
+0.171429 0.00952381 0.00952381 0.00952381 0.00952381 0.00952381 0.00952381
+0.00952381 0.00952381 0.2 0.00952381 0.00952381 5.96046e-08 5.96046e-08
+5.96046e-08 5.96046e-08 0.161905 5.96046e-08 5.96046e-08 5.96046e-08
+5.96046e-08 0.152381 0.00952381 0.00952381 0.0190476 0.0190476 0.0190476
+0.0190476 0.0190476 0.0190476 0.0190476;
+#X coords 0 1 50 0 150 105 1 0 0;
+#X restore 201 8 graph;
+#X obj 201 211 tgl 20 0 empty empty empty 17 7 0 10 -262130 -1 -1 0
+1;
+#X obj 314 221 tgl 20 0 empty empty 3001 17 7 0 10 -257985 -1 -1 0
+1;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array riff18 50 float 3;
+#A 0 0.219047 -0.0190457 -0.0952371 -0.114285 -0.133332 -0.133332 -0.133332
+-0.104761 -0.0285709 0.0380954 0.0761904 0.0761904 0.0476191 -0.0190471
+-0.0952371 -0.123808 -0.15238 -0.15238 -0.114285 -0.0190471 0.0857141
+0.133333 0.142857 0.142857 0.0666666 -0.0285709 -0.15238 -0.209522
+-0.219046 -0.209522 -0.133332 -0.0476184 0.0190479 0.0761904 0.104762
+0.123809 0.133333 0.0952379 3.57628e-07 -0.0952371 -0.114285 -0.104761
+-0.0285709 0.0285716 0.133333 0.219047 0.199999 0.0476191 -0.114285
+-0.123808;
+#X coords 0 1 50 0 150 105 1 0 0;
+#X restore 41 8 graph;
+#X obj 41 211 tgl 20 0 empty empty empty 17 7 0 10 -262130 -1 -1 0
+1;
+#X obj 41 375 s NOTE;
+#X obj 171 241 tgl 20 0 empty empty empty 17 7 0 10 -257985 -1 -1 0
+1;
+#X text 39 -60 * gastank;
+#X obj 41 236 metro 500;
+#X obj 269 468 s NOTE;
+#X floatatom 269 406 5 0 0 0 - - -;
+#X obj 269 426 pack f f;
+#X msg 269 447 1041 0 \$1 \$2;
+#X msg 101 207 symbol riff18;
+#X msg 231 197 symbol riff19;
+#X obj 41 270 riff 800 4001;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array riff18-1 50 float 3;
+#A 0 0.219047 0.247619 0.266666 0.27619 0.285714 0.295237 0.161905
+0.0857143 0.057143 0.057143 0.057143 0.0666668 0.0857143 0.133334 0.152381
+0.190476 0.571429 0.27619 0.285714 0.2 0.0571437 0.0571437 0.0571437
+0.0571437 0.0761912 0.114286 0.161905 0.209524 0.552381 0.228571 0.228571
+0.133334 0.0571437 0.0571437 0.0571437 0.0571437 0.0666674 0.0857149
+0.104762 0.133334 0.180952 0.219047 0.247619 0.52381 0.0952387 0.0857149
+0.0857149 0.0857149 0.104762 0.171429;
+#X coords 0 1 50 0 150 105 1 0 0;
+#X restore 112 -125 graph;
+#X obj 201 236 metro 500;
+#X obj 218 385 moses 1;
+#X obj 201 270 riff 8 1041;
+#X connect 1 0 17 0;
+#X connect 2 0 11 1;
+#X connect 4 0 8 0;
+#X connect 6 0 15 3;
+#X connect 8 0 15 0;
+#X connect 10 0 11 0;
+#X connect 11 0 12 0;
+#X connect 12 0 9 0;
+#X connect 13 0 15 1;
+#X connect 14 0 19 1;
+#X connect 15 0 5 0;
+#X connect 17 0 19 0;
+#X connect 18 1 10 0;
+#X connect 19 1 18 0;
+#X restore 240 33 pd gastank;
+#N canvas 0 23 516 656 frog 0;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array riff8 12 float 3;
+#A 0 0 0 0.390476 0.199999 0.580948 -0.00951159 0 0 0 0 1.5238 1.5238
+;
+#X coords 0 1 12 0 150 105 1 0 0;
+#X restore 35 111 graph;
+#X obj 35 243 tgl 20 0 empty empty empty 17 7 0 10 -262130 -1 -1 0
+1;
+#X obj 35 268 metro 2000;
+#X obj 219 273 tgl 20 0 empty empty empty 17 7 0 10 -257985 -1 -1 0
+1;
+#X text 65 22 * frog;
+#X obj 35 302 riff 1600 1061;
+#X msg 82 237 symbol riff8;
+#X obj 229 498 s NOTE;
+#X floatatom 229 436 5 0 0 0 - - -;
+#X obj 229 456 pack f f;
+#X msg 229 477 1061 0 \$1 \$2;
+#X obj 178 415 moses 10;
+#X connect 1 0 2 0;
+#X connect 2 0 5 0;
+#X connect 3 0 9 1;
+#X connect 5 1 11 0;
+#X connect 6 0 5 1;
+#X connect 8 0 9 0;
+#X connect 9 0 10 0;
+#X connect 10 0 7 0;
+#X connect 11 1 8 0;
+#X restore 371 34 pd frog;
+#X msg 25 209 3087;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array riff91 50 float 3;
+#A 0 0.485714 0.980952 0.533342 0.4762 0.447629 0.419059 0.380964 0.34287
+0.314299 0.285728 0.257157 0.228586 0.209539 0.190491 0.176206 0.161921
+0.152397 0.142873 0.142873 1 0.866669 0.809527 0.752386 0.719053 0.68572
+0.657149 0.628578 0.600008 0.561913 0.552389 0.542866 0.533342 0.523818
+0.523818 0.523818 0.523818 0.52858 0.533342 0.58096 0.657149 0.752386
+0.933335 0.933335 0.933335 0.942858 0.961905 1.22857 1.19047 1.10476
+1.03809;
+#X coords 0 1 50 0 150 105 1 0 0;
+#X restore 672 179 graph;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array riff92 50 float 3;
+#A 0 0.685715 0.723811 0.800002 0.485714 0.519047 0.552381 0.580953
+0.609524 0.626191 0.642858 0.659525 0.676191 0.685715 0.399999 0.495238
+0.533333 0.571429 0.604762 0.638096 0.653969 0.669842 0.685715 0.695239
+0.704763 0.561905 0.666667 0.704763 0.714287 0.266665 0.323808 0.35238
+0.366666 0.380951 0.399999 0.423809 0.933336 0.952384 0.957145 0.961907
+0.609524 0.628572 0.47619 0.523809 0.523809 0.495238 0.438095 0.457142
+0.457142 0.438095 0.361904;
+#X coords 0 1 50 0 150 105 1 0 0;
+#X restore 832 179 graph;
+#X obj 672 311 tgl 20 0 empty empty empty 17 7 0 10 -204786 -1 -1 0
+1;
+#X obj 802 339 tgl 20 0 empty empty empty 17 7 0 10 -4034 -1 -1 0 1
+;
+#X obj 832 311 tgl 20 0 empty empty empty 17 7 0 10 -204786 -1 -1 0
+1;
+#X obj 962 339 tgl 20 0 empty empty empty 17 7 0 10 -4034 -1 -1 0 1
+;
+#X obj 672 475 s NOTE;
+#X obj 832 475 s NOTE;
+#X obj 832 336 metro 500;
+#X obj 672 336 metro 500;
+#X text 669 133 * standby;
+#X obj 672 370 riff 800 3201;
+#X obj 832 370 riff 800 3202;
+#X msg 734 295 symbol riff91;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array riff93 50 float 3;
+#A 0 0.485714 0.980952 0.533342 0.4762 0.447629 0.419059 0.380964 0.34287
+0.314299 0.285728 0.257157 0.228586 0.209539 0.190491 0.176206 0.161921
+0.152397 0.142873 0.142873 1 0.866669 0.809527 0.752386 0.719053 0.68572
+0.657149 0.628578 0.600008 0.561913 0.552389 0.542866 0.533342 0.523818
+0.523818 0.523818 0.523818 0.52858 0.533342 0.58096 0.657149 0.752386
+0.933335 0.933335 0.933335 0.942858 0.961905 1.22857 1.19047 1.10476
+1.03809;
+#X coords 0 1 50 0 150 105 1 0 0;
+#X restore 994 176 graph;
+#X obj 994 308 tgl 20 0 empty empty empty 17 7 0 10 -204786 -1 -1 0
+1;
+#X obj 1124 336 tgl 20 0 empty empty empty 17 7 0 10 -4034 -1 -1 0
+1;
+#X obj 994 472 s NOTE;
+#X obj 994 333 metro 500;
+#X obj 994 367 riff 800 3203;
+#X obj 179 376 riff 170 3001;
+#X obj 339 376 riff 200 3001;
+#X obj 499 376 riff 300 3001;
+#X msg 244 295 symbol riff10;
+#X msg 404 295 symbol riff11;
+#X msg 564 295 symbol riff15;
+#N canvas 437 89 766 806 yellow 0;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array riff94 100 float 3;
+#A 0 0.00952381 0.00476211 0.00476211 0.514286 0.480954 0.504762 0.509524
+-0.00952297 2.38419e-07 2.38419e-07 0.00476193 0.00476193 0.00476193
+0.00476193 0.00476193 0.390476 0.385715 0.409523 0.414285 0 0 0 0 0
+0 0.0047617 0.0047617 0.00952339 0.00952339 0.64762 0.661905 0.680952
+0.680952 0.00952339 0.00952339 0.00952339 0.00952339 0.00952339 0.00952339
+0.00952339 0.366668 0.385714 0.342859 0.338097 0.319051 0.323812 0
+0 0 0 0 0 0 0 0 -0.00476146 -0.00476146 -0.00476146 -0.00476146 -0.00476146
+0.280952 0.271429 0.285714 0.309523 0.290476 0.285714 0.00952381 0.00952381
+0.0142857 0.0142857 0.00952405 0.00952405 0.457142 0.461904 0.414286
+0.476189 0.476189 0.00952381 0.00952381 0.00952381 0.00952381 0.00952381
+0.00952381 0.00952381 0.00952381 0.00952381 0 0 0.395222 0.419031 0.419031
+0.428554 0.490456 0.461886 0 0 0 0 0 0;
+#X coords 0 1 100 0 150 105 1 0 0;
+#X restore 68 387 graph;
+#X obj 69 601 tgl 20 0 empty empty empty 17 7 0 10 -204786 -1 -1 0
+1;
+#X obj 199 629 tgl 20 0 empty empty empty 17 7 0 10 -4034 -1 -1 0 1
+;
+#X obj 69 765 s NOTE;
+#X obj 69 626 metro 500;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array riff94-1 50 float 3;
+#A 0 0.638095 0.580953 0.514287 0.457144 0.361907 0.314288 0.228574
+0.180955 0.152384 0.152384 0.14286 0.133337 0.114289 0.104765 0.104765
+0.104765 0.104765 0.638096 0.552382 0.504763 0.457144 0.371431 0.304765
+0.228575 0.19048 0.152385 0.133337 0.133337 0.133337 0.123813 0.11429
+0.542858 0.466668 0.380954 0.238098 0.209527 0.190479 0.171432 0.161908
+0.104765 0.0761942 0.0476229 0.0285754 0.533334 0.390477 0.266669 0.152384
+0.0666699 0.0380987 0.0380987;
+#X coords 0 1 50 0 150 105 1 0 0;
+#X restore 67 263 graph;
+#X msg 129 606 symbol riff94-1;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array riff94-2 50 float 3;
+#A 0 0.333334 0.333334 0.333334 0.333334 0.32381 0.32381 0.304762 0.285715
+0.276191 0.266667 0.266667 0.266667 0.257143 0.257143 0.257143 0.257143
+0.257143 0.247619 0.247619 0.247619 0.247619 0.247619 0.247619 0.247619
+0.238095 0.238095 0.238095 0.238095 0.238095 0.238095 0.238095 0.228571
+0.228571 0.228571 0.228571 0.228571 0.228571 0.228571 0.228571 0.228571
+0.228571 0.228571 0.228571 0.228571 0.238095 0.238095 0.247619 0.257143
+0.266667 0.276191;
+#X coords 0 1 50 0 150 105 1 0 0;
+#X restore 67 139 graph;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array riff94-3 50 float 3;
+#A 0 0.161905 0.342857 0.161905 0.161905 0.780952 0.161905 0.161905
+0.161905 0.161905 0.419048 0.161905 0.161905 0.161905 0.161905 0.533333
+0.152381 0.171426 0.161905 0.161905 0.161905 0.161905 0.295238 0.161905
+0.161905 0.552381 0.4 0.161905 0.161905 0.161905 0.561905 0.161905
+0.4 0.161905 0.780954 0.580953 0.161905 0.466667 0.161905 0.161905
+0.161905 0.152381 0.152381 0.152381 0.514286 0.152381 0.152381 0.152381
+0.390476 0.152381 0.152381;
+#X coords 0 1 50 0 150 105 1 0 0;
+#X restore 68 19 graph;
+#X msg 121 563 symbol riff94-2;
+#X msg 133 542 symbol riff94-3;
+#X msg 170 520 symbol riff94-4;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array riff94-5 100 float 3;
+#A 0 0.347619 0.4 0.390476 0.404762 0.433333 0.457143 0.485715 0.233333
+0.247618 0.233335 0.585714 0.252381 0.233335 0.214288 0.209526 0.209526
+0.214288 0.21905 0.223811 0.22381 0.371429 0.361905 0.34762 0.323812
+0.309527 0.390476 0.480948 0.609524 0.366666 0.323809 0.366667 0.304765
+0.29048 0.280957 0.514289 0.438102 0.423816 0.180953 0.157145 0.152383
+0.590476 0.219049 0.195241 0.166671 0.133339 0.10953 0.114292 0.104769
+0.114292 0.252381 0.4 0.414286 0.428572 0.433333 0.371428 0.409524
+0.223809 0.247618 0.266665 0.290475 0.271428 0.52381 0.371428 0.347619
+0.328571 0.319047 0.309523 0.290475 0.280952 0.278571 0.614286 0.22857
+0.22381 0.219048 0.219048 0.228571 0.228571 0.228571 0.333333 0.319047
+0.319047 0.176189 0.176189 0.14762 0.142858 0.561905 0.261906 0.238098
+0.200004 0.161911 0.152381 0.380952 0.361904 0.504762 0.366667 0.371429
+0.385714 0.257142 0.257142 0.266666;
+#X coords 0 1 100 0 150 105 1 0 0;
+#X restore 227 654 graph;
+#X obj 69 660 riff 400 3204;
+#X msg 182 499 symbol riff94-5;
+#X msg 141 585 symbol riff94-5;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array riff94-4 100 float 3;
+#A 0 0.00952381 0.00476211 0.00476211 0.514286 0.4 0.371429 0.347619
+-0.00952297 2.38419e-07 2.38419e-07 0.00476193 0.00476193 0.00476193
+0.00476193 0.00476193 0.276191 0.347619 0.27619 0.314286 0 0 0 0 0
+0 0.0047617 0.0047617 0.304762 0.304762 0.32381 0.400001 0.471429 0.771429
+0.00952339 0.00952339 0.00952339 0.00952339 0.00952339 0.00952339 0.00952339
+0.595238 0.266667 0.3 0.333333 0.280952 0.285714 0 0 0 0 0 0 0 0 0
+-0.00476146 -0.00476146 -0.00476146 -0.00476146 0.52381 0.280952 0.271429
+0.285714 0.309523 0.290476 0.257143 0.00952381 0.00952381 0.0142857
+0.0142857 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.00952381 0 0 0.395222 0.419031 0.419031 0.428554 0.490456
+0.461886 0 0 0 0 0 0;
+#X coords 0 1 100 0 150 105 1 0 0;
+#X restore 225 386 graph;
+#X connect 1 0 4 0;
+#X connect 2 0 13 3;
+#X connect 4 0 13 0;
+#X connect 6 0 13 1;
+#X connect 9 0 13 1;
+#X connect 11 0 13 1;
+#X connect 13 0 3 0;
+#X connect 14 0 13 1;
+#X connect 15 0 13 1;
+#X restore 53 134 pd yellow hose;
+#X msg 904 295 riff92;
+#X msg 1056 292 riff93;
+#N canvas 1 89 373 612 p 0;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array riff95 50 float 3;
+#A 0 0.219045 0.266665 0.314284 0.199997 0.228569 0.257141 0.352379
+0.419046 0.485713 0.571428 0.342857 0 0 -1.19209e-07 0.00952375 0.0190476
+0.0190476 0.352381 0.476191 0.485715 0.495238 0.495238 0.485715 0.409524
+0.390476 0.32381 0.295238 0.00952381 0 0 0 0 0 0.209522 0.247618 0.304761
+0.4 0.466667 0.485715 0.466667 0.409524 0.371428 0.352381 0.0285714
+0.0190476 0.0190476 0.0190476 0.0190476 0.0190476 0.0190476;
+#X coords 0 1 50 0 150 105 1 0 0;
+#X restore 27 158 graph;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array riff96 50 float 3;
+#A 0 0.685715 0.723811 0.800002 0.485714 0.519047 0.552381 0.580953
+0.609524 0.626191 0.642858 0.659525 0.676191 0.685715 0.399999 0.495238
+0.533333 0.571429 0.604762 0.638096 0.653969 0.669842 0.685715 0.695239
+0.704763 0.561905 0.666667 0.704763 0.714287 0.266665 0.323808 0.35238
+0.366666 0.380951 0.399999 0.423809 0.933336 0.952384 0.957145 0.961907
+0.609524 0.628572 0.47619 0.523809 0.523809 0.523809 0.438095 0.457142
+0.457142 0.438095 0.361904;
+#X coords 0 1 50 0 150 105 1 0 0;
+#X restore 187 158 graph;
+#X obj 27 290 tgl 20 0 empty empty empty 17 7 0 10 -204786 -1 -1 0
+1;
+#X obj 157 318 tgl 20 0 empty empty empty 17 7 0 10 -4034 -1 -1 0 1
+;
+#X obj 187 290 tgl 20 0 empty empty empty 17 7 0 10 -204786 -1 -1 0
+1;
+#X obj 317 318 tgl 20 0 empty empty empty 17 7 0 10 -4034 -1 -1 0 1
+;
+#X obj 27 454 s NOTE;
+#X obj 187 454 s NOTE;
+#X obj 187 315 metro 500;
+#X obj 27 315 metro 500;
+#X msg 89 274 symbol riff95;
+#X msg 259 274 symbol riff96;
+#X obj 187 349 riff 800 3206;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array riff95-1 50 float 3;
+#A 0 0.0380948 0.0476186 0.0761902 0.104762 0.114286 0.133333 0.161905
+0.180953 0.180953 0.171429 0.209524 0.171429 0.114285 0.0857143 0.0857143
+0.0761904 0.0571427 0.0571427 0.0571427 0.0571427 0.0571427 0.0571427
+0.0571427 0.114285 0.114285 0.114285 0.152381 0.180953 0.2 0.219048
+0.219048 0.133333 0.114286 0.095238 0.0761902 0.0761902 0.0857141 0.095238
+0.095238 0.171429 0.209524 0.257143 0.285715 0.266667 0.171428 0.219048
+0.171429 0.152381 0.152381 0.152381;
+#X coords 0 1 50 0 150 105 1 0 0;
+#X restore 26 34 graph;
+#X obj 27 349 riff 600 3205;
+#X connect 2 0 9 0;
+#X connect 3 0 14 3;
+#X connect 4 0 8 0;
+#X connect 5 0 12 3;
+#X connect 8 0 12 0;
+#X connect 9 0 14 0;
+#X connect 10 0 14 1;
+#X connect 11 0 12 1;
+#X connect 12 0 7 0;
+#X connect 14 0 6 0;
+#X restore 65 481 pd p;
+#X connect 2 0 4 0;
+#X connect 3 0 51 3;
+#X connect 4 0 51 0;
+#X connect 5 0 7 0;
+#X connect 6 0 52 3;
+#X connect 7 0 52 0;
+#X connect 8 0 11 0;
+#X connect 9 0 53 3;
+#X connect 11 0 53 0;
+#X connect 15 0 16 0;
+#X connect 17 0 18 0;
+#X connect 33 0 40 0;
+#X connect 34 0 42 3;
+#X connect 35 0 39 0;
+#X connect 36 0 43 3;
+#X connect 39 0 43 0;
+#X connect 40 0 42 0;
+#X connect 42 0 37 0;
+#X connect 43 0 38 0;
+#X connect 44 0 42 1;
+#X connect 46 0 49 0;
+#X connect 47 0 50 3;
+#X connect 49 0 50 0;
+#X connect 50 0 48 0;
+#X connect 51 0 12 0;
+#X connect 51 1 15 0;
+#X connect 52 0 13 0;
+#X connect 52 1 17 0;
+#X connect 53 0 14 0;
+#X connect 54 0 51 1;
+#X connect 55 0 52 1;
+#X connect 56 0 53 1;
+#X connect 58 0 43 1;
+#X connect 59 0 50 1;
+#X restore 14 38 pd save;
+#X obj 358 23 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
+1;
+#N canvas 0 50 450 250 (subpatch) 0;
+#X array booong 10 float 3;
+#A 0 0.635709 0.74999 0.74999 0.585711 0.371435 0.371435 0.592854 0.842843
+0.971408 0.028589;
+#X coords 0 1 10 0 150 105 1 0 0;
+#X restore 391 129 graph;
+#X msg 352 318 0;
+#X obj 358 95 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
+-1;
+#X obj 391 297 riff1 800 3100 400;
+#X obj 391 397 s NOTE;
+#X obj 358 50 retro 2000 30000;
+#X obj 462 245 loadbang;
+#X obj 534 397 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
+-1 -1;
+#N canvas 0 50 450 250 (subpatch) 0;
+#X array copperlee1 10 float 3;
+#A 0 0.24762 0.228573 0.200003 0.314284 0.352377 0.342854 0.257143
+0.266667 0.200001 0.133334;
+#X coords 0 1 10 0 150 105 1 0 0;
+#X restore 106 395 graph;
+#X obj 106 663 s NOTE;
+#X obj 177 511 loadbang;
+#X obj 249 663 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
+-1 -1;
+#X obj 106 563 riff1 1200 3204 250;
+#X msg 177 534 copperlee;
+#X obj 337 535 del 1000;
+#N canvas 0 50 450 250 (subpatch) 0;
+#X array copperlee2 10 float 3;
+#A 0 0.514287 0.514287 0.514287 0.800003 0.704764 0.590478 0.552382
+0.619049 0.428572 0.380952;
+#X coords 0 1 10 0 150 105 1 0 0;
+#X restore 106 265 graph;
+#N canvas 0 50 450 250 (subpatch) 0;
+#X array copperlee3 10 float 3;
+#A 0 0.933335 0.895239 0.84762 0.84762 0.952382 0.904763 0.84762 0.914287
+0.895239 0.838096;
+#X coords 0 1 10 0 150 105 1 0 0;
+#X restore 106 135 graph;
+#X msg 462 268 booong;
+#X floatatom 586 463 5 0 0 0 - - -;
+#X obj 586 440 clip -0.3 0.3;
+#X obj 586 417 gauss 0.25 0;
+#X obj 586 485 + 1;
+#X obj 534 463 *;
+#X obj 534 417 t b b;
+#X floatatom 534 486 5 0 0 0 - - -;
+#X obj 534 508 del;
+#X obj 343 422 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
+-1 -1;
+#X obj 835 248 drunk;
+#X msg 534 440 20000;
+#X obj 90 531 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
+-1;
+#X connect 5 0 11 0;
+#X connect 7 0 9 0;
+#X connect 9 0 10 0;
+#X connect 9 3 13 0;
+#X connect 11 0 8 0;
+#X connect 12 0 23 0;
+#X connect 13 0 29 0;
+#X connect 16 0 19 0;
+#X connect 18 0 15 0;
+#X connect 18 3 17 0;
+#X connect 19 0 18 1;
+#X connect 20 0 18 0;
+#X connect 23 0 9 1;
+#X connect 24 0 27 0;
+#X connect 25 0 24 0;
+#X connect 26 0 25 0;
+#X connect 27 0 28 1;
+#X connect 28 0 30 0;
+#X connect 29 0 34 0;
+#X connect 29 1 26 0;
+#X connect 30 0 31 0;
+#X connect 31 0 32 0;
+#X connect 32 0 9 0;
+#X connect 34 0 28 0;
+#X connect 35 0 18 0;
+#X restore 172 98 pd crickets;
diff --git a/puredata/piano_access_radio.pd b/puredata/piano_access_radio.pd
index 64a3fec..469a796 100644
--- a/puredata/piano_access_radio.pd
+++ b/puredata/piano_access_radio.pd
@@ -227,7 +227,7 @@
 #X restore 287 370 pd samplers;
 #X text 109 24 * a wireless "field synth" - based on 'esp now' protocol
 ;
-#N canvas 54 99 1440 855 crickets 1;
+#N canvas 0 89 1440 811 crickets 1;
 #N canvas 0 23 450 278 (subpatch) 0;
 #X array riff11 10 float 3;
 #A 0 0.342857 0.67619 0.371429 0.685714 0.352381 0.638095 0.352381
@@ -1372,7 +1372,7 @@
 #X connect 33 0 32 1;
 #X connect 34 0 31 1;
 #X restore 94 45 pd green suitcase;
-#N canvas 214 23 1167 807 pingpong 0;
+#N canvas 214 89 1167 806 pingpong 0;
 #N canvas 0 23 450 278 (subpatch) 0;
 #X array riff14-1 50 float 3;
 #A 0 0.952381 0.952381 0.952381 0.952381 0.952381 0.952381 0.952381
@@ -1634,7 +1634,7 @@
 #X text 722 17 >>>;
 #X text 12 17 <<<;
 #X text 12 577 <<<;
-#N canvas 314 47 909 831 gastank 1;
+#N canvas 314 89 909 806 gastank 0;
 #N canvas 0 23 450 278 (subpatch) 0;
 #X array riff19 50 float 3;
 #A 0 0.780952 0.561905 0.361905 0.00952381 0.00952381 0.00952381 0.00952381
@@ -1647,7 +1647,7 @@
 ;
 #X coords 0 1 50 0 150 105 1 0 0;
 #X restore 201 8 graph;
-#X obj 314 221 tgl 20 0 empty empty 3001 17 7 0 10 -257985 -1 -1 1
+#X obj 314 221 tgl 20 0 empty empty 3001 17 7 0 10 -257985 -1 -1 0
 1;
 #N canvas 0 23 450 278 (subpatch) 0;
 #X array riff18 20 float 3;
@@ -1711,7 +1711,7 @@
 -1;
 #X obj 75 221 t b b;
 #X obj 73 267 spigot;
-#X obj 119 198 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+#X obj 119 198 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
 1;
 #X obj 704 490 s NOTE;
 #X obj 557 287 riff 400 4001;
@@ -1760,7 +1760,7 @@
 #X connect 30 0 27 1;
 #X connect 31 0 27 1;
 #X restore 283 53 pd gastank;
-#N canvas -37 84 1440 794 frog 1;
+#N canvas 1 89 1438 794 frog 0;
 #N canvas 0 23 450 278 (subpatch) 0;
 #X array riff8-1 100 float 3;
 #A 0 0.695238 0.695238 0.695238 0.695238 0.695238 0.695238 0.695238
@@ -1833,7 +1833,7 @@
 #X obj 969 627 s NOTE;
 #X obj 846 565 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
 1;
-#X obj 699 276 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+#X obj 699 276 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
 1;
 #X obj 962 565 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
 1;
@@ -1930,7 +1930,7 @@
 #X msg 860 156 symbol riff20-3;
 #X msg 858 136 symbol riff20-4;
 #X obj 799 190 metro 1000;
-#X obj 802 160 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+#X obj 802 160 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
 1;
 #X obj 1155 350 tgl 20 0 empty empty empty 17 7 0 10 -257985 -1 -1
 0 1;
@@ -1941,7 +1941,7 @@
 #X obj 1010 247 riff 1000 1500;
 #X obj 998 198 metro 1000;
 #X obj 1001 168 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1
-1 1;
+0 1;
 #X msg 1111 413 1500 1001 \$1 \$2;
 #N canvas 0 23 450 278 (subpatch) 0;
 #X array riff28-1 100 float 3;
@@ -2065,7 +2065,7 @@
 #X msg 287 315 symbol riff10;
 #X msg 447 315 symbol riff11;
 #X msg 607 315 symbol riff15;
-#N canvas 221 23 596 832 yellowhose 1;
+#N canvas 221 89 596 806 yellowhose 0;
 #N canvas 0 23 450 278 (subpatch) 0;
 #X array riff94 100 float 3;
 #A 0 0.380952 0.380952 0.380952 0.371428 0.371428 0.371428 0.361905
@@ -2453,7 +2453,7 @@
 #X connect 22 0 18 1;
 #X connect 25 0 18 1;
 #X restore 683 104 pd alu;
-#N canvas 658 23 450 841 rounder 1;
+#N canvas 658 89 497 706 rounder 1;
 #N canvas 0 23 450 278 (subpatch) 0;
 #X array riff60 40 float 3;
 #A 0 0.333333 0.409523 0.476189 0.552379 0.599998 0.599998 0.209524
@@ -2463,10 +2463,10 @@
 -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 150 105 1 0 0;
-#X restore 556 20 graph;
-#X obj 557 228 tgl 20 0 empty empty empty 17 7 0 10 -262130 -1 -1 0
+#X restore 275 186 graph;
+#X obj 276 394 tgl 20 0 empty empty empty 17 7 0 10 -262130 -1 -1 0
 1;
-#X obj 687 258 tgl 20 0 empty empty empty 17 7 0 10 -257985 -1 -1 0
+#X obj 406 424 tgl 20 0 empty empty empty 17 7 0 10 -257985 -1 -1 0
 1;
 #N canvas 0 23 450 278 (subpatch) 0;
 #X array riff60-2 50 float 3;
@@ -2479,13 +2479,13 @@
 -0.161903 -0.161903 -0.161903 -0.171427 -0.171427 -0.171427 -0.171427
 -0.171427;
 #X coords 0 1 50 0 150 105 1 0 0;
-#X restore 553 -118 graph;
-#X obj 704 490 s NOTE;
-#X msg 613 179 symbol riff60-2;
-#X msg 612 201 symbol riff60-1;
-#X msg 617 224 symbol riff60;
-#X obj 557 287 riff 800 4002;
-#X obj 557 253 metro 500;
+#X restore 272 48 graph;
+#X obj 423 656 s NOTE;
+#X msg 332 345 symbol riff60-2;
+#X msg 331 367 symbol riff60-1;
+#X msg 336 390 symbol riff60;
+#X obj 276 453 riff 800 4002;
+#X obj 276 419 metro 500;
 #N canvas 0 23 450 278 (subpatch) 0;
 #X array riff60-3 30 float 3;
 #A 0 0.371429 0.371429 0.0190476 -0.428571 -0.438095 0 0.390476 0.4
@@ -2493,8 +2493,8 @@
 -0.447619 0.409524 0.409524 0.0285714 -0.457143 -0.457143 0.409524
 0.409524 0.00952381 -0.428571 0.438095 0.0190476 -0.447619 0;
 #X coords 0 1 30 0 150 105 1 0 0;
-#X restore 340 -82 graph;
-#X msg 585 140 symbol riff60-3;
+#X restore 59 84 graph;
+#X msg 304 306 symbol riff60-3;
 #N canvas 0 23 450 278 (subpatch) 0;
 #X array riff60-1 30 float 3;
 #A 0 0.733333 0.885715 0.97143 1.05714 1.13334 1.12381 1.02857 0.914286
@@ -2502,7 +2502,7 @@
 0.97143 0.904763 0.809524 0.761905 0.857143 0.933334 0.980954 1.04762
 1.09524 1.0381 0.980952 0.876191 0.780953;
 #X coords 0 1 30 0 150 105 1 0 0;
-#X restore 339 148 graph;
+#X restore 58 314 graph;
 #X connect 1 0 9 0;
 #X connect 2 0 8 3;
 #X connect 5 0 8 1;
@@ -2543,7 +2543,7 @@
 #X msg 1307 377 symbol riff61;
 #X msg 1302 354 symbol riff61-1;
 #X msg 1303 332 symbol riff61-2;
-#N canvas 0 149 1178 687 drawer 1;
+#N canvas 1 149 1178 687 drawer 0;
 #N canvas 0 23 450 278 (subpatch) 0;
 #X array riff93-1 80 float 3;
 #A 0 0.219048 0.209524 0.209524 0.209524 0.2 0.2 0.190476 0.180952
@@ -2666,7 +2666,7 @@
 #X obj 1071 668 riff 800 4702;
 #X obj 1073 782 s NOTE;
 #X obj 1247 406 metro 1000;
-#N canvas 6 214 1362 825 copper 1;
+#N canvas 6 89 1362 806 copper 0;
 #N canvas 0 23 450 278 (subpatch) 0;
 #X array riff97 50 float 3;
 #A 0 0.0476214 0.104764 0.161906 0.219049 0.24762 0.285715 0.32381
diff --git a/puredata/piano_access_radio_comm_only.pd b/puredata/piano_access_radio_comm_only.pd
new file mode 100644
index 0000000..b26cdcd
--- /dev/null
+++ b/puredata/piano_access_radio_comm_only.pd
@@ -0,0 +1,110 @@
+#N canvas 503 89 623 470 10;
+#X obj 322 198 spigot;
+#X obj 371 183 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
+1;
+#N canvas 676 408 512 395 buildOSC 0;
+#X obj 319 66 t a b;
+#X msg 456 84 [;
+#X msg 34 327 ];
+#X obj 68 236 r X1;
+#X obj 98 236 r X2;
+#X obj 128 236 r X3;
+#X obj 158 236 r X4;
+#X obj 53 266 f;
+#X obj 34 126 t b b a;
+#X obj 254 345 outlet;
+#X obj 140 17 inlet;
+#X obj 188 236 r PS;
+#X obj 88 284 pack f f f f f;
+#X msg 319 112 sendtyped /note/onoff f \$1;
+#X msg 254 141 sendtyped /note/velocity f \$1;
+#X msg 88 307 sendtyped /note/x fffff \$1 \$2 \$3 \$4 \$5;
+#X msg 73 199 sendtyped /note/id i \$1;
+#X msg 167 170 sendtyped /note/pitch f \$1;
+#X obj 140 39 unpack f f f f;
+#X connect 0 0 13 0;
+#X connect 0 1 1 0;
+#X connect 1 0 9 0;
+#X connect 2 0 9 0;
+#X connect 3 0 7 1;
+#X connect 4 0 12 1;
+#X connect 5 0 12 2;
+#X connect 6 0 12 3;
+#X connect 7 0 12 0;
+#X connect 8 0 2 0;
+#X connect 8 1 7 0;
+#X connect 8 2 16 0;
+#X connect 10 0 18 0;
+#X connect 11 0 12 4;
+#X connect 12 0 15 0;
+#X connect 13 0 9 0;
+#X connect 14 0 9 0;
+#X connect 15 0 9 0;
+#X connect 16 0 9 0;
+#X connect 17 0 9 0;
+#X connect 18 0 8 0;
+#X connect 18 1 17 0;
+#X connect 18 2 14 0;
+#X connect 18 3 0 0;
+#X restore 412 194 pd buildOSC for all;
+#X obj 117 121 o.io.slipserial;
+#X msg 243 142 devices;
+#X msg 243 165 close;
+#X obj 117 80 packOSC;
+#X obj 117 55 r OSC;
+#X obj 117 144 unpackOSC;
+#X obj 117 167 routeOSC /hello;
+#X obj 117 190 s HELLO;
+#X obj 34 120 print OSC;
+#X obj 34 93 spigot;
+#X obj 83 58 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0 1
+;
+#X obj 412 217 s OSC;
+#X obj 412 155 r NOTE;
+#X obj 322 225 print NOTE;
+#X text 413 134 /id /pitch /velocity /onoff;
+#X floatatom 543 325 5 0 0 0 - - -;
+#X obj 543 347 s PS;
+#X obj 494 236 tgl 25 0 empty empty hello 32 7 0 15 -159808 -257985
+-159808 1 1;
+#X obj 543 263 loadbang;
+#X msg 543 286 1;
+#X obj 494 286 sel 1;
+#X obj 34 163 spigot;
+#X obj 83 148 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
+1;
+#X obj 34 190 print HELLO;
+#X text 103 24 * a wireless "field synth" - based on 'esp now' protocol
+;
+#X msg 243 98 devicename /dev/ttyACM0 \, baud 57600 \, pollintervall
+1 \, verbose 1;
+#X msg 204 58 devicename /dev/tty.usbmodem4871051 \, baud 57600 \,
+pollintervall 1 \, verbose 1;
+#X msg 494 315 2000;
+#X connect 0 0 16 0;
+#X connect 1 0 0 1;
+#X connect 2 0 14 0;
+#X connect 3 0 8 0;
+#X connect 4 0 3 1;
+#X connect 5 0 3 1;
+#X connect 6 0 3 0;
+#X connect 7 0 6 0;
+#X connect 7 0 12 0;
+#X connect 8 0 9 0;
+#X connect 9 0 10 0;
+#X connect 9 0 24 0;
+#X connect 12 0 11 0;
+#X connect 13 0 12 1;
+#X connect 15 0 0 0;
+#X connect 15 0 2 0;
+#X connect 18 0 19 0;
+#X connect 20 0 23 0;
+#X connect 21 0 22 0;
+#X connect 22 0 20 0;
+#X connect 23 0 30 0;
+#X connect 23 1 18 0;
+#X connect 24 0 26 0;
+#X connect 25 0 24 1;
+#X connect 28 0 3 1;
+#X connect 29 0 3 1;
+#X connect 30 0 18 0;
diff --git a/puredata/piano_access_radio_dhy.pd b/puredata/piano_access_radio_dhy.pd
index bcb77a8..3f114d9 100644
--- a/puredata/piano_access_radio_dhy.pd
+++ b/puredata/piano_access_radio_dhy.pd
@@ -1,4 +1,4 @@
-#N canvas 503 89 623 470 10;
+#N canvas 804 89 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;
@@ -299,208 +299,8 @@ pollintervall 1 \, verbose 1;
 #X connect 29 0 27 0;
 #X coords 0 -1 1 1 110 170 1 130 220;
 #X restore 76 246 pd keyboard ctrlr;
-#N canvas 0 89 1440 811 birds 0;
-#X obj 52 406 tgl 20 0 empty empty empty 17 7 0 10 -262130 -1 -1 0
-1;
-#X obj 182 434 tgl 20 0 empty empty empty 17 7 0 10 -257985 -1 -1 0
-1;
-#X obj 52 570 s NOTE;
-#N canvas 289 129 980 662 buoyfly 0;
-#N canvas 0 23 450 278 (subpatch) 0;
-#X array riff2 50 float 3;
-#A 0 0.285714 0.304762 0.328572 0.457144 0.504763 0.514287 0.542858
-0.542858 0.533335 0.533335 0.514287 0.495239 0.476191 0.428572 0.380953
-0.361905 0.342857 0.333333 0.333333 0.361905 0.4 0.466667 0.466667
-0.552382 0.57143 0.580954 0.590478 0.590478 0.580954 0.523811 0.457144
-0.409524 0.361905 0.304762 0.27619 0.266666 0.257142 0.180951 0.123808
-0.0761888 0.0571411 0.0571411 0.0571411 0.0476172 0.0476172 0.0380933
-0.0380933 0.0380937 0.0380937 0.333333;
-#X coords 0 1 50 0 150 105 1 0 0;
-#X restore 180 334 graph;
-#N canvas 0 23 450 278 (subpatch) 0;
-#X array riff3 50 float 3;
-#A 0 0.12381 0.342857 0.342857 0.342857 0.342857 0.342857 0.342857
-0.342857 0.342857 0.352381 0.352381 0.352381 0.361904 0.361904 0.371427
-0.371427 0.371427 0.371427 0.371427 0.380951 0.380951 0.380951 0.390474
-0.390474 0.390474 0.399997 0.399997 0.399997 0.409521 0.409521 0.409521
-0.409521 0.409521 0.409521 0.399997 0.399997 0.390474 0.380951 0.371427
-0.361904 0.361904 0.352381 0.352381 0.342857 0.342857 0.342857 0.342857
-0.342857 0.352381 0.361904;
-#X coords 0 1 50 0 150 105 1 0 0;
-#X restore 340 334 graph;
-#X obj 180 466 tgl 20 0 empty empty empty 17 7 0 10 -262130 -1 -1 0
-1;
-#X obj 310 494 tgl 20 0 empty empty empty 17 7 0 10 -257985 -1 -1 0
-1;
-#X obj 340 466 tgl 20 0 empty empty empty 17 7 0 10 -262130 -1 -1 0
-1;
-#X obj 470 494 tgl 20 0 empty empty empty 17 7 0 10 -257985 -1 -1 0
-1;
-#X obj 180 630 s NOTE;
-#X obj 340 630 s NOTE;
-#X floatatom 289 633 5 0 0 0 - - -;
-#N canvas 0 23 450 278 (subpatch) 0;
-#X array riff1 50 float 3;
-#A 0 0.2 0.2 0.266666 0.333332 0.390475 0.457141 0.533331 0.590473
-0.666663 0.780948 0.80952 0.80952 0.752377 0.65714 0.561902 0.519045
-0.476188 0.371427 0.257142 0.2 0.152381 0.12381 0.114286 0.0666667
-0.0190476 0.0285714 0.0285714 0.0285714 0.0285714 0.0190476 0.0190476
-0.0190476 0.609524 0.609524 0.609524 0.6 0.228571 0.238095 0.238095
-0.257143 0.12381 0.6 0.590476 0.580953 0.561905 0.552381 0.238095 0.238095
-0.238095 0.238095;
-#X coords 0 1 50 0 150 105 1 0 0;
-#X restore 20 334 graph;
-#X obj 20 466 tgl 20 0 empty empty empty 17 7 0 10 -262130 -1 -1 0
-1;
-#X obj 150 494 tgl 20 0 empty empty empty 17 7 0 10 -257985 -1 -1 0
-1;
-#X obj 20 630 s NOTE;
-#X text 23 17 * buoy-fly;
-#X obj 340 491 metro 500;
-#X obj 180 491 metro 500;
-#X obj 20 491 metro 500;
-#N canvas 0 23 450 278 (subpatch) 0;
-#X array riff22a 50 float 3;
-#A 0 0.971428 0.933333 0.87619 0.799999 0.733332 0.657141 0.599998
-0.552378 0.495235 0.476187 0.428568 0.390472 0.333329 0.28571 0.238091
-0.190471 0.152376 0.123804 0.0857087 0.0380893 -6.13928e-06 -0.0476255
--0.0476255 -0.0285777 -0.00953001 0.0047558 0.0190416 0.0285655 0.0380893
-0.0523751 0.0666609 0.0761848 0.0857087 0.0952325 0.104756 0.11428
-0.128566 0.142852 0.147614 0.152376 0.152376 0.1619 0.171423 0.171423
-0.180947 0.180947 0.190471 0.190471 0.190471 0.190471;
-#X coords 0 1 50 0 150 105 1 0 0;
-#X restore 658 332 graph;
-#N canvas 0 23 450 278 (subpatch) 0;
-#X array riff23 50 float 3;
-#A 0 0.276191 0.285714 0.27619 0.266666 0.257143 0.247619 0.238095
-0.228571 0.219047 0.209523 0.199999 0.190476 0.180952 0.171428 0.161904
-0.15238 0.142856 0.133332 0.123808 0.114285 0.133332 0.142856 0.171428
-0.190476 0.209523 0.214285 0.238095 0.247619 0.266666 0.27619 0.295238
-0.304762 0.295238 0.27619 0.257143 0.238095 0.209523 0.199999 0.190476
-0.171428 0.142856 0.123808 0.109523 0.0952368 0.0761891 0.0666652 0.0571414
-0.0380936 0.0190459 -0.0476212;
-#X coords 0 1 50 0 150 105 1 0 0;
-#X restore 818 332 graph;
-#X obj 658 464 tgl 20 0 empty empty empty 17 7 0 10 -262130 -1 -1 0
-1;
-#X obj 788 492 tgl 20 0 empty empty empty 17 7 0 10 -257985 -1 -1 0
-1;
-#X obj 818 464 tgl 20 0 empty empty empty 17 7 0 10 -262130 -1 -1 0
-1;
-#X obj 948 492 tgl 20 0 empty empty empty 17 7 0 10 -257985 -1 -1 0
-1;
-#X obj 658 628 s NOTE;
-#X obj 818 628 s NOTE;
-#X floatatom 767 631 5 0 0 0 - - -;
-#N canvas 0 23 450 278 (subpatch) 0;
-#X array riff21b 50 float 3;
-#A 0 0.419046 0.142853 0.104758 0.0666624 0.0380908 0.0285669 0.00951916
--4.70877e-06 -0.0190524 -0.0285763 -0.0381002 -0.0381002 -0.0476241
--0.0571479 -0.0571479 -0.0571479 -0.0571479 -0.0571479 -0.0571479 -0.0571479
--0.0571479 -0.0571479 -0.0571479 -0.0571479 -0.0571479 -0.0571479 -0.0571479
--0.0571479 -0.0571479 -0.0571479 -0.0571479 -0.0476241 -0.0476241 -0.0381002
--0.0285763 -0.0285763 -0.0190524 -0.00952858 -4.70877e-06 0.00951916
-0.0285669 0.0476146 0.0571385 0.0857101 0.114282 0.142853 0.180949
-0.228568 0.276187 0.314283;
-#X coords 0 1 50 0 150 105 1 0 0;
-#X restore 498 332 graph;
-#X obj 498 464 tgl 20 0 empty empty empty 17 7 0 10 -262130 -1 -1 0
-1;
-#X obj 628 492 tgl 20 0 empty empty empty 17 7 0 10 -257985 -1 -1 0
-1;
-#X obj 498 628 s NOTE;
-#X obj 818 489 metro 500;
-#X obj 658 489 metro 500;
-#X obj 498 489 metro 500;
-#X obj 20 525 riff 800 3051;
-#X obj 180 525 riff 800 3052;
-#X obj 340 525 riff 800 3053;
-#X obj 498 523 riff 800 3054;
-#X obj 658 523 riff 800 3055;
-#X obj 818 523 riff 800 3056;
-#X msg 81 457 symbol riff1;
-#X msg 241 457 symbol riff2;
-#X msg 401 457 symbol riff3;
-#X msg 881 457 symbol riff23;
-#N canvas 0 23 450 278 (subpatch) 0;
-#X array riff22 50 float 3;
-#A 0 0.838095 0.904762 0.780951 0.657141 0.542855 0.428568 0.323806
-0.247615 0.190472 0.142852 0.104757 0.0476136 0.0285658 0.019042 0.00951809
--5.78165e-06 -0.00952965 -0.00952965 -0.0190535 -0.0285774 -0.0285774
--0.0381013 -0.0381013 -0.0476251 -0.0476251 -0.057149 -0.057149 -0.0666729
--0.0666729 -0.0666729 -0.0666729 -0.0666729 -0.0666729 -0.0666729 -0.0666729
--0.0666729 -0.0666729 -0.0666729 -0.057149 -0.0476251 -0.0285774 -0.00952965
-0.019042 0.0380897 0.0666613 0.104757 0.142852 0.190472 0.238091 0.866666
-;
-#X coords 0 1 50 0 150 105 1 0 0;
-#X restore 658 202 graph;
-#N canvas 0 23 450 278 (subpatch) 0;
-#X array riff21 50 float 3;
-#A 0 0.771429 0.771429 0.771429 0.780952 0.780952 0.780952 0.780952
-0.780952 0.780952 0.780952 0.785714 0.790476 0.790476 0.790476 0.790476
-0.790476 0.790476 0.790476 0.790476 0.790476 0.790476 0.790476 0.790476
-0.790476 0.790476 0.790476 0.790476 0.790476 0.790476 0.790476 0.790476
-0.780952 0.780952 0.780952 0.771429 0.771429 0.761905 0.761905 0.761905
-0.761905 0.752381 0.752381 0.742857 0.742857 0.733333 0.733333 0.723809
-0.723809 0.723809 0.67619;
-#X coords 0 1 50 0 150 105 1 0 0;
-#X restore 498 202 graph;
-#X msg 561 467 symbol riff21a;
-#X msg 561 447 symbol riff21;
-#N canvas 0 23 450 278 (subpatch) 0;
-#X array riff21a 50 float 3;
-#A 0 0.771429 0.790476 0.714285 0.638094 0.561903 0.495236 0.428569
-0.371426 0.371426 0.409521 0.447617 0.50476 0.533332 0.580951 0.657142
-0.704761 0.723809 0.75238 0.819048 0.857143 0.876191 0.914286 0.942858
-0.971429 0.980953 0.952382 0.92381 0.857143 0.833333 0.809524 0.785714
-0.761904 0.695237 0.66984 0.644443 0.619046 0.561903 0.523808 0.476188
-0.457141 0.409521 0.371426 0.390473 0.438093 0.485712 0.533332 0.561903
-0.599999 0.638094 0.723809;
-#X coords 0 1 50 0 150 105 1 0 0;
-#X restore 498 72 graph;
-#X msg 561 487 symbol riff21b;
-#X obj 238 93 r HELLO;
-#X obj 238 116 route 3051;
-#X msg 721 477 symbol riff22a;
-#X msg 721 457 symbol riff22;
-#X obj 238 159 print 3051;
-#X connect 2 0 15 0;
-#X connect 3 0 34 3;
-#X connect 4 0 14 0;
-#X connect 5 0 35 3;
-#X connect 10 0 16 0;
-#X connect 11 0 33 3;
-#X connect 14 0 35 0;
-#X connect 15 0 34 0;
-#X connect 16 0 33 0;
-#X connect 19 0 31 0;
-#X connect 20 0 37 3;
-#X connect 21 0 30 0;
-#X connect 22 0 38 3;
-#X connect 27 0 32 0;
-#X connect 28 0 36 3;
-#X connect 30 0 38 0;
-#X connect 31 0 37 0;
-#X connect 32 0 36 0;
-#X connect 33 0 12 0;
-#X connect 34 0 6 0;
-#X connect 34 1 8 0;
-#X connect 35 0 7 0;
-#X connect 36 0 29 0;
-#X connect 37 0 23 0;
-#X connect 37 1 25 0;
-#X connect 38 0 24 0;
-#X connect 39 0 33 1;
-#X connect 40 0 34 1;
-#X connect 41 0 35 1;
-#X connect 42 0 38 1;
-#X connect 45 0 36 1;
-#X connect 46 0 36 1;
-#X connect 48 0 36 1;
-#X connect 49 0 50 0;
-#X connect 51 0 37 1;
-#X connect 52 0 37 1;
-#X restore 200 191 pd buoyfly;
+#N canvas 1 89 801 806 crickets 1;
+#N canvas 1 89 356 384 saved 0;
 #N canvas 194 444 1133 383 roundly 0;
 #X msg 364 139 \$1 5000;
 #X obj 364 162 unpack f f;
@@ -564,53 +364,9 @@ pollintervall 1 \, verbose 1;
 #X connect 28 0 25 0;
 #X connect 29 0 5 0;
 #X connect 29 1 9 0;
-#X restore 232 423 pd roundly;
-#X msg 98 388 symbol cracker;
-#N canvas 0 23 450 278 (subpatch) 0;
-#X array cracker 50 float 3;
-#A 0 0.733333 0.723809 0.723809 0.714286 0.704762 0.685714 0.542857
-0.561905 0.542857 0.542857 0.542857 0.542857 0.533333 0.533333 0.523809
-0.342854 0.304759 0.685714 0.695238 0.704762 0.704762 0.704762 0.704762
-0.704762 0.704762 0.657143 0.8 0.742857 0.695237 0.647618 0.771429
-0.742857 0.666666 0.628571 0.599999 0.828571 0.619048 0.628572 0.638095
-0.647619 0.647619 0.657143 0.666667 0.657143 0.685714 0.695238 0.704762
-0.714286 0.72381 0.733334;
-#X coords 0 1 50 0 150 105 1 0 0;
-#X restore 35 64 graph;
-#X obj 812 42 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
+#X restore 131 121 pd roundly;
+#X obj 127 254 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
 1;
-#X obj 52 465 riff 800 3100;
-#N canvas 0 23 450 278 (subpatch) 0;
-#X array cracker2 50 float 3;
-#A 0 0.8 0.8 0.790476 0.771429 0.314286 0.495238 0.495238 0.247618
-0.238095 0.580952 0.457143 0.438095 0.428571 0.428571 0.428571 0.285714
-0.704762 0.67619 0.657143 0.628571 0.619047 0.619047 0.609523 0.285714
-0.285714 0.285714 0.285714 0.285714 0.27619 0.52381 0.514286 0.514286
-0.504762 0.504762 0.580952 0.552381 0.542857 0.542857 0.542857 0.371429
-0.371429 0.380952 0.380952 0.380952 0.666667 0.590476 0.571428 0.380952
-0.371428 0.6;
-#X coords 0 1 50 0 150 105 1 0 0;
-#X restore 196 64 graph;
-#X msg 118 368 symbol cracker2;
-#X obj 54 432 metro 400;
-#X obj 35 214 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
-1;
-#X floatatom 35 308 5 0 0 0 - - -;
-#N canvas 0 23 450 278 (subpatch) 0;
-#X array cracker3 50 float 3;
-#A 0 0.733333 0.723809 0.723809 0.714286 0.704762 0.685714 0.542857
-0.561905 0.542857 0.542857 0.542857 0.542857 0.533333 0.533333 0.523809
-0.342854 0.304759 0.685714 0.695238 0.704762 0.704762 0.704762 0.704762
-0.704762 0.704762 0.657143 0.8 0.742857 0.695237 0.647618 0.771429
-0.742857 0.666666 0.628571 0.599999 0.828571 0.619048 0.628572 0.638095
-0.647619 0.647619 0.657143 0.666667 0.657143 0.685714 0.695238 0.704762
-0.714286 0.72381 0.733334;
-#X coords 0 1 50 0 150 105 1 0 0;
-#X restore 356 64 graph;
-#X msg 138 348 symbol cracker3;
-#X obj 35 285 random 3;
-#X obj 35 330 sel 0 1 2;
-#X obj 35 240 retro 3000 30000;
 #N canvas 1 89 450 430 metro_tabular 0;
 #N canvas 0 23 450 278 (subpatch) 0;
 #X array metroooo 50 float 3;
@@ -644,111 +400,90 @@ pollintervall 1 \, verbose 1;
 #X connect 8 1 6 1;
 #X connect 8 2 1 0;
 #X coords 0 -1 1 1 35 35 1 100 100;
-#X restore 232 452 pd metro_tabular;
-#N canvas 0 50 450 250 (subpatch) 0;
-#X array craak 10 float 3;
-#A 0 0.635709 0.74999 0.74999 0.585711 0.371435 0.371435 0.592854 0.842843
-0.971408 0.028589;
-#X coords 0 1 10 0 150 105 1 0 0;
-#X restore 845 148 graph;
-#X obj 450 308 r qtarget;
-#X msg 916 287 craak;
-#X msg 806 337 0;
-#X obj 812 114 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
--1 -1;
-#X obj 845 316 riff1 800 3100 400;
-#X obj 845 416 s NOTE;
-#X obj 812 69 retro 2000 30000;
-#X obj 916 264 loadbang;
-#X text 322 238 array to qlist;
-#X obj 337 388 qlist;
-#X msg 364 330 clear;
-#X msg 287 272 bang;
-#X obj 337 301 t a b;
-#X msg 287 301 print;
-#X obj 337 411 print;
-#X msg 337 272 symbol craak;
-#X obj 337 359 arr2q 400 qtarget;
-#X floatatom 450 331 5 0 0 0 - - -;
-#X obj 988 416 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
+#X restore 131 150 pd metro_tabular;
+#X obj 127 326 bng 15 250 50 0 empty empty world_evt 17 7 0 10 -262144
 -1 -1;
+#X obj 127 281 retro 2000 30000;
+#X text 118 211 main 1 + sub 1 ?;
+#X obj 125 98 array random;
+#N canvas 297 268 781 575 roomA 0;
+#X obj 541 108 s NOTE;
+#X obj 589 38 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
+1;
+#X obj 167 282 s NOTE;
+#X obj 215 212 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
+1;
+#X obj 267 282 s NOTE;
+#X obj 315 212 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
+1;
+#X msg 541 85 4206 0 400 \$1;
+#X msg 167 259 3307 0 400 \$1;
+#X msg 267 259 3308 0 400 \$1;
+#X obj 435 210 s NOTE;
+#X obj 483 140 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
+1;
+#X obj 33 101 s NOTE;
+#X obj 81 31 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0 1
+;
+#X obj 595 235 s NOTE;
+#X obj 643 165 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
+1;
+#X msg 33 78 4201 0 400 \$1;
+#X floatatom 663 186 5 0 0 0 - - -;
+#X msg 595 212 3309 0 400 \$1;
+#X msg 435 187 4202 0 800 \$1;
+#X obj 421 370 s NOTE;
+#X obj 469 300 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
+1;
+#X msg 421 347 4203 0 400 \$1;
+#X obj 400 124 s NOTE;
+#X obj 448 54 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
+1;
+#X msg 400 101 4205 0 400 \$1;
+#X obj 172 137 s NOTE;
+#X obj 220 67 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
+1;
+#X msg 172 114 4204 0 400 \$1;
+#X obj 638 110 s NOTE;
+#X obj 686 40 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
+1;
+#X msg 638 87 4207 0 400 \$1;
+#X connect 1 0 6 0;
+#X connect 3 0 7 0;
+#X connect 5 0 8 0;
+#X connect 6 0 0 0;
+#X connect 7 0 2 0;
+#X connect 8 0 4 0;
+#X connect 10 0 18 0;
+#X connect 12 0 15 0;
+#X connect 14 0 17 0;
+#X connect 15 0 11 0;
+#X connect 16 0 17 0;
+#X connect 17 0 13 0;
+#X connect 18 0 9 0;
+#X connect 20 0 21 0;
+#X connect 21 0 19 0;
+#X connect 23 0 24 0;
+#X connect 24 0 22 0;
+#X connect 26 0 27 0;
+#X connect 27 0 25 0;
+#X connect 29 0 30 0;
+#X connect 30 0 28 0;
+#X restore 151 18 pd roomA;
+#N canvas 1 89 411 690 n 0;
+#X text 22 21 n weighted sum;
+#X text 171 537 0.5 0.7 0.85 0.23 0.56 == ratio;
+#X text 168 553 2.84 == sum;
+#X text 172 576 1 0 0 0 0 == ratio;
+#X text 169 592 1 == sum;
+#X text 169 646 just add up. & divide by sum;
+#X text 166 446 0.5 0.7 = 1.2;
+#X text 172 461 .5/1.2 .7/1.2;
+#X text 269 443 0.85;
+#X text 189 477 0.5 0.7;
+#X text 274 475 0.85;
 #N canvas 0 50 450 250 (subpatch) 0;
-#X array copperlee1 10 float 3;
-#A 0 0.24762 0.228573 0.200003 0.314284 0.352377 0.342854 0.257143
-0.266667 0.200001 0.133334;
-#X coords 0 1 10 0 150 105 1 0 0;
-#X restore 560 414 graph;
-#X obj 560 682 s NOTE;
-#X obj 631 530 loadbang;
-#X obj 703 682 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
--1 -1;
-#X obj 560 582 riff1 1200 3204 250;
-#X msg 631 553 copperlee;
-#X obj 982 462 del 1000;
-#N canvas 0 50 450 250 (subpatch) 0;
-#X array copperlee2 10 float 3;
-#A 0 0.514287 0.514287 0.514287 0.800003 0.704764 0.590478 0.552382
-0.619049 0.428572 0.380952;
-#X coords 0 1 10 0 150 105 1 0 0;
-#X restore 560 284 graph;
-#N canvas 0 50 450 250 (subpatch) 0;
-#X array copperlee3 10 float 3;
-#A 0 0.933335 0.895239 0.84762 0.84762 0.952382 0.904763 0.84762 0.914287
-0.895239 0.838096;
-#X coords 0 1 10 0 150 105 1 0 0;
-#X restore 560 154 graph;
-#N canvas 0 50 450 250 (subpatch) 0;
-#X array copperlee 10 float 3;
-#A 0 1.13646 1.08612 1.01895 1.17534 1.28286 1.21084 1.07713 1.15675
-1.04429 0.925735;
-#X coords 0 1 10 0 150 105 1 0 0;
-#X restore 66 636 graph;
-#X text 1062 20 n weighted sum;
-#X text 1211 536 0.5 0.7 0.85 0.23 0.56 == ratio;
-#X text 1208 552 2.84 == sum;
-#X text 1212 575 1 0 0 0 0 == ratio;
-#X text 1209 591 1 == sum;
-#X text 1209 645 just add up. & divide by sum;
-#X text 1206 445 0.5 0.7 = 1.2;
-#X text 1212 460 .5/1.2 .7/1.2;
-#X text 1309 442 0.85;
-#X text 1229 476 0.5 0.7;
-#X text 1314 474 0.85;
-#N canvas 0 50 450 250 (subpatch) 0;
-#X array copper 100 float 3;
-#A 0 0 0 0 0.07456 0.11788 0.131481 0.138281 0.142561 0.145961 0.140041
-0.137521 0.144321 0.149862 0.155402 0.150615 0.155149 0.150362 0.133082
-0.125122 0.107842 0.0905624 0.0732824 0.0666826 0.0600826 0.0534828
-0.0562028 0.058923 0.0606229 0.0716429 0.0826629 0.0936829 0.121643
-0.130963 0.149603 0.168243 0.168243 0.170763 0.161443 0.136003 0.110562
-0.0792022 0.0571624 0.0385224 0.0198824 -0.00215773 -0.0241977 -0.0380511
--0.0519047 -0.0564381 -0.0564381 -0.0377981 -0.0191581 0.0113218 0.0231616
-0.0536412 0.0892212 0.115481 0.123101 0.121401 0.0982276 0.0750543
-0.0518809 0.0112007 -0.0201591 -0.0142393 0.0103205 0.0442004 0.0501204
-0.0840002 0.0526402 0.0433202 0.0178801 -0.0168802 -0.0168802 -0.0199868
--0.0298935 -0.0330003 -0.0330003 -0.0330003 -0.0330003 -0.0330003 -0.0330003
--0.0330003 -0.0330003 -0.0330003 -0.0330003 -0.0330003 -0.0330003 -0.0330003
--0.0398005 -0.0398005 -0.0398005 -0.0466006 -0.0602009 -0.067001 -0.0738012
--0.0712814 -0.0408015 -0.0264419 -0.0952027;
-#X coords 0 1 100 -1 200 50 1 0 0;
-#X restore 1218 35 graph;
-#N canvas 0 50 450 250 (subpatch) 0;
-#X array copper1 100 float 3;
-#A 0 0 0 0 0.32 0.36 0.36 0.36 0.32 0.32 0.28 0.24 0.24 0.22 0.2 0.16
-0.16 0.12 0.0400002 2.38419e-07 -0.0799997 -0.16 -0.24 -0.279999 -0.319999
--0.359999 -0.359999 -0.359999 -0.359999 -0.319999 -0.279999 -0.24 -0.12
--0.0799997 2.38419e-07 0.0800002 0.0800002 0.12 0.0800002 2.38419e-07
--0.0799997 -0.2 -0.279999 -0.359999 -0.439999 -0.519999 -0.599999 -0.639999
--0.679999 -0.679999 -0.679999 -0.599999 -0.519999 -0.359999 -0.279999
--0.12 0.0400002 0.16 0.2 0.2 0.12 0.0400002 -0.0399997 -0.2 -0.319999
--0.279999 -0.16 2.38419e-07 0.0400002 0.2 0.0800002 0.0400002 -0.0399997
--0.16 -0.16 -0.173333 -0.186666 -0.2 -0.2 -0.2 -0.2 -0.2 -0.2 -0.2
--0.2 -0.2 -0.2 -0.2 -0.2 -0.2 -0.2 -0.2 -0.2 -0.2 -0.2 -0.2 -0.2 -0.16
-2.38419e-07 0.12 2.38419e-07;
-#X coords 0 1 100 -1 200 50 1 0 0;
-#X restore 1218 115 graph;
-#N canvas 0 50 450 250 (subpatch) 0;
-#X array copper2 100 float 3;
+#X array coper 100 float 3;
 #A 0 0 0 0 0 0.200001 0.280003 0.320004 0.400006 0.420006 0.440006
 0.480007 0.520008 0.58001 0.640011 0.666678 0.693346 0.720013 0.728013
 0.736013 0.744013 0.752014 0.760014 0.776014 0.792014 0.808015 0.824015
@@ -763,9 +498,41 @@ pollintervall 1 \, verbose 1;
 0.0799982 0.0399973 0.0399973 0.0399973 -3.63588e-06 -0.0800055 -0.120006
 -0.160007 -0.200008 -0.240009 -0.320011 -0.560016;
 #X coords 0 1 100 -1 200 50 1 0 0;
-#X restore 1218 195 graph;
+#X restore 178 36 graph;
 #N canvas 0 50 450 250 (subpatch) 0;
-#X array copper3 100 float 3;
+#X array coper1 100 float 3;
+#A 0 0 0 0 0.32 0.36 0.36 0.36 0.32 0.32 0.28 0.24 0.24 0.22 0.2 0.16
+0.16 0.12 0.0400002 2.38419e-07 -0.0799997 -0.16 -0.24 -0.279999 -0.319999
+-0.359999 -0.359999 -0.359999 -0.359999 -0.319999 -0.279999 -0.24 -0.12
+-0.0799997 2.38419e-07 0.0800002 0.0800002 0.12 0.0800002 2.38419e-07
+-0.0799997 -0.2 -0.279999 -0.359999 -0.439999 -0.519999 -0.599999 -0.639999
+-0.679999 -0.679999 -0.679999 -0.599999 -0.519999 -0.359999 -0.279999
+-0.12 0.0400002 0.16 0.2 0.2 0.12 0.0400002 -0.0399997 -0.2 -0.319999
+-0.279999 -0.16 2.38419e-07 0.0400002 0.2 0.0800002 0.0400002 -0.0399997
+-0.16 -0.16 -0.173333 -0.186666 -0.2 -0.2 -0.2 -0.2 -0.2 -0.2 -0.2
+-0.2 -0.2 -0.2 -0.2 -0.2 -0.2 -0.2 -0.2 -0.2 -0.2 -0.2 -0.2 -0.2 -0.16
+2.38419e-07 0.12 2.38419e-07;
+#X coords 0 1 100 -1 200 50 1 0 0;
+#X restore 178 116 graph;
+#N canvas 0 50 450 250 (subpatch) 0;
+#X array coper2 100 float 3;
+#A 0 0 0 0 0 0.200001 0.280003 0.320004 0.400006 0.420006 0.440006
+0.480007 0.520008 0.58001 0.640011 0.666678 0.693346 0.720013 0.728013
+0.736013 0.744013 0.752014 0.760014 0.776014 0.792014 0.808015 0.824015
+0.840016 0.850016 0.860016 0.870016 0.880017 0.880017 0.880017 0.880017
+0.880017 0.880017 0.840016 0.840016 0.800015 0.760014 0.740013 0.720013
+0.720013 0.720013 0.700012 0.680012 0.653345 0.626677 0.60001 0.60001
+0.60001 0.60001 0.560009 0.520008 0.480007 0.470007 0.460007 0.450007
+0.440006 0.413339 0.386672 0.360005 0.340004 0.320004 0.300003 0.280003
+0.260002 0.240002 0.220001 0.200001 0.200001 0.16 0.119999 0.119999
+0.119999 0.0799982 0.0799982 0.0799982 0.0799982 0.0799982 0.0799982
+0.0799982 0.0799982 0.0799982 0.0799982 0.0799982 0.0799982 0.0799982
+0.0799982 0.0399973 0.0399973 0.0399973 -3.63588e-06 -0.0800055 -0.120006
+-0.160007 -0.200008 -0.240009 -0.320011 -0.560016;
+#X coords 0 1 100 -1 200 50 1 0 0;
+#X restore 178 196 graph;
+#N canvas 0 50 450 250 (subpatch) 0;
+#X array coper3 100 float 3;
 #A 0 0.040001 0.040001 0.08 0.08 0.119999 0.159998 0.199997 0.239996
 0.279995 0.299995 0.319994 0.319994 0.319994 0.319994 0.319994 0.319994
 0.239996 0.119999 0.08 0.040001 0.040001 0.040001 0.0200015 1.96695e-06
@@ -781,15 +548,14 @@ pollintervall 1 \, verbose 1;
 -0.119995 -0.0999956 -0.079996 -0.039997 0.040001 0.040001 0.119999
 0.119999 0.199997 0 0 0 0;
 #X coords 0 1 100 -1 200 50 1 0 0;
-#X restore 1218 275 graph;
-#X obj 1070 151 asum copper;
-#X obj 1133 239 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
--1 -1;
-#X obj 1070 89 t b b;
-#X obj 1070 69 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
--1 -1;
+#X restore 178 276 graph;
+#X obj 93 240 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
+-1;
+#X obj 30 90 t b b;
+#X obj 30 70 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
+-1;
 #N canvas 0 50 450 250 (subpatch) 0;
-#X array copper4 100 float 3;
+#X array coper4 100 float 3;
 #A 0 0.040001 0.040001 0.08 0.4 0.359999 0.239996 0.159994 0.0799927
 -9.17912e-06 -0.120012 -0.200014 -0.240015 -0.280016 -0.320017 -0.360017
 -0.360017 -0.320017 -0.200014 0.0399917 0.199995 0.119994 0.0599922
@@ -805,1280 +571,618 @@ pollintervall 1 \, verbose 1;
 -0.120012 -0.180013 -0.240015 -0.320017 -0.400018 -0.440019 -0.560022
 -0.600023 -0.720026 -0.880029 -1.40004;
 #X coords 0 1 100 -1 200 50 1 0 0;
-#X restore 1218 355 graph;
-#X msg 1070 264 bang;
-#X obj 1070 241 scan;
-#X obj 1070 287 random 1000;
-#X obj 1070 310 / 1000;
-#X floatatom 1070 333 5 0 0 0 - - -;
-#X obj 1070 221 t a b;
-#X msg 1070 112 1 \, 1 \, 1 \, 1;
-#X obj 1070 371 asum copper;
-#X obj 928 576 ofelia;
-#X obj 422 580 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
--1 -1;
-#X msg 359 605 bang;
-#X obj 359 582 scan;
-#X obj 359 628 random 1000;
-#X obj 359 651 / 1000;
-#X floatatom 359 674 5 0 0 0 - - -;
-#X obj 359 562 t a b;
-#X obj 359 712 asum copperlee;
-#X obj 414 677 print;
-#X msg 359 539 3;
-#X text 1057 524 main 1 + sub 1 ?;
-#X msg 1070 198 2;
-#X obj 766 607 array random;
-#X obj 1043 629 random 4;
-#X obj 938 701 / 1000;
-#X obj 938 678 random 300;
-#X obj 938 724 t a a;
-#X connect 0 0 11 0;
-#X connect 1 0 8 3;
-#X connect 5 0 8 1;
-#X connect 7 0 27 0;
-#X connect 8 0 2 0;
-#X connect 10 0 8 1;
-#X connect 11 0 8 0;
-#X connect 12 0 18 0;
-#X connect 13 0 17 0;
-#X connect 15 0 8 1;
-#X connect 16 0 13 0;
-#X connect 17 0 5 0;
-#X connect 17 1 10 0;
-#X connect 17 2 15 0;
-#X connect 18 0 16 0;
-#X connect 21 0 38 0;
-#X connect 22 0 25 1;
-#X connect 23 0 25 0;
-#X connect 24 0 25 0;
-#X connect 25 0 26 0;
-#X connect 25 3 39 0;
-#X connect 27 0 24 0;
-#X connect 28 0 22 0;
-#X connect 30 0 35 0;
-#X connect 31 0 30 0;
-#X connect 32 0 30 0;
-#X connect 33 0 37 0;
-#X connect 33 1 31 0;
-#X connect 34 0 30 0;
-#X connect 36 0 33 0;
-#X connect 37 0 30 0;
-#X connect 42 0 45 0;
-#X connect 44 0 41 0;
-#X connect 44 3 43 0;
-#X connect 45 0 44 1;
-#X connect 46 0 44 0;
-#X connect 66 0 77 1;
-#X connect 67 0 76 0;
-#X connect 67 1 65 1;
-#X connect 68 0 67 0;
-#X connect 70 0 72 0;
-#X connect 71 0 70 0;
-#X connect 72 0 73 0;
-#X connect 73 0 74 0;
-#X connect 74 0 77 0;
-#X connect 75 0 71 0;
-#X connect 75 1 66 0;
-#X connect 76 0 65 0;
-#X connect 79 0 86 1;
-#X connect 80 0 82 0;
-#X connect 81 0 80 0;
-#X connect 82 0 83 0;
-#X connect 83 0 84 0;
-#X connect 84 0 86 0;
-#X connect 84 0 87 0;
-#X connect 85 0 81 0;
-#X connect 85 1 79 0;
-#X connect 88 0 85 0;
-#X connect 90 0 75 0;
-#X connect 93 0 95 0;
-#X connect 94 0 93 0;
-#X restore 298 399 pd birds;
-#N canvas 1 89 1084 612 crickets 0;
-#X text 1042 577 >>>;
-#X text 1042 17 >>>;
-#X text 12 17 <<<;
-#X text 12 577 <<<;
-#N canvas 1 89 1174 566 save 0;
-#N canvas 0 23 450 278 (subpatch) 0;
-#X array riff11 10 float 3;
-#A 0 0.342857 0.67619 0.371429 0.685714 0.352381 0.638095 0.352381
-0.609524 0.333333 0.0285714;
-#X coords 0 1 10 0 150 105 1 0 0;
-#X restore 339 185 graph;
-#N canvas 0 23 450 278 (subpatch) 0;
-#X array riff10 50 float 3;
-#A 0 0.809524 0.809524 0.819048 0.819048 0.819048 0.809524 0.7 0.695239
-0.695239 0.695239 0.695239 0.438095 0.695239 0.690477 0.685715 0.447619
-0.680952 0.680952 0.680952 0.680952 0.680952 0.82381 0.82381 0.666666
-0.666666 0.671429 0.671429 0.814286 0.814286 0.657142 0.657142 0.657142
-0.642856 0.623807 0.623807 0.623807 0.809524 0.361905 0.809524 0.361905
-0.714285 0.714285 0.723809 0.761905 0.761905 0.771429 0.771429 0.771429
-0.771429 0.800001;
-#X coords 0 1 50 0 150 105 1 0 0;
-#X restore 179 185 graph;
-#X obj 179 317 tgl 20 0 empty empty empty 17 7 0 10 -262130 -1 -1 0
-1;
-#X obj 292 327 tgl 20 0 empty empty 3001 17 7 0 10 -257985 -1 -1 0
-1;
-#X obj 179 342 metro 2000;
-#X obj 339 317 tgl 20 0 empty empty empty 17 7 0 10 -262130 -1 -1 0
-1;
-#X obj 452 327 tgl 20 0 empty empty 3001 17 7 0 10 -257985 -1 -1 0
-1;
-#X obj 339 342 metro 2000;
-#X obj 499 317 tgl 20 0 empty empty empty 17 7 0 10 -262130 -1 -1 0
-1;
-#X obj 612 327 tgl 20 0 empty empty 3001 17 7 0 10 -257985 -1 -1 0
-1;
-#N canvas 0 23 450 278 (subpatch) 0;
-#X array riff15 30 float 3;
-#A 0 0.578571 0.864285 1.39286 0.00952381 0.00952375 0.428571 0.542857
-0.878573 0.00952381 0.00952387 1.1 0.12381 0 0 0 0 0 0 0.152381 0.152381
-0 0 0 0.495238 0 0.685714 0.514286 0 0.238095 0;
-#X coords 0 1 30 0 150 105 1 0 0;
-#X restore 499 185 graph;
-#X obj 499 342 metro 1000;
-#X obj 179 481 s NOTE;
-#X obj 339 481 s NOTE;
-#X obj 499 481 s NOTE;
-#X floatatom 279 501 5 0 0 0 - - -;
-#X obj 279 523 s X3;
-#X floatatom 439 501 5 0 0 0 - - -;
-#X obj 439 523 s X3;
-#N canvas 460 301 980 450 buoyfly 0;
-#N canvas 0 23 450 278 (subpatch) 0;
-#X array riff2 50 float 3;
-#A 0 0.285714 0.304762 0.328572 0.457144 0.504763 0.514287 0.542858
-0.542858 0.533335 0.533335 0.514287 0.495239 0.476191 0.428572 0.380953
-0.361905 0.342857 0.333333 0.333333 0.361905 0.4 0.466667 0.466667
-0.552382 0.57143 0.580954 0.590478 0.590478 0.580954 0.523811 0.457144
-0.409524 0.361905 0.304762 0.27619 0.266666 0.257142 0.180951 0.123808
-0.0761888 0.0571411 0.0571411 0.0571411 0.0476172 0.0476172 0.0380933
-0.0380933 0.0380937 0.0380937 0.333333;
-#X coords 0 1 50 0 150 105 1 0 0;
-#X restore 180 84 graph;
-#N canvas 0 23 450 278 (subpatch) 0;
-#X array riff3 50 float 3;
-#A 0 0.12381 0.12381 0.12381 0.12381 0.12381 0.12381 0.180952 0.219047
-0.257142 0.27619 0.295237 0.314285 0.323808 0.342856 0.371427 0.466664
-0.514283 0.514283 0.514283 0.504759 0.428569 0.361903 0.285713 0.247618
-0.171428 0.161906 0.200001 0.266667 0.333333 0.409523 0.533332 0.457142
-0.314286 0.180953 0.238096 0.276191 0.285714 0.266667 0.190476 0.161904
-0.123809 0.104761 0.0285701 0.0190462 -0.00952387 -0.00952387 -0.00952387
--0.00952387 -0.00952387 -0.00952387;
-#X coords 0 1 50 0 150 105 1 0 0;
-#X restore 340 84 graph;
-#X obj 180 216 tgl 20 0 empty empty empty 17 7 0 10 -262130 -1 -1 0
-1;
-#X obj 310 244 tgl 20 0 empty empty empty 17 7 0 10 -257985 -1 -1 0
-1;
-#X obj 340 216 tgl 20 0 empty empty empty 17 7 0 10 -262130 -1 -1 0
-1;
-#X obj 470 244 tgl 20 0 empty empty empty 17 7 0 10 -257985 -1 -1 0
-1;
-#X obj 180 380 s NOTE;
-#X obj 340 380 s NOTE;
-#X floatatom 289 383 5 0 0 0 - - -;
-#N canvas 0 23 450 278 (subpatch) 0;
-#X array riff1 50 float 3;
-#A 0 0.2 0.2 0.266666 0.333332 0.390475 0.457141 0.533331 0.590473
-0.666663 0.780948 0.80952 0.80952 0.752377 0.65714 0.561902 0.519045
-0.476188 0.371427 0.257142 0.2 0.152381 0.12381 0.114286 0.0666667
-0.0190476 0.0285714 0.0285714 0.0285714 0.0285714 0.0190476 0.0190476
-0.0190476 0.609524 0.609524 0.609524 0.6 0.228571 0.238095 0.238095
-0.257143 0.12381 0.6 0.590476 0.580953 0.561905 0.552381 0.238095 0.238095
-0.238095 0.238095;
-#X coords 0 1 50 0 150 105 1 0 0;
-#X restore 20 84 graph;
-#X obj 20 216 tgl 20 0 empty empty empty 17 7 0 10 -262130 -1 -1 0
-1;
-#X obj 150 244 tgl 20 0 empty empty empty 17 7 0 10 -257985 -1 -1 0
-1;
-#X obj 20 380 s NOTE;
-#X text 23 27 * buoy-fly;
-#X obj 340 241 metro 500;
-#X obj 180 241 metro 500;
-#X obj 20 241 metro 500;
-#N canvas 0 23 450 278 (subpatch) 0;
-#X array riff22 50 float 3;
-#A 0 0.180953 0.161905 0.161905 0.161905 0.171429 0.180952 0.190476
-0.2 0.209524 0.209524 0.209524 0.190476 0.114285 0.133333 0.171429
-0.190476 0.228572 0.24762 0.257143 0.266667 0.276191 0.285715 0.285715
-0.276191 0.257143 0.114285 0.133333 0.152381 0.2 0.238096 0.266667
-0.314287 0.323811 0.333334 0.304763 0.142857 0.142857 0.161905 0.180952
-0.2 0.219048 0.24762 0.285715 0.295239 0.314287 0.323811 0.333334 0.333334
-0.219048 0.190476;
-#X coords 0 1 50 0 150 105 1 0 0;
-#X restore 658 82 graph;
-#N canvas 0 23 450 278 (subpatch) 0;
-#X array riff23 50 float 3;
-#A 0 0.67619 0.371429 0.390476 0.4 0.419048 0.419048 0.419048 0.419048
-0.409524 0.342857 0.295238 0.247618 0.247618 0.247618 0.266666 0.295238
-0.323809 0.390476 0.4 0.438096 0.438096 0.447619 0.447619 0.457143
-0.457143 0.4 0.314285 0.228571 0.209523 0.228571 0.247618 0.285714
-0.333333 0.4 0.476191 0.485715 0.495239 0.495239 0.495239 0.495239
-0.419048 0.285714 0.27619 0.476191 0.447619 0.380952 0.314285 0.323809
-0.342857 0.371429;
-#X coords 0 1 50 0 150 105 1 0 0;
-#X restore 818 82 graph;
-#X obj 658 214 tgl 20 0 empty empty empty 17 7 0 10 -262130 -1 -1 0
-1;
-#X obj 788 242 tgl 20 0 empty empty empty 17 7 0 10 -257985 -1 -1 0
-1;
-#X obj 818 214 tgl 20 0 empty empty empty 17 7 0 10 -262130 -1 -1 0
-1;
-#X obj 948 242 tgl 20 0 empty empty empty 17 7 0 10 -257985 -1 -1 0
-1;
-#X obj 658 378 s NOTE;
-#X obj 818 378 s NOTE;
-#X floatatom 767 381 5 0 0 0 - - -;
-#N canvas 0 23 450 278 (subpatch) 0;
-#X array riff21 50 float 3;
-#A 0 0.209524 0.209524 0.209524 0.209524 0.209524 0.219048 0.180952
-0.142857 0.123809 0.123809 0.123809 0.142857 0.152381 0.161904 0.180952
-0.2 0.2 0.190476 0.152381 0.133333 0.114285 0.114285 0.114285 0.123809
-0.133333 0.171428 0.190476 0.209524 0.238095 0.257143 0.266667 0.257143
-0.247619 0.228571 0.209523 0.190476 0.171428 0.142856 0.142856 0.133332
-0.114285 0.095237 0.0857131 0.123809 0.161904 0.209523 0.228571 0.228572
-0.228572 0.228572;
-#X coords 0 1 50 0 150 105 1 0 0;
-#X restore 498 82 graph;
-#X obj 498 214 tgl 20 0 empty empty empty 17 7 0 10 -262130 -1 -1 0
-1;
-#X obj 628 242 tgl 20 0 empty empty empty 17 7 0 10 -257985 -1 -1 0
-1;
-#X obj 498 378 s NOTE;
-#X obj 818 239 metro 500;
-#X obj 658 239 metro 500;
-#X obj 498 239 metro 500;
-#X obj 20 275 riff 800 3051;
-#X obj 180 275 riff 800 3052;
-#X obj 340 275 riff 800 3053;
-#X obj 498 273 riff 800 3054;
-#X obj 658 273 riff 800 3055;
-#X obj 818 273 riff 800 3056;
-#X msg 81 207 symbol riff1;
-#X msg 241 207 symbol riff2;
-#X msg 401 207 symbol riff3;
-#X msg 561 207 symbol riff21;
-#X msg 721 207 symbol riff22;
-#X msg 881 207 symbol riff23;
-#X connect 2 0 15 0;
-#X connect 3 0 34 3;
-#X connect 4 0 14 0;
-#X connect 5 0 35 3;
-#X connect 10 0 16 0;
-#X connect 11 0 33 3;
-#X connect 14 0 35 0;
-#X connect 15 0 34 0;
-#X connect 16 0 33 0;
-#X connect 19 0 31 0;
-#X connect 20 0 37 3;
-#X connect 21 0 30 0;
-#X connect 22 0 38 3;
-#X connect 27 0 32 0;
-#X connect 28 0 36 3;
-#X connect 30 0 38 0;
-#X connect 31 0 37 0;
-#X connect 32 0 36 0;
-#X connect 33 0 12 0;
-#X connect 34 0 6 0;
-#X connect 34 1 8 0;
-#X connect 35 0 7 0;
-#X connect 36 0 29 0;
-#X connect 37 0 23 0;
-#X connect 37 1 25 0;
-#X connect 38 0 24 0;
-#X connect 39 0 33 1;
-#X connect 40 0 34 1;
-#X connect 41 0 35 1;
-#X connect 42 0 36 1;
-#X connect 43 0 37 1;
-#X connect 44 0 38 1;
-#X restore 241 73 pd buoyfly;
-#N canvas 551 130 439 542 yellow 0;
-#N canvas 0 23 450 278 (subpatch) 0;
-#X array riff5 50 float 3;
-#A 0 0.619048 0.619048 0.628571 0.628571 0.628571 0.628571 0.638095
-0.638095 0.638095 0.638095 0.638095 0.638095 0.638095 0.638095 0.628571
-0.619048 0.619048 0.609524 0.609524 0.6 0.590476 0.585714 0.580952
-0.580952 0.571428 0.561904 0.561904 0.561904 0.55238 0.55238 0.55238
-0.542857 0.542857 0.542857 0.542857 0.542857 0.542857 0.542857 0.542857
-0.55238 0.561904 0.561904 0.571428 0.571428 0.571428 0.571428 0.571428
-0.571428 0.571428 0.571428;
-#X coords 0 1 50 0 150 105 1 0 0;
-#X restore 29 161 graph;
-#N canvas 0 23 450 278 (subpatch) 0;
-#X array riff6 50 float 3;
-#A 0 0.685715 0.723811 0.800002 0.485714 0.519047 0.552381 0.580953
-0.609524 0.626191 0.642858 0.659525 0.676191 0.685715 0.399999 0.495238
-0.533333 0.571429 0.604762 0.638096 0.653969 0.669842 0.685715 0.695239
-0.704763 0.561905 0.666667 0.704763 0.714287 0.266665 0.323808 0.35238
-0.366666 0.380951 0.399999 0.423809 0.933336 0.952384 0.957145 0.961907
-0.609524 0.628572 0.47619 0.523809 0.523809 0.523809 0.438095 0.457142
-0.457142 0.438095 0.361904;
-#X coords 0 1 50 0 150 105 1 0 0;
-#X restore 189 161 graph;
-#X obj 29 293 tgl 20 0 empty empty empty 17 7 0 10 -204786 -1 -1 0
-1;
-#X obj 159 321 tgl 20 0 empty empty empty 17 7 0 10 -4034 -1 -1 0 1
-;
-#X obj 189 293 tgl 20 0 empty empty empty 17 7 0 10 -204786 -1 -1 0
-1;
-#X obj 319 321 tgl 20 0 empty empty empty 17 7 0 10 -4034 -1 -1 0 1
-;
-#X obj 29 457 s NOTE;
-#X obj 189 457 s NOTE;
-#X text 26 115 * yellow;
-#X obj 189 318 metro 500;
-#X obj 29 318 metro 500;
-#N canvas 0 23 450 278 (subpatch) 0;
-#X array riff6-1 50 float 3;
-#A 0 0.142857 0.12381 0.12381 0.12381 0.114286 0.266666 0.304761 0.338094
-0.371428 0.371428 0.0952383 0.0952383 0.0952383 0.0952383 0.0952383
-0.0952383 0.0952383 0.209524 0.247619 0.380951 0.0952383 0.0952383
-0.0952383 0.0952383 0.133333 0.133333 0.133333 0.133333 0.133333 0.133333
-0.133333 0.209524 0.209524 0.209524 0.209524 0.133333 0.133333 0.133333
-0.133333 0.314286 0.142857 0.142857 0.142857 0.142857 0.142857 0.142857
-0.438095 0.142857 0.142857 0.142857;
-#X coords 0 1 50 0 150 105 1 0 0;
-#X restore 189 38 graph;
-#X msg 91 277 symbol riff5;
-#X msg 261 277 symbol riff6;
-#X msg 271 297 symbol riff6-1;
-#X obj 29 352 riff 800 3020;
-#X obj 189 352 riff 800 3021;
-#N canvas 0 23 450 278 (subpatch) 0;
-#X array riff6-2 50 float 3;
-#A 0 0.742857 0.580951 0.466664 0.352378 0.276187 0.223806 0.114281
-0.552379 0.409521 0.352378 0.257139 0.20952 0.123805 0.0857093 0.0476138
-0.599998 0.523807 0.447616 0.390473 0.323806 0.257139 0.20952 0.133329
-0.771428 0.723808 0.647618 0.561903 0.485712 0.371425 0.323806 0.247615
-0.223805 0.171424 0.114281 0.0857093 0.0285661 0.742857 0.62857 0.552379
-0.371426 0.304759 0.238092 0.123805 0.67619 0.657142 0.542856 0.476189
-0.409522 0.376188 0.0952342;
-#X coords 0 1 50 0 150 105 1 0 0;
-#X restore 183 -86 graph;
-#X connect 2 0 10 0;
-#X connect 3 0 15 3;
-#X connect 4 0 9 0;
-#X connect 5 0 16 3;
-#X connect 9 0 16 0;
-#X connect 10 0 15 0;
-#X connect 12 0 15 1;
-#X connect 13 0 16 1;
-#X connect 14 0 16 1;
-#X connect 15 0 6 0;
-#X connect 16 0 7 0;
-#X restore 51 54 pd yellow;
-#N canvas 233 89 1003 532 blue 0;
-#N canvas 0 23 450 278 (subpatch) 0;
-#X array riff0 50 float 3;
-#A 0 0.457143 0.457143 0.457143 0.457143 0.457143 0.457143 0.457143
-0.457143 0.457143 0.466667 0.466667 0.466667 0.466667 0.466667 0.466667
-0.466667 0.466667 0.466667 0.466667 0.476191 0.476191 0.476191 0.476191
-0.476191 0.476191 0.476191 0.476191 0.476191 0.476191 0.476191 0.466667
-0.466667 0.466667 0.466667 0.466667 0.466667 0.466667 0.466667 0.466667
-0.466667 0.466667 0.466667 0.466667 0.466667 0.457143 0.447619 0.447619
-0.447619 0.447619 0.457143;
-#X coords 0 1 50 0 150 105 1 0 0;
-#X restore 27 58 graph;
-#X obj 27 190 tgl 20 0 empty empty empty 17 7 0 10 -262130 -1 -1 0
-1;
-#X obj 157 218 tgl 20 0 empty empty empty 17 7 0 10 -257985 -1 -1 0
-1;
-#X obj 27 215 metro 2000;
-#X obj 27 354 s NOTE;
-#N canvas 0 23 450 278 (subpatch) 0;
-#X array riff12 100 float 3;
-#A 0 0.45714 0.476188 0.476188 0.485711 0.495235 0.504759 0.514283
-0.514283 0.533331 0.542855 0.552378 0.561902 0.58095 0.58095 0.599998
-0.609522 0.614284 0.619046 0.628569 0.638093 0.647617 0.657141 0.666665
-0.676189 0.685713 0.695237 0.714284 0.723808 0.738094 0.75238 0.761904
-0.771427 0.790475 0.819047 0.838095 0.857142 0.885714 0.885714 0.904762
-0.904762 0.914285 0.923809 0.933333 0.942857 0.942857 0.942857 0.952381
-0.952381 0.952381 0.952381 0.952381 0.933336 0.942859 0.980955 0.990479
-0.971434 0.971434 0.96191 0.952386 0.933338 0.89524 0.885716 0.866668
-0.84762 0.819049 0.800001 0.780953 0.780953 0.761906 0.752382 0.72381
-0.714286 0.704762 0.685715 0.676191 0.666667 0.647619 0.628572 0.619048
-0.609524 0.590476 0.590476 0.571428 0.571428 0.552381 0.542857 0.523809
-0.504761 0.495237 0.485713 0.47619 0.457142 0.447618 0.42857 0.409523
-0.409523 0.380951 0.371427 0.352381 0.314285;
-#X coords 0 1 100 0 150 105 1 0 0;
-#X restore 187 58 graph;
-#N canvas 0 23 450 278 (subpatch) 0;
-#X array riff13 100 float 3;
-#A 0 0.219048 0.247619 0.257143 0.266667 0.276191 0.285715 0.304762
-0.32381 0.328572 0.333334 0.352382 0.361906 0.371429 0.380953 0.400001
-0.409525 0.419049 0.438097 0.442858 0.457144 0.466668 0.485716 0.49524
-0.523811 0.533335 0.552383 0.552383 0.571431 0.590478 0.600002 0.604764
-0.609526 0.628574 0.657146 0.657146 0.676193 0.695241 0.704765 0.723813
-0.74286 0.752384 0.771432 0.79048 0.800004 0.809527 0.828575 0.838099
-0.857147 0.876194 0.923814 0.942862 0.961909 0.971433 0.980957 0.96191
-0.933338 0.91429 0.895242 0.895242 0.866671 0.866671 0.838099 0.819052
-0.809528 0.79048 0.761908 0.752384 0.733337 0.723813 0.714289 0.695241
-0.685717 0.676193 0.66667 0.657146 0.628574 0.61905 0.609526 0.580955
-0.571431 0.552383 0.542859 0.504764 0.49524 0.466668 0.457144 0.428573
-0.419049 0.400001 0.380954 0.37143 0.361906 0.342858 0.32381 0.304763
-0.295239 0.276191 0.266667 0.247619 0.228572;
-#X coords 0 1 100 0 150 105 1 0 0;
-#X restore 347 58 graph;
-#X obj 594 221 tgl 20 0 empty empty empty 17 7 0 10 -262130 -1 -1 0
-1;
-#X obj 294 197 tgl 20 0 empty empty empty 17 7 0 10 -257985 -1 -1 0
-1;
-#X obj 505 217 tgl 20 0 empty empty empty 17 7 0 10 -257985 -1 -1 0
-1;
-#X text 29 9 * blue drummer;
-#X msg 91 177 symbol riff0;
-#X msg 261 177 symbol riff12;
-#X msg 445 182 symbol riff13;
-#X obj 27 249 riff 400 3031;
-#X obj 314 441 s NOTE;
-#X floatatom 314 379 5 0 0 0 - - -;
-#X obj 314 399 pack f f;
-#X msg 314 420 1031 0 \$1 \$2;
-#X obj 462 439 s NOTE;
-#X floatatom 462 377 5 0 0 0 - - -;
-#X obj 462 397 pack f f;
-#X msg 462 418 1032 0 \$1 \$2;
-#X obj 347 249 riff 40 1032;
-#X obj 411 356 moses 1;
-#N canvas 0 23 450 278 (subpatch) 0;
-#X array riff12-1 100 float 3;
-#A 0 0.0190476 0.514286 0.00952375 0.447619 0.00952375 0.00952375 0.00952375
-0.0190476 0.0190476 0.0190476 0.0190476 0.0190476 0.00952375 0.00952375
-0.676191 0.6 0.00952375 0.00952375 -1.19209e-07 -1.19209e-07 -0.00952399
--0.00952399 -0.00952399 -0.00952399 -0.00952399 -0.00952399 -0.00952399
-0.657144 0.00952381 -1.19209e-07 -1.19209e-07 -1.19209e-07 -1.19209e-07
--1.19209e-07 0.00952375 0.00952375 0.00952375 0.00952375 0.00952375
-0.00952375 0.00952375 0.00952375 0.00952375 0.00952375 0.00952375 0.942858
-0.0190476 0.0190476 0.0190476 0.0190476 0 0 0 0 0 0 0.533333 0 0 0
-0 0 0 0 0 0 0 0 0.657143 0 0 0 0 0 0 0 0 0 1 0 0 0 0 0 0 0 0 0 0 0
-0 0.504762 0 0 0 0 0 0 0 0;
-#X coords 0 1 100 0 150 105 1 0 0;
-#X restore 519 58 graph;
-#N canvas 0 23 450 278 (subpatch) 0;
-#X array riff13-1 100 float 3;
-#A 0 0.0190477 0.0190477 0.276191 0.314286 0.047619 0.380953 0.400001
-0.419049 0.433334 0.44762 0.0571429 0.504763 0.8 0.580954 0.600002
-0.638098 0.638098 0.0285714 0.638098 0.638098 0.895238 0.600002 0.585716
-0.533335 0.514287 0.476192 0.428572 0.371429 0.0285714 0.333334 0.32381
-0.314286 0.314286 0.314286 0.32381 0.0285714 0.371429 0.733333 0.533335
-0.457144 0.409525 0.352381 0.295239 0.295239 0.257143 0.247619 0.219048
-0.171428 0.142857 0.133333 0.123809 0.114285 0.104761 0.00952202 -1.84774e-06
--1.84774e-06 -1.84774e-06 0.400001 0.419049 0.485716 0.0380952 0.561907
-0.580954 0.838095 0.0190476 0.00952381 0.247619 0.247619 0.247619 0.276191
-0.295238 0.333334 0.342858 0.61905 0.628574 0.666669 0.695241 0.0190476
-1.00952 1.02857 1.0381 1.05714 1.07619 0.723812 0.00952381 0.657145
-0.638098 0.600002 0.390476 0.390476 0.257142 0.247618 0.266666 0.314285
-0.333333 0.428571 0.457143 0 0 0;
-#X coords 0 1 100 0 150 105 1 0 0;
-#X restore 679 58 graph;
-#X obj 187 249 riff 20 1031;
-#N canvas 0 23 450 430 metro 0;
-#N canvas 0 23 450 278 (subpatch) 0;
-#X array metroooo 50 float 3;
-#A 0 0.619047 0.75238 0.857141 1.01904 1.25714 1.27619 1.01904 0.752381
-0.647618 0.666666 0.780951 0.533333 0.628571 0.723808 0.942855 1.02857
-1.17142 1.09524 0.857143 0.69524 0.638097 0.647621 0.961902 1.12381
-0.942855 0.990473 1.11428 1.21904 1.01904 0.866665 0.704763 1.04762
-0.933331 1.03809 0.961904 0.923809 0.809524 0.885714 0.971426 0.933331
-0.90476 1.3238 1.26666 1.22857 0.761903 0.666666 0.923807 0.895236
-0.895236 0.876188;
-#X coords 0 1 50 0 150 105 1 0 0;
-#X restore 204 26 graph;
-#X msg 242 146 symbol metroooo;
-#X obj 195 173 riff 1000 1031;
-#X obj 108 129 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
--1 -1;
-#X obj 338 273 del;
-#X obj 117 314 outlet;
-#X obj 338 294 spigot;
-#X obj 128 129 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
-1;
-#X connect 1 0 2 1;
-#X connect 2 1 4 0;
-#X connect 3 0 5 0;
-#X connect 3 0 2 0;
-#X connect 4 0 6 0;
-#X connect 6 0 3 0;
-#X connect 7 0 6 1;
-#X coords 0 -1 1 1 50 50 1 100 100;
-#X restore 356 174 pd metro;
-#X obj 263 358 moses 1;
-#X obj 739 278 print a;
-#X obj 793 281 print b;
-#X obj 746 221 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
--1 -1;
-#X obj 739 257 random 5;
-#X obj 793 260 random 5;
-#X obj 669 338 + 400;
-#X obj 624 334 del;
-#X obj 603 262 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
--1 -1;
-#X obj 626 293 t b b;
-#X obj 624 355 spigot;
-#X obj 634 258 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
-1;
-#X obj 667 306 random 400;
-#X connect 1 0 3 0;
-#X connect 2 0 14 3;
-#X connect 3 0 14 0;
-#X connect 8 0 17 1;
-#X connect 9 0 21 1;
-#X connect 11 0 14 1;
-#X connect 12 0 27 1;
-#X connect 13 0 23 1;
-#X connect 14 0 4 0;
-#X connect 16 0 17 0;
-#X connect 17 0 18 0;
-#X connect 18 0 15 0;
-#X connect 20 0 21 0;
+#X restore 178 356 graph;
+#X msg 30 265 bang;
+#X obj 30 242 scan;
+#X obj 30 288 random 1000;
+#X obj 30 311 / 1000;
+#X floatatom 30 334 5 0 0 0 - - -;
+#X obj 30 222 t a b;
+#X msg 30 113 1 \, 1 \, 1 \, 1;
+#X msg 30 199 2;
+#X obj 30 152 asum coper;
+#X obj 30 372 asum coper;
+#X connect 15 0 28 1;
+#X connect 16 0 25 0;
+#X connect 16 1 27 1;
+#X connect 17 0 16 0;
+#X connect 19 0 21 0;
+#X connect 20 0 19 0;
 #X connect 21 0 22 0;
-#X connect 22 0 19 0;
-#X connect 23 1 24 0;
-#X connect 24 1 20 0;
-#X connect 27 1 29 0;
-#X connect 28 0 23 0;
-#X connect 29 1 16 0;
-#X connect 32 0 33 0;
-#X connect 32 0 34 0;
-#X connect 33 0 30 0;
-#X connect 34 0 31 0;
-#X connect 35 0 36 1;
-#X connect 36 0 39 0;
-#X connect 37 0 38 0;
-#X connect 38 0 36 0;
-#X connect 38 1 41 0;
-#X connect 39 0 37 0;
-#X connect 39 0 27 0;
-#X connect 40 0 39 1;
-#X connect 41 0 35 0;
-#X restore 51 83 pd blue drummer;
-#N canvas 97 145 1017 569 green 0;
-#X obj 136 343 tgl 20 0 empty empty empty 17 7 0 10 -262130 -1 -1 0
-1;
-#X obj 296 343 tgl 20 0 empty empty empty 17 7 0 10 -262130 -1 -1 0
-1;
-#X obj 136 507 s NOTE;
-#X obj 296 507 s NOTE;
-#X obj 266 373 tgl 20 0 empty empty empty 17 7 0 10 -257985 -1 -1 0
-1;
-#X obj 426 373 tgl 20 0 empty empty empty 17 7 0 10 -257985 -1 -1 0
-1;
-#X text 30 104 * green suitcase;
-#X obj 296 368 metro 500;
-#N canvas 0 23 450 278 (subpatch) 0;
-#X array riff4-1 50 float 3;
-#A 0 0.409523 0.447618 0.533332 0.552379 0.609522 0.619046 0.609522
-0.580951 0.485713 0.52381 0.323809 0.276191 0.247619 0.238096 0.238096
-0.247619 0.295238 0.361904 0.514284 0.619046 0.638093 0.647617 0.628569
-0.599998 0.476189 0.342857 0.219048 0.171429 0.171429 0.180953 0.238096
-0.342857 0.466666 0.590474 0.638093 0.676188 0.695236 0.695236 0.666664
-0.580951 0.409523 0.323809 0.285714 0.247619 0.238096 0.238096 0.238096
-0.257143 0.628569 0.561903;
-#X coords 0 1 50 0 150 105 1 0 0;
-#X restore 137 36 graph;
-#N canvas 0 23 450 278 (subpatch) 0;
-#X array riff7-1 50 float 3;
-#A 0 0.27619 0.285714 0.304762 0.323809 0.333333 0.342857 0.342857
-0.333333 0.247619 0.180953 0.161905 0.171429 0.195239 0.27619 0.35238
-0.409523 0.495237 0.495237 0.495237 0.333333 0.257143 0.180953 0.133334
-0.133334 0.152382 0.219048 0.314285 0.533332 0.561903 0.561903 0.533332
-0.514284 0.438094 0.285714 0.0857155 0.066668 0.066668 0.0761917 0.104763
-0.133334 0.171429 0.257143 0.342857 0.419047 0.419047 0.380952 0.314285
-0.266667 0.247619 0.228572;
-#X coords 0 1 50 0 150 105 1 0 0;
-#X restore 297 36 graph;
-#X obj 136 368 metro 500;
-#X msg 191 328 symbol riff4;
-#X msg 201 348 symbol riff4-1;
-#X obj 136 402 riff 800 3011;
-#X obj 296 402 riff 800 3012;
-#X msg 361 328 symbol riff7;
-#X msg 371 348 symbol riff7-1;
-#N canvas 0 23 450 278 (subpatch) 0;
-#X array riff7 100 float 3;
-#A 0 0.514285 0.523809 0.533332 0.542856 0.542856 0.542856 0.6 0.619047
-0.504761 0.495238 0.485714 0.47619 0.466667 0.809524 0.571429 0.638095
-0.638095 0.647619 0.914286 0.657142 0.657142 0.495239 0.500001 0.809523
-0.819046 0.82857 0.82857 0.838094 0.838094 0.771428 0.466667 0.457143
-0.457143 0.438096 0.438096 0.428572 0.428572 0.609521 0.609521 0.676187
-0.676187 0.68571 0.68571 0.68571 0.68571 0.647616 0.619045 0.599997
-0.847616 0.847616 0.676194 0.66667 0.619049 0.609525 0.609525 0.609525
-0.780951 0.780951 0.761903 0.75238 0.638099 0.857143 0.428571 0.428571
-0.428571 0.447619 0.457142 0.542855 0.552379 0.571426 0.599997 0.619044
-0.619044 0.619044 0.60952 0.60952 0.60952 0.599997 0.742858 0.704763
-0.685716 0.685716 0.685716 0.733334 0.92381 0.809525 0.53334 0.561911
-0.571434 0.580958 0.580958 0.58572 0.590481 0.600005 0.8 0.609529 0.61429
-0.619052 0.628576 0.6381;
-#X coords 0 1 100 0 150 105 1 0 0;
-#X restore 296 159 graph;
-#N canvas 0 23 1115 625 (subpatch) 0;
-#X array riff4-2 100 float 3;
-#A 0 0.361905 0.371429 0.390477 0.409524 0.44762 0.485715 0.504763
-0.504763 0.514287 0.409523 0.438095 0.485713 0.495237 0.495237 0.352381
-0.371429 0.4 0.428571 0.457142 0.47619 0.495237 0.4928 0.380952 0.390476
-0.419047 0.428571 0.457142 0.47619 0.495237 0.504761 0.371429 0.4 0.428571
-0.447619 0.466666 0.47619 0.485714 0.495237 0.390476 0.390476 0.4 0.409524
-0.438095 0.447619 0.476191 0.495239 0.5456 0.5536 0.592001 0.36 0.3504
-0.3648 0.380801 0.403201 0.452802 0.491202 0.5104 0.528003 0.528003
-0 0.408 0.425601 0.448001 0.492802 0 0.352 0.3664 0.384001 0.409601
-0.4336 0.48 0.507203 0.515203 0.520003 0.528003 0.529603 0.32 0.344
-0.363201 0.384001 0.390401 0.425602 0.449602 0.470403 0.510403 0.352381
-0.361905 0.371429 0.390476 0.395238 0.409524 0.419048 0.466667 0.485715
-0.409524 0.447619 0.485715 0.533334 0.552382 0.57143;
-#X coords 0 1 100 0 150 105 1 0 0;
-#X restore 135 -85 graph;
-#N canvas 0 23 450 278 (subpatch) 0;
-#X array riff7-2 100 float 3;
-#A 0 0.371429 0.342857 0.352381 0.361905 0.390476 0.4 0.428572 0.438096
-0.266666 0.304761 0.342856 0.371428 0.4 0.428571 0.457143 0.476191
-0.32381 0.352381 0.380953 0.400001 0.428572 0.438096 0.44762 0.32381
-0.361905 0.390477 0.419048 0.438096 0.476191 0.476191 0.32381 0.361905
-0.390477 0.409524 0.438096 0.457144 0.295238 0.314285 0.352381 0.390476
-0.409524 0.428572 0.44762 0.457143 0.495239 0.523811 0.533334 0.552382
-0.57143 0.352381 0.352381 0.352381 0.371429 0.380953 0.4 0.419048 0.428572
-0.428572 0.352381 0.371429 0.380953 0.4 0.409524 0.419048 0.428572
-0.333333 0.352381 0.361905 0.380953 0.419048 0.438096 0.447619 0.466667
-0.466667 0.47619 0.485714 0.44762 0 0.352381 0.380953 0.390476 0.44762
-0.44762 0.466667 0.380952 0.409524 0.419048 0.438096 0.44762 0.476191
-0.485715 0.504763 0.4 0.419048 0.428572 0.457143 0.466667 0.476191
-0 0;
-#X coords 0 1 100 0 150 105 1 0 0;
-#X restore 295 -85 graph;
-#N canvas 0 23 1115 625 (subpatch) 0;
-#X array riff4-3 100 float 3;
-#A 0 0.552381 0.552381 0.552381 0.552381 0.552381 0.542857 0.542857
-0.542857 0.542857 0.542857 0.542857 0.542857 0.542857 0.533333 0.533333
-0.533333 0.533333 0.533333 0.533333 0.533333 0.533333 0.514286 0.514286
-0.504762 0.504762 0.495238 0.495238 0.495238 0.495238 0.485714 0.485714
-0.476191 0.466667 0.47619 0.466667 0.466667 0.466667 0.466667 0.466667
-0.466667 0.457143 0.457143 0.447619 0.447619 0.457143 0.457143 0.457143
-0.457143 0.457143 0.457143 0.457143 0.457143 0.457143 0.457143 0.457143
-0.457143 0.457143 0.457143 0.457143 0.457143 0.447619 0.447619 0.457143
-0.457143 0.457143 0.457143 0.457143 0.457143 0.466666 0.466666 0.466666
-0.466666 0.466666 0.466666 0.466666 0.47619 0.47619 0.485714 0.495238
-0.495238 0.495238 0.504762 0.52381 0.514286 0.533333 0.533333 0.533333
-0.533333 0.533333 0.533333 0.533333 0.533333 0.533333 0.533333 0.533333
-0.542857 0.533333 0.542857 0.542857 0.542857;
-#X coords 0 1 100 0 150 105 1 0 0;
-#X restore 453 -85 graph;
-#N canvas 0 23 450 278 (subpatch) 0;
-#X array riff7-3 100 float 3;
-#A 0 0.495237 0.495237 0.495237 0.495237 0.495237 0.495237 0.495237
-0.495237 0.495237 0.495237 0.495237 0.485714 0.485714 0.485714 0.466667
-0.466667 0.466666 0.466666 0.457142 0.457142 0.447618 0.447618 0.438095
-0.438095 0.438095 0.438095 0.438095 0.438095 0.428571 0.428571 0.428571
-0.428571 0.428571 0.428571 0.428571 0.419048 0.419048 0.419048 0.419048
-0.419048 0.419048 0.419048 0.419048 0.419048 0.419048 0.419048 0.419048
-0.419048 0.419048 0.419048 0.419048 0.4 0.409524 0.4 0.419048 0.419048
-0.419048 0.419047 0.419047 0.419047 0.419047 0.419047 0.419047 0.419047
-0.419047 0.419047 0.419047 0.419047 0.419047 0.419048 0.419048 0.428572
-0.428572 0.438096 0.447619 0.447619 0.447619 0.457143 0.457143 0.457143
-0.47619 0.47619 0.47619 0.485714 0.485714 0.485714 0.485714 0.485714
-0.485714 0.485714 0.485714 0.47619 0.47619 0.47619 0.47619 0.47619
-0.47619 0.47619 0.47619 0.47619;
-#X coords 0 1 100 0 150 105 1 0 0;
-#X restore 613 -86 graph;
-#X msg 186 303 symbol riff4-2;
-#X msg 176 283 symbol riff4-3;
-#X msg 343 284 symbol riff7-3;
-#X msg 354 310 symbol riff7-2;
-#N canvas 0 23 1115 625 (subpatch) 0;
-#X array riff4-4 100 float 3;
-#A 0 0.552382 0.542858 0.533334 0.52381 0.514286 0.504762 0.492064
-0.479365 0.466667 0.452381 0.438095 0.434921 0.431746 0.428571 0.409524
-0.409524 0.4 0.4 0.4 0.4 0.419047 0.423809 0.428571 0.438095 0.457143
-0.457143 0.461905 0.466667 0.466667 0.466667 0.457143 0.447619 0.438095
-0.438095 0.447619 0.457143 0.476191 0.485715 0.485715 0.485715 0.485715
-0.476191 0.466667 0.466667 0.466667 0.466667 0.466667 0.457143 0.447619
-0.447619 0.466666 0.476189 0.514285 0.523809 0.647619 0.685715 0.704762
-0.714286 0.714286 0.714286 0.714286 0.695239 0.685715 0.657143 0.628572
-0.590476 0.571428 0.676191 0.72381 0.77143 0.790477 0.809525 0.809525
-0.819049 0.819049 0.819049 0.809525 0.77143 0.704762 0.704762 0.72381
-0.761906 0.790477 0.819049 0.838097 0.89524 0.89524 0.89524 0.876192
-0.742858 0.742858 0.790477 0.819049 0.923811 0.942859 0.971431 0.971431
-0.971431 0.961907 0.914288;
-#X coords 0 1 100 0 150 105 1 0 0;
-#X restore 455 38 graph;
-#N canvas 0 23 450 278 (subpatch) 0;
-#X array riff7-4 100 float 3;
-#A 0 0.438095 0.438095 0.438095 0.438095 0.438095 0.438095 0.438095
-0.438095 0.438095 0.438095 0.438095 0.438095 0.442856 0.447618 0.447618
-0.447618 0.447618 0.447618 0.447618 0.457142 0.457142 0.457142 0.461904
-0.466666 0.466666 0.466666 0.466666 0.466666 0.466666 0.466666 0.466666
-0.466666 0.466666 0.466666 0.457142 0.447618 1.22856 0.628575 0.66667
-0.714288 0.77143 0.790477 0.838095 0.838096 0.838096 0.847619 0.847619
-0.852381 0.857143 0.857143 0.866667 0.87619 0.880952 0.885714 0.885714
-0.895238 0.895238 0.904761 0.914285 0.923808 0.933332 0.942856 0.942856
-0.952379 0.952379 0.961903 0.971428 0.971428 0.971428 0.980952 0.990475
-0.999999 0.999999 1.00952 1.00952 1.01905 1.02857 1.02857 1.03809 1.04762
-1.04762 1.06666 1.06666 1.07619 1.07619 1.08571 1.10476 1.1238 1.13333
-1.14285 1.14285 1.15237 1.1619 1.19047 1.19047 1.19999 1.23809 1.25713
-1.2857 1.29523;
-#X coords 0 1 100 0 150 105 1 0 0;
-#X restore 615 37 graph;
-#N canvas 0 23 450 278 (subpatch) 0;
-#X array riff4 100 float 3;
-#A 0 0.514285 0.523809 0.533332 0.542856 0.542856 0.542856 0.6 0.619047
-0.504761 0.495238 0.485714 0.47619 0.466667 0.809524 0.571429 0.638095
-0.638095 0.647619 0.914286 0.657142 0.657142 0.495239 0.500001 0.809523
-0.819046 0.82857 0.82857 0.838094 0.838094 0.771428 0.466667 0.457143
-0.457143 0.438096 0.438096 0.428572 0.428572 0.609521 0.609521 0.676187
-0.676187 0.68571 0.68571 0.68571 0.68571 0.647616 0.619045 0.599997
-0.847616 0.847616 0.676194 0.66667 0.619049 0.609525 0.609525 0.609525
-0.780951 0.780951 0.761903 0.75238 0.638099 0.857143 0.428571 0.428571
-0.428571 0.447619 0.457142 0.542855 0.552379 0.571426 0.599997 0.619044
-0.619044 0.619044 0.60952 0.60952 0.60952 0.599997 0.742858 0.704763
-0.685716 0.685716 0.685716 0.733334 0.92381 0.809525 0.53334 0.561911
-0.571434 0.580958 0.580958 0.58572 0.590481 0.600005 0.8 0.609529 0.61429
-0.619052 0.628576 0.6381;
-#X coords 0 1 100 0 150 105 1 0 0;
-#X restore 140 159 graph;
-#X msg 324 266 symbol riff7-4;
-#X msg 151 265 symbol riff4-4;
+#X connect 22 0 23 0;
+#X connect 23 0 28 0;
+#X connect 24 0 20 0;
+#X connect 24 1 15 0;
+#X connect 25 0 27 0;
+#X connect 26 0 24 0;
+#X restore 151 40 pd n weighted sum;
+#N canvas 1 89 450 300 array 0;
+#X obj 185 88 r qtarget;
+#X text 57 18 array to qlist;
+#X obj 72 168 qlist;
+#X msg 99 110 clear;
+#X msg 22 52 bang;
+#X obj 72 81 t a b;
+#X msg 22 81 print;
+#X obj 72 191 print;
+#X msg 72 52 symbol craak;
+#X obj 72 139 arr2q 400 qtarget;
+#X floatatom 185 111 5 0 0 0 - - -;
 #X connect 0 0 10 0;
-#X connect 1 0 7 0;
-#X connect 4 0 13 3;
-#X connect 5 0 14 3;
-#X connect 7 0 14 0;
-#X connect 10 0 13 0;
-#X connect 11 0 13 1;
-#X connect 12 0 13 1;
-#X connect 13 0 2 0;
-#X connect 14 0 3 0;
-#X connect 15 0 14 1;
-#X connect 16 0 14 1;
-#X connect 22 0 13 1;
-#X connect 23 0 13 1;
-#X connect 24 0 14 1;
-#X connect 25 0 14 1;
-#X connect 29 0 14 1;
-#X connect 30 0 13 1;
-#X restore 51 25 pd green suitcase;
-#X text 208 138 gonggong;
-#X text 368 142 red funnel;
-#X text 565 143 tambourine;
-#X text 537 78 beak;
-#N canvas 307 411 1133 383 roundly 0;
-#X msg 364 139 \$1 5000;
-#X obj 364 162 unpack f f;
-#X obj 364 185 s X1;
-#X obj 421 185 s X2;
-#X obj 54 208 r HELLO;
-#X obj 54 254 unpack f f f f;
-#X floatatom 54 283 5 0 0 0 - - -;
-#X obj 107 311 hsl 1000 15 -50000 50000 0 0 empty empty empty -2 -8
-0 10 -260097 -262144 -1 0 1;
-#X obj 107 331 hsl 1000 15 -50000 50000 0 0 empty empty empty -2 -8
-0 10 -13381 -262144 -1 0 1;
-#X obj 164 254 unpack f f f f;
-#X floatatom 164 283 5 0 0 0 - - -;
-#X floatatom 263 99 5 0 0 0 target_pos - -;
-#X obj 107 31 hsl 1000 15 -50000 50000 0 0 empty empty empty -2 -8
-0 10 -260097 -262144 -1 49950 1;
-#X obj 107 51 hsl 1000 15 -50000 50000 0 0 empty empty empty -2 -8
-0 10 -13381 -262144 -1 49950 1;
-#X obj 263 121 t b a;
-#X msg 714 139 \$1 5000;
-#X obj 714 162 unpack f f;
-#X obj 714 185 s X1;
-#X obj 771 185 s X2;
-#X floatatom 613 99 5 0 0 0 target_pos - -;
-#X obj 613 121 t b a;
-#X obj 16 26 loadbang;
-#X msg 16 49 0;
-#X obj 104 81 skip 500;
-#X obj 358 81 skip 500;
-#X obj 263 209 s NOTE;
-#X obj 613 209 s NOTE;
-#X msg 263 150 20001 0 0 1;
-#X msg 613 150 20002 0 0 1;
-#X obj 54 231 route 20001 20002;
-#X connect 0 0 1 0;
-#X connect 1 0 2 0;
-#X connect 1 1 3 0;
-#X connect 4 0 29 0;
-#X connect 5 0 6 0;
-#X connect 6 0 7 0;
-#X connect 9 0 10 0;
-#X connect 10 0 8 0;
-#X connect 11 0 14 0;
-#X connect 12 0 23 0;
-#X connect 13 0 24 0;
-#X connect 14 0 27 0;
-#X connect 14 1 0 0;
-#X connect 15 0 16 0;
-#X connect 16 0 17 0;
-#X connect 16 1 18 0;
-#X connect 19 0 20 0;
-#X connect 20 0 28 0;
-#X connect 20 1 15 0;
-#X connect 21 0 22 0;
-#X connect 22 0 12 0;
-#X connect 22 0 13 0;
-#X connect 23 0 11 0;
-#X connect 24 0 19 0;
-#X connect 27 0 25 0;
-#X connect 28 0 26 0;
-#X connect 29 0 5 0;
-#X connect 29 1 9 0;
-#X restore 385 79 pd roundly;
-#N canvas 1 89 386 500 gastank 0;
-#N canvas 0 23 450 278 (subpatch) 0;
-#X array riff19 50 float 3;
-#A 0 0.485714 0.00952381 0.171429 0.00952381 0.00952381 0.00952381
-0.00952381 0.00952381 0.00952381 5.96046e-08 5.96046e-08 5.96046e-08
-5.96046e-08 0.2 5.96046e-08 5.96046e-08 5.96046e-08 5.96046e-08 0.00952381
-0.171429 0.00952381 0.00952381 0.00952381 0.00952381 0.00952381 0.00952381
-0.00952381 0.00952381 0.2 0.00952381 0.00952381 5.96046e-08 5.96046e-08
-5.96046e-08 5.96046e-08 0.161905 5.96046e-08 5.96046e-08 5.96046e-08
-5.96046e-08 0.152381 0.00952381 0.00952381 0.0190476 0.0190476 0.0190476
-0.0190476 0.0190476 0.0190476 0.0190476;
-#X coords 0 1 50 0 150 105 1 0 0;
-#X restore 201 8 graph;
-#X obj 201 211 tgl 20 0 empty empty empty 17 7 0 10 -262130 -1 -1 0
-1;
-#X obj 314 221 tgl 20 0 empty empty 3001 17 7 0 10 -257985 -1 -1 0
-1;
-#N canvas 0 23 450 278 (subpatch) 0;
-#X array riff18 50 float 3;
-#A 0 0.219047 -0.0190457 -0.0952371 -0.114285 -0.133332 -0.133332 -0.133332
--0.104761 -0.0285709 0.0380954 0.0761904 0.0761904 0.0476191 -0.0190471
--0.0952371 -0.123808 -0.15238 -0.15238 -0.114285 -0.0190471 0.0857141
-0.133333 0.142857 0.142857 0.0666666 -0.0285709 -0.15238 -0.209522
--0.219046 -0.209522 -0.133332 -0.0476184 0.0190479 0.0761904 0.104762
-0.123809 0.133333 0.0952379 3.57628e-07 -0.0952371 -0.114285 -0.104761
--0.0285709 0.0285716 0.133333 0.219047 0.199999 0.0476191 -0.114285
--0.123808;
-#X coords 0 1 50 0 150 105 1 0 0;
-#X restore 41 8 graph;
-#X obj 41 211 tgl 20 0 empty empty empty 17 7 0 10 -262130 -1 -1 0
-1;
-#X obj 41 375 s NOTE;
-#X obj 171 241 tgl 20 0 empty empty empty 17 7 0 10 -257985 -1 -1 0
-1;
-#X text 39 -60 * gastank;
-#X obj 41 236 metro 500;
-#X obj 269 468 s NOTE;
-#X floatatom 269 406 5 0 0 0 - - -;
-#X obj 269 426 pack f f;
-#X msg 269 447 1041 0 \$1 \$2;
-#X msg 101 207 symbol riff18;
-#X msg 231 197 symbol riff19;
-#X obj 41 270 riff 800 4001;
-#N canvas 0 23 450 278 (subpatch) 0;
-#X array riff18-1 50 float 3;
-#A 0 0.219047 0.247619 0.266666 0.27619 0.285714 0.295237 0.161905
-0.0857143 0.057143 0.057143 0.057143 0.0666668 0.0857143 0.133334 0.152381
-0.190476 0.571429 0.27619 0.285714 0.2 0.0571437 0.0571437 0.0571437
-0.0571437 0.0761912 0.114286 0.161905 0.209524 0.552381 0.228571 0.228571
-0.133334 0.0571437 0.0571437 0.0571437 0.0571437 0.0666674 0.0857149
-0.104762 0.133334 0.180952 0.219047 0.247619 0.52381 0.0952387 0.0857149
-0.0857149 0.0857149 0.104762 0.171429;
-#X coords 0 1 50 0 150 105 1 0 0;
-#X restore 112 -125 graph;
-#X obj 201 236 metro 500;
-#X obj 218 385 moses 1;
-#X obj 201 270 riff 8 1041;
-#X connect 1 0 17 0;
-#X connect 2 0 11 1;
-#X connect 4 0 8 0;
-#X connect 6 0 15 3;
-#X connect 8 0 15 0;
-#X connect 10 0 11 0;
-#X connect 11 0 12 0;
-#X connect 12 0 9 0;
-#X connect 13 0 15 1;
-#X connect 14 0 19 1;
-#X connect 15 0 5 0;
-#X connect 17 0 19 0;
-#X connect 18 1 10 0;
-#X connect 19 1 18 0;
-#X restore 240 33 pd gastank;
-#N canvas 0 23 516 656 frog 0;
-#N canvas 0 23 450 278 (subpatch) 0;
-#X array riff8 12 float 3;
-#A 0 0 0 0.390476 0.199999 0.580948 -0.00951159 0 0 0 0 1.5238 1.5238
-;
-#X coords 0 1 12 0 150 105 1 0 0;
-#X restore 35 111 graph;
-#X obj 35 243 tgl 20 0 empty empty empty 17 7 0 10 -262130 -1 -1 0
-1;
-#X obj 35 268 metro 2000;
-#X obj 219 273 tgl 20 0 empty empty empty 17 7 0 10 -257985 -1 -1 0
-1;
-#X text 65 22 * frog;
-#X obj 35 302 riff 1600 1061;
-#X msg 82 237 symbol riff8;
-#X obj 229 498 s NOTE;
-#X floatatom 229 436 5 0 0 0 - - -;
-#X obj 229 456 pack f f;
-#X msg 229 477 1061 0 \$1 \$2;
-#X obj 178 415 moses 10;
-#X connect 1 0 2 0;
-#X connect 2 0 5 0;
-#X connect 3 0 9 1;
-#X connect 5 1 11 0;
-#X connect 6 0 5 1;
-#X connect 8 0 9 0;
-#X connect 9 0 10 0;
-#X connect 10 0 7 0;
-#X connect 11 1 8 0;
-#X restore 371 34 pd frog;
-#X msg 25 209 3087;
-#N canvas 0 23 450 278 (subpatch) 0;
-#X array riff91 50 float 3;
-#A 0 0.485714 0.980952 0.533342 0.4762 0.447629 0.419059 0.380964 0.34287
-0.314299 0.285728 0.257157 0.228586 0.209539 0.190491 0.176206 0.161921
-0.152397 0.142873 0.142873 1 0.866669 0.809527 0.752386 0.719053 0.68572
-0.657149 0.628578 0.600008 0.561913 0.552389 0.542866 0.533342 0.523818
-0.523818 0.523818 0.523818 0.52858 0.533342 0.58096 0.657149 0.752386
-0.933335 0.933335 0.933335 0.942858 0.961905 1.22857 1.19047 1.10476
-1.03809;
-#X coords 0 1 50 0 150 105 1 0 0;
-#X restore 672 179 graph;
-#N canvas 0 23 450 278 (subpatch) 0;
-#X array riff92 50 float 3;
-#A 0 0.685715 0.723811 0.800002 0.485714 0.519047 0.552381 0.580953
-0.609524 0.626191 0.642858 0.659525 0.676191 0.685715 0.399999 0.495238
-0.533333 0.571429 0.604762 0.638096 0.653969 0.669842 0.685715 0.695239
-0.704763 0.561905 0.666667 0.704763 0.714287 0.266665 0.323808 0.35238
-0.366666 0.380951 0.399999 0.423809 0.933336 0.952384 0.957145 0.961907
-0.609524 0.628572 0.47619 0.523809 0.523809 0.495238 0.438095 0.457142
-0.457142 0.438095 0.361904;
-#X coords 0 1 50 0 150 105 1 0 0;
-#X restore 832 179 graph;
-#X obj 672 311 tgl 20 0 empty empty empty 17 7 0 10 -204786 -1 -1 0
-1;
-#X obj 802 339 tgl 20 0 empty empty empty 17 7 0 10 -4034 -1 -1 0 1
-;
-#X obj 832 311 tgl 20 0 empty empty empty 17 7 0 10 -204786 -1 -1 0
-1;
-#X obj 962 339 tgl 20 0 empty empty empty 17 7 0 10 -4034 -1 -1 0 1
-;
-#X obj 672 475 s NOTE;
-#X obj 832 475 s NOTE;
-#X obj 832 336 metro 500;
-#X obj 672 336 metro 500;
-#X text 669 133 * standby;
-#X obj 672 370 riff 800 3201;
-#X obj 832 370 riff 800 3202;
-#X msg 734 295 symbol riff91;
-#N canvas 0 23 450 278 (subpatch) 0;
-#X array riff93 50 float 3;
-#A 0 0.485714 0.980952 0.533342 0.4762 0.447629 0.419059 0.380964 0.34287
-0.314299 0.285728 0.257157 0.228586 0.209539 0.190491 0.176206 0.161921
-0.152397 0.142873 0.142873 1 0.866669 0.809527 0.752386 0.719053 0.68572
-0.657149 0.628578 0.600008 0.561913 0.552389 0.542866 0.533342 0.523818
-0.523818 0.523818 0.523818 0.52858 0.533342 0.58096 0.657149 0.752386
-0.933335 0.933335 0.933335 0.942858 0.961905 1.22857 1.19047 1.10476
-1.03809;
-#X coords 0 1 50 0 150 105 1 0 0;
-#X restore 994 176 graph;
-#X obj 994 308 tgl 20 0 empty empty empty 17 7 0 10 -204786 -1 -1 0
-1;
-#X obj 1124 336 tgl 20 0 empty empty empty 17 7 0 10 -4034 -1 -1 0
-1;
-#X obj 994 472 s NOTE;
-#X obj 994 333 metro 500;
-#X obj 994 367 riff 800 3203;
-#X obj 179 376 riff 170 3001;
-#X obj 339 376 riff 200 3001;
-#X obj 499 376 riff 300 3001;
-#X msg 244 295 symbol riff10;
-#X msg 404 295 symbol riff11;
-#X msg 564 295 symbol riff15;
-#N canvas 437 89 766 806 yellow 0;
-#N canvas 0 23 450 278 (subpatch) 0;
-#X array riff94 100 float 3;
-#A 0 0.00952381 0.00476211 0.00476211 0.514286 0.480954 0.504762 0.509524
--0.00952297 2.38419e-07 2.38419e-07 0.00476193 0.00476193 0.00476193
-0.00476193 0.00476193 0.390476 0.385715 0.409523 0.414285 0 0 0 0 0
-0 0.0047617 0.0047617 0.00952339 0.00952339 0.64762 0.661905 0.680952
-0.680952 0.00952339 0.00952339 0.00952339 0.00952339 0.00952339 0.00952339
-0.00952339 0.366668 0.385714 0.342859 0.338097 0.319051 0.323812 0
-0 0 0 0 0 0 0 0 -0.00476146 -0.00476146 -0.00476146 -0.00476146 -0.00476146
-0.280952 0.271429 0.285714 0.309523 0.290476 0.285714 0.00952381 0.00952381
-0.0142857 0.0142857 0.00952405 0.00952405 0.457142 0.461904 0.414286
-0.476189 0.476189 0.00952381 0.00952381 0.00952381 0.00952381 0.00952381
-0.00952381 0.00952381 0.00952381 0.00952381 0 0 0.395222 0.419031 0.419031
-0.428554 0.490456 0.461886 0 0 0 0 0 0;
-#X coords 0 1 100 0 150 105 1 0 0;
-#X restore 68 387 graph;
-#X obj 69 601 tgl 20 0 empty empty empty 17 7 0 10 -204786 -1 -1 0
-1;
-#X obj 199 629 tgl 20 0 empty empty empty 17 7 0 10 -4034 -1 -1 0 1
-;
-#X obj 69 765 s NOTE;
-#X obj 69 626 metro 500;
-#N canvas 0 23 450 278 (subpatch) 0;
-#X array riff94-1 50 float 3;
-#A 0 0.638095 0.580953 0.514287 0.457144 0.361907 0.314288 0.228574
-0.180955 0.152384 0.152384 0.14286 0.133337 0.114289 0.104765 0.104765
-0.104765 0.104765 0.638096 0.552382 0.504763 0.457144 0.371431 0.304765
-0.228575 0.19048 0.152385 0.133337 0.133337 0.133337 0.123813 0.11429
-0.542858 0.466668 0.380954 0.238098 0.209527 0.190479 0.171432 0.161908
-0.104765 0.0761942 0.0476229 0.0285754 0.533334 0.390477 0.266669 0.152384
-0.0666699 0.0380987 0.0380987;
-#X coords 0 1 50 0 150 105 1 0 0;
-#X restore 67 263 graph;
-#X msg 129 606 symbol riff94-1;
-#N canvas 0 23 450 278 (subpatch) 0;
-#X array riff94-2 50 float 3;
-#A 0 0.333334 0.333334 0.333334 0.333334 0.32381 0.32381 0.304762 0.285715
-0.276191 0.266667 0.266667 0.266667 0.257143 0.257143 0.257143 0.257143
-0.257143 0.247619 0.247619 0.247619 0.247619 0.247619 0.247619 0.247619
-0.238095 0.238095 0.238095 0.238095 0.238095 0.238095 0.238095 0.228571
-0.228571 0.228571 0.228571 0.228571 0.228571 0.228571 0.228571 0.228571
-0.228571 0.228571 0.228571 0.228571 0.238095 0.238095 0.247619 0.257143
-0.266667 0.276191;
-#X coords 0 1 50 0 150 105 1 0 0;
-#X restore 67 139 graph;
-#N canvas 0 23 450 278 (subpatch) 0;
-#X array riff94-3 50 float 3;
-#A 0 0.161905 0.342857 0.161905 0.161905 0.780952 0.161905 0.161905
-0.161905 0.161905 0.419048 0.161905 0.161905 0.161905 0.161905 0.533333
-0.152381 0.171426 0.161905 0.161905 0.161905 0.161905 0.295238 0.161905
-0.161905 0.552381 0.4 0.161905 0.161905 0.161905 0.561905 0.161905
-0.4 0.161905 0.780954 0.580953 0.161905 0.466667 0.161905 0.161905
-0.161905 0.152381 0.152381 0.152381 0.514286 0.152381 0.152381 0.152381
-0.390476 0.152381 0.152381;
-#X coords 0 1 50 0 150 105 1 0 0;
-#X restore 68 19 graph;
-#X msg 121 563 symbol riff94-2;
-#X msg 133 542 symbol riff94-3;
-#X msg 170 520 symbol riff94-4;
-#N canvas 0 23 450 278 (subpatch) 0;
-#X array riff94-5 100 float 3;
-#A 0 0.347619 0.4 0.390476 0.404762 0.433333 0.457143 0.485715 0.233333
-0.247618 0.233335 0.585714 0.252381 0.233335 0.214288 0.209526 0.209526
-0.214288 0.21905 0.223811 0.22381 0.371429 0.361905 0.34762 0.323812
-0.309527 0.390476 0.480948 0.609524 0.366666 0.323809 0.366667 0.304765
-0.29048 0.280957 0.514289 0.438102 0.423816 0.180953 0.157145 0.152383
-0.590476 0.219049 0.195241 0.166671 0.133339 0.10953 0.114292 0.104769
-0.114292 0.252381 0.4 0.414286 0.428572 0.433333 0.371428 0.409524
-0.223809 0.247618 0.266665 0.290475 0.271428 0.52381 0.371428 0.347619
-0.328571 0.319047 0.309523 0.290475 0.280952 0.278571 0.614286 0.22857
-0.22381 0.219048 0.219048 0.228571 0.228571 0.228571 0.333333 0.319047
-0.319047 0.176189 0.176189 0.14762 0.142858 0.561905 0.261906 0.238098
-0.200004 0.161911 0.152381 0.380952 0.361904 0.504762 0.366667 0.371429
-0.385714 0.257142 0.257142 0.266666;
-#X coords 0 1 100 0 150 105 1 0 0;
-#X restore 227 654 graph;
-#X obj 69 660 riff 400 3204;
-#X msg 182 499 symbol riff94-5;
-#X msg 141 585 symbol riff94-5;
-#N canvas 0 23 450 278 (subpatch) 0;
-#X array riff94-4 100 float 3;
-#A 0 0.00952381 0.00476211 0.00476211 0.514286 0.4 0.371429 0.347619
--0.00952297 2.38419e-07 2.38419e-07 0.00476193 0.00476193 0.00476193
-0.00476193 0.00476193 0.276191 0.347619 0.27619 0.314286 0 0 0 0 0
-0 0.0047617 0.0047617 0.304762 0.304762 0.32381 0.400001 0.471429 0.771429
-0.00952339 0.00952339 0.00952339 0.00952339 0.00952339 0.00952339 0.00952339
-0.595238 0.266667 0.3 0.333333 0.280952 0.285714 0 0 0 0 0 0 0 0 0
--0.00476146 -0.00476146 -0.00476146 -0.00476146 0.52381 0.280952 0.271429
-0.285714 0.309523 0.290476 0.257143 0.00952381 0.00952381 0.0142857
-0.0142857 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.00952381 0 0 0.395222 0.419031 0.419031 0.428554 0.490456
-0.461886 0 0 0 0 0 0;
-#X coords 0 1 100 0 150 105 1 0 0;
-#X restore 225 386 graph;
+#X connect 2 0 7 0;
+#X connect 3 0 2 0;
+#X connect 4 0 2 0;
+#X connect 5 0 9 0;
+#X connect 5 1 3 0;
+#X connect 6 0 2 0;
+#X connect 8 0 5 0;
+#X connect 9 0 2 0;
+#X restore 152 61 pd array to qlist;
+#N canvas 1 89 520 181 memo 0;
+#X text 230 68 world energy < a value: say sth \, anybody!;
+#X text 17 21 i think without talking \, but then \, i find sth. very
+boring or unhappy sometimes \, then i shout!;
+#X text 27 95 if one ask me for sth. \, then i might react & reply
+only if that one is beautiful. (& i m not busy on other beauty.);
+#X restore 80 25 pd memo;
+#N canvas 305 384 486 326 notes 0;
+#X text 8 59 how can one stick to a playing state 'for a while'.;
+#X text 34 80 that s because everyone else is 'listening to' it.;
+#X text 54 100 and \, plus \, i do know that \, and feel it at the
+same time.;
+#X text 102 177 and \, maybe ask 'may i...' like LPWAN protocol?;
+#X text 74 21 'conversation energy' .. pairs/couples/groups manage
+their specific energy.;
+#X text 81 131 listening => play along. or quietly stay along. everyone
+is different;
+#X text 94 264 and got play along evt. gives relaxation => stress goes
+down.;
+#X restore 30 223 pd notes;
+#N canvas 1 89 450 300 memo 0;
+#X text 25 42 it is like a zoo.;
+#X text 25 62 and i m like a trainer.;
+#X text 25 102 zoo / animals / trainer;
+#X text 25 122 botanic garden / plants / gardener;
+#X text 25 142 or.. circus camp / players / manager ?;
+#X restore 36 203 pd memo;
 #X connect 1 0 4 0;
-#X connect 2 0 13 3;
-#X connect 4 0 13 0;
-#X connect 6 0 13 1;
-#X connect 9 0 13 1;
-#X connect 11 0 13 1;
-#X connect 13 0 3 0;
-#X connect 14 0 13 1;
-#X connect 15 0 13 1;
-#X restore 53 134 pd yellow hose;
-#X msg 904 295 riff92;
-#X msg 1056 292 riff93;
-#N canvas 1 89 373 612 p 0;
-#N canvas 0 23 450 278 (subpatch) 0;
-#X array riff95 50 float 3;
-#A 0 0.219045 0.266665 0.314284 0.199997 0.228569 0.257141 0.352379
-0.419046 0.485713 0.571428 0.342857 0 0 -1.19209e-07 0.00952375 0.0190476
-0.0190476 0.352381 0.476191 0.485715 0.495238 0.495238 0.485715 0.409524
-0.390476 0.32381 0.295238 0.00952381 0 0 0 0 0 0.209522 0.247618 0.304761
-0.4 0.466667 0.485715 0.466667 0.409524 0.371428 0.352381 0.0285714
-0.0190476 0.0190476 0.0190476 0.0190476 0.0190476 0.0190476;
-#X coords 0 1 50 0 150 105 1 0 0;
-#X restore 27 158 graph;
-#N canvas 0 23 450 278 (subpatch) 0;
-#X array riff96 50 float 3;
-#A 0 0.685715 0.723811 0.800002 0.485714 0.519047 0.552381 0.580953
-0.609524 0.626191 0.642858 0.659525 0.676191 0.685715 0.399999 0.495238
-0.533333 0.571429 0.604762 0.638096 0.653969 0.669842 0.685715 0.695239
-0.704763 0.561905 0.666667 0.704763 0.714287 0.266665 0.323808 0.35238
-0.366666 0.380951 0.399999 0.423809 0.933336 0.952384 0.957145 0.961907
-0.609524 0.628572 0.47619 0.523809 0.523809 0.523809 0.438095 0.457142
-0.457142 0.438095 0.361904;
-#X coords 0 1 50 0 150 105 1 0 0;
-#X restore 187 158 graph;
-#X obj 27 290 tgl 20 0 empty empty empty 17 7 0 10 -204786 -1 -1 0
+#X connect 4 0 3 0;
+#X restore 119 113 pd saved energy;
+#X obj 45 50 cnv 15 700 700 empty empty empty 20 12 0 14 -233017 -66577
+0;
+#N canvas 1 89 1301 787 (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.0260051 0.00082037 0.249905 1.21749e-09 1.21749e-09 0 0.0518141
+6.37602e-15 0 0 6.33895e-18 7.15377e-10 0.299886 4.79674e-18 0 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;
+#X obj 24 429 pack f f;
+#X msg 157 411 0;
+#X obj 448 144 array sum;
+#X msg 519 126 symbol world_energy;
+#X floatatom 183 18 5 0 0 0 sum WORLD_ENERGY -;
+#X msg 608 62 \; world_energy const 0;
+#X obj 448 121 metro 100;
+#X obj 130 332 loadbang;
+#X obj 448 219 s WORLD_ENERGY;
+#X obj 492 49 loadbang;
+#X obj 492 72 t b b;
+#X obj 24 361 snapshot~;
+#X msg 24 309 start;
+#X msg 74 309 stop;
+#X obj 69 386 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
 1;
-#X obj 157 318 tgl 20 0 empty empty empty 17 7 0 10 -4034 -1 -1 0 1
-;
-#X obj 187 290 tgl 20 0 empty empty empty 17 7 0 10 -204786 -1 -1 0
+#X floatatom 24 384 5 0 0 0 - - -;
+#X obj 24 406 * 0.2;
+#X obj 130 368 t b b;
+#X msg 204 452 \; world_energy \$2 \$1;
+#X obj 204 429 pack f f;
+#X obj 310 332 loadbang;
+#X obj 204 361 snapshot~;
+#X msg 204 309 start;
+#X msg 254 309 stop;
+#X obj 249 386 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
 1;
-#X obj 317 318 tgl 20 0 empty empty empty 17 7 0 10 -4034 -1 -1 0 1
-;
-#X obj 27 454 s NOTE;
-#X obj 187 454 s NOTE;
-#X obj 187 315 metro 500;
-#X obj 27 315 metro 500;
-#X msg 89 274 symbol riff95;
-#X msg 259 274 symbol riff96;
-#X obj 187 349 riff 800 3206;
-#N canvas 0 23 450 278 (subpatch) 0;
-#X array riff95-1 50 float 3;
-#A 0 0.0380948 0.0476186 0.0761902 0.104762 0.114286 0.133333 0.161905
-0.180953 0.180953 0.171429 0.209524 0.171429 0.114285 0.0857143 0.0857143
-0.0761904 0.0571427 0.0571427 0.0571427 0.0571427 0.0571427 0.0571427
-0.0571427 0.114285 0.114285 0.114285 0.152381 0.180953 0.2 0.219048
-0.219048 0.133333 0.114286 0.095238 0.0761902 0.0761902 0.0857141 0.095238
-0.095238 0.171429 0.209524 0.257143 0.285715 0.266667 0.171428 0.219048
-0.171429 0.152381 0.152381 0.152381;
-#X coords 0 1 50 0 150 105 1 0 0;
-#X restore 26 34 graph;
-#X obj 27 349 riff 600 3205;
-#X connect 2 0 9 0;
-#X connect 3 0 14 3;
-#X connect 4 0 8 0;
-#X connect 5 0 12 3;
-#X connect 8 0 12 0;
-#X connect 9 0 14 0;
-#X connect 10 0 14 1;
-#X connect 11 0 12 1;
-#X connect 12 0 7 0;
-#X connect 14 0 6 0;
-#X restore 65 481 pd p;
-#X connect 2 0 4 0;
-#X connect 3 0 51 3;
-#X connect 4 0 51 0;
-#X connect 5 0 7 0;
-#X connect 6 0 52 3;
-#X connect 7 0 52 0;
-#X connect 8 0 11 0;
-#X connect 9 0 53 3;
-#X connect 11 0 53 0;
-#X connect 15 0 16 0;
-#X connect 17 0 18 0;
-#X connect 33 0 40 0;
-#X connect 34 0 42 3;
-#X connect 35 0 39 0;
-#X connect 36 0 43 3;
-#X connect 39 0 43 0;
-#X connect 40 0 42 0;
-#X connect 42 0 37 0;
-#X connect 43 0 38 0;
-#X connect 44 0 42 1;
-#X connect 46 0 49 0;
-#X connect 47 0 50 3;
-#X connect 49 0 50 0;
-#X connect 50 0 48 0;
-#X connect 51 0 12 0;
-#X connect 51 1 15 0;
-#X connect 52 0 13 0;
-#X connect 52 1 17 0;
-#X connect 53 0 14 0;
-#X connect 54 0 51 1;
-#X connect 55 0 52 1;
-#X connect 56 0 53 1;
-#X connect 58 0 43 1;
-#X connect 59 0 50 1;
-#X restore 14 38 pd save;
-#X obj 358 23 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
+#X floatatom 204 384 5 0 0 0 - - -;
+#X obj 310 368 t b b;
+#X obj 204 243 r ROUNDER;
+#X obj 254 266 r ROUNDER_DONE;
+#X msg 337 411 1;
+#X obj 249 406 metro 50;
+#X obj 69 406 metro 50;
+#X obj 204 338 ear~ 2000 10000;
+#X obj 24 338 ear~ 2000 10000;
+#X obj 448 167 max 0.001;
+#X obj 262 40 loadbang;
+#X msg 262 63 \; pd dsp 1;
+#X msg 384 452 \; world_energy \$2 \$1;
+#X obj 384 429 pack f f;
+#X obj 490 332 loadbang;
+#X obj 384 361 snapshot~;
+#X msg 384 309 start;
+#X msg 434 309 stop;
+#X obj 429 386 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
 1;
+#X floatatom 384 384 5 0 0 0 - - -;
+#X obj 490 368 t b b;
+#X obj 429 406 metro 50;
+#X obj 384 338 ear~ 2000 10000;
+#X obj 384 243 r DRAWER;
+#X obj 434 266 r DRAWER_DONE;
+#X msg 517 411 2;
+#X msg 564 452 \; world_energy \$2 \$1;
+#X obj 564 429 pack f f;
+#X obj 670 332 loadbang;
+#X obj 564 361 snapshot~;
+#X msg 564 309 start;
+#X msg 614 309 stop;
+#X obj 609 386 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+1;
+#X floatatom 564 384 5 0 0 0 - - -;
+#X obj 670 368 t b b;
+#X obj 609 406 metro 50;
+#X obj 564 338 ear~ 2000 10000;
+#X msg 697 411 3;
+#X msg 924 452 \; world_energy \$2 \$1;
+#X obj 924 429 pack f f;
+#X obj 1030 332 loadbang;
+#X obj 924 361 snapshot~;
+#X msg 924 309 start;
+#X msg 974 309 stop;
+#X obj 969 386 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+1;
+#X floatatom 924 384 5 0 0 0 - - -;
+#X obj 1030 368 t b b;
+#X obj 969 406 metro 50;
+#X obj 924 338 ear~ 2000 10000;
+#X obj 924 243 r SUITCASE;
+#X obj 974 266 r SUITCASE_DONE;
+#X msg 1104 452 \; world_energy \$2 \$1;
+#X obj 1104 429 pack f f;
+#X obj 1210 332 loadbang;
+#X obj 1104 361 snapshot~;
+#X msg 1104 309 start;
+#X msg 1154 309 stop;
+#X obj 1149 386 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1
+1 1;
+#X floatatom 1104 384 5 0 0 0 - - -;
+#X obj 1210 368 t b b;
+#X obj 1149 406 metro 50;
+#X obj 1104 338 ear~ 2000 10000;
+#X obj 1104 243 r YELLOW;
+#X obj 1154 266 r YELLOW_DONE;
+#X msg 24 722 \; world_energy \$2 \$1;
+#X obj 24 699 pack f f;
+#X obj 130 602 loadbang;
+#X obj 24 631 snapshot~;
+#X msg 24 579 start;
+#X msg 74 579 stop;
+#X obj 69 656 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+1;
+#X floatatom 24 654 5 0 0 0 - - -;
+#X obj 130 638 t b b;
+#X msg 204 722 \; world_energy \$2 \$1;
+#X obj 204 699 pack f f;
+#X obj 310 602 loadbang;
+#X obj 204 631 snapshot~;
+#X msg 204 579 start;
+#X msg 254 579 stop;
+#X obj 249 656 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+1;
+#X floatatom 204 654 5 0 0 0 - - -;
+#X obj 310 638 t b b;
+#X obj 249 676 metro 50;
+#X obj 69 676 metro 50;
+#X obj 204 608 ear~ 2000 10000;
+#X obj 24 608 ear~ 2000 10000;
+#X msg 574 722 \; world_energy \$2 \$1;
+#X obj 574 699 pack f f;
+#X obj 680 602 loadbang;
+#X obj 574 631 snapshot~;
+#X msg 574 579 start;
+#X msg 624 579 stop;
+#X obj 619 656 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+1;
+#X floatatom 574 654 5 0 0 0 - - -;
+#X obj 680 638 t b b;
+#X obj 619 676 metro 50;
+#X obj 574 608 ear~ 2000 10000;
+#X msg 754 722 \; world_energy \$2 \$1;
+#X obj 754 699 pack f f;
+#X obj 860 602 loadbang;
+#X obj 754 631 snapshot~;
+#X msg 754 579 start;
+#X msg 804 579 stop;
+#X obj 799 656 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+1;
+#X floatatom 754 654 5 0 0 0 - - -;
+#X obj 860 638 t b b;
+#X obj 799 676 metro 50;
+#X obj 754 608 ear~ 2000 10000;
+#X msg 934 722 \; world_energy \$2 \$1;
+#X obj 934 699 pack f f;
+#X obj 1040 602 loadbang;
+#X obj 934 631 snapshot~;
+#X msg 934 579 start;
+#X msg 984 579 stop;
+#X obj 979 656 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+1;
+#X floatatom 934 654 5 0 0 0 - - -;
+#X obj 1040 638 t b b;
+#X obj 979 676 metro 50;
+#X obj 934 608 ear~ 2000 10000;
+#X obj 934 676 * 0.3;
+#X msg 1114 722 \; world_energy \$2 \$1;
+#X obj 1114 699 pack f f;
+#X obj 1220 602 loadbang;
+#X obj 1114 631 snapshot~;
+#X msg 1114 579 start;
+#X msg 1164 579 stop;
+#X obj 1159 656 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1
+1 1;
+#X floatatom 1114 654 5 0 0 0 - - -;
+#X obj 1220 638 t b b;
+#X obj 1159 676 metro 50;
+#X obj 1114 608 ear~ 2000 10000;
+#X obj 24 513 r FROG;
+#X obj 74 536 r FROG_DONE;
+#X obj 574 513 r FLASHER;
+#X obj 624 536 r FLASHER_DONE;
+#X obj 754 513 r DRUMMER;
+#X obj 804 536 r DRUMMER_DONE;
+#X obj 934 513 r COPPER;
+#X obj 984 536 r COPPER_DONE;
+#X obj 1114 513 r YHOSE;
+#X obj 1164 536 r YHOSE_DONE;
+#X obj 564 243 r ALUMI_A;
+#X obj 614 266 r ALUMI_A_DONE;
+#X obj 204 513 r TANKER_H;
+#X obj 254 536 r TANKER_H_DONE;
+#X msg 744 452 \; world_energy \$2 \$1;
+#X obj 744 429 pack f f;
+#X obj 850 332 loadbang;
+#X obj 744 361 snapshot~;
+#X msg 744 309 start;
+#X msg 794 309 stop;
+#X obj 789 386 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+1;
+#X floatatom 744 384 5 0 0 0 - - -;
+#X obj 850 368 t b b;
+#X obj 789 406 metro 50;
+#X obj 744 338 ear~ 2000 10000;
+#X obj 744 243 r ALUMI_B;
+#X obj 794 266 r ALUMI_B_DONE;
+#X msg 384 722 \; world_energy \$2 \$1;
+#X obj 384 699 pack f f;
+#X obj 490 602 loadbang;
+#X obj 384 631 snapshot~;
+#X msg 384 579 start;
+#X msg 434 579 stop;
+#X obj 429 656 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+1;
+#X floatatom 384 654 5 0 0 0 - - -;
+#X obj 490 638 t b b;
+#X obj 429 676 metro 50;
+#X obj 384 608 ear~ 2000 10000;
+#X obj 384 513 r TANKER_S;
+#X obj 434 536 r TANKER_S_DONE;
+#X msg 877 411 4;
+#X msg 1057 411 5;
+#X msg 1237 411 6;
+#X msg 157 681 7;
+#X msg 337 681 8;
+#X msg 517 681 9;
+#X msg 707 681 10;
+#X msg 887 681 11;
+#X msg 1067 681 12;
+#X msg 1247 681 13;
 #N canvas 0 50 450 250 (subpatch) 0;
-#X array booong 10 float 3;
-#A 0 0.635709 0.74999 0.74999 0.585711 0.371435 0.371435 0.592854 0.842843
-0.971408 0.028589;
-#X coords 0 1 10 0 150 105 1 0 0;
-#X restore 391 129 graph;
-#X msg 352 318 0;
-#X obj 358 95 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
--1;
-#X obj 391 297 riff1 800 3100 400;
-#X obj 391 397 s NOTE;
-#X obj 358 50 retro 2000 30000;
-#X obj 462 245 loadbang;
-#X obj 534 397 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
+#X array we_sequence 20 float 3;
+#A 0 1 0.91 0.91 0.799999 0.79 0.78 0.73 0.66 1 0.91 0.87 0.85 0.64
+0.66 1 1 1 0.8 0.8 1;
+#X coords 0 1 20 0 200 100 1 0 0;
+#X restore 794 73 graph;
+#X obj 1065 85 f;
+#X obj 1098 85 + 1;
+#X obj 1065 108 mod 20;
+#X floatatom 1065 131 5 0 0 0 - - -;
+#X obj 1065 153 tabread we_sequence;
+#X obj 1045 85 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
 -1 -1;
+#X floatatom 1065 176 5 0 0 0 - - -;
+#X obj 448 193 *;
+#X obj 1045 62 metro 60000;
+#X obj 1045 42 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+1;
+#X obj 1045 19 loadbang;
+#X obj 1065 198 s E_SEQ;
+#X msg 1167 76 \; we_sequence const 1;
+#X obj 794 148 hradio 10 1 0 20 empty empty empty 0 -8 0 10 -257985
+-4160 -1 14;
+#X obj 204 406 * 0.2;
+#X obj 384 406 * 0.25;
+#X obj 564 406 * 0.3;
+#X obj 744 406 * 0.3;
+#X obj 924 406 * 0.4;
+#X obj 1104 406 * 0.1;
+#X obj 24 676 * 0.1;
+#X obj 574 676 * 0.1;
+#X obj 204 676 * 0.3;
+#X obj 384 676 * 0.2;
+#X obj 754 676 * 0.3;
+#X obj 1114 676 * 0.15;
+#N canvas 1 89 450 300 backup 0;
 #N canvas 0 50 450 250 (subpatch) 0;
-#X array copperlee1 10 float 3;
-#A 0 0.24762 0.228573 0.200003 0.314284 0.352377 0.342854 0.257143
-0.266667 0.200001 0.133334;
-#X coords 0 1 10 0 150 105 1 0 0;
-#X restore 106 395 graph;
-#X obj 106 663 s NOTE;
-#X obj 177 511 loadbang;
-#X obj 249 663 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
--1 -1;
-#X obj 106 563 riff1 1200 3204 250;
-#X msg 177 534 copperlee;
-#X obj 337 535 del 1000;
+#X array we_sequence_backup 20 float 3;
+#A 0 0.885714 1 0.685714 1 0.514286 1 0.485714 1 1 0.6 0.585714 0.642857
+1 1 0.842857 1 0.857143 1 1 0.885714;
+#X coords 0 1 20 0 200 70 1 0 0;
+#X restore 22 32 graph;
 #N canvas 0 50 450 250 (subpatch) 0;
-#X array copperlee2 10 float 3;
-#A 0 0.514287 0.514287 0.514287 0.800003 0.704764 0.590478 0.552382
-0.619049 0.428572 0.380952;
-#X coords 0 1 10 0 150 105 1 0 0;
-#X restore 106 265 graph;
-#N canvas 0 50 450 250 (subpatch) 0;
-#X array copperlee3 10 float 3;
-#A 0 0.933335 0.895239 0.84762 0.84762 0.952382 0.904763 0.84762 0.914287
-0.895239 0.838096;
-#X coords 0 1 10 0 150 105 1 0 0;
-#X restore 106 135 graph;
-#X msg 462 268 booong;
-#X floatatom 586 463 5 0 0 0 - - -;
-#X obj 586 440 clip -0.3 0.3;
-#X obj 586 417 gauss 0.25 0;
-#X obj 586 485 + 1;
-#X obj 534 463 *;
-#X obj 534 417 t b b;
-#X floatatom 534 486 5 0 0 0 - - -;
-#X obj 534 508 del;
-#X obj 343 422 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
--1 -1;
-#X obj 835 248 drunk;
-#X msg 534 440 20000;
-#X obj 90 531 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
--1;
-#X connect 5 0 11 0;
-#X connect 7 0 9 0;
-#X connect 9 0 10 0;
-#X connect 9 3 13 0;
-#X connect 11 0 8 0;
-#X connect 12 0 23 0;
-#X connect 13 0 29 0;
-#X connect 16 0 19 0;
-#X connect 18 0 15 0;
-#X connect 18 3 17 0;
-#X connect 19 0 18 1;
-#X connect 20 0 18 0;
-#X connect 23 0 9 1;
-#X connect 24 0 27 0;
-#X connect 25 0 24 0;
-#X connect 26 0 25 0;
-#X connect 27 0 28 1;
-#X connect 28 0 30 0;
-#X connect 29 0 34 0;
-#X connect 29 1 26 0;
-#X connect 30 0 31 0;
-#X connect 31 0 32 0;
-#X connect 32 0 9 0;
-#X connect 34 0 28 0;
-#X connect 35 0 18 0;
-#X restore 366 351 pd crickets;
+#X array we_sequence.backup 20 float 3;
+#A 0 1 0.91 0.91 0.799999 0.79 0.78 0.73 0.66 1 0.91 0.87 0.85 0.64
+0.66 1 1 1 0.8 0.8 1;
+#X coords 0 1 20 0 200 100 1 0 0;
+#X restore 195 141 graph;
+#X restore 137 152 pd backup sequences;
+#X connect 0 0 17 0;
+#X connect 1 0 16 0;
+#X connect 4 0 3 0;
+#X connect 5 0 4 1;
+#X connect 6 0 38 0;
+#X connect 7 0 6 2;
+#X connect 10 0 6 0;
+#X connect 11 0 21 0;
+#X connect 13 0 14 0;
+#X connect 14 0 10 0;
+#X connect 14 1 7 0;
+#X connect 14 1 9 0;
+#X connect 15 0 19 0;
+#X connect 16 0 37 0;
+#X connect 17 0 37 0;
+#X connect 18 0 35 0;
+#X connect 19 0 20 0;
+#X connect 20 0 4 0;
+#X connect 21 0 18 0;
+#X connect 21 1 5 0;
+#X connect 23 0 22 0;
+#X connect 24 0 30 0;
+#X connect 25 0 29 0;
+#X connect 26 0 36 0;
+#X connect 27 0 36 0;
+#X connect 28 0 34 0;
+#X connect 29 0 225 0;
+#X connect 30 0 28 0;
+#X connect 30 1 33 0;
+#X connect 31 0 26 0;
+#X connect 32 0 27 0;
+#X connect 33 0 23 1;
+#X connect 34 0 25 0;
+#X connect 35 0 15 0;
+#X connect 36 0 25 0;
+#X connect 37 0 15 0;
+#X connect 38 0 218 0;
+#X connect 39 0 40 0;
+#X connect 42 0 41 0;
+#X connect 43 0 49 0;
+#X connect 44 0 48 0;
+#X connect 45 0 51 0;
+#X connect 46 0 51 0;
+#X connect 47 0 50 0;
+#X connect 48 0 226 0;
+#X connect 49 0 47 0;
+#X connect 49 1 54 0;
+#X connect 50 0 44 0;
+#X connect 51 0 44 0;
+#X connect 52 0 45 0;
+#X connect 53 0 46 0;
+#X connect 54 0 42 1;
+#X connect 56 0 55 0;
+#X connect 57 0 63 0;
+#X connect 58 0 62 0;
+#X connect 59 0 65 0;
+#X connect 60 0 65 0;
+#X connect 61 0 64 0;
+#X connect 62 0 227 0;
+#X connect 63 0 61 0;
+#X connect 63 1 66 0;
+#X connect 64 0 58 0;
+#X connect 65 0 58 0;
+#X connect 66 0 56 1;
+#X connect 68 0 67 0;
+#X connect 69 0 75 0;
+#X connect 70 0 74 0;
+#X connect 71 0 77 0;
+#X connect 72 0 77 0;
+#X connect 73 0 76 0;
+#X connect 74 0 229 0;
+#X connect 75 0 73 0;
+#X connect 75 1 201 0;
+#X connect 76 0 70 0;
+#X connect 77 0 70 0;
+#X connect 78 0 71 0;
+#X connect 79 0 72 0;
+#X connect 81 0 80 0;
+#X connect 82 0 88 0;
+#X connect 83 0 87 0;
+#X connect 84 0 90 0;
+#X connect 85 0 90 0;
+#X connect 86 0 89 0;
+#X connect 87 0 230 0;
+#X connect 88 0 86 0;
+#X connect 88 1 202 0;
+#X connect 89 0 83 0;
+#X connect 90 0 83 0;
+#X connect 91 0 84 0;
+#X connect 92 0 85 0;
+#X connect 94 0 93 0;
+#X connect 95 0 101 0;
+#X connect 96 0 100 0;
+#X connect 97 0 114 0;
+#X connect 98 0 114 0;
+#X connect 99 0 112 0;
+#X connect 100 0 231 0;
+#X connect 101 0 99 0;
+#X connect 101 1 203 0;
+#X connect 103 0 102 0;
+#X connect 104 0 110 0;
+#X connect 105 0 109 0;
+#X connect 106 0 113 0;
+#X connect 107 0 113 0;
+#X connect 108 0 111 0;
+#X connect 109 0 233 0;
+#X connect 110 0 108 0;
+#X connect 110 1 204 0;
+#X connect 111 0 105 0;
+#X connect 112 0 96 0;
+#X connect 113 0 105 0;
+#X connect 114 0 96 0;
+#X connect 116 0 115 0;
+#X connect 117 0 123 0;
+#X connect 118 0 122 0;
+#X connect 119 0 125 0;
+#X connect 120 0 125 0;
+#X connect 121 0 124 0;
+#X connect 122 0 232 0;
+#X connect 123 0 121 0;
+#X connect 123 1 206 0;
+#X connect 124 0 118 0;
+#X connect 125 0 118 0;
+#X connect 127 0 126 0;
+#X connect 128 0 134 0;
+#X connect 129 0 133 0;
+#X connect 130 0 136 0;
+#X connect 131 0 136 0;
+#X connect 132 0 135 0;
+#X connect 133 0 235 0;
+#X connect 134 0 132 0;
+#X connect 134 1 207 0;
+#X connect 135 0 129 0;
+#X connect 136 0 129 0;
+#X connect 138 0 137 0;
+#X connect 139 0 145 0;
+#X connect 140 0 144 0;
+#X connect 141 0 147 0;
+#X connect 142 0 147 0;
+#X connect 143 0 146 0;
+#X connect 144 0 148 0;
+#X connect 145 0 143 0;
+#X connect 145 1 208 0;
+#X connect 146 0 140 0;
+#X connect 147 0 140 0;
+#X connect 148 0 138 0;
+#X connect 150 0 149 0;
+#X connect 151 0 157 0;
+#X connect 152 0 156 0;
+#X connect 153 0 159 0;
+#X connect 154 0 159 0;
+#X connect 155 0 158 0;
+#X connect 156 0 236 0;
+#X connect 157 0 155 0;
+#X connect 157 1 209 0;
+#X connect 158 0 152 0;
+#X connect 159 0 152 0;
+#X connect 160 0 97 0;
+#X connect 161 0 98 0;
+#X connect 162 0 119 0;
+#X connect 163 0 120 0;
+#X connect 164 0 130 0;
+#X connect 165 0 131 0;
+#X connect 166 0 141 0;
+#X connect 167 0 142 0;
+#X connect 168 0 153 0;
+#X connect 169 0 154 0;
+#X connect 170 0 59 0;
+#X connect 171 0 60 0;
+#X connect 172 0 106 0;
+#X connect 173 0 107 0;
+#X connect 175 0 174 0;
+#X connect 176 0 182 0;
+#X connect 177 0 181 0;
+#X connect 178 0 184 0;
+#X connect 179 0 184 0;
+#X connect 180 0 183 0;
+#X connect 181 0 228 0;
+#X connect 182 0 180 0;
+#X connect 182 1 200 0;
+#X connect 183 0 177 0;
+#X connect 184 0 177 0;
+#X connect 185 0 178 0;
+#X connect 186 0 179 0;
+#X connect 188 0 187 0;
+#X connect 189 0 195 0;
+#X connect 190 0 194 0;
+#X connect 191 0 197 0;
+#X connect 192 0 197 0;
+#X connect 193 0 196 0;
+#X connect 194 0 234 0;
+#X connect 195 0 193 0;
+#X connect 195 1 205 0;
+#X connect 196 0 190 0;
+#X connect 197 0 190 0;
+#X connect 198 0 191 0;
+#X connect 199 0 192 0;
+#X connect 200 0 175 1;
+#X connect 201 0 68 1;
+#X connect 202 0 81 1;
+#X connect 203 0 94 1;
+#X connect 204 0 103 1;
+#X connect 205 0 188 1;
+#X connect 206 0 116 1;
+#X connect 207 0 127 1;
+#X connect 208 0 138 1;
+#X connect 209 0 150 1;
+#X connect 211 0 212 0;
+#X connect 211 0 213 0;
+#X connect 212 0 211 1;
+#X connect 213 0 214 0;
+#X connect 214 0 215 0;
+#X connect 214 0 224 0;
+#X connect 215 0 217 0;
+#X connect 216 0 211 0;
+#X connect 217 0 218 1;
+#X connect 217 0 222 0;
+#X connect 218 0 12 0;
+#X connect 219 0 216 0;
+#X connect 220 0 219 0;
+#X connect 221 0 220 0;
+#X connect 225 0 23 0;
+#X connect 226 0 42 0;
+#X connect 227 0 56 0;
+#X connect 228 0 175 0;
+#X connect 229 0 68 0;
+#X connect 230 0 81 0;
+#X connect 231 0 94 0;
+#X connect 232 0 116 0;
+#X connect 233 0 103 0;
+#X connect 234 0 188 0;
+#X connect 235 0 127 0;
+#X connect 236 0 150 0;
+#X coords 0 -1 1 1 220 100 1 5 5;
+#X restore 7 7 pd;
+#X text 68 658 change stress rate...;
+#X text 68 698 solo time;
+#X text 119 672 set max. stress;
+#X obj 7 138 radio_bongbong;
+#X obj 263 571 radio_yellow;
+#X obj 344 302 radio_rounder;
+#X obj 478 557 radio_drawer;
+#X obj 85 384 radio_suitcase;
+#X obj 343 6 radio_frog;
+#X obj 672 538 radio_copper;
+#X obj 682 342 radio_drummer;
+#X obj 684 14 radio_flasher;
+#X obj 627 185 radio_yellowhose;
+#X obj 455 8 radio_tanker_head;
+#X obj 558 8 radio_tanker_side;
+#X obj 128 143 radio_alumi_A;
+#X obj 229 143 radio_alumi_B;
+#X restore 361 369 pd crickets;
 #X connect 0 0 18 0;
 #X connect 1 0 0 1;
 #X connect 4 0 16 0;
diff --git a/puredata/radio_alumi_A.pd b/puredata/radio_alumi_A.pd
new file mode 100644
index 0000000..ece4858
--- /dev/null
+++ b/puredata/radio_alumi_A.pd
@@ -0,0 +1,267 @@
+#N canvas 713 255 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
+-1 -1;
+#X text 35 318 stop!;
+#X obj 167 249 bng 15 250 50 0 empty empty motivated! 17 7 0 10 -262144
+-1 -1;
+#X msg 251 406 0;
+#X obj 251 429 v \$0-STATE;
+#X msg 164 44 1;
+#X obj 164 67 v \$0-STATE;
+#N canvas 906 89 533 644 world 1;
+#X floatatom 16 78 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;
+#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
+1;
+#X floatatom 110 504 5 0 0 0 stress - -;
+#X obj 238 555 +;
+#X obj 238 502 t a b;
+#X obj 238 326 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+1;
+#X floatatom 238 480 8 0 0 0 - - -;
+#X obj 16 521 >;
+#X floatatom 16 137 5 0 0 0 - - -;
+#X obj 238 375 t b b;
+#X obj 285 416 sel 1 0;
+#X obj 64 164 bng 15 250 50 0 empty empty listen 17 7 0 10 -191407
+-257985 -1;
+#X obj 16 114 resample 1000;
+#X obj 238 578 max 0;
+#X text 109 114 listening speed;
+#X text 56 77 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
+1;
+#X obj 16 451 abs;
+#N canvas 0 50 450 250 (subpatch) 0;
+#X array \$0-stress 100 float 2;
+#X coords 0 3 100 0 200 50 1 0 0;
+#X 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;
+#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
+;
+#X obj 12 100 t a b;
+#X obj 117 77 f;
+#X obj 144 77 + 1;
+#X obj 117 100 mod 100;
+#X obj 12 11 loadbang;
+#X obj 12 77 v \$0-STRESS;
+#X obj 12 123 tabwrite \$0-stress;
+#X msg 78 11 0;
+#X connect 0 0 7 0;
+#X connect 1 0 0 0;
+#X connect 2 0 8 0;
+#X connect 2 1 3 0;
+#X connect 3 0 4 0;
+#X connect 3 0 5 0;
+#X connect 4 0 3 1;
+#X connect 5 0 8 1;
+#X connect 6 0 1 0;
+#X connect 7 0 2 0;
+#X connect 9 0 7 0;
+#X restore 473 100 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
+1;
+#X obj 373 255 metro 50;
+#X obj 373 212 loadbang;
+#X obj 373 278 v \$0-STATE;
+#X obj 373 301 s \$0-status-now;
+#X obj 16 39 r WORLD_ENERGY;
+#X text 378 440 working stress;
+#X text 378 460 resting relax;
+#X msg 304 462 -0.005;
+#X msg 285 439 0.05;
+#X obj 16 210 < 0.5;
+#X connect 0 0 21 0;
+#X connect 1 0 5 0;
+#X connect 1 1 37 0;
+#X connect 2 0 7 0;
+#X connect 3 0 2 1;
+#X connect 4 0 3 0;
+#X connect 5 0 2 0;
+#X connect 7 0 28 0;
+#X connect 8 0 16 0;
+#X connect 9 0 38 0;
+#X connect 11 0 16 1;
+#X connect 12 0 22 0;
+#X connect 13 0 12 0;
+#X connect 13 1 35 0;
+#X connect 14 0 32 0;
+#X connect 15 0 13 0;
+#X connect 16 0 9 0;
+#X connect 16 0 10 0;
+#X connect 17 0 20 0;
+#X connect 17 0 49 0;
+#X connect 18 0 15 0;
+#X connect 18 1 34 0;
+#X connect 19 0 48 0;
+#X connect 19 1 47 0;
+#X connect 21 0 17 0;
+#X connect 22 0 11 0;
+#X connect 22 0 36 0;
+#X connect 28 0 8 0;
+#X connect 30 0 14 0;
+#X connect 32 0 18 0;
+#X connect 34 0 19 0;
+#X connect 35 0 12 1;
+#X connect 37 0 4 0;
+#X connect 37 0 27 0;
+#X connect 39 0 40 0;
+#X connect 40 0 42 0;
+#X connect 41 0 39 0;
+#X connect 42 0 43 0;
+#X connect 44 0 0 0;
+#X connect 47 0 15 0;
+#X connect 48 0 15 0;
+#X connect 49 0 1 0;
+#X restore 167 226 pd world and me;
+#N canvas 499 252 697 374 expressions 0;
+#X obj 42 185 inlet;
+#X obj 42 266 outlet;
+#X obj 42 237 t b a;
+#X obj 244 232 s \$0-word;
+#X obj 161 323 bng 15 250 50 0 \$0-reload empty s:reload 17 7 0 10
+-262144 -1 -1;
+#X obj 161 255 + 1;
+#X floatatom 161 278 5 0 0 0 - - -;
+#X obj 161 300 array_copier alumiA;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array alumiA3 50 float 3;
+#A 0 0.514286 0.52381 0.533333 0.542857 0.571428 0.580951 0.599999
+0.619046 0.676188 0.599999 0.542857 0.495239 0.476192 0.457144 0.438097
+0.438097 0.457144 0.504762 0.7619 0.790471 0.828566 0.828566 0.828566
+0.571428 0.590475 0.52381 0.466668 0.438097 0.409526 0.580952 0.599999
+0.619046 0.742857 0.485715 0.457144 0.447621 0.447621 0.447621 0.609524
+0.571429 0.571429 0.647618 0.685713 0.41905 0.428573 0.400002 0.571428
+0.580951 0.609522 0.619046;
+#X coords 0 1 50 0 150 105 1 0 0;
+#X restore 354 38 graph;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array alumiA1 50 float 3;
+#A 0 0.219047 0.190476 0.15238 0.114285 0.0857131 0.0857131 0.0857131
+0.095237 0.133332 0.190476 0.238095 0.285714 0.314286 0.333334 0.333334
+0.333334 0.304762 0.238095 0.180952 0.142856 0.114285 0.104761 0.104761
+0.12381 0.142856 0.2 0.257143 0.314286 0.333334 0.352381 0.352381 0.342858
+0.295238 0.219047 0.15238 0.123809 0.114285 0.095237 0.095237 0.104762
+0.123809 0.123809 0.171428 0.238095 0.295238 0.32381 0.333334 0.333334
+0.314286 0.266667;
+#X coords 0 1 50 0 150 105 1 0 0;
+#X restore 34 38 graph;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array alumiA2 50 float 3;
+#A 0 0.142857 0.180952 0.195238 0.209524 0.228572 0.266667 0.295239
+0.742857 0.0952377 0.104762 0.161905 0.209524 0.234921 0.260318 0.704762
+0.133333 0.152381 0.171429 0.209524 0.219048 0.24762 0.685714 0.133333
+0.161905 0.195238 0.24762 0.723809 0.276191 0.104761 0.133333 0.171428
+0.209524 0.638095 0.0952372 0.161904 0.209524 0.295238 0.628571 0.147619
+0.2 0.266667 0.323811 0.352382 0.295239 0.714286 0.152381 0.2 0.238096
+0.333334 0.390478;
+#X coords 0 1 50 0 150 105 1 0 0;
+#X restore 194 38 graph;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array alumiA4 50 float 3;
+#A 0 0.438095 0.333333 0.27619 0.228571 0.171427 0.10476 0.0285694
+0.00952375 0.00952375 -1.19209e-07 -0.00952399 -0.00952399 -0.00952399
+-0.00952399 -0.00952399 0.390476 0.314285 0.266666 0.228571 0.142856
+0.0857126 0.0190455 -0.00952607 0.0190476 0.0190476 0.0190476 0.0190476
+0.0190476 0.0190476 0.409524 0.266666 0.15238 0.0857127 0.0190457 0.00952178
+0.0190476 0.0190476 0.0190476 0.419048 0.314285 0.27619 0.209523 0.133332
+0.0761887 0.0190455 0.0190476 0.0190476 0.0190476 0.0190476 -8.34465e-07
+;
+#X coords 0 1 50 0 150 105 1 0 0;
+#X restore 514 38 graph;
+#X obj 42 214 count 4;
+#X connect 0 0 12 0;
+#X connect 2 0 1 0;
+#X connect 2 1 5 0;
+#X connect 5 0 6 0;
+#X connect 6 0 7 0;
+#X connect 7 0 4 0;
+#X connect 12 0 2 0;
+#X connect 12 0 3 0;
+#X restore 48 226 pd expressions;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array alumiA 50 float 3;
+#A 0 0.142857 0.180952 0.195238 0.209524 0.228572 0.266667 0.295239
+0.742857 0.0952377 0.104762 0.161905 0.209524 0.234921 0.260318 0.704762
+0.133333 0.152381 0.171429 0.209524 0.219048 0.24762 0.685714 0.133333
+0.161905 0.195238 0.24762 0.723809 0.276191 0.104761 0.133333 0.171428
+0.209524 0.638095 0.0952372 0.161904 0.209524 0.295238 0.628571 0.147619
+0.2 0.266667 0.323811 0.352382 0.295239 0.714286 0.152381 0.2 0.238096
+0.333334 0.390478;
+#X coords 0 1 50 0 50 50 1 0 0;
+#X restore 29 46 graph;
+#X obj 88 429 s NOTE;
+#X obj 88 406 spigot;
+#X obj 7 420 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 1
+;
+#X obj 7 397 loadbang;
+#X obj 269 352 bng 15 250 50 0 empty \$0-reload r:reload 17 7 0 10
+-262144 -1 -1;
+#X obj 164 21 r ALUMI_A;
+#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;
+#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 1 1;
+#X obj 88 306 riff1 800 3202 500;
+#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;
+#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 connect 0 0 23 0;
+#X connect 1 0 24 0;
+#X connect 2 0 5 0;
+#X connect 2 0 25 0;
+#X connect 4 0 19 0;
+#X connect 5 0 6 0;
+#X connect 7 0 8 0;
+#X connect 9 0 4 0;
+#X connect 10 0 23 0;
+#X connect 13 0 12 0;
+#X connect 14 0 13 1;
+#X connect 15 0 14 0;
+#X connect 16 0 24 0;
+#X connect 17 0 7 0;
+#X connect 17 0 21 0;
+#X connect 18 0 10 0;
+#X connect 23 0 13 0;
+#X connect 23 3 2 0;
+#X connect 24 0 23 1;
+#X connect 26 0 28 0;
+#X connect 27 0 30 0;
+#X connect 28 0 27 0;
+#X connect 29 0 31 1;
+#X connect 30 0 31 0;
+#X connect 31 0 32 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
new file mode 100644
index 0000000..3fb8529
--- /dev/null
+++ b/puredata/radio_alumi_B.pd
@@ -0,0 +1,267 @@
+#N canvas 737 231 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
+-1 -1;
+#X text 35 318 stop!;
+#X obj 167 249 bng 15 250 50 0 empty empty motivated! 17 7 0 10 -262144
+-1 -1;
+#X msg 251 406 0;
+#X obj 251 429 v \$0-STATE;
+#X msg 164 44 1;
+#X obj 164 67 v \$0-STATE;
+#N canvas 906 89 533 644 world 1;
+#X floatatom 16 78 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;
+#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
+1;
+#X floatatom 110 504 5 0 0 0 stress - -;
+#X obj 238 555 +;
+#X obj 238 502 t a b;
+#X obj 238 326 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+1;
+#X floatatom 238 480 8 0 0 0 - - -;
+#X obj 16 521 >;
+#X floatatom 16 137 5 0 0 0 - - -;
+#X obj 238 375 t b b;
+#X obj 285 416 sel 1 0;
+#X obj 64 164 bng 15 250 50 0 empty empty listen 17 7 0 10 -191407
+-257985 -1;
+#X obj 16 114 resample 1000;
+#X obj 238 578 max 0;
+#X text 109 114 listening speed;
+#X text 56 77 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
+1;
+#X obj 16 451 abs;
+#N canvas 0 50 450 250 (subpatch) 0;
+#X array \$0-stress 100 float 2;
+#X coords 0 3 100 0 200 50 1 0 0;
+#X 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;
+#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
+;
+#X obj 12 100 t a b;
+#X obj 117 77 f;
+#X obj 144 77 + 1;
+#X obj 117 100 mod 100;
+#X obj 12 11 loadbang;
+#X obj 12 77 v \$0-STRESS;
+#X obj 12 123 tabwrite \$0-stress;
+#X msg 78 11 0;
+#X connect 0 0 7 0;
+#X connect 1 0 0 0;
+#X connect 2 0 8 0;
+#X connect 2 1 3 0;
+#X connect 3 0 4 0;
+#X connect 3 0 5 0;
+#X connect 4 0 3 1;
+#X connect 5 0 8 1;
+#X connect 6 0 1 0;
+#X connect 7 0 2 0;
+#X connect 9 0 7 0;
+#X restore 473 100 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
+1;
+#X obj 373 255 metro 50;
+#X obj 373 212 loadbang;
+#X obj 373 278 v \$0-STATE;
+#X obj 373 301 s \$0-status-now;
+#X obj 16 39 r WORLD_ENERGY;
+#X text 378 440 working stress;
+#X text 378 460 resting relax;
+#X msg 304 462 -0.005;
+#X msg 285 439 0.05;
+#X obj 16 210 < 0.49;
+#X connect 0 0 21 0;
+#X connect 1 0 5 0;
+#X connect 1 1 37 0;
+#X connect 2 0 7 0;
+#X connect 3 0 2 1;
+#X connect 4 0 3 0;
+#X connect 5 0 2 0;
+#X connect 7 0 28 0;
+#X connect 8 0 16 0;
+#X connect 9 0 38 0;
+#X connect 11 0 16 1;
+#X connect 12 0 22 0;
+#X connect 13 0 12 0;
+#X connect 13 1 35 0;
+#X connect 14 0 32 0;
+#X connect 15 0 13 0;
+#X connect 16 0 9 0;
+#X connect 16 0 10 0;
+#X connect 17 0 20 0;
+#X connect 17 0 49 0;
+#X connect 18 0 15 0;
+#X connect 18 1 34 0;
+#X connect 19 0 48 0;
+#X connect 19 1 47 0;
+#X connect 21 0 17 0;
+#X connect 22 0 11 0;
+#X connect 22 0 36 0;
+#X connect 28 0 8 0;
+#X connect 30 0 14 0;
+#X connect 32 0 18 0;
+#X connect 34 0 19 0;
+#X connect 35 0 12 1;
+#X connect 37 0 4 0;
+#X connect 37 0 27 0;
+#X connect 39 0 40 0;
+#X connect 40 0 42 0;
+#X connect 41 0 39 0;
+#X connect 42 0 43 0;
+#X connect 44 0 0 0;
+#X connect 47 0 15 0;
+#X connect 48 0 15 0;
+#X connect 49 0 1 0;
+#X restore 167 226 pd world and me;
+#N canvas 222 280 697 374 expressions 0;
+#X obj 42 185 inlet;
+#X obj 42 266 outlet;
+#X obj 42 237 t b a;
+#X obj 244 232 s \$0-word;
+#X obj 161 323 bng 15 250 50 0 \$0-reload empty s:reload 17 7 0 10
+-262144 -1 -1;
+#X obj 161 255 + 1;
+#X floatatom 161 278 5 0 0 0 - - -;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array alumiB1 50 float 3;
+#A 0 0.228571 0.257143 0.257143 0.209524 0.219048 0.242857 0.276191
+0.295239 0.304762 0.819048 0.419049 0.428573 0.314286 0.314286 0.295238
+0.32381 0.333334 0.485715 0.533334 0.380953 0.104762 0.0380947 0.00952309
+0.00952309 0.0285708 0.0476186 0.266666 0.352381 0.342857 0.361905
+0.400001 0.199999 0.199999 0.214285 0.228571 0.199999 0.228571 0.342857
+0.685714 0.695238 0.352381 0.0380935 0.0285696 0.114284 0.295238 0.180952
+0.219047 0.457144 0.400001 0.238095;
+#X coords 0 1 50 0 150 105 1 0 0;
+#X restore 34 44 graph;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array alumiB2 50 float 3;
+#A 0 0.142857 0.180952 0.195238 0.209524 0.228572 0.266667 0.295239
+0.685714 0.0952377 0.104762 0.161905 0.209524 0.234921 0.260318 0.647619
+0.133333 0.152381 0.171429 0.209524 0.219048 0.24762 0.685714 0.133333
+0.161905 0.195238 0.24762 0.723809 0.276191 0.171429 0.190476 0.219048
+0.24762 0.238096 0.2 0.22381 0.24762 0.609524 0.123809 0.147619 0.171429
+0.190476 0.257143 0.276191 0.295239 0.714286 0.152381 0.2 0.238096
+0.333334 0.390478;
+#X coords 0 1 50 0 150 105 1 0 0;
+#X restore 194 44 graph;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array alumiB3 50 float 3;
+#A 0 0.438094 0.438094 0.438094 0.438094 0.438094 0.438094 0.438094
+0.438094 0.438094 0.438094 0.438094 0.438094 0.438094 0.438094 0.438094
+0.438094 0.428571 0.438094 0.438094 0.438094 0.438094 0.438094 0.438094
+0.428571 0.428571 0.428571 0.428571 0.428571 0.428571 0.428571 0.428571
+0.428571 0.428571 0.428571 0.428571 0.428571 0.428571 0.428571 0.428571
+0.428571 0.428571 0.428571 0.428571 0.428571 0.428571 0.428571 0.428571
+0.438094 0.438094 0.447618;
+#X coords 0 1 50 0 150 105 1 0 0;
+#X restore 354 44 graph;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array alumiB4 50 float 3;
+#A 0 0.438095 0.333333 0.27619 0.228571 0.171427 0.10476 0.0285694
+0.00952375 0.00952375 -1.19209e-07 -0.00952399 -0.00952399 -0.00952399
+-0.00952399 -0.00952399 0.390476 0.314285 0.266666 0.228571 0.142856
+0.0857126 0.0190455 -0.00952607 0.0190476 0.0190476 0.0190476 0.0190476
+0.0190476 0.0190476 0.409524 0.266666 0.15238 0.0857127 0.0190457 0.00952178
+0.0190476 0.0190476 0.0190476 0.419048 0.314285 0.27619 0.209523 0.133332
+0.0761887 0.0190455 0.0190476 0.0190476 0.0190476 0.0190476 -8.34465e-07
+;
+#X coords 0 1 50 0 150 105 1 0 0;
+#X restore 514 44 graph;
+#X obj 161 300 array_copier alumiB;
+#X obj 42 214 count 4;
+#X connect 0 0 12 0;
+#X connect 2 0 1 0;
+#X connect 2 1 5 0;
+#X connect 5 0 6 0;
+#X connect 6 0 11 0;
+#X connect 11 0 4 0;
+#X connect 12 0 2 0;
+#X connect 12 0 3 0;
+#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.209524 0.228572 0.266667 0.295239
+0.685714 0.0952377 0.104762 0.161905 0.209524 0.234921 0.260318 0.647619
+0.133333 0.152381 0.171429 0.209524 0.219048 0.24762 0.685714 0.133333
+0.161905 0.195238 0.24762 0.723809 0.276191 0.171429 0.190476 0.219048
+0.24762 0.238096 0.2 0.22381 0.24762 0.609524 0.123809 0.147619 0.171429
+0.190476 0.257143 0.276191 0.295239 0.714286 0.152381 0.2 0.238096
+0.333334 0.390478;
+#X coords 0 1 50 0 50 50 1 0 0;
+#X restore 29 46 graph;
+#X obj 88 429 s NOTE;
+#X obj 88 406 spigot;
+#X obj 7 420 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 1
+;
+#X obj 7 397 loadbang;
+#X obj 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 1;
+#X obj 88 7 bng 15 250 50 0 empty empty empty 17 7 0 10 -228856 -1
+-1;
+#X obj 88 24 tgl 15 0 empty \$0-status-now empty 17 7 0 10 -228856
+-1 -1 1 1;
+#X obj 48 188 r ALUMI_B;
+#X obj 164 21 r ALUMI_B;
+#X obj 167 269 s ALUMI_B;
+#X msg 249 329 alumiB;
+#X obj 231 452 s ALUMI_B_DONE;
+#X obj 88 306 riff1 600 3205 500;
+#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;
+#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 connect 0 0 25 0;
+#X connect 1 0 23 0;
+#X connect 2 0 5 0;
+#X connect 2 0 24 0;
+#X connect 4 0 22 0;
+#X connect 5 0 6 0;
+#X connect 7 0 8 0;
+#X connect 9 0 4 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;
+#X connect 16 0 23 0;
+#X connect 20 0 10 0;
+#X connect 21 0 7 0;
+#X connect 21 0 18 0;
+#X connect 23 0 25 1;
+#X connect 25 0 13 0;
+#X connect 25 3 2 0;
+#X connect 26 0 28 0;
+#X connect 27 0 30 0;
+#X connect 28 0 27 0;
+#X connect 29 0 31 1;
+#X connect 30 0 31 0;
+#X connect 31 0 32 0;
+#X coords 0 -1 1 1 100 150 2 5 5;
diff --git a/puredata/radio_bongbong.pd b/puredata/radio_bongbong.pd
new file mode 100644
index 0000000..c5f4d8a
--- /dev/null
+++ b/puredata/radio_bongbong.pd
@@ -0,0 +1,287 @@
+#N canvas 192 89 410 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
+-1 -1;
+#X msg 249 329 bongbong;
+#X obj 164 21 r BONGBONG;
+#N canvas 0 50 450 250 (subpatch) 0;
+#X array bongbong 50 float 3;
+#A 0 1.15238 0.828571 1.15238 0.828571 1.15238 0.761905 1.14286 0.828571
+0.8 1.08571 0.961905 1.06667 0.92381 0.885714 1.05714 1.05714 1.05714
+0.933333 1.06667 0.933333 1.10476 1.11428 0.885714 1.10476 1.10476
+1.12381 1.14286 1.1619 0.971429 1.13333 0.904762 0.952381 1.13333 0.92381
+1.13333 0.838095 0.961905 1.13333 0.942857 1.12381 0.933333 1.09524
+0.87619 1.06667 0.904762 0.933333 1.05714 0.904762 0.885714 1.02857
+;
+#X coords 0 1 50 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 1;
+#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;
+#X obj 167 249 bng 15 250 50 0 empty empty motivated! 17 7 0 10 -262144
+-1 -1;
+#X obj 167 279 s BONGBONG;
+#X obj 48 188 r BONGBONG;
+#X msg 251 406 0;
+#X obj 251 429 v \$0-STATE;
+#X msg 164 44 1;
+#X obj 164 67 v \$0-STATE;
+#N canvas 557 89 533 644 world 0;
+#X floatatom 16 78 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;
+#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
+1;
+#X floatatom 110 504 5 0 0 0 stress - -;
+#X obj 238 555 +;
+#X obj 238 502 t a b;
+#X obj 238 326 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+1;
+#X floatatom 238 480 8 0 0 0 - - -;
+#X obj 16 521 >;
+#X floatatom 16 137 5 0 0 0 - - -;
+#X obj 238 375 t b b;
+#X obj 285 416 sel 1 0;
+#X obj 64 164 bng 15 250 50 0 empty empty listen 17 7 0 10 -191407
+-257985 -1;
+#X obj 16 114 resample 1000;
+#X obj 238 578 max 0;
+#X text 109 114 listening speed;
+#X text 56 77 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
+1;
+#X obj 16 451 abs;
+#N canvas 0 50 450 250 (subpatch) 0;
+#X array \$0-stress 100 float 2;
+#X coords 0 3 100 0 200 50 1 0 0;
+#X 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;
+#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
+;
+#X obj 12 100 t a b;
+#X obj 117 77 f;
+#X obj 144 77 + 1;
+#X obj 117 100 mod 100;
+#X obj 12 11 loadbang;
+#X obj 12 77 v \$0-STRESS;
+#X obj 12 123 tabwrite \$0-stress;
+#X msg 78 11 0;
+#X connect 0 0 7 0;
+#X connect 1 0 0 0;
+#X connect 2 0 8 0;
+#X connect 2 1 3 0;
+#X connect 3 0 4 0;
+#X connect 3 0 5 0;
+#X connect 4 0 3 1;
+#X connect 5 0 8 1;
+#X connect 6 0 1 0;
+#X connect 7 0 2 0;
+#X connect 9 0 7 0;
+#X restore 473 100 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
+1;
+#X obj 373 255 metro 50;
+#X obj 373 212 loadbang;
+#X obj 373 278 v \$0-STATE;
+#X obj 373 301 s \$0-status-now;
+#X obj 16 39 r WORLD_ENERGY;
+#X text 378 440 working stress;
+#X text 378 460 resting relax;
+#X msg 285 439 0.005;
+#X msg 304 462 -0.005;
+#X obj 16 210 < 0.7;
+#X connect 0 0 21 0;
+#X connect 1 0 5 0;
+#X connect 1 1 37 0;
+#X connect 2 0 7 0;
+#X connect 3 0 2 1;
+#X connect 4 0 3 0;
+#X connect 5 0 2 0;
+#X connect 7 0 28 0;
+#X connect 8 0 16 0;
+#X connect 9 0 38 0;
+#X connect 11 0 16 1;
+#X connect 12 0 22 0;
+#X connect 13 0 12 0;
+#X connect 13 1 35 0;
+#X connect 14 0 32 0;
+#X connect 15 0 13 0;
+#X connect 16 0 9 0;
+#X connect 16 0 10 0;
+#X connect 17 0 20 0;
+#X connect 17 0 49 0;
+#X connect 18 0 15 0;
+#X connect 18 1 34 0;
+#X connect 19 0 47 0;
+#X connect 19 1 48 0;
+#X connect 21 0 17 0;
+#X connect 22 0 11 0;
+#X connect 22 0 36 0;
+#X connect 28 0 8 0;
+#X connect 30 0 14 0;
+#X connect 32 0 18 0;
+#X connect 34 0 19 0;
+#X connect 35 0 12 1;
+#X connect 37 0 4 0;
+#X connect 37 0 27 0;
+#X connect 39 0 40 0;
+#X connect 40 0 42 0;
+#X connect 41 0 39 0;
+#X connect 42 0 43 0;
+#X connect 44 0 0 0;
+#X connect 47 0 15 0;
+#X connect 48 0 15 0;
+#X connect 49 0 1 0;
+#X restore 167 226 pd world and me;
+#N canvas 329 403 621 436 expressions 0;
+#N canvas 0 50 450 250 (subpatch) 0;
+#X array bongbong1 50 float 3;
+#A 0 1.01905 1.03809 1.05714 0.990476 0.952381 0.933334 0.904762 0.819048
+0.838095 0.857143 0.87619 0.87619 0.87619 0.866666 0.923809 0.895238
+0.87619 0.87619 0.87619 0.87619 0.87619 0.809524 0.914286 0.961904
+1.01905 1.04762 0.999999 0.980952 0.990476 0.914285 0.933332 0.971427
+0.95238 0.923809 0.885714 0.866666 0.866666 0.87619 1.02857 1.05714
+1.07619 1.09524 1.10476 1.10476 1.10476 1.10476 1.10476 1.10476 1.09524
+1.07619;
+#X coords 0 1 50 0 150 105 1 0 0;
+#X restore 49 36 graph;
+#N canvas 0 50 450 250 (subpatch) 0;
+#X array bongbong2 50 float 3;
+#A 0 1.15238 0.828571 1.15238 0.828571 1.15238 0.761905 1.14286 0.828571
+0.8 1.08571 0.961905 1.06667 0.92381 0.885714 1.05714 1.05714 1.05714
+0.933333 1.06667 0.933333 1.10476 1.11428 0.885714 1.10476 1.10476
+1.12381 1.14286 1.1619 0.971429 1.13333 0.904762 0.952381 1.13333 0.92381
+1.13333 0.838095 0.961905 1.13333 0.942857 1.12381 0.933333 1.09524
+0.87619 1.06667 0.904762 0.933333 1.05714 0.904762 0.885714 1.02857
+;
+#X coords 0 1 50 0 150 105 1 0 0;
+#X restore 219 36 graph;
+#N canvas 0 50 450 250 (subpatch) 0;
+#X array bongbong3 50 float 3;
+#A 0 -0.771422 -0.390472 -0.390472 0.0761905 -0.399996 -0.504758 -0.476186
+-0.457139 -0.438091 -0.48571 -0.48571 -0.466663 -0.457139 -0.447615
+-0.447615 -0.48571 -0.533328 -0.5619 -0.495234 -0.457139 -0.419044
+-0.40952 -0.40952 -0.40952 -0.419044 -0.399996 0.152381 0.161905 -0.590472
+-0.552377 -0.523806 -0.514282 -0.514282 -0.523806 -0.523806 0.0761904
+0.0761905 0.0761905 0.0761905 -0.628567 -0.599996 -0.561901 -0.542853
+-0.523806 -0.514282 -0.580948 -0.552377 -0.533329 -0.523806 -0.276188
+;
+#X coords 0 1 50 0 150 105 1 0 0;
+#X restore 389 36 graph;
+#X obj 443 271 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
+-1 -1;
+#X msg 380 296 bang;
+#X obj 380 273 scan;
+#X obj 380 319 random 1000;
+#X obj 380 342 / 1000;
+#X floatatom 380 365 5 0 0 0 - - -;
+#X obj 380 253 t a b;
+#X msg 380 230 3;
+#X obj 380 403 asum bongbong;
+#X obj 80 403 asum bongbong;
+#X msg 80 380 1 \, 0 \, 0;
+#X obj 80 280 sel 0 1 2 3;
+#X obj 80 357 t b b;
+#X obj 180 403 asum bongbong;
+#X obj 180 357 t b b;
+#X obj 280 403 asum bongbong;
+#X obj 280 357 t b b;
+#X msg 180 380 0 \, 1 \, 0;
+#X msg 280 380 0 \, 0 \, 1;
+#X obj 22 210 inlet;
+#X obj 22 291 outlet;
+#X obj 22 239 random 4;
+#X obj 22 262 t b a;
+#X obj 224 257 s \$0-word;
+#X connect 3 0 11 1;
+#X connect 4 0 6 0;
+#X connect 5 0 4 0;
+#X connect 6 0 7 0;
+#X connect 7 0 8 0;
+#X connect 8 0 11 0;
+#X connect 9 0 5 0;
+#X connect 9 1 3 0;
+#X connect 10 0 9 0;
+#X connect 13 0 12 0;
+#X connect 14 0 15 0;
+#X connect 14 1 17 0;
+#X connect 14 2 19 0;
+#X connect 14 3 10 0;
+#X connect 15 0 13 0;
+#X connect 15 1 12 1;
+#X connect 17 0 20 0;
+#X connect 17 1 16 1;
+#X connect 19 0 21 0;
+#X connect 19 1 18 1;
+#X connect 20 0 16 0;
+#X connect 21 0 18 0;
+#X connect 22 0 24 0;
+#X connect 24 0 25 0;
+#X connect 24 0 26 0;
+#X connect 25 0 23 0;
+#X connect 25 1 14 0;
+#X restore 48 226 pd expressions;
+#X obj 231 452 s BONGBONG_DONE;
+#X obj 88 429 s NOTE;
+#X obj 88 406 spigot;
+#X obj 7 420 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 1
+;
+#X obj 7 397 loadbang;
+#X obj 259 57 loadbang;
+#X obj 259 100 metro 2000;
+#X obj 259 80 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
+-1;
+#X obj 334 128 r E_SEQ;
+#X obj 259 123 v \$0-STRESS;
+#X obj 259 146 *;
+#X obj 259 169 v \$0-STRESS;
+#X connect 0 0 9 0;
+#X connect 1 0 3 0;
+#X connect 2 0 14 0;
+#X connect 2 0 20 0;
+#X connect 3 0 9 1;
+#X connect 4 0 6 0;
+#X connect 4 0 16 0;
+#X connect 9 0 22 0;
+#X connect 9 3 2 0;
+#X connect 11 0 12 0;
+#X connect 13 0 19 0;
+#X connect 14 0 15 0;
+#X connect 16 0 17 0;
+#X connect 18 0 11 0;
+#X connect 19 0 9 0;
+#X connect 22 0 21 0;
+#X connect 23 0 22 1;
+#X connect 24 0 23 0;
+#X connect 25 0 27 0;
+#X connect 26 0 29 0;
+#X connect 27 0 26 0;
+#X connect 28 0 30 1;
+#X connect 29 0 30 0;
+#X connect 30 0 31 0;
+#X coords 0 -1 1 1 100 100 2 5 5;
diff --git a/puredata/radio_copper.pd b/puredata/radio_copper.pd
new file mode 100644
index 0000000..eef800c
--- /dev/null
+++ b/puredata/radio_copper.pd
@@ -0,0 +1,266 @@
+#N canvas 1 89 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
+-1 -1;
+#X text 35 318 stop!;
+#X obj 167 249 bng 15 250 50 0 empty empty motivated! 17 7 0 10 -262144
+-1 -1;
+#X msg 322 406 0;
+#X obj 322 429 v \$0-STATE;
+#X msg 164 44 1;
+#X obj 164 67 v \$0-STATE;
+#N canvas 906 89 533 644 world 0;
+#X floatatom 16 78 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;
+#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
+1;
+#X floatatom 110 504 5 0 0 0 stress - -;
+#X obj 238 555 +;
+#X obj 238 502 t a b;
+#X obj 238 326 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+1;
+#X floatatom 238 480 8 0 0 0 - - -;
+#X obj 16 521 >;
+#X floatatom 16 137 5 0 0 0 - - -;
+#X obj 238 375 t b b;
+#X obj 285 416 sel 1 0;
+#X obj 64 164 bng 15 250 50 0 empty empty listen 17 7 0 10 -191407
+-257985 -1;
+#X obj 16 114 resample 1000;
+#X obj 238 578 max 0;
+#X text 109 114 listening speed;
+#X text 56 77 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
+1;
+#X obj 16 451 abs;
+#N canvas 0 50 450 250 (subpatch) 0;
+#X array \$0-stress 100 float 2;
+#X coords 0 3 100 0 200 50 1 0 0;
+#X 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;
+#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
+;
+#X obj 12 100 t a b;
+#X obj 117 77 f;
+#X obj 144 77 + 1;
+#X obj 117 100 mod 100;
+#X obj 12 11 loadbang;
+#X obj 12 77 v \$0-STRESS;
+#X obj 12 123 tabwrite \$0-stress;
+#X msg 78 11 0;
+#X connect 0 0 7 0;
+#X connect 1 0 0 0;
+#X connect 2 0 8 0;
+#X connect 2 1 3 0;
+#X connect 3 0 4 0;
+#X connect 3 0 5 0;
+#X connect 4 0 3 1;
+#X connect 5 0 8 1;
+#X connect 6 0 1 0;
+#X connect 7 0 2 0;
+#X connect 9 0 7 0;
+#X restore 473 100 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
+1;
+#X obj 373 255 metro 50;
+#X obj 373 212 loadbang;
+#X obj 373 278 v \$0-STATE;
+#X obj 373 301 s \$0-status-now;
+#X obj 16 39 r WORLD_ENERGY;
+#X text 378 440 working stress;
+#X text 378 460 resting relax;
+#X msg 304 462 -0.005;
+#X obj 16 210 < 0.5;
+#X msg 285 439 1;
+#X connect 0 0 21 0;
+#X connect 1 0 5 0;
+#X connect 1 1 37 0;
+#X connect 2 0 7 0;
+#X connect 3 0 2 1;
+#X connect 4 0 3 0;
+#X connect 5 0 2 0;
+#X connect 7 0 28 0;
+#X connect 8 0 16 0;
+#X connect 9 0 38 0;
+#X connect 11 0 16 1;
+#X connect 12 0 22 0;
+#X connect 13 0 12 0;
+#X connect 13 1 35 0;
+#X connect 14 0 32 0;
+#X connect 15 0 13 0;
+#X connect 16 0 9 0;
+#X connect 16 0 10 0;
+#X connect 17 0 20 0;
+#X connect 17 0 48 0;
+#X connect 18 0 15 0;
+#X connect 18 1 34 0;
+#X connect 19 0 49 0;
+#X connect 19 1 47 0;
+#X connect 21 0 17 0;
+#X connect 22 0 11 0;
+#X connect 22 0 36 0;
+#X connect 28 0 8 0;
+#X connect 30 0 14 0;
+#X connect 32 0 18 0;
+#X connect 34 0 19 0;
+#X connect 35 0 12 1;
+#X connect 37 0 4 0;
+#X connect 37 0 27 0;
+#X connect 39 0 40 0;
+#X connect 40 0 42 0;
+#X connect 41 0 39 0;
+#X connect 42 0 43 0;
+#X connect 44 0 0 0;
+#X connect 47 0 15 0;
+#X connect 48 0 1 0;
+#X connect 49 0 15 0;
+#X restore 167 226 pd world and me;
+#N canvas 333 259 684 376 expressions 0;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array copper1 50 float 3;
+#A 0 0.0476214 0.104764 0.161906 0.219049 0.24762 0.285715 0.32381
+0.361905 0.419048 0.390476 0.371429 0.333334 0.295239 0.257144 0.190476
+0.104762 0.0666671 0.00952458 0.0476196 0.0952383 0.152383 0.219049
+0.257144 0.295239 0.333334 0.419045 0.409522 0.361903 0.295237 0.266665
+0.219047 0.171428 0.123809 0.0761904 0.142856 0.180951 0.238094 0.276189
+0.333331 0.38095 0.419045 0.390474 0.352379 0.295236 0.257141 0.219046
+0.171428 0.114285 0.0666665 0.0285715;
+#X coords 0 1 50 0 150 105 1 0 0;
+#X restore 26 68 graph;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array copper4 50 float 3;
+#A 0 0.419048 0.419048 0.419048 0.419048 0.419048 0.504762 0.561905
+0.6 0.609524 0.619048 0.619048 0.619048 0.333333 0.314286 0.304762
+0.304762 0.304762 0.371429 0.438095 0.47619 0.495238 0.504762 0.504762
+0.504762 0.485714 0.419048 0.209524 0.180952 0.171429 0.152381 0.152381
+0.142857 0.142857 0.190476 0.67619 0.704762 0.733333 0.733333 0.723809
+0.714286 0.685714 0.495238 0.485714 0.485714 0.457143 0.257143 0.247619
+0.228571 0.228571 0.219048;
+#X coords 0 1 50 0 150 105 1 0 0;
+#X restore 506 68 graph;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array copper3 50 float 3;
+#A 0 1 1.20953 1.05715 0.352379 0.30476 0.228569 0.161901 0.0857105
+0.0476151 1.18095 1.21905 0.571429 0.495238 0.419047 0.342856 0.257141
+0.209522 0.495238 0.123807 0.0857117 1.02857 1.31429 0.695237 0.657142
+0.542856 0.352381 0.295237 0.22857 0.180951 0.0952362 0.0571407 0.038093
+0.0285691 0.0190452 0.0190452 0.00952137 0.619047 0.533332 0.438093
+0.38095 0.314283 0.266664 0.238092 0.180949 0.104762 0.0761902 0.0571425
+0.0476186 0.0285709 0.019047;
+#X coords 0 1 50 0 150 105 1 0 0;
+#X restore 346 68 graph;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array copper2 50 float 3;
+#A 0 0.0666668 0.104762 0.161906 0.228573 0.29524 0.342859 0.409526
+0.476193 0.54286 0.600003 0.695242 0.752385 0.809529 0.847619 0.914286
+0.990477 1.07619 1.17143 0.00952369 0.00952369 0.00952369 0.00952387
+0.00952387 0.00952387 0 0 0 -1.19209e-07 0.00952375 0.0476192 0.12381
+0.219049 0.304764 0.361907 0.428574 0.514289 0.59048 0.685718 0.771433
+0.857148 1 1.04762 1.16191 1.21905 1.2381 -0.00952542 -0.00952542 -0.00952542
+-0.00952542 -0.00952542;
+#X coords 0 1 50 0 150 105 1 0 0;
+#X restore 186 68 graph;
+#X obj 38 195 inlet;
+#X obj 38 276 outlet;
+#X obj 38 247 t b a;
+#X obj 240 242 s \$0-word;
+#X obj 148 333 bng 15 250 50 0 \$0-reload empty s:reload 17 7 0 10
+-262144 -1 -1;
+#X obj 148 265 + 1;
+#X floatatom 148 288 5 0 0 0 - - -;
+#X obj 148 310 array_copier copper;
+#X obj 38 224 count 4;
+#X connect 4 0 12 0;
+#X connect 6 0 5 0;
+#X connect 6 1 9 0;
+#X connect 9 0 10 0;
+#X connect 10 0 11 0;
+#X connect 11 0 8 0;
+#X connect 12 0 6 0;
+#X connect 12 0 7 0;
+#X restore 48 226 pd expressions;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array copper 50 float 3;
+#A 0 0.419048 0.419048 0.419048 0.419048 0.419048 0.504762 0.561905
+0.6 0.609524 0.619048 0.619048 0.619048 0.333333 0.314286 0.304762
+0.304762 0.304762 0.371429 0.438095 0.47619 0.495238 0.504762 0.504762
+0.504762 0.485714 0.419048 0.209524 0.180952 0.171429 0.152381 0.152381
+0.142857 0.142857 0.190476 0.67619 0.704762 0.733333 0.733333 0.723809
+0.714286 0.685714 0.495238 0.485714 0.485714 0.457143 0.257143 0.247619
+0.228571 0.228571 0.219048;
+#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 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 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
+;
+#X obj 7 397 loadbang;
+#X obj 164 21 r COPPER;
+#X obj 167 279 s COPPER;
+#X obj 48 188 r COPPER;
+#X obj 302 452 s COPPER_DONE;
+#X msg 349 326 copper;
+#X obj 88 306 riff1_random 800 3204 1000 1300;
+#X obj 369 349 bng 15 250 50 0 \$0-reload empty s: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;
+#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 connect 0 0 24 0;
+#X connect 1 0 23 0;
+#X connect 2 0 5 0;
+#X connect 2 0 22 0;
+#X connect 4 0 20 0;
+#X connect 5 0 6 0;
+#X connect 7 0 8 0;
+#X connect 9 0 4 0;
+#X connect 10 0 24 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 24 1;
+#X connect 24 0 16 0;
+#X connect 24 3 2 0;
+#X connect 25 0 23 0;
+#X connect 26 0 28 0;
+#X connect 27 0 30 0;
+#X connect 28 0 27 0;
+#X connect 29 0 31 1;
+#X connect 30 0 31 0;
+#X connect 31 0 32 0;
+#X coords 0 -1 1 1 100 150 2 5 5;
diff --git a/puredata/radio_drawer.pd b/puredata/radio_drawer.pd
new file mode 100644
index 0000000..3f75949
--- /dev/null
+++ b/puredata/radio_drawer.pd
@@ -0,0 +1,266 @@
+#N canvas 310 89 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
+-1 -1;
+#X text 35 318 stop!;
+#X obj 167 249 bng 15 250 50 0 empty empty motivated! 17 7 0 10 -262144
+-1 -1;
+#X msg 315 406 0;
+#X obj 315 429 v \$0-STATE;
+#X msg 164 44 1;
+#X obj 164 67 v \$0-STATE;
+#N canvas 906 89 533 644 world 1;
+#X floatatom 16 78 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;
+#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
+1;
+#X floatatom 110 504 5 0 0 0 stress - -;
+#X obj 238 555 +;
+#X obj 238 502 t a b;
+#X obj 238 326 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+1;
+#X floatatom 238 480 8 0 0 0 - - -;
+#X obj 16 521 >;
+#X floatatom 16 137 5 0 0 0 - - -;
+#X obj 238 375 t b b;
+#X obj 285 416 sel 1 0;
+#X obj 64 164 bng 15 250 50 0 empty empty listen 17 7 0 10 -191407
+-257985 -1;
+#X obj 16 114 resample 1000;
+#X obj 238 578 max 0;
+#X text 109 114 listening speed;
+#X text 56 77 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
+1;
+#X obj 16 451 abs;
+#N canvas 0 50 450 250 (subpatch) 0;
+#X array \$0-stress 100 float 2;
+#X coords 0 3 100 0 200 50 1 0 0;
+#X 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;
+#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
+;
+#X obj 12 100 t a b;
+#X obj 117 77 f;
+#X obj 144 77 + 1;
+#X obj 117 100 mod 100;
+#X obj 12 11 loadbang;
+#X obj 12 77 v \$0-STRESS;
+#X obj 12 123 tabwrite \$0-stress;
+#X msg 78 11 0;
+#X connect 0 0 7 0;
+#X connect 1 0 0 0;
+#X connect 2 0 8 0;
+#X connect 2 1 3 0;
+#X connect 3 0 4 0;
+#X connect 3 0 5 0;
+#X connect 4 0 3 1;
+#X connect 5 0 8 1;
+#X connect 6 0 1 0;
+#X connect 7 0 2 0;
+#X connect 9 0 7 0;
+#X restore 473 100 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
+1;
+#X obj 373 255 metro 50;
+#X obj 373 212 loadbang;
+#X obj 373 278 v \$0-STATE;
+#X obj 373 301 s \$0-status-now;
+#X obj 16 39 r WORLD_ENERGY;
+#X text 378 440 working stress;
+#X text 378 460 resting relax;
+#X msg 304 462 -0.005;
+#X msg 285 439 0.05;
+#X obj 16 210 < 0.5;
+#X connect 0 0 21 0;
+#X connect 1 0 5 0;
+#X connect 1 1 37 0;
+#X connect 2 0 7 0;
+#X connect 3 0 2 1;
+#X connect 4 0 3 0;
+#X connect 5 0 2 0;
+#X connect 7 0 28 0;
+#X connect 8 0 16 0;
+#X connect 9 0 38 0;
+#X connect 11 0 16 1;
+#X connect 12 0 22 0;
+#X connect 13 0 12 0;
+#X connect 13 1 35 0;
+#X connect 14 0 32 0;
+#X connect 15 0 13 0;
+#X connect 16 0 9 0;
+#X connect 16 0 10 0;
+#X connect 17 0 20 0;
+#X connect 17 0 49 0;
+#X connect 18 0 15 0;
+#X connect 18 1 34 0;
+#X connect 19 0 48 0;
+#X connect 19 1 47 0;
+#X connect 21 0 17 0;
+#X connect 22 0 11 0;
+#X connect 22 0 36 0;
+#X connect 28 0 8 0;
+#X connect 30 0 14 0;
+#X connect 32 0 18 0;
+#X connect 34 0 19 0;
+#X connect 35 0 12 1;
+#X connect 37 0 4 0;
+#X connect 37 0 27 0;
+#X connect 39 0 40 0;
+#X connect 40 0 42 0;
+#X connect 41 0 39 0;
+#X connect 42 0 43 0;
+#X connect 44 0 0 0;
+#X connect 47 0 15 0;
+#X connect 48 0 15 0;
+#X connect 49 0 1 0;
+#X restore 167 226 pd world and me;
+#N canvas 440 146 688 374 expressions 0;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array drawer1 80 float 3;
+#A 0 0.219048 0.209524 0.209524 0.209524 0.2 0.2 0.190476 0.180952
+0.180952 0.180952 0.171428 0.171428 0.161904 0.161904 0.152381 0.142857
+0.142857 0.133333 0.133333 0.123809 0.123809 0.114285 0.114285 0.104761
+0.104761 0.0952374 0.0857135 0.0761896 0.0761896 0.0761896 0.0761896
+0.0761896 0.0666658 0.0666658 0.0666658 0.0666658 0.0571419 0.047618
+0.047618 0.0380942 0.0380942 0.0380942 0.0285703 0.0285703 0.0285703
+0.0285703 0.0285703 0.0190464 0.0190464 0.00952256 0 0 0 0 0 0 0 0
+0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0;
+#X coords 0 1 80 0 150 105 1 0 0;
+#X restore 29 31 graph;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array drawer4 50 float 3;
+#A 0 0.0190476 0.457143 0.457143 0.457143 0.00952381 0.457143 0.457143
+0 0.457143 0.457143 0.00952381 0.457143 0.457143 0.457143 0 0.457143
+0.457143 0.457143 0 0.457143 0 0.457143 0.457143 0 0.457143 -0.304759
+-0.304759 -0.285712 0 -0.285712 -0.285712 -0.285712 0 -0.285712 -0.285712
+0.0190476 -0.285712 -0.285712 0 -0.276188 -0.276188 -0.276188 -0.276188
+-0.276188 0 -0.276188 0.00952381 -0.276188 -0.276188 -0.276188;
+#X coords 0 1 50 0 150 105 1 0 0;
+#X restore 509 31 graph;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array drawer2 40 float 3;
+#A 0 0.380952 0.00952381 0.361905 -5.96046e-08 0.361905 -5.96046e-08
+0.342857 0.8 0.352381 0 0.361905 0 0.371429 0 0.361905 -4.76837e-07
+0.361905 0 -4.76837e-07 0.742857 -4.76837e-07 -4.76837e-07 -4.76837e-07
+-0.00952435 -4.76837e-07 0 0 0 0 0.285714 0.00952381 0.27619 0.819048
+-3.57628e-06 -3.57628e-06 -3.57628e-06 -3.57628e-06 -3.57628e-06 0.00952029
+0.00952029;
+#X coords 0 1 40 0 150 105 1 0 0;
+#X restore 189 31 graph;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array drawer3 50 float 3;
+#A 0 0.00952381 0.00952387 0.00952387 0.00952387 0.942857 0.00952387
+0.00952387 0.00952387 0.00952387 0.00952387 1.19209e-07 1.19209e-07
+1.19209e-07 1.19209e-07 0.657143 1.19209e-07 1.19209e-07 1.19209e-07
+1.19209e-07 1.19209e-07 1.19209e-07 1.19209e-07 1.19209e-07 1.19209e-07
+1.19209e-07 1.19209e-07 0.761905 1.19209e-07 1.19209e-07 1.19209e-07
+1.19209e-07 1.19209e-07 1.19209e-07 0.219048 1.19209e-07 1.19209e-07
+1.19209e-07 1.19209e-07 1.19209e-07 1.19209e-07 1.19209e-07 1.19209e-07
+1.19209e-07 1.19209e-07 0 -0.438091 -0.00952232 -0.00952375 -0.00952375
+-0.00952375;
+#X coords 0 1 50 0 150 105 1 0 0;
+#X restore 349 31 graph;
+#X obj 38 195 inlet;
+#X obj 38 276 outlet;
+#X obj 38 247 t b a;
+#X obj 240 242 s \$0-word;
+#X obj 148 333 bng 15 250 50 0 \$0-reload empty s:reload 17 7 0 10
+-262144 -1 -1;
+#X obj 148 265 + 1;
+#X floatatom 148 288 5 0 0 0 - - -;
+#X obj 148 310 array_copier drawer;
+#X obj 38 224 count 4;
+#X connect 4 0 12 0;
+#X connect 6 0 5 0;
+#X connect 6 1 9 0;
+#X connect 9 0 10 0;
+#X connect 10 0 11 0;
+#X connect 11 0 8 0;
+#X connect 12 0 6 0;
+#X connect 12 0 7 0;
+#X restore 48 226 pd expressions;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array drawer 40 float 3;
+#A 0 0.380952 0.00952381 0.361905 -5.96046e-08 0.361905 -5.96046e-08
+0.342857 0.8 0.352381 0 0.361905 0 0.371429 0 0.361905 -4.76837e-07
+0.361905 0 -4.76837e-07 0.742857 -4.76837e-07 -4.76837e-07 -4.76837e-07
+-0.00952435 -4.76837e-07 0 0 0 0 0.285714 0.00952381 0.27619 0.819048
+-3.57628e-06 -3.57628e-06 -3.57628e-06 -3.57628e-06 -3.57628e-06 0.00952029
+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 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;
+#X obj 48 188 r DRAWER;
+#X obj 88 24 tgl 15 0 empty \$0-status-now empty 17 7 0 10 -4032 -1
+-1 0 1;
+#X obj 295 452 s DRAWER_DONE;
+#X obj 167 279 s DRAWER;
+#X msg 319 323 drawer;
+#X obj 88 429 s NOTE;
+#X obj 88 406 spigot;
+#X obj 7 420 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 1
+;
+#X obj 7 397 loadbang;
+#X obj 88 306 riff1_random 600 4403 700 1000;
+#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;
+#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 connect 0 0 24 0;
+#X connect 1 0 19 0;
+#X connect 2 0 5 0;
+#X connect 2 0 17 0;
+#X connect 4 0 18 0;
+#X connect 5 0 6 0;
+#X connect 7 0 8 0;
+#X connect 9 0 4 0;
+#X connect 10 0 24 0;
+#X connect 14 0 7 0;
+#X connect 14 0 13 0;
+#X connect 15 0 10 0;
+#X connect 19 0 24 1;
+#X connect 21 0 20 0;
+#X connect 22 0 21 1;
+#X connect 23 0 22 0;
+#X connect 24 0 21 0;
+#X connect 24 3 2 0;
+#X connect 25 0 19 0;
+#X connect 26 0 28 0;
+#X connect 27 0 30 0;
+#X connect 28 0 27 0;
+#X connect 29 0 31 1;
+#X connect 30 0 31 0;
+#X connect 31 0 32 0;
+#X coords 0 -1 1 1 100 150 2 5 5;
diff --git a/puredata/radio_drummer.pd b/puredata/radio_drummer.pd
new file mode 100644
index 0000000..19a2dfb
--- /dev/null
+++ b/puredata/radio_drummer.pd
@@ -0,0 +1,335 @@
+#N canvas 1 280 829 496 10;
+#X msg 37 337 0;
+#X obj 316 306 loadbang;
+#X obj 288 406 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
+-1 -1;
+#X text 35 318 stop!;
+#X obj 275 48 bng 15 250 50 0 empty empty motivated! 17 7 0 10 -262144
+-1 -1;
+#X msg 308 406 0;
+#X obj 308 429 v \$0-STATE;
+#X msg 164 44 1;
+#X obj 164 67 v \$0-STATE;
+#N canvas 906 89 533 644 world 0;
+#X floatatom 16 78 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;
+#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
+1;
+#X floatatom 110 504 5 0 0 0 stress - -;
+#X obj 238 555 +;
+#X obj 238 502 t a b;
+#X obj 238 326 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+1;
+#X floatatom 238 480 8 0 0 0 - - -;
+#X obj 16 521 >;
+#X floatatom 16 137 5 0 0 0 - - -;
+#X obj 238 375 t b b;
+#X obj 285 416 sel 1 0;
+#X obj 64 164 bng 15 250 50 0 empty empty listen 17 7 0 10 -191407
+-257985 -1;
+#X obj 16 114 resample 1000;
+#X obj 238 578 max 0;
+#X text 109 114 listening speed;
+#X text 56 77 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
+1;
+#X obj 16 451 abs;
+#N canvas 0 50 450 250 (subpatch) 0;
+#X array \$0-stress 100 float 2;
+#X coords 0 3 100 0 200 50 1 0 0;
+#X 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;
+#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
+;
+#X obj 12 100 t a b;
+#X obj 117 77 f;
+#X obj 144 77 + 1;
+#X obj 117 100 mod 100;
+#X obj 12 11 loadbang;
+#X obj 12 77 v \$0-STRESS;
+#X obj 12 123 tabwrite \$0-stress;
+#X msg 78 11 0;
+#X connect 0 0 7 0;
+#X connect 1 0 0 0;
+#X connect 2 0 8 0;
+#X connect 2 1 3 0;
+#X connect 3 0 4 0;
+#X connect 3 0 5 0;
+#X connect 4 0 3 1;
+#X connect 5 0 8 1;
+#X connect 6 0 1 0;
+#X connect 7 0 2 0;
+#X connect 9 0 7 0;
+#X restore 473 100 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
+1;
+#X obj 373 255 metro 50;
+#X obj 373 212 loadbang;
+#X obj 373 278 v \$0-STATE;
+#X obj 373 301 s \$0-status-now;
+#X obj 16 39 r WORLD_ENERGY;
+#X text 378 440 working stress;
+#X text 378 460 resting relax;
+#X msg 304 462 -0.005;
+#X msg 285 439 0.05;
+#X obj 16 210 < 0.5;
+#X connect 0 0 21 0;
+#X connect 1 0 5 0;
+#X connect 1 1 37 0;
+#X connect 2 0 7 0;
+#X connect 3 0 2 1;
+#X connect 4 0 3 0;
+#X connect 5 0 2 0;
+#X connect 7 0 28 0;
+#X connect 8 0 16 0;
+#X connect 9 0 38 0;
+#X connect 11 0 16 1;
+#X connect 12 0 22 0;
+#X connect 13 0 12 0;
+#X connect 13 1 35 0;
+#X connect 14 0 32 0;
+#X connect 15 0 13 0;
+#X connect 16 0 9 0;
+#X connect 16 0 10 0;
+#X connect 17 0 20 0;
+#X connect 17 0 49 0;
+#X connect 18 0 15 0;
+#X connect 18 1 34 0;
+#X connect 19 0 48 0;
+#X connect 19 1 47 0;
+#X connect 21 0 17 0;
+#X connect 22 0 11 0;
+#X connect 22 0 36 0;
+#X connect 28 0 8 0;
+#X connect 30 0 14 0;
+#X connect 32 0 18 0;
+#X connect 34 0 19 0;
+#X connect 35 0 12 1;
+#X connect 37 0 4 0;
+#X connect 37 0 27 0;
+#X connect 39 0 40 0;
+#X connect 40 0 42 0;
+#X connect 41 0 39 0;
+#X connect 42 0 43 0;
+#X connect 44 0 0 0;
+#X connect 47 0 15 0;
+#X connect 48 0 15 0;
+#X connect 49 0 1 0;
+#X restore 275 25 pd world and me;
+#N canvas 350 89 730 545 expressions 0;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array drummerA1 30 float 3;
+#A 0 3.57628e-07 -0.00952339 -0.00952339 -0.00952339 -0.00952339 -0.00952339
+-0.00952339 -0.00952339 -0.00952339 -0.00952339 -0.00952339 -0.00952339
+-0.0190471 -0.0190471 -0.0190471 -0.00952333 -0.00952333 -0.00952333
+-0.00952333 -0.00952333 4.17233e-07 4.17233e-07 4.17233e-07 4.17233e-07
+4.17233e-07 4.17233e-07 -0.00952339 -0.00952339 -0.00952339 -0.00952339
+;
+#X coords 0 1 30 0 150 105 1 0 0;
+#X restore 52 41 graph;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array drummerA2 30 float 3;
+#A 0 0.628571 0.00952381 0.00952381 0.00952381 0.733333 0.00952381
+-0.00952381 -0.00952381 -0.00952381 -0.00952381 -0.00952381 -0.00952381
+-0.00952381 0.647619 -0.00952381 -0.00952381 -0.00952381 0 0.761905
+-0.00634921 -0.0031746 0 0.0031746 0.438095 0.00952381 0.00952381 0.00952381
+0.00952381 0.723809 0.00952381;
+#X coords 0 1 30 0 150 105 1 0 0;
+#X restore 212 41 graph;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array drummerA3 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.200001 0.12381 0.24762 0.161905 0.361906 0.314287
+0.37143 0.180953 0.257144 0.104762 0.0666664 0.266668;
+#X coords 0 1 30 0 150 105 1 0 0;
+#X restore 372 41 graph;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array drummerA4 30 float 3;
+#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 150 105 1 0 0;
+#X restore 532 41 graph;
+#X obj 55 312 inlet;
+#X obj 55 393 outlet;
+#X obj 55 364 t b a;
+#X obj 257 359 s \$0-word;
+#X obj 165 493 bng 15 250 50 0 \$0-reload empty s:reload 17 7 0 10
+-262144 -1 -1;
+#X obj 165 425 + 1;
+#X floatatom 165 448 5 0 0 0 - - -;
+#X obj 304 400 + 1;
+#X floatatom 304 423 5 0 0 0 - - -;
+#X obj 165 382 t a a;
+#X obj 55 341 random 4;
+#X obj 165 470 array_copier drummerA;
+#X obj 304 445 array_copier drummerB;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array drummerB1 30 float 3;
+#A 0 0.133333 0.152381 0.180953 0.2 0.238096 0.285715 0.314287 0.37143
+0.409526 0.457145 0.504764 0.590479 0.66667 0.752385 0.819048 0.857147
+0.980953 0.00952381 -5.96046e-08 -5.96046e-08 -5.96046e-08 -5.96046e-08
+-5.96046e-08 -5.96046e-08 -5.96046e-08 0.00952381 0.00952381 0.00952381
+0 0;
+#X coords 0 1 30 0 150 105 1 0 0;
+#X restore 52 181 graph;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array drummerB2 30 float 3;
+#A 0 0.52381 0.342857 -0.00952381 -0.00952381 0 0 0 0.00952381 0.838095
+0.419048 0 0 0 0.561905 0.361905 0 0 0 0 0 0 0.733333 0.333333 0 0
+0 0.47619 0.295238 0.00952381 0.00952381;
+#X coords 0 1 30 0 150 105 1 0 0;
+#X restore 212 181 graph;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array drummerB3 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
+-0.00952357 -0.00952357 -0.00952357;
+#X coords 0 1 30 0 150 105 1 0 0;
+#X restore 372 181 graph;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array drummerB4 30 float 3;
+#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 150 105 1 0 0;
+#X restore 532 181 graph;
+#X connect 4 0 14 0;
+#X connect 6 0 5 0;
+#X connect 6 1 13 0;
+#X connect 9 0 10 0;
+#X connect 10 0 15 0;
+#X connect 11 0 12 0;
+#X connect 12 0 16 0;
+#X connect 13 0 9 0;
+#X connect 13 1 11 0;
+#X connect 14 0 6 0;
+#X connect 14 0 7 0;
+#X connect 15 0 8 0;
+#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.200001 0.12381 0.24762 0.161905 0.361906 0.314287
+0.37143 0.180953 0.257144 0.104762 0.0666664 0.266668;
+#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;
+#X obj 88 7 bng 15 250 50 0 empty empty empty 17 7 0 10 -203904 -1
+-1;
+#X obj 88 24 tgl 15 0 empty \$0-status-now empty 17 7 0 10 -203904
+-1 -1 0 1;
+#X obj 88 406 spigot;
+#X obj 397 460 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+1;
+#X obj 397 437 loadbang;
+#X obj 48 188 r DRUMMER;
+#X obj 288 452 s DRUMMER_DONE;
+#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
+-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;
+#X obj 88 306 riff1_random 30 1031 600 1000;
+#X obj 164 21 r DRUMMER;
+#X obj 339 352 bng 15 250 50 0 empty \$0-reload r:reload 17 7 0 10
+-262144 -1 -1;
+#X msg 447 337 0;
+#X obj 726 306 loadbang;
+#X text 445 318 stop!;
+#X obj 498 406 spigot;
+#X obj 749 352 bng 15 250 50 0 empty \$0-reload r:reload 17 7 0 10
+-262144 -1 -1;
+#X obj 498 306 riff1_random 80 1032 600 1000;
+#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
+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
+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;
+#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 connect 0 0 23 0;
+#X connect 1 0 22 0;
+#X connect 2 0 5 0;
+#X connect 2 0 19 0;
+#X connect 4 0 20 0;
+#X connect 5 0 6 0;
+#X connect 7 0 8 0;
+#X connect 9 0 4 0;
+#X connect 10 0 23 0;
+#X connect 10 0 31 0;
+#X connect 15 0 35 0;
+#X connect 16 0 15 1;
+#X connect 16 0 29 1;
+#X connect 17 0 16 0;
+#X connect 18 0 10 0;
+#X connect 22 0 23 1;
+#X connect 23 0 15 0;
+#X connect 23 2 46 0;
+#X connect 23 3 2 0;
+#X connect 24 0 7 0;
+#X connect 24 0 13 0;
+#X connect 25 0 22 0;
+#X connect 26 0 31 0;
+#X connect 27 0 32 0;
+#X connect 29 0 38 0;
+#X connect 30 0 32 0;
+#X connect 31 0 29 0;
+#X connect 31 2 47 0;
+#X connect 32 0 31 1;
+#X connect 34 0 35 1;
+#X connect 35 0 33 0;
+#X connect 37 0 38 1;
+#X connect 38 0 36 0;
+#X connect 39 0 41 0;
+#X connect 40 0 43 0;
+#X connect 41 0 40 0;
+#X connect 42 0 44 1;
+#X connect 43 0 44 0;
+#X connect 44 0 45 0;
+#X connect 46 0 34 0;
+#X connect 47 0 37 0;
+#X coords 0 -1 1 1 100 150 2 5 5;
diff --git a/puredata/radio_flasher.pd b/puredata/radio_flasher.pd
new file mode 100644
index 0000000..74b646e
--- /dev/null
+++ b/puredata/radio_flasher.pd
@@ -0,0 +1,369 @@
+#N canvas 110 169 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 906 89 533 644 world 0;
+#X floatatom 16 78 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;
+#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
+1;
+#X floatatom 110 504 5 0 0 0 stress - -;
+#X obj 238 555 +;
+#X obj 238 502 t a b;
+#X obj 238 326 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+1;
+#X floatatom 238 480 8 0 0 0 - - -;
+#X obj 16 521 >;
+#X floatatom 16 137 5 0 0 0 - - -;
+#X obj 238 375 t b b;
+#X obj 285 416 sel 1 0;
+#X obj 64 164 bng 15 250 50 0 empty empty listen 17 7 0 10 -191407
+-257985 -1;
+#X obj 16 114 resample 1000;
+#X obj 238 578 max 0;
+#X text 109 114 listening speed;
+#X text 56 77 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
+1;
+#X obj 16 451 abs;
+#N canvas 0 50 450 250 (subpatch) 0;
+#X array \$0-stress 100 float 2;
+#X coords 0 3 100 0 200 50 1 0 0;
+#X 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;
+#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
+;
+#X obj 12 100 t a b;
+#X obj 117 77 f;
+#X obj 144 77 + 1;
+#X obj 117 100 mod 100;
+#X obj 12 11 loadbang;
+#X obj 12 77 v \$0-STRESS;
+#X obj 12 123 tabwrite \$0-stress;
+#X msg 78 11 0;
+#X connect 0 0 7 0;
+#X connect 1 0 0 0;
+#X connect 2 0 8 0;
+#X connect 2 1 3 0;
+#X connect 3 0 4 0;
+#X connect 3 0 5 0;
+#X connect 4 0 3 1;
+#X connect 5 0 8 1;
+#X connect 6 0 1 0;
+#X connect 7 0 2 0;
+#X connect 9 0 7 0;
+#X restore 473 100 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
+1;
+#X obj 373 255 metro 50;
+#X obj 373 212 loadbang;
+#X obj 373 278 v \$0-STATE;
+#X obj 373 301 s \$0-status-now;
+#X obj 16 39 r WORLD_ENERGY;
+#X text 378 440 working stress;
+#X text 378 460 resting relax;
+#X msg 304 462 -0.005;
+#X msg 285 439 0.05;
+#X obj 16 210 < 0.6;
+#X connect 0 0 21 0;
+#X connect 1 0 5 0;
+#X connect 1 1 37 0;
+#X connect 2 0 7 0;
+#X connect 3 0 2 1;
+#X connect 4 0 3 0;
+#X connect 5 0 2 0;
+#X connect 7 0 28 0;
+#X connect 8 0 16 0;
+#X connect 9 0 38 0;
+#X connect 11 0 16 1;
+#X connect 12 0 22 0;
+#X connect 13 0 12 0;
+#X connect 13 1 35 0;
+#X connect 14 0 32 0;
+#X connect 15 0 13 0;
+#X connect 16 0 9 0;
+#X connect 16 0 10 0;
+#X connect 17 0 20 0;
+#X connect 17 0 49 0;
+#X connect 18 0 15 0;
+#X connect 18 1 34 0;
+#X connect 19 0 48 0;
+#X connect 19 1 47 0;
+#X connect 21 0 17 0;
+#X connect 22 0 11 0;
+#X connect 22 0 36 0;
+#X connect 28 0 8 0;
+#X connect 30 0 14 0;
+#X connect 32 0 18 0;
+#X connect 34 0 19 0;
+#X connect 35 0 12 1;
+#X connect 37 0 4 0;
+#X connect 37 0 27 0;
+#X connect 39 0 40 0;
+#X connect 40 0 42 0;
+#X connect 41 0 39 0;
+#X connect 42 0 43 0;
+#X connect 44 0 0 0;
+#X connect 47 0 15 0;
+#X connect 48 0 15 0;
+#X connect 49 0 1 0;
+#X restore 284 70 pd world and me;
+#N canvas 702 198 685 519 expressions 0;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array flasherA2 40 float 3;
+#A 0 0.0952381 0 0.109524 0.00952381 0.119048 0 0.133333 0 0.152381
+0 0.180952 0.00952381 0.2 0.00952381 0.238095 0.0190476 0.27619 0 0.32381
+0 0.457143 0 0.590477 0.00952381 0.771429 0 0 0 0 0 0 0 0 0 0 0 0 0
+0 0;
+#X coords 0 1 40 0 150 105 1 0 0;
+#X restore 184 28 graph;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array flasherA3 30 float 3;
+#A 0 0.0761905 0.285714 0.552381 0.0761905 0.257143 0.542857 0.00952381
+0.00952381 0.0761905 0.266667 0.495238 0.428571 0.228571 0.485714 0.0857143
+0.238095 0.504762 0.904762 0.904762 0 0 0 0 0 0 0 0 0 0 0;
+#X coords 0 1 30 0 150 105 1 0 0;
+#X restore 344 28 graph;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array flasherA4 50 float 3;
+#A 0 0.171429 0.171429 0.00952387 0.00952387 0.00952387 0.00952387
+0.428571 0.0952381 0.00952375 0.00952375 0.00952375 0.00952375 0.00952375
+0.00952375 0.00952375 0.00952375 0.00952375 0.00952375 0.114286 0.257143
+0 0 0.00952375 0.00952375 0.00952375 0.00952375 0.0952381 0.0952381
+0.0190476 0.0190476 0.0190476 0.0190476 0.0190476 0.0190476 0.219048
+0.0857143 0.0190476 0.0190476 0.0190476 0.0190476 0.0190476 0.0190476
+0.0190476 0.0190476 0.152381 0.342857 0.0190476 0.0190476 0.0190476
+0.0190476;
+#X coords 0 1 50 0 150 105 1 0 0;
+#X restore 504 28 graph;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array flasherA1 50 float 3;
+#A 0 0.00952369 0.00952369 0.00952369 0.00952369 0.00952369 0.571429
+0.571429 0.571429 0.571429 0.571429 0.571429 0.571429 0.571429 0.571429
+0.571429 0.571429 0.571429 0.00952381 0.00952381 0.00952381 0.00952381
+0.00952381 0.00952381 0.00952381 0.00952381 0.00952381 0.00952381 0.00952381
+0.00952381 0.00952381 0.580956 0.580956 0.561908 0.561908 0.561908
+0.561908 0.571432 0.571432 0.571432 0.571429 0.571429 0.571429 0.571429
+0.571429 0.571429 0.571429 0.571429 0.0190476 0.0190476 0.0190476;
+#X coords 0 1 50 0 150 105 1 0 0;
+#X restore 24 28 graph;
+#X obj 28 289 inlet;
+#X obj 28 370 outlet;
+#X obj 28 341 t b a;
+#X obj 230 336 s \$0-word;
+#X obj 138 470 bng 15 250 50 0 \$0-reload empty s:reload 17 7 0 10
+-262144 -1 -1;
+#X obj 138 402 + 1;
+#X floatatom 138 425 5 0 0 0 - - -;
+#X obj 277 377 + 1;
+#X floatatom 277 400 5 0 0 0 - - -;
+#X obj 138 359 t a a;
+#X obj 138 447 array_copier flasherA;
+#X obj 277 422 array_copier flasherB;
+#X obj 28 318 random 4;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array flasherB1 100 float 3;
+#A 0 0.533333 0.533333 0.533333 0.533333 0.533333 0.533333 0.533333
+0.533333 0.533333 0.533333 4.76837e-06 4.76837e-06 4.76837e-06 4.76837e-06
+0.00952381 0.295238 0.00952381 0.00952381 0.00952381 0.00952381 0.00952381
+0.00952381 0.00952381 0.00952381 0.00952381 0.00952381 0.00952381 0.00952381
+0.00952381 0.00952381 0.00952381 0.00952381 0.00952381 0.504762 0.504762
+0.504762 0.504762 0.504762 0.67619 0.0190476 0.371429 0.00952381 0.00952381
+0.52381 0.52381 0.52381 0.52381 0.67619 0.438095 0 0 0 0 0 0 0 0.314286
+0 0 0 0 0 0 0 0 -1.78814e-07 -1.78814e-07 -1.78814e-07 -1.78814e-07
+0.466666 0.466666 0.466666 0.466666 0.466666 0.466666 0.466666 0.466666
+0.466666 0.466666 0.466666 0.466666 0.466666 0.466666 0 0 0 0 0 0.342857
+-0.0190474 -0.0190474 -0.0190474 -0.0190474 -0.0190474 -0.0190474 -0.0190474
+-0.0190474 -0.0190474 -0.0190474 0;
+#X coords 0 1 100 0 150 105 1 0 0;
+#X restore 24 159 graph;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array flasherB4 30 float 3;
+#A 0 0.0761905 0.247619 0.504762 0.0761905 0.238095 0.457142 0.00952381
+0.00952381 0.0761905 0.228571 0.428571 0.0666667 0.228571 0.438095
+0.0857143 0.238095 0.447619 0.904762 0.904762 0 0 0 0 0 0 0 0 0 0 0.2
+;
+#X coords 0 1 30 0 150 105 1 0 0;
+#X restore 504 159 graph;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array flasherB3 30 float 3;
+#A 0 0.180952 0.171429 -0.00952411 -2.38419e-07 -2.38419e-07 -2.38419e-07
+0 0.00952363 0.00952363 0.00952363 0.00952363 0.152381 0.152381 0.00952363
+0.00952363 0.00952363 0.00952363 0.00952363 0.0190475 0.171429 0.180952
+0 0 0 0 0.161905 0 0.161905 0 0;
+#X coords 0 1 30 0 150 105 1 0 0;
+#X restore 344 159 graph;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array flasherB2 40 float 3;
+#A 0 0.0952381 0 0.109524 0.00952381 0.119048 0 0.133333 0 0.152381
+0 0.180952 0.00952381 0.2 0.00952381 0.238095 0.0190476 0.27619 0 0.32381
+0 0.457143 0 0.590477 0.00952381 0.771429 0 0 0 0 0 0 0 0 0 0 0 0 0
+0 0;
+#X coords 0 1 40 0 150 105 1 0 0;
+#X restore 184 159 graph;
+#X connect 4 0 16 0;
+#X connect 6 0 5 0;
+#X connect 6 1 13 0;
+#X connect 9 0 10 0;
+#X connect 10 0 14 0;
+#X connect 11 0 12 0;
+#X connect 12 0 15 0;
+#X connect 13 0 9 0;
+#X connect 13 1 11 0;
+#X connect 14 0 8 0;
+#X connect 16 0 6 0;
+#X connect 16 0 7 0;
+#X restore 48 226 pd expressions;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array flasherA 40 float 3;
+#A 0 0.0952381 0 0.109524 0.00952381 0.119048 0 0.133333 0 0.152381
+0 0.180952 0.00952381 0.2 0.00952381 0.238095 0.0190476 0.27619 0 0.32381
+0 0.457143 0 0.590477 0.00952381 0.771429 0 0 0 0 0 0 0 0 0 0 0 0 0
+0 0;
+#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;
+#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;
+#X obj 564 161 s NOTE;
+#X obj 564 118 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+1;
+#X msg 564 138 1500 1000 0 \$1;
+#X obj 281 231 loadbang;
+#X msg 281 254 1001;
+#X obj 564 95 v \$0-STATE;
+#X obj 564 72 metro 50;
+#X obj 564 52 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+1;
+#X obj 564 29 loadbang;
+#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;
+#A 0 0.0952381 0 0.109524 0.00952381 0.119048 0 0.133333 0 0.152381
+0 0.180952 0.00952381 0.2 0.00952381 0.238095 0.0190476 0.27619 0 0.32381
+0 0.457143 0 0.590477 0.00952381 0.771429 0 0 0 0 0 0 0 0 0 0 0 0 0
+0 0;
+#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;
+#X obj 249 306 loadbang;
+#X obj 231 406 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
+-1 -1;
+#X text 35 318 stop!;
+#X msg 251 406 0;
+#X obj 251 429 v \$0-STATE;
+#X obj 88 406 spigot;
+#X obj 350 473 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+1;
+#X obj 350 450 loadbang;
+#X msg 367 337 0;
+#X obj 579 306 loadbang;
+#X text 365 318 stop!;
+#X obj 269 352 bng 15 250 50 0 empty \$0-reload r:reload 17 7 0 10
+-262144 -1 -1;
+#X obj 599 352 bng 15 250 50 0 empty \$0-reload r:reload 17 7 0 10
+-262144 -1 -1;
+#X obj 88 306 riff1 1000 1500 1000;
+#X msg 249 329 flasherA;
+#X obj 231 451 s FLASHER_DONE;
+#X obj 88 467 s NOTE;
+#X obj 183 406 > 50;
+#X obj 183 429 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
+1;
+#X obj 88 444 spigot;
+#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 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 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 connect 0 0 19 0;
+#X connect 1 0 2 0;
+#X connect 3 0 0 0;
+#X connect 4 0 36 0;
+#X connect 4 0 48 0;
+#X connect 10 0 11 0;
+#X connect 11 0 9 0;
+#X connect 12 0 13 0;
+#X connect 13 0 36 2;
+#X connect 14 0 10 0;
+#X connect 15 0 14 0;
+#X connect 16 0 15 0;
+#X connect 17 0 16 0;
+#X connect 18 0 1 0;
+#X connect 18 0 7 0;
+#X connect 21 0 4 0;
+#X connect 22 0 36 0;
+#X connect 23 0 37 0;
+#X connect 24 0 26 0;
+#X connect 24 0 38 0;
+#X connect 26 0 27 0;
+#X connect 28 0 42 0;
+#X connect 29 0 28 1;
+#X connect 29 0 43 1;
+#X connect 30 0 29 0;
+#X connect 31 0 48 0;
+#X connect 32 0 51 0;
+#X connect 34 0 37 0;
+#X connect 35 0 51 0;
+#X connect 36 0 28 0;
+#X connect 36 2 40 0;
+#X connect 36 3 24 0;
+#X connect 37 0 36 1;
+#X connect 40 0 41 0;
+#X connect 41 0 42 1;
+#X connect 42 0 39 0;
+#X connect 43 0 47 0;
+#X connect 45 0 46 0;
+#X connect 46 0 47 1;
+#X connect 47 0 44 0;
+#X connect 48 0 43 0;
+#X connect 48 2 45 0;
+#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 56 0;
+#X connect 54 0 53 0;
+#X connect 55 0 57 1;
+#X connect 56 0 57 0;
+#X connect 57 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
new file mode 100644
index 0000000..40d5c04
--- /dev/null
+++ b/puredata/radio_frog.pd
@@ -0,0 +1,279 @@
+#N canvas 156 89 404 528 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
+-1 -1;
+#X text 35 318 stop!;
+#X obj 167 249 bng 15 250 50 0 empty empty motivated! 17 7 0 10 -262144
+-1 -1;
+#X msg 251 406 0;
+#X obj 251 429 v \$0-STATE;
+#X msg 164 44 1;
+#X obj 164 67 v \$0-STATE;
+#N canvas 906 89 533 644 world 1;
+#X floatatom 16 78 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;
+#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
+1;
+#X floatatom 110 504 5 0 0 0 stress - -;
+#X obj 238 555 +;
+#X obj 238 502 t a b;
+#X obj 238 326 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+1;
+#X floatatom 238 480 8 0 0 0 - - -;
+#X obj 16 521 >;
+#X floatatom 16 137 5 0 0 0 - - -;
+#X obj 238 375 t b b;
+#X obj 285 416 sel 1 0;
+#X obj 64 164 bng 15 250 50 0 empty empty listen 17 7 0 10 -191407
+-257985 -1;
+#X obj 16 114 resample 1000;
+#X obj 238 578 max 0;
+#X text 109 114 listening speed;
+#X text 56 77 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
+1;
+#X obj 16 451 abs;
+#N canvas 0 50 450 250 (subpatch) 0;
+#X array \$0-stress 100 float 2;
+#X coords 0 3 100 0 200 50 1 0 0;
+#X 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;
+#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
+;
+#X obj 12 100 t a b;
+#X obj 117 77 f;
+#X obj 144 77 + 1;
+#X obj 117 100 mod 100;
+#X obj 12 11 loadbang;
+#X obj 12 77 v \$0-STRESS;
+#X obj 12 123 tabwrite \$0-stress;
+#X msg 78 11 0;
+#X connect 0 0 7 0;
+#X connect 1 0 0 0;
+#X connect 2 0 8 0;
+#X connect 2 1 3 0;
+#X connect 3 0 4 0;
+#X connect 3 0 5 0;
+#X connect 4 0 3 1;
+#X connect 5 0 8 1;
+#X connect 6 0 1 0;
+#X connect 7 0 2 0;
+#X connect 9 0 7 0;
+#X restore 473 100 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
+1;
+#X obj 373 255 metro 50;
+#X obj 373 212 loadbang;
+#X obj 373 278 v \$0-STATE;
+#X obj 373 301 s \$0-status-now;
+#X obj 16 39 r WORLD_ENERGY;
+#X text 378 440 working stress;
+#X text 378 460 resting relax;
+#X msg 304 462 -0.005;
+#X msg 285 439 0.01;
+#X obj 16 210 < 0.6;
+#X connect 0 0 21 0;
+#X connect 1 0 5 0;
+#X connect 1 1 37 0;
+#X connect 2 0 7 0;
+#X connect 3 0 2 1;
+#X connect 4 0 3 0;
+#X connect 5 0 2 0;
+#X connect 7 0 28 0;
+#X connect 8 0 16 0;
+#X connect 9 0 38 0;
+#X connect 11 0 16 1;
+#X connect 12 0 22 0;
+#X connect 13 0 12 0;
+#X connect 13 1 35 0;
+#X connect 14 0 32 0;
+#X connect 15 0 13 0;
+#X connect 16 0 9 0;
+#X connect 16 0 10 0;
+#X connect 17 0 20 0;
+#X connect 17 0 49 0;
+#X connect 18 0 15 0;
+#X connect 18 1 34 0;
+#X connect 19 0 48 0;
+#X connect 19 1 47 0;
+#X connect 21 0 17 0;
+#X connect 22 0 11 0;
+#X connect 22 0 36 0;
+#X connect 28 0 8 0;
+#X connect 30 0 14 0;
+#X connect 32 0 18 0;
+#X connect 34 0 19 0;
+#X connect 35 0 12 1;
+#X connect 37 0 4 0;
+#X connect 37 0 27 0;
+#X connect 39 0 40 0;
+#X connect 40 0 42 0;
+#X connect 41 0 39 0;
+#X connect 42 0 43 0;
+#X connect 44 0 0 0;
+#X connect 47 0 15 0;
+#X connect 48 0 15 0;
+#X connect 49 0 1 0;
+#X restore 167 226 pd world and me;
+#N canvas 440 146 688 352 expressions 0;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array frog1 100 float 3;
+#A 0 0.695238 0.695238 0.695238 0.695238 0.695238 0.695238 0.695238
+0.695238 0.685715 0.685715 4.76837e-06 4.76837e-06 4.76837e-06 4.76837e-06
+0.00952381 0.295238 0.00952381 0.00952381 0.00952381 0.00952381 0.00952381
+0.00952381 0.00952381 0.00952381 0.00952381 0.00952381 0.00952381 0.00952381
+0.00952381 0.00952381 0.00952381 0.00952381 0.00952381 0.00952381 0.00952381
+0.67619 0.67619 0.67619 0.67619 0.67619 0.67619 0.67619 0.67619 0.67619
+0.67619 0.67619 0.67619 0.67619 0 0 0 0 0 0 0 0 0.314286 0 0 0 0 0
+0 0 0 0 -0.00952375 -0.00952375 -0.0190475 0.685714 0.685714 0.685714
+0.685714 0.685714 0.685714 0.685714 0.685714 0.685714 0.685714 0.685714
+0.685714 0.685714 0 0 0 0 0 0 0.342857 -0.0190474 -0.0190474 -0.0190474
+-0.0190474 -0.0190474 -0.0190474 -0.0190474 -0.0190474 -0.0190474 -0.0190474
+0;
+#X coords 0 1 100 0 150 105 1 0 0;
+#X restore 24 35 graph;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array frog2 50 float 3;
+#A 0 0.0952381 0.104762 0.109524 0.114286 0.119048 0.12381 0.133333
+0.142857 0.152381 0.171429 0.180952 0.2 0.2 0.228571 0.238095 0.257143
+0.27619 0.304762 0.32381 0.352381 0.371429 0.409524 0.457143 0.533333
+0.6 0.695238 0.761905 0.857143 0.971429 0 0 0 0 0 0 0.00952381 0.00952381
+0.00952381 0.0190476 0.0190476 0.0190476 0.0190476 0.0190476 0.0190476
+0.0190476 0.0190476 0.0190476 0.0190476 0.0190476 0.0190476;
+#X coords 0 1 50 0 150 105 1 0 0;
+#X restore 184 35 graph;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array frog3 21 float 3;
+#A 0 0.0761905 0.285714 0.552381 0.0761905 0.257143 0.542857 0.00952381
+0.00952381 0.0761905 0.266667 0.495238 0.0666667 0.228571 0.485714
+0.0857143 0.238095 0.504762 0.904762 0.904762 0 0;
+#X coords 0 1 21 0 150 105 1 0 0;
+#X restore 344 35 graph;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array frog4 21 float 3;
+#A 0 0.0761905 0.0761905 0.0666667 0.0666667 0.0666667 0.0666667 0.0666667
+0.0666667 0.0666667 0.0666667 0.0666667 0.0666667 0.0666667 0.0666667
+0.0666667 0.0761905 0.0761905 0.0761905 0.0761905 0.0761905 0.0761905
+;
+#X coords 0 1 21 0 150 105 1 0 0;
+#X restore 504 35 graph;
+#X obj 33 168 inlet;
+#X obj 33 249 outlet;
+#X obj 33 220 t b a;
+#X obj 235 215 s \$0-word;
+#X obj 143 306 bng 15 250 50 0 \$0-reload empty s:reload 17 7 0 10
+-262144 -1 -1;
+#X obj 143 238 + 1;
+#X floatatom 143 261 5 0 0 0 - - -;
+#X obj 143 283 array_copier frog;
+#X obj 33 197 count 4;
+#X connect 4 0 12 0;
+#X connect 6 0 5 0;
+#X connect 6 1 9 0;
+#X connect 9 0 10 0;
+#X connect 10 0 11 0;
+#X connect 11 0 8 0;
+#X connect 12 0 6 0;
+#X connect 12 0 7 0;
+#X restore 48 226 pd expressions;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array frog 100 float 3;
+#A 0 0.695238 0.695238 0.695238 0.695238 0.695238 0.695238 0.695238
+0.695238 0.685715 0.685715 4.76837e-06 4.76837e-06 4.76837e-06 4.76837e-06
+0.00952381 0.295238 0.00952381 0.00952381 0.00952381 0.00952381 0.00952381
+0.00952381 0.00952381 0.00952381 0.00952381 0.00952381 0.00952381 0.00952381
+0.00952381 0.00952381 0.00952381 0.00952381 0.00952381 0.00952381 0.00952381
+0.67619 0.67619 0.67619 0.67619 0.67619 0.67619 0.67619 0.67619 0.67619
+0.67619 0.67619 0.67619 0.67619 0 0 0 0 0 0 0 0 0.314286 0 0 0 0 0
+0 0 0 0 -0.00952375 -0.00952375 -0.0190475 0.685714 0.685714 0.685714
+0.685714 0.685714 0.685714 0.685714 0.685714 0.685714 0.685714 0.685714
+0.685714 0.685714 0 0 0 0 0 0 0.342857 -0.0190474 -0.0190474 -0.0190474
+-0.0190474 -0.0190474 -0.0190474 -0.0190474 -0.0190474 -0.0190474 -0.0190474
+0;
+#X coords 0 1 100 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;
+#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
+-1 -1 1 1;
+#X obj 88 482 s NOTE;
+#X obj 88 406 spigot;
+#X obj 7 420 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 1
+;
+#X obj 7 397 loadbang;
+#X obj 48 187 r FROG;
+#X obj 231 452 s FROG_DONE;
+#X obj 164 21 r FROG;
+#X msg 249 329 frog;
+#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
+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;
+#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 connect 0 0 23 0;
+#X connect 1 0 22 0;
+#X connect 2 0 5 0;
+#X connect 2 0 20 0;
+#X connect 4 0 24 0;
+#X connect 5 0 6 0;
+#X connect 7 0 8 0;
+#X connect 9 0 4 0;
+#X connect 10 0 23 0;
+#X connect 16 0 27 0;
+#X connect 17 0 16 1;
+#X connect 18 0 17 0;
+#X connect 19 0 10 0;
+#X connect 21 0 7 0;
+#X connect 21 0 13 0;
+#X connect 22 0 23 1;
+#X connect 23 0 16 0;
+#X connect 23 2 25 0;
+#X connect 23 3 2 0;
+#X connect 25 0 26 0;
+#X connect 26 0 27 1;
+#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 31 0 34 0;
+#X connect 32 0 31 0;
+#X connect 33 0 35 1;
+#X connect 34 0 35 0;
+#X connect 35 0 36 0;
+#X coords 0 -1 1 1 100 150 2 5 5;
diff --git a/puredata/radio_rounder.pd b/puredata/radio_rounder.pd
new file mode 100644
index 0000000..9e2a2f6
--- /dev/null
+++ b/puredata/radio_rounder.pd
@@ -0,0 +1,257 @@
+#N canvas 698 89 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
+-1 -1;
+#X text 35 318 stop!;
+#X obj 167 249 bng 15 250 50 0 empty empty motivated! 17 7 0 10 -262144
+-1 -1;
+#X msg 251 406 0;
+#X obj 251 429 v \$0-STATE;
+#X msg 164 44 1;
+#X obj 164 67 v \$0-STATE;
+#N canvas 906 89 533 644 world 0;
+#X floatatom 16 78 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;
+#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
+1;
+#X floatatom 110 504 5 0 0 0 stress - -;
+#X obj 238 555 +;
+#X obj 238 502 t a b;
+#X obj 238 326 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+1;
+#X floatatom 238 480 8 0 0 0 - - -;
+#X obj 16 521 >;
+#X floatatom 16 137 5 0 0 0 - - -;
+#X obj 238 375 t b b;
+#X obj 285 416 sel 1 0;
+#X obj 64 164 bng 15 250 50 0 empty empty listen 17 7 0 10 -191407
+-257985 -1;
+#X obj 16 114 resample 1000;
+#X obj 238 578 max 0;
+#X text 109 114 listening speed;
+#X text 56 77 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
+1;
+#X obj 16 451 abs;
+#N canvas 0 50 450 250 (subpatch) 0;
+#X array \$0-stress 100 float 2;
+#X coords 0 3 100 0 200 50 1 0 0;
+#X 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;
+#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
+;
+#X obj 12 100 t a b;
+#X obj 117 77 f;
+#X obj 144 77 + 1;
+#X obj 117 100 mod 100;
+#X obj 12 11 loadbang;
+#X obj 12 77 v \$0-STRESS;
+#X obj 12 123 tabwrite \$0-stress;
+#X msg 78 11 0;
+#X connect 0 0 7 0;
+#X connect 1 0 0 0;
+#X connect 2 0 8 0;
+#X connect 2 1 3 0;
+#X connect 3 0 4 0;
+#X connect 3 0 5 0;
+#X connect 4 0 3 1;
+#X connect 5 0 8 1;
+#X connect 6 0 1 0;
+#X connect 7 0 2 0;
+#X connect 9 0 7 0;
+#X restore 473 100 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
+1;
+#X obj 373 255 metro 50;
+#X obj 373 212 loadbang;
+#X obj 373 278 v \$0-STATE;
+#X obj 373 301 s \$0-status-now;
+#X obj 16 39 r WORLD_ENERGY;
+#X text 378 440 working stress;
+#X text 378 460 resting relax;
+#X msg 304 462 -0.005;
+#X msg 285 439 0.05;
+#X obj 16 210 < 0.7;
+#X connect 0 0 21 0;
+#X connect 1 0 5 0;
+#X connect 1 1 37 0;
+#X connect 2 0 7 0;
+#X connect 3 0 2 1;
+#X connect 4 0 3 0;
+#X connect 5 0 2 0;
+#X connect 7 0 28 0;
+#X connect 8 0 16 0;
+#X connect 9 0 38 0;
+#X connect 11 0 16 1;
+#X connect 12 0 22 0;
+#X connect 13 0 12 0;
+#X connect 13 1 35 0;
+#X connect 14 0 32 0;
+#X connect 15 0 13 0;
+#X connect 16 0 9 0;
+#X connect 16 0 10 0;
+#X connect 17 0 20 0;
+#X connect 17 0 49 0;
+#X connect 18 0 15 0;
+#X connect 18 1 34 0;
+#X connect 19 0 48 0;
+#X connect 19 1 47 0;
+#X connect 21 0 17 0;
+#X connect 22 0 11 0;
+#X connect 22 0 36 0;
+#X connect 28 0 8 0;
+#X connect 30 0 14 0;
+#X connect 32 0 18 0;
+#X connect 34 0 19 0;
+#X connect 35 0 12 1;
+#X connect 37 0 4 0;
+#X connect 37 0 27 0;
+#X connect 39 0 40 0;
+#X connect 40 0 42 0;
+#X connect 41 0 39 0;
+#X connect 42 0 43 0;
+#X connect 44 0 0 0;
+#X connect 47 0 15 0;
+#X connect 48 0 15 0;
+#X connect 49 0 1 0;
+#X restore 167 226 pd world and me;
+#N canvas 19 521 697 374 expressions 0;
+#X obj 42 195 inlet;
+#X obj 42 276 outlet;
+#X obj 42 247 t b a;
+#X obj 244 242 s \$0-word;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array rounder1 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 150 105 1 0 0;
+#X restore 38 35 graph;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array rounder2 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 150 105 1 0 0;
+#X restore 198 35 graph;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array rounder3 30 float 3;
+#A 0 0.371429 0.371429 0.0190476 -0.428571 -0.438095 0 0.390476 0.4
+0.0285714 -0.438095 -0.428571 0.0190476 0.4 0.4 0.0285714 -0.447619
+-0.447619 0.409524 0.409524 0.0285714 -0.457143 -0.457143 0.409524
+0.409524 0.00952381 -0.428571 0.438095 0.0190476 -0.447619 0;
+#X coords 0 1 30 0 150 105 1 0 0;
+#X restore 358 35 graph;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array rounder4 30 float 3;
+#A 0 0.733333 0.885715 0.97143 1.05714 1.13334 1.12381 1.02857 0.914286
+0.819048 0.761905 0.8 0.914286 1.00953 1.08572 1.16191 1.14286 1.06667
+0.97143 0.904763 0.809524 0.761905 0.857143 0.933334 0.980954 1.04762
+1.09524 1.0381 0.980952 0.876191 0.780953;
+#X coords 0 1 30 0 150 105 1 0 0;
+#X restore 518 35 graph;
+#X obj 161 333 bng 15 250 50 0 \$0-reload empty s:reload 17 7 0 10
+-262144 -1 -1;
+#X obj 161 265 + 1;
+#X obj 161 310 array_copier rounder;
+#X floatatom 161 288 5 0 0 0 - - -;
+#X obj 42 224 count 4;
+#X connect 0 0 12 0;
+#X connect 2 0 1 0;
+#X connect 2 1 9 0;
+#X connect 9 0 11 0;
+#X connect 10 0 8 0;
+#X connect 11 0 10 0;
+#X connect 12 0 2 0;
+#X connect 12 0 3 0;
+#X restore 48 226 pd expressions;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array rounder 30 float 3;
+#A 0 0.733333 0.885715 0.97143 1.05714 1.13334 1.12381 1.02857 0.914286
+0.819048 0.761905 0.8 0.914286 1.00953 1.08572 1.16191 1.14286 1.06667
+0.97143 0.904763 0.809524 0.761905 0.857143 0.933334 0.980954 1.04762
+1.09524 1.0381 0.980952 0.876191 0.780953;
+#X coords 0 1 30 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 3;
+#X obj 88 7 bng 15 250 50 0 empty empty empty 17 7 0 10 -262130 -1
+-1;
+#X obj 88 24 tgl 15 0 empty \$0-status-now empty 17 7 0 10 -262130
+-1 -1 1 1;
+#X obj 164 21 r ROUNDER;
+#X obj 48 188 r ROUNDER;
+#X obj 167 269 s ROUNDER;
+#X obj 231 452 s ROUNDER_DONE;
+#X obj 88 306 riff1 800 4002 500;
+#X msg 249 329 rounder;
+#X obj 88 429 s NOTE;
+#X obj 88 406 spigot;
+#X obj 7 420 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 1
+;
+#X obj 7 397 loadbang;
+#X obj 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;
+#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 connect 0 0 19 0;
+#X connect 1 0 20 0;
+#X connect 2 0 5 0;
+#X connect 2 0 18 0;
+#X connect 4 0 17 0;
+#X connect 5 0 6 0;
+#X connect 7 0 8 0;
+#X connect 9 0 4 0;
+#X connect 10 0 19 0;
+#X connect 15 0 7 0;
+#X connect 15 0 13 0;
+#X connect 16 0 10 0;
+#X connect 19 0 22 0;
+#X connect 19 3 2 0;
+#X connect 20 0 19 1;
+#X connect 22 0 21 0;
+#X connect 23 0 22 1;
+#X connect 24 0 23 0;
+#X connect 25 0 20 0;
+#X connect 26 0 28 0;
+#X connect 27 0 30 0;
+#X connect 28 0 27 0;
+#X connect 29 0 31 1;
+#X connect 30 0 31 0;
+#X connect 31 0 32 0;
+#X coords 0 -1 1 1 100 150 2 5 5;
diff --git a/puredata/radio_suitcase.pd b/puredata/radio_suitcase.pd
new file mode 100644
index 0000000..a86a410
--- /dev/null
+++ b/puredata/radio_suitcase.pd
@@ -0,0 +1,483 @@
+#N canvas 1 89 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
+-1 -1;
+#X text 35 318 stop!;
+#X obj 267 102 bng 15 250 50 0 empty empty motivated! 17 7 0 10 -262144
+-1 -1;
+#X msg 251 406 0;
+#X obj 251 429 v \$0-STATE;
+#X msg 164 44 1;
+#X obj 164 67 v \$0-STATE;
+#N canvas 906 89 533 644 world 1;
+#X floatatom 16 78 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;
+#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
+1;
+#X floatatom 110 504 5 0 0 0 stress - -;
+#X obj 238 555 +;
+#X obj 238 502 t a b;
+#X obj 238 326 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+1;
+#X floatatom 238 480 8 0 0 0 - - -;
+#X obj 16 521 >;
+#X floatatom 16 137 5 0 0 0 - - -;
+#X obj 238 375 t b b;
+#X obj 285 416 sel 1 0;
+#X obj 64 164 bng 15 250 50 0 empty empty listen 17 7 0 10 -191407
+-257985 -1;
+#X obj 16 114 resample 1000;
+#X obj 238 578 max 0;
+#X text 109 114 listening speed;
+#X text 56 77 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
+1;
+#X obj 16 451 abs;
+#N canvas 0 50 450 250 (subpatch) 0;
+#X array \$0-stress 100 float 2;
+#X coords 0 3 100 0 200 50 1 0 0;
+#X 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;
+#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
+;
+#X obj 12 100 t a b;
+#X obj 117 77 f;
+#X obj 144 77 + 1;
+#X obj 117 100 mod 100;
+#X obj 12 11 loadbang;
+#X obj 12 77 v \$0-STRESS;
+#X obj 12 123 tabwrite \$0-stress;
+#X msg 78 11 0;
+#X connect 0 0 7 0;
+#X connect 1 0 0 0;
+#X connect 2 0 8 0;
+#X connect 2 1 3 0;
+#X connect 3 0 4 0;
+#X connect 3 0 5 0;
+#X connect 4 0 3 1;
+#X connect 5 0 8 1;
+#X connect 6 0 1 0;
+#X connect 7 0 2 0;
+#X connect 9 0 7 0;
+#X restore 473 100 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
+1;
+#X obj 373 255 metro 50;
+#X obj 373 212 loadbang;
+#X obj 373 278 v \$0-STATE;
+#X obj 373 301 s \$0-status-now;
+#X obj 16 39 r WORLD_ENERGY;
+#X text 378 440 working stress;
+#X text 378 460 resting relax;
+#X msg 304 462 -0.005;
+#X msg 285 439 0.1;
+#X obj 16 210 < 0.4;
+#X connect 0 0 21 0;
+#X connect 1 0 5 0;
+#X connect 1 1 37 0;
+#X connect 2 0 7 0;
+#X connect 3 0 2 1;
+#X connect 4 0 3 0;
+#X connect 5 0 2 0;
+#X connect 7 0 28 0;
+#X connect 8 0 16 0;
+#X connect 9 0 38 0;
+#X connect 11 0 16 1;
+#X connect 12 0 22 0;
+#X connect 13 0 12 0;
+#X connect 13 1 35 0;
+#X connect 14 0 32 0;
+#X connect 15 0 13 0;
+#X connect 16 0 9 0;
+#X connect 16 0 10 0;
+#X connect 17 0 20 0;
+#X connect 17 0 49 0;
+#X connect 18 0 15 0;
+#X connect 18 1 34 0;
+#X connect 19 0 48 0;
+#X connect 19 1 47 0;
+#X connect 21 0 17 0;
+#X connect 22 0 11 0;
+#X connect 22 0 36 0;
+#X connect 28 0 8 0;
+#X connect 30 0 14 0;
+#X connect 32 0 18 0;
+#X connect 34 0 19 0;
+#X connect 35 0 12 1;
+#X connect 37 0 4 0;
+#X connect 37 0 27 0;
+#X connect 39 0 40 0;
+#X connect 40 0 42 0;
+#X connect 41 0 39 0;
+#X connect 42 0 43 0;
+#X connect 44 0 0 0;
+#X connect 47 0 15 0;
+#X connect 48 0 15 0;
+#X connect 49 0 1 0;
+#X restore 267 79 pd world and me;
+#N canvas 200 213 809 655 expressions 0;
+#X obj 28 419 inlet;
+#X obj 28 500 outlet;
+#X obj 28 471 t b a;
+#X obj 230 466 s \$0-word;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array suitcaseB2 50 float 3;
+#A 0 0.580952 0.6 0.638095 0.647619 0.666666 0.67619 0.685714 0.685714
+0.685714 0.685714 0.685714 0.67619 0.647619 0.619047 0.571429 0.533334
+0.514286 0.514286 0.523809 0.523809 0.552381 0.561905 0.580952 0.590476
+0.6 0.609524 0.614285 0.619047 0.619047 0.619047 0.619047 0.609524
+0.580952 0.533333 0.495238 0.485714 0.457143 0.457144 0.44762 0.44762
+0.44762 0.44762 0.457143 0.466667 0.504762 0.466667 0.504762 0.52381
+0.533334 0.533334;
+#X coords 0 1 50 0 150 105 1 0 0;
+#X restore 189 155 graph;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array suitcaseB3 100 float 3;
+#A 0 0.514285 0.523809 0.533332 0.542856 0.542856 0.542856 0.6 0.619047
+0.504761 0.495238 0.485714 0.47619 0.466667 0.809524 0.571429 0.638095
+0.638095 0.647619 0.914286 0.657142 0.657142 0.495239 0.500001 0.809523
+0.819046 0.82857 0.82857 0.838094 0.838094 0.771428 0.466667 0.457143
+0.457143 0.438096 0.438096 0.428572 0.428572 0.609521 0.609521 0.676187
+0.676187 0.68571 0.68571 0.68571 0.68571 0.647616 0.619045 0.599997
+0.847616 0.847616 0.676194 0.66667 0.619049 0.609525 0.609525 0.609525
+0.780951 0.780951 0.761903 0.75238 0.638099 0.857143 0.428571 0.428571
+0.428571 0.447619 0.457142 0.542855 0.552379 0.571426 0.599997 0.619044
+0.619044 0.619044 0.60952 0.60952 0.60952 0.599997 0.742858 0.704763
+0.685716 0.685716 0.685716 0.733334 0.92381 0.809525 0.53334 0.561911
+0.571434 0.580958 0.580958 0.58572 0.590481 0.600005 0.8 0.609529 0.61429
+0.619052 0.628576 0.6381;
+#X coords 0 1 100 0 150 105 1 0 0;
+#X restore 189 281 graph;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array suitcaseB1 100 float 3;
+#A 0 0.371429 0.342857 0.352381 0.361905 0.390476 0.4 0.428572 0.438096
+0.266666 0.304761 0.342856 0.371428 0.4 0.428571 0.457143 0.476191
+0.32381 0.352381 0.380953 0.400001 0.428572 0.438096 0.44762 0.32381
+0.361905 0.390477 0.419048 0.438096 0.476191 0.476191 0.32381 0.361905
+0.390477 0.409524 0.438096 0.457144 0.295238 0.314285 0.352381 0.390476
+0.409524 0.428572 0.44762 0.457143 0.495239 0.523811 0.533334 0.552382
+0.57143 0.352381 0.352381 0.352381 0.371429 0.380953 0.4 0.419048 0.428572
+0.428572 0.352381 0.371429 0.380953 0.4 0.409524 0.419048 0.428572
+0.333333 0.352381 0.361905 0.380953 0.419048 0.438096 0.447619 0.466667
+0.466667 0.47619 0.485714 0.44762 0 0.352381 0.380953 0.390476 0.44762
+0.44762 0.466667 0.380952 0.409524 0.419048 0.438096 0.44762 0.476191
+0.485715 0.504763 0.4 0.419048 0.428572 0.457143 0.466667 0.476191
+0 0;
+#X coords 0 1 100 0 150 105 1 0 0;
+#X restore 189 29 graph;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array suitcaseB4 100 float 3;
+#A 0 0.428571 0.438095 0.452381 0.47619 0.47619 0.495238 0.495237 0.495237
+0.495237 0.495237 0.495237 0.485714 0.485714 0.485714 0.466667 0.466667
+0.466666 0.466666 0.457142 0.457142 0.447618 0.447618 0.438095 0.438095
+0.438095 0.438095 0.438095 0.438095 0.428571 0.428571 0.428571 0.428571
+0.428571 0.428571 0.428571 0.419048 0.419048 0.419048 0.419048 0.419048
+0.438095 0.438095 0.442857 0.447619 0.447619 0.447619 0.457143 0.457143
+0.457143 0.457143 0.438095 0.433333 0.4 0.390476 0.380952 0.352381
+0.342857 0.304762 0.285714 0.266667 0.257143 0.238095 0.228571 0.2
+0.180952 0.142857 0.142857 0.104762 0.0761905 0.047619 0.047619 0.0380952
+0.0380952 0.0380952 0.0380952 0.0380952 0.0380952 0.0380952 0.0380952
+0.0380952 0.0380952 0.0380952 0.0380952 0.0380952 0.0380952 0.0380952
+0.0380952 0.0285714 0.0285714 0.0285714 0.0285714 0.0285714 0.0285714
+0.0285714 0.0285714 0.0285714 0.0285714 0.0285714 0.0285714 0.0285714
+;
+#X coords 0 1 100 0 150 105 1 0 0;
+#X restore 518 29 graph;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array suitcaseB5 100 float 3;
+#A 0 0.438095 0.438095 0.438095 0.438095 0.438095 0.438095 0.438095
+0.438095 0.438095 0.438095 0.438095 0.438095 0.442856 0.447618 0.447618
+0.447618 0.447618 0.447618 0.447618 0.457142 0.457142 0.457142 0.461904
+0.466666 0.466666 0.466666 0.466666 0.466666 0.466666 0.466666 0.466666
+0.466666 0.466666 0.466666 0.457142 0.447618 1.22856 0.628575 0.66667
+0.714288 0.77143 0.790477 0.838095 0.838096 0.838096 0.847619 0.847619
+0.852381 0.857143 0.857143 0.866667 0.87619 0.880952 0.885714 0.885714
+0.895238 0.895238 0.904761 0.914285 0.923808 0.933332 0.942856 0.942856
+0.952379 0.952379 0.961903 0.971428 0.971428 0.971428 0.980952 0.990475
+0.999999 0.999999 1.00952 1.00952 1.01905 1.02857 1.02857 1.03809 1.04762
+1.04762 1.06666 1.06666 1.07619 1.07619 1.08571 1.10476 1.1238 1.13333
+1.14285 1.14285 1.15237 1.1619 1.19047 1.19047 1.19999 1.23809 1.25713
+1.2857 1.29523;
+#X coords 0 1 100 0 150 105 1 0 0;
+#X restore 518 155 graph;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array suitcaseB6 100 float 3;
+#A 0 0.695239 0.685715 0.673017 0.660319 0.638096 0.622223 0.60635
+0.590477 0.580953 0.566667 0.533334 0.514286 0.81905 0.81905 0.81905
+0.81905 0.81905 0.81905 0.81905 0.81905 0.815875 0.812701 0.809526
+0.809526 0.809526 0.809526 0.809526 0.809526 0.809526 0.809526 0.809526
+0.809526 0.809526 0.809526 0.809526 0.809526 0.809526 0.809526 0.809526
+0.809526 0.809526 0.809526 0.809526 0.809526 0.809526 0.809526 0.809526
+0.809526 0.809526 0.809526 0.809526 0.809526 0.809526 0.809526 0.809526
+0.809526 0.809526 0.809526 0.809526 0.809526 0.809526 0.809526 0.809526
+0.809526 0.809526 0.809526 0.809526 0.809526 0.809526 0.809526 0.809526
+0.809526 0.809526 0.809526 0.809526 0.809526 0.809526 0.809526 0.809526
+0.809526 0.809526 0.809526 0.809526 0.809526 0.809526 0.809526 0.809526
+0.809526 0.809526 0.811907 0.814288 0.816669 0.81905 0.821771 0.824492
+0.827213 0.829934 0.832655 0.835377 0.838098;
+#X coords 0 1 100 0 150 105 1 0 0;
+#X restore 518 281 graph;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array suitcaseA2 50 float 3;
+#A 0 0.533333 0.552382 0.580953 0.619048 0.628572 0.657143 0.67619
+0.685713 0.685713 0.685713 0.676189 0.657142 0.657142 0.638094 0.599999
+0.571428 0.571428 0.533333 0.533333 0.533333 0.533333 0.542857 0.571428
+0.619047 0.657142 0.676189 0.695237 0.704761 0.704761 0.704761 0.695237
+0.685713 0.666666 0.638094 0.6 0.6 0.6 0.6 0.6 0.6 0.6 0.619048 0.647619
+0.704761 0.733333 0.75238 0.742856 0.757141 0.761903 0.761904;
+#X coords 0 1 50 0 150 105 1 0 0;
+#X restore 28 155 graph;
+#N canvas 0 23 1115 625 (subpatch) 0;
+#X array suitcaseA1 100 float 3;
+#A 0 0.361905 0.371429 0.390477 0.409524 0.44762 0.485715 0.504763
+0.504763 0.514287 0.409523 0.438095 0.485713 0.495237 0.495237 0.352381
+0.371429 0.4 0.428571 0.457142 0.47619 0.495237 0.4928 0.380952 0.390476
+0.419047 0.428571 0.457142 0.47619 0.495237 0.504761 0.371429 0.4 0.428571
+0.447619 0.466666 0.47619 0.485714 0.495237 0.390476 0.390476 0.4 0.409524
+0.438095 0.447619 0.476191 0.495239 0.5456 0.5536 0.592001 0.36 0.3504
+0.3648 0.380801 0.403201 0.452802 0.491202 0.5104 0.528003 0.528003
+0 0.408 0.425601 0.448001 0.492802 0 0.352 0.3664 0.384001 0.409601
+0.4336 0.48 0.507203 0.515203 0.520003 0.528003 0.529603 0.32 0.344
+0.363201 0.384001 0.390401 0.425602 0.449602 0.470403 0.510403 0.352381
+0.361905 0.371429 0.390476 0.395238 0.409524 0.419048 0.466667 0.485715
+0.409524 0.447619 0.485715 0.533334 0.552382 0.57143;
+#X coords 0 1 100 0 150 105 1 0 0;
+#X restore 28 29 graph;
+#N canvas 0 23 1115 625 (subpatch) 0;
+#X array suitcaseA4 100 float 3;
+#A 0 0.457143 0.457143 0.47619 0.504762 0.552381 0.542857 0.542857
+0.542857 0.542857 0.542857 0.542857 0.542857 0.542857 0.533333 0.533333
+0.533333 0.533333 0.533333 0.533333 0.533333 0.533333 0.514286 0.514286
+0.504762 0.504762 0.495238 0.495238 0.495238 0.495238 0.485714 0.485714
+0.476191 0.466667 0.47619 0.466667 0.466667 0.466667 0.466667 0.47619
+0.495238 0.495238 0.495238 0.495238 0.495238 0.495238 0.495238 0.495238
+0.495238 0.490476 0.485714 0.47619 0.419048 0.409524 0.371429 0.352381
+0.314286 0.285714 0.228571 0.209524 0.180952 0.161905 0.142857 0.133333
+0.114286 0.114286 0.104762 0.097619 0.0285714 0.0190476 0.00952381
+-0.00952381 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0.00952381
+0.00952381 0.0190476 0.0285714;
+#X coords 0 1 100 0 150 105 1 0 0;
+#X restore 358 29 graph;
+#N canvas 0 23 1115 625 (subpatch) 0;
+#X array suitcaseA5 100 float 3;
+#A 0 0.552382 0.542858 0.533334 0.52381 0.514286 0.504762 0.492064
+0.479365 0.466667 0.452381 0.438095 0.434921 0.431746 0.428571 0.409524
+0.409524 0.4 0.4 0.4 0.4 0.419047 0.423809 0.428571 0.438095 0.457143
+0.457143 0.461905 0.466667 0.466667 0.466667 0.457143 0.447619 0.438095
+0.438095 0.447619 0.457143 0.476191 0.485715 0.485715 0.485715 0.485715
+0.476191 0.466667 0.466667 0.466667 0.466667 0.466667 0.457143 0.447619
+0.447619 0.466666 0.476189 0.514285 0.523809 0.647619 0.685715 0.704762
+0.714286 0.714286 0.714286 0.714286 0.695239 0.685715 0.657143 0.628572
+0.590476 0.571428 0.676191 0.72381 0.77143 0.790477 0.809525 0.809525
+0.819049 0.819049 0.819049 0.809525 0.77143 0.704762 0.704762 0.72381
+0.761906 0.790477 0.819049 0.838097 0.89524 0.89524 0.89524 0.876192
+0.742858 0.742858 0.790477 0.819049 0.923811 0.942859 0.971431 0.971431
+0.971431 0.961907 0.914288;
+#X coords 0 1 100 0 150 105 1 0 0;
+#X restore 358 155 graph;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array suitcaseA3 100 float 3;
+#A 0 0.514285 0.523809 0.533332 0.542856 0.542856 0.542856 0.6 0.619047
+0.504761 0.495238 0.485714 0.47619 0.466667 0.809524 0.571429 0.638095
+0.638095 0.647619 0.914286 0.657142 0.657142 0.495239 0.500001 0.809523
+0.819046 0.82857 0.82857 0.838094 0.838094 0.771428 0.466667 0.457143
+0.457143 0.438096 0.438096 0.428572 0.428572 0.609521 0.609521 0.676187
+0.676187 0.68571 0.68571 0.68571 0.68571 0.647616 0.619045 0.599997
+0.847616 0.847616 0.676194 0.66667 0.619049 0.609525 0.609525 0.609525
+0.780951 0.780951 0.761903 0.75238 0.638099 0.857143 0.428571 0.428571
+0.428571 0.447619 0.457142 0.542855 0.552379 0.571426 0.599997 0.619044
+0.619044 0.619044 0.60952 0.60952 0.60952 0.599997 0.742858 0.704763
+0.685716 0.685716 0.685716 0.733334 0.92381 0.809525 0.53334 0.561911
+0.571434 0.580958 0.580958 0.58572 0.590481 0.600005 0.8 0.609529 0.61429
+0.619052 0.628576 0.6381;
+#X coords 0 1 100 0 150 105 1 0 0;
+#X restore 28 281 graph;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array suitcaseA6 100 float 3;
+#A 0 0.457143 0.461905 0.466667 0.471429 0.476191 0.47619 0.481905
+0.487619 0.493333 0.499048 0.504762 0.504762 0.504762 0.507143 0.509524
+0.511905 0.514286 0.514286 0.514286 0.519048 0.533334 0.538096 0.542858
+0.552381 0.557143 0.561905 0.571429 0.571429 0.590477 0.595239 0.600001
+0.609525 0.614287 0.619049 0.628572 0.628572 0.638096 0.638096 0.638096
+0.638096 0.638096 0.638096 0.642858 0.64762 0.64762 0.64762 0.64762
+0.64762 0.64762 0.64762 0.64762 0.64762 0.64762 0.64762 0.64762 0.64762
+0.64762 0.64762 0.64762 0.64762 0.64762 0.64762 0.64762 0.644445 0.641271
+0.638096 0.634922 0.631747 0.628572 0.62381 0.619049 0.614287 0.600001
+0.514286 0.508572 0.502857 0.497143 0.491429 0.485714 0.480952 0.476191
+0.471429 0.466667 0.461905 0.457143 0.452381 0.447619 0.440816 0.434013
+0.427211 0.420408 0.413605 0.406802 0.4 0.390476 0.380952 0.361904
+0.442858 0.435715 0.419048;
+#X coords 0 1 100 0 150 105 1 0 0;
+#X restore 358 281 graph;
+#X obj 28 448 random 6;
+#X obj 138 600 bng 15 250 50 0 \$0-reload empty s:reload 17 7 0 10
+-262144 -1 -1;
+#X obj 138 532 + 1;
+#X floatatom 138 555 5 0 0 0 - - -;
+#X obj 138 577 array_copier suitcaseA;
+#X obj 277 507 + 1;
+#X floatatom 277 530 5 0 0 0 - - -;
+#X obj 277 552 array_copier suitcaseB;
+#X obj 138 489 t a a;
+#X connect 0 0 16 0;
+#X connect 2 0 1 0;
+#X connect 2 1 24 0;
+#X connect 16 0 2 0;
+#X connect 16 0 3 0;
+#X connect 18 0 19 0;
+#X connect 19 0 20 0;
+#X connect 20 0 17 0;
+#X connect 21 0 22 0;
+#X connect 22 0 23 0;
+#X connect 24 0 18 0;
+#X connect 24 1 21 0;
+#X restore 48 226 pd expressions;
+#X obj 88 429 s NOTE;
+#X obj 88 406 spigot;
+#X obj 350 473 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+1;
+#X obj 350 450 loadbang;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array suitcaseA 100 float 3;
+#A 0 0.552382 0.542858 0.533334 0.52381 0.514286 0.504762 0.492064
+0.479365 0.466667 0.452381 0.438095 0.434921 0.431746 0.428571 0.409524
+0.409524 0.4 0.4 0.4 0.4 0.419047 0.423809 0.428571 0.438095 0.457143
+0.457143 0.461905 0.466667 0.466667 0.466667 0.457143 0.447619 0.438095
+0.438095 0.447619 0.457143 0.476191 0.485715 0.485715 0.485715 0.485715
+0.476191 0.466667 0.466667 0.466667 0.466667 0.466667 0.457143 0.447619
+0.447619 0.466666 0.476189 0.514285 0.523809 0.647619 0.685715 0.704762
+0.714286 0.714286 0.714286 0.714286 0.695239 0.685715 0.657143 0.628572
+0.590476 0.571428 0.676191 0.72381 0.77143 0.790477 0.809525 0.809525
+0.819049 0.819049 0.819049 0.809525 0.77143 0.704762 0.704762 0.72381
+0.761906 0.790477 0.819049 0.838097 0.89524 0.89524 0.89524 0.876192
+0.742858 0.742858 0.790477 0.819049 0.923811 0.942859 0.971431 0.971431
+0.971431 0.961907 0.914288;
+#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 4;
+#X obj 138 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.438095 0.438095 0.438095 0.438095 0.438095 0.438095 0.438095
+0.438095 0.438095 0.438095 0.438095 0.438095 0.442856 0.447618 0.447618
+0.447618 0.447618 0.447618 0.447618 0.457142 0.457142 0.457142 0.461904
+0.466666 0.466666 0.466666 0.466666 0.466666 0.466666 0.466666 0.466666
+0.466666 0.466666 0.466666 0.457142 0.447618 1.22856 0.628575 0.66667
+0.714288 0.77143 0.790477 0.838095 0.838096 0.838096 0.847619 0.847619
+0.852381 0.857143 0.857143 0.866667 0.87619 0.880952 0.885714 0.885714
+0.895238 0.895238 0.904761 0.914285 0.923808 0.933332 0.942856 0.942856
+0.952379 0.952379 0.961903 0.971428 0.971428 0.971428 0.980952 0.990475
+0.999999 0.999999 1.00952 1.00952 1.01905 1.02857 1.02857 1.03809 1.04762
+1.04762 1.06666 1.06666 1.07619 1.07619 1.08571 1.10476 1.1238 1.13333
+1.14285 1.14285 1.15237 1.1619 1.19047 1.19047 1.19999 1.23809 1.25713
+1.2857 1.29523;
+#X coords 0 1 100 0 25 25 1 0 0;
+#X restore 26 96 graph;
+#X obj 138 24 tgl 15 0 empty \$0-status-now empty 17 7 0 10 -204786
+-1 -1 0 1;
+#X obj 164 21 r SUITCASE;
+#X obj 48 188 r SUITCASE;
+#X obj 267 122 s SUITCASE;
+#X obj 231 451 s SUITCASE_DONE;
+#X msg 249 329 suitcaseA;
+#X msg 367 337 0;
+#X obj 579 306 loadbang;
+#X text 365 318 stop!;
+#X obj 418 429 s NOTE;
+#X obj 418 406 spigot;
+#X msg 579 329 suitcaseB;
+#X obj 88 306 riff1 1000 3011 500;
+#X obj 418 306 riff1 1000 3012 500;
+#X obj 269 352 bng 15 250 50 0 empty \$0-reload r:reload 17 7 0 10
+-262144 -1 -1;
+#X obj 599 352 bng 15 250 50 0 empty \$0-reload r:reload 17 7 0 10
+-262144 -1 -1;
+#X obj 457 36 r HELLO;
+#X obj 457 59 route 3011;
+#X obj 457 82 unpack f f f f;
+#X floatatom 511 105 5 0 0 0 - - -;
+#X floatatom 457 105 5 0 0 0 - - -;
+#X obj 567 36 r HELLO;
+#X obj 567 82 unpack f f f f;
+#X floatatom 621 105 5 0 0 0 - - -;
+#X floatatom 567 105 5 0 0 0 - - -;
+#X obj 567 59 route 3012;
+#X obj 531 127 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
+-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;
+#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 connect 0 0 31 0;
+#X connect 1 0 24 0;
+#X connect 2 0 5 0;
+#X connect 2 0 23 0;
+#X connect 4 0 22 0;
+#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 32 0;
+#X connect 12 0 11 0;
+#X connect 13 0 12 1;
+#X connect 13 0 29 1;
+#X connect 14 0 13 0;
+#X connect 20 0 7 0;
+#X connect 20 0 17 0;
+#X connect 21 0 10 0;
+#X connect 24 0 31 1;
+#X connect 25 0 32 0;
+#X connect 26 0 30 0;
+#X connect 29 0 28 0;
+#X connect 30 0 32 1;
+#X connect 31 0 12 0;
+#X connect 31 3 2 0;
+#X connect 32 0 29 0;
+#X connect 33 0 24 0;
+#X connect 34 0 30 0;
+#X connect 35 0 36 0;
+#X connect 36 0 37 0;
+#X connect 37 0 39 0;
+#X connect 37 2 38 0;
+#X connect 38 0 45 0;
+#X connect 40 0 44 0;
+#X connect 41 0 43 0;
+#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 48 0 51 0;
+#X connect 49 0 48 0;
+#X connect 50 0 52 1;
+#X connect 51 0 52 0;
+#X connect 52 0 53 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
new file mode 100644
index 0000000..6a4e49c
--- /dev/null
+++ b/puredata/radio_tanker_head.pd
@@ -0,0 +1,236 @@
+#N canvas 126 89 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
+-1 -1;
+#X text 35 318 stop!;
+#X obj 167 249 bng 15 250 50 0 empty empty motivated! 17 7 0 10 -262144
+-1 -1;
+#X msg 251 406 0;
+#X obj 251 429 v \$0-STATE;
+#X msg 164 44 1;
+#X obj 164 67 v \$0-STATE;
+#N canvas 906 89 533 644 world 0;
+#X floatatom 16 78 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;
+#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
+1;
+#X floatatom 110 504 5 0 0 0 stress - -;
+#X obj 238 555 +;
+#X obj 238 502 t a b;
+#X obj 238 326 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+1;
+#X floatatom 238 480 8 0 0 0 - - -;
+#X obj 16 521 >;
+#X floatatom 16 137 5 0 0 0 - - -;
+#X obj 238 375 t b b;
+#X obj 285 416 sel 1 0;
+#X obj 64 164 bng 15 250 50 0 empty empty listen 17 7 0 10 -191407
+-257985 -1;
+#X obj 16 114 resample 1000;
+#X obj 238 578 max 0;
+#X text 109 114 listening speed;
+#X text 56 77 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
+1;
+#X obj 16 451 abs;
+#N canvas 0 50 450 250 (subpatch) 0;
+#X array \$0-stress 100 float 2;
+#X coords 0 3 100 0 200 50 1 0 0;
+#X 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;
+#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
+;
+#X obj 12 100 t a b;
+#X obj 117 77 f;
+#X obj 144 77 + 1;
+#X obj 117 100 mod 100;
+#X obj 12 11 loadbang;
+#X obj 12 77 v \$0-STRESS;
+#X obj 12 123 tabwrite \$0-stress;
+#X msg 78 11 0;
+#X connect 0 0 7 0;
+#X connect 1 0 0 0;
+#X connect 2 0 8 0;
+#X connect 2 1 3 0;
+#X connect 3 0 4 0;
+#X connect 3 0 5 0;
+#X connect 4 0 3 1;
+#X connect 5 0 8 1;
+#X connect 6 0 1 0;
+#X connect 7 0 2 0;
+#X connect 9 0 7 0;
+#X restore 473 100 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
+1;
+#X obj 373 255 metro 50;
+#X obj 373 212 loadbang;
+#X obj 373 278 v \$0-STATE;
+#X obj 373 301 s \$0-status-now;
+#X obj 16 39 r WORLD_ENERGY;
+#X text 378 440 working stress;
+#X text 378 460 resting relax;
+#X msg 304 462 -0.005;
+#X msg 285 439 0.25;
+#X obj 16 210 < 0.4;
+#X connect 0 0 21 0;
+#X connect 1 0 5 0;
+#X connect 1 1 37 0;
+#X connect 2 0 7 0;
+#X connect 3 0 2 1;
+#X connect 4 0 3 0;
+#X connect 5 0 2 0;
+#X connect 7 0 28 0;
+#X connect 8 0 16 0;
+#X connect 9 0 38 0;
+#X connect 11 0 16 1;
+#X connect 12 0 22 0;
+#X connect 13 0 12 0;
+#X connect 13 1 35 0;
+#X connect 14 0 32 0;
+#X connect 15 0 13 0;
+#X connect 16 0 9 0;
+#X connect 16 0 10 0;
+#X connect 17 0 20 0;
+#X connect 17 0 49 0;
+#X connect 18 0 15 0;
+#X connect 18 1 34 0;
+#X connect 19 0 48 0;
+#X connect 19 1 47 0;
+#X connect 21 0 17 0;
+#X connect 22 0 11 0;
+#X connect 22 0 36 0;
+#X connect 28 0 8 0;
+#X connect 30 0 14 0;
+#X connect 32 0 18 0;
+#X connect 34 0 19 0;
+#X connect 35 0 12 1;
+#X connect 37 0 4 0;
+#X connect 37 0 27 0;
+#X connect 39 0 40 0;
+#X connect 40 0 42 0;
+#X connect 41 0 39 0;
+#X connect 42 0 43 0;
+#X connect 44 0 0 0;
+#X connect 47 0 15 0;
+#X connect 48 0 15 0;
+#X connect 49 0 1 0;
+#X restore 167 226 pd world and me;
+#N canvas 514 89 449 454 expressions 0;
+#X obj 22 210 inlet;
+#X obj 22 291 outlet;
+#X obj 22 262 t b a;
+#X obj 224 257 s \$0-word;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array tankerH1 20 float 3;
+#A 0 0.390477 0.485714 0.485714 0.438095 0.342858 0.285715 0.114288
+0.00952661 -0.0857109 -0.180948 -0.257138 -0.295233 -0.333328 -0.333328
+-0.333331 -0.314283 -0.228569 -0.190472 -0.152377 -0.0190446;
+#X coords 0 1 20 0 150 105 1 0 0;
+#X restore 33 40 graph;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array tankerH2 50 float 3;
+#A 0 0.0285712 0 0 0 0 0.666666 0.876189 1.25714 0.0190483 0.0190483
+0.028572 0.0190477 0.0190477 0.0190477 0.0190477 0.0190477 0.0190477
+0.0190477 0.0190477 0.0190477 0.0190477 0.0190477 0.0190477 0.0190477
+0.0190477 0.0190477 0.0190477 0.0190477 0.0190477 0.0190477 0.0190477
+0.0190477 0.0190477 0.0190477 0.0190477 0.0190477 0.0238096 -0.133332
+-0.285712 -1.00952 -0.876184 0.00952381 0.00952381 0.00952381 0.00952381
+0.0571427 0.0666665 0.0761902 0.0761902 0.0761902;
+#X coords 0 1 50 0 150 105 1 0 0;
+#X restore 193 40 graph;
+#X obj 22 239 random 2;
+#X obj 161 348 bng 15 250 50 0 \$0-reload empty s:reload 17 7 0 10
+-262144 -1 -1;
+#X obj 161 280 + 1;
+#X floatatom 161 303 5 0 0 0 - - -;
+#X obj 161 325 array_copier tankerH;
+#X connect 0 0 6 0;
+#X connect 2 0 1 0;
+#X connect 2 1 8 0;
+#X connect 6 0 2 0;
+#X connect 6 0 3 0;
+#X connect 8 0 9 0;
+#X connect 9 0 10 0;
+#X connect 10 0 7 0;
+#X restore 48 226 pd expressions;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array tankerH 20 float 3;
+#A 0 0.390477 0.485714 0.485714 0.438095 0.342858 0.285715 0.114288
+0.00952661 -0.0857109 -0.180948 -0.257138 -0.295233 -0.333328 -0.333328
+-0.333331 -0.314283 -0.228569 -0.190472 -0.152377 -0.0190446;
+#X coords 0 1 20 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 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 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
+;
+#X obj 7 397 loadbang;
+#X obj 164 21 r TANKER_H;
+#X obj 48 187 r TANKER_H;
+#X obj 167 279 s TANKER_H;
+#X obj 231 452 s TANKER_H_DONE;
+#X msg 249 329 tankerH;
+#X obj 88 306 riff1 400 4001 1000;
+#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;
+#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 connect 0 0 24 0;
+#X connect 1 0 23 0;
+#X connect 2 0 5 0;
+#X connect 2 0 22 0;
+#X connect 4 0 21 0;
+#X connect 5 0 6 0;
+#X connect 7 0 8 0;
+#X connect 9 0 4 0;
+#X connect 10 0 24 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 24 1;
+#X connect 24 0 16 0;
+#X connect 24 3 2 0;
+#X connect 25 0 23 0;
+#X connect 26 0 28 0;
+#X connect 27 0 30 0;
+#X connect 28 0 27 0;
+#X connect 29 0 31 1;
+#X connect 30 0 31 0;
+#X connect 31 0 32 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
new file mode 100644
index 0000000..36d05cd
--- /dev/null
+++ b/puredata/radio_tanker_side.pd
@@ -0,0 +1,270 @@
+#N canvas 443 89 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
+-1 -1;
+#X text 35 318 stop!;
+#X obj 167 249 bng 15 250 50 0 empty empty motivated! 17 7 0 10 -262144
+-1 -1;
+#X msg 308 406 0;
+#X obj 308 429 v \$0-STATE;
+#X msg 164 44 1;
+#X obj 164 67 v \$0-STATE;
+#N canvas 906 89 533 644 world 0;
+#X floatatom 16 78 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;
+#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
+1;
+#X floatatom 110 504 5 0 0 0 stress - -;
+#X obj 238 555 +;
+#X obj 238 502 t a b;
+#X obj 238 326 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+1;
+#X floatatom 238 480 8 0 0 0 - - -;
+#X obj 16 521 >;
+#X floatatom 16 137 5 0 0 0 - - -;
+#X obj 238 375 t b b;
+#X obj 285 416 sel 1 0;
+#X obj 64 164 bng 15 250 50 0 empty empty listen 17 7 0 10 -191407
+-257985 -1;
+#X obj 16 114 resample 1000;
+#X obj 238 578 max 0;
+#X text 109 114 listening speed;
+#X text 56 77 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
+1;
+#X obj 16 451 abs;
+#N canvas 0 50 450 250 (subpatch) 0;
+#X array \$0-stress 100 float 2;
+#X coords 0 3 100 0 200 50 1 0 0;
+#X 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;
+#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
+;
+#X obj 12 100 t a b;
+#X obj 117 77 f;
+#X obj 144 77 + 1;
+#X obj 117 100 mod 100;
+#X obj 12 11 loadbang;
+#X obj 12 77 v \$0-STRESS;
+#X obj 12 123 tabwrite \$0-stress;
+#X msg 78 11 0;
+#X connect 0 0 7 0;
+#X connect 1 0 0 0;
+#X connect 2 0 8 0;
+#X connect 2 1 3 0;
+#X connect 3 0 4 0;
+#X connect 3 0 5 0;
+#X connect 4 0 3 1;
+#X connect 5 0 8 1;
+#X connect 6 0 1 0;
+#X connect 7 0 2 0;
+#X connect 9 0 7 0;
+#X restore 473 100 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
+1;
+#X obj 373 255 metro 50;
+#X obj 373 212 loadbang;
+#X obj 373 278 v \$0-STATE;
+#X obj 373 301 s \$0-status-now;
+#X obj 16 39 r WORLD_ENERGY;
+#X obj 16 210 < 0.3;
+#X text 378 440 working stress;
+#X text 378 460 resting relax;
+#X msg 304 462 -0.005;
+#X msg 285 439 0.05;
+#X connect 0 0 21 0;
+#X connect 1 0 5 0;
+#X connect 1 1 37 0;
+#X connect 2 0 7 0;
+#X connect 3 0 2 1;
+#X connect 4 0 3 0;
+#X connect 5 0 2 0;
+#X connect 7 0 28 0;
+#X connect 8 0 16 0;
+#X connect 9 0 38 0;
+#X connect 11 0 16 1;
+#X connect 12 0 22 0;
+#X connect 13 0 12 0;
+#X connect 13 1 35 0;
+#X connect 14 0 32 0;
+#X connect 15 0 13 0;
+#X connect 16 0 9 0;
+#X connect 16 0 10 0;
+#X connect 17 0 20 0;
+#X connect 17 0 45 0;
+#X connect 18 0 15 0;
+#X connect 18 1 34 0;
+#X connect 19 0 49 0;
+#X connect 19 1 48 0;
+#X connect 21 0 17 0;
+#X connect 22 0 11 0;
+#X connect 22 0 36 0;
+#X connect 28 0 8 0;
+#X connect 30 0 14 0;
+#X connect 32 0 18 0;
+#X connect 34 0 19 0;
+#X connect 35 0 12 1;
+#X connect 37 0 4 0;
+#X connect 37 0 27 0;
+#X connect 39 0 40 0;
+#X connect 40 0 42 0;
+#X connect 41 0 39 0;
+#X connect 42 0 43 0;
+#X connect 44 0 0 0;
+#X connect 45 0 1 0;
+#X connect 48 0 15 0;
+#X connect 49 0 15 0;
+#X restore 167 226 pd world and me;
+#N canvas 514 89 673 371 expressions 1;
+#X obj 22 180 inlet;
+#X obj 22 261 outlet;
+#X obj 22 232 t b a;
+#X obj 224 227 s \$0-word;
+#X obj 161 318 bng 15 250 50 0 \$0-reload empty s:reload 17 7 0 10
+-262144 -1 -1;
+#X obj 161 250 + 1;
+#X floatatom 161 273 5 0 0 0 - - -;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array tankerS3 50 float 3;
+#A 0 0.780952 0.561905 0.361905 0.00952381 0.00952381 0.00952381 0.00952381
+0.00952381 0.00952381 5.96046e-08 0 0.723809 0.580952 0.361905 5.96046e-08
+5.96046e-08 5.96046e-08 0.87619 0.457143 0.285714 0.00952381 0.0190476
+0.00952381 0.00952381 0.00952381 0.00952381 0.00952381 0.00952381 0.828571
+0.542857 0.304762 0.00952387 0.0190476 0.0190476 0.0190476 0.0190476
+5.96046e-08 5.96046e-08 0.87619 0.552381 0.304762 0.00952381 0.00952381
+0.0190476 0.0190476 0.0190476 0.0190476 0.0190476 0.0190476 0.0190476
+;
+#X coords 0 1 50 0 150 105 1 0 0;
+#X restore 333 38 graph;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array tankerS2 50 float 3;
+#A 0 0.00952315 0.00952315 0.457143 0.457143 0.00952315 0.00952315
+0.00952315 0.00952315 0.00476122 -7.15256e-07 -7.15256e-07 -7.15256e-07
+-7.15256e-07 -7.15256e-07 -7.15256e-07 0.295238 0.295238 -7.15256e-07
+-7.15256e-07 -7.15256e-07 -7.15256e-07 -7.15256e-07 -7.15256e-07 -7.15256e-07
+0.00952381 0.6 0.6 -7.15256e-07 -7.15256e-07 -7.15256e-07 -7.15256e-07
+-7.15256e-07 -7.15256e-07 0.809524 0.809524 -7.15256e-07 -7.15256e-07
+-7.15256e-07 -7.15256e-07 -7.15256e-07 -7.15256e-07 0.00952381 0.590476
+0.6 -7.15256e-07 -7.15256e-07 -7.15256e-07 -7.15256e-07 -7.15256e-07
+-7.15256e-07;
+#X coords 0 1 50 0 150 105 1 0 0;
+#X restore 173 38 graph;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array tankerS1 50 float 3;
+#A 0 0.019044 0.019044 0.0285679 0.0380918 0.0476156 0.0571395 0.0666634
+0.0857111 0.104759 0.13333 0.171426 0.199998 0.247617 0.285712 0.333332
+0.380951 0.409523 0.466666 0.504761 0.542857 0.580952 0.61905 0.666669
+0.704765 0.752384 0.790479 0.828575 0.885714 0.914286 0.980956 1.04762
+1.13333 1.2 0.00952387 0.00952387 0.00952387 0.00952387 0.00952387
+0.00952387 0.00952387 0.00952387 0.00952387 0.00952387 0.00952387 0.00952387
+0.00952387 0.00952387 0.00952387 0.00952387 0.00952387;
+#X coords 0 1 50 0 150 105 1 0 0;
+#X restore 13 38 graph;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array tankerS4 50 float 3;
+#A 0 0.0190476 0.0190476 0.0285714 0.0571426 0.0952376 0.180951 0.438095
+3.57628e-07 3.57628e-07 3.57628e-07 3.57628e-07 3.57628e-07 0.00952375
+0.038095 0.0666662 0.0952375 0.133332 0.190475 0.514286 3.57628e-07
+3.57628e-07 3.57628e-07 0.00952411 0.00952411 0.00952411 0.0190479
+0.0190479 0.12381 0.219048 0.533333 0.0380952 0.0380952 0.0285741 0.0285716
+0.0285716 0.0285716 0.0285716 0.0285716 0.0285716 0.0761904 0.171428
+0.247619 0.295236 0.609524 0.0285716 0.0285716 0.0285716 0.0285716
+0.0285716 0.0285716;
+#X coords 0 1 50 0 150 105 1 0 0;
+#X restore 493 38 graph;
+#X obj 161 295 array_copier tankerS;
+#X obj 22 209 count 4;
+#X connect 0 0 12 0;
+#X connect 2 0 1 0;
+#X connect 2 1 5 0;
+#X connect 5 0 6 0;
+#X connect 6 0 11 0;
+#X connect 11 0 4 0;
+#X connect 12 0 2 0;
+#X connect 12 0 3 0;
+#X restore 48 226 pd expressions;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array tankerS 50 float 3;
+#A 0 0.019044 0.019044 0.0285679 0.0380918 0.0476156 0.0571395 0.0666634
+0.0857111 0.104759 0.13333 0.171426 0.199998 0.247617 0.285712 0.333332
+0.380951 0.409523 0.466666 0.504761 0.542857 0.580952 0.61905 0.666669
+0.704765 0.752384 0.790479 0.828575 0.885714 0.914286 0.980956 1.04762
+1.13333 1.2 0.00952387 0.00952387 0.00952387 0.00952387 0.00952387
+0.00952387 0.00952387 0.00952387 0.00952387 0.00952387 0.00952387 0.00952387
+0.00952387 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 23 138 hradio 15 1 0 4 empty \$0-word empty 0 -8 0 10 -204786
+-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;
+#X obj 88 429 s NOTE;
+#X obj 88 406 spigot;
+#X obj 7 420 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 1
+;
+#X obj 7 397 loadbang;
+#X obj 320 352 bng 15 250 50 0 empty \$0-reload r:reload 17 7 0 10
+-262144 -1 -1;
+#X obj 164 21 r TANKER_S;
+#X obj 48 187 r TANKER_S;
+#X obj 167 269 s TANKER_S;
+#X msg 300 329 tankerS;
+#X obj 288 452 s TANKER_S_DONE;
+#X obj 88 306 riff1_random 10 1041 600 1000;
+#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;
+#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 connect 0 0 25 0;
+#X connect 1 0 23 0;
+#X connect 2 0 5 0;
+#X connect 2 0 24 0;
+#X connect 4 0 22 0;
+#X connect 5 0 6 0;
+#X connect 7 0 8 0;
+#X connect 9 0 4 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 23 0;
+#X connect 20 0 7 0;
+#X connect 20 0 13 0;
+#X connect 21 0 10 0;
+#X connect 23 0 25 1;
+#X connect 25 0 16 0;
+#X connect 25 3 2 0;
+#X connect 26 0 28 0;
+#X connect 27 0 30 0;
+#X connect 28 0 27 0;
+#X connect 29 0 31 1;
+#X connect 30 0 31 0;
+#X connect 31 0 32 0;
+#X coords 0 -1 1 1 100 150 2 5 5;
diff --git a/puredata/radio_yellow.pd b/puredata/radio_yellow.pd
new file mode 100644
index 0000000..0991ef7
--- /dev/null
+++ b/puredata/radio_yellow.pd
@@ -0,0 +1,346 @@
+#N canvas 686 89 701 521 10;
+#X obj 88 24 tgl 15 0 empty \$0-status-now empty 17 7 0 10 -257985
+-1 -1 1 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 906 89 533 644 world 1;
+#X floatatom 16 78 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;
+#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
+1;
+#X floatatom 110 504 5 0 0 0 stress - -;
+#X obj 238 555 +;
+#X obj 238 502 t a b;
+#X obj 238 326 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+1;
+#X floatatom 238 480 8 0 0 0 - - -;
+#X obj 16 521 >;
+#X floatatom 16 137 5 0 0 0 - - -;
+#X obj 238 375 t b b;
+#X obj 285 416 sel 1 0;
+#X obj 64 164 bng 15 250 50 0 empty empty listen 17 7 0 10 -191407
+-257985 -1;
+#X obj 16 114 resample 1000;
+#X obj 238 578 max 0;
+#X text 109 114 listening speed;
+#X text 56 77 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
+1;
+#X obj 16 451 abs;
+#N canvas 0 50 450 250 (subpatch) 0;
+#X array \$0-stress 100 float 2;
+#X coords 0 3 100 0 200 50 1 0 0;
+#X 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;
+#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
+;
+#X obj 12 100 t a b;
+#X obj 117 77 f;
+#X obj 144 77 + 1;
+#X obj 117 100 mod 100;
+#X obj 12 11 loadbang;
+#X obj 12 77 v \$0-STRESS;
+#X obj 12 123 tabwrite \$0-stress;
+#X msg 78 11 0;
+#X connect 0 0 7 0;
+#X connect 1 0 0 0;
+#X connect 2 0 8 0;
+#X connect 2 1 3 0;
+#X connect 3 0 4 0;
+#X connect 3 0 5 0;
+#X connect 4 0 3 1;
+#X connect 5 0 8 1;
+#X connect 6 0 1 0;
+#X connect 7 0 2 0;
+#X connect 9 0 7 0;
+#X restore 473 100 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
+1;
+#X obj 373 255 metro 50;
+#X obj 373 212 loadbang;
+#X obj 373 278 v \$0-STATE;
+#X obj 373 301 s \$0-status-now;
+#X obj 16 39 r WORLD_ENERGY;
+#X text 378 440 working stress;
+#X text 378 460 resting relax;
+#X msg 304 462 -0.005;
+#X msg 285 439 0.002;
+#X obj 16 210 < 0.8;
+#X connect 0 0 21 0;
+#X connect 1 0 5 0;
+#X connect 1 1 37 0;
+#X connect 2 0 7 0;
+#X connect 3 0 2 1;
+#X connect 4 0 3 0;
+#X connect 5 0 2 0;
+#X connect 7 0 28 0;
+#X connect 8 0 16 0;
+#X connect 9 0 38 0;
+#X connect 11 0 16 1;
+#X connect 12 0 22 0;
+#X connect 13 0 12 0;
+#X connect 13 1 35 0;
+#X connect 14 0 32 0;
+#X connect 15 0 13 0;
+#X connect 16 0 9 0;
+#X connect 16 0 10 0;
+#X connect 17 0 20 0;
+#X connect 17 0 49 0;
+#X connect 18 0 15 0;
+#X connect 18 1 34 0;
+#X connect 19 0 48 0;
+#X connect 19 1 47 0;
+#X connect 21 0 17 0;
+#X connect 22 0 11 0;
+#X connect 22 0 36 0;
+#X connect 28 0 8 0;
+#X connect 30 0 14 0;
+#X connect 32 0 18 0;
+#X connect 34 0 19 0;
+#X connect 35 0 12 1;
+#X connect 37 0 4 0;
+#X connect 37 0 27 0;
+#X connect 39 0 40 0;
+#X connect 40 0 42 0;
+#X connect 41 0 39 0;
+#X connect 42 0 43 0;
+#X connect 44 0 0 0;
+#X connect 47 0 15 0;
+#X connect 48 0 15 0;
+#X connect 49 0 1 0;
+#X restore 274 58 pd world and me;
+#N canvas 996 89 443 806 expressions 0;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array yellowA1 50 float 3;
+#A 0 0.266667 0.285714 0.295238 0.32381 0.352381 0.371429 0.409525
+0.2 0.228572 0.257143 0.276191 0.285715 0.314286 0.32381 0.352382 0.37143
+0.390477 0.238095 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0.171429 0.209524 0.257143
+0.276191 0.304763 0.333334 0.342858 -0.00952393 -0.00952393 -0.00952393
+-0.00952393 -0.00952393 -0.00952393 -0.00952393 -0.00952393 -0.00952393
+-0.00952393 -0.00952393;
+#X coords 0 1 50 0 150 105 1 0 0;
+#X restore 19 425 graph;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array yellowB1 50 float 3;
+#A 0 0.685715 0.723811 0.800002 0.485714 0.519047 0.552381 0.580953
+0.609524 0.626191 0.642858 0.659525 0.676191 0.685715 0.399999 0.495238
+0.533333 0.571429 0.604762 0.638096 0.653969 0.669842 0.685715 0.695239
+0.704763 0.561905 0.666667 0.704763 0.714287 0.266665 0.323808 0.35238
+0.366666 0.380951 0.399999 0.423809 0.933336 0.952384 0.957145 0.961907
+0.609524 0.628572 0.47619 0.523809 0.523809 0.523809 0.438095 0.457142
+0.457142 0 0.361904;
+#X coords 0 1 50 0 150 105 1 0 0;
+#X restore 179 425 graph;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array yellowB2 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 150 105 1 0 0;
+#X restore 179 295 graph;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array yellowB3 50 float 3;
+#A 0 0.742857 0.580951 0.466664 0.352378 0.276187 0.223806 0.885714
+0.552379 0.409521 0.352378 0.257139 0.20952 0.123805 0.0857093 0.914286
+0.599998 0.523807 0.447616 0.390473 0.323806 0.257139 0.20952 0.133329
+0.971429 0.723808 0.647618 0.561903 0.485712 0.371425 0.323806 0.247615
+0.223805 0.171424 0.114281 0.0857093 0.0285661 0.961905 0.62857 0.552379
+0.371426 0.304759 0.238092 0.123805 0.895238 0.657142 0.542856 0.476189
+0.409522 0.376188 0.0952342;
+#X coords 0 1 50 0 150 105 1 0 0;
+#X restore 179 165 graph;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array yellowA2 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 150 105 1 0 0;
+#X restore 19 295 graph;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array yellowB4 50 float 3;
+#A 0 0.0857139 0.104762 0.104762 0.0952381 0.0857142 0.0666665 0.0571426
+0.028571 -0.0190483 -0.0857154 -0.0857154 -0.0476199 -0.0190483 0.0190471
+0.0476187 0.0571426 0.0571426 0.028571 -0.0380961 -0.104763 -0.114287
+-0.104763 -0.0666677 -0.0285722 0.0190471 0.0761904 0.0952381 0.0952381
+-0.00952446 -0.0571438 -0.0666677 -0.0761915 -0.0761915 -0.0761915
+-0.0761915 -0.0666677 -0.0285722 0.0380949 0.0761904 0.133334 0.133334
+0.114286 0.0571426 -0.0380961 -0.0571438 -0.0571438 -0.0666677 -0.0571438
+-0.0285722 0.0761904;
+#X coords 0 1 50 0 150 105 1 0 0;
+#X restore 179 35 graph;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array yellowA4 50 float 3;
+#A 0 0.514288 0.552383 0.552383 0.552383 0.552383 0.552383 0.552383
+0.561907 0.561907 0.561907 0.571431 0.571431 0.571431 0.571431 0.571431
+0.571431 0.571431 0.571431 0.571431 0.571431 0.571431 0.571431 0.571431
+0.571431 0.571431 0.571431 0.571431 0.571431 0.571431 0.571431 0.571431
+0.571431 0.571431 0.566669 0.561907 0.561907 0.561907 0.561907 0.561907
+0.561907 0.561907 0.561907 0.561907 0.561907 0.561907 0.561907 0.561907
+0.561907 0.561907 0.561907;
+#X coords 0 1 50 0 150 105 1 0 0;
+#X restore 19 35 graph;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array yellowA3 50 float 3;
+#A 0 0.819048 0.657143 -0.0190476 -0.0190476 -0.0190476 -0.0190476
+-0.0190476 0.92381 0.761905 -0.0285714 -0.0285714 -0.0285714 -0.0285714
+-0.0285714 -0.0285714 -0.0285714 -0.0285714 0.914286 0.723809 -0.0285714
+-0.0285714 -0.0285714 -0.0285714 -0.0285714 -0.0285714 -0.0285714 0.961905
+0.809524 -0.0285714 -0.0285714 -0.0285714 -0.0285714 -0.0285714 -0.0285714
+-0.0285714 0.971429 0.87619 -0.0190476 -0.0285714 -0.0285714 -0.0285714
+-0.0285714 0.904762 0.723809 -0.0285714 -0.0285714 -0.0285714 -0.0285714
+-0.0285714 0;
+#X coords 0 1 50 0 150 105 1 0 0;
+#X restore 19 165 graph;
+#X obj 19 571 inlet;
+#X obj 19 652 outlet;
+#X obj 19 623 t b a;
+#X obj 221 618 s \$0-word;
+#X obj 129 752 bng 15 250 50 0 \$0-reload empty s:reload 17 7 0 10
+-262144 -1 -1;
+#X obj 129 684 + 1;
+#X floatatom 129 707 5 0 0 0 - - -;
+#X obj 268 659 + 1;
+#X floatatom 268 682 5 0 0 0 - - -;
+#X obj 129 641 t a a;
+#X obj 19 600 random 4;
+#X obj 129 729 array_copier yellowA;
+#X obj 268 704 array_copier yellowB;
+#X connect 8 0 18 0;
+#X connect 10 0 9 0;
+#X connect 10 1 17 0;
+#X connect 13 0 14 0;
+#X connect 14 0 19 0;
+#X connect 15 0 16 0;
+#X connect 16 0 20 0;
+#X connect 17 0 13 0;
+#X connect 17 1 15 0;
+#X connect 18 0 10 0;
+#X connect 18 0 11 0;
+#X connect 19 0 12 0;
+#X restore 48 225 pd expressions;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array yellowA 50 float 3;
+#A 0 0.266667 0.285714 0.295238 0.32381 0.352381 0.371429 0.409525
+0.2 0.228572 0.257143 0.276191 0.285715 0.314286 0.32381 0.352382 0.37143
+0.390477 0.238095 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0.171429 0.209524 0.257143
+0.276191 0.304763 0.333334 0.342858 -0.00952393 -0.00952393 -0.00952393
+-0.00952393 -0.00952393 -0.00952393 -0.00952393 -0.00952393 -0.00952393
+-0.00952393 -0.00952393;
+#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;
+#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;
+#X obj 48 188 r YELLOW;
+#X obj 274 111 s YELLOW;
+#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
+-1 -1;
+#X text 35 318 stop!;
+#X msg 251 406 0;
+#X obj 251 429 v \$0-STATE;
+#X obj 88 429 s NOTE;
+#X obj 88 406 spigot;
+#X obj 350 473 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+1;
+#X obj 350 450 loadbang;
+#X msg 367 337 0;
+#X obj 579 306 loadbang;
+#X text 365 318 stop!;
+#X obj 418 429 s NOTE;
+#X obj 418 406 spigot;
+#X obj 269 352 bng 15 250 50 0 empty \$0-reload r:reload 17 7 0 10
+-262144 -1 -1;
+#X obj 599 352 bng 15 250 50 0 empty \$0-reload r:reload 17 7 0 10
+-262144 -1 -1;
+#X obj 88 306 riff1 600 3020 500;
+#X obj 418 306 riff1 600 3021 500;
+#X msg 249 329 yellowA;
+#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.685715 0.723811 0.800002 0.485714 0.519047 0.552381 0.580953
+0.609524 0.626191 0.642858 0.659525 0.676191 0.685715 0.399999 0.495238
+0.533333 0.571429 0.604762 0.638096 0.653969 0.669842 0.685715 0.695239
+0.704763 0.561905 0.666667 0.704763 0.714287 0.266665 0.323808 0.35238
+0.366666 0.380951 0.399999 0.423809 0.933336 0.952384 0.957145 0.961907
+0.609524 0.628572 0.47619 0.523809 0.523809 0.523809 0.438095 0.457142
+0.457142 0 0.361904;
+#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;
+#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 connect 1 0 11 0;
+#X connect 2 0 3 0;
+#X connect 4 0 1 0;
+#X connect 5 0 30 0;
+#X connect 5 0 29 0;
+#X connect 9 0 2 0;
+#X connect 9 0 8 0;
+#X connect 10 0 5 0;
+#X connect 12 0 29 0;
+#X connect 13 0 31 0;
+#X connect 14 0 16 0;
+#X connect 14 0 33 0;
+#X connect 16 0 17 0;
+#X connect 19 0 18 0;
+#X connect 20 0 19 1;
+#X connect 20 0 26 1;
+#X connect 21 0 20 0;
+#X connect 22 0 30 0;
+#X connect 23 0 32 0;
+#X connect 26 0 25 0;
+#X connect 27 0 31 0;
+#X connect 28 0 32 0;
+#X connect 29 0 19 0;
+#X connect 29 3 14 0;
+#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 36 0 39 0;
+#X connect 37 0 36 0;
+#X connect 38 0 40 1;
+#X connect 39 0 40 0;
+#X connect 40 0 41 0;
+#X coords 0 -1 1 1 100 150 2 5 5;
diff --git a/puredata/radio_yellowhose.pd b/puredata/radio_yellowhose.pd
new file mode 100644
index 0000000..3bf1d7d
--- /dev/null
+++ b/puredata/radio_yellowhose.pd
@@ -0,0 +1,419 @@
+#N canvas 1 89 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 906 89 533 644 world 1;
+#X floatatom 16 78 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;
+#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
+1;
+#X floatatom 110 504 5 0 0 0 stress - -;
+#X obj 238 555 +;
+#X obj 238 502 t a b;
+#X obj 238 326 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+1;
+#X floatatom 238 480 8 0 0 0 - - -;
+#X obj 16 521 >;
+#X floatatom 16 137 5 0 0 0 - - -;
+#X obj 238 375 t b b;
+#X obj 285 416 sel 1 0;
+#X obj 64 164 bng 15 250 50 0 empty empty listen 17 7 0 10 -191407
+-257985 -1;
+#X obj 16 114 resample 1000;
+#X obj 238 578 max 0;
+#X text 109 114 listening speed;
+#X text 56 77 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
+1;
+#X obj 16 451 abs;
+#N canvas 0 50 450 250 (subpatch) 0;
+#X array \$0-stress 100 float 2;
+#X coords 0 3 100 0 200 50 1 0 0;
+#X 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;
+#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
+;
+#X obj 12 100 t a b;
+#X obj 117 77 f;
+#X obj 144 77 + 1;
+#X obj 117 100 mod 100;
+#X obj 12 11 loadbang;
+#X obj 12 77 v \$0-STRESS;
+#X obj 12 123 tabwrite \$0-stress;
+#X msg 78 11 0;
+#X connect 0 0 7 0;
+#X connect 1 0 0 0;
+#X connect 2 0 8 0;
+#X connect 2 1 3 0;
+#X connect 3 0 4 0;
+#X connect 3 0 5 0;
+#X connect 4 0 3 1;
+#X connect 5 0 8 1;
+#X connect 6 0 1 0;
+#X connect 7 0 2 0;
+#X connect 9 0 7 0;
+#X restore 473 100 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
+1;
+#X obj 373 255 metro 50;
+#X obj 373 212 loadbang;
+#X obj 373 278 v \$0-STATE;
+#X obj 373 301 s \$0-status-now;
+#X obj 16 39 r WORLD_ENERGY;
+#X text 378 440 working stress;
+#X text 378 460 resting relax;
+#X msg 304 462 -0.005;
+#X msg 285 439 0.05;
+#X obj 16 210 < 0.6;
+#X connect 0 0 21 0;
+#X connect 1 0 5 0;
+#X connect 1 1 37 0;
+#X connect 2 0 7 0;
+#X connect 3 0 2 1;
+#X connect 4 0 3 0;
+#X connect 5 0 2 0;
+#X connect 7 0 28 0;
+#X connect 8 0 16 0;
+#X connect 9 0 38 0;
+#X connect 11 0 16 1;
+#X connect 12 0 22 0;
+#X connect 13 0 12 0;
+#X connect 13 1 35 0;
+#X connect 14 0 32 0;
+#X connect 15 0 13 0;
+#X connect 16 0 9 0;
+#X connect 16 0 10 0;
+#X connect 17 0 20 0;
+#X connect 17 0 49 0;
+#X connect 18 0 15 0;
+#X connect 18 1 34 0;
+#X connect 19 0 48 0;
+#X connect 19 1 47 0;
+#X connect 21 0 17 0;
+#X connect 22 0 11 0;
+#X connect 22 0 36 0;
+#X connect 28 0 8 0;
+#X connect 30 0 14 0;
+#X connect 32 0 18 0;
+#X connect 34 0 19 0;
+#X connect 35 0 12 1;
+#X connect 37 0 4 0;
+#X connect 37 0 27 0;
+#X connect 39 0 40 0;
+#X connect 40 0 42 0;
+#X connect 41 0 39 0;
+#X connect 42 0 43 0;
+#X connect 44 0 0 0;
+#X connect 47 0 15 0;
+#X connect 48 0 15 0;
+#X connect 49 0 1 0;
+#X restore 283 57 pd world and me;
+#N canvas 68 145 1159 537 expressions 0;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array yhoseA5 50 float 3;
+#A 0 0.47619 0.495238 0.514286 0.504762 0.495238 0.304762 0.27619 0.257142
+0.238095 0.219047 0.199999 0.190475 0.180951 0.180951 0.190475 0.542857
+0.542857 0.552381 0.561905 0.533333 0.533333 0.35238 0.314284 0.285713
+0.266665 0.247617 0.247617 0.257141 0.30476 0.504762 0.504762 0.533334
+0.542858 0.542858 0.495238 0.285712 0.238093 0.238093 0.238093 0.247617
+0.323809 0.447619 0.466667 0.476191 0.4 0.209523 0.161903 0.152379
+0.142855 0.142855;
+#X coords 0 1 50 0 150 105 1 0 0;
+#X restore 675 52 graph;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array yhoseA1 50 float 3;
+#A 0 0.733333 0.0285715 0.0285715 0.0253969 0.0222223 0.0190477 0.761905
+0.00952381 0.00952381 0.00952381 0.00952381 0.00952381 0.838095 0.00952381
+0.00952381 0.00952381 0.00952363 0.00952363 0.00952363 0.00952363 0.00952363
+0.838095 0.00952381 0.00952363 0.00952363 0.00952363 -5.96046e-08 -5.96046e-08
+-5.96046e-08 -5.96046e-08 0.838095 0.00952381 0.838095 -5.96046e-08
+0.00952381 0.00952381 0.0190477 0.0190477 0.857143 0.0285715 0.0380954
+0.0380954 0.0380954 0.0380952 0.866667 0.0380954 0.0380954 0.0380954
+0.0380954 0.0190477;
+#X coords 0 1 50 0 150 105 1 0 0;
+#X restore 35 52 graph;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array yhoseA3 50 float 3;
+#A 0 0.00952369 0.657143 0.00952369 0.00952369 0.00952369 0.590476
+0.00952369 0.00952369 0.00952369 0.00952369 0.00952369 0.00952369 0.00952369
+0.542857 0.542857 0.00952369 0.00952369 0.0190476 0.0190476 0.0190476
+0.0190476 0.0190476 0.0190476 0.704762 0.704762 0.0190476 0.0190476
+0.0190476 0.0190476 0.619048 0.619048 0.0190476 0.0190476 0.52381 0.00952369
+0.00952369 0.00952369 0.00952369 0.00952369 0.67619 0.00952369 0.00952369
+0.00952369 0.00952369 0.00952369 0.00952369 0.733333 0.00952381 0.00952369
+0.00952369;
+#X coords 0 1 50 0 150 105 1 0 0;
+#X restore 355 52 graph;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array yhoseA2 50 float 3;
+#A 0 0.00952369 0.657143 0.00952369 0.00952369 0.00952369 0.590476
+0.00952369 0.00952369 0.00952369 0.00952369 0.00952369 0.00952369 0.00952369
+0.542857 0.542857 0.00952369 0.00952369 0.0190476 0.0190476 0.0190476
+0.0190476 0.0190476 0.0190476 0.704762 0.704762 0.0190476 0.0190476
+0.0190476 0.0190476 0.619048 0.619048 0.0190476 0.0190476 0.52381 0.00952369
+0.00952369 0.00952369 0.00952369 0.00952369 0.67619 0.00952369 0.00952369
+0.00952369 0.00952369 0.00952369 0.00952369 0.733333 0.00952381 0.00952369
+0.00952369;
+#X coords 0 1 50 0 150 105 1 0 0;
+#X restore 195 52 graph;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array yhoseA4 100 float 3;
+#A 0 0.00952381 0.00476211 0.00476211 0.514286 0.4 0.371429 0.347619
+-0.00952297 2.38419e-07 2.38419e-07 0.00476193 0.00476193 0.00476193
+0.00476193 0.00476193 0.276191 0.347619 0.27619 0.0190475 0.0190475
+0.0190475 0.0190475 0.0190475 0.0190475 0.0190475 0.0190475 0.0190475
+0.0190475 0.304762 0.32381 0.400001 0.471429 0.771429 0.00952339 0.00952339
+0.00952339 0.00952339 0.00952339 0.00952339 0.00952339 0.595238 0.266667
+0.3 0.00952369 0.00952369 0.00952369 0.00952369 0.00952369 0.00952369
+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 150 105 1 0 0;
+#X restore 515 52 graph;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array yhoseB2 100 float 3;
+#A 0 0.380952 0.380952 0.380952 0.371428 0.371428 0.371428 0.361905
+0.361905 0.361905 0.352381 0.352381 0.352381 0.352381 0.352381 0.352381
+0.352381 0.352381 0.352381 0.352381 0.352381 0.352381 0.342857 0.342857
+0.342857 0.333334 0.32381 0.314287 0.295239 0.285716 0.266668 0.247621
+0.21905 0.190479 0.142861 0.123814 0.0761958 0.0666722 0.0190541 0.00953043
+0.00953043 0.00953043 6.79493e-06 6.79493e-06 -0.00951684 -0.00951684
+-0.00951684 -0.00951684 -0.00951684 -0.00951684 -0.00951684 -0.00951684
+-0.00951684 -0.00951684 -0.00951684 -0.00951684 -0.00951684 -0.00951684
+-0.00951684 -0.00951684 0.390476 0.390476 0.390476 0.390476 0.380952
+0.380952 0.380952 0.380952 0.380952 0.361905 0.361905 0.361905 0.361905
+0.352381 0.352381 0.352381 0.352381 0.333334 0.314287 0.276192 0.247621
+0.190479 0.152385 0.0761958 0.0666722 0.0571486 0.0476249 0.0381013
+0.0285777 0.0238159 0.0190541 0.0190541 0.0190541 0.0190541 0.0190541
+0.0190541 0.0190541 0.0190541 0.0190541 0.0190541 0.0190541;
+#X coords 0 1 100 0 150 105 1 0 0;
+#X restore 195 179 graph;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array yhoseB1 50 float 3;
+#A 0 0.638095 0.580953 0.514287 0.457144 0.361907 0.314288 0.228574
+0.180955 0.152384 0.152384 0.14286 0.133337 0.114289 0.104765 0.104765
+0.104765 0.104765 0.638096 0.552382 0.504763 0.457144 0.371431 0.304765
+0.228575 0.19048 0.152385 0.133337 0.133337 0.133337 0.123813 0.11429
+0.542858 0.466668 0.380954 0.238098 0.209527 0.190479 0.171432 0.161908
+0.104765 0.0761942 0.0476229 0.0285754 0.533334 0.390477 0.266669 0.152384
+0.0666699 0.0380987 0.0380987;
+#X coords 0 1 50 0 150 105 1 0 0;
+#X restore 35 179 graph;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array yhoseB4 50 float 3;
+#A 0 0.361905 0.457143 0.552381 0.571429 0.561905 0.438095 0.371429
+0.314286 0.2 0.0666667 0.0380952 0.00952381 0.00952381 0.00952381 0.00952381
+0.342857 0.4 0.552381 0.6 0.552381 0.419048 0.352381 0.295238 0.228571
+0.152381 0.00952381 0.00952381 0.0190476 0.0190476 0.0190476 0.0190476
+0.0285714 0.00952381 0.0285714 0.409524 0.504762 0.552381 0.6 0.533333
+0.4 0.304762 0.238095 0.219048 0 0 0 -0.0190476 -0.00952381 -0.00952381
+-0.0190476;
+#X coords 0 1 50 0 150 105 1 0 0;
+#X restore 515 179 graph;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array yhoseB3 50 float 3;
+#A 0 -1.78814e-07 0.27619 -1.78814e-07 -1.78814e-07 -1.78814e-07 0.00952369
+0.00952369 0.00952369 0.00952369 0.00952369 0.00952369 0.457143 0.00952369
+0.00952369 0.00952369 0.00952369 0.00952369 0.00952369 0.285714 -1.78814e-07
+-1.78814e-07 -1.78814e-07 -1.78814e-07 -1.78814e-07 -1.78814e-07 -1.78814e-07
+-1.78814e-07 -1.78814e-07 0.4 -1.78814e-07 -1.78814e-07 -1.78814e-07
+-1.78814e-07 -1.78814e-07 -1.78814e-07 -1.78814e-07 -1.78814e-07 -1.78814e-07
+0.32381 -1.78814e-07 -1.78814e-07 -1.78814e-07 -1.78814e-07 -1.78814e-07
+-1.78814e-07 0.27619 -1.78814e-07 -1.78814e-07 -1.78814e-07 -1.78814e-07
+;
+#X coords 0 1 50 0 150 105 1 0 0;
+#X restore 355 179 graph;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array yhoseB5 100 float 3;
+#A 0 0.00952381 0.00476211 0.00476211 0.514286 0.4 0.371429 0.347619
+-0.00952297 2.38419e-07 2.38419e-07 0.00476193 0.00476193 0.00476193
+0.00476193 0.00476193 0.276191 0.347619 0.27619 0.0190475 0.0190475
+0.0190475 0.0190475 0.0190475 0.0190475 0.0190475 0.0190475 0.0190475
+0.0190475 0.304762 0.32381 0.400001 0.471429 0.771429 0.00952339 0.00952339
+0.00952339 0.00952339 0.00952339 0.00952339 0.00952339 0.595238 0.266667
+0.3 0.00952369 0.00952369 0.00952369 0.00952369 0.00952369 0.00952369
+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 150 105 1 0 0;
+#X restore 675 179 graph;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array yhoseB6 50 float 3;
+#A 0 0.00952417 0 0.32381 0.00952417 0.32381 0.00952417 0.00952417
+0.00952417 0.00952417 0.514286 0.00952417 0.514286 0.00952417 0.00952417
+0.342857 0.00952417 0.342857 -0.00952333 -0.00952333 -0.00952333 -0.00952333
+-0.00952333 0.495238 -0.00952333 0.495238 -0.00952333 4.17233e-07 4.17233e-07
+4.17233e-07 0 0 0.352381 4.17233e-07 0.352381 4.17233e-07 4.17233e-07
+4.17233e-07 4.17233e-07 4.17233e-07 4.17233e-07 0.00952417 0.457143
+0.00952417 0.457143 0.00952417 0.00952417 0.00952417 0.0190479 0.0190479
+0.0190479;
+#X coords 0 1 50 0 150 105 1 0 0;
+#X restore 835 179 graph;
+#X obj 55 312 inlet;
+#X obj 55 393 outlet;
+#X obj 55 364 t b a;
+#X obj 257 359 s \$0-word;
+#X obj 165 493 bng 15 250 50 0 \$0-reload empty s:reload 17 7 0 10
+-262144 -1 -1;
+#X obj 165 425 + 1;
+#X floatatom 165 448 5 0 0 0 - - -;
+#X obj 304 400 + 1;
+#X floatatom 304 423 5 0 0 0 - - -;
+#X obj 165 382 t a a;
+#X obj 165 470 array_copier yhoseA;
+#X obj 304 445 array_copier yhoseB;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array yhoseA6 50 float 3;
+#A 0 0.47619 0.495238 0.514286 0.504762 0.495238 0.304762 0.27619 0.257142
+0.238095 0.219047 0.199999 0.190475 0.180951 0.180951 0.190475 0.542857
+0.542857 0.552381 0.561905 0.533333 0.533333 0.35238 0.314284 0.285713
+0.266665 0.247617 0.247617 0.257141 0.30476 0.504762 0.504762 0.533334
+0.542858 0.542858 0.495238 0.285712 0.238093 0.238093 0.238093 0.247617
+0.323809 0.447619 0.466667 0.476191 0.4 0.209523 0.161903 0.152379
+0.142855 0.142855;
+#X coords 0 1 50 0 150 105 1 0 0;
+#X restore 835 52 graph;
+#X text 919 77 <-----REPEATED only to MATCH numbers.;
+#X obj 55 341 count 6;
+#X connect 11 0 25 0;
+#X connect 13 0 12 0;
+#X connect 13 1 20 0;
+#X connect 16 0 17 0;
+#X connect 17 0 21 0;
+#X connect 18 0 19 0;
+#X connect 19 0 22 0;
+#X connect 20 0 16 0;
+#X connect 20 1 18 0;
+#X connect 21 0 15 0;
+#X connect 25 0 13 0;
+#X connect 25 0 14 0;
+#X restore 48 226 pd expressions;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array yhoseA 50 float 3;
+#A 0 0.733333 0.0285715 0.0285715 0.0253969 0.0222223 0.0190477 0.761905
+0.00952381 0.00952381 0.00952381 0.00952381 0.00952381 0.838095 0.00952381
+0.00952381 0.00952381 0.00952363 0.00952363 0.00952363 0.00952363 0.00952363
+0.838095 0.00952381 0.00952363 0.00952363 0.00952363 -5.96046e-08 -5.96046e-08
+-5.96046e-08 -5.96046e-08 0.838095 0.00952381 0.838095 -5.96046e-08
+0.00952381 0.00952381 0.0190477 0.0190477 0.857143 0.0285715 0.0380954
+0.0380954 0.0380954 0.0380952 0.866667 0.0380954 0.0380954 0.0380954
+0.0380954 0.0190477;
+#X coords 0 1 50 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 0;
+#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;
+#X obj 164 21 r YHOSE;
+#X obj 48 187 r YHOSE;
+#X obj 283 110 s YHOSE;
+#X msg 37 337 0;
+#X obj 316 306 loadbang;
+#X obj 295 406 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
+-1 -1;
+#X text 35 318 stop!;
+#X msg 315 406 0;
+#X obj 315 429 v \$0-STATE;
+#X obj 88 429 s NOTE;
+#X obj 88 406 spigot;
+#X obj 397 460 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+1;
+#X obj 397 437 loadbang;
+#X obj 339 352 bng 15 250 50 0 empty \$0-reload r:reload 17 7 0 10
+-262144 -1 -1;
+#X msg 447 337 0;
+#X obj 726 306 loadbang;
+#X text 445 318 stop!;
+#X obj 498 429 s NOTE;
+#X obj 498 406 spigot;
+#X obj 749 352 bng 15 250 50 0 empty \$0-reload r:reload 17 7 0 10
+-262144 -1 -1;
+#X obj 295 452 s YHOSE_DONE;
+#X msg 316 329 yhoseA;
+#X msg 726 329 yhoseB;
+#X obj 88 306 riff1_random 600 3207 600 900;
+#X obj 498 306 riff1_random 600 3206 600 900;
+#N canvas 0 23 450 278 (subpatch) 0;
+#X array yhoseB 50 float 3;
+#A 0 0.638095 0.580953 0.514287 0.457144 0.361907 0.314288 0.228574
+0.180955 0.152384 0.152384 0.14286 0.133337 0.114289 0.104765 0.104765
+0.104765 0.104765 0.638096 0.552382 0.504763 0.457144 0.371431 0.304765
+0.228575 0.19048 0.152385 0.133337 0.133337 0.133337 0.123813 0.11429
+0.542858 0.466668 0.380954 0.238098 0.209527 0.190479 0.171432 0.161908
+0.104765 0.0761942 0.0476229 0.0285754 0.533334 0.390477 0.266669 0.152384
+0.0666699 0.0380987 0.0380987;
+#X coords 0 1 50 0 25 25 1 0 0;
+#X restore 35 95 graph;
+#X obj 572 62 loadbang;
+#X obj 572 105 metro 2000;
+#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 572 128 v \$0-STRESS;
+#X obj 572 151 *;
+#X obj 572 174 v \$0-STRESS;
+#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 33 0;
+#X connect 9 0 1 0;
+#X connect 9 0 7 0;
+#X connect 10 0 4 0;
+#X connect 12 0 32 0;
+#X connect 13 0 30 0;
+#X connect 14 0 16 0;
+#X connect 14 0 29 0;
+#X connect 16 0 17 0;
+#X connect 19 0 18 0;
+#X connect 20 0 19 1;
+#X connect 20 0 27 1;
+#X connect 21 0 20 0;
+#X connect 22 0 30 0;
+#X connect 23 0 33 0;
+#X connect 24 0 31 0;
+#X connect 27 0 26 0;
+#X connect 28 0 31 0;
+#X connect 30 0 32 1;
+#X connect 31 0 33 1;
+#X connect 32 0 19 0;
+#X connect 32 3 14 0;
+#X connect 33 0 27 0;
+#X connect 35 0 37 0;
+#X connect 36 0 39 0;
+#X connect 37 0 36 0;
+#X connect 38 0 40 1;
+#X connect 39 0 40 0;
+#X connect 40 0 41 0;
+#X coords 0 -1 1 1 100 150 2 5 5;
diff --git a/puredata/riff1.pd b/puredata/riff1.pd
index 0a96460..807e412 100644
--- a/puredata/riff1.pd
+++ b/puredata/riff1.pd
@@ -2,8 +2,8 @@
 #X floatatom 193 170 5 0 0 0 - - -;
 #X floatatom 193 239 5 0 0 0 - - -;
 #X floatatom 193 288 5 0 0 0 - - -;
-#X obj 28 66 hsl 110 20 0 800 0 0 empty \$0-val empty -2 -8 0 10 -262130
--1 -1 4049 1;
+#X obj 28 66 hsl 110 20 0 1000 0 0 empty \$0-val empty -2 -8 0 10 -262130
+-1 -1 4568 1;
 #X obj 193 18 inlet;
 #X obj 157 144 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
 -1 -1;
@@ -34,7 +34,7 @@
 #X text 350 187 3-key;
 #X text 323 367 1#msg;
 #X obj 145 66 tgl 20 0 empty \$0-onoff empty 17 7 0 8 -257985 -1 -1
-1 1;
+0 1;
 #X obj 249 214 s \$0-key;
 #X obj 453 112 s \$0-onoff;
 #X symbolatom 42 41 12 0 0 0 - - -;
@@ -63,6 +63,7 @@
 #X obj 257 170 del \$3;
 #X obj 483 313 outlet;
 #X text 483 335 4#done;
+#X obj 297 180 del \$3;
 #X connect 0 0 18 0;
 #X connect 0 0 40 0;
 #X connect 0 0 5 0;
@@ -114,4 +115,6 @@
 #X connect 56 0 33 0;
 #X connect 57 0 14 0;
 #X connect 57 0 58 0;
+#X connect 57 0 60 0;
+#X connect 60 0 14 0;
 #X coords 0 -1 1 1 150 95 1 20 20;
diff --git a/puredata/riff1_random.pd b/puredata/riff1_random.pd
new file mode 100644
index 0000000..1221851
--- /dev/null
+++ b/puredata/riff1_random.pd
@@ -0,0 +1,120 @@
+#N canvas 415 315 594 449 12;
+#X floatatom 193 170 5 0 0 0 - - -;
+#X floatatom 193 239 5 0 0 0 - - -;
+#X floatatom 193 288 5 0 0 0 - - -;
+#X obj 28 66 hsl 110 20 0 0 0 0 empty \$0-val empty -2 -8 0 10 -262130
+-1 -1 0 1;
+#X obj 193 18 inlet;
+#X obj 157 144 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
+-1 -1;
+#X obj 54 148 loadbang;
+#X msg 54 198 range 0 \$1;
+#X obj 25 41 bng 14 250 50 0 empty empty empty 17 7 0 10 -4034 -261234
+-1;
+#X floatatom 142 41 3 0 0 0 i #0-i -;
+#X floatatom 50 91 7 0 0 0 val #0-val -;
+#X obj 466 192 loadbang;
+#X floatatom 409 124 5 0 0 0 - - -;
+#X obj 461 344 outlet;
+#X obj 364 241 pack f f f f;
+#X floatatom 129 91 5 0 0 0 key #0-key -;
+#X obj 364 344 outlet;
+#X obj 386 18 inlet;
+#X obj 193 214 tabread;
+#X obj 466 221 f \$2;
+#X obj 193 263 * \$1;
+#X obj 409 99 array size;
+#X msg 386 154 set \$1;
+#X obj 54 173 f \$1;
+#X obj 391 210 inlet;
+#X obj 386 68 t a b a;
+#X obj 225 337 s \$0-val;
+#X obj 461 313 r \$0-val;
+#X text 432 18 2-array name;
+#X text 390 187 3-key;
+#X text 363 367 1#msg;
+#X obj 145 66 tgl 20 0 empty \$0-onoff empty 17 7 0 8 -257985 -1 -1
+0 1;
+#X obj 249 214 s \$0-key;
+#X obj 493 112 s \$0-onoff;
+#X symbolatom 42 41 12 0 0 0 - - -;
+#X msg 18 254 symbol no-array;
+#X obj 18 229 loadbang;
+#X obj 491 63 s \$0-an;
+#X obj 119 288 r \$0-an;
+#X msg 364 282 \$4 \$2 \$1 \$3;
+#X obj 136 170 s \$0-i;
+#X obj 193 312 t a a;
+#X obj 413 380 outlet;
+#X obj 413 313 r \$0-i;
+#X text 463 367 3#val;
+#X text 407 398 2#idx;
+#X obj 386 43 list split 1;
+#X obj 193 120 f;
+#X text 201 38 1-cmd for scan;
+#X obj 193 65 route bang;
+#X obj 260 90 route 0;
+#X msg 260 115 0;
+#X obj 193 92 t b b;
+#X msg 466 167 1;
+#X obj 297 145 t b b;
+#X msg 466 142 0;
+#X obj 297 170 del \$3;
+#X obj 523 313 outlet;
+#X text 523 335 4#done;
+#X obj 337 180 del \$3;
+#X obj 193 145 rscan \$3 \$4;
+#X connect 0 0 18 0;
+#X connect 0 0 40 0;
+#X connect 0 0 5 0;
+#X connect 1 0 20 0;
+#X connect 2 0 41 0;
+#X connect 4 0 49 0;
+#X connect 5 0 8 0;
+#X connect 6 0 23 0;
+#X connect 7 0 3 0;
+#X connect 11 0 19 0;
+#X connect 12 0 47 1;
+#X connect 14 0 39 0;
+#X connect 17 0 46 0;
+#X connect 18 0 1 0;
+#X connect 19 0 14 3;
+#X connect 20 0 2 0;
+#X connect 21 0 12 0;
+#X connect 22 0 18 0;
+#X connect 23 0 7 0;
+#X connect 24 0 14 1;
+#X connect 24 0 32 0;
+#X connect 25 0 22 0;
+#X connect 25 1 21 0;
+#X connect 25 2 21 1;
+#X connect 27 0 13 0;
+#X connect 35 0 34 0;
+#X connect 36 0 35 0;
+#X connect 38 0 34 0;
+#X connect 39 0 16 0;
+#X connect 41 0 14 0;
+#X connect 41 1 26 0;
+#X connect 43 0 42 0;
+#X connect 46 0 37 0;
+#X connect 46 0 25 0;
+#X connect 47 0 60 0;
+#X connect 49 0 52 0;
+#X connect 49 1 50 0;
+#X connect 50 0 51 0;
+#X connect 51 0 60 0;
+#X connect 52 0 47 0;
+#X connect 52 1 53 0;
+#X connect 53 0 14 2;
+#X connect 53 0 33 0;
+#X connect 54 0 56 0;
+#X connect 54 1 55 0;
+#X connect 55 0 14 2;
+#X connect 55 0 33 0;
+#X connect 56 0 14 0;
+#X connect 56 0 57 0;
+#X connect 56 0 59 0;
+#X connect 59 0 14 0;
+#X connect 60 0 0 0;
+#X connect 60 1 54 0;
+#X coords 0 -1 1 1 150 95 1 20 20;
diff --git a/puredata/rscan.pd b/puredata/rscan.pd
new file mode 100644
index 0000000..661dfc5
--- /dev/null
+++ b/puredata/rscan.pd
@@ -0,0 +1,56 @@
+#N canvas 291 274 385 490 12;
+#X obj 120 365 f;
+#X obj 84 365 + 1;
+#X obj 218 340 sel 1;
+#X msg 138 340 0;
+#X obj 218 315 ==;
+#X obj 236 205 - 1;
+#X obj 39 81 inlet;
+#X msg 179 225 0;
+#X msg 106 224 1;
+#X obj 106 165 t b b a;
+#X msg 39 225 0;
+#X obj 236 230 max 0;
+#X text 5 4 <<<;
+#X text 345 4 >>>;
+#X text 5 454 <<<;
+#X text 345 454 >>>;
+#X text 39 22 generate numbers from 0 to given (inlet-1);
+#X text 84 82 1-command:;
+#X text 124 98 - number-> target value;
+#X text 124 112 - if <= 0 \, stop immediately;
+#X obj 39 135 moses 1;
+#X obj 278 385 outlet;
+#X text 278 364 2#end bng;
+#X msg 39 310 bang;
+#X obj 120 390 t a a;
+#X floatatom 152 415 5 0 0 0 - - -;
+#X obj 152 439 outlet;
+#X text 202 439 1#values;
+#X text 39 38 arguments: random range => \$1 \, random offset => \$2
+;
+#X obj 91 271 retro \$1 \$2;
+#X connect 0 0 1 0;
+#X connect 0 0 24 0;
+#X connect 1 0 0 1;
+#X connect 2 0 7 0;
+#X connect 2 0 21 0;
+#X connect 3 0 0 1;
+#X connect 4 0 2 0;
+#X connect 5 0 11 0;
+#X connect 6 0 20 0;
+#X connect 7 0 29 0;
+#X connect 8 0 29 0;
+#X connect 9 0 8 0;
+#X connect 9 1 3 0;
+#X connect 9 2 5 0;
+#X connect 10 0 23 0;
+#X connect 10 0 29 0;
+#X connect 11 0 4 1;
+#X connect 20 0 10 0;
+#X connect 20 1 9 0;
+#X connect 23 0 21 0;
+#X connect 24 0 4 0;
+#X connect 24 1 25 0;
+#X connect 25 0 26 0;
+#X connect 29 0 0 0;
diff --git a/roller/src/main.cpp b/roller/src/main.cpp
index dff5f77..88ee6f6 100644
--- a/roller/src/main.cpp
+++ b/roller/src/main.cpp
@@ -21,7 +21,7 @@
 //============<identities>============
 //
 #define MY_GROUP_ID   (4000)
-#define MY_ID         (MY_GROUP_ID + 702)
+#define MY_ID         (MY_GROUP_ID + 403)
 #define MY_SIGN       ("ROLLER")
 //
 //============</identities>============
diff --git a/taak/src/main.cpp b/taak/src/main.cpp
index 3358c1d..2e56e6b 100644
--- a/taak/src/main.cpp
+++ b/taak/src/main.cpp
@@ -21,7 +21,7 @@
 //============<identities>============
 //
 #define MY_GROUP_ID   (1000)
-#define MY_ID         (MY_GROUP_ID + 100)
+#define MY_ID         (MY_GROUP_ID + 32)
 #define MY_SIGN       ("TAAK")
 //
 //============</identities>============