#N canvas 0 74 498 493 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 151 bng 15 250 50 0 empty empty motivated! 17 7 0 10 #fcfcfc #000000 #000000; #X msg 187 184 1; #X obj 187 237 v \$0-STATE; #N canvas 760 33 533 644 world 0; #X floatatom 16 94 5 0 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 #fcfcfc #000000 #000000 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 - - - 0; #X obj 16 544 sel 1; #X obj 65 562 tgl 15 0 empty empty empty 17 7 0 10 #fcfcfc #000000 #000000 0 1; #X floatatom 110 504 5 0 0 0 stress - - 0; #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 #fcfcfc #000000 #000000 0 1; #X floatatom 238 480 8 0 0 0 - - - 0; #X obj 16 521 >; #X floatatom 16 137 5 0 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 #b8b8b8 #f8fc00 #000000; #X obj 238 578 max 0; #X text 56 93 speed of happenings; #X text 69 210 world is quiet?; #X text 90 285 status of me; #X obj 147 329 tgl 15 0 empty empty busy. 17 7 0 10 #fcfcfc #000000 #000000 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 100 100 0 200 150 1 0 0; #X restore 295 45 graph; #X obj 238 303 loadbang; #X text 78 227 condition of state change; #X obj 238 346 metro 100; #N canvas 84 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 200 pd; #X obj 285 393 v \$0-STATE; #X obj 265 525 v \$0-STRESS; #X obj 238 601 v \$0-STRESS; #X obj 67 311 v \$0-STATE; #X obj 16 597 outlet; #X obj 373 235 tgl 15 0 empty empty empty 17 7 0 10 #fcfcfc #000000 #000000 0 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 obj 16 66 +; #X msg 285 439 0.1; #X msg 304 462 -0.05; #X obj 49 66 tgl 15 0 empty \$0-SLEEP r:0-SLEEP 17 7 0 10 #fcfcfc #000000 #000000 0 1; #X obj 158 31 tgl 15 0 empty WORLD_SLEEP r:WORLD_SLEEP 17 7 0 10 #fcfcfc #000000 #000000 0 1; #X obj 158 51 s \$0-SLEEP; #X obj 16 210 < 0.7; #X text 109 114 listening speed; #X obj 16 114 resampl 100; #X connect 0 0 53 0; #X connect 1 0 5 0; #X connect 1 1 35 0; #X connect 2 0 7 0; #X connect 3 0 2 1; #X connect 4 0 3 0; #X connect 5 0 2 0; #X connect 7 0 26 0; #X connect 8 0 16 0; #X connect 9 0 36 0; #X connect 11 0 16 1; #X connect 12 0 21 0; #X connect 13 0 12 0; #X connect 13 1 33 0; #X connect 14 0 30 0; #X connect 15 0 13 0; #X connect 16 0 9 0; #X connect 16 0 10 0; #X connect 17 0 20 0; #X connect 17 0 51 0; #X connect 18 0 15 0; #X connect 18 1 32 0; #X connect 19 0 46 0; #X connect 19 1 47 0; #X connect 21 0 11 0; #X connect 21 0 34 0; #X connect 26 0 8 0; #X connect 28 0 14 0; #X connect 30 0 18 0; #X connect 32 0 19 0; #X connect 33 0 12 1; #X connect 35 0 4 0; #X connect 35 0 25 0; #X connect 37 0 38 0; #X connect 38 0 40 0; #X connect 39 0 37 0; #X connect 40 0 41 0; #X connect 42 0 45 0; #X connect 45 0 0 0; #X connect 46 0 15 0; #X connect 47 0 15 0; #X connect 48 0 45 1; #X connect 49 0 50 0; #X connect 51 0 1 0; #X connect 53 0 17 0; #X restore 105 109 pd world and me; #N canvas 500 330 712 447 expressions 0; #X obj 24 211 inlet; #X obj 24 292 outlet; #X obj 24 263 t b a; #X obj 226 258 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 7 0 2 0; #X connect 7 0 3 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 267 pd expressions; #N canvas 0 23 450 278 (subpatch) 0; #X array \$0-sign 40 float 2; #X coords 0 1 40 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 339 0; #X obj 249 306 loadbang; #X obj 231 406 bng 15 250 50 0 empty empty empty 17 7 0 10 #fcfcfc #000000 #000000; #X text 35 320 stop!; #X msg 251 406 0; #X obj 251 429 v \$0-STATE; #X obj 88 429 s NOTE; #X obj 288 329 bng 15 250 50 0 empty \$0-reload r:reload 17 7 0 10 #fcfcfc #000000 #000000; #X obj 362 101 v \$0-STRESS; #X obj 362 147 v \$0-STRESS; #X obj 362 81 bng 15 250 50 0 empty WORLD_evt_half r:WORLD_evt_half 17 7 0 10 #fcfcfc #000000 #000000; #X obj 362 124 * 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 362 271 r \$0-word-max; #X obj 362 317 s \$0-word-max-set; #X msg 362 294 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 362 209 set \$1; #X obj 362 186 r \$0-SLEEP; #X obj 362 232 s \$0-SLEEP-set; #X obj 249 329 f \$0; #X obj 249 352 makefilename %d-sign; #N canvas 692 150 585 302 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 268 146 pd save-sign; #X msg 268 123 4; #X obj 221 90 t b b b b b; #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 252 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 236 192 pd save-name; #X msg 60 209 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 137 129 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 232 pd load-sign; #X obj 60 111 t b b b a; #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 94 152 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 obj 181 183; #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 77 181 pd load-riff; #X obj 445 124 list store; #X obj 438 200 print; #X obj 445 98 bng 15 250 50 0 empty empty empty 17 7 0 10 #fcfcfc #000000 #000000; #X obj 407 49 t a b; #X obj 280 28 list prepend append; #X obj 280 51 list trim; #X connect 0 0 11 0; #X connect 0 0 18 0; #X connect 0 1 5 0; #X connect 1 0 0 0; #X connect 2 0 1 0; #X connect 4 0 3 0; #X connect 5 0 1 0; #X connect 5 1 7 0; #X connect 5 2 6 0; #X connect 5 3 4 0; #X connect 5 4 1 1; #X connect 8 0 10 0; #X connect 11 0 8 0; #X connect 11 1 13 0; #X connect 11 2 12 0; #X connect 11 3 9 0; #X connect 14 0 15 0; #X connect 16 0 14 0; #X connect 17 0 14 0; #X connect 17 1 14 1; #X connect 18 0 19 0; #X connect 19 0 17 0; #X restore 388 444 pd statesave; #X obj 248 92 pack s f; #X obj 248 46 t b f; #X obj 248 26 tgl 15 0 empty \$0-feed r:0-feed 17 7 0 10 #fcfcfc #000000 #000000 0 1; #X obj 248 138 s FEED; #X obj 197 212 tgl 15 0 \$0-feed empty s:0-feed 17 7 0 10 #fcfcfc #000000 #000000 0 1; #X obj 303 393 tgl 15 0 \$0-feed empty s:0-feed 17 7 0 10 #fcfcfc #000000 #000000 0 1; #X obj 248 115 list trim; #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 155 loadbang; #X obj 7 201 v \$0-STRESS; #X obj 7 178 metro 100; #X obj 7 224 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 306 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 110 10 15 0 0 0 @ \$0-name-set \$0-name 0; #X obj 326 35 r \$0-name; #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; #X obj 248 69 symbol; #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 267 pd riffpara; #X connect 1 0 5 0; #X connect 1 0 2 0; #X connect 2 0 3 0; #X connect 2 0 36 0; #X connect 4 0 1 0; #X connect 5 0 45 0; #X connect 8 0 1 0; #X connect 9 0 45 0; #X connect 10 0 29 0; #X connect 11 0 13 0; #X connect 13 0 14 0; #X connect 13 0 37 0; #X connect 16 0 29 0; #X connect 17 0 20 0; #X connect 19 0 17 0; #X connect 20 0 18 0; #X connect 22 0 24 0; #X connect 24 0 23 0; #X connect 26 0 28 0; #X connect 27 0 26 0; #X connect 29 0 30 0; #X connect 30 0 45 1; #X connect 32 0 38 0; #X connect 33 0 52 0; #X connect 33 1 32 1; #X connect 34 0 33 0; #X connect 38 0 35 0; #X connect 40 0 42 0; #X connect 41 0 43 0; #X connect 42 0 41 0; #X connect 43 0 39 0; #X connect 45 0 15 0; #X connect 45 3 11 0; #X connect 50 0 52 1; #X connect 52 0 32 0; #X connect 53 0 45 2; #X coords 0 -1 1 1 220 85 2 5 5;