411 lines
13 KiB
Text
411 lines
13 KiB
Text
#N canvas 703 23 737 597 10;
|
|
#X msg 37 337 0;
|
|
#X obj 299 306 loadbang;
|
|
#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 114 44 1;
|
|
#X obj 114 67 v \$0-STATE;
|
|
#N canvas 747 95 533 644 world 0;
|
|
#X floatatom 16 94 5 0 0 0 - - -;
|
|
#X obj 16 293 t a b;
|
|
#X obj 16 372 spigot;
|
|
#X obj 67 357 tgl 15 0 empty empty free_:) 17 7 0 10 -262144 -1 -1
|
|
1 1;
|
|
#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 238 578 max 0;
|
|
#X text 109 114 listening speed;
|
|
#X text 56 93 speed of happenings;
|
|
#X text 69 210 world is quiet?;
|
|
#X text 90 285 status of me;
|
|
#X obj 147 329 tgl 15 0 empty empty busy. 17 7 0 10 -262144 -1 -1 0
|
|
1;
|
|
#X obj 16 451 abs;
|
|
#N canvas 2 95 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 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 200 pd;
|
|
#X obj 285 393 v \$0-STATE;
|
|
#X obj 265 525 v \$0-STRESS;
|
|
#X obj 238 601 v \$0-STRESS;
|
|
#X obj 67 311 v \$0-STATE;
|
|
#X obj 16 597 outlet;
|
|
#X obj 373 235 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
|
|
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 obj 16 114 resample 100;
|
|
#X msg 304 462 -0.05;
|
|
#X obj 16 210 < 0.57;
|
|
#X msg 285 439 0.2;
|
|
#X obj 49 66 tgl 15 0 empty \$0-SLEEP r:0-SLEEP 17 7 0 10 -262144 -1
|
|
-1 1 1;
|
|
#X obj 158 31 tgl 15 0 empty WORLD_SLEEP r:WORLD_SLEEP 17 7 0 10 -262144
|
|
-1 -1 1 1;
|
|
#X obj 158 51 s \$0-SLEEP;
|
|
#X connect 0 0 47 0;
|
|
#X connect 1 0 5 0;
|
|
#X connect 1 1 36 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 27 0;
|
|
#X connect 8 0 16 0;
|
|
#X connect 9 0 37 0;
|
|
#X connect 11 0 16 1;
|
|
#X connect 12 0 21 0;
|
|
#X connect 13 0 12 0;
|
|
#X connect 13 1 34 0;
|
|
#X connect 14 0 31 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 33 0;
|
|
#X connect 19 0 50 0;
|
|
#X connect 19 1 48 0;
|
|
#X connect 21 0 11 0;
|
|
#X connect 21 0 35 0;
|
|
#X connect 27 0 8 0;
|
|
#X connect 29 0 14 0;
|
|
#X connect 31 0 18 0;
|
|
#X connect 33 0 19 0;
|
|
#X connect 34 0 12 1;
|
|
#X connect 36 0 4 0;
|
|
#X connect 36 0 26 0;
|
|
#X connect 38 0 39 0;
|
|
#X connect 39 0 41 0;
|
|
#X connect 40 0 38 0;
|
|
#X connect 41 0 42 0;
|
|
#X connect 43 0 46 0;
|
|
#X connect 46 0 0 0;
|
|
#X connect 47 0 17 0;
|
|
#X connect 48 0 15 0;
|
|
#X connect 49 0 1 0;
|
|
#X connect 50 0 15 0;
|
|
#X connect 51 0 46 1;
|
|
#X connect 52 0 53 0;
|
|
#X restore 267 79 pd world and me;
|
|
#N canvas 159 139 691 645 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;
|
|
#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 277 507 + 1;
|
|
#X floatatom 277 530 5 0 0 0 - - -;
|
|
#X obj 138 489 t a a;
|
|
#X obj 138 577 array_copier tissueA;
|
|
#X obj 277 552 array_copier tissueB;
|
|
#N canvas 0 23 450 278 (subpatch) 0;
|
|
#X array tissueA1 30 float 3;
|
|
#A 0 0.190475 0.285714 1.90475 3.04762 5.2381 0 0.0952377 1.61903 2.76189
|
|
5.42858 0.0952387 0.0952387 3.14285 4.7619 0.0952377 1.42856 2.38095
|
|
4.38095 0.190476 0.190476 1.23808 1.5238 2.09523 2.66666 4.28571 0.190475
|
|
0.0952358 1.42856 1.99999 4.47619;
|
|
#X coords 0 10 30 0 150 105 1 0 0;
|
|
#X restore 26 41 graph;
|
|
#N canvas 1 89 450 278 (subpatch) 0;
|
|
#X array tissueB1 50 float 3;
|
|
#A 0 -0.48571 -0.504758 -0.504758 -0.495234 -0.495234 -0.466663 -0.428568
|
|
-0.40952 -0.399996 -0.390473 -0.390473 -0.380949 -0.380949 -0.390473
|
|
-0.419044 -0.447615 -0.457139 -0.476186 -0.504758 -0.504758 -0.48571
|
|
-0.504758 -0.504758 -0.495234 -0.495234 -0.466663 -0.428568 -0.40952
|
|
-0.399996 -0.390473 -0.390473 -0.380949 -0.380949 -0.390473 -0.419044
|
|
-0.447615 -0.457139 -0.476186 -0.504758 -0.504758 -0.48571 -0.504758
|
|
-0.504758 -0.495234 -0.495234 -0.466663 -0.428568 -0.40952 -0.399996
|
|
-0.390473;
|
|
#X coords 0 1 50 0 150 105 1 0 0;
|
|
#X restore 26 181 graph;
|
|
#N canvas 1 89 450 278 (subpatch) 0;
|
|
#X array tissueB3 50 float 3;
|
|
#A 0 0.0952381 0.114286 0.200001 0.228572 0.228572 0.219048 0.209525
|
|
0.171429 0.0952381 0.0666667 0.0666667 0.0952381 0.12381 0.171429 0.200001
|
|
0.219048 0.219048 0.219048 0.114286 0.990476 0.0952381 0.114286 0.200001
|
|
0.228572 0.228572 0.219048 0.209525 0.171429 0.0952381 0.0666667 0.0666667
|
|
0.0952381 0.12381 0.171429 0.200001 0.219048 0.219048 0.219048 0.114286
|
|
0.0571427 0.0952381 0.114286 0.200001 0.228572 0.228572 0.219048 0.209525
|
|
0.171429 0.0952381 0.0666667;
|
|
#X coords 0 1 50 0 150 105 1 0 0;
|
|
#X restore 346 181 graph;
|
|
#N canvas 1 89 450 278 (subpatch) 0;
|
|
#X array tissueB4 60 float 3;
|
|
#A 0 -0.171425 -0.171425 -0.171425 -0.171425 -0.171425 -0.171425 -0.171425
|
|
-0.171425 -0.171425 -0.171425 -0.171425 -0.171425 -0.171425 -0.171425
|
|
-0.171425 -0.171425 -0.171425 -0.171425 -0.171425 -0.171425 -0.171425
|
|
-0.171425 -0.171425 -0.171425 -0.171425 -0.171425 -0.171425 -0.171425
|
|
-0.171425 -0.171425 -0.171425 -0.171425 -0.171425 -0.171425 -0.171425
|
|
-0.171425 -0.171425 -0.171425 -0.171425 -0.171425 -0.171425 -0.171425
|
|
-0.171425 -0.171425 -0.171425 -0.171425 -0.171425 -0.171425 -0.171425
|
|
-0.171425 -0.171425 -0.171425 -0.171425 -0.171425 -0.171425 -0.171425
|
|
-0.171425 -0.171425 -0.171425 -0.171425;
|
|
#X coords 0 1 60 0 150 105 1 0 0;
|
|
#X restore 506 181 graph;
|
|
#N canvas 0 23 450 278 (subpatch) 0;
|
|
#X array tissueA2 45 float 3;
|
|
#A 0 7.52381 0.857142 0.857142 0.857142 6.57143 0.857142 0.857142 0.952381
|
|
5.90476 0.857142 0.857142 0.857142 6.66667 0.857142 0.761904 0.761904
|
|
7.33333 0.761904 0.761904 0.761904 0.761904 5.71429 0.761904 0.666665
|
|
0.666665 7.04762 0.571426 0.571426 0.666665 0.666665 5.61905 0.571426
|
|
0.571426 7.90476 0.761904 6.66667 0.761904 0.761904 0.761904 6.95238
|
|
0.761904 0.666665 0.666665 6.09525 0.761905;
|
|
#X coords 0 10 45 0 150 105 1 0 0;
|
|
#X restore 186 41 graph;
|
|
#N canvas 0 23 450 278 (subpatch) 0;
|
|
#X array tissueA3 30 float 3;
|
|
#A 0 1.61905 2.19048 2.95239 2.09524 2.66667 2.4762 2.76191 1.52381
|
|
1.42857 0.857138 1.04762 1.61905 1.80952 4.38097 1.23809 2.85715 2.09524
|
|
4 2.09524 1.42857 1.14285 1.14285 2.76191 3.90478 2 1.42857 3.61906
|
|
2.57143 1.04762 1.23809;
|
|
#X coords 0 10 30 0 150 105 1 0 0;
|
|
#X restore 346 41 graph;
|
|
#N canvas 0 23 450 278 (subpatch) 0;
|
|
#X array tissueA4 20 float 3;
|
|
#A 0 2.19048 5.33332 4.19046 0.0952377 0.0952377 5.14285 6.09524 1.04762
|
|
4.09523 2.19045 4.66666 0.380951 0.380951 1.99997 3.33331 3.80953 0.285714
|
|
0.285714 3.90475 4.85713;
|
|
#X coords 0 10 20 0 150 105 1 0 0;
|
|
#X restore 506 41 graph;
|
|
#N canvas 1 89 450 278 (subpatch) 0;
|
|
#X array tissueB2 50 float 3;
|
|
#A 0 0.133333 0.104761 0.0476179 -0.0380969 -0.123812 -0.209527 -0.323813
|
|
-0.361908 -0.39048 -0.400004 -0.400004 -0.380956 -0.361908 -0.333337
|
|
-0.257146 -0.190479 -0.0857162 0.0285702 0.0761895 0.123809 0.133333
|
|
0.104761 0.0476179 -0.0380969 -0.123812 -0.209527 -0.323813 -0.361908
|
|
-0.39048 -0.400004 -0.400004 -0.380956 -0.361908 -0.333337 -0.257146
|
|
-0.190479 -0.0857162 0.0285702 0.0761895 0.123809 0.133333 0.104761
|
|
0.0476179 -0.0380969 -0.123812 -0.209527 -0.323813 -0.361908 -0.39048
|
|
-0.400004;
|
|
#X coords 0 1 50 0 150 105 1 0 0;
|
|
#X restore 186 181 graph;
|
|
#N canvas 84 25 450 278 (subpatch) 0;
|
|
#X array tissueA0 10 float 3;
|
|
#A 0 0.942858 0.97143 0.980954 0.84762 0.771429 0.990478 0.961906 0.619048
|
|
0.8 0.790477;
|
|
#X coords 0 1 10 0 150 105 1 0 0;
|
|
#X restore 389 408 graph;
|
|
#X obj 48 561 t b b;
|
|
#X msg 75 582 0;
|
|
#X obj 48 541 bng 15 250 50 0 empty ACT0 r:ACT0 17 7 0 10 -262144 -1
|
|
-1;
|
|
#X obj 28 448 count 4;
|
|
#X obj 161 396 loadbang;
|
|
#X obj 161 438 s \$0-word-max;
|
|
#X obj 67 407 r \$0-word-max;
|
|
#X floatatom 67 428 5 0 0 0 - - -;
|
|
#X msg 161 417 4;
|
|
#X connect 0 0 24 0;
|
|
#X connect 2 0 1 0;
|
|
#X connect 2 1 9 0;
|
|
#X connect 5 0 6 0;
|
|
#X connect 6 0 10 0;
|
|
#X connect 7 0 8 0;
|
|
#X connect 8 0 11 0;
|
|
#X connect 9 0 5 0;
|
|
#X connect 9 1 7 0;
|
|
#X connect 10 0 4 0;
|
|
#X connect 21 0 1 0;
|
|
#X connect 21 1 22 0;
|
|
#X connect 22 0 10 0;
|
|
#X connect 23 0 21 0;
|
|
#X connect 24 0 2 0;
|
|
#X connect 24 0 3 0;
|
|
#X connect 25 0 29 0;
|
|
#X connect 27 0 28 0;
|
|
#X connect 28 0 24 1;
|
|
#X connect 29 0 26 0;
|
|
#X restore 48 256 pd expressions;
|
|
#X obj 88 429 s NOTE;
|
|
#X obj 88 406 spigot;
|
|
#X obj 365 513 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
|
|
1;
|
|
#X obj 365 490 loadbang;
|
|
#N canvas 0 23 450 278 (subpatch) 0;
|
|
#X array tissueA 20 float 3;
|
|
#A 0 2.19048 5.33332 4.19046 0.0952377 0.0952377 5.14285 6.09524 1.04762
|
|
4.09523 2.19045 4.66666 0.380951 0.380951 1.99997 3.33331 3.80953 0.285714
|
|
0.285714 3.90475 4.85713;
|
|
#X coords 0 10 20 0 25 25 1 0 0;
|
|
#X restore 34 46 graph;
|
|
#X obj 9 136 hradio 15 1 0 4 empty \$0-word empty 0 -8 0 10 -191407
|
|
-159808 -1 3;
|
|
#X obj 88 7 bng 15 250 50 0 empty empty empty 17 7 0 10 -191407 -159808
|
|
-1;
|
|
#N canvas 0 23 450 278 (subpatch) 0;
|
|
#X array tissueB 60 float 3;
|
|
#A 0 -0.171425 -0.171425 -0.171425 -0.171425 -0.171425 -0.171425 -0.171425
|
|
-0.171425 -0.171425 -0.171425 -0.171425 -0.171425 -0.171425 -0.171425
|
|
-0.171425 -0.171425 -0.171425 -0.171425 -0.171425 -0.171425 -0.171425
|
|
-0.171425 -0.171425 -0.171425 -0.171425 -0.171425 -0.171425 -0.171425
|
|
-0.171425 -0.171425 -0.171425 -0.171425 -0.171425 -0.171425 -0.171425
|
|
-0.171425 -0.171425 -0.171425 -0.171425 -0.171425 -0.171425 -0.171425
|
|
-0.171425 -0.171425 -0.171425 -0.171425 -0.171425 -0.171425 -0.171425
|
|
-0.171425 -0.171425 -0.171425 -0.171425 -0.171425 -0.171425 -0.171425
|
|
-0.171425 -0.171425 -0.171425 -0.171425;
|
|
#X coords 0 1 60 0 25 25 1 0 0;
|
|
#X restore 34 88 graph;
|
|
#X obj 88 24 tgl 15 0 empty \$0-status-now empty 17 7 0 10 -191407
|
|
-159808 -1 0 1;
|
|
#X msg 417 337 0;
|
|
#X obj 629 306 loadbang;
|
|
#X text 415 318 stop!;
|
|
#X obj 468 479 s NOTE;
|
|
#X obj 468 406 spigot;
|
|
#X obj 319 352 bng 15 250 50 0 empty \$0-reload r:reload 17 7 0 10
|
|
-262144 -1 -1;
|
|
#X obj 649 352 bng 15 250 50 0 empty \$0-reload r:reload 17 7 0 10
|
|
-262144 -1 -1;
|
|
#X obj 114 21 r TISSUE;
|
|
#X obj 48 218 r TISSUE;
|
|
#X obj 267 122 s TISSUE;
|
|
#X msg 299 329 tissueA;
|
|
#X msg 629 329 tissueB;
|
|
#X obj 468 306 riff1 800 20200 1000;
|
|
#X obj 88 306 riff1_random 1 3001 600 1000;
|
|
#X obj 216 428 phasor~ 2;
|
|
#X floatatom 216 406 5 0 0 0 - - -;
|
|
#X obj 216 451 >~ 0.03;
|
|
#X obj 563 538 unpack f f;
|
|
#X obj 563 561 s X1;
|
|
#X obj 620 561 s X2;
|
|
#X msg 563 516 \$1 1000;
|
|
#X obj 281 429 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
|
|
1;
|
|
#X obj 216 490 *~;
|
|
#X msg 281 406 0;
|
|
#X msg 314 406 1;
|
|
#X text 468 441 motor stop!;
|
|
#X obj 355 401 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
|
|
-1 -1;
|
|
#X msg 375 401 0;
|
|
#X obj 375 424 v \$0-STATE;
|
|
#X obj 355 446 s TISSUE_DONE;
|
|
#X obj 216 549 dac~;
|
|
#X obj 433 140 v \$0-STRESS;
|
|
#X obj 433 186 v \$0-STRESS;
|
|
#X obj 433 120 bng 15 250 50 0 empty WORLD_evt_half r:WORLD_evt_half
|
|
17 7 0 10 -262144 -1 -1;
|
|
#X obj 433 163 * 0.5;
|
|
#X floatatom 320 449 5 0 0 0 - - -;
|
|
#X floatatom 265 509 5 0 0 0 - - -;
|
|
#X obj 281 449 * 0.2;
|
|
#X floatatom 9 118 5 0 0 0 - #0-word -;
|
|
#X obj 72 119 nbx 2 14 -1e+37 1e+37 0 0 \$0-word-max \$0-word-max-set
|
|
w 0 -8 0 10 -191407 -33289 -1 4 256;
|
|
#X obj 114 98 r \$0-word-max;
|
|
#X obj 114 139 s \$0-word-max-set;
|
|
#X msg 114 118 set \$1;
|
|
#X obj 9 66 tgl 15 0 \$0-SLEEP \$0-SLEEP-set s 3 -7 0 10 -66577 -257985
|
|
-1 0 1;
|
|
#X msg 5 178 set \$1;
|
|
#X obj 5 158 r \$0-SLEEP;
|
|
#X obj 5 199 s \$0-SLEEP-set;
|
|
#X connect 0 0 30 0;
|
|
#X connect 1 0 27 0;
|
|
#X connect 3 0 26 0;
|
|
#X connect 4 0 5 0;
|
|
#X connect 6 0 3 0;
|
|
#X connect 7 0 30 0;
|
|
#X connect 7 0 41 0;
|
|
#X connect 9 0 8 0;
|
|
#X connect 10 0 9 1;
|
|
#X connect 10 0 21 1;
|
|
#X connect 11 0 10 0;
|
|
#X connect 14 0 3 0;
|
|
#X connect 17 0 29 0;
|
|
#X connect 18 0 28 0;
|
|
#X connect 22 0 27 0;
|
|
#X connect 23 0 28 0;
|
|
#X connect 24 0 4 0;
|
|
#X connect 25 0 7 0;
|
|
#X connect 27 0 30 1;
|
|
#X connect 28 0 29 1;
|
|
#X connect 29 0 21 0;
|
|
#X connect 29 2 37 0;
|
|
#X connect 30 0 9 0;
|
|
#X connect 30 2 32 0;
|
|
#X connect 30 3 40 0;
|
|
#X connect 30 3 43 0;
|
|
#X connect 31 0 33 0;
|
|
#X connect 32 0 31 0;
|
|
#X connect 33 0 39 0;
|
|
#X connect 34 0 35 0;
|
|
#X connect 34 1 36 0;
|
|
#X connect 37 0 34 0;
|
|
#X connect 38 0 54 0;
|
|
#X connect 39 0 47 1;
|
|
#X connect 40 0 38 0;
|
|
#X connect 41 0 38 0;
|
|
#X connect 43 0 44 0;
|
|
#X connect 43 0 46 0;
|
|
#X connect 44 0 45 0;
|
|
#X connect 48 0 51 0;
|
|
#X connect 50 0 48 0;
|
|
#X connect 51 0 49 0;
|
|
#X connect 52 0 54 1;
|
|
#X connect 54 0 39 1;
|
|
#X connect 54 0 53 0;
|
|
#X connect 57 0 59 0;
|
|
#X connect 59 0 58 0;
|
|
#X connect 61 0 63 0;
|
|
#X connect 62 0 61 0;
|
|
#X coords 0 -1 1 1 100 150 2 5 5;
|