forest-all-around/puredata/radio_theatre_0.atm2022/radio_toner.pd
2022-10-21 03:07:04 +09:00

330 lines
13 KiB
Text

#N canvas 28 162 943 672 12;
#N canvas 0 23 450 278 (subpatch) 0;
#X array riff10 50 float 3;
#A 0 0.809524 0.809524 0.819048 0.819048 0.819048 0.809524 0.7 0.695239
0.695239 0.695239 0.695239 0.438095 0.695239 0.690477 0.685715 0.447619
0.680952 0.680952 0.680952 0.680952 0.680952 0.82381 0.82381 0.666666
0.666666 0.671429 0.671429 0.814286 0.814286 0.657142 0.657142 0.657142
0.642856 0.623807 0.623807 0.623807 0.809524 0.361905 0.809524 0.361905
0.714285 0.714285 0.723809 0.761905 0.761905 0.771429 0.771429 0.771429
0.771429 0.800001;
#X coords 0 1 50 0 150 105 1 0 0;
#X restore 48 496 graph;
#X obj 371 405 tgl 20 0 empty empty 3001 17 7 0 10 #f8fc00 #000000
#000000 0 1;
#X obj 228 472 metro 2000;
#X obj 228 611 s NOTE;
#X msg 318 472 symbol riff10;
#X msg 45 359 1999 0 0 \$1;
#X obj 45 383 s NOTE;
#X obj 228 506 riff 170 3120;
#X obj 45 339 tgl 15 0 empty empty harmonica 17 7 0 10 #fcfcfc #000000
#000000 0 1;
#X text 101 456 plane;
#X obj 228 428 loadbang;
#X obj 168 19 inlet;
#X floatatom 168 44 5 0 0 0 - - - 0;
#X obj 257 300 radio_bell;
#X obj 257 281 bng 15 250 50 0 empty empty empty 17 7 0 10 #fcfcfc
#000000 #000000;
#X obj 245 145 > 15;
#X obj 245 168 change;
#X obj 275 254 del;
#X obj 245 191 sel 1;
#X msg 275 231 10000;
#X obj 595 192 tgl 15 0 empty empty set\\\ to\\\ sleep 17 7 0 10 #fcfcfc
#000000 #000000 0 1;
#X obj 228 452 tgl 15 0 empty empty empty 17 7 0 10 #fcfcfc #000000
#000000 0 1;
#X obj 45 168 change;
#X obj 45 191 sel 1;
#X obj 45 145 > 10;
#X obj 45 281 bng 15 250 50 0 empty empty empty 17 7 0 10 #fcfcfc #000000
#000000;
#X obj 63 254 del;
#X obj 595 66 loadbang;
#X msg 595 91 1;
#X obj 367 281 bng 15 250 50 0 empty empty empty 17 7 0 10 #fcfcfc
#000000 #000000;
#X obj 355 168 change;
#X obj 385 254 del;
#X obj 355 191 sel 1;
#X msg 385 231 10000;
#X obj 355 145 > 22;
#X msg 367 301 0;
#X obj 145 168 change;
#X obj 145 191 sel 1;
#X obj 163 254 del;
#X msg 163 231 10000;
#X msg 45 301 1;
#X msg 63 231 4000;
#X obj 145 145 > 13;
#X obj 145 281 bng 15 250 50 0 empty empty empty 17 7 0 10 #fcfcfc
#000000 #000000;
#X msg 145 301 0;
#X obj 467 281 bng 15 250 50 0 empty empty empty 17 7 0 10 #fcfcfc
#000000 #000000;
#X obj 455 168 change;
#X obj 485 254 del;
#X obj 455 191 sel 1;
#X msg 485 231 10000;
#X obj 455 145 > 28;
#X msg 467 301 1;
#X msg 172 334 1;
#X msg 453 335 0;
#X msg 210 155 1;
#N canvas 0 394 1436 601 fruit 0;
#N canvas 0 50 450 250 (subpatch) 0;
#X array fruit_energy 3 float 2;
#X coords 0 1 3 0 200 50 1 0 0;
#X restore 104 121 graph;
#X obj 395 165 + 1;
#X obj 428 136 t b a;
#X obj 690 437 array sum;
#X obj 690 402 metro 100;
#X obj 690 462 max 0.001;
#X obj 690 488 *;
#X obj 690 318 loadbang;
#N canvas 0 50 450 250 (subpatch) 0;
#X array fruit_energy_sequence 20 float 3;
#A 0 1.22 1.18 1.24 0.66 0.84 0.84 0.58 0.22 0.24 0.98 1.34 1.24 0.36
0.62 1.06 0.94 0.14 0.14 0.14 0.14;
#X coords 0 2 20 0 200 100 1 0 0;
#X restore 1015 48 graph;
#X obj 950 278 f;
#X obj 983 278 + 1;
#X obj 950 303 mod 20;
#X floatatom 950 328 5 0 0 0 - - - 0;
#X obj 935 248 bng 15 250 50 0 empty empty empty 17 7 0 10 #fcfcfc
#000000 #000000;
#X floatatom 950 385 5 0 0 0 - - - 0;
#X obj 935 223 metro 60000;
#X obj 935 203 tgl 15 0 empty empty empty 17 7 0 10 #fcfcfc #000000
#000000 0 1;
#X obj 935 178 loadbang;
#X obj 1015 148 hradio 10 1 0 20 empty empty empty 0 -8 0 10 #f8fc00
#0400fc #000000 0;
#X obj 950 442 line;
#X floatatom 950 471 5 0 0 0 - - - 0;
#X msg 950 413 \$1 10000;
#X floatatom 690 511 5 0 0 0 - - - 0;
#X obj 103 182 tgl 15 0 empty empty sleep 17 7 0 10 #ff0400 #ffffff
#000000 0 1;
#X obj 428 194 send;
#X text 436 54 hi \, welcome!;
#X text 798 55 everyone-energy;
#X obj 690 343 t b b b;
#X floatatom 272 181 5 0 0 0 member\ count - - 0;
#X floatatom 272 201 5 0 0 0 e_seq - - 0;
#X floatatom 196 201 5 0 0 0 energy\ all - - 0;
#X obj 67 64 tgl 15 0 empty WORLD_SLEEP r:WORLD_SLEEP 17 7 0 10 #fc0400
#fcfcfc #fc0400 0 1;
#X obj 77 239 v fruit_sleep;
#X text 116 322 fruit;
#X msg 367 235 \; fruit_energy resize \$1;
#X obj 428 165 v fruit_member_count;
#X obj 428 107 r fruit_onconnect;
#X obj 735 167 r fruit_status;
#X msg 735 195 \; fruit_energy \$2 \$1;
#X msg 1222 48 \; fruit_energy_sequence const 1;
#X obj 950 356 tabread fruit_energy_sequence;
#X msg 773 361 \; fruit_energy const 0;
#X msg 774 409 symbol fruit_energy;
#X obj 690 532 v fruit_energy_sum;
#X connect 1 0 28 0;
#X connect 1 0 34 0;
#X connect 1 0 35 0;
#X connect 2 0 35 0;
#X connect 2 1 24 1;
#X connect 3 0 5 0;
#X connect 4 0 3 0;
#X connect 5 0 6 0;
#X connect 6 0 22 0;
#X connect 7 0 27 0;
#X connect 9 0 10 0;
#X connect 9 0 11 0;
#X connect 10 0 9 1;
#X connect 11 0 12 0;
#X connect 12 0 18 0;
#X connect 12 0 40 0;
#X connect 13 0 9 0;
#X connect 14 0 21 0;
#X connect 15 0 13 0;
#X connect 16 0 15 0;
#X connect 17 0 16 0;
#X connect 19 0 20 0;
#X connect 20 0 6 1;
#X connect 20 0 29 0;
#X connect 21 0 19 0;
#X connect 22 0 30 0;
#X connect 22 0 43 0;
#X connect 23 0 32 0;
#X connect 27 0 4 0;
#X connect 27 1 42 0;
#X connect 27 2 41 0;
#X connect 31 0 23 0;
#X connect 35 0 1 0;
#X connect 35 0 24 0;
#X connect 36 0 2 0;
#X connect 37 0 38 0;
#X connect 40 0 14 0;
#X connect 42 0 3 2;
#X coords 0 -1 1 1 207 120 2 100 100;
#X restore 693 37 pd fruit world;
#X obj 549 264 radio_mote_random;
#A saved 0.0952383 0.114286 0.114286 0.114286 0.057143 -0.0476183 -0.133332
-0.133332 -0.133332 -0.133332 -0.0761895 0.0285717 0.0857142 0.104762
0.104762 0.104762 0.104762 0.104762 0.0476192 -0.133332 -0.142856 -0.142856
-0.15238 -0.123808 -0.0666658 0.0476193 0.0666668 0.0666668 0.0666668
0.0761905 0.0761905 0.0857143 -0.123808 -0.123808 -0.123808 -0.123808
-0.123808 -0.123808 -0.123808 -0.123808 0.0476192 0.095238 0.095238
0.104762 0.104762 -0.161903 -0.147618 -0.133332 -0.114285 0.0952383
50 0.0380951 0.0666663 0.0952376 0.104761 0.123809 0.0761901 0.00952381
-0.0476187 -0.0952374 -0.123809 -0.114285 -0.0952374 -0.0761899 -0.0476187
-0.0285712 5.96046e-08 0.0285713 0.0476188 0.0571426 0.0476188 0.0190476
-0.0380949 -0.104761 -0.123809 -0.104761 -0.0857137 -0.0571424 -0.0190474
0.0190476 0.0571426 0.0857138 0.104761 0.0952376 0.0476188 -0.00952369
-0.0571424 -0.104761 -0.142856 -0.142856 -0.133332 -0.114285 -0.0857137
-0.0285712 0.00952381 0.0476188 0.0761901 0.0952376 0.114285 0.114285
-0.0571424 50 -0.0190473 -0.0190473 0.0761905 -0.0190473 -0.0190473
-0.0190473 -0.0190473 -0.114285 -0.0190473 0.114286 -0.0952373 -0.114285
8.34465e-07 -0.00952291 -0.00952291 -0.00952291 0.133333 0.133333 8.34465e-07
-0.0190473 -0.0190473 -0.0952371 -0.123808 -0.142856 -0.0190473 -0.00952351
0.114286 0.133333 0.161904 0.161904 -0.00952351 -0.00952351 -0.00952351
-0.00952351 0.0666667 0.0285717 -0.00952333 -0.0476183 -0.104761 -0.114285
-0.0952371 -0.0571421 0.0190479 0.0857142 0.0952379 -0.00952351 -0.00952351
-0.00952351 -0.00952351 -0.00952351 50 0.0571424 0.0857143 0.114286
0.104762 0.0857143 0.0761906 0.0380956 -0.00952315 -0.142856 -0.0857131
-0.00952315 0.0380956 0.0761906 0.0761906 -0.0285707 -0.0857131 -0.133332
-0.114284 -0.0952369 -0.0666656 -0.0476182 -0.0285707 0.00952435 0.0571431
0.0571431 0.0285718 -0.00952315 -0.0761894 -0.0476182 0.00952435 0.0476193
0.0857143 0.114286 0.0571431 5.96046e-07 -0.0666656 -0.104761 -0.0857131
-0.0571419 -0.00952315 0.0190481 0.0571431 0.0952381 0.0857143 5.96046e-07
-0.0476182 -0.0952369 -0.133332 -0.133332 0.0857143 50 4201 0 200 700
1000 do fruit 0.2 0.1 0.02 -0.005;
#X obj 549 394 radio_mote_random;
#A saved 0.0952383 0.114286 0.114286 0.114286 0.057143 -0.0476183 -0.133332
-0.133332 -0.133332 -0.133332 -0.0761895 0.0285717 0.0857142 0.104762
0.104762 0.104762 0.104762 0.104762 0.0476192 -0.133332 -0.142856 -0.142856
-0.15238 -0.123808 -0.0666658 0.0476193 0.0666668 0.0666668 0.0666668
0.0761905 0.0761905 0.0857143 -0.123808 -0.123808 -0.123808 -0.123808
-0.123808 -0.123808 -0.123808 -0.123808 0.0476192 0.095238 0.095238
0.104762 0.104762 -0.161903 -0.147618 -0.133332 -0.114285 0.0952383
50 0.0380951 0.0666663 0.0952376 0.104761 0.123809 0.0761901 0.00952381
-0.0476187 -0.0952374 -0.123809 -0.114285 -0.0952374 -0.0761899 -0.0476187
-0.0285712 5.96046e-08 0.0285713 0.0476188 0.0571426 0.0476188 0.0190476
-0.0380949 -0.104761 -0.123809 -0.104761 -0.0857137 -0.0571424 -0.0190474
0.0190476 0.0571426 0.0857138 0.104761 0.0952376 0.0476188 -0.00952369
-0.0571424 -0.104761 -0.142856 -0.142856 -0.133332 -0.114285 -0.0857137
-0.0285712 0.00952381 0.0476188 0.0761901 0.0952376 0.114285 0.114285
-0.0571424 50 -0.0190473 -0.0190473 0.0761905 -0.0190473 -0.0190473
-0.0190473 -0.0190473 -0.114285 -0.0190473 0.114286 -0.0952373 -0.114285
8.34465e-07 -0.00952291 -0.00952291 -0.00952291 0.133333 0.133333 8.34465e-07
-0.0190473 -0.0190473 -0.0952371 -0.123808 -0.142856 -0.0190473 -0.00952351
0.114286 0.133333 0.161904 0.161904 -0.00952351 -0.00952351 -0.00952351
-0.00952351 0.0666667 0.0285717 -0.00952333 -0.0476183 -0.104761 -0.114285
-0.0952371 -0.0571421 0.0190479 0.0857142 0.0952379 -0.00952351 -0.00952351
-0.00952351 -0.00952351 -0.00952351 50 0.0571424 0.0857143 0.114286
0.104762 0.0857143 0.0761906 0.0380956 -0.00952315 -0.142856 -0.0857131
-0.00952315 0.0380956 0.0761906 0.0761906 -0.0285707 -0.0857131 -0.133332
-0.114284 -0.0952369 -0.0666656 -0.0476182 -0.0285707 0.00952435 0.0571431
0.0571431 0.0285718 -0.00952315 -0.0761894 -0.0476182 0.00952435 0.0476193
0.0857143 0.114286 0.0571431 5.96046e-07 -0.0666656 -0.104761 -0.0857131
-0.0571419 -0.00952315 0.0190481 0.0571431 0.0952381 0.0857143 5.96046e-07
-0.0476182 -0.0952369 -0.133332 -0.133332 0.0857143 50 4206 0 200 700
1000 mi fruit 0.2 0.1 0.02 -0.005;
#X obj 549 524 radio_mote_random;
#A saved 0.0952383 0.114286 0.114286 0.114286 0.057143 -0.0476183 -0.133332
-0.133332 -0.133332 -0.133332 -0.0761895 0.0285717 0.0857142 0.104762
0.104762 0.104762 0.104762 0.104762 0.0476192 -0.133332 -0.142856 -0.142856
-0.15238 -0.123808 -0.0666658 0.0476193 0.0666668 0.0666668 0.0666668
0.0761905 0.0761905 0.0857143 -0.123808 -0.123808 -0.123808 -0.123808
-0.123808 -0.123808 -0.123808 -0.123808 0.0476192 0.095238 0.095238
0.104762 0.104762 -0.161903 -0.147618 -0.133332 -0.114285 0.0952383
50 0.0380951 0.0666663 0.0952376 0.104761 0.123809 0.0761901 0.00952381
-0.0476187 -0.0952374 -0.123809 -0.114285 -0.0952374 -0.0761899 -0.0476187
-0.0285712 5.96046e-08 0.0285713 0.0476188 0.0571426 0.0476188 0.0190476
-0.0380949 -0.104761 -0.123809 -0.104761 -0.0857137 -0.0571424 -0.0190474
0.0190476 0.0571426 0.0857138 0.104761 0.0952376 0.0476188 -0.00952369
-0.0571424 -0.104761 -0.142856 -0.142856 -0.133332 -0.114285 -0.0857137
-0.0285712 0.00952381 0.0476188 0.0761901 0.0952376 0.114285 0.114285
-0.0571424 50 -0.0190473 -0.0190473 0.0761905 -0.0190473 -0.0190473
-0.0190473 -0.0190473 -0.114285 -0.0190473 0.114286 -0.0952373 -0.114285
8.34465e-07 -0.00952291 -0.00952291 -0.00952291 0.133333 0.133333 8.34465e-07
-0.0190473 -0.0190473 -0.0952371 -0.123808 -0.142856 -0.0190473 -0.00952351
0.114286 0.133333 0.161904 0.161904 -0.00952351 -0.00952351 -0.00952351
-0.00952351 0.0666667 0.0285717 -0.00952333 -0.0476183 -0.104761 -0.114285
-0.0952371 -0.0571421 0.0190479 0.0857142 0.0952379 -0.00952351 -0.00952351
-0.00952351 -0.00952351 -0.00952351 50 0.0571424 0.0857143 0.114286
0.104762 0.0857143 0.0761906 0.0380956 -0.00952315 -0.142856 -0.0857131
-0.00952315 0.0380956 0.0761906 0.0761906 -0.0285707 -0.0857131 -0.133332
-0.114284 -0.0952369 -0.0666656 -0.0476182 -0.0285707 0.00952435 0.0571431
0.0571431 0.0285718 -0.00952315 -0.0761894 -0.0476182 0.00952435 0.0476193
0.0857143 0.114286 0.0571431 5.96046e-07 -0.0666656 -0.104761 -0.0857131
-0.0571419 -0.00952315 0.0190481 0.0571431 0.0952381 0.0857143 5.96046e-07
-0.0476182 -0.0952369 -0.133332 -0.133332 0.0857143 50 4403 0 200 700
1000 sol fruit 0.2 0.1 0.02 -0.005;
#X obj 595 216 v fruit_sleep;
#X connect 1 0 7 3;
#X connect 2 0 7 0;
#X connect 4 0 7 1;
#X connect 5 0 6 0;
#X connect 7 0 3 0;
#X connect 8 0 5 0;
#X connect 10 0 4 0;
#X connect 10 0 21 0;
#X connect 11 0 12 0;
#X connect 12 0 15 0;
#X connect 12 0 24 0;
#X connect 12 0 34 0;
#X connect 12 0 42 0;
#X connect 12 0 50 0;
#X connect 14 0 13 0;
#X connect 15 0 16 0;
#X connect 16 0 18 0;
#X connect 17 0 14 0;
#X connect 18 0 14 0;
#X connect 18 0 19 0;
#X connect 19 0 17 0;
#X connect 20 0 59 0;
#X connect 21 0 2 0;
#X connect 22 0 23 0;
#X connect 23 0 41 0;
#X connect 23 0 25 0;
#X connect 24 0 22 0;
#X connect 25 0 40 0;
#X connect 26 0 25 0;
#X connect 27 0 28 0;
#X connect 28 0 20 0;
#X connect 29 0 35 0;
#X connect 30 0 32 0;
#X connect 31 0 29 0;
#X connect 32 0 29 0;
#X connect 32 0 33 0;
#X connect 33 0 31 0;
#X connect 34 0 30 0;
#X connect 35 0 20 0;
#X connect 36 0 37 0;
#X connect 37 0 39 0;
#X connect 37 0 43 0;
#X connect 38 0 43 0;
#X connect 39 0 38 0;
#X connect 40 0 8 0;
#X connect 41 0 26 0;
#X connect 42 0 36 0;
#X connect 43 0 44 0;
#X connect 43 0 52 0;
#X connect 44 0 8 0;
#X connect 45 0 51 0;
#X connect 45 0 53 0;
#X connect 46 0 48 0;
#X connect 47 0 45 0;
#X connect 48 0 45 0;
#X connect 48 0 49 0;
#X connect 49 0 47 0;
#X connect 50 0 46 0;
#X connect 51 0 20 0;
#X connect 52 0 1 0;
#X connect 53 0 1 0;
#X connect 54 0 18 0;