forest-all-around/puredata/radio_tanker_side.pd
2021-03-31 00:06:54 +09:00

271 lines
7.7 KiB
Text

#N canvas 346 129 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 747 89 533 644 world 1;
#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 16 114 resample 1000;
#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 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 obj 16 66 +;
#X obj 43 66 tgl 15 0 empty ONOFF r:ONOFF 17 7 0 10 -262144 -1 -1 0
1;
#X msg 285 438 0.03;
#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 51 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 49 0;
#X connect 45 0 1 0;
#X connect 48 0 15 0;
#X connect 49 0 0 0;
#X connect 50 0 49 1;
#X connect 51 0 15 0;
#X restore 167 226 pd world and me;
#N canvas 548 302 673 530 expressions 0;
#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 25 float 3;
#A 0 1.30476 0.0857143 1.31428 1.31428 1.31428 0.00952381 1.30476 1.31428
1.31428 1.31428 1.31428 0.12381 1.31428 1.31428 1.31428 0.00952381
1.30476 0.0857143 1.30476 0.0952381 1.30476 1.30476 0.171429 1.30476
1.30476;
#X coords 0 1 25 0 150 105 1 0 0;
#X restore 333 38 graph;
#N canvas 84 25 450 278 (subpatch) 0;
#X array tankerS2 16 float 3;
#A 0 0.819047 0.771428 0.752381 2.74181e-06 0.00952315 0.00952315 0.638096
0.666667 0.8 0.942857 0.161907 0.019051 0.866666 0.428573 0.342856
0.257142;
#X coords 0 1 16 0 150 105 1 0 0;
#X restore 173 38 graph;
#N canvas 0 23 450 278 (subpatch) 0;
#X array tankerS1 20 float 3;
#A 0 0.87619 0.885714 0.885714 0.895238 0.857143 0.8 0.72381 0.64762
0.57143 0.552383 0.600001 0.64762 0.733334 0.838095 0.971428 1.12381
1.21905 1.23809 1.23809 1.22857;
#X coords 0 1 20 0 150 105 1 0 0;
#X restore 13 38 graph;
#N canvas 0 23 450 278 (subpatch) 0;
#X array tankerS4 40 float 3;
#A 0 0.0190476 0.0190476 0.104762 0.190479 0.266669 0.342859 0.466668
0.952379 0.0190476 3.57628e-07 3.57628e-07 3.57628e-07 0.142857 0.238095
0.342857 0.457144 0.542858 0.647619 0.990474 3.57628e-07 3.57628e-07
3.57628e-07 0.00952411 0.00952411 0.133333 0.219048 0.352383 0.466668
0.657143 0.999999 0.0380952 0.0380952 0.0285741 0.0285716 0.19048 0.295238
0.438096 0.580952 0.666667 0.990476;
#X coords 0 1 40 0 150 105 1 0 0;
#X restore 493 38 graph;
#X obj 161 295 array_copier tankerS;
#X obj 22 209 count 4;
#N canvas 84 25 450 278 (subpatch) 0;
#X array tankerS0 10 float 3;
#A 0 0.942858 0.97143 0.980954 0.84762 0.771429 0.923811 0.666679 0.704758
0.371439 0.504763;
#X coords 0 1 10 0 150 105 1 0 0;
#X restore 173 400 graph;
#X obj 76 368 t b b;
#X msg 103 389 0;
#X obj 76 348 bng 15 250 50 0 empty ACT0 r:ACT0 17 7 0 10 -262144 -1
-1;
#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 connect 14 0 1 0;
#X connect 14 1 15 0;
#X connect 15 0 11 0;
#X connect 16 0 14 0;
#X restore 48 226 pd expressions;
#N canvas 0 23 450 278 (subpatch) 0;
#X array tankerS 25 float 3;
#A 0 1.30476 0.0857143 1.31428 1.31428 1.31428 0.00952381 1.30476 1.31428
1.31428 1.31428 1.31428 0.12381 1.31428 1.31428 1.31428 0.00952381
1.30476 0.0857143 1.30476 0.0952381 1.30476 1.30476 0.171429 1.30476
1.30476;
#X coords 0 1 25 0 50 50 1 0 0;
#X restore 29 46 graph;
#X obj 23 138 hradio 15 1 0 4 empty \$0-word empty 0 -8 0 10 -204786
-159808 -1 2;
#X obj 88 7 bng 15 250 50 0 empty empty empty 17 7 0 10 -204786 -159808
-1;
#X obj 88 24 tgl 15 0 empty \$0-status-now empty 17 7 0 10 -204786
-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 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 obj 85 306 riff1_random 20 1041 500 700;
#X connect 0 0 32 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 32 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 32 1;
#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 connect 32 0 16 0;
#X connect 32 3 2 0;
#X coords 0 -1 1 1 100 150 2 5 5;