doohoyi/forest-all-around
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity
forest-all-around/puredata/radio_theatre_0.forest-of-unknown/radio_earth.pd

293 lines
9 KiB
Text
Raw Blame History

#N canvas 466 23 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 611 88 533 644 world 0;
#X floatatom 16 93 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 90 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 20 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 text 378 440 working stress;
#X text 378 460 resting relax;
#X msg 304 462 -0.005;
#X obj 16 210 < 0.8;
#X obj 16 39 r WORLD_ENERGY;
#X obj 49 66 tgl 15 0 empty \$0-SLEEP r:0-SLEEP 17 7 0 10 -262144 -1
-1 0 1;
#X obj 158 31 tgl 15 0 empty WORLD_SLEEP r:WORLD_SLEEP 17 7 0 10 -262144
-1 -1 0 1;
#X obj 158 51 s \$0-SLEEP;
#X obj 16 66 +;
#X msg 285 439 0.02;
#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 47 0;
#X connect 18 0 15 0;
#X connect 18 1 34 0;
#X connect 19 0 53 0;
#X connect 19 1 46 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 46 0 15 0;
#X connect 47 0 1 0;
#X connect 48 0 52 0;
#X connect 49 0 52 1;
#X connect 50 0 51 0;
#X connect 52 0 0 0;
#X connect 53 0 15 0;
#X restore 167 226 pd world and me;
#N canvas 440 146 715 368 expressions 0;
#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 38 224 count 4;
#N canvas 0 23 450 278 (subpatch) 0;
#X array earth1 50 float 3;
#A 0 0.0761902 0.095238 0.133333 0.152381 0.180953 0.190477 0.200001
0.200001 0.200001 0.180953 0.161905 0.142857 0.171429 0.209524 0.228572
0.24762 0.266668 0.285715 0.285715 0.304763 0.304763 0.314287 0.304763
0.276191 0.257144 0.276191 0.295239 0.314287 0.323811 0.333335 0.352382
0.361906 0.37143 0.37143 0.361906 0.323811 0.209524 0.228572 0.238096
0.257144 0.266668 0.266668 0.285715 0.295239 0.295239 0.295239 0.295239
0.285715 0.257144 0.228572;
#X coords 0 1 50 0 150 105 1 0 0;
#X restore 40 40 graph;
#N canvas 0 23 450 278 (subpatch) 0;
#X array earth2 50 float 3;
#A 0 0.0285741 0.123812 0.152383 0.190478 0.219049 0.24762 0.285715
0.32381 0.352382 0.4 0.447619 0.495238 0.485714 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.0190485 -0.00952101 0.00952649 0.028574
0.0857165 0.109526 0.133335 0.17143 0.200001 0.257144 0.304763 0.333334
0.4 0.419048 0.00952381 5.96046e-08 5.96046e-08 5.96046e-08 5.96046e-08
5.96046e-08 5.96046e-08 5.96046e-08 5.96046e-08 5.96046e-08 5.96046e-08
;
#X coords 0 1 50 0 150 105 1 0 0;
#X restore 200 40 graph;
#N canvas 0 23 450 278 (subpatch) 0;
#X array earth3 50 float 3;
#A 0 0.209524 0.209524 0.209524 0.209524 0.209524 0.0285714 0.0285714
0.0285714 0 0 0 0 0 0.0285714 0.0380952 0.0380952 0.209524 0.209524
0.209524 0.209524 0.0380952 0 0 0 0 0 0 0 0.0380952 0.0380952 0.219047
0.219047 0.219047 0.219047 0.219047 0.219047 0.219047 0.219047 0 0
0 0 0 0 0 0.219048 0.219048 0.219048 0.219048 0.228571;
#X coords 0 1 50 0 150 105 1 0 0;
#X restore 360 40 graph;
#N canvas 0 23 450 278 (subpatch) 0;
#X array earth4 50 float 3;
#A 0 0.0571424 0.0761902 0.133332 0.209523 0.247619 0.304763 0.323811
0.276191 0.190477 0.152381 0.0761902 0.12381 0.161905 0.276191 0.342859
0.24762 0.180953 0.142858 0.0666666 0.114286 0.228572 0.304763 0.37143
0.380954 0.304763 0.238096 0.161905 0.12381 0.0761905 0.0857143 0.171429
0.24762 0.304763 0.361906 0.37143 0.342858 0.314287 0.266668 0.219048
0.152381 0.0761902 0.180953 0.219048 0.295239 0.380954 0.428573 0.380954
0.304763 0.171429 0.0666663;
#X coords 0 1 50 0 150 105 1 0 0;
#X restore 520 40 graph;
#X obj 148 310 array_copier earth;
#X obj 171 172 loadbang;
#X obj 171 214 s \$0-word-max;
#X obj 77 183 r \$0-word-max;
#X floatatom 77 204 5 0 0 0 - - -;
#X msg 171 193 4;
#X connect 0 0 7 0;
#X connect 2 0 1 0;
#X connect 2 1 5 0;
#X connect 5 0 6 0;
#X connect 6 0 12 0;
#X connect 7 0 2 0;
#X connect 7 0 3 0;
#X connect 12 0 4 0;
#X connect 13 0 17 0;
#X connect 15 0 16 0;
#X connect 16 0 7 1;
#X connect 17 0 14 0;
#X restore 48 226 pd expressions;
#N canvas 0 23 450 278 (subpatch) 0;
#X array earth 50 float 3;
#A 0 0.0571424 0.0761902 0.133332 0.209523 0.247619 0.304763 0.323811
0.276191 0.190477 0.152381 0.0761902 0.12381 0.161905 0.276191 0.342859
0.24762 0.180953 0.142858 0.0666666 0.114286 0.228572 0.304763 0.37143
0.380954 0.304763 0.238096 0.161905 0.12381 0.0761905 0.0857143 0.171429
0.24762 0.304763 0.361906 0.37143 0.342858 0.314287 0.266668 0.219048
0.152381 0.0761902 0.180953 0.219048 0.295239 0.380954 0.428573 0.380954
0.304763 0.171429 0.0666663;
#X coords 0 1 50 0 50 50 1 0 0;
#X restore 29 26 graph;
#X obj 9 106 hradio 15 1 0 4 empty \$0-word empty 0 -8 0 10 -204786
-4160 -1 3;
#X obj 88 7 bng 15 250 50 0 empty empty empty 17 7 0 10 -204786 -4160
-1;
#X obj 88 24 tgl 15 0 empty \$0-status-now empty 17 7 0 10 -204786
-4160 -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 339 346 bng 15 250 50 0 empty \$0-reload r:reload 17 7 0 10
-262144 -1 -1;
#X obj 164 21 r EARTH;
#X obj 48 188 r EARTH;
#X obj 295 452 s EARTH_DONE;
#X obj 167 279 s EARTH;
#X msg 319 323 earth;
#X floatatom 9 88 5 0 0 0 - #0-word -;
#X obj 73 99 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 148 set \$1;
#X obj 5 128 r \$0-SLEEP;
#X obj 5 169 s \$0-SLEEP-set;
#X obj 88 306 riff1_random 50 4401 700 1000;
#X obj 233 129 v \$0-STRESS;
#X obj 233 175 v \$0-STRESS;
#X obj 233 109 bng 15 250 50 0 empty WORLD_evt_half r:WORLD_evt_half
17 7 0 10 -262144 -1 -1;
#X obj 233 152 * 0.5;
#X connect 0 0 34 0;
#X connect 1 0 24 0;
#X connect 2 0 5 0;
#X connect 2 0 22 0;
#X connect 4 0 23 0;
#X connect 5 0 6 0;
#X connect 7 0 8 0;
#X connect 9 0 4 0;
#X connect 10 0 34 0;
#X connect 13 0 4 0;
#X connect 16 0 15 0;
#X connect 17 0 16 1;
#X connect 18 0 17 0;
#X connect 19 0 24 0;
#X connect 20 0 7 0;
#X connect 21 0 10 0;
#X connect 24 0 34 1;
#X connect 27 0 29 0;
#X connect 29 0 28 0;
#X connect 31 0 33 0;
#X connect 32 0 31 0;
#X connect 34 0 16 0;
#X connect 34 3 2 0;
#X connect 35 0 38 0;
#X connect 37 0 35 0;
#X connect 38 0 36 0;
#X coords 0 -1 1 1 100 120 2 5 5;
Reference in a new issue View git blame Copy permalink