#N canvas 91 33 728 518 10;
#X obj 8 32 tgl 15 0 empty \$0-status-now empty 17 7 0 10 #c6ffc7 #000000
#000000 0 1;
#X obj 88 191 bng 15 250 50 0 empty \$0-motivate motivated! 17 7 0
10 #fcfcfc #000000 #000000;
#X msg 187 224 1;
#X obj 187 277 v \$0-STATE;
#N canvas 582 334 712 447 expressions 0;
#X obj 24 211 inlet;
#X obj 24 292 outlet;
#X obj 24 263 t b a;
#X obj 226 299 s \$0-word;
#X obj 134 392 bng 15 250 50 0 \$0-reload empty s:reload 17 7 0 10
#fcfcfc #000000 #000000;
#X floatatom 134 347 5 0 0 0 - - - 0;
#X obj 134 281 t a a;
#X obj 24 240 count 4;
#X obj 157 184 loadbang;
#X obj 157 230 s \$0-word-max;
#X obj 63 195 r \$0-word-max;
#X floatatom 63 218 5 0 0 0 - - - 0;
#X msg 157 207 4;
#X obj 134 369 array_copier \$0-sign;
#N canvas 0 23 450 278 (subpatch) 0;
#X array \$0-sign1 40 float 2;
#X coords 0 1 40 0 150 105 1 0 0;
#X restore 196 45 graph;
#N canvas 0 23 450 278 (subpatch) 0;
#X array \$0-sign3 60 float 2;
#X coords 0 1 60 0 150 105 1 0 0;
#X restore 536 45 graph;
#N canvas 84 25 450 278 (subpatch) 0;
#X array \$0-sign2 40 float 2;
#X coords 0 1 40 0 150 105 1 0 0;
#X restore 366 45 graph;
#N canvas 0 23 450 278 (subpatch) 0;
#X array \$0-sign0 60 float 2;
#X coords 0 1 60 0 150 105 1 0 0;
#X restore 26 45 graph;
#X connect 0 0 7 0;
#X connect 2 0 1 0;
#X connect 2 1 6 0;
#X connect 5 0 13 0;
#X connect 6 0 5 0;
#X connect 6 1 3 0;
#X connect 7 0 2 0;
#X connect 8 0 12 0;
#X connect 10 0 11 0;
#X connect 11 0 7 1;
#X connect 12 0 9 0;
#X connect 13 0 4 0;
#X restore 88 307 pd expressions;
#N canvas 0 23 450 278 (subpatch) 0;
#X array \$0-sign 60 float 2;
#X coords 0 1 60 0 25 25 1 0 0;
#X restore 26 42 graph;
#X obj 112 52 hradio 15 1 0 4 empty \$0-word empty 0 -8 0 10 #c6ffc7
#9c00ff #000000 0;
#X obj 8 50 bng 15 250 50 0 empty empty empty 17 7 0 10 #c6ffc7 #9c00ff
#000000;
#X msg 37 379 0;
#X obj 249 346 loadbang;
#X obj 231 446 bng 15 250 50 0 empty empty empty 17 7 0 10 #fcfcfc
#000000 #000000;
#X text 35 360 stop!;
#X msg 251 446 0;
#X obj 251 469 v \$0-STATE;
#X obj 88 469 s NOTE;
#X obj 288 369 bng 15 250 50 0 empty \$0-reload r:reload 17 7 0 10
#fcfcfc #000000 #000000;
#X obj 303 41 v \$0-STRESS;
#X obj 303 87 v \$0-STRESS;
#X obj 303 21 bng 15 250 50 0 empty WORLD_evt_half r:WORLD_evt_half
17 7 0 10 #fcfcfc #000000 #000000;
#X obj 303 64 * 0.5;
#X obj 72 53 nbx 2 14 -1e+37 1e+37 0 0 \$0-word-max \$0-word-max-set
w 0 -8 0 10 #b8b8b8 #202020 #000000 0 256;
#X obj 303 211 r \$0-word-max;
#X obj 303 257 s \$0-word-max-set;
#X msg 303 234 set \$1;
#X obj 54 52 tgl 15 0 \$0-SLEEP \$0-SLEEP-set s 3 -7 0 10 #404040 #f8fc00
#000000 0 1;
#X msg 303 149 set \$1;
#X obj 303 126 r \$0-SLEEP;
#X obj 303 172 s \$0-SLEEP-set;
#X obj 249 369 f \$0;
#X obj 249 392 makefilename %d-sign;
#N canvas 70 273 585 334 statesave 0;
#X obj 60 72 savestate;
#X obj 60 48 list store;
#X obj 60 25 r \$0-save;
#N canvas 0 0 426 370 save-sign 0;
#X obj 58 168 makefilename;
#X obj 27 73 until;
#X obj 27 96 f, f 8;
#X obj 90 106 + 1;
#X obj 27 50 t a b, f 8;
#X msg 72 73 0;
#X obj 58 191 t b a b a;
#X obj 77 279 list prepend append;
#X obj 77 302 list trim;
#X obj 58 145 r \$0-signname_set;
#X obj 77 325 s \$0-save;
#X obj 27 27 inlet;
#X obj 36 220 array size;
#X obj 105 220 array get;
#X connect 0 0 6 0;
#X connect 1 0 2 0;
#X connect 2 0 3 0;
#X connect 2 0 0 0;
#X connect 3 0 2 1;
#X connect 4 0 1 0;
#X connect 4 1 5 0;
#X connect 5 0 2 1;
#X connect 6 0 12 0;
#X connect 6 1 12 1;
#X connect 6 2 13 0;
#X connect 6 3 13 2;
#X connect 7 0 8 0;
#X connect 8 0 10 0;
#X connect 9 0 0 0;
#X connect 11 0 4 0;
#X connect 12 0 7 0;
#X connect 13 0 7 0;
#X restore 293 146 pd save-sign;
#X msg 293 123 4;
#N canvas 102 423 357 236 save-riff 0;
#X obj 75 23 r \$0-riff-para;
#X obj 75 115 list store;
#X obj 75 69 list prepend append;
#X obj 75 92 list trim;
#X obj 75 46 t a b;
#X obj 75 138 list prepend append;
#X obj 75 161 list trim;
#X obj 75 184 s \$0-save;
#X obj 22 72 inlet;
#X connect 0 0 4 0;
#X connect 1 0 5 0;
#X connect 2 0 3 0;
#X connect 3 0 1 0;
#X connect 4 0 2 0;
#X connect 4 1 1 1;
#X connect 5 0 6 0;
#X connect 6 0 7 0;
#X connect 8 0 1 0;
#X restore 279 169 pd save-riff;
#N canvas 0 0 394 201 save-name 0;
#X obj 21 89 list prepend append;
#X obj 21 112 list trim;
#X obj 21 135 s \$0-save;
#X obj 21 66 symbol;
#X obj 54 43 r \$0-name;
#X obj 21 21 inlet;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X connect 3 0 0 0;
#X connect 4 0 3 1;
#X connect 5 0 3 0;
#X restore 264 192 pd save-name;
#X msg 60 264 4;
#N canvas 0 0 386 217 loaded 0;
#X obj 16 15 inlet;
#X obj 222 111 list store;
#X obj 222 59 r \$0-loaded;
#X obj 222 82 route clear;
#X obj 16 54 t a b;
#X obj 16 146 s \$0-loaded;
#X msg 43 77 clear;
#X obj 16 100 list prepend append;
#X obj 16 123 list trim;
#X text 60 42 'set';
#X connect 0 0 4 0;
#X connect 2 0 3 0;
#X connect 3 0 1 1;
#X connect 3 1 1 0;
#X connect 4 0 7 0;
#X connect 4 1 6 0;
#X connect 6 0 5 0;
#X connect 7 0 8 0;
#X connect 8 0 5 0;
#X restore 135 149 pd loaded;
#N canvas 543 33 591 665 load-sign 0;
#X obj 181 378 array size;
#X obj 274 360 makefilename;
#X obj 274 337 r \$0-signname_set;
#X obj 240 308 v \$0-signname_idx;
#X obj 181 494 array set;
#X obj 240 282 bng 15 250 50 0 empty empty empty 17 7 0 10 #fcfcfc
#000000 #000000;
#X obj 285 139 v \$0-signname_idx;
#X obj 99 265 - 1;
#X obj 42 288 list split;
#X obj 61 222 v \$0-split-idx;
#X obj 70 374 v \$0-split-idx;
#X obj 99 345 -;
#X obj 70 311 t b a a;
#X obj 42 417 list split;
#X obj 81 193 v \$0-split-idx;
#X obj 81 170 list length;
#X obj 42 147 t a b a;
#X obj 42 520 t a b;
#X obj 213 125 until;
#X obj 213 243 s \$0-loaded;
#X msg 213 220 send \$1;
#X obj 213 177 bng 15 250 50 0 empty empty empty 17 7 0 10 #fcfcfc
#000000 #000000;
#X obj 42 612 s \$0-loaded;
#X msg 69 543 clear;
#X obj 42 566 list prepend append;
#X obj 42 589 list trim;
#X obj 213 154 t b b;
#X obj 213 32 inlet;
#X obj 213 197 symbol \$0-load-sign;
#X obj 42 124 r \$0-load-sign;
#X obj 432 108 makefilename %s%%d;
#X msg 432 131 set \$1;
#X obj 432 85 symbol \$0-sign;
#X obj 432 154 s \$0-signname_set;
#X obj 432 65 bng 15 250 50 0 empty empty empty 17 7 0 10 #fcfcfc #000000
#000000;
#X obj 432 42 loadbang;
#X obj 213 69 t a a b;
#X obj 285 116 - 1;
#X obj 207 308 - 1;
#X connect 1 0 4 2;
#X connect 1 0 0 1;
#X connect 2 0 1 0;
#X connect 3 0 1 0;
#X connect 3 0 38 0;
#X connect 5 0 3 0;
#X connect 7 0 8 1;
#X connect 7 0 9 0;
#X connect 8 0 13 0;
#X connect 8 1 12 0;
#X connect 9 0 7 0;
#X connect 10 0 11 0;
#X connect 11 0 10 0;
#X connect 11 0 13 1;
#X connect 12 0 10 0;
#X connect 12 1 11 1;
#X connect 12 2 0 0;
#X connect 13 0 17 0;
#X connect 13 1 4 0;
#X connect 15 0 14 0;
#X connect 16 0 8 0;
#X connect 16 1 9 0;
#X connect 16 2 15 0;
#X connect 17 0 24 0;
#X connect 17 1 23 0;
#X connect 18 0 26 0;
#X connect 20 0 19 0;
#X connect 21 0 28 0;
#X connect 23 0 22 0;
#X connect 24 0 25 0;
#X connect 25 0 22 0;
#X connect 26 0 21 0;
#X connect 26 1 5 0;
#X connect 27 0 36 0;
#X connect 28 0 20 0;
#X connect 29 0 16 0;
#X connect 30 0 31 0;
#X connect 31 0 33 0;
#X connect 32 0 30 0;
#X connect 34 0 32 0;
#X connect 35 0 34 0;
#X connect 36 0 18 0;
#X connect 36 1 37 0;
#X connect 36 2 34 0;
#X connect 37 0 6 0;
#X connect 38 0 3 0;
#X restore 60 287 pd load-sign;
#N canvas 22 33 382 405 load-name 0;
#X obj 223 28 inlet;
#X obj 52 257 t a b;
#X obj 223 143 s \$0-loaded;
#X msg 223 120 send \$1;
#X obj 223 77 bng 15 250 50 0 empty empty empty 17 7 0 10 #fcfcfc #000000
#000000;
#X obj 52 349 s \$0-loaded;
#X msg 79 280 clear;
#X obj 52 303 list prepend append;
#X obj 52 326 list trim;
#X obj 223 97 symbol \$0-load-name;
#X obj 52 24 r \$0-load-name;
#X obj 109 165 - 1;
#X obj 52 188 list split;
#X obj 71 122 v \$0-split-idx;
#X obj 91 93 v \$0-split-idx;
#X obj 91 70 list length;
#X obj 52 47 t a b a;
#X obj 80 217 s \$0-name-set;
#X connect 0 0 4 0;
#X connect 1 0 7 0;
#X connect 1 1 6 0;
#X connect 3 0 2 0;
#X connect 4 0 9 0;
#X connect 6 0 5 0;
#X connect 7 0 8 0;
#X connect 8 0 5 0;
#X connect 9 0 3 0;
#X connect 10 0 16 0;
#X connect 11 0 12 1;
#X connect 11 0 13 0;
#X connect 12 0 1 0;
#X connect 12 1 17 0;
#X connect 13 0 11 0;
#X connect 15 0 14 0;
#X connect 16 0 12 0;
#X connect 16 1 13 0;
#X connect 16 2 15 0;
#X restore 90 218 pd load-name;
#N canvas 0 0 417 482 load-riff 0;
#X obj 223 28 inlet;
#X obj 52 337 t a b;
#X obj 223 143 s \$0-loaded;
#X msg 223 120 send \$1;
#X obj 223 77 bng 15 250 50 0 empty empty empty 17 7 0 10 #fcfcfc #000000
#000000;
#X obj 52 429 s \$0-loaded;
#X msg 79 360 clear;
#X obj 52 383 list prepend append;
#X obj 52 406 list trim;
#X obj 52 188 list split;
#X obj 71 122 v \$0-split-idx;
#X obj 91 93 v \$0-split-idx;
#X obj 91 70 list length;
#X obj 52 47 t a b a;
#X obj 52 24 r \$0-load-riff;
#X obj 223 97 symbol \$0-load-riff;
#X obj 109 165 - 4;
#X obj 80 218 unpack f f f f;
#X obj 80 310 s \$0-id-set;
#X obj 107 287 s \$0-key-set;
#X obj 134 264 s \$0-range-set;
#X obj 161 241 s \$0-sdelay-set;
#X connect 0 0 4 0;
#X connect 1 0 7 0;
#X connect 1 1 6 0;
#X connect 3 0 2 0;
#X connect 4 0 15 0;
#X connect 6 0 5 0;
#X connect 7 0 8 0;
#X connect 8 0 5 0;
#X connect 9 0 1 0;
#X connect 9 1 17 0;
#X connect 10 0 16 0;
#X connect 12 0 11 0;
#X connect 13 0 9 0;
#X connect 13 1 10 0;
#X connect 13 2 12 0;
#X connect 14 0 13 0;
#X connect 15 0 3 0;
#X connect 16 0 9 1;
#X connect 16 0 10 0;
#X connect 17 0 18 0;
#X connect 17 1 19 0;
#X connect 17 2 20 0;
#X connect 17 3 21 0;
#X restore 75 241 pd load-riff;
#X obj 415 114 list store;
#X obj 415 163 print;
#X obj 385 99 bng 15 250 50 0 empty empty empty 17 7 0 10 #fcfcfc #000000
#000000;
#X obj 415 75 t a b;
#X obj 415 29 list prepend append;
#X obj 415 52 list trim;
#N canvas 0 0 394 201 save-group 0;
#X obj 21 89 list prepend append;
#X obj 21 112 list trim;
#X obj 21 135 s \$0-save;
#X obj 21 66 symbol;
#X obj 21 21 inlet;
#X obj 54 43 r \$0-group;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X connect 3 0 0 0;
#X connect 4 0 3 0;
#X connect 5 0 3 1;
#X restore 250 215 pd save-group;
#N canvas 22 33 382 405 load-group 0;
#X obj 223 28 inlet;
#X obj 52 257 t a b;
#X obj 223 143 s \$0-loaded;
#X msg 223 120 send \$1;
#X obj 223 77 bng 15 250 50 0 empty empty empty 17 7 0 10 #fcfcfc #000000
#000000;
#X obj 52 349 s \$0-loaded;
#X msg 79 280 clear;
#X obj 52 303 list prepend append;
#X obj 52 326 list trim;
#X obj 109 165 - 1;
#X obj 52 188 list split;
#X obj 71 122 v \$0-split-idx;
#X obj 91 93 v \$0-split-idx;
#X obj 91 70 list length;
#X obj 52 47 t a b a;
#X obj 223 97 symbol \$0-load-group;
#X obj 52 24 r \$0-load-group;
#X obj 80 217 s \$0-group-set;
#X connect 0 0 4 0;
#X connect 1 0 7 0;
#X connect 1 1 6 0;
#X connect 3 0 2 0;
#X connect 4 0 15 0;
#X connect 6 0 5 0;
#X connect 7 0 8 0;
#X connect 8 0 5 0;
#X connect 9 0 10 1;
#X connect 9 0 11 0;
#X connect 10 0 1 0;
#X connect 10 1 17 0;
#X connect 11 0 9 0;
#X connect 13 0 12 0;
#X connect 14 0 10 0;
#X connect 14 1 11 0;
#X connect 14 2 13 0;
#X connect 15 0 3 0;
#X connect 16 0 14 0;
#X restore 105 195 pd load-group;
#X obj 221 90 t b b b b b b b;
#N canvas 417 223 349 308 save-world 0;
#X obj 21 189 list prepend append;
#X obj 21 212 list trim;
#X obj 21 235 s \$0-save;
#X obj 21 21 inlet;
#X obj 36 44 r \$0-cond;
#X obj 21 67 f;
#X obj 21 166 pack f f f f;
#X obj 44 90 r \$0-level;
#X obj 90 136 r \$0-relax;
#X obj 67 113 r \$0-stress;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X connect 3 0 5 0;
#X connect 4 0 5 1;
#X connect 5 0 6 0;
#X connect 6 0 0 0;
#X connect 7 0 6 1;
#X connect 8 0 6 3;
#X connect 9 0 6 2;
#X restore 235 238 pd save-world;
#X obj 60 111 t b b b b b a;
#N canvas 84 297 417 482 load-world 0;
#X obj 223 28 inlet;
#X obj 52 337 t a b;
#X obj 223 143 s \$0-loaded;
#X msg 223 120 send \$1;
#X obj 223 77 bng 15 250 50 0 empty empty empty 17 7 0 10 #fcfcfc #000000
#000000;
#X obj 52 429 s \$0-loaded;
#X msg 79 360 clear;
#X obj 52 383 list prepend append;
#X obj 52 406 list trim;
#X obj 52 188 list split;
#X obj 71 122 v \$0-split-idx;
#X obj 91 93 v \$0-split-idx;
#X obj 91 70 list length;
#X obj 52 47 t a b a;
#X obj 223 97 symbol \$0-load-world;
#X obj 52 24 r \$0-load-world;
#X obj 80 310 s \$0-cond-set;
#X obj 80 218 unpack f f f f;
#X obj 161 241 s \$0-relax-set;
#X obj 134 264 s \$0-stress-set;
#X obj 107 287 s \$0-level-set;
#X obj 109 165 - 4;
#X connect 0 0 4 0;
#X connect 1 0 7 0;
#X connect 1 1 6 0;
#X connect 3 0 2 0;
#X connect 4 0 14 0;
#X connect 6 0 5 0;
#X connect 7 0 8 0;
#X connect 8 0 5 0;
#X connect 9 0 1 0;
#X connect 9 1 17 0;
#X connect 10 0 21 0;
#X connect 12 0 11 0;
#X connect 13 0 9 0;
#X connect 13 1 10 0;
#X connect 13 2 12 0;
#X connect 14 0 3 0;
#X connect 15 0 13 0;
#X connect 17 0 16 0;
#X connect 17 1 20 0;
#X connect 17 2 19 0;
#X connect 17 3 18 0;
#X connect 21 0 9 1;
#X connect 21 0 10 0;
#X restore 120 172 pd load-world;
#X connect 0 0 16 0;
#X connect 0 0 22 0;
#X connect 0 1 20 0;
#X connect 1 0 0 0;
#X connect 2 0 1 0;
#X connect 4 0 3 0;
#X connect 7 0 9 0;
#X connect 12 0 13 0;
#X connect 14 0 12 0;
#X connect 15 0 12 0;
#X connect 15 1 12 1;
#X connect 16 0 17 0;
#X connect 17 0 15 0;
#X connect 20 0 1 0;
#X connect 20 1 21 0;
#X connect 20 2 18 0;
#X connect 20 3 6 0;
#X connect 20 4 5 0;
#X connect 20 5 4 0;
#X connect 20 6 1 1;
#X connect 22 0 7 0;
#X connect 22 1 11 0;
#X connect 22 2 10 0;
#X connect 22 3 19 0;
#X connect 22 4 23 0;
#X connect 22 5 8 0;
#X restore 377 464 pd statesave;
#X obj 197 252 tgl 15 0 \$0-feed empty s:0-feed 17 7 0 10 #fcfcfc #000000
#000000 0 1;
#X obj 303 433 tgl 15 0 \$0-feed empty s:0-feed 17 7 0 10 #fcfcfc #000000
#000000 0 1;
#X obj 166 31 nbx 3 14 -1e+37 1e+37 0 0 empty empty ! -8 7 0 10 #feffc6
#606060 #000000 0 256;
#X obj 7 195 loadbang;
#X obj 7 241 v \$0-STRESS;
#X obj 7 218 metro 100;
#X obj 7 264 int;
#X obj 112 36 nbx 2 14 -1e+37 1e+37 0 0 empty \$0-word empty -8 7 0
10 #ffffff #000000 #000000 0 256;
#X obj 88 346 riff2 \$2 \$1 \$3;
#X obj 24 72 nbx 4 14 -1e+37 1e+37 0 0 \$0-id \$0-id-set id -14 7 0
10 #ffffff #000000 #000000 0 256;
#X obj 81 72 nbx 4 14 -1e+37 1e+37 0 0 \$0-range \$0-range-set r -8
7 0 10 #ffffff #000000 #000000 0 256;
#X obj 144 72 nbx 4 14 -1e+37 1e+37 0 0 \$0-sdelay \$0-sdelay-set sd
-14 7 0 10 #ffffff #000000 #000000 0 256;
#X symbolatom 128 10 15 0 0 0 @ \$0-name-set \$0-name 0;
#X obj 200 72 nbx 1 14 -1e+37 1e+37 0 0 \$0-key \$0-key-set k -7 7
0 10 #ffffff #000000 #000000 0 256;
#N canvas 0 0 369 268 riffpara 0;
#X obj 23 141 pack f f f f;
#X obj 152 64 r \$0-sdelay;
#X obj 74 18 r \$0-key;
#X obj 152 87 t b a;
#X obj 113 64 t b a;
#X obj 74 41 t b a;
#X obj 23 41 r \$0-id;
#X obj 113 41 r \$0-range;
#X obj 43 174 s \$0-riff-para;
#X obj 23 213 outlet;
#X connect 0 0 8 0;
#X connect 0 0 9 0;
#X connect 1 0 3 0;
#X connect 2 0 5 0;
#X connect 3 0 0 0;
#X connect 3 1 0 3;
#X connect 4 0 0 0;
#X connect 4 1 0 2;
#X connect 5 0 0 0;
#X connect 5 1 0 1;
#X connect 6 0 0 0;
#X connect 7 0 4 0;
#X restore 231 307 pd riffpara;
#X symbolatom 22 10 15 0 0 0 & \$0-group-set \$0-group 0;
#X obj 8 136 v \$0-STATE;
#X obj 8 159 sel 1 0;
#X text 547 12 * group interactions;
#X obj 57 90 nbx 5 14 -1e+37 1e+37 0 0 \$0-cond \$0-cond-set condi
-33 7 0 10 #ffffff #000000 #000000 0 256;
#X obj 49 108 nbx 6 14 -1e+37 1e+37 0 0 \$0-stress \$0-stress-set stress
-38 7 0 10 #ffffff #000000 #000000 0 256;
#X obj 157 108 nbx 6 14 -1e+37 1e+37 0 0 \$0-relax \$0-relax-set relax
-33 7 0 10 #ffffff #000000 #000000 0 256;
#X obj 165 90 nbx 5 14 -1e+37 1e+37 0 0 \$0-level \$0-level-set level
-33 7 0 10 #ffffff #000000 #000000 0 256;
#N canvas 936 33 533 714 weather 0;
#X floatatom 16 194 5 0 0 0 - - - 0;
#X obj 16 443 t a b;
#X obj 16 522 spigot;
#X obj 67 507 tgl 15 0 empty empty free_:) 17 7 0 10 #fcfcfc #000000
#000000 0 1;
#X obj 67 484 == 0;
#X obj 16 466 sel 1;
#X text 41 552 think;
#X obj 16 578 gauss 1 0;
#X floatatom 16 624 5 0 0 0 - - - 0;
#X obj 16 694 sel 1;
#X obj 65 712 tgl 15 0 empty empty empty 17 7 0 10 #fcfcfc #000000
#000000 0 1;
#X floatatom 110 654 5 0 0 0 stress - - 0;
#X obj 278 705 +;
#X obj 278 652 t a b;
#X obj 278 476 tgl 15 0 empty empty empty 17 7 0 10 #fcfcfc #000000
#000000 0 1;
#X floatatom 278 630 8 0 0 0 - - - 0;
#X obj 16 671 >;
#X obj 278 525 t b b;
#X obj 325 566 sel 1 0;
#X obj 34 224 bng 15 250 50 0 empty empty listen 17 7 0 10 #b8b8b8
#f8fc00 #000000;
#X obj 278 728 max 0;
#X text 69 360 world is quiet?;
#X text 90 435 status of me;
#X obj 147 479 tgl 15 0 empty empty busy. 17 7 0 10 #fcfcfc #000000
#000000 0 1;
#X obj 16 601 abs;
#N canvas 0 50 450 250 (subpatch) 0;
#X array \$0-stress 100 float 2;
#X coords 0 100 100 0 200 150 1 0 0;
#X restore 295 195 graph;
#X obj 278 453 loadbang;
#X text 78 377 condition of state change;
#X obj 278 496 metro 100;
#N canvas 84 95 319 212 (subpatch) 0;
#X obj 12 54 metro 100;
#X obj 12 34 tgl 15 0 empty empty empty 17 7 0 10 #fcfcfc #000000 #000000
0 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 350 pd;
#X obj 325 543 v \$0-STATE;
#X obj 305 675 v \$0-STRESS;
#X obj 278 751 v \$0-STRESS;
#X obj 67 461 v \$0-STATE;
#X obj 16 747 outlet;
#X obj 373 385 tgl 15 0 empty empty empty 17 7 0 10 #fcfcfc #000000
#000000 0 1;
#X obj 373 405 metro 50;
#X obj 373 362 loadbang;
#X obj 373 428 v \$0-STATE;
#X obj 373 451 s \$0-status-now;
#X obj 16 166 +;
#X obj 49 166 tgl 15 0 empty \$0-SLEEP r:0-SLEEP 17 7 0 10 #fcfcfc
#000000 #000000 0 1;
#X obj 266 124 tgl 15 0 empty empty empty 17 7 0 10 #fcfcfc #000000
#000000 0 1;
#X obj 266 144 s \$0-SLEEP;
#X obj 16 101 v;
#X obj 86 60 symbol;
#X obj 119 37 r \$0-group;
#X obj 86 14 loadbang;
#X floatatom 16 124 5 0 0 0 - - - 0;
#X obj 86 83 makefilename %s_energy_sum;
#X obj 266 101 v;
#X obj 336 60 symbol;
#X obj 369 37 r \$0-group;
#X obj 336 14 loadbang;
#X obj 336 83 makefilename %s_sleep;
#X obj 266 60 metro 200;
#X obj 16 60 metro 100;
#X obj 16 14 bng 15 250 50 0 empty empty empty 17 7 0 10 #fcfcfc #000000
#000000;
#X obj 266 14 bng 15 250 50 0 empty empty empty 17 7 0 10 #fcfcfc #000000
#000000;
#X obj 16 360 <;
#X obj 31 311 r \$0-cond;
#X floatatom 31 334 5 0 0 0 - - - 0;
#X floatatom 325 590 5 0 0 1 working\ stress - - 0;
#X floatatom 344 613 5 0 0 1 resting\ relax - - 0;
#X obj 146 549 r \$0-stress;
#X msg 146 572 set \$1;
#X msg 199 595 set \$1;
#X obj 199 572 r \$0-relax;
#X connect 0 0 19 0;
#X connect 0 0 59 0;
#X connect 1 0 5 0;
#X connect 1 1 33 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 24 0;
#X connect 8 0 16 0;
#X connect 9 0 34 0;
#X connect 11 0 16 1;
#X connect 12 0 20 0;
#X connect 13 0 12 0;
#X connect 13 1 31 0;
#X connect 14 0 28 0;
#X connect 15 0 13 0;
#X connect 16 0 9 0;
#X connect 16 0 10 0;
#X connect 17 0 15 0;
#X connect 17 1 30 0;
#X connect 18 0 62 0;
#X connect 18 1 63 0;
#X connect 20 0 11 0;
#X connect 20 0 32 0;
#X connect 24 0 8 0;
#X connect 26 0 14 0;
#X connect 28 0 17 0;
#X connect 30 0 18 0;
#X connect 31 0 12 1;
#X connect 33 0 4 0;
#X connect 33 0 23 0;
#X connect 35 0 36 0;
#X connect 36 0 38 0;
#X connect 37 0 35 0;
#X connect 38 0 39 0;
#X connect 40 0 0 0;
#X connect 41 0 40 1;
#X connect 42 0 43 0;
#X connect 44 0 48 0;
#X connect 45 0 49 0;
#X connect 46 0 45 1;
#X connect 47 0 45 0;
#X connect 47 0 56 0;
#X connect 48 0 40 0;
#X connect 49 0 44 1;
#X connect 50 0 42 0;
#X connect 51 0 54 0;
#X connect 52 0 51 1;
#X connect 53 0 51 0;
#X connect 53 0 55 0;
#X connect 54 0 50 1;
#X connect 55 0 50 0;
#X connect 56 0 44 0;
#X connect 57 0 56 0;
#X connect 58 0 55 0;
#X connect 59 0 1 0;
#X connect 60 0 61 0;
#X connect 61 0 59 1;
#X connect 62 0 15 0;
#X connect 63 0 15 0;
#X connect 64 0 65 0;
#X connect 65 0 62 0;
#X connect 66 0 63 0;
#X connect 67 0 66 0;
#X restore 105 149 pd weather and mood;
#X obj 472 71 tgl 15 0 empty \$0-feed r:0-feed 17 7 0 10 #fcfcfc #000000
#000000 0 1;
#X text 638 413 DM;
#X msg 472 91 active \$1;
#X obj 620 442 r \$0-dm;
#X obj 620 465 print \$0-dm;
#X text 460 40 motivation feed;
#X obj 529 114 r \$0-word;
#X obj 472 137 pack s f f;
#N canvas 0 0 350 253 FEED_put 0;
#X obj 187 103 r \$0-name;
#X obj 134 129 pack s f;
#X obj 134 16 loadbang;
#X obj 134 39 bng 15 250 50 0 empty empty empty 17 7 0 10 #fcfcfc #000000
#000000;
#X obj 134 62 t b b;
#X obj 52 170 list trim;
#X obj 52 193 s FEED;
#X obj 52 88 inlet;
#X obj 179 80 f \$0;
#X obj 134 106 symbol;
#X obj 52 147 list append;
#X connect 0 0 9 1;
#X connect 1 0 10 1;
#X connect 2 0 3 0;
#X connect 3 0 4 0;
#X connect 4 0 9 0;
#X connect 4 1 8 0;
#X connect 5 0 6 0;
#X connect 7 0 10 0;
#X connect 8 0 1 1;
#X connect 9 0 1 0;
#X connect 10 0 5 0;
#X restore 472 160 pd FEED_put;
#N canvas 0 0 382 463 FEED_get 0;
#X obj 39 114 list split;
#X obj 96 68 list length;
#X obj 96 91 - 1;
#X obj 39 50 t a a;
#X obj 72 137 == \$0;
#X obj 72 160 == 0;
#X obj 39 203 spigot;
#X obj 72 183 tgl 15 0 empty empty empty 17 7 0 10 #fcfcfc #000000
#000000 0 1;
#X obj 39 27 r FEED;
#X text 127 175 not interested in my own feed;
#X obj 39 313 list trim;
#X obj 39 336 outlet;
#X obj 39 290 list split;
#X obj 96 244 list length;
#X obj 96 267 - 1;
#X obj 39 226 t a a;
#X text 165 273 strip out name field;
#X connect 0 0 6 0;
#X connect 0 1 4 0;
#X connect 1 0 2 0;
#X connect 2 0 0 1;
#X connect 3 0 0 0;
#X connect 3 1 1 0;
#X connect 4 0 5 0;
#X connect 5 0 7 0;
#X connect 6 0 15 0;
#X connect 7 0 6 1;
#X connect 8 0 3 0;
#X connect 10 0 11 0;
#X connect 12 0 10 0;
#X connect 13 0 14 0;
#X connect 14 0 12 1;
#X connect 15 0 12 0;
#X connect 15 1 13 0;
#X restore 472 229 pd FEED_get;
#N canvas 311 238 338 337 tempted? 0;
#X obj 22 19 inlet;
#X text 80 105 think;
#X obj 55 131 gauss 1 0;
#X floatatom 55 177 5 0 0 0 - - - 0;
#X obj 55 222 tgl 15 0 empty empty empty 17 7 0 10 #fcfcfc #000000
#000000 0 1;
#X obj 55 154 abs;
#X obj 22 42 route active;
#X obj 22 65 route 1;
#X obj 22 88 t a b;
#X obj 55 111 bng 15 250 50 0 empty empty empty 17 7 0 10 #fcfcfc #000000
#000000;
#X obj 22 242 spigot;
#X obj 22 265 outlet;
#X obj 88 284 print \$0-tempted!;
#X obj 55 199 > 1.8;
#X connect 0 0 6 0;
#X connect 2 0 5 0;
#X connect 3 0 13 0;
#X connect 4 0 10 1;
#X connect 5 0 3 0;
#X connect 6 0 7 0;
#X connect 7 0 8 0;
#X connect 8 0 10 0;
#X connect 8 1 9 0;
#X connect 9 0 2 0;
#X connect 10 0 11 0;
#X connect 10 0 12 0;
#X connect 13 0 4 0;
#X restore 472 252 pd tempted?;
#X obj 499 300 s \$0-word;
#X obj 472 275 t b a;
#X obj 472 330 bng 15 250 50 0 \$0-motivate empty s:motivate 17 7 0
10 #fcfcfc #000000 #000000;
#X connect 1 0 4 0;
#X connect 1 0 2 0;
#X connect 2 0 3 0;
#X connect 2 0 31 0;
#X connect 4 0 39 0;
#X connect 7 0 47 0;
#X connect 8 0 39 0;
#X connect 9 0 28 0;
#X connect 10 0 12 0;
#X connect 12 0 13 0;
#X connect 12 0 32 0;
#X connect 15 0 28 0;
#X connect 16 0 19 0;
#X connect 18 0 16 0;
#X connect 19 0 17 0;
#X connect 21 0 23 0;
#X connect 23 0 22 0;
#X connect 25 0 27 0;
#X connect 26 0 25 0;
#X connect 28 0 29 0;
#X connect 29 0 39 1;
#X connect 34 0 36 0;
#X connect 35 0 37 0;
#X connect 36 0 35 0;
#X connect 37 0 33 0;
#X connect 39 0 14 0;
#X connect 39 3 10 0;
#X connect 45 0 39 2;
#X connect 47 0 48 0;
#X connect 48 0 8 0;
#X connect 48 1 1 0;
#X connect 54 0 1 0;
#X connect 55 0 57 0;
#X connect 57 0 62 0;
#X connect 58 0 59 0;
#X connect 61 0 62 2;
#X connect 62 0 63 0;
#X connect 64 0 65 0;
#X connect 65 0 67 0;
#X connect 67 0 68 0;
#X connect 67 1 66 0;
#X coords 0 -1 1 1 220 122 2 5 5;