doohoyi/forest-all-around
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity
forest-all-around/puredata/radio_theatre_2.mubupu/forest/radio_flagA.pd
Dooho Yi 56b05e6a3d mubupu
2022-12-19 14:51:21 +09:00

371 lines
11 KiB
Text
Raw Blame History

#N canvas 595 23 829 496 10;
#N canvas 240 25 392 534 expressions 0;
#X obj 55 312 inlet;
#X obj 55 393 outlet;
#X obj 55 364 t b a;
#X obj 243 400 s \$0-word;
#X obj 165 493 bng 15 250 50 0 \$0-reload empty s:reload 17 7 0 10 #fcfcfc #000000 #000000;
#X obj 165 425 + 1;
#X floatatom 165 448 5 0 0 0 - - - 0;
#X obj 165 382 t a a;
#X obj 188 289 loadbang;
#X obj 188 331 s \$0-word-max;
#X obj 94 300 r \$0-word-max;
#X floatatom 94 321 5 0 0 0 - - - 0;
#X obj 55 341 count 1;
#X msg 188 310 1;
#N canvas 0 50 450 250 (subpatch) 0;
#X array flagA1 20 float 3;
#A 0 0.471429 0.521429 0.378571 0.364285 0.414286 0.428573 0.535714 0.335712 0.678571 0.707143 0.514286 0.321429 0.578571 0.371429 0.492857 0.407143 0.514286 0.435715 0.471429 0.600005;
#X coords 0 1 20 0 150 105 1 0 0;
#X restore 45 52 graph;
#X obj 165 470 array_copier flagA;
#X connect 0 0 12 0;
#X connect 2 0 1 0;
#X connect 2 1 7 0;
#X connect 5 0 6 0;
#X connect 6 0 15 0;
#X connect 7 0 5 0;
#X connect 7 1 3 0;
#X connect 8 0 13 0;
#X connect 10 0 11 0;
#X connect 11 0 12 1;
#X connect 12 0 2 0;
#X connect 13 0 9 0;
#X connect 15 0 4 0;
#X restore 88 250 pd expressions;
#N canvas 0 23 450 278 (subpatch) 0;
#X array flagA 20 float 3;
#A 0 0.471429 0.521429 0.378571 0.364285 0.414286 0.428573 0.535714 0.335712 0.678571 0.707143 0.514286 0.321429 0.578571 0.371429 0.492857 0.407143 0.514286 0.435715 0.471429 0.600005;
#X coords 0 1 20 0 25 25 1 0 0;
#X restore 38 58 graph;
#X obj 9 136 hradio 15 1 0 6 empty \$0-word empty 0 -8 0 10 #7c7c7c #00fc04 #000000 0;
#X obj 88 7 bng 15 250 50 0 empty empty empty 17 7 0 10 #7c7c7c #00fc04 #000000;
#X obj 88 24 tgl 15 0 empty \$0-status-now empty 17 7 0 10 #7c7c7c #00fc04 #000000 0 1;
#X msg 37 341 0;
#X obj 316 310 loadbang;
#X obj 302 410 bng 15 250 50 0 empty empty empty 17 7 0 10 #fcfcfc #000000 #000000;
#X text 35 322 stop!;
#X msg 322 410 0;
#X obj 322 433 v \$0-STATE;
#X obj 339 356 bng 15 250 50 0 empty \$0-reload r:reload 17 7 0 10 #fcfcfc #000000 #000000;
#X floatatom 9 118 5 0 0 0 - \$0-word - 0;
#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 #b8b8b8 #202020 #000000 0 256;
#X obj 9 66 tgl 15 0 \$0-SLEEP \$0-SLEEP-set s 3 -7 0 10 #404040 #f8fc00 #000000 0 1;
#X obj 607 407 s NOTE;
#X obj 607 77 tgl 15 0 empty empty empty 17 7 0 10 #fcfcfc #000000 #000000 0 1;
#X obj 634 342 s X1;
#X obj 607 132 f;
#X obj 657 135 + 1;
#X obj 607 155 mod 2;
#X floatatom 607 178 5 0 0 0 - - - 0;
#X obj 607 109 metro 500;
#X floatatom 658 59 5 0 0 0 - - - 0;
#X obj 607 291 t a b;
#X obj 607 200 * 2;
#X obj 607 223 - 1;
#X floatatom 607 269 5 0 0 0 - - - 0;
#X msg 607 378 4998 0 \$1 2;
#X obj 634 319 f 300;
#X obj 302 456 s FLAGA_DONE;
#X msg 316 333 flagA;
#X obj 88 310 riff1_random 500 4998 1000 1300;
#X obj 88 279 t b b;
#X msg 198 279 1;
#X obj 607 246 * 100;
#X obj 596 26 loadbang;
#X msg 593 47 0;
#X obj 186 153 bng 15 250 50 0 empty empty motivated! 17 7 0 10 #fcfcfc #000000 #000000;
#N canvas 376 23 931 802 world 0;
#X obj 529 67 bng 15 250 50 0 empty empty register\ me\ :) 17 7 0 10 #fcfcfc #000000 #000000;
#X text 722 95 on 'connect';
#X obj 556 284 print \$0-myplace;
#X obj 670 420 pack f f;
#X obj 577 346 loadbang;
#X obj 670 346 snapshot~;
#X msg 670 292 start;
#X msg 720 292 stop;
#X obj 577 369 tgl 15 0 empty empty empty 17 7 0 10 #fcfcfc #000000 #000000 0 1;
#X floatatom 670 371 5 0 0 0 - - - 0;
#X obj 577 389 metro 50;
#X obj 670 321 ear~ 2000 10000;
#X obj 670 261 sel 1 0;
#X obj 670 235 tgl 15 0 empty \$0-feed r:0-feed 17 7 0 10 #fcfcfc #000000 #000000 0 1;
#X obj 670 443 spigot;
#X obj 623 461 tgl 15 0 empty empty empty 17 7 0 10 #fcfcfc #000000 #000000 0 1;
#X msg 529 443 1;
#X obj 529 232 r \$0-onconnect-listen;
#X obj 529 87 symbol \$0-onconnect-listen;
#X text 780 18 * group interactions;
#X obj 529 28 loadbang;
#X obj 529 255 t b a;
#X text 713 184 feedback to 'world';
#X obj 835 74 loadbang;
#X msg 835 99 \; pd dsp 1;
#X obj 529 209 s world_onconnect;
#X floatatom 20 206 5 0 0 0 - - - 0;
#X obj 20 395 t a b;
#X obj 20 474 spigot;
#X obj 71 459 tgl 15 0 empty empty free_:) 17 7 0 10 #fcfcfc #000000 #000000 0 1;
#X obj 71 436 == 0;
#X obj 20 418 sel 1;
#X text 45 564 think;
#X obj 20 590 gauss 1 0;
#X floatatom 20 636 5 0 0 0 - - - 0;
#X obj 20 706 sel 1;
#X obj 69 724 tgl 15 0 empty empty empty 17 7 0 10 #fcfcfc #000000 #000000 0 1;
#X floatatom 114 666 5 0 0 0 stress - - 0;
#X obj 20 683 >;
#X obj 38 236 bng 15 250 50 0 empty empty listen 17 7 0 10 #b8b8b8 #f8fc00 #000000;
#X text 73 312 world is quiet?;
#X text 94 387 status of me;
#X obj 151 431 tgl 15 0 empty empty busy. 17 7 0 10 #fcfcfc #000000 #000000 0 1;
#X obj 20 613 abs;
#X text 82 329 condition of state change;
#X obj 71 413 v \$0-STATE;
#X obj 20 759 outlet;
#X obj 20 178 +;
#X obj 53 178 tgl 15 0 empty \$0-SLEEP r:0-SLEEP 17 7 0 10 #fcfcfc #000000 #000000 0 1;
#X obj 270 136 tgl 15 0 empty empty empty 17 7 0 10 #fcfcfc #000000 #000000 0 1;
#X obj 270 156 s \$0-SLEEP;
#X obj 90 26 loadbang;
#X floatatom 20 136 5 0 0 0 - - - 0;
#X obj 340 26 loadbang;
#X obj 270 72 metro 200;
#X obj 20 72 metro 100;
#X obj 20 26 bng 15 250 50 0 empty empty empty 17 7 0 10 #fcfcfc #000000 #000000;
#X obj 270 26 bng 15 250 50 0 empty empty empty 17 7 0 10 #fcfcfc #000000 #000000;
#X msg 150 524 set \$1;
#X msg 213 547 set \$1;
#X obj 20 113 v world_energy_sum;
#X obj 270 113 v world_sleep;
#X obj 150 476 loadbang;
#X obj 213 499 loadbang;
#X obj 90 56 r world_run_step;
#X obj 670 480 s world_status;
#X obj 789 216 r world_run_step;
#X obj 789 237 t f f;
#X obj 789 258 * 20;
#X obj 826 258 * 100;
#X floatatom 789 279 5 0 0 0 - - - 0;
#X floatatom 826 279 7 0 0 0 - - - 0;
#X obj 670 395 * 0.2;
#X obj 282 687 +;
#X obj 282 634 t a b;
#X obj 282 428 tgl 15 0 empty empty empty 17 7 0 10 #fcfcfc #000000 #000000 0 1;
#X floatatom 282 612 8 0 0 0 - - - 0;
#X obj 282 477 t b b;
#X obj 329 518 sel 1 0;
#X obj 282 710 max 0;
#N canvas 0 50 450 250 (subpatch) 0;
#X array \$0-stress 100 float 2;
#X coords 0 100 100 0 200 200 1 0 0;
#X restore 611 557 graph;
#X obj 282 405 loadbang;
#X obj 282 448 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 obj 122 38 r world_run_step;
#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 connect 10 0 0 1;
#X restore 819 741 pd;
#X obj 329 495 v \$0-STATE;
#X obj 309 657 v \$0-STRESS;
#X obj 282 733 v \$0-STRESS;
#X obj 382 336 tgl 15 0 empty empty empty 17 7 0 10 #fcfcfc #000000 #000000 0 1;
#X obj 382 356 metro 50;
#X obj 382 313 loadbang;
#X obj 382 379 v \$0-STATE;
#X obj 382 402 s \$0-status-now;
#X floatatom 329 542 5 0 0 1 working\ stress - - 0;
#X floatatom 348 565 5 0 0 1 resting\ relax - - 0;
#X obj 382 432 r world_run_step;
#X obj 348 591 * 1;
#X obj 393 614 r world_relax_x;
#X obj 20 312 < 0.2;
#X msg 150 497 0.25;
#X msg 213 520 -0.05;
#X connect 0 0 18 0;
#X connect 3 0 14 0;
#X connect 4 0 8 0;
#X connect 5 0 9 0;
#X connect 6 0 11 0;
#X connect 7 0 11 0;
#X connect 8 0 10 0;
#X connect 9 0 72 0;
#X connect 10 0 5 0;
#X connect 11 0 5 0;
#X connect 12 0 6 0;
#X connect 12 1 7 0;
#X connect 13 0 12 0;
#X connect 14 0 65 0;
#X connect 15 0 14 1;
#X connect 16 0 15 0;
#X connect 17 0 21 0;
#X connect 18 0 25 0;
#X connect 20 0 0 0;
#X connect 21 0 16 0;
#X connect 21 1 3 1;
#X connect 21 1 2 0;
#X connect 23 0 24 0;
#X connect 26 0 39 0;
#X connect 26 0 97 0;
#X connect 27 0 31 0;
#X connect 27 1 45 0;
#X connect 28 0 33 0;
#X connect 29 0 28 1;
#X connect 30 0 29 0;
#X connect 31 0 28 0;
#X connect 33 0 43 0;
#X connect 34 0 38 0;
#X connect 35 0 46 0;
#X connect 37 0 38 1;
#X connect 38 0 35 0;
#X connect 38 0 36 0;
#X connect 43 0 34 0;
#X connect 45 0 30 0;
#X connect 45 0 42 0;
#X connect 47 0 26 0;
#X connect 48 0 47 1;
#X connect 49 0 50 0;
#X connect 51 0 55 0;
#X connect 52 0 47 0;
#X connect 53 0 54 0;
#X connect 54 0 61 0;
#X connect 55 0 60 0;
#X connect 56 0 55 0;
#X connect 57 0 54 0;
#X connect 58 0 92 0;
#X connect 59 0 93 0;
#X connect 60 0 52 0;
#X connect 61 0 49 0;
#X connect 62 0 98 0;
#X connect 63 0 99 0;
#X connect 64 0 55 1;
#X connect 66 0 67 0;
#X connect 67 0 68 0;
#X connect 67 1 69 0;
#X connect 68 0 70 0;
#X connect 69 0 71 0;
#X connect 70 0 11 1;
#X connect 71 0 11 2;
#X connect 72 0 3 0;
#X connect 73 0 79 0;
#X connect 74 0 73 0;
#X connect 74 1 85 0;
#X connect 75 0 82 0;
#X connect 76 0 74 0;
#X connect 77 0 76 0;
#X connect 77 1 84 0;
#X connect 78 0 92 0;
#X connect 78 1 93 0;
#X connect 79 0 86 0;
#X connect 79 0 37 0;
#X connect 81 0 75 0;
#X connect 82 0 77 0;
#X connect 84 0 78 0;
#X connect 85 0 73 1;
#X connect 87 0 88 0;
#X connect 88 0 90 0;
#X connect 89 0 87 0;
#X connect 90 0 91 0;
#X connect 92 0 76 0;
#X connect 93 0 95 0;
#X connect 94 0 82 1;
#X connect 95 0 76 0;
#X connect 96 0 95 1;
#X connect 97 0 27 0;
#X connect 98 0 58 0;
#X connect 99 0 59 0;
#X restore 186 126 pd world and me;
#X obj 337 36 v \$0-STRESS;
#X obj 337 82 v \$0-STRESS;
#X obj 337 16 bng 15 250 50 0 empty WORLD_evt_half r:WORLD_evt_half 17 7 0 10 #fcfcfc #000000 #000000;
#X obj 337 59 * 0.5;
#X obj 337 197 r \$0-word-max;
#X obj 337 238 s \$0-word-max-set;
#X msg 337 217 set \$1;
#X msg 337 139 set \$1;
#X obj 337 119 r \$0-SLEEP;
#X obj 337 160 s \$0-SLEEP-set;
#X msg 186 179 1;
#X obj 186 232 v \$0-STATE;
#X obj 196 207 tgl 15 0 \$0-feed empty s:0-feed 17 7 0 10 #fcfcfc #000000 #000000 0 1;
#X obj 8 166 v \$0-STATE;
#X obj 8 189 sel 1 0;
#X obj 362 399 tgl 15 0 \$0-feed empty s:0-feed 17 7 0 10 #fcfcfc #000000 #000000 0 1;
#X obj 189 20 tgl 15 0 empty \$0-feed r:0-feed 17 7 0 10 #fcfcfc #000000 #000000 0 1;
#X obj 189 61 s FEED;
#X msg 189 40 flaga \$1;
#X connect 0 0 33 0;
#X connect 3 0 53 0;
#X connect 5 0 32 0;
#X connect 6 0 31 0;
#X connect 7 0 9 0;
#X connect 7 0 30 0;
#X connect 9 0 10 0;
#X connect 9 0 16 0;
#X connect 9 0 55 0;
#X connect 11 0 31 0;
#X connect 16 0 22 0;
#X connect 18 0 19 0;
#X connect 18 0 20 0;
#X connect 19 0 18 1;
#X connect 20 0 21 0;
#X connect 21 0 25 0;
#X connect 22 0 18 0;
#X connect 23 0 22 1;
#X connect 24 0 28 0;
#X connect 24 1 29 0;
#X connect 25 0 26 0;
#X connect 26 0 35 0;
#X connect 27 0 24 0;
#X connect 28 0 15 0;
#X connect 29 0 17 0;
#X connect 31 0 32 1;
#X connect 32 2 23 0;
#X connect 32 3 7 0;
#X connect 33 0 32 0;
#X connect 33 1 34 0;
#X connect 34 0 16 0;
#X connect 35 0 27 0;
#X connect 36 0 37 0;
#X connect 37 0 16 0;
#X connect 38 0 50 0;
#X connect 38 0 0 0;
#X connect 39 0 38 0;
#X connect 40 0 43 0;
#X connect 42 0 40 0;
#X connect 43 0 41 0;
#X connect 44 0 46 0;
#X connect 46 0 45 0;
#X connect 47 0 49 0;
#X connect 48 0 47 0;
#X connect 50 0 51 0;
#X connect 50 0 52 0;
#X connect 53 0 54 0;
#X connect 54 0 5 0;
#X connect 54 1 38 0;
#X connect 56 0 58 0;
#X connect 58 0 57 0;
#X coords 0 -1 1 1 100 150 2 5 5;
Reference in a new issue View git blame Copy permalink